src/FSWrap.c

   1
   2 /*
   3  * Copyright 1991 by the Open Software Foundation
   4  * Copyright 1993 by the TOSHIBA Corp.
   5  *
   6  * Permission to use, copy, modify, distribute, and sell this software and its
   7  * documentation for any purpose is hereby granted without fee, provided that
   8  * the above copyright notice appear in all copies and that both that
   9  * copyright notice and this permission notice appear in supporting
  10  * documentation, and that the name Open Software Foundation
  11  * not be used in advertising or publicity pertaining to distribution of the
  12  * software without specific, written prior permission.  Open Software
  13  * Foundation makes no representations about the suitability of this
  14  * software for any purpose.  It is provided "as is" without express or
  15  * implied warranty.
  16  *
  17  * OPEN SOFTWARE FOUNDATION DISCLAIMS ALL WARRANTIES WITH REGARD TO
  18  * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
  19  * FITNESS, IN NO EVENT SHALL OPEN SOFTWARE FOUNDATIONN BE
  20  * LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  21  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  22  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  23  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  24  *
  25  *               M. Collins             OSF
  26  *
  27  *               Katsuhisa Yano         TOSHIBA Corp.
  28  */
  29
  30 /*
  31
  32 Copyright 1991, 1998  The Open Group
  33
  34 Permission to use, copy, modify, distribute, and sell this software and its
  35 documentation for any purpose is hereby granted without fee, provided that
  36 the above copyright notice appear in all copies and that both that
  37 copyright notice and this permission notice appear in supporting
  38 documentation.
  39
  40 The above copyright notice and this permission notice shall be included
  41 in all copies or substantial portions of the Software.
  42
  43 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  44 OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  45 MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  46 IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR
  47 OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  48 ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
  49 OTHER DEALINGS IN THE SOFTWARE.
  50
  51 Except as contained in this notice, the name of The Open Group shall
  52 not be used in advertising or otherwise to promote the sale, use or
  53 other dealings in this Software without prior written authorization
  54 from The Open Group.
  55
  56 */
  57
  58
  59 #ifdef HAVE_CONFIG_H
  60 #include <config.h>
  61 #endif
  62 #include "Xlibint.h"
  63 #include "Xlcint.h"
  64 #include <ctype.h>
  65 #include <X11/Xos.h>
  66
  67
  68 #define XMAXLIST        256
  69
  70 char **
  71 _XParseBaseFontNameList(
  72     char           *str,
  73     int            *num)
  74 {
  75     char           *plist[XMAXLIST];
  76     char          **list;
  77     char           *ptr, *psave;
  78
  79     *num = 0;
  80     if (!str || !*str) {
  81         return (char **)NULL;
  82     }
  83     while (*str && isspace(*str))
  84         str++;
  85     if (!*str)
  86         return (char **)NULL;
  87
  88     if (!(ptr = strdup(str))) {
  89         return (char **)NULL;
  90     }
  91
  92     psave = ptr;
  93     /* somebody who specifies more than XMAXLIST basefontnames will lose */
  94     while (*num < (sizeof plist / sizeof plist[0])) {
  95         char    *back;
  96
  97         plist[*num] = ptr;
  98         if ((ptr = strchr(ptr, ','))) {
  99             back = ptr;
 100         } else {
 101             back = plist[*num] + strlen(plist[*num]);
 102         }
 103         while (isspace(*(back - 1)))
 104             back--;
 105         *back = '\0';
 106         (*num)++;
 107         if (!ptr)
 108             break;
 109         ptr++;
 110         while (*ptr && isspace(*ptr))
 111             ptr++;
 112         if (!*ptr)
 113             break;
 114     }
 115     if (!(list = (char **) Xmalloc((unsigned)sizeof(char *) * (*num + 1)))) {
 116         Xfree(psave);
 117         return (char **)NULL;
 118     }
 119     memcpy((char *)list, (char *)plist, sizeof(char *) * (*num));
 120     *(list + *num) = NULL;
 121
 122     return list;
 123 }
 124
 125 static char **
 126 copy_string_list(
 127     char **string_list,
 128     int list_count)
 129 {
 130     char **string_list_ret, **list_src, **list_dst, *dst;
 131     int length, count;
 132
 133     if (string_list == NULL || list_count <= 0)
 134         return (char **) NULL;
 135
 136     string_list_ret = (char **) Xmalloc(sizeof(char *) * list_count);
 137     if (string_list_ret == NULL)
 138         return (char **) NULL;
 139
 140     list_src = string_list;
 141     count = list_count;
 142     for (length = 0; count-- > 0; list_src++)
 143         length += strlen(*list_src) + 1;
 144
 145     dst = (char *) Xmalloc(length);
 146     if (dst == NULL) {
 147         Xfree(string_list_ret);
 148         return (char **) NULL;
 149     }
 150
 151     list_src = string_list;
 152     count = list_count;
 153     list_dst = string_list_ret;
 154     for ( ;  count-- > 0; list_src++) {
 155         strcpy(dst, *list_src);
 156         *list_dst++ = dst;
 157         dst += strlen(dst) + 1;
 158     }
 159
 160     return string_list_ret;
 161 }
 162
 163 XFontSet
 164 XCreateFontSet (
 165     Display        *dpy,
 166     _Xconst char   *base_font_name_list,
 167     char         ***missing_charset_list,
 168     int            *missing_charset_count,
 169     char          **def_string)
 170 {
 171     XOM om;
 172     XOC oc;
 173     XOMCharSetList *list;
 174
 175     *missing_charset_list = NULL;
 176     *missing_charset_count = 0;
 177
 178     om = XOpenOM(dpy, NULL, NULL, NULL);
 179     if (om == NULL)
 180         return (XFontSet) NULL;
 181
 182     if ((oc = XCreateOC(om, XNBaseFontName, base_font_name_list, NULL))) {
 183         list = &oc->core.missing_list;
 184         oc->core.om_automatic = True;
 185     } else
 186         list = &om->core.required_charset;
 187
 188     *missing_charset_list = copy_string_list(list->charset_list,
 189                                              list->charset_count);
 190     *missing_charset_count = list->charset_count;
 191
 192     if (list->charset_list && *missing_charset_list == NULL)
 193         oc = NULL;
 194
 195     if (oc && def_string) {
 196         *def_string = oc->core.default_string;
 197         if (!*def_string)
 198             *def_string = "";
 199     }
 200
 201     if (oc == NULL)
 202         XCloseOM(om);
 203
 204     return (XFontSet) oc;
 205 }
 206
 207 int
 208 XFontsOfFontSet(
 209     XFontSet        font_set,
 210     XFontStruct  ***font_struct_list,
 211     char         ***font_name_list)
 212 {
 213     *font_name_list   = font_set->core.font_info.font_name_list;
 214     *font_struct_list = font_set->core.font_info.font_struct_list;
 215     return font_set->core.font_info.num_font;
 216 }
 217
 218 char *
 219 XBaseFontNameListOfFontSet(XFontSet font_set)
 220 {
 221     return font_set->core.base_name_list;
 222 }
 223
 224 char *
 225 XLocaleOfFontSet(XFontSet font_set)
 226 {
 227     return font_set->core.om->core.lcd->core->name;
 228 }
 229
 230 Bool
 231 XContextDependentDrawing(XFontSet font_set)
 232 {
 233     return font_set->core.om->core.context_dependent;
 234 }
 235
 236 Bool
 237 XDirectionalDependentDrawing(XFontSet font_set)
 238 {
 239     return font_set->core.om->core.directional_dependent;
 240 }
 241
 242 Bool
 243 XContextualDrawing(XFontSet font_set)
 244 {
 245     return font_set->core.om->core.contextual_drawing;
 246 }
 247
 248 XFontSetExtents *
 249 XExtentsOfFontSet(XFontSet font_set)
 250 {
 251     if (!font_set)
 252         return NULL;
 253     return &font_set->core.font_set_extents;
 254 }
 255
 256 void
 257 XFreeFontSet(
 258     Display        *dpy,
 259     XFontSet        font_set)
 260 {
 261     XCloseOM(font_set->core.om);
 262 }