]>
git.wh0rd.org - fontconfig.git/blob - src/fcxml.c
2 * $RCSId: xc/lib/fontconfig/src/fcxml.c,v 1.21 2002/08/22 18:53:22 keithp Exp $
4 * Copyright © 2002 Keith Packard
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.
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.
28 #ifndef HAVE_XMLPARSE_H
29 #define HAVE_XMLPARSE_H 0
45 FcTestCreate (FcMatchKind kind
,
51 FcTest
*test
= (FcTest
*) malloc (sizeof (FcTest
));
55 FcMemAlloc (FC_MEM_TEST
, sizeof (FcTest
));
59 test
->field
= (char *) FcStrCopy (field
);
67 FcTestDestroy (FcTest
*test
)
70 FcTestDestroy (test
->next
);
71 FcExprDestroy (test
->expr
);
72 FcStrFree ((FcChar8
*) test
->field
);
73 FcMemFree (FC_MEM_TEST
, sizeof (FcTest
));
78 FcExprCreateInteger (int i
)
80 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
84 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
92 FcExprCreateDouble (double d
)
94 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
98 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
106 FcExprCreateString (const FcChar8
*s
)
108 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
112 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
114 e
->u
.sval
= FcStrCopy (s
);
120 FcExprCreateMatrix (const FcMatrix
*m
)
122 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
126 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
128 e
->u
.mval
= FcMatrixCopy (m
);
134 FcExprCreateBool (FcBool b
)
136 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
140 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
148 FcExprCreateNil (void)
150 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
154 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
161 FcExprCreateField (const char *field
)
163 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
167 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
169 e
->u
.field
= (char *) FcStrCopy ((FcChar8
*) field
);
175 FcExprCreateConst (const FcChar8
*constant
)
177 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
181 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
183 e
->u
.constant
= FcStrCopy (constant
);
189 FcExprCreateOp (FcExpr
*left
, FcOp op
, FcExpr
*right
)
191 FcExpr
*e
= (FcExpr
*) malloc (sizeof (FcExpr
));
195 FcMemAlloc (FC_MEM_EXPR
, sizeof (FcExpr
));
197 e
->u
.tree
.left
= left
;
198 e
->u
.tree
.right
= right
;
204 FcExprDestroy (FcExpr
*e
)
214 FcStrFree (e
->u
.sval
);
217 FcMatrixFree (e
->u
.mval
);
220 FcCharSetDestroy (e
->u
.cval
);
225 FcStrFree ((FcChar8
*) e
->u
.field
);
228 FcStrFree (e
->u
.constant
);
231 case FcOpAssignReplace
:
233 case FcOpPrependFirst
:
246 case FcOpNotContains
:
253 FcExprDestroy (e
->u
.tree
.right
);
260 FcExprDestroy (e
->u
.tree
.left
);
266 FcMemFree (FC_MEM_EXPR
, sizeof (FcExpr
));
271 FcEditCreate (const char *field
, FcOp op
, FcExpr
*expr
, FcValueBinding binding
)
273 FcEdit
*e
= (FcEdit
*) malloc (sizeof (FcEdit
));
278 e
->field
= field
; /* already saved in grammar */
281 e
->binding
= binding
;
287 FcEditDestroy (FcEdit
*e
)
290 FcEditDestroy (e
->next
);
291 FcStrFree ((FcChar8
*) e
->field
);
293 FcExprDestroy (e
->expr
);
297 FcConfigSaveField (const char *field
)
299 return (char *) FcStrCopy ((FcChar8
*) field
);
302 typedef enum _FcElement
{
344 FcElementNotContains
,
359 FcElementMap (const XML_Char
*name
)
365 { "fontconfig", FcElementFontconfig
},
366 { "dir", FcElementDir
},
367 { "cache", FcElementCache
},
368 { "include", FcElementInclude
},
369 { "config", FcElementConfig
},
370 { "match", FcElementMatch
},
371 { "alias", FcElementAlias
},
373 { "blank", FcElementBlank
},
374 { "rescan", FcElementRescan
},
376 { "prefer", FcElementPrefer
},
377 { "accept", FcElementAccept
},
378 { "default", FcElementDefault
},
379 { "family", FcElementFamily
},
381 { "selectfont", FcElementSelectfont
},
382 { "acceptfont", FcElementAcceptfont
},
383 { "rejectfont", FcElementRejectfont
},
384 { "glob", FcElementGlob
},
386 { "test", FcElementTest
},
387 { "edit", FcElementEdit
},
388 { "int", FcElementInt
},
389 { "double", FcElementDouble
},
390 { "string", FcElementString
},
391 { "matrix", FcElementMatrix
},
392 { "bool", FcElementBool
},
393 { "charset", FcElementCharset
},
394 { "name", FcElementName
},
395 { "const", FcElementConst
},
396 { "or", FcElementOr
},
397 { "and", FcElementAnd
},
398 { "eq", FcElementEq
},
399 { "not_eq", FcElementNotEq
},
400 { "less", FcElementLess
},
401 { "less_eq", FcElementLessEq
},
402 { "more", FcElementMore
},
403 { "more_eq", FcElementMoreEq
},
404 { "contains", FcElementContains
},
405 { "not_contains",FcElementNotContains
},
406 { "plus", FcElementPlus
},
407 { "minus", FcElementMinus
},
408 { "times", FcElementTimes
},
409 { "divide", FcElementDivide
},
410 { "not", FcElementNot
},
411 { "if", FcElementIf
},
412 { "floor", FcElementFloor
},
413 { "ceil", FcElementCeil
},
414 { "round", FcElementRound
},
415 { "trunc", FcElementTrunc
},
421 for (i
= 0; fcElementMap
[i
].name
; i
++)
422 if (!strcmp ((char *) name
, fcElementMap
[i
].name
))
423 return fcElementMap
[i
].element
;
424 return FcElementUnknown
;
427 typedef struct _FcPStack
{
428 struct _FcPStack
*prev
;
434 typedef enum _FcVStackTag
{
457 typedef struct _FcVStack
{
458 struct _FcVStack
*prev
;
459 FcPStack
*pstack
; /* related parse element */
477 typedef struct _FcConfigParse
{
486 typedef enum _FcConfigSeverity
{
487 FcSevereInfo
, FcSevereWarning
, FcSevereError
491 FcConfigMessage (FcConfigParse
*parse
, FcConfigSeverity severe
, char *fmt
, ...)
496 va_start (args
, fmt
);
499 case FcSevereInfo
: s
= "info"; break;
500 case FcSevereWarning
: s
= "warning"; break;
501 case FcSevereError
: s
= "error"; break;
506 fprintf (stderr
, "Fontconfig %s: \"%s\", line %d: ", s
,
507 parse
->name
, XML_GetCurrentLineNumber (parse
->parser
));
509 fprintf (stderr
, "Fontconfig %s: line %d: ", s
,
510 XML_GetCurrentLineNumber (parse
->parser
));
511 if (severe
>= FcSevereError
)
512 parse
->error
= FcTrue
;
515 fprintf (stderr
, "Fontconfig %s: ", s
);
516 vfprintf (stderr
, fmt
, args
);
517 fprintf (stderr
, "\n");
522 FcVStackPush (FcConfigParse
*parse
, FcVStack
*vstack
)
524 vstack
->prev
= parse
->vstack
;
525 vstack
->pstack
= parse
->pstack
? parse
->pstack
->prev
: 0;
526 parse
->vstack
= vstack
;
530 FcVStackCreate (void)
534 new = malloc (sizeof (FcVStack
));
537 FcMemAlloc (FC_MEM_VSTACK
, sizeof (FcVStack
));
538 new->tag
= FcVStackNone
;
544 FcVStackDestroy (FcVStack
*vstack
)
548 for (; vstack
; vstack
= prev
)
551 switch (vstack
->tag
) {
557 case FcVStackConstant
:
559 FcStrFree (vstack
->u
.string
);
561 case FcVStackInteger
:
565 FcMatrixFree (vstack
->u
.matrix
);
570 FcTestDestroy (vstack
->u
.test
);
575 case FcVStackDefault
:
576 FcExprDestroy (vstack
->u
.expr
);
579 FcEditDestroy (vstack
->u
.edit
);
582 FcMemFree (FC_MEM_VSTACK
, sizeof (FcVStack
));
588 FcVStackPushString (FcConfigParse
*parse
, FcVStackTag tag
, FcChar8
*string
)
590 FcVStack
*vstack
= FcVStackCreate ();
593 vstack
->u
.string
= string
;
595 FcVStackPush (parse
, vstack
);
600 FcVStackPushInteger (FcConfigParse
*parse
, int integer
)
602 FcVStack
*vstack
= FcVStackCreate ();
605 vstack
->u
.integer
= integer
;
606 vstack
->tag
= FcVStackInteger
;
607 FcVStackPush (parse
, vstack
);
612 FcVStackPushDouble (FcConfigParse
*parse
, double _double
)
614 FcVStack
*vstack
= FcVStackCreate ();
617 vstack
->u
._double
= _double
;
618 vstack
->tag
= FcVStackDouble
;
619 FcVStackPush (parse
, vstack
);
624 FcVStackPushMatrix (FcConfigParse
*parse
, FcMatrix
*matrix
)
626 FcVStack
*vstack
= FcVStackCreate ();
629 matrix
= FcMatrixCopy (matrix
);
632 FcVStackDestroy (vstack
);
635 vstack
->u
.matrix
= matrix
;
636 vstack
->tag
= FcVStackMatrix
;
637 FcVStackPush (parse
, vstack
);
642 FcVStackPushBool (FcConfigParse
*parse
, FcBool
bool)
644 FcVStack
*vstack
= FcVStackCreate ();
647 vstack
->u
.bool = bool;
648 vstack
->tag
= FcVStackBool
;
649 FcVStackPush (parse
, vstack
);
654 FcVStackPushTest (FcConfigParse
*parse
, FcTest
*test
)
656 FcVStack
*vstack
= FcVStackCreate ();
659 vstack
->u
.test
= test
;
660 vstack
->tag
= FcVStackTest
;
661 FcVStackPush (parse
, vstack
);
666 FcVStackPushExpr (FcConfigParse
*parse
, FcVStackTag tag
, FcExpr
*expr
)
668 FcVStack
*vstack
= FcVStackCreate ();
671 vstack
->u
.expr
= expr
;
673 FcVStackPush (parse
, vstack
);
678 FcVStackPushEdit (FcConfigParse
*parse
, FcEdit
*edit
)
680 FcVStack
*vstack
= FcVStackCreate ();
683 vstack
->u
.edit
= edit
;
684 vstack
->tag
= FcVStackEdit
;
685 FcVStackPush (parse
, vstack
);
690 FcVStackFetch (FcConfigParse
*parse
, int off
)
694 for (vstack
= parse
->vstack
; vstack
&& off
-- > 0; vstack
= vstack
->prev
);
699 FcVStackClear (FcConfigParse
*parse
)
701 while (parse
->vstack
&& parse
->vstack
->pstack
== parse
->pstack
)
703 FcVStack
*vstack
= parse
->vstack
;
704 parse
->vstack
= vstack
->prev
;
706 FcVStackDestroy (vstack
);
711 FcVStackPop (FcConfigParse
*parse
)
713 FcVStack
*vstack
= parse
->vstack
;
715 if (!vstack
|| vstack
->pstack
!= parse
->pstack
)
717 parse
->vstack
= vstack
->prev
;
723 FcVStackElements (FcConfigParse
*parse
)
726 FcVStack
*vstack
= parse
->vstack
;
727 while (vstack
&& vstack
->pstack
== parse
->pstack
)
730 vstack
= vstack
->prev
;
736 FcConfigSaveAttr (const XML_Char
**attr
)
747 for (i
= 0; attr
[i
]; i
++)
748 slen
+= strlen (attr
[i
]) + 1;
750 new = malloc ((i
+ 1) * sizeof (FcChar8
*) + slen
);
753 FcMemAlloc (FC_MEM_ATTR
, 1); /* size is too expensive */
754 s
= (FcChar8
*) (new + (i
+ 1));
755 for (i
= 0; attr
[i
]; i
++)
758 strcpy ((char *) s
, (char *) attr
[i
]);
759 s
+= strlen ((char *) s
) + 1;
766 FcPStackPush (FcConfigParse
*parse
, FcElement element
, const XML_Char
**attr
)
768 FcPStack
*new = malloc (sizeof (FcPStack
));
772 FcMemAlloc (FC_MEM_PSTACK
, sizeof (FcPStack
));
773 new->prev
= parse
->pstack
;
774 new->element
= element
;
777 new->attr
= FcConfigSaveAttr (attr
);
779 FcConfigMessage (parse
, FcSevereError
, "out of memory");
783 FcStrBufInit (&new->str
, 0, 0);
789 FcPStackPop (FcConfigParse
*parse
)
795 FcConfigMessage (parse
, FcSevereError
, "mismatching element");
798 FcVStackClear (parse
);
800 parse
->pstack
= old
->prev
;
801 FcStrBufDestroy (&old
->str
);
804 FcMemFree (FC_MEM_ATTR
, 1); /* size is to expensive */
807 FcMemFree (FC_MEM_PSTACK
, sizeof (FcPStack
));
813 FcConfigInit (FcConfigParse
*parse
, const FcChar8
*name
, FcConfig
*config
, XML_Parser parser
)
817 parse
->error
= FcFalse
;
819 parse
->config
= config
;
820 parse
->parser
= parser
;
825 FcConfigCleanup (FcConfigParse
*parse
)
827 while (parse
->pstack
)
831 static const FcChar8
*
832 FcConfigGetAttribute (FcConfigParse
*parse
, char *attr
)
838 attrs
= parse
->pstack
->attr
;
841 if (!strcmp ((char *) *attrs
, attr
))
849 FcStartElement(void *userData
, const XML_Char
*name
, const XML_Char
**attr
)
851 FcConfigParse
*parse
= userData
;
854 element
= FcElementMap (name
);
855 if (element
== FcElementUnknown
)
856 FcConfigMessage (parse
, FcSevereWarning
, "unknown element \"%s\"", name
);
858 if (!FcPStackPush (parse
, element
, attr
))
860 FcConfigMessage (parse
, FcSevereError
, "out of memory");
867 FcParseBlank (FcConfigParse
*parse
)
869 int n
= FcVStackElements (parse
);
872 FcVStack
*v
= FcVStackFetch (parse
, n
);
873 if (v
->tag
!= FcVStackInteger
)
874 FcConfigMessage (parse
, FcSevereError
, "non-integer blank");
877 if (!parse
->config
->blanks
)
879 parse
->config
->blanks
= FcBlanksCreate ();
880 if (!parse
->config
->blanks
)
882 FcConfigMessage (parse
, FcSevereError
, "out of memory");
886 if (!FcBlanksAdd (parse
->config
->blanks
, v
->u
.integer
))
888 FcConfigMessage (parse
, FcSevereError
, "out of memory");
896 FcParseRescan (FcConfigParse
*parse
)
898 int n
= FcVStackElements (parse
);
901 FcVStack
*v
= FcVStackFetch (parse
, n
);
902 if (v
->tag
!= FcVStackInteger
)
903 FcConfigMessage (parse
, FcSevereWarning
, "non-integer rescan");
905 parse
->config
->rescanInterval
= v
->u
.integer
;
910 FcParseInt (FcConfigParse
*parse
)
917 s
= FcStrBufDone (&parse
->pstack
->str
);
920 FcConfigMessage (parse
, FcSevereError
, "out of memory");
924 l
= (int) strtol ((char *) s
, (char **)&end
, 0);
925 if (end
!= s
+ strlen ((char *) s
))
926 FcConfigMessage (parse
, FcSevereError
, "\"%s\": not a valid integer", s
);
928 FcVStackPushInteger (parse
, l
);
933 * idea copied from glib g_ascii_strtod with
934 * permission of the author (Alexander Larsson)
940 FcStrtod (char *s
, char **end
)
942 struct lconv
*locale_data
;
947 * Have to swap the decimal point to match the current locale
948 * if that locale doesn't use 0x2e
950 if ((dot
= strchr (s
, 0x2e)) &&
951 (locale_data
= localeconv ()) &&
952 (locale_data
->decimal_point
[0] != 0x2e ||
953 locale_data
->decimal_point
[1] != 0))
956 int slen
= strlen (s
);
957 int dlen
= strlen (locale_data
->decimal_point
);
959 if (slen
+ dlen
> sizeof (buf
))
969 strncpy (buf
, s
, dot
- s
);
971 strcpy (buf
+ (dot
- s
), locale_data
->decimal_point
);
973 strcpy (buf
+ (dot
- s
) + dlen
, dot
+ 1);
975 v
= strtod (buf
, &buf_end
);
977 buf_end
= s
+ (buf_end
- buf
) + 1 - dlen
;
988 FcParseDouble (FcConfigParse
*parse
)
995 s
= FcStrBufDone (&parse
->pstack
->str
);
998 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1002 d
= FcStrtod ((char *) s
, (char **)&end
);
1003 if (end
!= s
+ strlen ((char *) s
))
1004 FcConfigMessage (parse
, FcSevereError
, "\"%s\": not a valid double", s
);
1006 FcVStackPushDouble (parse
, d
);
1011 FcParseString (FcConfigParse
*parse
, FcVStackTag tag
)
1017 s
= FcStrBufDone (&parse
->pstack
->str
);
1020 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1023 if (!FcVStackPushString (parse
, tag
, s
))
1028 FcParseMatrix (FcConfigParse
*parse
)
1031 enum { m_done
, m_xx
, m_xy
, m_yx
, m_yy
} matrix_state
= m_yy
;
1034 while ((vstack
= FcVStackPop (parse
)))
1037 switch (vstack
->tag
) {
1038 case FcVStackInteger
:
1039 v
= vstack
->u
.integer
;
1041 case FcVStackDouble
:
1042 v
= vstack
->u
._double
;
1045 FcConfigMessage (parse
, FcSevereError
, "non-double matrix element");
1049 switch (matrix_state
) {
1050 case m_xx
: m
.xx
= v
; break;
1051 case m_xy
: m
.xy
= v
; break;
1052 case m_yx
: m
.yx
= v
; break;
1053 case m_yy
: m
.yy
= v
; break;
1056 FcVStackDestroy (vstack
);
1059 if (matrix_state
!= m_done
)
1060 FcConfigMessage (parse
, FcSevereError
, "wrong number of matrix elements");
1062 FcVStackPushMatrix (parse
, &m
);
1066 FcConfigLexBool (const FcChar8
*bool)
1068 if (*bool == 't' || *bool == 'T')
1070 if (*bool == 'y' || *bool == 'Y')
1078 FcParseBool (FcConfigParse
*parse
)
1084 s
= FcStrBufDone (&parse
->pstack
->str
);
1087 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1090 FcVStackPushBool (parse
, FcConfigLexBool (s
));
1095 FcParseFamilies (FcConfigParse
*parse
, FcVStackTag tag
)
1098 FcExpr
*left
, *expr
= 0, *new;
1100 while ((vstack
= FcVStackPop (parse
)))
1102 if (vstack
->tag
!= FcVStackFamily
)
1104 FcConfigMessage (parse
, FcSevereWarning
, "non-family");
1105 FcVStackDestroy (vstack
);
1108 left
= vstack
->u
.expr
;
1109 vstack
->tag
= FcVStackNone
;
1110 FcVStackDestroy (vstack
);
1113 new = FcExprCreateOp (left
, FcOpComma
, expr
);
1116 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1117 FcExprDestroy (left
);
1118 FcExprDestroy (expr
);
1128 if (!FcVStackPushExpr (parse
, tag
, expr
))
1130 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1132 FcExprDestroy (expr
);
1138 FcParseFamily (FcConfigParse
*parse
)
1145 s
= FcStrBufDone (&parse
->pstack
->str
);
1148 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1151 expr
= FcExprCreateString (s
);
1154 FcVStackPushExpr (parse
, FcVStackFamily
, expr
);
1158 FcParseAlias (FcConfigParse
*parse
)
1160 FcExpr
*family
= 0, *accept
= 0, *prefer
= 0, *def
= 0, *new = 0;
1161 FcEdit
*edit
= 0, *next
;
1165 while ((vstack
= FcVStackPop (parse
)))
1167 switch (vstack
->tag
) {
1168 case FcVStackFamily
:
1171 new = FcExprCreateOp (vstack
->u
.expr
, FcOpComma
, family
);
1173 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1178 new = vstack
->u
.expr
;
1182 vstack
->tag
= FcVStackNone
;
1185 case FcVStackPrefer
:
1187 FcExprDestroy (prefer
);
1188 prefer
= vstack
->u
.expr
;
1189 vstack
->tag
= FcVStackNone
;
1191 case FcVStackAccept
:
1193 FcExprDestroy (accept
);
1194 accept
= vstack
->u
.expr
;
1195 vstack
->tag
= FcVStackNone
;
1197 case FcVStackDefault
:
1199 FcExprDestroy (def
);
1200 def
= vstack
->u
.expr
;
1201 vstack
->tag
= FcVStackNone
;
1204 FcConfigMessage (parse
, FcSevereWarning
, "bad alias");
1207 FcVStackDestroy (vstack
);
1211 FcConfigMessage (parse
, FcSevereError
, "missing family in alias");
1213 FcExprDestroy (prefer
);
1215 FcExprDestroy (accept
);
1217 FcExprDestroy (def
);
1222 edit
= FcEditCreate (FcConfigSaveField ("family"),
1225 FcValueBindingWeak
);
1229 FcExprDestroy (prefer
);
1234 edit
= FcEditCreate (FcConfigSaveField ("family"),
1237 FcValueBindingWeak
);
1241 FcExprDestroy (accept
);
1246 edit
= FcEditCreate (FcConfigSaveField ("family"),
1249 FcValueBindingWeak
);
1253 FcExprDestroy (def
);
1257 test
= FcTestCreate (FcMatchPattern
,
1259 (FcChar8
*) FC_FAMILY
,
1263 if (!FcConfigAddEdit (parse
->config
, test
, edit
, FcMatchPattern
))
1264 FcTestDestroy (test
);
1267 FcExprDestroy (family
);
1271 FcPopExpr (FcConfigParse
*parse
)
1273 FcVStack
*vstack
= FcVStackPop (parse
);
1277 switch (vstack
->tag
) {
1280 case FcVStackString
:
1281 case FcVStackFamily
:
1282 expr
= FcExprCreateString (vstack
->u
.string
);
1285 expr
= FcExprCreateField ((char *) vstack
->u
.string
);
1287 case FcVStackConstant
:
1288 expr
= FcExprCreateConst (vstack
->u
.string
);
1290 case FcVStackPrefer
:
1291 case FcVStackAccept
:
1292 case FcVStackDefault
:
1293 expr
= vstack
->u
.expr
;
1294 vstack
->tag
= FcVStackNone
;
1296 case FcVStackInteger
:
1297 expr
= FcExprCreateInteger (vstack
->u
.integer
);
1299 case FcVStackDouble
:
1300 expr
= FcExprCreateDouble (vstack
->u
._double
);
1302 case FcVStackMatrix
:
1303 expr
= FcExprCreateMatrix (vstack
->u
.matrix
);
1306 expr
= FcExprCreateBool (vstack
->u
.bool);
1311 expr
= vstack
->u
.expr
;
1312 vstack
->tag
= FcVStackNone
;
1317 FcVStackDestroy (vstack
);
1322 * This builds a tree of binary operations. Note
1323 * that every operator is defined so that if only
1324 * a single operand is contained, the value of the
1325 * whole expression is the value of the operand.
1327 * This code reduces in that case to returning that
1331 FcPopBinary (FcConfigParse
*parse
, FcOp op
)
1333 FcExpr
*left
, *expr
= 0, *new;
1335 while ((left
= FcPopExpr (parse
)))
1339 new = FcExprCreateOp (left
, op
, expr
);
1342 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1343 FcExprDestroy (left
);
1344 FcExprDestroy (expr
);
1356 FcParseBinary (FcConfigParse
*parse
, FcOp op
)
1358 FcExpr
*expr
= FcPopBinary (parse
, op
);
1360 FcVStackPushExpr (parse
, FcVStackExpr
, expr
);
1364 * This builds a a unary operator, it consumes only
1369 FcPopUnary (FcConfigParse
*parse
, FcOp op
)
1371 FcExpr
*operand
, *new = 0;
1373 if ((operand
= FcPopExpr (parse
)))
1375 new = FcExprCreateOp (operand
, op
, 0);
1378 FcExprDestroy (operand
);
1379 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1386 FcParseUnary (FcConfigParse
*parse
, FcOp op
)
1388 FcExpr
*expr
= FcPopUnary (parse
, op
);
1390 FcVStackPushExpr (parse
, FcVStackExpr
, expr
);
1394 FcParseInclude (FcConfigParse
*parse
)
1398 FcBool ignore_missing
= FcFalse
;
1400 s
= FcStrBufDone (&parse
->pstack
->str
);
1403 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1406 i
= FcConfigGetAttribute (parse
, "ignore_missing");
1407 if (i
&& FcConfigLexBool ((FcChar8
*) i
) == FcTrue
)
1408 ignore_missing
= FcTrue
;
1409 if (!FcConfigParseAndLoad (parse
->config
, s
, !ignore_missing
))
1410 parse
->error
= FcTrue
;
1414 typedef struct _FcOpMap
{
1420 FcConfigLexOp (const FcChar8
*op
, const FcOpMap
*map
, int nmap
)
1424 for (i
= 0; i
< nmap
; i
++)
1425 if (!strcmp ((char *) op
, map
[i
].name
))
1430 static const FcOpMap fcCompareOps
[] = {
1431 { "eq", FcOpEqual
},
1432 { "not_eq", FcOpNotEqual
},
1433 { "less", FcOpLess
},
1434 { "less_eq", FcOpLessEqual
},
1435 { "more", FcOpMore
},
1436 { "more_eq", FcOpMoreEqual
},
1437 { "contains", FcOpContains
},
1438 { "not_contains", FcOpNotContains
}
1441 #define NUM_COMPARE_OPS (sizeof fcCompareOps / sizeof fcCompareOps[0])
1444 FcConfigLexCompare (const FcChar8
*compare
)
1446 return FcConfigLexOp (compare
, fcCompareOps
, NUM_COMPARE_OPS
);
1451 FcParseTest (FcConfigParse
*parse
)
1453 const FcChar8
*kind_string
;
1455 const FcChar8
*qual_string
;
1457 const FcChar8
*name
;
1458 const FcChar8
*compare_string
;
1463 kind_string
= FcConfigGetAttribute (parse
, "target");
1465 kind
= FcMatchDefault
;
1468 if (!strcmp ((char *) kind_string
, "pattern"))
1469 kind
= FcMatchPattern
;
1470 else if (!strcmp ((char *) kind_string
, "font"))
1472 else if (!strcmp ((char *) kind_string
, "default"))
1473 kind
= FcMatchDefault
;
1476 FcConfigMessage (parse
, FcSevereWarning
, "invalid test target \"%s\"", kind_string
);
1480 qual_string
= FcConfigGetAttribute (parse
, "qual");
1485 if (!strcmp ((char *) qual_string
, "any"))
1487 else if (!strcmp ((char *) qual_string
, "all"))
1489 else if (!strcmp ((char *) qual_string
, "first"))
1491 else if (!strcmp ((char *) qual_string
, "not_first"))
1492 qual
= FcQualNotFirst
;
1495 FcConfigMessage (parse
, FcSevereWarning
, "invalid test qual \"%s\"", qual_string
);
1499 name
= FcConfigGetAttribute (parse
, "name");
1502 FcConfigMessage (parse
, FcSevereWarning
, "missing test name");
1505 compare_string
= FcConfigGetAttribute (parse
, "compare");
1506 if (!compare_string
)
1507 compare
= FcOpEqual
;
1510 compare
= FcConfigLexCompare (compare_string
);
1511 if (compare
== FcOpInvalid
)
1513 FcConfigMessage (parse
, FcSevereWarning
, "invalid test compare \"%s\"", compare_string
);
1517 expr
= FcPopBinary (parse
, FcOpComma
);
1520 FcConfigMessage (parse
, FcSevereWarning
, "missing test expression");
1523 test
= FcTestCreate (kind
, qual
, name
, compare
, expr
);
1526 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1529 FcVStackPushTest (parse
, test
);
1532 static const FcOpMap fcModeOps
[] = {
1533 { "assign", FcOpAssign
},
1534 { "assign_replace", FcOpAssignReplace
},
1535 { "prepend", FcOpPrepend
},
1536 { "prepend_first", FcOpPrependFirst
},
1537 { "append", FcOpAppend
},
1538 { "append_last", FcOpAppendLast
},
1541 #define NUM_MODE_OPS (sizeof fcModeOps / sizeof fcModeOps[0])
1544 FcConfigLexMode (const FcChar8
*mode
)
1546 return FcConfigLexOp (mode
, fcModeOps
, NUM_MODE_OPS
);
1550 FcParseEdit (FcConfigParse
*parse
)
1552 const FcChar8
*name
;
1553 const FcChar8
*mode_string
;
1554 const FcChar8
*binding_string
;
1556 FcValueBinding binding
;
1560 name
= FcConfigGetAttribute (parse
, "name");
1563 FcConfigMessage (parse
, FcSevereWarning
, "missing edit name");
1566 mode_string
= FcConfigGetAttribute (parse
, "mode");
1571 mode
= FcConfigLexMode (mode_string
);
1572 if (mode
== FcOpInvalid
)
1574 FcConfigMessage (parse
, FcSevereWarning
, "invalid edit mode \"%s\"", mode_string
);
1578 binding_string
= FcConfigGetAttribute (parse
, "binding");
1579 if (!binding_string
)
1580 binding
= FcValueBindingWeak
;
1583 if (!strcmp ((char *) binding_string
, "weak"))
1584 binding
= FcValueBindingWeak
;
1585 else if (!strcmp ((char *) binding_string
, "strong"))
1586 binding
= FcValueBindingStrong
;
1587 else if (!strcmp ((char *) binding_string
, "same"))
1588 binding
= FcValueBindingSame
;
1591 FcConfigMessage (parse
, FcSevereWarning
, "invalid edit binding \"%s\"", binding_string
);
1595 expr
= FcPopBinary (parse
, FcOpComma
);
1596 edit
= FcEditCreate ((char *) FcStrCopy (name
), mode
, expr
, binding
);
1599 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1600 FcExprDestroy (expr
);
1603 if (!FcVStackPushEdit (parse
, edit
))
1604 FcEditDestroy (edit
);
1608 FcParseMatch (FcConfigParse
*parse
)
1610 const FcChar8
*kind_name
;
1616 kind_name
= FcConfigGetAttribute (parse
, "target");
1618 kind
= FcMatchPattern
;
1621 if (!strcmp ((char *) kind_name
, "pattern"))
1622 kind
= FcMatchPattern
;
1623 else if (!strcmp ((char *) kind_name
, "font"))
1627 FcConfigMessage (parse
, FcSevereWarning
, "invalid match target \"%s\"", kind_name
);
1631 while ((vstack
= FcVStackPop (parse
)))
1633 switch (vstack
->tag
) {
1635 vstack
->u
.test
->next
= test
;
1636 test
= vstack
->u
.test
;
1637 vstack
->tag
= FcVStackNone
;
1640 vstack
->u
.edit
->next
= edit
;
1641 edit
= vstack
->u
.edit
;
1642 vstack
->tag
= FcVStackNone
;
1645 FcConfigMessage (parse
, FcSevereWarning
, "invalid match element");
1648 FcVStackDestroy (vstack
);
1650 if (!FcConfigAddEdit (parse
->config
, test
, edit
, kind
))
1651 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1655 FcParseAcceptRejectFont (FcConfigParse
*parse
, FcElement element
)
1659 while ((vstack
= FcVStackPop (parse
)))
1661 switch (vstack
->tag
) {
1663 if (!FcConfigGlobAdd (parse
->config
,
1665 element
== FcElementAcceptfont
))
1667 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1671 FcConfigMessage (parse
, FcSevereWarning
, "bad font selector");
1674 FcVStackDestroy (vstack
);
1679 FcEndElement(void *userData
, const XML_Char
*name
)
1681 FcConfigParse
*parse
= userData
;
1686 switch (parse
->pstack
->element
) {
1689 case FcElementFontconfig
:
1692 data
= FcStrBufDone (&parse
->pstack
->str
);
1695 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1699 if (strcmp (data
, "WINDOWSFONTDIR") == 0)
1703 data
= malloc (1000);
1706 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1709 FcMemAlloc (FC_MEM_STRING
, 1000);
1710 rc
= GetWindowsDirectory (data
, 800);
1711 if (rc
== 0 || rc
> 800)
1713 FcConfigMessage (parse
, FcSevereError
, "GetWindowsDirectory failed");
1717 if (data
[strlen (data
) - 1] != '\\')
1718 strcat (data
, "\\");
1719 strcat (data
, "fonts");
1722 if (!FcStrUsesHome (data
) || FcConfigHome ())
1724 if (!FcConfigAddDir (parse
->config
, data
))
1725 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1729 case FcElementCache
:
1730 data
= FcStrBufDone (&parse
->pstack
->str
);
1733 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1736 if (!FcStrUsesHome (data
) || FcConfigHome ())
1738 if (!FcConfigSetCache (parse
->config
, data
))
1739 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1743 case FcElementInclude
:
1744 FcParseInclude (parse
);
1746 case FcElementConfig
:
1748 case FcElementMatch
:
1749 FcParseMatch (parse
);
1751 case FcElementAlias
:
1752 FcParseAlias (parse
);
1755 case FcElementBlank
:
1756 FcParseBlank (parse
);
1758 case FcElementRescan
:
1759 FcParseRescan (parse
);
1762 case FcElementPrefer
:
1763 FcParseFamilies (parse
, FcVStackPrefer
);
1765 case FcElementAccept
:
1766 FcParseFamilies (parse
, FcVStackAccept
);
1768 case FcElementDefault
:
1769 FcParseFamilies (parse
, FcVStackDefault
);
1771 case FcElementFamily
:
1772 FcParseFamily (parse
);
1776 FcParseTest (parse
);
1779 FcParseEdit (parse
);
1785 case FcElementDouble
:
1786 FcParseDouble (parse
);
1788 case FcElementString
:
1789 FcParseString (parse
, FcVStackString
);
1791 case FcElementMatrix
:
1792 FcParseMatrix (parse
);
1795 FcParseBool (parse
);
1797 case FcElementCharset
:
1798 /* FcParseCharset (parse); */
1800 case FcElementSelectfont
:
1802 case FcElementAcceptfont
:
1803 case FcElementRejectfont
:
1804 FcParseAcceptRejectFont (parse
, parse
->pstack
->element
);
1807 FcParseString (parse
, FcVStackGlob
);
1810 FcParseString (parse
, FcVStackField
);
1812 case FcElementConst
:
1813 FcParseString (parse
, FcVStackConstant
);
1816 FcParseBinary (parse
, FcOpOr
);
1819 FcParseBinary (parse
, FcOpAnd
);
1822 FcParseBinary (parse
, FcOpEqual
);
1824 case FcElementNotEq
:
1825 FcParseBinary (parse
, FcOpNotEqual
);
1828 FcParseBinary (parse
, FcOpLess
);
1830 case FcElementLessEq
:
1831 FcParseBinary (parse
, FcOpLessEqual
);
1834 FcParseBinary (parse
, FcOpMore
);
1836 case FcElementMoreEq
:
1837 FcParseBinary (parse
, FcOpMoreEqual
);
1839 case FcElementContains
:
1840 FcParseBinary (parse
, FcOpContains
);
1842 case FcElementNotContains
:
1843 FcParseBinary (parse
, FcOpNotContains
);
1846 FcParseBinary (parse
, FcOpPlus
);
1848 case FcElementMinus
:
1849 FcParseBinary (parse
, FcOpMinus
);
1851 case FcElementTimes
:
1852 FcParseBinary (parse
, FcOpTimes
);
1854 case FcElementDivide
:
1855 FcParseBinary (parse
, FcOpDivide
);
1858 FcParseUnary (parse
, FcOpNot
);
1861 FcParseBinary (parse
, FcOpQuest
);
1863 case FcElementFloor
:
1864 FcParseUnary (parse
, FcOpFloor
);
1867 FcParseUnary (parse
, FcOpCeil
);
1869 case FcElementRound
:
1870 FcParseUnary (parse
, FcOpRound
);
1872 case FcElementTrunc
:
1873 FcParseUnary (parse
, FcOpTrunc
);
1875 case FcElementUnknown
:
1878 (void) FcPStackPop (parse
);
1882 FcCharacterData (void *userData
, const XML_Char
*s
, int len
)
1884 FcConfigParse
*parse
= userData
;
1888 if (!FcStrBufData (&parse
->pstack
->str
, (FcChar8
*) s
, len
))
1889 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1893 FcStartDoctypeDecl (void *userData
,
1894 const XML_Char
*doctypeName
,
1895 const XML_Char
*sysid
,
1896 const XML_Char
*pubid
,
1897 int has_internal_subset
)
1899 FcConfigParse
*parse
= userData
;
1901 if (strcmp ((char *) doctypeName
, "fontconfig") != 0)
1902 FcConfigMessage (parse
, FcSevereError
, "invalid doctype \"%s\"", doctypeName
);
1906 FcEndDoctypeDecl (void *userData
)
1911 FcConfigParseAndLoad (FcConfig
*config
,
1912 const FcChar8
*name
,
1921 FcConfigParse parse
;
1922 FcBool error
= FcTrue
;
1924 filename
= FcConfigFilename (name
);
1928 if (!FcStrSetAdd (config
->configFiles
, filename
))
1930 FcStrFree (filename
);
1934 f
= fopen ((char *) filename
, "r");
1935 FcStrFree (filename
);
1939 p
= XML_ParserCreate ("UTF-8");
1943 if (!FcConfigInit (&parse
, name
, config
, p
))
1946 XML_SetUserData (p
, &parse
);
1948 XML_SetDoctypeDeclHandler (p
, FcStartDoctypeDecl
, FcEndDoctypeDecl
);
1949 XML_SetElementHandler (p
, FcStartElement
, FcEndElement
);
1950 XML_SetCharacterDataHandler (p
, FcCharacterData
);
1953 buf
= XML_GetBuffer (p
, BUFSIZ
);
1956 FcConfigMessage (&parse
, FcSevereError
, "cannot get parse buffer");
1959 len
= fread (buf
, 1, BUFSIZ
, f
);
1962 FcConfigMessage (&parse
, FcSevereError
, "failed reading config file");
1965 if (!XML_ParseBuffer (p
, len
, len
== 0))
1967 FcConfigMessage (&parse
, FcSevereError
, "%s",
1968 XML_ErrorString (XML_GetErrorCode (p
)));
1972 error
= parse
.error
;
1974 FcConfigCleanup (&parse
);
1980 if (error
&& complain
)
1983 FcConfigMessage (0, FcSevereError
, "Cannot load config file \"%s\"", name
);
1985 FcConfigMessage (0, FcSevereError
, "Cannot load default config file");