]>
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
{
339 FcElementNotContains
,
354 FcElementMap (const XML_Char
*name
)
360 { "fontconfig", FcElementFontconfig
},
361 { "dir", FcElementDir
},
362 { "cache", FcElementCache
},
363 { "include", FcElementInclude
},
364 { "config", FcElementConfig
},
365 { "match", FcElementMatch
},
366 { "alias", FcElementAlias
},
368 { "blank", FcElementBlank
},
369 { "rescan", FcElementRescan
},
371 { "prefer", FcElementPrefer
},
372 { "accept", FcElementAccept
},
373 { "default", FcElementDefault
},
374 { "family", FcElementFamily
},
376 { "test", FcElementTest
},
377 { "edit", FcElementEdit
},
378 { "int", FcElementInt
},
379 { "double", FcElementDouble
},
380 { "string", FcElementString
},
381 { "matrix", FcElementMatrix
},
382 { "bool", FcElementBool
},
383 { "charset", FcElementCharset
},
384 { "name", FcElementName
},
385 { "const", FcElementConst
},
386 { "or", FcElementOr
},
387 { "and", FcElementAnd
},
388 { "eq", FcElementEq
},
389 { "not_eq", FcElementNotEq
},
390 { "less", FcElementLess
},
391 { "less_eq", FcElementLessEq
},
392 { "more", FcElementMore
},
393 { "more_eq", FcElementMoreEq
},
394 { "contains", FcElementContains
},
395 { "not_contains",FcElementNotContains
},
396 { "plus", FcElementPlus
},
397 { "minus", FcElementMinus
},
398 { "times", FcElementTimes
},
399 { "divide", FcElementDivide
},
400 { "not", FcElementNot
},
401 { "if", FcElementIf
},
402 { "floor", FcElementFloor
},
403 { "ceil", FcElementCeil
},
404 { "round", FcElementRound
},
405 { "trunc", FcElementTrunc
},
411 for (i
= 0; fcElementMap
[i
].name
; i
++)
412 if (!strcmp ((char *) name
, fcElementMap
[i
].name
))
413 return fcElementMap
[i
].element
;
414 return FcElementUnknown
;
417 typedef struct _FcPStack
{
418 struct _FcPStack
*prev
;
424 typedef enum _FcVStackTag
{
446 typedef struct _FcVStack
{
447 struct _FcVStack
*prev
;
448 FcPStack
*pstack
; /* related parse element */
466 typedef struct _FcConfigParse
{
475 typedef enum _FcConfigSeverity
{
476 FcSevereInfo
, FcSevereWarning
, FcSevereError
480 FcConfigMessage (FcConfigParse
*parse
, FcConfigSeverity severe
, char *fmt
, ...)
485 va_start (args
, fmt
);
488 case FcSevereInfo
: s
= "info"; break;
489 case FcSevereWarning
: s
= "warning"; break;
490 case FcSevereError
: s
= "error"; break;
495 fprintf (stderr
, "Fontconfig %s: \"%s\", line %d: ", s
,
496 parse
->name
, XML_GetCurrentLineNumber (parse
->parser
));
498 fprintf (stderr
, "Fontconfig %s: line %d: ", s
,
499 XML_GetCurrentLineNumber (parse
->parser
));
500 if (severe
>= FcSevereError
)
501 parse
->error
= FcTrue
;
504 fprintf (stderr
, "Fontconfig %s: ", s
);
505 vfprintf (stderr
, fmt
, args
);
506 fprintf (stderr
, "\n");
511 FcVStackPush (FcConfigParse
*parse
, FcVStack
*vstack
)
513 vstack
->prev
= parse
->vstack
;
514 vstack
->pstack
= parse
->pstack
? parse
->pstack
->prev
: 0;
515 parse
->vstack
= vstack
;
519 FcVStackCreate (void)
523 new = malloc (sizeof (FcVStack
));
526 FcMemAlloc (FC_MEM_VSTACK
, sizeof (FcVStack
));
527 new->tag
= FcVStackNone
;
533 FcVStackDestroy (FcVStack
*vstack
)
537 for (; vstack
; vstack
= prev
)
540 switch (vstack
->tag
) {
546 case FcVStackConstant
:
547 FcStrFree (vstack
->u
.string
);
549 case FcVStackInteger
:
553 FcMatrixFree (vstack
->u
.matrix
);
558 FcTestDestroy (vstack
->u
.test
);
563 case FcVStackDefault
:
564 FcExprDestroy (vstack
->u
.expr
);
567 FcEditDestroy (vstack
->u
.edit
);
570 FcMemFree (FC_MEM_VSTACK
, sizeof (FcVStack
));
576 FcVStackPushString (FcConfigParse
*parse
, FcVStackTag tag
, FcChar8
*string
)
578 FcVStack
*vstack
= FcVStackCreate ();
581 vstack
->u
.string
= string
;
583 FcVStackPush (parse
, vstack
);
588 FcVStackPushInteger (FcConfigParse
*parse
, int integer
)
590 FcVStack
*vstack
= FcVStackCreate ();
593 vstack
->u
.integer
= integer
;
594 vstack
->tag
= FcVStackInteger
;
595 FcVStackPush (parse
, vstack
);
600 FcVStackPushDouble (FcConfigParse
*parse
, double _double
)
602 FcVStack
*vstack
= FcVStackCreate ();
605 vstack
->u
._double
= _double
;
606 vstack
->tag
= FcVStackDouble
;
607 FcVStackPush (parse
, vstack
);
612 FcVStackPushMatrix (FcConfigParse
*parse
, FcMatrix
*matrix
)
614 FcVStack
*vstack
= FcVStackCreate ();
617 matrix
= FcMatrixCopy (matrix
);
620 FcVStackDestroy (vstack
);
623 vstack
->u
.matrix
= matrix
;
624 vstack
->tag
= FcVStackMatrix
;
625 FcVStackPush (parse
, vstack
);
630 FcVStackPushBool (FcConfigParse
*parse
, FcBool
bool)
632 FcVStack
*vstack
= FcVStackCreate ();
635 vstack
->u
.bool = bool;
636 vstack
->tag
= FcVStackBool
;
637 FcVStackPush (parse
, vstack
);
642 FcVStackPushTest (FcConfigParse
*parse
, FcTest
*test
)
644 FcVStack
*vstack
= FcVStackCreate ();
647 vstack
->u
.test
= test
;
648 vstack
->tag
= FcVStackTest
;
649 FcVStackPush (parse
, vstack
);
654 FcVStackPushExpr (FcConfigParse
*parse
, FcVStackTag tag
, FcExpr
*expr
)
656 FcVStack
*vstack
= FcVStackCreate ();
659 vstack
->u
.expr
= expr
;
661 FcVStackPush (parse
, vstack
);
666 FcVStackPushEdit (FcConfigParse
*parse
, FcEdit
*edit
)
668 FcVStack
*vstack
= FcVStackCreate ();
671 vstack
->u
.edit
= edit
;
672 vstack
->tag
= FcVStackEdit
;
673 FcVStackPush (parse
, vstack
);
678 FcVStackFetch (FcConfigParse
*parse
, int off
)
682 for (vstack
= parse
->vstack
; vstack
&& off
-- > 0; vstack
= vstack
->prev
);
687 FcVStackClear (FcConfigParse
*parse
)
689 while (parse
->vstack
&& parse
->vstack
->pstack
== parse
->pstack
)
691 FcVStack
*vstack
= parse
->vstack
;
692 parse
->vstack
= vstack
->prev
;
694 FcVStackDestroy (vstack
);
699 FcVStackPop (FcConfigParse
*parse
)
701 FcVStack
*vstack
= parse
->vstack
;
703 if (!vstack
|| vstack
->pstack
!= parse
->pstack
)
705 parse
->vstack
= vstack
->prev
;
711 FcVStackElements (FcConfigParse
*parse
)
714 FcVStack
*vstack
= parse
->vstack
;
715 while (vstack
&& vstack
->pstack
== parse
->pstack
)
718 vstack
= vstack
->prev
;
724 FcConfigSaveAttr (const XML_Char
**attr
)
735 for (i
= 0; attr
[i
]; i
++)
736 slen
+= strlen (attr
[i
]) + 1;
738 new = malloc ((i
+ 1) * sizeof (FcChar8
*) + slen
);
741 FcMemAlloc (FC_MEM_ATTR
, 1); /* size is too expensive */
742 s
= (FcChar8
*) (new + (i
+ 1));
743 for (i
= 0; attr
[i
]; i
++)
746 strcpy ((char *) s
, (char *) attr
[i
]);
747 s
+= strlen ((char *) s
) + 1;
754 FcPStackPush (FcConfigParse
*parse
, FcElement element
, const XML_Char
**attr
)
756 FcPStack
*new = malloc (sizeof (FcPStack
));
760 FcMemAlloc (FC_MEM_PSTACK
, sizeof (FcPStack
));
761 new->prev
= parse
->pstack
;
762 new->element
= element
;
765 new->attr
= FcConfigSaveAttr (attr
);
767 FcConfigMessage (parse
, FcSevereError
, "out of memory");
771 FcStrBufInit (&new->str
, 0, 0);
777 FcPStackPop (FcConfigParse
*parse
)
783 FcConfigMessage (parse
, FcSevereError
, "mismatching element");
786 FcVStackClear (parse
);
788 parse
->pstack
= old
->prev
;
789 FcStrBufDestroy (&old
->str
);
792 FcMemFree (FC_MEM_ATTR
, 1); /* size is to expensive */
795 FcMemFree (FC_MEM_PSTACK
, sizeof (FcPStack
));
801 FcConfigInit (FcConfigParse
*parse
, const FcChar8
*name
, FcConfig
*config
, XML_Parser parser
)
805 parse
->error
= FcFalse
;
807 parse
->config
= config
;
808 parse
->parser
= parser
;
813 FcConfigCleanup (FcConfigParse
*parse
)
815 while (parse
->pstack
)
819 static const FcChar8
*
820 FcConfigGetAttribute (FcConfigParse
*parse
, char *attr
)
826 attrs
= parse
->pstack
->attr
;
829 if (!strcmp ((char *) *attrs
, attr
))
837 FcStartElement(void *userData
, const XML_Char
*name
, const XML_Char
**attr
)
839 FcConfigParse
*parse
= userData
;
842 element
= FcElementMap (name
);
843 if (element
== FcElementUnknown
)
844 FcConfigMessage (parse
, FcSevereWarning
, "unknown element \"%s\"", name
);
846 if (!FcPStackPush (parse
, element
, attr
))
848 FcConfigMessage (parse
, FcSevereError
, "out of memory");
855 FcParseBlank (FcConfigParse
*parse
)
857 int n
= FcVStackElements (parse
);
860 FcVStack
*v
= FcVStackFetch (parse
, n
);
861 if (v
->tag
!= FcVStackInteger
)
862 FcConfigMessage (parse
, FcSevereError
, "non-integer blank");
865 if (!parse
->config
->blanks
)
867 parse
->config
->blanks
= FcBlanksCreate ();
868 if (!parse
->config
->blanks
)
870 FcConfigMessage (parse
, FcSevereError
, "out of memory");
874 if (!FcBlanksAdd (parse
->config
->blanks
, v
->u
.integer
))
876 FcConfigMessage (parse
, FcSevereError
, "out of memory");
884 FcParseRescan (FcConfigParse
*parse
)
886 int n
= FcVStackElements (parse
);
889 FcVStack
*v
= FcVStackFetch (parse
, n
);
890 if (v
->tag
!= FcVStackInteger
)
891 FcConfigMessage (parse
, FcSevereWarning
, "non-integer rescan");
893 parse
->config
->rescanInterval
= v
->u
.integer
;
898 FcParseInt (FcConfigParse
*parse
)
905 s
= FcStrBufDone (&parse
->pstack
->str
);
908 FcConfigMessage (parse
, FcSevereError
, "out of memory");
912 l
= (int) strtol ((char *) s
, (char **)&end
, 0);
913 if (end
!= s
+ strlen ((char *) s
))
914 FcConfigMessage (parse
, FcSevereError
, "\"%s\": not a valid integer", s
);
916 FcVStackPushInteger (parse
, l
);
921 * idea copied from glib g_ascii_strtod with
922 * permission of the author (Alexander Larsson)
928 FcStrtod (char *s
, char **end
)
930 struct lconv
*locale_data
;
935 * Have to swap the decimal point to match the current locale
936 * if that locale doesn't use 0x2e
938 if ((dot
= strchr (s
, 0x2e)) &&
939 (locale_data
= localeconv ()) &&
940 (locale_data
->decimal_point
[0] != 0x2e ||
941 locale_data
->decimal_point
[1] != 0))
944 int slen
= strlen (s
);
945 int dlen
= strlen (locale_data
->decimal_point
);
947 if (slen
+ dlen
> sizeof (buf
))
957 strncpy (buf
, s
, dot
- s
);
959 strcpy (buf
+ (dot
- s
), locale_data
->decimal_point
);
961 strcpy (buf
+ (dot
- s
) + dlen
, dot
+ 1);
963 v
= strtod (buf
, &buf_end
);
965 buf_end
= s
+ (buf_end
- buf
);
976 FcParseDouble (FcConfigParse
*parse
)
983 s
= FcStrBufDone (&parse
->pstack
->str
);
986 FcConfigMessage (parse
, FcSevereError
, "out of memory");
990 d
= FcStrtod ((char *) s
, (char **)&end
);
991 if (end
!= s
+ strlen ((char *) s
))
992 FcConfigMessage (parse
, FcSevereError
, "\"%s\": not a valid double", s
);
994 FcVStackPushDouble (parse
, d
);
999 FcParseString (FcConfigParse
*parse
, FcVStackTag tag
)
1005 s
= FcStrBufDone (&parse
->pstack
->str
);
1008 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1011 if (!FcVStackPushString (parse
, tag
, s
))
1016 FcParseMatrix (FcConfigParse
*parse
)
1019 enum { m_done
, m_xx
, m_xy
, m_yx
, m_yy
} matrix_state
= m_yy
;
1022 while ((vstack
= FcVStackPop (parse
)))
1025 switch (vstack
->tag
) {
1026 case FcVStackInteger
:
1027 v
= vstack
->u
.integer
;
1029 case FcVStackDouble
:
1030 v
= vstack
->u
._double
;
1033 FcConfigMessage (parse
, FcSevereError
, "non-double matrix element");
1037 switch (matrix_state
) {
1038 case m_xx
: m
.xx
= v
; break;
1039 case m_xy
: m
.xy
= v
; break;
1040 case m_yx
: m
.yx
= v
; break;
1041 case m_yy
: m
.yy
= v
; break;
1044 FcVStackDestroy (vstack
);
1047 if (matrix_state
!= m_done
)
1048 FcConfigMessage (parse
, FcSevereError
, "wrong number of matrix elements");
1050 FcVStackPushMatrix (parse
, &m
);
1054 FcConfigLexBool (const FcChar8
*bool)
1056 if (*bool == 't' || *bool == 'T')
1058 if (*bool == 'y' || *bool == 'Y')
1066 FcParseBool (FcConfigParse
*parse
)
1072 s
= FcStrBufDone (&parse
->pstack
->str
);
1075 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1078 FcVStackPushBool (parse
, FcConfigLexBool (s
));
1083 FcParseFamilies (FcConfigParse
*parse
, FcVStackTag tag
)
1086 FcExpr
*left
, *expr
= 0, *new;
1088 while ((vstack
= FcVStackPop (parse
)))
1090 if (vstack
->tag
!= FcVStackFamily
)
1092 FcConfigMessage (parse
, FcSevereWarning
, "non-family");
1093 FcVStackDestroy (vstack
);
1096 left
= vstack
->u
.expr
;
1097 vstack
->tag
= FcVStackNone
;
1098 FcVStackDestroy (vstack
);
1101 new = FcExprCreateOp (left
, FcOpComma
, expr
);
1104 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1105 FcExprDestroy (left
);
1106 FcExprDestroy (expr
);
1116 if (!FcVStackPushExpr (parse
, tag
, expr
))
1118 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1120 FcExprDestroy (expr
);
1126 FcParseFamily (FcConfigParse
*parse
)
1133 s
= FcStrBufDone (&parse
->pstack
->str
);
1136 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1139 expr
= FcExprCreateString (s
);
1142 FcVStackPushExpr (parse
, FcVStackFamily
, expr
);
1146 FcParseAlias (FcConfigParse
*parse
)
1148 FcExpr
*family
= 0, *accept
= 0, *prefer
= 0, *def
= 0, *new = 0;
1149 FcEdit
*edit
= 0, *next
;
1153 while ((vstack
= FcVStackPop (parse
)))
1155 switch (vstack
->tag
) {
1156 case FcVStackFamily
:
1159 new = FcExprCreateOp (vstack
->u
.expr
, FcOpComma
, family
);
1161 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1166 new = vstack
->u
.expr
;
1170 vstack
->tag
= FcVStackNone
;
1173 case FcVStackPrefer
:
1175 FcExprDestroy (prefer
);
1176 prefer
= vstack
->u
.expr
;
1177 vstack
->tag
= FcVStackNone
;
1179 case FcVStackAccept
:
1181 FcExprDestroy (accept
);
1182 accept
= vstack
->u
.expr
;
1183 vstack
->tag
= FcVStackNone
;
1185 case FcVStackDefault
:
1187 FcExprDestroy (def
);
1188 def
= vstack
->u
.expr
;
1189 vstack
->tag
= FcVStackNone
;
1192 FcConfigMessage (parse
, FcSevereWarning
, "bad alias");
1195 FcVStackDestroy (vstack
);
1199 FcConfigMessage (parse
, FcSevereError
, "missing family in alias");
1201 FcExprDestroy (prefer
);
1203 FcExprDestroy (accept
);
1205 FcExprDestroy (def
);
1210 edit
= FcEditCreate (FcConfigSaveField ("family"),
1213 FcValueBindingWeak
);
1217 FcExprDestroy (prefer
);
1222 edit
= FcEditCreate (FcConfigSaveField ("family"),
1225 FcValueBindingWeak
);
1229 FcExprDestroy (accept
);
1234 edit
= FcEditCreate (FcConfigSaveField ("family"),
1237 FcValueBindingWeak
);
1241 FcExprDestroy (def
);
1245 test
= FcTestCreate (FcMatchPattern
,
1247 (FcChar8
*) FC_FAMILY
,
1251 if (!FcConfigAddEdit (parse
->config
, test
, edit
, FcMatchPattern
))
1252 FcTestDestroy (test
);
1255 FcExprDestroy (family
);
1259 FcPopExpr (FcConfigParse
*parse
)
1261 FcVStack
*vstack
= FcVStackPop (parse
);
1265 switch (vstack
->tag
) {
1268 case FcVStackString
:
1269 case FcVStackFamily
:
1270 expr
= FcExprCreateString (vstack
->u
.string
);
1273 expr
= FcExprCreateField ((char *) vstack
->u
.string
);
1275 case FcVStackConstant
:
1276 expr
= FcExprCreateConst (vstack
->u
.string
);
1278 case FcVStackPrefer
:
1279 case FcVStackAccept
:
1280 case FcVStackDefault
:
1281 expr
= vstack
->u
.expr
;
1282 vstack
->tag
= FcVStackNone
;
1284 case FcVStackInteger
:
1285 expr
= FcExprCreateInteger (vstack
->u
.integer
);
1287 case FcVStackDouble
:
1288 expr
= FcExprCreateDouble (vstack
->u
._double
);
1290 case FcVStackMatrix
:
1291 expr
= FcExprCreateMatrix (vstack
->u
.matrix
);
1294 expr
= FcExprCreateBool (vstack
->u
.bool);
1299 expr
= vstack
->u
.expr
;
1300 vstack
->tag
= FcVStackNone
;
1305 FcVStackDestroy (vstack
);
1310 * This builds a tree of binary operations. Note
1311 * that every operator is defined so that if only
1312 * a single operand is contained, the value of the
1313 * whole expression is the value of the operand.
1315 * This code reduces in that case to returning that
1319 FcPopBinary (FcConfigParse
*parse
, FcOp op
)
1321 FcExpr
*left
, *expr
= 0, *new;
1323 while ((left
= FcPopExpr (parse
)))
1327 new = FcExprCreateOp (left
, op
, expr
);
1330 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1331 FcExprDestroy (left
);
1332 FcExprDestroy (expr
);
1344 FcParseBinary (FcConfigParse
*parse
, FcOp op
)
1346 FcExpr
*expr
= FcPopBinary (parse
, op
);
1348 FcVStackPushExpr (parse
, FcVStackExpr
, expr
);
1352 * This builds a a unary operator, it consumes only
1357 FcPopUnary (FcConfigParse
*parse
, FcOp op
)
1359 FcExpr
*operand
, *new = 0;
1361 if ((operand
= FcPopExpr (parse
)))
1363 new = FcExprCreateOp (operand
, op
, 0);
1366 FcExprDestroy (operand
);
1367 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1374 FcParseUnary (FcConfigParse
*parse
, FcOp op
)
1376 FcExpr
*expr
= FcPopUnary (parse
, op
);
1378 FcVStackPushExpr (parse
, FcVStackExpr
, expr
);
1382 FcParseInclude (FcConfigParse
*parse
)
1386 FcBool ignore_missing
= FcFalse
;
1388 s
= FcStrBufDone (&parse
->pstack
->str
);
1391 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1394 i
= FcConfigGetAttribute (parse
, "ignore_missing");
1395 if (i
&& FcConfigLexBool ((FcChar8
*) i
) == FcTrue
)
1396 ignore_missing
= FcTrue
;
1397 if (!FcConfigParseAndLoad (parse
->config
, s
, !ignore_missing
))
1398 parse
->error
= FcTrue
;
1402 typedef struct _FcOpMap
{
1408 FcConfigLexOp (const FcChar8
*op
, const FcOpMap
*map
, int nmap
)
1412 for (i
= 0; i
< nmap
; i
++)
1413 if (!strcmp ((char *) op
, map
[i
].name
))
1418 static const FcOpMap fcCompareOps
[] = {
1419 { "eq", FcOpEqual
},
1420 { "not_eq", FcOpNotEqual
},
1421 { "less", FcOpLess
},
1422 { "less_eq", FcOpLessEqual
},
1423 { "more", FcOpMore
},
1424 { "more_eq", FcOpMoreEqual
},
1425 { "contains", FcOpContains
},
1426 { "not_contains", FcOpNotContains
}
1429 #define NUM_COMPARE_OPS (sizeof fcCompareOps / sizeof fcCompareOps[0])
1432 FcConfigLexCompare (const FcChar8
*compare
)
1434 return FcConfigLexOp (compare
, fcCompareOps
, NUM_COMPARE_OPS
);
1439 FcParseTest (FcConfigParse
*parse
)
1441 const FcChar8
*kind_string
;
1443 const FcChar8
*qual_string
;
1445 const FcChar8
*name
;
1446 const FcChar8
*compare_string
;
1451 kind_string
= FcConfigGetAttribute (parse
, "target");
1453 kind
= FcMatchDefault
;
1456 if (!strcmp ((char *) kind_string
, "pattern"))
1457 kind
= FcMatchPattern
;
1458 else if (!strcmp ((char *) kind_string
, "font"))
1460 else if (!strcmp ((char *) kind_string
, "default"))
1461 kind
= FcMatchDefault
;
1464 FcConfigMessage (parse
, FcSevereWarning
, "invalid test target \"%s\"", kind_string
);
1468 qual_string
= FcConfigGetAttribute (parse
, "qual");
1473 if (!strcmp ((char *) qual_string
, "any"))
1475 else if (!strcmp ((char *) qual_string
, "all"))
1477 else if (!strcmp ((char *) qual_string
, "first"))
1479 else if (!strcmp ((char *) qual_string
, "not_first"))
1480 qual
= FcQualNotFirst
;
1483 FcConfigMessage (parse
, FcSevereWarning
, "invalid test qual \"%s\"", qual_string
);
1487 name
= FcConfigGetAttribute (parse
, "name");
1490 FcConfigMessage (parse
, FcSevereWarning
, "missing test name");
1493 compare_string
= FcConfigGetAttribute (parse
, "compare");
1494 if (!compare_string
)
1495 compare
= FcOpEqual
;
1498 compare
= FcConfigLexCompare (compare_string
);
1499 if (compare
== FcOpInvalid
)
1501 FcConfigMessage (parse
, FcSevereWarning
, "invalid test compare \"%s\"", compare_string
);
1505 expr
= FcPopBinary (parse
, FcOpComma
);
1508 FcConfigMessage (parse
, FcSevereWarning
, "missing test expression");
1511 test
= FcTestCreate (kind
, qual
, name
, compare
, expr
);
1514 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1517 FcVStackPushTest (parse
, test
);
1520 static const FcOpMap fcModeOps
[] = {
1521 { "assign", FcOpAssign
},
1522 { "assign_replace", FcOpAssignReplace
},
1523 { "prepend", FcOpPrepend
},
1524 { "prepend_first", FcOpPrependFirst
},
1525 { "append", FcOpAppend
},
1526 { "append_last", FcOpAppendLast
},
1529 #define NUM_MODE_OPS (sizeof fcModeOps / sizeof fcModeOps[0])
1532 FcConfigLexMode (const FcChar8
*mode
)
1534 return FcConfigLexOp (mode
, fcModeOps
, NUM_MODE_OPS
);
1538 FcParseEdit (FcConfigParse
*parse
)
1540 const FcChar8
*name
;
1541 const FcChar8
*mode_string
;
1542 const FcChar8
*binding_string
;
1544 FcValueBinding binding
;
1548 name
= FcConfigGetAttribute (parse
, "name");
1551 FcConfigMessage (parse
, FcSevereWarning
, "missing edit name");
1554 mode_string
= FcConfigGetAttribute (parse
, "mode");
1559 mode
= FcConfigLexMode (mode_string
);
1560 if (mode
== FcOpInvalid
)
1562 FcConfigMessage (parse
, FcSevereWarning
, "invalid edit mode \"%s\"", mode_string
);
1566 binding_string
= FcConfigGetAttribute (parse
, "binding");
1567 if (!binding_string
)
1568 binding
= FcValueBindingWeak
;
1571 if (!strcmp ((char *) binding_string
, "weak"))
1572 binding
= FcValueBindingWeak
;
1573 else if (!strcmp ((char *) binding_string
, "strong"))
1574 binding
= FcValueBindingStrong
;
1575 else if (!strcmp ((char *) binding_string
, "same"))
1576 binding
= FcValueBindingSame
;
1579 FcConfigMessage (parse
, FcSevereWarning
, "invalid edit binding \"%s\"", binding_string
);
1583 expr
= FcPopBinary (parse
, FcOpComma
);
1584 edit
= FcEditCreate ((char *) FcStrCopy (name
), mode
, expr
, binding
);
1587 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1588 FcExprDestroy (expr
);
1591 if (!FcVStackPushEdit (parse
, edit
))
1592 FcEditDestroy (edit
);
1596 FcParseMatch (FcConfigParse
*parse
)
1598 const FcChar8
*kind_name
;
1604 kind_name
= FcConfigGetAttribute (parse
, "target");
1606 kind
= FcMatchPattern
;
1609 if (!strcmp ((char *) kind_name
, "pattern"))
1610 kind
= FcMatchPattern
;
1611 else if (!strcmp ((char *) kind_name
, "font"))
1615 FcConfigMessage (parse
, FcSevereWarning
, "invalid match target \"%s\"", kind_name
);
1619 while ((vstack
= FcVStackPop (parse
)))
1621 switch (vstack
->tag
) {
1623 vstack
->u
.test
->next
= test
;
1624 test
= vstack
->u
.test
;
1625 vstack
->tag
= FcVStackNone
;
1628 vstack
->u
.edit
->next
= edit
;
1629 edit
= vstack
->u
.edit
;
1630 vstack
->tag
= FcVStackNone
;
1633 FcConfigMessage (parse
, FcSevereWarning
, "invalid match element");
1636 FcVStackDestroy (vstack
);
1638 if (!FcConfigAddEdit (parse
->config
, test
, edit
, kind
))
1639 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1643 FcEndElement(void *userData
, const XML_Char
*name
)
1645 FcConfigParse
*parse
= userData
;
1650 switch (parse
->pstack
->element
) {
1653 case FcElementFontconfig
:
1656 data
= FcStrBufDone (&parse
->pstack
->str
);
1659 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1663 if (strcmp (data
, "WINDOWSFONTDIR") == 0)
1667 data
= malloc (1000);
1670 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1673 FcMemAlloc (FC_MEM_STRING
, 1000);
1674 rc
= GetWindowsDirectory (data
, 800);
1675 if (rc
== 0 || rc
> 800)
1677 FcConfigMessage (parse
, FcSevereError
, "GetWindowsDirectory failed");
1681 if (data
[strlen (data
) - 1] != '\\')
1682 strcat (data
, "\\");
1683 strcat (data
, "fonts");
1686 if (!FcStrUsesHome (data
) || FcConfigHome ())
1688 if (!FcConfigAddDir (parse
->config
, data
))
1689 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1693 case FcElementCache
:
1694 data
= FcStrBufDone (&parse
->pstack
->str
);
1697 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1700 if (!FcStrUsesHome (data
) || FcConfigHome ())
1702 if (!FcConfigSetCache (parse
->config
, data
))
1703 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1707 case FcElementInclude
:
1708 FcParseInclude (parse
);
1710 case FcElementConfig
:
1712 case FcElementMatch
:
1713 FcParseMatch (parse
);
1715 case FcElementAlias
:
1716 FcParseAlias (parse
);
1719 case FcElementBlank
:
1720 FcParseBlank (parse
);
1722 case FcElementRescan
:
1723 FcParseRescan (parse
);
1726 case FcElementPrefer
:
1727 FcParseFamilies (parse
, FcVStackPrefer
);
1729 case FcElementAccept
:
1730 FcParseFamilies (parse
, FcVStackAccept
);
1732 case FcElementDefault
:
1733 FcParseFamilies (parse
, FcVStackDefault
);
1735 case FcElementFamily
:
1736 FcParseFamily (parse
);
1740 FcParseTest (parse
);
1743 FcParseEdit (parse
);
1749 case FcElementDouble
:
1750 FcParseDouble (parse
);
1752 case FcElementString
:
1753 FcParseString (parse
, FcVStackString
);
1755 case FcElementMatrix
:
1756 FcParseMatrix (parse
);
1759 FcParseBool (parse
);
1761 case FcElementCharset
:
1762 /* FcParseCharset (parse); */
1766 FcParseString (parse
, FcVStackField
);
1768 case FcElementConst
:
1769 FcParseString (parse
, FcVStackConstant
);
1772 FcParseBinary (parse
, FcOpOr
);
1775 FcParseBinary (parse
, FcOpAnd
);
1778 FcParseBinary (parse
, FcOpEqual
);
1780 case FcElementNotEq
:
1781 FcParseBinary (parse
, FcOpNotEqual
);
1784 FcParseBinary (parse
, FcOpLess
);
1786 case FcElementLessEq
:
1787 FcParseBinary (parse
, FcOpLessEqual
);
1790 FcParseBinary (parse
, FcOpMore
);
1792 case FcElementMoreEq
:
1793 FcParseBinary (parse
, FcOpMoreEqual
);
1795 case FcElementContains
:
1796 FcParseBinary (parse
, FcOpContains
);
1798 case FcElementNotContains
:
1799 FcParseBinary (parse
, FcOpNotContains
);
1802 FcParseBinary (parse
, FcOpPlus
);
1804 case FcElementMinus
:
1805 FcParseBinary (parse
, FcOpMinus
);
1807 case FcElementTimes
:
1808 FcParseBinary (parse
, FcOpTimes
);
1810 case FcElementDivide
:
1811 FcParseBinary (parse
, FcOpDivide
);
1814 FcParseUnary (parse
, FcOpNot
);
1817 FcParseBinary (parse
, FcOpQuest
);
1819 case FcElementFloor
:
1820 FcParseUnary (parse
, FcOpFloor
);
1823 FcParseUnary (parse
, FcOpCeil
);
1825 case FcElementRound
:
1826 FcParseUnary (parse
, FcOpRound
);
1828 case FcElementTrunc
:
1829 FcParseUnary (parse
, FcOpTrunc
);
1831 case FcElementUnknown
:
1834 (void) FcPStackPop (parse
);
1838 FcCharacterData (void *userData
, const XML_Char
*s
, int len
)
1840 FcConfigParse
*parse
= userData
;
1844 if (!FcStrBufData (&parse
->pstack
->str
, (FcChar8
*) s
, len
))
1845 FcConfigMessage (parse
, FcSevereError
, "out of memory");
1849 FcStartDoctypeDecl (void *userData
,
1850 const XML_Char
*doctypeName
,
1851 const XML_Char
*sysid
,
1852 const XML_Char
*pubid
,
1853 int has_internal_subset
)
1855 FcConfigParse
*parse
= userData
;
1857 if (strcmp ((char *) doctypeName
, "fontconfig") != 0)
1858 FcConfigMessage (parse
, FcSevereError
, "invalid doctype \"%s\"", doctypeName
);
1862 FcEndDoctypeDecl (void *userData
)
1867 FcConfigParseAndLoad (FcConfig
*config
,
1868 const FcChar8
*name
,
1877 FcConfigParse parse
;
1878 FcBool error
= FcTrue
;
1880 filename
= FcConfigFilename (name
);
1884 if (!FcStrSetAdd (config
->configFiles
, filename
))
1886 FcStrFree (filename
);
1890 f
= fopen ((char *) filename
, "r");
1891 FcStrFree (filename
);
1895 p
= XML_ParserCreate ("UTF-8");
1899 if (!FcConfigInit (&parse
, name
, config
, p
))
1902 XML_SetUserData (p
, &parse
);
1904 XML_SetDoctypeDeclHandler (p
, FcStartDoctypeDecl
, FcEndDoctypeDecl
);
1905 XML_SetElementHandler (p
, FcStartElement
, FcEndElement
);
1906 XML_SetCharacterDataHandler (p
, FcCharacterData
);
1909 buf
= XML_GetBuffer (p
, BUFSIZ
);
1912 FcConfigMessage (&parse
, FcSevereError
, "cannot get parse buffer");
1915 len
= fread (buf
, 1, BUFSIZ
, f
);
1918 FcConfigMessage (&parse
, FcSevereError
, "failed reading config file");
1921 if (!XML_ParseBuffer (p
, len
, len
== 0))
1923 FcConfigMessage (&parse
, FcSevereError
, "%s",
1924 XML_ErrorString (XML_GetErrorCode (p
)));
1928 error
= parse
.error
;
1930 FcConfigCleanup (&parse
);
1936 if (error
&& complain
)
1939 FcConfigMessage (0, FcSevereError
, "Cannot load config file \"%s\"", name
);
1941 FcConfigMessage (0, FcSevereError
, "Cannot load default config file");