]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * fontconfig/src/fcdbg.c | |
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 <stdio.h> | |
27 | #include <stdlib.h> | |
28 | ||
29 | void | |
30 | FcValuePrint (const FcValue v) | |
31 | { | |
32 | switch (v.type) { | |
33 | case FcTypeVoid: | |
34 | printf (" <void>"); | |
35 | break; | |
36 | case FcTypeInteger: | |
37 | printf (" %d(i)", v.u.i); | |
38 | break; | |
39 | case FcTypeDouble: | |
40 | printf (" %g(f)", v.u.d); | |
41 | break; | |
42 | case FcTypeString: | |
43 | printf (" \"%s\"", v.u.s); | |
44 | break; | |
45 | case FcTypeBool: | |
46 | printf (" %s", v.u.b ? "FcTrue" : "FcFalse"); | |
47 | break; | |
48 | case FcTypeMatrix: | |
49 | printf (" (%f %f; %f %f)", v.u.m->xx, v.u.m->xy, v.u.m->yx, v.u.m->yy); | |
50 | break; | |
51 | case FcTypeCharSet: /* XXX */ | |
52 | printf (" "); | |
53 | FcCharSetPrint (v.u.c); | |
54 | break; | |
55 | case FcTypeLangSet: | |
56 | printf (" "); | |
57 | FcLangSetPrint (v.u.l); | |
58 | break; | |
59 | case FcTypeFTFace: | |
60 | printf (" face"); | |
61 | break; | |
62 | } | |
63 | } | |
64 | ||
65 | void | |
66 | FcValueListPrint (FcValueListPtr l) | |
67 | { | |
68 | for (; l != NULL; l = FcValueListNext(l)) | |
69 | { | |
70 | FcValuePrint (FcValueCanonicalize(&l->value)); | |
71 | switch (l->binding) { | |
72 | case FcValueBindingWeak: | |
73 | printf ("(w)"); | |
74 | break; | |
75 | case FcValueBindingStrong: | |
76 | printf ("(s)"); | |
77 | break; | |
78 | case FcValueBindingSame: | |
79 | printf ("(=)"); | |
80 | break; | |
81 | } | |
82 | } | |
83 | } | |
84 | ||
85 | void | |
86 | FcLangSetPrint (const FcLangSet *ls) | |
87 | { | |
88 | FcStrBuf buf; | |
89 | FcChar8 init_buf[1024]; | |
90 | ||
91 | FcStrBufInit (&buf, init_buf, sizeof (init_buf)); | |
92 | if (FcNameUnparseLangSet (&buf, ls) && FcStrBufChar (&buf,'\0')) | |
93 | printf ("%s", buf.buf); | |
94 | else | |
95 | printf ("langset (alloc error)"); | |
96 | FcStrBufDestroy (&buf); | |
97 | } | |
98 | ||
99 | void | |
100 | FcCharSetPrint (const FcCharSet *c) | |
101 | { | |
102 | int i, j; | |
103 | intptr_t *leaves = FcCharSetLeaves (c); | |
104 | FcChar16 *numbers = FcCharSetNumbers (c); | |
105 | ||
106 | #if 0 | |
107 | printf ("CharSet 0x%x\n", (intptr_t) c); | |
108 | printf ("Leaves: +%d = 0x%x\n", c->leaves_offset, (intptr_t) leaves); | |
109 | printf ("Numbers: +%d = 0x%x\n", c->numbers_offset, (intptr_t) numbers); | |
110 | ||
111 | for (i = 0; i < c->num; i++) | |
112 | { | |
113 | printf ("Page %d: %04x +%d = 0x%x\n", | |
114 | i, numbers[i], leaves[i], | |
115 | (intptr_t) FcOffsetToPtr (leaves, leaves[i], FcCharLeaf)); | |
116 | } | |
117 | #endif | |
118 | ||
119 | for (i = 0; i < c->num; i++) | |
120 | { | |
121 | intptr_t leaf_offset = leaves[i]; | |
122 | FcCharLeaf *leaf = FcOffsetToPtr (leaves, leaf_offset, FcCharLeaf); | |
123 | ||
124 | if (i) | |
125 | printf ("\t"); | |
126 | printf ("%04x:", numbers[i]); | |
127 | for (j = 0; j < 256/32; j++) | |
128 | printf (" %08x", leaf->map[j]); | |
129 | printf ("\n"); | |
130 | } | |
131 | } | |
132 | ||
133 | void | |
134 | FcPatternPrint (const FcPattern *p) | |
135 | { | |
136 | int i; | |
137 | FcPatternElt *e; | |
138 | ||
139 | if (!p) | |
140 | { | |
141 | printf ("Null pattern\n"); | |
142 | return; | |
143 | } | |
144 | printf ("Pattern has %d elts (size %d)\n", p->num, p->size); | |
145 | for (i = 0; i < p->num; i++) | |
146 | { | |
147 | e = &FcPatternElts(p)[i]; | |
148 | printf ("\t%s:", FcObjectName(e->object)); | |
149 | FcValueListPrint (FcPatternEltValues(e)); | |
150 | printf ("\n"); | |
151 | } | |
152 | printf ("\n"); | |
153 | } | |
154 | ||
155 | void | |
156 | FcOpPrint (FcOp op) | |
157 | { | |
158 | switch (op) { | |
159 | case FcOpInteger: printf ("Integer"); break; | |
160 | case FcOpDouble: printf ("Double"); break; | |
161 | case FcOpString: printf ("String"); break; | |
162 | case FcOpMatrix: printf ("Matrix"); break; | |
163 | case FcOpBool: printf ("Bool"); break; | |
164 | case FcOpCharSet: printf ("CharSet"); break; | |
165 | case FcOpField: printf ("Field"); break; | |
166 | case FcOpConst: printf ("Const"); break; | |
167 | case FcOpAssign: printf ("Assign"); break; | |
168 | case FcOpAssignReplace: printf ("AssignReplace"); break; | |
169 | case FcOpPrepend: printf ("Prepend"); break; | |
170 | case FcOpPrependFirst: printf ("PrependFirst"); break; | |
171 | case FcOpAppend: printf ("Append"); break; | |
172 | case FcOpAppendLast: printf ("AppendLast"); break; | |
173 | case FcOpQuest: printf ("Quest"); break; | |
174 | case FcOpOr: printf ("Or"); break; | |
175 | case FcOpAnd: printf ("And"); break; | |
176 | case FcOpEqual: printf ("Equal"); break; | |
177 | case FcOpNotEqual: printf ("NotEqual"); break; | |
178 | case FcOpLess: printf ("Less"); break; | |
179 | case FcOpLessEqual: printf ("LessEqual"); break; | |
180 | case FcOpMore: printf ("More"); break; | |
181 | case FcOpMoreEqual: printf ("MoreEqual"); break; | |
182 | case FcOpContains: printf ("Contains"); break; | |
183 | case FcOpNotContains: printf ("NotContains"); break; | |
184 | case FcOpPlus: printf ("Plus"); break; | |
185 | case FcOpMinus: printf ("Minus"); break; | |
186 | case FcOpTimes: printf ("Times"); break; | |
187 | case FcOpDivide: printf ("Divide"); break; | |
188 | case FcOpNot: printf ("Not"); break; | |
189 | case FcOpNil: printf ("Nil"); break; | |
190 | case FcOpComma: printf ("Comma"); break; | |
191 | case FcOpFloor: printf ("Floor"); break; | |
192 | case FcOpCeil: printf ("Ceil"); break; | |
193 | case FcOpRound: printf ("Round"); break; | |
194 | case FcOpTrunc: printf ("Trunc"); break; | |
195 | case FcOpListing: printf ("Listing"); break; | |
196 | case FcOpInvalid: printf ("Invalid"); break; | |
197 | } | |
198 | } | |
199 | ||
200 | void | |
201 | FcExprPrint (const FcExpr *expr) | |
202 | { | |
203 | if (!expr) printf ("none"); | |
204 | else switch (expr->op) { | |
205 | case FcOpInteger: printf ("%d", expr->u.ival); break; | |
206 | case FcOpDouble: printf ("%g", expr->u.dval); break; | |
207 | case FcOpString: printf ("\"%s\"", expr->u.sval); break; | |
208 | case FcOpMatrix: printf ("[%g %g %g %g]", | |
209 | expr->u.mval->xx, | |
210 | expr->u.mval->xy, | |
211 | expr->u.mval->yx, | |
212 | expr->u.mval->yy); break; | |
213 | case FcOpBool: printf ("%s", expr->u.bval ? "true" : "false"); break; | |
214 | case FcOpCharSet: printf ("charset\n"); break; | |
215 | case FcOpNil: printf ("nil\n"); break; | |
216 | case FcOpField: printf ("%s", FcObjectName(expr->u.object)); break; | |
217 | case FcOpConst: printf ("%s", expr->u.constant); break; | |
218 | case FcOpQuest: | |
219 | FcExprPrint (expr->u.tree.left); | |
220 | printf (" quest "); | |
221 | FcExprPrint (expr->u.tree.right->u.tree.left); | |
222 | printf (" colon "); | |
223 | FcExprPrint (expr->u.tree.right->u.tree.right); | |
224 | break; | |
225 | case FcOpAssign: | |
226 | case FcOpAssignReplace: | |
227 | case FcOpPrependFirst: | |
228 | case FcOpPrepend: | |
229 | case FcOpAppend: | |
230 | case FcOpAppendLast: | |
231 | case FcOpOr: | |
232 | case FcOpAnd: | |
233 | case FcOpEqual: | |
234 | case FcOpNotEqual: | |
235 | case FcOpLess: | |
236 | case FcOpLessEqual: | |
237 | case FcOpMore: | |
238 | case FcOpMoreEqual: | |
239 | case FcOpContains: | |
240 | case FcOpListing: | |
241 | case FcOpNotContains: | |
242 | case FcOpPlus: | |
243 | case FcOpMinus: | |
244 | case FcOpTimes: | |
245 | case FcOpDivide: | |
246 | case FcOpComma: | |
247 | FcExprPrint (expr->u.tree.left); | |
248 | printf (" "); | |
249 | switch (expr->op) { | |
250 | case FcOpAssign: printf ("Assign"); break; | |
251 | case FcOpAssignReplace: printf ("AssignReplace"); break; | |
252 | case FcOpPrependFirst: printf ("PrependFirst"); break; | |
253 | case FcOpPrepend: printf ("Prepend"); break; | |
254 | case FcOpAppend: printf ("Append"); break; | |
255 | case FcOpAppendLast: printf ("AppendLast"); break; | |
256 | case FcOpOr: printf ("Or"); break; | |
257 | case FcOpAnd: printf ("And"); break; | |
258 | case FcOpEqual: printf ("Equal"); break; | |
259 | case FcOpNotEqual: printf ("NotEqual"); break; | |
260 | case FcOpLess: printf ("Less"); break; | |
261 | case FcOpLessEqual: printf ("LessEqual"); break; | |
262 | case FcOpMore: printf ("More"); break; | |
263 | case FcOpMoreEqual: printf ("MoreEqual"); break; | |
264 | case FcOpContains: printf ("Contains"); break; | |
265 | case FcOpListing: printf ("Listing"); break; | |
266 | case FcOpNotContains: printf ("NotContains"); break; | |
267 | case FcOpPlus: printf ("Plus"); break; | |
268 | case FcOpMinus: printf ("Minus"); break; | |
269 | case FcOpTimes: printf ("Times"); break; | |
270 | case FcOpDivide: printf ("Divide"); break; | |
271 | case FcOpComma: printf ("Comma"); break; | |
272 | default: break; | |
273 | } | |
274 | printf (" "); | |
275 | FcExprPrint (expr->u.tree.right); | |
276 | break; | |
277 | case FcOpNot: | |
278 | printf ("Not "); | |
279 | FcExprPrint (expr->u.tree.left); | |
280 | break; | |
281 | case FcOpFloor: | |
282 | printf ("Floor "); | |
283 | FcExprPrint (expr->u.tree.left); | |
284 | break; | |
285 | case FcOpCeil: | |
286 | printf ("Ceil "); | |
287 | FcExprPrint (expr->u.tree.left); | |
288 | break; | |
289 | case FcOpRound: | |
290 | printf ("Round "); | |
291 | FcExprPrint (expr->u.tree.left); | |
292 | break; | |
293 | case FcOpTrunc: | |
294 | printf ("Trunc "); | |
295 | FcExprPrint (expr->u.tree.left); | |
296 | break; | |
297 | case FcOpInvalid: printf ("Invalid"); break; | |
298 | } | |
299 | } | |
300 | ||
301 | void | |
302 | FcTestPrint (const FcTest *test) | |
303 | { | |
304 | switch (test->kind) { | |
305 | case FcMatchPattern: | |
306 | printf ("pattern "); | |
307 | break; | |
308 | case FcMatchFont: | |
309 | printf ("font "); | |
310 | break; | |
311 | case FcMatchScan: | |
312 | printf ("scan "); | |
313 | break; | |
314 | } | |
315 | switch (test->qual) { | |
316 | case FcQualAny: | |
317 | printf ("any "); | |
318 | break; | |
319 | case FcQualAll: | |
320 | printf ("all "); | |
321 | break; | |
322 | case FcQualFirst: | |
323 | printf ("first "); | |
324 | break; | |
325 | case FcQualNotFirst: | |
326 | printf ("not_first "); | |
327 | break; | |
328 | } | |
329 | printf ("%s ", FcObjectName (test->object)); | |
330 | FcOpPrint (test->op); | |
331 | printf (" "); | |
332 | FcExprPrint (test->expr); | |
333 | printf ("\n"); | |
334 | } | |
335 | ||
336 | void | |
337 | FcEditPrint (const FcEdit *edit) | |
338 | { | |
339 | printf ("Edit %s ", FcObjectName (edit->object)); | |
340 | FcOpPrint (edit->op); | |
341 | printf (" "); | |
342 | FcExprPrint (edit->expr); | |
343 | } | |
344 | ||
345 | void | |
346 | FcSubstPrint (const FcSubst *subst) | |
347 | { | |
348 | FcEdit *e; | |
349 | FcTest *t; | |
350 | ||
351 | printf ("match\n"); | |
352 | for (t = subst->test; t; t = t->next) | |
353 | { | |
354 | printf ("\t"); | |
355 | FcTestPrint (t); | |
356 | } | |
357 | printf ("edit\n"); | |
358 | for (e = subst->edit; e; e = e->next) | |
359 | { | |
360 | printf ("\t"); | |
361 | FcEditPrint (e); | |
362 | printf (";\n"); | |
363 | } | |
364 | printf ("\n"); | |
365 | } | |
366 | ||
367 | void | |
368 | FcFontSetPrint (const FcFontSet *s) | |
369 | { | |
370 | int i; | |
371 | ||
372 | printf ("FontSet %d of %d\n", s->nfont, s->sfont); | |
373 | for (i = 0; i < s->nfont; i++) | |
374 | { | |
375 | printf ("Font %d ", i); | |
376 | FcPatternPrint (s->fonts[i]); | |
377 | } | |
378 | } | |
379 | ||
380 | int FcDebugVal; | |
381 | ||
382 | void | |
383 | FcInitDebug (void) | |
384 | { | |
385 | char *e; | |
386 | ||
387 | e = getenv ("FC_DEBUG"); | |
388 | if (e) | |
389 | { | |
390 | printf ("FC_DEBUG=%s\n", e); | |
391 | FcDebugVal = atoi (e); | |
392 | if (FcDebugVal < 0) | |
393 | FcDebugVal = 0; | |
394 | } | |
395 | } | |
396 | #define __fcdbg__ | |
397 | #include "fcaliastail.h" | |
398 | #undef __fcdbg__ |