1 /* $NetBSD: XFontName.c,v 1.1.1.1 2016/01/13 18:41:48 christos Exp $ */
2
3 /*
4 * XFontName.c
5 *
6 * build/parse X Font name strings
7 */
8
9 #include <X11/Xlib.h>
10 #include <X11/Xos.h>
11 #include "XFontName.h"
12 #include <ctype.h>
13
14 static char *
extractStringField(char * name,char * buffer,int size,unsigned int * attrp,unsigned int bit)15 extractStringField (char *name, char *buffer, int size,
16 unsigned int *attrp, unsigned int bit)
17 {
18 char *buf = buffer;
19
20 if (!*name)
21 return 0;
22 while (*name && *name != '-' && size > 0) {
23 *buf++ = *name++;
24 --size;
25 }
26 if (size <= 0)
27 return 0;
28 *buf = '\0';
29 if (buffer[0] != '*' || buffer[1] != '\0')
30 *attrp |= bit;
31 if (*name == '-')
32 return name+1;
33 return name;
34 }
35
36 static char *
extractUnsignedField(char * name,unsigned int * result,unsigned int * attrp,unsigned int bit)37 extractUnsignedField (char *name, unsigned int *result,
38 unsigned int *attrp, unsigned int bit)
39 {
40 char buf[256];
41 char *c;
42 unsigned int i;
43
44 name = extractStringField (name, buf, sizeof (buf), attrp, bit);
45 if (!name)
46 return 0;
47 if (!(*attrp & bit))
48 return name;
49 i = 0;
50 for (c = buf; *c; c++) {
51 if (!isdigit (*c))
52 return 0;
53 i = i * 10 + (*c - '0');
54 }
55 *result = i;
56 return name;
57 }
58
59 Bool
XParseFontName(XFontNameString fontNameString,XFontName * fontName,unsigned int * fontNameAttributes)60 XParseFontName (XFontNameString fontNameString, XFontName *fontName,
61 unsigned int *fontNameAttributes)
62 {
63 char *name = fontNameString;
64 XFontName temp;
65 unsigned int attributes = 0;
66
67 #define GetString(field,bit)\
68 if (!(name = extractStringField \
69 (name, temp.field, sizeof (temp.field),\
70 &attributes, bit))) \
71 return False;
72
73 #define GetUnsigned(field,bit)\
74 if (!(name = extractUnsignedField \
75 (name, &temp.field, \
76 &attributes, bit))) \
77 return False;
78
79 GetString (Registry, FontNameRegistry)
80 GetString (Foundry, FontNameFoundry)
81 GetString (FamilyName, FontNameFamilyName)
82 GetString (WeightName, FontNameWeightName)
83 GetString (Slant, FontNameSlant)
84 GetString (SetwidthName, FontNameSetwidthName)
85 GetString (AddStyleName, FontNameAddStyleName)
86 GetUnsigned (PixelSize, FontNamePixelSize)
87 GetUnsigned (PointSize, FontNamePointSize)
88 GetUnsigned (ResolutionX, FontNameResolutionX)
89 GetUnsigned (ResolutionY, FontNameResolutionY)
90 GetString (Spacing, FontNameSpacing)
91 GetUnsigned (AverageWidth, FontNameAverageWidth)
92 GetString (CharSetRegistry, FontNameCharSetRegistry)
93 if (!*name) {
94 temp.CharSetEncoding[0] = '\0';
95 attributes |= FontNameCharSetEncoding;
96 } else {
97 GetString (CharSetEncoding, FontNameCharSetEncoding)
98 }
99 *fontName = temp;
100 *fontNameAttributes = attributes;
101 return True;
102 }
103
104 static char *
utoa(unsigned int u,char * s,int size)105 utoa (unsigned int u, char *s, int size)
106 {
107 char *t;
108
109 t = s + size;
110 *--t = '\0';
111 do
112 *--t = (u % 10) + '0';
113 while (u /= 10);
114 return t;
115 }
116
117 Bool
XFormatFontName(XFontName * fontName,unsigned int fontNameAttributes,XFontNameString fontNameString)118 XFormatFontName (XFontName *fontName, unsigned int fontNameAttributes,
119 XFontNameString fontNameString)
120 {
121 char tmp[256];
122 char *name = tmp, *f;
123 int left = sizeof (tmp) - 1;
124 char number[32];
125
126 #define PutString(field, bit)\
127 f = (fontNameAttributes & bit) ? \
128 fontName->field \
129 : (char *)"*"; \
130 if ((left -= strlen (f)) < 0) \
131 return False; \
132 while (*f) \
133 if ((*name++ = *f++) == '-') \
134 return False;
135 #define PutHyphen()\
136 if (--left < 0) \
137 return False; \
138 *name++ = '-';
139
140 #define PutUnsigned(field, bit) \
141 f = (fontNameAttributes & bit) ? \
142 utoa (fontName->field, number, sizeof (number)) \
143 : (char *)"*"; \
144 if ((left -= strlen (f)) < 0) \
145 return False; \
146 while (*f) \
147 *name++ = *f++;
148
149 PutString (Registry, FontNameRegistry)
150 PutHyphen ();
151 PutString (Foundry, FontNameFoundry)
152 PutHyphen ();
153 PutString (FamilyName, FontNameFamilyName)
154 PutHyphen ();
155 PutString (WeightName, FontNameWeightName)
156 PutHyphen ();
157 PutString (Slant, FontNameSlant)
158 PutHyphen ();
159 PutString (SetwidthName, FontNameSetwidthName)
160 PutHyphen ();
161 PutString (AddStyleName, FontNameAddStyleName)
162 PutHyphen ();
163 PutUnsigned (PixelSize, FontNamePixelSize)
164 PutHyphen ();
165 PutUnsigned (PointSize, FontNamePointSize)
166 PutHyphen ();
167 PutUnsigned (ResolutionX, FontNameResolutionX)
168 PutHyphen ();
169 PutUnsigned (ResolutionY, FontNameResolutionY)
170 PutHyphen ();
171 PutString (Spacing, FontNameSpacing)
172 PutHyphen ();
173 PutUnsigned (AverageWidth, FontNameAverageWidth)
174 PutHyphen ();
175 PutString (CharSetRegistry, FontNameCharSetRegistry)
176 PutHyphen ();
177 PutString (CharSetEncoding, FontNameCharSetEncoding)
178 *name = '\0';
179 strcpy (fontNameString, tmp);
180 return True;
181 }
182
183 Bool
XCompareFontName(XFontName * name1,XFontName * name2,unsigned int fontNameAttributes)184 XCompareFontName (XFontName *name1, XFontName *name2,
185 unsigned int fontNameAttributes)
186 {
187 #define CompareString(field,bit) \
188 if (fontNameAttributes & bit) \
189 if (strcmp (name1->field, name2->field)) \
190 return False;
191
192 #define CompareUnsigned(field,bit) \
193 if (fontNameAttributes & bit) \
194 if (name1->field != name2->field) \
195 return False;
196
197 CompareString (Registry, FontNameRegistry)
198 CompareString (Foundry, FontNameFoundry)
199 CompareString (FamilyName, FontNameFamilyName)
200 CompareString (WeightName, FontNameWeightName)
201 CompareString (Slant, FontNameSlant)
202 CompareString (SetwidthName, FontNameSetwidthName)
203 CompareString (AddStyleName, FontNameAddStyleName)
204 CompareUnsigned (PixelSize, FontNamePixelSize)
205 CompareUnsigned (PointSize, FontNamePointSize)
206 CompareUnsigned (ResolutionX, FontNameResolutionX)
207 CompareUnsigned (ResolutionY, FontNameResolutionY)
208 CompareString (Spacing, FontNameSpacing)
209 CompareUnsigned (AverageWidth, FontNameAverageWidth)
210 CompareString (CharSetRegistry, FontNameCharSetRegistry)
211 CompareString (CharSetEncoding, FontNameCharSetEncoding)
212 return True;
213 }
214
215 Bool
XCopyFontName(XFontName * name1,XFontName * name2,unsigned int fontNameAttributes)216 XCopyFontName (XFontName *name1, XFontName *name2,
217 unsigned int fontNameAttributes)
218 {
219 #define CopyString(field,bit) \
220 if (fontNameAttributes & bit) \
221 strcpy (name2->field, name1->field);
222
223 #define CopyUnsigned(field,bit) \
224 if (fontNameAttributes & bit) \
225 name2->field = name1->field;
226
227 CopyString (Registry, FontNameRegistry)
228 CopyString (Foundry, FontNameFoundry)
229 CopyString (FamilyName, FontNameFamilyName)
230 CopyString (WeightName, FontNameWeightName)
231 CopyString (Slant, FontNameSlant)
232 CopyString (SetwidthName, FontNameSetwidthName)
233 CopyString (AddStyleName, FontNameAddStyleName)
234 CopyUnsigned (PixelSize, FontNamePixelSize)
235 CopyUnsigned (PointSize, FontNamePointSize)
236 CopyUnsigned (ResolutionX, FontNameResolutionX)
237 CopyUnsigned (ResolutionY, FontNameResolutionY)
238 CopyString (Spacing, FontNameSpacing)
239 CopyUnsigned (AverageWidth, FontNameAverageWidth)
240 CopyString (CharSetRegistry, FontNameCharSetRegistry)
241 CopyString (CharSetEncoding, FontNameCharSetEncoding)
242 return True;
243 }
244