]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * $RCSId: xc/lib/fontconfig/src/fcname.c,v 1.15 2002/09/26 00:17:28 keithp Exp $ | |
3 | * | |
4 | * Copyright © 2000 Keith Packard | |
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 of Keith Packard not be used in | |
11 | * advertising or publicity pertaining to distribution of the software without | |
12 | * specific, written prior permission. Keith Packard makes no | |
13 | * representations about the suitability of this software for any purpose. It | |
14 | * is provided "as is" without express or implied warranty. | |
15 | * | |
16 | * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, | |
17 | * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO | |
18 | * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR | |
19 | * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, | |
20 | * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER | |
21 | * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR | |
22 | * PERFORMANCE OF THIS SOFTWARE. | |
23 | */ | |
24 | ||
25 | #include "fcint.h" | |
26 | #include <ctype.h> | |
27 | #include <stdlib.h> | |
28 | #include <string.h> | |
29 | #include <stdio.h> | |
30 | ||
31 | /* Please do not revoke any of these bindings. */ | |
32 | /* The __DUMMY__ object enables callers to distinguish the error return | |
33 | * of FcObjectToPtrLookup from FC_FAMILY's FcObjectPtr, which would | |
34 | * otherwise be 0. */ | |
35 | static const FcObjectType _FcBaseObjectTypes[] = { | |
36 | { "__DUMMY__", FcTypeVoid, }, | |
37 | { FC_FAMILY, FcTypeString, }, | |
38 | { FC_FAMILYLANG, FcTypeString, }, | |
39 | { FC_STYLE, FcTypeString, }, | |
40 | { FC_STYLELANG, FcTypeString, }, | |
41 | { FC_FULLNAME, FcTypeString, }, | |
42 | { FC_FULLNAMELANG, FcTypeString, }, | |
43 | { FC_SLANT, FcTypeInteger, }, | |
44 | { FC_WEIGHT, FcTypeInteger, }, | |
45 | { FC_WIDTH, FcTypeInteger, }, | |
46 | { FC_SIZE, FcTypeDouble, }, | |
47 | { FC_ASPECT, FcTypeDouble, }, | |
48 | { FC_PIXEL_SIZE, FcTypeDouble, }, | |
49 | { FC_SPACING, FcTypeInteger, }, | |
50 | { FC_FOUNDRY, FcTypeString, }, | |
51 | /* { FC_CORE, FcTypeBool, }, */ | |
52 | { FC_ANTIALIAS, FcTypeBool, }, | |
53 | { FC_HINT_STYLE, FcTypeInteger, }, | |
54 | { FC_HINTING, FcTypeBool, }, | |
55 | { FC_VERTICAL_LAYOUT, FcTypeBool, }, | |
56 | { FC_AUTOHINT, FcTypeBool, }, | |
57 | { FC_GLOBAL_ADVANCE, FcTypeBool, }, | |
58 | /* { FC_XLFD, FcTypeString, }, */ | |
59 | { FC_FILE, FcTypeString, }, | |
60 | { FC_INDEX, FcTypeInteger, }, | |
61 | { FC_RASTERIZER, FcTypeString, }, | |
62 | { FC_OUTLINE, FcTypeBool, }, | |
63 | { FC_SCALABLE, FcTypeBool, }, | |
64 | { FC_DPI, FcTypeDouble }, | |
65 | { FC_RGBA, FcTypeInteger, }, | |
66 | { FC_SCALE, FcTypeDouble, }, | |
67 | { FC_MINSPACE, FcTypeBool, }, | |
68 | /* { FC_RENDER, FcTypeBool, },*/ | |
69 | { FC_CHAR_WIDTH, FcTypeInteger }, | |
70 | { FC_CHAR_HEIGHT, FcTypeInteger }, | |
71 | { FC_MATRIX, FcTypeMatrix }, | |
72 | { FC_CHARSET, FcTypeCharSet }, | |
73 | { FC_LANG, FcTypeLangSet }, | |
74 | { FC_FONTVERSION, FcTypeInteger }, | |
75 | { FC_CAPABILITY, FcTypeString }, | |
76 | { FC_FONTFORMAT, FcTypeString }, | |
77 | { FC_EMBOLDEN, FcTypeBool }, | |
78 | { FC_EMBEDDED_BITMAP, FcTypeBool }, | |
79 | }; | |
80 | ||
81 | #define NUM_OBJECT_TYPES (sizeof _FcBaseObjectTypes / sizeof _FcBaseObjectTypes[0]) | |
82 | ||
83 | static FcObjectType * _FcUserObjectNames = 0; | |
84 | static int user_obj_alloc = 0; | |
85 | static int next_basic_offset = NUM_OBJECT_TYPES; | |
86 | ||
87 | typedef struct _FcObjectTypeList FcObjectTypeList; | |
88 | ||
89 | struct _FcObjectTypeList { | |
90 | const FcObjectTypeList *next; | |
91 | const FcObjectType *types; | |
92 | int ntypes; | |
93 | int basic_offset; | |
94 | }; | |
95 | ||
96 | static const FcObjectTypeList _FcBaseObjectTypesList = { | |
97 | 0, | |
98 | _FcBaseObjectTypes, | |
99 | NUM_OBJECT_TYPES, | |
100 | 0 | |
101 | }; | |
102 | ||
103 | static const FcObjectTypeList *_FcObjectTypes = &_FcBaseObjectTypesList; | |
104 | ||
105 | FcBool | |
106 | FcNameRegisterObjectTypes (const FcObjectType *types, int ntypes) | |
107 | { | |
108 | FcObjectTypeList *l; | |
109 | ||
110 | l = (FcObjectTypeList *) malloc (sizeof (FcObjectTypeList)); | |
111 | if (!l) | |
112 | return FcFalse; | |
113 | FcMemAlloc (FC_MEM_OBJECTTYPE, sizeof (FcObjectTypeList)); | |
114 | l->types = types; | |
115 | l->ntypes = ntypes; | |
116 | l->next = _FcObjectTypes; | |
117 | l->basic_offset = next_basic_offset; | |
118 | next_basic_offset += ntypes; | |
119 | _FcObjectTypes = l; | |
120 | return FcTrue; | |
121 | } | |
122 | ||
123 | static FcBool | |
124 | FcNameUnregisterObjectTypesFree (const FcObjectType *types, int ntypes, | |
125 | FcBool do_free) | |
126 | { | |
127 | const FcObjectTypeList *l, **prev; | |
128 | ||
129 | for (prev = &_FcObjectTypes; | |
130 | (l = *prev); | |
131 | prev = (const FcObjectTypeList **) &(l->next)) | |
132 | { | |
133 | if (l->types == types && l->ntypes == ntypes) | |
134 | { | |
135 | *prev = l->next; | |
136 | if (do_free) { | |
137 | FcMemFree (FC_MEM_OBJECTTYPE, sizeof (FcObjectTypeList)); | |
138 | free ((void *) l); | |
139 | } | |
140 | return FcTrue; | |
141 | } | |
142 | } | |
143 | return FcFalse; | |
144 | } | |
145 | ||
146 | FcBool | |
147 | FcNameUnregisterObjectTypes (const FcObjectType *types, int ntypes) | |
148 | { | |
149 | return FcNameUnregisterObjectTypesFree (types, ntypes, FcTrue); | |
150 | } | |
151 | ||
152 | const FcObjectType * | |
153 | FcNameGetObjectType (const char *object) | |
154 | { | |
155 | int i; | |
156 | const FcObjectTypeList *l; | |
157 | const FcObjectType *t; | |
158 | ||
159 | for (l = _FcObjectTypes; l; l = l->next) | |
160 | { | |
161 | if (l == (FcObjectTypeList*)_FcUserObjectNames) | |
162 | continue; | |
163 | ||
164 | for (i = 0; i < l->ntypes; i++) | |
165 | { | |
166 | t = &l->types[i]; | |
167 | if (!strcmp (object, t->object)) | |
168 | return t; | |
169 | } | |
170 | } | |
171 | return 0; | |
172 | } | |
173 | ||
174 | #define OBJECT_HASH_SIZE 31 | |
175 | struct objectBucket { | |
176 | struct objectBucket *next; | |
177 | FcChar32 hash; | |
178 | int id; | |
179 | }; | |
180 | static struct objectBucket *FcObjectBuckets[OBJECT_HASH_SIZE]; | |
181 | ||
182 | /* Design constraint: biggest_known_ntypes must never change | |
183 | * after any call to FcNameRegisterObjectTypes. */ | |
184 | static const FcObjectType *biggest_known_types = _FcBaseObjectTypes; | |
185 | static FcBool allocated_biggest_known_types; | |
186 | static int biggest_known_ntypes = NUM_OBJECT_TYPES; | |
187 | static int biggest_known_count = 0; | |
188 | static char * biggest_ptr; | |
189 | ||
190 | ||
191 | static FcObjectPtr | |
192 | FcObjectToPtrLookup (const char * object) | |
193 | { | |
194 | FcObjectPtr i = 0, n; | |
195 | const FcObjectTypeList *l; | |
196 | FcObjectType *t = _FcUserObjectNames; | |
197 | FcBool replace; | |
198 | ||
199 | for (l = _FcObjectTypes; l; l = l->next) | |
200 | { | |
201 | for (i = 0; i < l->ntypes; i++) | |
202 | { | |
203 | t = (FcObjectType *)&l->types[i]; | |
204 | if (!strcmp (object, t->object)) | |
205 | { | |
206 | if (l->types == _FcUserObjectNames) | |
207 | return -i; | |
208 | else | |
209 | return l->basic_offset + i; | |
210 | } | |
211 | } | |
212 | } | |
213 | ||
214 | /* We didn't match. Look for the application's FcObjectTypeList | |
215 | * and replace it in-place. */ | |
216 | for (l = _FcObjectTypes; l; l = l->next) | |
217 | { | |
218 | if (l->types == _FcUserObjectNames) | |
219 | break; | |
220 | } | |
221 | ||
222 | replace = l && l->types == _FcUserObjectNames; | |
223 | if (!_FcUserObjectNames || | |
224 | (replace && user_obj_alloc <= l->ntypes)) | |
225 | { | |
226 | int nt = user_obj_alloc + 4; | |
227 | FcObjectType * tt = realloc (_FcUserObjectNames, | |
228 | nt * sizeof (FcObjectType)); | |
229 | if (!tt) | |
230 | return 0; | |
231 | _FcUserObjectNames = tt; | |
232 | user_obj_alloc = nt; | |
233 | } | |
234 | ||
235 | if (replace) | |
236 | { | |
237 | n = l->ntypes; | |
238 | FcNameUnregisterObjectTypesFree (l->types, l->ntypes, FcFalse); | |
239 | } | |
240 | else | |
241 | n = 0; | |
242 | ||
243 | FcNameRegisterObjectTypes (_FcUserObjectNames, n+1); | |
244 | ||
245 | if (!_FcUserObjectNames) | |
246 | return 0; | |
247 | ||
248 | _FcUserObjectNames[n].object = object; | |
249 | _FcUserObjectNames[n].type = FcTypeVoid; | |
250 | ||
251 | return -n; | |
252 | } | |
253 | ||
254 | FcObjectPtr | |
255 | FcObjectToPtr (const char * name) | |
256 | { | |
257 | FcChar32 hash = FcStringHash ((const FcChar8 *) name); | |
258 | struct objectBucket **p; | |
259 | struct objectBucket *b; | |
260 | int size; | |
261 | ||
262 | for (p = &FcObjectBuckets[hash % OBJECT_HASH_SIZE]; (b = *p); p = &(b->next) | |
263 | ) | |
264 | if (b->hash == hash && !strcmp (name, (char *) (b + 1))) | |
265 | return b->id; | |
266 | size = sizeof (struct objectBucket) + strlen (name) + 1; | |
267 | /* workaround glibc bug which reads strlen in groups of 4 */ | |
268 | b = malloc (size + sizeof (int)); | |
269 | FcMemAlloc (FC_MEM_STATICSTR, size + sizeof(int)); | |
270 | if (!b) | |
271 | return 0; | |
272 | b->next = 0; | |
273 | b->hash = hash; | |
274 | b->id = FcObjectToPtrLookup (name); | |
275 | strcpy ((char *) (b + 1), name); | |
276 | *p = b; | |
277 | return b->id; | |
278 | } | |
279 | ||
280 | void | |
281 | FcObjectStaticNameFini (void) | |
282 | { | |
283 | int i, size; | |
284 | struct objectBucket *b, *next; | |
285 | char *name; | |
286 | ||
287 | for (i = 0; i < OBJECT_HASH_SIZE; i++) | |
288 | { | |
289 | for (b = FcObjectBuckets[i]; b; b = next) | |
290 | { | |
291 | next = b->next; | |
292 | name = (char *) (b + 1); | |
293 | size = sizeof (struct objectBucket) + strlen (name) + 1; | |
294 | FcMemFree (FC_MEM_STATICSTR, size); | |
295 | free (b); | |
296 | } | |
297 | FcObjectBuckets[i] = 0; | |
298 | } | |
299 | } | |
300 | ||
301 | const char * | |
302 | FcObjectPtrU (FcObjectPtr si) | |
303 | { | |
304 | const FcObjectTypeList *l; | |
305 | int i, j; | |
306 | ||
307 | if (si > 0) | |
308 | { | |
309 | if (si < biggest_known_ntypes) | |
310 | return biggest_known_types[si].object; | |
311 | ||
312 | j = 0; | |
313 | for (l = _FcObjectTypes; l; l = l->next) | |
314 | for (i = 0; i < l->ntypes; i++, j++) | |
315 | if (j == si) | |
316 | return l->types[i].object; | |
317 | } | |
318 | ||
319 | return _FcUserObjectNames[-si].object; | |
320 | } | |
321 | ||
322 | int | |
323 | FcObjectNeededBytes () | |
324 | { | |
325 | int num = 0, i; | |
326 | for (i = 0; i < biggest_known_ntypes; i++) | |
327 | { | |
328 | const char * t = biggest_known_types[i].object; | |
329 | num = num + strlen(t) + 1; | |
330 | } | |
331 | biggest_known_count = num; | |
332 | return num + sizeof(int); | |
333 | } | |
334 | ||
335 | int | |
336 | FcObjectNeededBytesAlign (void) | |
337 | { | |
338 | return fc_alignof (int) + fc_alignof (char); | |
339 | } | |
340 | ||
341 | void * | |
342 | FcObjectDistributeBytes (FcCache * metadata, void * block_ptr) | |
343 | { | |
344 | block_ptr = ALIGN (block_ptr, int); | |
345 | *(int *)block_ptr = biggest_known_ntypes; | |
346 | block_ptr = (int *) block_ptr + 1; | |
347 | block_ptr = ALIGN (block_ptr, char); | |
348 | biggest_ptr = block_ptr; | |
349 | block_ptr = (char *) block_ptr + biggest_known_count; | |
350 | return block_ptr; | |
351 | } | |
352 | ||
353 | void | |
354 | FcObjectSerialize (void) | |
355 | { | |
356 | int i; | |
357 | for (i = 0; i < biggest_known_ntypes; i++) | |
358 | { | |
359 | const char * t = biggest_known_types[i].object; | |
360 | strcpy (biggest_ptr, t); | |
361 | biggest_ptr = biggest_ptr + strlen(t) + 1; | |
362 | } | |
363 | } | |
364 | ||
365 | void * | |
366 | FcObjectUnserialize (FcCache * metadata, void *block_ptr) | |
367 | { | |
368 | int new_biggest; | |
369 | block_ptr = ALIGN (block_ptr, int); | |
370 | new_biggest = *(int *)block_ptr; | |
371 | block_ptr = (int *) block_ptr + 1; | |
372 | if (biggest_known_ntypes < new_biggest) | |
373 | { | |
374 | int i; | |
375 | char * bp = (char *)block_ptr; | |
376 | FcObjectType * bn; | |
377 | ||
378 | bn = malloc (sizeof (const FcObjectType) * (new_biggest + 1)); | |
379 | if (!bn) | |
380 | return 0; | |
381 | ||
382 | for (i = 0; i < new_biggest; i++) | |
383 | { | |
384 | const FcObjectType * t = FcNameGetObjectType(bp); | |
385 | if (t) | |
386 | bn[i].type = t->type; | |
387 | else | |
388 | bn[i].type = FcTypeVoid; | |
389 | bn[i].object = bp; | |
390 | bp = bp + strlen(bp) + 1; | |
391 | } | |
392 | ||
393 | FcNameUnregisterObjectTypesFree (biggest_known_types, biggest_known_ntypes, FcFalse); | |
394 | if (allocated_biggest_known_types) | |
395 | { | |
396 | free ((FcObjectTypeList *)biggest_known_types); | |
397 | } | |
398 | else | |
399 | allocated_biggest_known_types = FcTrue; | |
400 | ||
401 | FcNameRegisterObjectTypes (bn, new_biggest); | |
402 | biggest_known_ntypes = new_biggest; | |
403 | biggest_known_types = (const FcObjectType *)bn; | |
404 | } | |
405 | block_ptr = ALIGN (block_ptr, char); | |
406 | block_ptr = (char *) block_ptr + biggest_known_count; | |
407 | return block_ptr; | |
408 | } | |
409 | ||
410 | static const FcConstant _FcBaseConstants[] = { | |
411 | { (FcChar8 *) "thin", "weight", FC_WEIGHT_THIN, }, | |
412 | { (FcChar8 *) "extralight", "weight", FC_WEIGHT_EXTRALIGHT, }, | |
413 | { (FcChar8 *) "ultralight", "weight", FC_WEIGHT_EXTRALIGHT, }, | |
414 | { (FcChar8 *) "light", "weight", FC_WEIGHT_LIGHT, }, | |
415 | { (FcChar8 *) "book", "weight", FC_WEIGHT_BOOK, }, | |
416 | { (FcChar8 *) "regular", "weight", FC_WEIGHT_REGULAR, }, | |
417 | { (FcChar8 *) "medium", "weight", FC_WEIGHT_MEDIUM, }, | |
418 | { (FcChar8 *) "demibold", "weight", FC_WEIGHT_DEMIBOLD, }, | |
419 | { (FcChar8 *) "semibold", "weight", FC_WEIGHT_DEMIBOLD, }, | |
420 | { (FcChar8 *) "bold", "weight", FC_WEIGHT_BOLD, }, | |
421 | { (FcChar8 *) "extrabold", "weight", FC_WEIGHT_EXTRABOLD, }, | |
422 | { (FcChar8 *) "ultrabold", "weight", FC_WEIGHT_EXTRABOLD, }, | |
423 | { (FcChar8 *) "black", "weight", FC_WEIGHT_BLACK, }, | |
424 | ||
425 | { (FcChar8 *) "roman", "slant", FC_SLANT_ROMAN, }, | |
426 | { (FcChar8 *) "italic", "slant", FC_SLANT_ITALIC, }, | |
427 | { (FcChar8 *) "oblique", "slant", FC_SLANT_OBLIQUE, }, | |
428 | ||
429 | { (FcChar8 *) "ultracondensed", "width", FC_WIDTH_ULTRACONDENSED }, | |
430 | { (FcChar8 *) "extracondensed", "width", FC_WIDTH_EXTRACONDENSED }, | |
431 | { (FcChar8 *) "condensed", "width", FC_WIDTH_CONDENSED }, | |
432 | { (FcChar8 *) "semicondensed", "width", FC_WIDTH_SEMICONDENSED }, | |
433 | { (FcChar8 *) "normal", "width", FC_WIDTH_NORMAL }, | |
434 | { (FcChar8 *) "semiexpanded", "width", FC_WIDTH_SEMIEXPANDED }, | |
435 | { (FcChar8 *) "expanded", "width", FC_WIDTH_EXPANDED }, | |
436 | { (FcChar8 *) "extraexpanded", "width", FC_WIDTH_EXTRAEXPANDED }, | |
437 | { (FcChar8 *) "ultraexpanded", "width", FC_WIDTH_ULTRAEXPANDED }, | |
438 | ||
439 | { (FcChar8 *) "proportional", "spacing", FC_PROPORTIONAL, }, | |
440 | { (FcChar8 *) "dual", "spacing", FC_DUAL, }, | |
441 | { (FcChar8 *) "mono", "spacing", FC_MONO, }, | |
442 | { (FcChar8 *) "charcell", "spacing", FC_CHARCELL, }, | |
443 | ||
444 | { (FcChar8 *) "unknown", "rgba", FC_RGBA_UNKNOWN }, | |
445 | { (FcChar8 *) "rgb", "rgba", FC_RGBA_RGB, }, | |
446 | { (FcChar8 *) "bgr", "rgba", FC_RGBA_BGR, }, | |
447 | { (FcChar8 *) "vrgb", "rgba", FC_RGBA_VRGB }, | |
448 | { (FcChar8 *) "vbgr", "rgba", FC_RGBA_VBGR }, | |
449 | { (FcChar8 *) "none", "rgba", FC_RGBA_NONE }, | |
450 | ||
451 | { (FcChar8 *) "hintnone", "hintstyle", FC_HINT_NONE }, | |
452 | { (FcChar8 *) "hintslight", "hintstyle", FC_HINT_SLIGHT }, | |
453 | { (FcChar8 *) "hintmedium", "hintstyle", FC_HINT_MEDIUM }, | |
454 | { (FcChar8 *) "hintfull", "hintstyle", FC_HINT_FULL }, | |
455 | }; | |
456 | ||
457 | #define NUM_FC_CONSTANTS (sizeof _FcBaseConstants/sizeof _FcBaseConstants[0]) | |
458 | ||
459 | typedef struct _FcConstantList FcConstantList; | |
460 | ||
461 | struct _FcConstantList { | |
462 | const FcConstantList *next; | |
463 | const FcConstant *consts; | |
464 | int nconsts; | |
465 | }; | |
466 | ||
467 | static const FcConstantList _FcBaseConstantList = { | |
468 | 0, | |
469 | _FcBaseConstants, | |
470 | NUM_FC_CONSTANTS | |
471 | }; | |
472 | ||
473 | static const FcConstantList *_FcConstants = &_FcBaseConstantList; | |
474 | ||
475 | FcBool | |
476 | FcNameRegisterConstants (const FcConstant *consts, int nconsts) | |
477 | { | |
478 | FcConstantList *l; | |
479 | ||
480 | l = (FcConstantList *) malloc (sizeof (FcConstantList)); | |
481 | if (!l) | |
482 | return FcFalse; | |
483 | FcMemAlloc (FC_MEM_CONSTANT, sizeof (FcConstantList)); | |
484 | l->consts = consts; | |
485 | l->nconsts = nconsts; | |
486 | l->next = _FcConstants; | |
487 | _FcConstants = l; | |
488 | return FcTrue; | |
489 | } | |
490 | ||
491 | FcBool | |
492 | FcNameUnregisterConstants (const FcConstant *consts, int nconsts) | |
493 | { | |
494 | const FcConstantList *l, **prev; | |
495 | ||
496 | for (prev = &_FcConstants; | |
497 | (l = *prev); | |
498 | prev = (const FcConstantList **) &(l->next)) | |
499 | { | |
500 | if (l->consts == consts && l->nconsts == nconsts) | |
501 | { | |
502 | *prev = l->next; | |
503 | FcMemFree (FC_MEM_CONSTANT, sizeof (FcConstantList)); | |
504 | free ((void *) l); | |
505 | return FcTrue; | |
506 | } | |
507 | } | |
508 | return FcFalse; | |
509 | } | |
510 | ||
511 | const FcConstant * | |
512 | FcNameGetConstant (FcChar8 *string) | |
513 | { | |
514 | const FcConstantList *l; | |
515 | int i; | |
516 | ||
517 | for (l = _FcConstants; l; l = l->next) | |
518 | { | |
519 | for (i = 0; i < l->nconsts; i++) | |
520 | if (!FcStrCmpIgnoreCase (string, l->consts[i].name)) | |
521 | return &l->consts[i]; | |
522 | } | |
523 | return 0; | |
524 | } | |
525 | ||
526 | FcBool | |
527 | FcNameConstant (FcChar8 *string, int *result) | |
528 | { | |
529 | const FcConstant *c; | |
530 | ||
531 | if ((c = FcNameGetConstant(string))) | |
532 | { | |
533 | *result = c->value; | |
534 | return FcTrue; | |
535 | } | |
536 | return FcFalse; | |
537 | } | |
538 | ||
539 | FcBool | |
540 | FcNameBool (const FcChar8 *v, FcBool *result) | |
541 | { | |
542 | char c0, c1; | |
543 | ||
544 | c0 = *v; | |
545 | c0 = FcToLower (c0); | |
546 | if (c0 == 't' || c0 == 'y' || c0 == '1') | |
547 | { | |
548 | *result = FcTrue; | |
549 | return FcTrue; | |
550 | } | |
551 | if (c0 == 'f' || c0 == 'n' || c0 == '0') | |
552 | { | |
553 | *result = FcFalse; | |
554 | return FcTrue; | |
555 | } | |
556 | if (c0 == 'o') | |
557 | { | |
558 | c1 = v[1]; | |
559 | c1 = FcToLower (c1); | |
560 | if (c1 == 'n') | |
561 | { | |
562 | *result = FcTrue; | |
563 | return FcTrue; | |
564 | } | |
565 | if (c1 == 'f') | |
566 | { | |
567 | *result = FcFalse; | |
568 | return FcTrue; | |
569 | } | |
570 | } | |
571 | return FcFalse; | |
572 | } | |
573 | ||
574 | static FcValue | |
575 | FcNameConvert (FcType type, FcChar8 *string, FcMatrix *m) | |
576 | { | |
577 | FcValue v; | |
578 | ||
579 | v.type = type; | |
580 | switch (v.type) { | |
581 | case FcTypeInteger: | |
582 | if (!FcNameConstant (string, &v.u.i)) | |
583 | v.u.i = atoi ((char *) string); | |
584 | break; | |
585 | case FcTypeString: | |
586 | v.u.s = FcStrStaticName(string); | |
587 | break; | |
588 | case FcTypeBool: | |
589 | if (!FcNameBool (string, &v.u.b)) | |
590 | v.u.b = FcFalse; | |
591 | break; | |
592 | case FcTypeDouble: | |
593 | v.u.d = strtod ((char *) string, 0); | |
594 | break; | |
595 | case FcTypeMatrix: | |
596 | v.u.m = m; | |
597 | sscanf ((char *) string, "%lg %lg %lg %lg", &m->xx, &m->xy, &m->yx, &m->yy); | |
598 | break; | |
599 | case FcTypeCharSet: | |
600 | v.u.c = FcNameParseCharSet (string); | |
601 | break; | |
602 | case FcTypeLangSet: | |
603 | v.u.l = FcNameParseLangSet (string); | |
604 | break; | |
605 | default: | |
606 | break; | |
607 | } | |
608 | return v; | |
609 | } | |
610 | ||
611 | static const FcChar8 * | |
612 | FcNameFindNext (const FcChar8 *cur, const char *delim, FcChar8 *save, FcChar8 *last) | |
613 | { | |
614 | FcChar8 c; | |
615 | ||
616 | while ((c = *cur)) | |
617 | { | |
618 | if (c == '\\') | |
619 | { | |
620 | ++cur; | |
621 | if (!(c = *cur)) | |
622 | break; | |
623 | } | |
624 | else if (strchr (delim, c)) | |
625 | break; | |
626 | ++cur; | |
627 | *save++ = c; | |
628 | } | |
629 | *save = 0; | |
630 | *last = *cur; | |
631 | if (*cur) | |
632 | cur++; | |
633 | return cur; | |
634 | } | |
635 | ||
636 | FcPattern * | |
637 | FcNameParse (const FcChar8 *name) | |
638 | { | |
639 | FcChar8 *save; | |
640 | FcPattern *pat; | |
641 | double d; | |
642 | FcChar8 *e; | |
643 | FcChar8 delim; | |
644 | FcValue v; | |
645 | FcMatrix m; | |
646 | const FcObjectType *t; | |
647 | const FcConstant *c; | |
648 | ||
649 | /* freed below */ | |
650 | save = malloc (strlen ((char *) name) + 1); | |
651 | if (!save) | |
652 | goto bail0; | |
653 | pat = FcPatternCreate (); | |
654 | if (!pat) | |
655 | goto bail1; | |
656 | ||
657 | for (;;) | |
658 | { | |
659 | name = FcNameFindNext (name, "-,:", save, &delim); | |
660 | if (save[0]) | |
661 | { | |
662 | if (!FcPatternAddString (pat, FC_FAMILY, save)) | |
663 | goto bail2; | |
664 | } | |
665 | if (delim != ',') | |
666 | break; | |
667 | } | |
668 | if (delim == '-') | |
669 | { | |
670 | for (;;) | |
671 | { | |
672 | name = FcNameFindNext (name, "-,:", save, &delim); | |
673 | d = strtod ((char *) save, (char **) &e); | |
674 | if (e != save) | |
675 | { | |
676 | if (!FcPatternAddDouble (pat, FC_SIZE, d)) | |
677 | goto bail2; | |
678 | } | |
679 | if (delim != ',') | |
680 | break; | |
681 | } | |
682 | } | |
683 | while (delim == ':') | |
684 | { | |
685 | name = FcNameFindNext (name, "=_:", save, &delim); | |
686 | if (save[0]) | |
687 | { | |
688 | if (delim == '=' || delim == '_') | |
689 | { | |
690 | t = FcNameGetObjectType ((char *) save); | |
691 | for (;;) | |
692 | { | |
693 | name = FcNameFindNext (name, ":,", save, &delim); | |
694 | if (t && strcmp (t->object, _FcBaseObjectTypes[0].object)) | |
695 | { | |
696 | v = FcNameConvert (t->type, save, &m); | |
697 | if (!FcPatternAdd (pat, t->object, v, FcTrue)) | |
698 | { | |
699 | switch (v.type) { | |
700 | case FcTypeCharSet: | |
701 | FcCharSetDestroy ((FcCharSet *) v.u.c); | |
702 | break; | |
703 | case FcTypeLangSet: | |
704 | FcLangSetDestroy ((FcLangSet *) v.u.l); | |
705 | break; | |
706 | default: | |
707 | break; | |
708 | } | |
709 | goto bail2; | |
710 | } | |
711 | switch (v.type) { | |
712 | case FcTypeCharSet: | |
713 | FcCharSetDestroy ((FcCharSet *) v.u.c); | |
714 | break; | |
715 | case FcTypeLangSet: | |
716 | FcLangSetDestroy ((FcLangSet *) v.u.l); | |
717 | break; | |
718 | default: | |
719 | break; | |
720 | } | |
721 | } | |
722 | if (delim != ',') | |
723 | break; | |
724 | } | |
725 | } | |
726 | else | |
727 | { | |
728 | if ((c = FcNameGetConstant (save))) | |
729 | { | |
730 | if (!FcPatternAddInteger (pat, c->object, c->value)) | |
731 | goto bail2; | |
732 | } | |
733 | } | |
734 | } | |
735 | } | |
736 | ||
737 | free (save); | |
738 | return pat; | |
739 | ||
740 | bail2: | |
741 | FcPatternDestroy (pat); | |
742 | bail1: | |
743 | free (save); | |
744 | bail0: | |
745 | return 0; | |
746 | } | |
747 | static FcBool | |
748 | FcNameUnparseString (FcStrBuf *buf, | |
749 | const FcChar8 *string, | |
750 | const FcChar8 *escape) | |
751 | { | |
752 | FcChar8 c; | |
753 | while ((c = *string++)) | |
754 | { | |
755 | if (escape && strchr ((char *) escape, (char) c)) | |
756 | { | |
757 | if (!FcStrBufChar (buf, escape[0])) | |
758 | return FcFalse; | |
759 | } | |
760 | if (!FcStrBufChar (buf, c)) | |
761 | return FcFalse; | |
762 | } | |
763 | return FcTrue; | |
764 | } | |
765 | ||
766 | static FcBool | |
767 | FcNameUnparseValue (FcStrBuf *buf, | |
768 | FcValue *v0, | |
769 | FcChar8 *escape) | |
770 | { | |
771 | FcChar8 temp[1024]; | |
772 | FcValue v = FcValueCanonicalize(v0); | |
773 | ||
774 | switch (v.type) { | |
775 | case FcTypeVoid: | |
776 | return FcTrue; | |
777 | case FcTypeInteger: | |
778 | sprintf ((char *) temp, "%d", v.u.i); | |
779 | return FcNameUnparseString (buf, temp, 0); | |
780 | case FcTypeDouble: | |
781 | sprintf ((char *) temp, "%g", v.u.d); | |
782 | return FcNameUnparseString (buf, temp, 0); | |
783 | case FcTypeString: | |
784 | return FcNameUnparseString (buf, v.u.s, escape); | |
785 | case FcTypeBool: | |
786 | return FcNameUnparseString (buf, v.u.b ? (FcChar8 *) "True" : (FcChar8 *) "False", 0); | |
787 | case FcTypeMatrix: | |
788 | sprintf ((char *) temp, "%g %g %g %g", | |
789 | v.u.m->xx, v.u.m->xy, v.u.m->yx, v.u.m->yy); | |
790 | return FcNameUnparseString (buf, temp, 0); | |
791 | case FcTypeCharSet: | |
792 | return FcNameUnparseCharSet (buf, v.u.c); | |
793 | case FcTypeLangSet: | |
794 | return FcNameUnparseLangSet (buf, v.u.l); | |
795 | case FcTypeFTFace: | |
796 | return FcTrue; | |
797 | } | |
798 | return FcFalse; | |
799 | } | |
800 | ||
801 | static FcBool | |
802 | FcNameUnparseValueList (FcStrBuf *buf, | |
803 | FcValueListPtr v, | |
804 | FcChar8 *escape) | |
805 | { | |
806 | while (FcValueListPtrU(v)) | |
807 | { | |
808 | if (!FcNameUnparseValue (buf, &FcValueListPtrU(v)->value, escape)) | |
809 | return FcFalse; | |
810 | if (FcValueListPtrU(v = FcValueListPtrU(v)->next)) | |
811 | if (!FcNameUnparseString (buf, (FcChar8 *) ",", 0)) | |
812 | return FcFalse; | |
813 | } | |
814 | return FcTrue; | |
815 | } | |
816 | ||
817 | #define FC_ESCAPE_FIXED "\\-:," | |
818 | #define FC_ESCAPE_VARIABLE "\\=_:," | |
819 | ||
820 | FcChar8 * | |
821 | FcNameUnparse (FcPattern *pat) | |
822 | { | |
823 | return FcNameUnparseEscaped (pat, FcTrue); | |
824 | } | |
825 | ||
826 | FcChar8 * | |
827 | FcNameUnparseEscaped (FcPattern *pat, FcBool escape) | |
828 | { | |
829 | FcStrBuf buf; | |
830 | FcChar8 buf_static[8192]; | |
831 | int i; | |
832 | FcPatternElt *e; | |
833 | const FcObjectTypeList *l; | |
834 | const FcObjectType *o; | |
835 | ||
836 | FcStrBufInit (&buf, buf_static, sizeof (buf_static)); | |
837 | e = FcPatternFindElt (pat, FC_FAMILY); | |
838 | if (e) | |
839 | { | |
840 | if (!FcNameUnparseValueList (&buf, e->values, escape ? (FcChar8 *) FC_ESCAPE_FIXED : 0)) | |
841 | goto bail0; | |
842 | } | |
843 | e = FcPatternFindElt (pat, FC_SIZE); | |
844 | if (e) | |
845 | { | |
846 | if (!FcNameUnparseString (&buf, (FcChar8 *) "-", 0)) | |
847 | goto bail0; | |
848 | if (!FcNameUnparseValueList (&buf, e->values, escape ? (FcChar8 *) FC_ESCAPE_FIXED : 0)) | |
849 | goto bail0; | |
850 | } | |
851 | for (l = _FcObjectTypes; l; l = l->next) | |
852 | { | |
853 | for (i = 0; i < l->ntypes; i++) | |
854 | { | |
855 | o = &l->types[i]; | |
856 | if (!strcmp (o->object, FC_FAMILY) || | |
857 | !strcmp (o->object, FC_SIZE) || | |
858 | !strcmp (o->object, FC_FILE)) | |
859 | continue; | |
860 | ||
861 | e = FcPatternFindElt (pat, o->object); | |
862 | if (e) | |
863 | { | |
864 | if (!FcNameUnparseString (&buf, (FcChar8 *) ":", 0)) | |
865 | goto bail0; | |
866 | if (!FcNameUnparseString (&buf, (FcChar8 *) o->object, escape ? (FcChar8 *) FC_ESCAPE_VARIABLE : 0)) | |
867 | goto bail0; | |
868 | if (!FcNameUnparseString (&buf, (FcChar8 *) "=", 0)) | |
869 | goto bail0; | |
870 | if (!FcNameUnparseValueList (&buf, e->values, escape ? | |
871 | (FcChar8 *) FC_ESCAPE_VARIABLE : 0)) | |
872 | goto bail0; | |
873 | } | |
874 | } | |
875 | } | |
876 | return FcStrBufDone (&buf); | |
877 | bail0: | |
878 | FcStrBufDestroy (&buf); | |
879 | return 0; | |
880 | } |