1 | /*␊ |
2 | * Copyright (c) 2003 Apple Computer, Inc. All rights reserved.␊ |
3 | *␊ |
4 | * @APPLE_LICENSE_HEADER_START@␊ |
5 | *␊ |
6 | * Portions Copyright (c) 2003 Apple Computer, Inc. All Rights␊ |
7 | * Reserved.␊ |
8 | * The contents of this file constitute Original Code as defined in and␊ |
9 | * are subject to the Apple Public Source License Version 2.0 (the␊ |
10 | * "License"). You may not use this file except in compliance with the␊ |
11 | * License. Please obtain a copy of the License at␊ |
12 | * http://www.apple.com/publicsource and read it before using this file.␊ |
13 | *␊ |
14 | * This Original Code and all software distributed under the License are␊ |
15 | * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER␊ |
16 | * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,␊ |
17 | * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,␊ |
18 | * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the␊ |
19 | * License for the specific language governing rights and limitations␊ |
20 | * under the License.␊ |
21 | *␊ |
22 | * @APPLE_LICENSE_HEADER_END@␊ |
23 | */␊ |
24 | ␊ |
25 | #include "bootstruct.h"␊ |
26 | #include "libsaio.h"␊ |
27 | #include "sl.h"␊ |
28 | #include "xml.h"␊ |
29 | ␊ |
30 | string_ref *ref_strings = NULL;␊ |
31 | ␊ |
32 | /// TODO: remove below␊ |
33 | static char *buffer_start = NULL;␊ |
34 | // TODO: redo the next two functions␊ |
35 | void SaveRefString(char *string, int id)␊ |
36 | {␊ |
37 | ␉//printf("Adding Ref String %d (%s)\n", id, string);␊ |
38 | ␉string_ref *tmp = ref_strings;␊ |
39 | ␉while(tmp)␊ |
40 | ␉{␊ |
41 | ␉␉if(tmp->id == id)␊ |
42 | ␉␉{␊ |
43 | ␉␉␉tmp->string = malloc(strlen(string)+1);␊ |
44 | ␉␉␉sprintf(tmp->string, "%s", string);␊ |
45 | ␉␉␉return;␊ |
46 | ␉␉}␊ |
47 | ␉␉tmp = tmp->next;␊ |
48 | ␉}␊ |
49 | ␊ |
50 | ␉string_ref* new_ref = malloc(sizeof(string_ref));␊ |
51 | ␉new_ref->string = malloc(strlen(string)+1);␊ |
52 | ␉sprintf(new_ref->string, "%s", string);␊ |
53 | ␉new_ref->id = id;␊ |
54 | ␉new_ref->next = ref_strings;␊ |
55 | ␉ref_strings = new_ref;␊ |
56 | }␊ |
57 | ␊ |
58 | char *GetRefString(int id)␊ |
59 | {␊ |
60 | ␉string_ref *tmp = ref_strings;␊ |
61 | ␉while(tmp)␊ |
62 | ␉{␊ |
63 | ␉␉if(tmp->id == id) return tmp->string;␊ |
64 | ␉␉tmp = tmp->next;␊ |
65 | ␉}␊ |
66 | ␉//verbose("Unable to locate Ref String %d\n", id);␊ |
67 | ␉return "Unknown";␊ |
68 | }␊ |
69 | ␊ |
70 | struct Module {␊ |
71 | ␉struct Module *nextModule;␊ |
72 | ␉long␉␉willLoad;␊ |
73 | ␉TagPtr␉␉dict;␊ |
74 | ␉char␉␉*plistAddr;␊ |
75 | ␉long␉␉plistLength;␊ |
76 | ␉char␉␉*driverPath;␊ |
77 | };␊ |
78 | typedef struct Module Module, *ModulePtr;␊ |
79 | ␊ |
80 | struct DriverInfo {␊ |
81 | ␉char␉*plistAddr;␊ |
82 | ␉long␉plistLength;␊ |
83 | ␉void␉*moduleAddr;␊ |
84 | ␉long␉moduleLength;␊ |
85 | };␊ |
86 | typedef struct DriverInfo DriverInfo, *DriverInfoPtr;␊ |
87 | ␊ |
88 | #define kDriverPackageSignature1 'MKXT'␊ |
89 | #define kDriverPackageSignature2 'MOSX'␊ |
90 | ␊ |
91 | struct DriversPackage {␊ |
92 | ␉unsigned long signature1;␊ |
93 | ␉unsigned long signature2;␊ |
94 | ␉unsigned long length;␊ |
95 | ␉unsigned long adler32;␊ |
96 | ␉unsigned long version;␊ |
97 | ␉unsigned long numDrivers;␊ |
98 | ␉unsigned long reserved1;␊ |
99 | ␉unsigned long reserved2;␊ |
100 | };␊ |
101 | typedef struct DriversPackage DriversPackage;␊ |
102 | ␊ |
103 | enum {␊ |
104 | ␉kCFBundleType2,␊ |
105 | ␉kCFBundleType3␊ |
106 | };␊ |
107 | ␊ |
108 | ␊ |
109 | #define DOFREE 1␊ |
110 | ␊ |
111 | static long ParseTagList(char *buffer, TagPtr *tag, long type, long empty);␊ |
112 | static long ParseTagKey(char *buffer, TagPtr *tag);␊ |
113 | static long ParseTagString(char *buffer, TagPtr *tag);␊ |
114 | static long ParseTagInteger(char *buffer, TagPtr *tag);␊ |
115 | static long ParseTagData(char *buffer, TagPtr *tag);␊ |
116 | static long ParseTagDate(char *buffer, TagPtr *tag);␊ |
117 | //static long ParseTagBoolean(char *buffer, TagPtr *tag, long type);␊ |
118 | static long GetNextTag(char *buffer, char **tag, long *start);␊ |
119 | static long FixDataMatchingTag(char *buffer, char *tag);␊ |
120 | static TagPtr NewTag(void);␊ |
121 | static char *NewSymbol(char *string);␊ |
122 | #if DOFREE␊ |
123 | static void FreeSymbol(char *string);␊ |
124 | #endif␊ |
125 | ␊ |
126 | ␊ |
127 | //==========================================================================␊ |
128 | // XMLGetProperty␊ |
129 | ␊ |
130 | TagPtr XMLGetProperty(TagPtr dict, const char *key)␊ |
131 | {␊ |
132 | ␉TagPtr tagList, tag;␊ |
133 | ␊ |
134 | ␉if (dict->type != kTagTypeDict)␊ |
135 | ␉{␊ |
136 | ␉␉return 0;␊ |
137 | ␉}␊ |
138 | ␊ |
139 | ␉tag = 0;␊ |
140 | ␉tagList = dict->tag;␊ |
141 | ␉while (tagList) {␊ |
142 | ␉␉tag = tagList;␊ |
143 | ␉␉tagList = tag->tagNext;␊ |
144 | ␊ |
145 | ␉␉if ((tag->type != kTagTypeKey) || (tag->string == 0))␊ |
146 | ␉␉{␊ |
147 | ␉␉␉continue;␊ |
148 | ␉␉}␊ |
149 | ␊ |
150 | ␉␉if (!strcmp(tag->string, key))␊ |
151 | ␉␉{␊ |
152 | ␉␉␉return tag->tag;␊ |
153 | ␉␉}␊ |
154 | ␉}␊ |
155 | ␉return 0;␊ |
156 | }␊ |
157 | ␊ |
158 | //==========================================================================␊ |
159 | // XMLGetProperty␊ |
160 | ␊ |
161 | TagPtr XMLGetKey( TagPtr dict, int id )␊ |
162 | {␊ |
163 | ␉TagPtr tagList, tag;␊ |
164 | ␊ |
165 | ␉if (dict->type != kTagTypeDict)␊ |
166 | ␉{␊ |
167 | ␉␉return 0;␊ |
168 | ␉}␊ |
169 | ␊ |
170 | ␉tag = 0;␊ |
171 | ␉int element = 0;␊ |
172 | ␉tagList = dict->tag;␊ |
173 | ␉while (tagList && element != id)␊ |
174 | ␉{␊ |
175 | ␉␉tag = tagList;␊ |
176 | ␉␉tagList = tag->tagNext;␊ |
177 | ␊ |
178 | ␉␉if ((tag->type != kTagTypeKey) || (tag->string == 0))␊ |
179 | ␉␉{␊ |
180 | ␉␉␉continue;␊ |
181 | ␉␉}␊ |
182 | ␊ |
183 | ␉element++;␊ |
184 | ␉␉if(id == element)␊ |
185 | ␉␉{␊ |
186 | ␉␉␉return tag;␊ |
187 | ␉␉}␊ |
188 | ␊ |
189 | ␉}␊ |
190 | ␉return 0;␊ |
191 | }␊ |
192 | ␊ |
193 | TagPtr XMLGetValueForKey(TagPtr key)␊ |
194 | {␊ |
195 | ␉if (!key || key->type != kTagTypeKey)␊ |
196 | ␉{␊ |
197 | ␉␉return 0;␊ |
198 | ␉}␊ |
199 | ␊ |
200 | ␉return key->tag;␊ |
201 | }␊ |
202 | ␊ |
203 | ␊ |
204 | // XMLGetTag(int index)␊ |
205 | ␊ |
206 | // XMLTagCount( TagPtr dict )␊ |
207 | int XMLTagCount( TagPtr dict )␊ |
208 | {␊ |
209 | ␉int count = 0;␊ |
210 | ␉TagPtr tagList, tag;␊ |
211 | ␊ |
212 | ␉if (dict->type != kTagTypeDict && dict->type != kTagTypeArray)␊ |
213 | ␉{␊ |
214 | ␉␉return 0;␊ |
215 | ␉}␊ |
216 | ␊ |
217 | ␉tag = 0;␊ |
218 | ␉tagList = dict->tag;␊ |
219 | ␉while (tagList)␊ |
220 | ␉{␊ |
221 | ␉␉tag = tagList;␊ |
222 | ␉␉tagList = tag->tagNext;␊ |
223 | ␊ |
224 | ␉␉if (((tag->type != kTagTypeKey) && ((tag->string == 0) || (tag->string[0] == 0)))␊ |
225 | ␉␉␉&& (dict->type != kTagTypeArray)␉// If we are an array, any element is valid␊ |
226 | ␉␉␉)␊ |
227 | ␉␉{␊ |
228 | ␉␉␉continue;␊ |
229 | ␉␉}␊ |
230 | ␊ |
231 | ␉␉//if(tag->type == kTagTypeKey) printf("Located key %s\n", tag->string);␊ |
232 | ␊ |
233 | ␉␉count++;␊ |
234 | ␉}␊ |
235 | ␊ |
236 | ␉return count;␊ |
237 | }␊ |
238 | ␊ |
239 | TagPtr XMLGetElement( TagPtr dict, int id )␊ |
240 | {␊ |
241 | ␉if(dict->type != kTagTypeArray)␊ |
242 | ␉{␊ |
243 | ␉␉return 0;␊ |
244 | ␉}␊ |
245 | ␊ |
246 | ␉int element = 0;␊ |
247 | ␉TagPtr tmp = dict->tag;␊ |
248 | ␊ |
249 | ␉while(element < id)␊ |
250 | ␉{␊ |
251 | ␉␉element++;␊ |
252 | ␉␉tmp = tmp->tagNext;␊ |
253 | ␉}␊ |
254 | ␊ |
255 | ␉return tmp;␊ |
256 | }␊ |
257 | ␊ |
258 | /* Function for basic XML character entities parsing */␊ |
259 | ␊ |
260 | char *XMLDecode(const char* src)␊ |
261 | {␊ |
262 | ␉typedef const struct XMLEntity {␊ |
263 | ␉␉const char *name;␊ |
264 | ␉␉size_t nameLen;␊ |
265 | ␉␉char value;␊ |
266 | ␉} XMLEntity;␊ |
267 | ␊ |
268 | ␉/* This is ugly, but better than specifying the lengths by hand */␊ |
269 | ␉#define _e(str,c) {str,sizeof(str)-1,c}␊ |
270 | ␉const XMLEntity ents[] = {␊ |
271 | ␉␉_e("quot;",'"'), _e("apos;",'\''),␊ |
272 | ␉␉_e("lt;", '<'), _e("gt;", '>'),␊ |
273 | ␉␉_e("amp;", '&')␊ |
274 | ␉};␊ |
275 | ␊ |
276 | ␉size_t len;␊ |
277 | ␉const char *s;␊ |
278 | ␉char *out, *o;␊ |
279 | ␊ |
280 | ␉if ( !src || !(len = strlen(src)) || !(out = malloc(len+1)) )␊ |
281 | ␉{␊ |
282 | ␉␉return 0;␊ |
283 | ␉}␊ |
284 | ␊ |
285 | ␉o = out;␊ |
286 | ␉s = src;␊ |
287 | ␉while (s <= src+len) /* Make sure the terminator is also copied */␊ |
288 | ␉{␊ |
289 | ␉␉if ( *s == '&' )␊ |
290 | ␉␉{␊ |
291 | ␉␉␉bool entFound = false;␊ |
292 | ␉␉␉int i;␊ |
293 | ␊ |
294 | ␉␉␉s++;␊ |
295 | ␉␉␉for ( i = 0; i < sizeof(ents)/sizeof(ents[0]); i++)␊ |
296 | ␉␉␉{␊ |
297 | ␉␉␉␉if ( strncmp(s, ents[i].name, ents[i].nameLen) == 0 )␊ |
298 | ␉␉␉␉{␊ |
299 | ␉␉␉␉␉entFound = true;␊ |
300 | ␉␉␉␉␉break;␊ |
301 | ␉␉␉␉}␊ |
302 | ␉␉␉}␊ |
303 | ␉␉␉if ( entFound )␊ |
304 | ␉␉␉{␊ |
305 | ␉␉␉␉*o++ = ents[i].value;␊ |
306 | ␉␉␉␉s += ents[i].nameLen;␊ |
307 | ␊ |
308 | ␉␉␉continue;␊ |
309 | ␉␉␉}␊ |
310 | ␉␉}␊ |
311 | ␊ |
312 | ␉*o++ = *s++;␊ |
313 | ␉}␊ |
314 | ␊ |
315 | ␉return out;␊ |
316 | }␊ |
317 | ␊ |
318 | //==========================================================================␊ |
319 | // XMLParseFile␊ |
320 | // Expects to see one dictionary in the XML file, the final pos will be returned␊ |
321 | // If the pos is not equal to the strlen, then there are multiple dicts␊ |
322 | // Puts the first dictionary it finds in the␊ |
323 | // tag pointer and returns the end of the dic, or returns -1 if not found.␊ |
324 | //␊ |
325 | long XMLParseFile( char * buffer, TagPtr *dict )␊ |
326 | {␊ |
327 | ␉long␉length;␊ |
328 | ␉long␉pos = 0;␊ |
329 | ␉TagPtr␉tag;␊ |
330 | ␉char␉*configBuffer;␊ |
331 | ␊ |
332 | ␉int strlength = strlen(buffer);␊ |
333 | ␉configBuffer = malloc(strlength+1);␊ |
334 | ␉bcopy(buffer, configBuffer, strlength);␊ |
335 | ␊ |
336 | ␉configBuffer[strlength] = 0;␊ |
337 | ␊ |
338 | ␉buffer_start = configBuffer;␊ |
339 | ␊ |
340 | ␉while (1)␊ |
341 | ␉{␊ |
342 | ␉␉length = XMLParseNextTag(configBuffer + pos, &tag);␊ |
343 | ␉␉if (length == -1) break;␊ |
344 | ␊ |
345 | ␉␉pos += length;␊ |
346 | ␊ |
347 | ␉␉if (tag == 0)␊ |
348 | ␉␉{␊ |
349 | ␉␉␉continue;␊ |
350 | ␉␉}␊ |
351 | ␊ |
352 | ␉␉if (tag->type == kTagTypeDict)␊ |
353 | ␉␉{␊ |
354 | ␉␉␉break;␊ |
355 | ␉␉}␊ |
356 | ␊ |
357 | ␉␉XMLFreeTag(tag);␊ |
358 | ␉}␊ |
359 | ␉free(configBuffer);␊ |
360 | ␉if (length < 0)␊ |
361 | ␉{␊ |
362 | ␉␉return -1;␊ |
363 | ␉}␊ |
364 | ␉*dict = tag;␊ |
365 | ␉return pos;␊ |
366 | }␊ |
367 | ␊ |
368 | //==========================================================================␊ |
369 | // ParseNextTag␊ |
370 | // TODO: cleanup␊ |
371 | long XMLParseNextTag( char *buffer, TagPtr *tag )␊ |
372 | {␊ |
373 | ␉long␉length = 0;␊ |
374 | ␉long␉pos = 0;␊ |
375 | ␊ |
376 | ␊ |
377 | ␉char␉*tagName;␊ |
378 | ␊ |
379 | ␉length = GetNextTag(buffer, &tagName, 0);␊ |
380 | ␉if (length == -1)␊ |
381 | ␉{␊ |
382 | ␉␉return -1;␊ |
383 | ␉}␊ |
384 | ␊ |
385 | ␉pos = length;␊ |
386 | ␉if (!strncmp(tagName, kXMLTagPList, 6))␊ |
387 | ␉{␊ |
388 | ␉␉length = 0;␊ |
389 | // just a header; nothing to parse␊ |
390 | // return-via-reference tag should be left alone␊ |
391 | ␉}␊ |
392 | ␉/***** dict ****/␊ |
393 | ␉else if (!strcmp(tagName, kXMLTagDict))␊ |
394 | ␉{␊ |
395 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeDict, 0);␊ |
396 | ␉}␊ |
397 | ␉else if (!strncmp(tagName, kXMLTagDict, strlen(kXMLTagDict)) && tagName[strlen(tagName)-1] == '/')␊ |
398 | ␉{␊ |
399 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeDict, 1);␊ |
400 | ␉}␊ |
401 | ␉else if (!strncmp(tagName, kXMLTagDict " ", strlen(kXMLTagDict " ")))␊ |
402 | ␉{␊ |
403 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeDict, 0);␊ |
404 | ␉}␊ |
405 | ␉/***** key ****/␊ |
406 | ␉else if (!strcmp(tagName, kXMLTagKey))␊ |
407 | ␉{␊ |
408 | ␉␉length = ParseTagKey(buffer + pos, tag);␊ |
409 | ␉}␊ |
410 | ␊ |
411 | ␉/***** string ****/␊ |
412 | ␉else if (!strcmp(tagName, kXMLTagString))␊ |
413 | ␉{␊ |
414 | ␉␉length = ParseTagString(buffer + pos, tag);␊ |
415 | ␉}␊ |
416 | ␉else if (!strncmp(tagName, kXMLTagString " ", strlen(kXMLTagString " ")))␊ |
417 | ␉{␊ |
418 | ␉␉// TODO: save tag if if found␊ |
419 | ␉␉if(!strncmp(tagName + strlen(kXMLTagString " "), kXMLStringID, strlen(kXMLStringID)))␊ |
420 | ␉␉{␊ |
421 | ␉␉␉// ID=␊ |
422 | ␉␉␉int id = 0;␊ |
423 | ␉␉␉int cnt = strlen(kXMLTagString " " kXMLStringID "\"") + 1;␊ |
424 | ␉␉␉while ((tagName[cnt] != '\0') && (tagName[cnt] != '"')) cnt++;␊ |
425 | ␉␉␉tagName[cnt] = 0;␊ |
426 | ␉␉␉char* val = tagName + strlen(kXMLTagString " " kXMLStringID "\"");␊ |
427 | ␉␉␉while(*val)␊ |
428 | ␉␉␉{␊ |
429 | ␉␉␉␉if ((*val >= '0' && *val <= '9'))␉// 0 - 9␊ |
430 | ␉␉␉␉{␊ |
431 | ␉␉␉␉␉id = (id * 10) + (*val++ - '0');␊ |
432 | ␉␉␉␉}␊ |
433 | ␉␉␉␉else␊ |
434 | ␉␉␉␉{␊ |
435 | ␉␉␉␉␉printf("ParseStringID error (0x%x)\n", *val);␊ |
436 | ␉␉␉␉␉getchar();␊ |
437 | ␉␉␉␉␉return -1;␊ |
438 | ␉␉␉␉}␊ |
439 | ␉␉␉}␊ |
440 | ␉␉␉length = ParseTagString(buffer + pos, tag);␊ |
441 | ␊ |
442 | ␉␉␉SaveRefString(buffer + pos, id);␊ |
443 | ␉␉}␊ |
444 | ␉␉else if(!strncmp(tagName + strlen(kXMLTagString " "), kXMLStringIDRef, strlen(kXMLStringIDRef)))␊ |
445 | ␉␉{␊ |
446 | ␉␉␉// IDREF=␊ |
447 | ␉␉␉int id = 0;␊ |
448 | ␉␉␉int cnt = strlen(kXMLTagString " " kXMLStringIDRef "\"") + 1;␊ |
449 | ␉␉␉while ((tagName[cnt] != '\0') && (tagName[cnt] != '"')) cnt++;␊ |
450 | ␉␉␉tagName[cnt] = 0;␊ |
451 | ␉␉␉char* val = tagName + strlen(kXMLTagString " " kXMLStringIDRef "\"");␊ |
452 | ␉␉␉while(*val)␊ |
453 | ␉␉␉{␊ |
454 | ␉␉␉␉if ((*val >= '0' && *val <= '9'))␉// 0 - 9␊ |
455 | ␉␉␉␉{␊ |
456 | ␉␉␉␉␉id = (id * 10) + (*val++ - '0');␊ |
457 | ␉␉␉␉}␊ |
458 | ␉␉␉␉else␊ |
459 | ␉␉␉␉{␊ |
460 | ␉␉␉␉␉printf("ParseStringIDREF error (0x%x)\n", *val);␊ |
461 | ␉␉␉␉␉getchar();␊ |
462 | ␉␉␉␉␉return -1;␊ |
463 | ␉␉␉␉}␊ |
464 | ␉␉␉}␊ |
465 | ␉␉␉char* str = GetRefString(id);␊ |
466 | ␊ |
467 | ␉␉␉TagPtr tmpTag = NewTag();␊ |
468 | ␉␉␉tmpTag->type = kTagTypeString;␊ |
469 | ␉␉␉tmpTag->string = str;␊ |
470 | ␉␉␉tmpTag->tag = 0;␊ |
471 | ␉␉␉tmpTag->tagNext = 0;␊ |
472 | ␉␉␉tmpTag->offset = buffer_start ? buffer - buffer_start + pos : 0;␊ |
473 | ␉␉␉*tag = tmpTag;␊ |
474 | ␊ |
475 | ␉␉␉length = 0;␊ |
476 | ␉␉␉//printf("Located IDREF, id = %d, string = %s\n", id, str);␊ |
477 | ␉␉}␊ |
478 | ␉}␊ |
479 | ␊ |
480 | ␉/***** integer ****/␊ |
481 | ␉else if (!strcmp(tagName, kXMLTagInteger))␊ |
482 | ␉{␊ |
483 | ␉␉length = ParseTagInteger(buffer + pos, tag);␊ |
484 | ␉}␊ |
485 | ␉else if (!strncmp(tagName, kXMLTagInteger " ", strlen(kXMLTagInteger " ")))␊ |
486 | ␉{␊ |
487 | ␉␉if(!strncmp(tagName + strlen(kXMLTagInteger " "), kXMLStringID, strlen(kXMLStringID)))␊ |
488 | ␉␉{␊ |
489 | ␉␉␉// ID=␊ |
490 | ␉␉␉int id = 0;␊ |
491 | ␉␉␉int cnt = strlen(kXMLTagInteger " " kXMLStringID "\"") + 1;␊ |
492 | ␉␉␉while ((tagName[cnt] != '\0') && (tagName[cnt] != '"')) cnt++;␊ |
493 | ␉␉␉tagName[cnt] = 0;␊ |
494 | ␉␉␉char* val = tagName + strlen(kXMLTagInteger " " kXMLStringID "\"");␊ |
495 | ␉␉␉while(*val)␊ |
496 | ␉␉␉{␊ |
497 | ␉␉␉␉if ((*val >= '0' && *val <= '9'))␉// 0 - 9␊ |
498 | ␉␉␉␉{␊ |
499 | ␉␉␉␉␉id = (id * 10) + (*val++ - '0');␊ |
500 | ␉␉␉␉}␊ |
501 | ␉␉␉␉else␊ |
502 | ␉␉␉␉{␊ |
503 | ␉␉␉␉␉printf("ParseIntegerID error (0x%x)\n", *val);␊ |
504 | ␉␉␉␉␉getchar();␊ |
505 | ␉␉␉␉␉return -1;␊ |
506 | ␉␉␉␉}␊ |
507 | ␉␉␉}␊ |
508 | ␉␉␉length = ParseTagInteger(buffer + pos, tag);␊ |
509 | ␊ |
510 | ␉␉␉SaveRefString((*tag)->string, id);␊ |
511 | ␉␉}␊ |
512 | ␉␉else if(!strncmp(tagName + strlen(kXMLTagInteger " "), kXMLStringIDRef, strlen(kXMLStringIDRef)))␊ |
513 | ␉␉{␊ |
514 | ␉␉␉// IDREF=␊ |
515 | ␉␉␉int id = 0;␊ |
516 | ␉␉␉int cnt = strlen(kXMLTagInteger " " kXMLStringIDRef "\"") + 1;␊ |
517 | ␉␉␉while ((tagName[cnt] != '\0') && (tagName[cnt] != '"')) cnt++;␊ |
518 | ␉␉␉tagName[cnt] = 0;␊ |
519 | ␉␉␉char* val = tagName + strlen(kXMLTagInteger " " kXMLStringIDRef "\"");␊ |
520 | ␉␉␉while(*val)␊ |
521 | ␉␉␉{␊ |
522 | ␉␉␉␉if ((*val >= '0' && *val <= '9'))␉// 0 - 9␊ |
523 | ␉␉␉␉{␊ |
524 | ␉␉␉␉␉id = (id * 10) + (*val++ - '0');␊ |
525 | ␉␉␉␉}␊ |
526 | ␉␉␉␉else␊ |
527 | ␉␉␉␉{␊ |
528 | ␉␉␉␉␉printf("ParseStringIDREF error (0x%x)\n", *val);␊ |
529 | ␉␉␉␉␉getchar();␊ |
530 | ␉␉␉␉␉return -1;␊ |
531 | ␉␉␉␉}␊ |
532 | ␉␉␉}␊ |
533 | ␉␉␉int integer = (int)GetRefString(id);␊ |
534 | ␊ |
535 | ␉␉␉TagPtr tmpTag = NewTag();␊ |
536 | ␉␉␉tmpTag->type = kTagTypeInteger;␊ |
537 | ␉␉␉tmpTag->string = (char*) integer;␊ |
538 | ␉␉␉tmpTag->tag = 0;␊ |
539 | ␉␉␉tmpTag->tagNext = 0;␊ |
540 | ␉␉␉tmpTag->offset = buffer_start ? buffer - buffer_start + pos : 0;␊ |
541 | ␊ |
542 | ␉␉␉*tag = tmpTag;␊ |
543 | ␊ |
544 | ␉␉␉length = 0;␊ |
545 | ␉␉␉//printf("Located IDREF, id = %d, string = %s\n", id, str);␊ |
546 | ␉␉}␊ |
547 | ␉␉else␊ |
548 | ␉␉{␊ |
549 | ␉␉␉length = ParseTagInteger(buffer + pos, tag);␊ |
550 | ␉␉}␊ |
551 | ␉}␊ |
552 | ␊ |
553 | ␊ |
554 | ␉/***** false ****/␊ |
555 | ␉else if (!strcmp(tagName, kXMLTagFalse))␊ |
556 | ␉{␊ |
557 | ␉␉length = ParseTagBoolean(buffer + pos, tag, kTagTypeFalse);␊ |
558 | ␉}␊ |
559 | ␊ |
560 | ␉/***** true ****/␊ |
561 | ␉else if (!strcmp(tagName, kXMLTagTrue))␊ |
562 | ␉{␊ |
563 | ␉␉length = ParseTagBoolean(buffer + pos, tag, kTagTypeTrue);␊ |
564 | ␉}␊ |
565 | ␊ |
566 | ␉/***** plist ****/␊ |
567 | ␊ |
568 | ␊ |
569 | ␉/***** dict ****/␊ |
570 | ␊ |
571 | ␊ |
572 | ␉/***** data ****/␊ |
573 | ␉else if (!strcmp(tagName, kXMLTagData))␊ |
574 | ␉{␊ |
575 | ␉␉length = ParseTagData(buffer + pos, tag);␊ |
576 | ␉}␊ |
577 | ␉else if (!strncmp(tagName, kXMLTagData " ", strlen(kXMLTagData " ")))␊ |
578 | ␉{␊ |
579 | ␉␉length = ParseTagData(buffer + pos, tag);␊ |
580 | ␉}␊ |
581 | ␉else if (!strcmp(tagName, kXMLTagDate))␊ |
582 | ␉{␊ |
583 | ␉␉length = ParseTagDate(buffer + pos, tag);␊ |
584 | ␉}␊ |
585 | ␊ |
586 | ␉/***** date ****/␊ |
587 | ␉else if (!strncmp(tagName, kXMLTagDate " ", strlen(kXMLTagDate " ")))␊ |
588 | ␉{␊ |
589 | ␉␉length = ParseTagDate(buffer + pos, tag);␊ |
590 | ␉}␉/***** array ****/␊ |
591 | ␉else if (!strcmp(tagName, kXMLTagArray))␊ |
592 | ␉{␊ |
593 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeArray, 0);␊ |
594 | ␉}␊ |
595 | ␉else if (!strncmp(tagName, kXMLTagArray " ", strlen(kXMLTagArray " ")))␊ |
596 | ␉{␊ |
597 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeArray, 0);␊ |
598 | ␉}␊ |
599 | ␉else if (!strcmp(tagName, kXMLTagArray "/"))␊ |
600 | ␉{␊ |
601 | ␉␉length = ParseTagList(buffer + pos, tag, kTagTypeArray, 1);␊ |
602 | ␉}␊ |
603 | ␊ |
604 | ␉/***** unknown ****/␊ |
605 | ␉else␊ |
606 | ␉{␊ |
607 | ␉␉// it wasn't parsed so we consumed no additional characters␊ |
608 | ␉␉*tag = 0;␊ |
609 | ␉␉length = 0;␊ |
610 | ␉}␊ |
611 | ␊ |
612 | ␉if (length == -1)␊ |
613 | ␉{␊ |
614 | ␉␉return -1;␊ |
615 | ␉}␊ |
616 | ␊ |
617 | ␉return pos + length;␊ |
618 | }␊ |
619 | ␊ |
620 | //==========================================================================␊ |
621 | // ParseTagList␊ |
622 | ␊ |
623 | static long ParseTagList( char *buffer, TagPtr *tag, long type, long empty )␊ |
624 | {␊ |
625 | ␉long␉␉pos = 0;␊ |
626 | ␉long␉␉length = 0;␊ |
627 | ␉TagPtr␉␉tagList = 0;␊ |
628 | ␉TagPtr␉␉tmpTag;␊ |
629 | ␊ |
630 | ␊ |
631 | ␉if (!empty)␊ |
632 | ␉{␊ |
633 | ␉␉while (1)␊ |
634 | ␉␉{␊ |
635 | ␉␉␉length = XMLParseNextTag(buffer + pos, &tmpTag);␊ |
636 | ␉␉␉if (length == -1)␊ |
637 | ␉␉␉{␊ |
638 | ␉␉␉␉break;␊ |
639 | ␉␉␉}␊ |
640 | ␊ |
641 | ␉␉␉pos += length;␊ |
642 | ␊ |
643 | ␉␉␉// detect end of list␊ |
644 | ␉␉␉if (tmpTag == 0)␊ |
645 | ␉␉␉{␊ |
646 | ␉␉␉␉break;␊ |
647 | ␉␉␉}␊ |
648 | ␉␉␉tmpTag->tagNext = tagList;␊ |
649 | ␉␉␉tagList = tmpTag;␊ |
650 | ␉␉}␊ |
651 | ␊ |
652 | ␉␉if (length == -1)␊ |
653 | ␉␉{␊ |
654 | ␉␉␉XMLFreeTag(tagList);␊ |
655 | ␉␉␉return -1;␊ |
656 | ␉␉}␊ |
657 | ␉}␊ |
658 | ␊ |
659 | ␉tmpTag = NewTag();␊ |
660 | ␉if (tmpTag == 0)␊ |
661 | ␉{␊ |
662 | ␉␉XMLFreeTag(tagList);␊ |
663 | ␉␉return -1;␊ |
664 | ␉}␊ |
665 | ␊ |
666 | ␉tmpTag->type = type;␊ |
667 | ␉tmpTag->string = 0;␊ |
668 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start : 0;␊ |
669 | ␉tmpTag->tag = tagList;␊ |
670 | ␉tmpTag->tagNext = 0;␊ |
671 | ␊ |
672 | ␉*tag = tmpTag;␊ |
673 | ␊ |
674 | ␉return pos;␊ |
675 | }␊ |
676 | ␊ |
677 | //==========================================================================␊ |
678 | // ParseTagKey␊ |
679 | ␊ |
680 | static long ParseTagKey( char *buffer, TagPtr *tag )␊ |
681 | {␊ |
682 | ␉long␉␉length = 0;␊ |
683 | ␉long␉␉length2 = 0;␊ |
684 | ␉char␉␉*string;␊ |
685 | ␉TagPtr␉␉tmpTag;␊ |
686 | ␉TagPtr␉␉subTag;␊ |
687 | ␊ |
688 | ␉length = FixDataMatchingTag(buffer, kXMLTagKey);␊ |
689 | ␉if (length == -1)␊ |
690 | ␉{␊ |
691 | ␉␉return -1;␊ |
692 | ␉}␊ |
693 | ␊ |
694 | ␉length2 = XMLParseNextTag(buffer + length, &subTag);␊ |
695 | ␉if (length2 == -1)␊ |
696 | ␉{␊ |
697 | ␉␉return -1;␊ |
698 | ␉}␊ |
699 | ␊ |
700 | ␉tmpTag = NewTag();␊ |
701 | ␉if (tmpTag == 0)␊ |
702 | ␉{␊ |
703 | ␉␉XMLFreeTag(subTag);␊ |
704 | ␉␉return -1;␊ |
705 | ␉}␊ |
706 | ␊ |
707 | ␉string = NewSymbol(buffer);␊ |
708 | ␉if (string == 0)␊ |
709 | ␉{␊ |
710 | ␉␉XMLFreeTag(subTag);␊ |
711 | ␉␉XMLFreeTag(tmpTag);␊ |
712 | ␉␉return -1;␊ |
713 | ␉}␊ |
714 | ␊ |
715 | ␉tmpTag->type = kTagTypeKey;␊ |
716 | ␉tmpTag->string = string;␊ |
717 | ␉tmpTag->tag = subTag;␊ |
718 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start: 0;␊ |
719 | ␉tmpTag->tagNext = 0;␊ |
720 | ␊ |
721 | ␉*tag = tmpTag;␊ |
722 | ␊ |
723 | ␉return length + length2;␊ |
724 | }␊ |
725 | ␊ |
726 | //==========================================================================␊ |
727 | // ParseTagString␊ |
728 | ␊ |
729 | static long ParseTagString( char *buffer, TagPtr *tag )␊ |
730 | {␊ |
731 | ␉long␉␉length = 0;␊ |
732 | ␉char␉␉*string;␊ |
733 | ␊ |
734 | ␉length = FixDataMatchingTag(buffer, kXMLTagString);␊ |
735 | ␉if (length == -1)␊ |
736 | ␉{␊ |
737 | ␉␉return -1;␊ |
738 | ␉}␊ |
739 | ␊ |
740 | ␉TagPtr tmpTag = NewTag();␊ |
741 | ␉if (tmpTag == 0)␊ |
742 | ␉{␊ |
743 | ␉␉return -1;␊ |
744 | ␉}␊ |
745 | ␊ |
746 | ␉string = NewSymbol(buffer);␊ |
747 | ␉if (string == 0)␊ |
748 | ␉{␊ |
749 | ␉␉XMLFreeTag(tmpTag);␊ |
750 | ␉␉return -1;␊ |
751 | ␉}␊ |
752 | ␊ |
753 | ␉tmpTag->type = kTagTypeString;␊ |
754 | ␉tmpTag->string = string;␊ |
755 | ␉tmpTag->tag = 0;␊ |
756 | ␉tmpTag->tagNext = 0;␊ |
757 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start: 0;␊ |
758 | ␊ |
759 | ␉*tag = tmpTag;␊ |
760 | ␉return length;␊ |
761 | }␊ |
762 | ␊ |
763 | //==========================================================================␊ |
764 | // ParseTagInteger␊ |
765 | ␊ |
766 | static long ParseTagInteger( char *buffer, TagPtr *tag )␊ |
767 | {␊ |
768 | ␉long length, integer;␊ |
769 | ␉bool negative = false;␊ |
770 | ␉TagPtr tmpTag;␊ |
771 | ␉char* val = buffer;␊ |
772 | ␉int size;␊ |
773 | ␊ |
774 | ␉if(buffer[0] == '<')␊ |
775 | ␉{␊ |
776 | ␉␉printf("Warning integer is non existant\n");␊ |
777 | ␉␉getchar();␊ |
778 | ␉␉tmpTag = NewTag();␊ |
779 | ␉␉tmpTag->type = kTagTypeInteger;␊ |
780 | ␉␉tmpTag->string = 0;␊ |
781 | ␉␉tmpTag->tag = 0;␊ |
782 | ␉␉tmpTag->offset = 0;␊ |
783 | ␉␉tmpTag->tagNext = 0;␊ |
784 | ␉␉␊ |
785 | ␉␉*tag = tmpTag;␊ |
786 | ␉␉␊ |
787 | ␉␉return 0;␊ |
788 | ␉}␊ |
789 | ␊ |
790 | ␉size = length = FixDataMatchingTag(buffer, kXMLTagInteger);␊ |
791 | ␉if (length == -1)␊ |
792 | ␉{␊ |
793 | ␉␉return -1;␊ |
794 | ␉}␊ |
795 | ␊ |
796 | ␉tmpTag = NewTag();␊ |
797 | ␊ |
798 | ␉if (tmpTag == 0)␊ |
799 | ␉{␊ |
800 | ␉␉return -1;␊ |
801 | ␉}␊ |
802 | ␉integer = 0;␊ |
803 | ␊ |
804 | ␉if(size > 1 && (val[1] == 'x' || val[1] == 'X'))␉// Hex value␊ |
805 | ␉{␊ |
806 | ␉␉val += 2;␊ |
807 | ␉␉while(*val)␊ |
808 | ␉␉{␉␉␉␊ |
809 | ␉␉␉if ((*val >= '0' && *val <= '9'))␉// 0 - 9␊ |
810 | ␉␉␉{␊ |
811 | ␉␉␉␉integer = (integer * 16) + (*val++ - '0');␊ |
812 | ␉␉␉}␊ |
813 | ␉␉␉else if ((*val >= 'a' && *val <= 'f'))␉// a - f␊ |
814 | ␉␉␉{␊ |
815 | ␉␉␉␉integer = (integer * 16) + (*val++ - 'a' + 10);␊ |
816 | ␉␉␉}␊ |
817 | ␉␉␉else if ((*val >= 'A' && *val <= 'F'))␉// A - F␊ |
818 | ␉␉␉{␊ |
819 | ␉␉␉␉integer = (integer * 16) + (*val++ - 'A' + 10);␊ |
820 | ␉␉␉}␊ |
821 | ␉␉␉else␊ |
822 | ␉␉␉{␊ |
823 | ␉␉␉␉printf("ParseTagInteger hex error (0x%x) in buffer %s\n", *val, buffer);␊ |
824 | ␉␉␉␉getchar();␊ |
825 | ␉␉␉␉XMLFreeTag(tmpTag);␊ |
826 | ␉␉␉␉return -1;␊ |
827 | ␉␉␉}␊ |
828 | ␉␉}␊ |
829 | ␉}␊ |
830 | ␉else if ( size )␉// Decimal value␊ |
831 | ␉{␊ |
832 | ␉␉if (*val == '-')␊ |
833 | ␉␉{␊ |
834 | ␉␉␉negative = true;␊ |
835 | ␉␉␉val++;␊ |
836 | ␉␉␉size--;␊ |
837 | ␉␉}␊ |
838 | ␉␉␊ |
839 | ␉␉for (integer = 0; size > 0; size--)␊ |
840 | ␉␉{␊ |
841 | ␉␉␉if(*val) // UGLY HACK, fix me.␊ |
842 | ␉␉␉{␊ |
843 | ␉␉␉␉if (*val < '0' || *val > '9')␊ |
844 | ␉␉␉␉{␊ |
845 | ␉␉␉␉␉printf("ParseTagInteger decimal error (0x%x) in buffer %s\n", *val, buffer);␊ |
846 | ␉␉␉␉␉getchar();␊ |
847 | ␉␉␉␉␉return -1;␊ |
848 | ␉␉␉␉}␊ |
849 | ␊ |
850 | ␉␉␉␉integer = (integer * 10) + (*val++ - '0');␊ |
851 | ␉␉␉}␊ |
852 | ␉␉}␊ |
853 | ␉␉␊ |
854 | ␉␉if (negative) {␊ |
855 | ␉␉␉integer = -integer;␊ |
856 | ␉␉}␊ |
857 | ␉}␊ |
858 | ␊ |
859 | ␉tmpTag->type = kTagTypeInteger;␊ |
860 | ␉tmpTag->string = (char *)integer;␊ |
861 | ␉tmpTag->tag = 0;␊ |
862 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start: 0;␊ |
863 | ␉tmpTag->tagNext = 0;␊ |
864 | ␊ |
865 | ␉*tag = tmpTag;␊ |
866 | ␊ |
867 | ␉return length;␊ |
868 | }␊ |
869 | ␊ |
870 | //==========================================================================␊ |
871 | // ParseTagData␊ |
872 | ␊ |
873 | static long ParseTagData( char *buffer, TagPtr *tag )␊ |
874 | {␊ |
875 | ␉int␉␉actuallen = 0;␊ |
876 | ␉long␉␉length = 0;␊ |
877 | ␉TagPtr␉␉tmpTag;␊ |
878 | ␉char␉␉*string;␊ |
879 | ␊ |
880 | ␉length = FixDataMatchingTag(buffer, kXMLTagData);␊ |
881 | ␉if (length == -1)␊ |
882 | ␉{␊ |
883 | ␉␉return -1;␊ |
884 | ␉}␊ |
885 | ␊ |
886 | ␉tmpTag = NewTag();␊ |
887 | ␉if (tmpTag == 0)␊ |
888 | ␉{␊ |
889 | ␉␉return -1;␊ |
890 | ␉}␊ |
891 | ␊ |
892 | ␉//printf("ParseTagData unimplimented\n");␊ |
893 | ␉//printf("Data: %s\n", buffer);␊ |
894 | ␉//␉getchar();␊ |
895 | ␊ |
896 | ␉string = BASE64Decode(buffer, strlen(buffer), &actuallen);␊ |
897 | ␉tmpTag->type = kTagTypeData;␊ |
898 | ␉tmpTag->string = string;␊ |
899 | ␊ |
900 | ␉tmpTag->tag = 0;␊ |
901 | ␉tmpTag->offset = actuallen; // buffer_start ? buffer - buffer_start: 0;␊ |
902 | ␊ |
903 | ␉tmpTag->tagNext = 0;␊ |
904 | ␊ |
905 | ␉*tag = tmpTag;␊ |
906 | ␊ |
907 | ␉return length;␊ |
908 | }␊ |
909 | ␊ |
910 | //==========================================================================␊ |
911 | // ParseTagDate␊ |
912 | ␊ |
913 | static long ParseTagDate( char *buffer, TagPtr *tag )␊ |
914 | {␊ |
915 | ␉long␉␉length = 0;␊ |
916 | ␉TagPtr␉␉tmpTag;␊ |
917 | ␊ |
918 | ␉length = FixDataMatchingTag(buffer, kXMLTagDate);␊ |
919 | ␉if (length == -1)␊ |
920 | ␉{␊ |
921 | ␉␉return -1;␊ |
922 | ␉}␊ |
923 | ␊ |
924 | ␉tmpTag = NewTag();␊ |
925 | ␉if (tmpTag == 0)␊ |
926 | ␉{␊ |
927 | ␉␉return -1;␊ |
928 | ␉}␊ |
929 | ␊ |
930 | ␉printf("ParseTagDate unimplimented\n");␊ |
931 | ␉getchar();␊ |
932 | ␊ |
933 | ␉tmpTag->type = kTagTypeDate;␊ |
934 | ␉tmpTag->string = 0;␊ |
935 | ␉tmpTag->tag = 0;␊ |
936 | ␉tmpTag->tagNext = 0;␊ |
937 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start: 0;␊ |
938 | ␊ |
939 | ␉*tag = tmpTag;␊ |
940 | ␊ |
941 | ␉return length;␊ |
942 | }␊ |
943 | ␊ |
944 | //==========================================================================␊ |
945 | // ParseTagBoolean␊ |
946 | ␊ |
947 | long ParseTagBoolean( char *buffer, TagPtr *tag, long type )␊ |
948 | {␊ |
949 | ␉TagPtr tmpTag;␊ |
950 | ␊ |
951 | ␉tmpTag = NewTag();␊ |
952 | ␉if (tmpTag == 0)␊ |
953 | ␉{␊ |
954 | ␉␉return -1;␊ |
955 | ␉}␊ |
956 | ␊ |
957 | ␉tmpTag->type = type;␊ |
958 | ␉tmpTag->string = 0;␊ |
959 | ␉tmpTag->tag = 0;␊ |
960 | ␉tmpTag->tagNext = 0;␊ |
961 | ␉tmpTag->offset = buffer_start ? buffer - buffer_start: 0;␊ |
962 | ␊ |
963 | ␉*tag = tmpTag;␊ |
964 | ␊ |
965 | ␉return 0;␊ |
966 | }␊ |
967 | ␊ |
968 | //==========================================================================␊ |
969 | // GetNextTag␊ |
970 | ␊ |
971 | static long GetNextTag( char *buffer, char **tag, long *start )␊ |
972 | {␊ |
973 | ␉long␉cnt;␊ |
974 | ␉long␉cnt2;␊ |
975 | ␊ |
976 | ␉if (tag == 0)␊ |
977 | ␉{␊ |
978 | ␉␉return -1;␊ |
979 | ␉}␊ |
980 | ␊ |
981 | ␉// Find the start of the tag.␊ |
982 | ␉cnt = 0;␊ |
983 | ␉while ((buffer[cnt] != '\0') && (buffer[cnt] != '<'))␊ |
984 | ␉{␊ |
985 | ␉␉cnt++;␊ |
986 | ␉}␊ |
987 | ␊ |
988 | ␉if (buffer[cnt] == '\0')␊ |
989 | ␉{␊ |
990 | ␉␉return -1;␊ |
991 | ␉}␊ |
992 | ␉// Find the end of the tag.␊ |
993 | ␉cnt2 = cnt + 1;␊ |
994 | ␉while ((buffer[cnt2] != '\0') && (buffer[cnt2] != '>'))␊ |
995 | ␉{␊ |
996 | ␉␉cnt2++;␊ |
997 | ␉}␊ |
998 | ␊ |
999 | ␉if (buffer[cnt2] == '\0')␊ |
1000 | ␉{␊ |
1001 | ␉␉return -1;␊ |
1002 | ␉}␊ |
1003 | ␊ |
1004 | ␉// Fix the tag data.␊ |
1005 | ␉*tag = buffer + cnt + 1;␊ |
1006 | ␉buffer[cnt2] = '\0';␊ |
1007 | ␉if (start)␊ |
1008 | ␉{␊ |
1009 | ␉␉*start = cnt;␊ |
1010 | ␉}␊ |
1011 | ␊ |
1012 | ␉return cnt2 + 1;␊ |
1013 | }␊ |
1014 | ␊ |
1015 | //==========================================================================␊ |
1016 | // FixDataMatchingTag␊ |
1017 | // Modifies 'buffer' to add a '\0' at the end of the tag matching 'tag'.␊ |
1018 | // Returns the length of the data found, counting the end tag,␊ |
1019 | // or -1 if the end tag was not found.␊ |
1020 | ␊ |
1021 | static long FixDataMatchingTag( char *buffer, char *tag )␊ |
1022 | {␊ |
1023 | ␉long␉length;␊ |
1024 | ␉long␉start;␊ |
1025 | ␉long␉stop;␊ |
1026 | ␉char␉*endTag;␊ |
1027 | ␊ |
1028 | ␉start = 0;␊ |
1029 | ␉while (1)␊ |
1030 | ␉{␊ |
1031 | ␉␉length = GetNextTag(buffer + start, &endTag, &stop);␊ |
1032 | ␉␉if (length == -1)␊ |
1033 | ␉␉{␊ |
1034 | ␉␉␉return -1;␊ |
1035 | ␉␉}␊ |
1036 | ␊ |
1037 | ␉␉if ((*endTag == '/') && !strcmp(endTag + 1, tag))␊ |
1038 | ␉␉{␊ |
1039 | ␉␉␉break;␊ |
1040 | ␉␉}␊ |
1041 | ␊ |
1042 | ␉␉start += length;␊ |
1043 | ␉}␊ |
1044 | ␊ |
1045 | ␉buffer[start + stop] = '\0';␊ |
1046 | ␊ |
1047 | ␉return start + length;␊ |
1048 | }␊ |
1049 | ␊ |
1050 | //==========================================================================␊ |
1051 | // NewTag␊ |
1052 | ␊ |
1053 | #define kTagsPerBlock (0x1000)␊ |
1054 | ␊ |
1055 | static TagPtr gTagsFree;␊ |
1056 | ␊ |
1057 | static TagPtr NewTag( void )␊ |
1058 | {␊ |
1059 | ␉long␉␉cnt;␊ |
1060 | ␉TagPtr␉␉tag;␊ |
1061 | ␊ |
1062 | ␉if (gTagsFree == 0)␊ |
1063 | ␉{␊ |
1064 | ␉␉tag = (TagPtr)malloc(kTagsPerBlock *sizeof(Tag));␊ |
1065 | ␉␉if (tag == 0)␊ |
1066 | ␉␉{␊ |
1067 | ␉␉␉return 0;␊ |
1068 | ␉␉}␊ |
1069 | ␊ |
1070 | ␉␉// Initalize the new tags.␊ |
1071 | ␉␉for (cnt = 0; cnt < kTagsPerBlock; cnt++)␊ |
1072 | ␉␉{␊ |
1073 | ␉␉␉tag[cnt].type = kTagTypeNone;␊ |
1074 | ␉␉␉tag[cnt].string = 0;␊ |
1075 | ␉␉␉tag[cnt].tag = 0;␊ |
1076 | ␉␉␉tag[cnt].tagNext = tag + cnt + 1;␊ |
1077 | ␉␉}␊ |
1078 | ␉␉tag[kTagsPerBlock - 1].tagNext = 0;␊ |
1079 | ␊ |
1080 | ␉␉gTagsFree = tag;␊ |
1081 | ␉}␊ |
1082 | ␊ |
1083 | ␉tag = gTagsFree;␊ |
1084 | ␉gTagsFree = tag->tagNext;␊ |
1085 | ␊ |
1086 | ␉return tag;␊ |
1087 | }␊ |
1088 | ␊ |
1089 | //==========================================================================␊ |
1090 | // XMLFreeTag␊ |
1091 | ␊ |
1092 | void XMLFreeTag( TagPtr tag )␊ |
1093 | {␊ |
1094 | #if DOFREE␊ |
1095 | ␉if (tag == 0)␊ |
1096 | ␉{␊ |
1097 | ␉␉return;␊ |
1098 | ␉}␊ |
1099 | ␊ |
1100 | ␉if (!XMLIsInteger(tag) && tag->string)␊ |
1101 | ␉{␊ |
1102 | ␉␉FreeSymbol(tag->string);␊ |
1103 | ␉}␊ |
1104 | ␊ |
1105 | ␉XMLFreeTag(tag->tag);␊ |
1106 | ␉XMLFreeTag(tag->tagNext);␊ |
1107 | ␊ |
1108 | ␉// Clear and free the tag.␊ |
1109 | ␉tag->type = kTagTypeNone;␊ |
1110 | ␉tag->string = 0;␊ |
1111 | ␉tag->tag = 0;␊ |
1112 | ␉tag->offset = 0;␊ |
1113 | ␉tag->tagNext = gTagsFree;␊ |
1114 | ␉gTagsFree = tag;␊ |
1115 | #else␊ |
1116 | ␉return;␊ |
1117 | #endif␊ |
1118 | }␊ |
1119 | ␊ |
1120 | //==========================================================================␊ |
1121 | // Symbol object.␊ |
1122 | ␊ |
1123 | struct Symbol␊ |
1124 | {␊ |
1125 | ␉long refCount;␊ |
1126 | ␉struct Symbol *next;␊ |
1127 | ␉char string[];␊ |
1128 | };␊ |
1129 | typedef struct Symbol Symbol, *SymbolPtr;␊ |
1130 | ␊ |
1131 | static SymbolPtr FindSymbol(char *string, SymbolPtr *prevSymbol);␊ |
1132 | ␊ |
1133 | static SymbolPtr gSymbolsHead;␊ |
1134 | ␊ |
1135 | //==========================================================================␊ |
1136 | // NewSymbol␊ |
1137 | ␊ |
1138 | static char *NewSymbol( char *string )␊ |
1139 | {␊ |
1140 | ␉static SymbolPtr lastGuy = 0;␊ |
1141 | ␊ |
1142 | ␉SymbolPtr␉symbol;␊ |
1143 | ␊ |
1144 | ␉// Look for string in the list of symbols.␊ |
1145 | ␉symbol = FindSymbol(string, 0);␊ |
1146 | ␊ |
1147 | ␉// Add the new symbol.␊ |
1148 | ␉if (symbol == 0)␊ |
1149 | ␉{␊ |
1150 | ␉␉symbol = (SymbolPtr)malloc(sizeof(Symbol) + 1 + strlen(string));␊ |
1151 | ␉␉if (symbol == 0)␊ |
1152 | ␉␉{␉//return 0;␊ |
1153 | ␉␉␉stop("NULL symbol!");␊ |
1154 | ␉␉}␊ |
1155 | ␊ |
1156 | ␉␉// Set the symbol's data.␊ |
1157 | ␉␉symbol->refCount = 0;␊ |
1158 | ␉␉strcpy(symbol->string, string);␊ |
1159 | ␊ |
1160 | ␉␉// Add the symbol to the list.␊ |
1161 | ␉␉symbol->next = gSymbolsHead;␊ |
1162 | ␉␉gSymbolsHead = symbol;␊ |
1163 | ␉}␊ |
1164 | ␊ |
1165 | ␉// Update the refCount and return the string.␊ |
1166 | ␉symbol->refCount++;␊ |
1167 | ␊ |
1168 | ␉if (lastGuy && lastGuy->next != 0)␊ |
1169 | ␉{␊ |
1170 | ␉␉stop("last guy not last!");␊ |
1171 | ␉}␊ |
1172 | ␊ |
1173 | ␉return symbol->string;␊ |
1174 | }␊ |
1175 | ␊ |
1176 | //==========================================================================␊ |
1177 | // FreeSymbol␊ |
1178 | ␊ |
1179 | #if DOFREE␊ |
1180 | static void FreeSymbol( char *string )␊ |
1181 | {␊ |
1182 | ␉SymbolPtr symbol, prev;␊ |
1183 | ␉prev = 0;␊ |
1184 | ␊ |
1185 | ␉// Look for string in the list of symbols.␊ |
1186 | ␉symbol = FindSymbol(string, &prev);␊ |
1187 | ␉if (symbol == 0)␊ |
1188 | ␉{␊ |
1189 | ␉␉return;␊ |
1190 | ␉}␊ |
1191 | ␊ |
1192 | ␉// Update the refCount.␊ |
1193 | ␉symbol->refCount--;␊ |
1194 | ␊ |
1195 | ␉if (symbol->refCount != 0)␊ |
1196 | ␉{␊ |
1197 | ␉␉return;␊ |
1198 | ␉}␊ |
1199 | ␊ |
1200 | ␉// Remove the symbol from the list.␊ |
1201 | ␉if (prev != 0)␊ |
1202 | ␉{␊ |
1203 | ␉␉prev->next = symbol->next;␊ |
1204 | ␉}␊ |
1205 | ␉else␊ |
1206 | ␉{␊ |
1207 | ␉␉gSymbolsHead = symbol->next;␊ |
1208 | ␉}␊ |
1209 | ␊ |
1210 | ␉// Free the symbol's memory.␊ |
1211 | ␉free(symbol);␊ |
1212 | }␊ |
1213 | #endif␊ |
1214 | ␊ |
1215 | //==========================================================================␊ |
1216 | // FindSymbol␊ |
1217 | ␊ |
1218 | static SymbolPtr FindSymbol( char *string, SymbolPtr *prevSymbol )␊ |
1219 | {␊ |
1220 | ␉SymbolPtr symbol, prev;␊ |
1221 | ␊ |
1222 | ␉symbol = gSymbolsHead;␊ |
1223 | ␉prev = 0;␊ |
1224 | ␊ |
1225 | ␉while (symbol != NULL)␊ |
1226 | ␉{␊ |
1227 | ␉␉if (!strcmp(symbol->string, string))␊ |
1228 | ␉␉{␊ |
1229 | ␉␉␉break;␊ |
1230 | ␉␉}␊ |
1231 | ␊ |
1232 | ␉␉prev = symbol;␊ |
1233 | ␉␉symbol = symbol->next;␊ |
1234 | ␉}␊ |
1235 | ␊ |
1236 | ␉if ((symbol != 0) && (prevSymbol != 0))␊ |
1237 | ␉{␊ |
1238 | ␉␉*prevSymbol = prev;␊ |
1239 | ␉}␊ |
1240 | ␊ |
1241 | ␉return symbol;␊ |
1242 | }␊ |
1243 | ␊ |
1244 | bool XMLIsType(TagPtr dict, enum xmltype type)␊ |
1245 | {␊ |
1246 | ␉if(!dict)␊ |
1247 | ␉{␊ |
1248 | ␉␉return (type == kTagTypeNone);␊ |
1249 | ␉}␊ |
1250 | ␉return (dict->type == type);␊ |
1251 | }␊ |
1252 | ␊ |
1253 | /*** Cast functions ***/␊ |
1254 | bool XMLIsArray(TagPtr entry)␊ |
1255 | {␊ |
1256 | ␉return entry && (entry->type == kTagTypeArray);␊ |
1257 | }␊ |
1258 | ␊ |
1259 | TagPtr XMLCastArray(TagPtr dict)␊ |
1260 | {␊ |
1261 | ␉if(!dict)␊ |
1262 | ␉{␊ |
1263 | ␉␉return NULL;␊ |
1264 | ␉}␊ |
1265 | ␊ |
1266 | ␉if(dict->type == kTagTypeArray)␊ |
1267 | ␉{␊ |
1268 | ␉␉return dict;␊ |
1269 | ␉} else {␊ |
1270 | ␉␉return NULL;␊ |
1271 | ␉}␊ |
1272 | }␊ |
1273 | ␊ |
1274 | bool XMLIsDict(TagPtr entry)␊ |
1275 | {␊ |
1276 | return entry && (entry->type == kTagTypeDict);␊ |
1277 | }␊ |
1278 | ␊ |
1279 | bool XMLIsData(TagPtr entry)␊ |
1280 | {␊ |
1281 | ␉return entry && (entry->type == kTagTypeData);␊ |
1282 | }␊ |
1283 | ␊ |
1284 | TagPtr XMLCastDict(TagPtr dict)␊ |
1285 | {␊ |
1286 | ␉if(!dict)␊ |
1287 | ␉{␊ |
1288 | ␉␉return NULL;␊ |
1289 | ␉}␊ |
1290 | ␊ |
1291 | ␉if(dict->type == kTagTypeDict)␊ |
1292 | ␉{␊ |
1293 | ␉␉return dict;␊ |
1294 | ␉}␊ |
1295 | ␉else␊ |
1296 | ␉{␊ |
1297 | ␉␉return NULL;␊ |
1298 | ␉}␊ |
1299 | }␊ |
1300 | ␊ |
1301 | bool XMLIsString(TagPtr entry)␊ |
1302 | {␊ |
1303 | return entry && ((entry->type == kTagTypeString) || (entry->type == kTagTypeKey));␊ |
1304 | }␊ |
1305 | ␊ |
1306 | char *XMLCastString(TagPtr dict)␊ |
1307 | {␊ |
1308 | ␉if(!dict)␊ |
1309 | ␉{␊ |
1310 | ␉␉return NULL;␊ |
1311 | ␉}␊ |
1312 | ␊ |
1313 | ␉if((dict->type == kTagTypeString) || (dict->type == kTagTypeKey))␊ |
1314 | ␉{␊ |
1315 | ␉␉return dict->string;␊ |
1316 | ␉}␊ |
1317 | ␊ |
1318 | ␉return NULL;␊ |
1319 | }␊ |
1320 | ␊ |
1321 | char *XMLCastData(TagPtr dict, int* length)␊ |
1322 | {␊ |
1323 | ␉if(!dict)␊ |
1324 | ␉{␊ |
1325 | ␉␉return NULL;␊ |
1326 | ␉}␊ |
1327 | ␊ |
1328 | ␉if((dict->type == kTagTypeData) || (dict->type == kTagTypeKey))␊ |
1329 | ␉{␊ |
1330 | ␉␉*length = dict->offset;␊ |
1331 | ␉␉return dict->string;␊ |
1332 | ␉}␊ |
1333 | ␉*length = 0;␊ |
1334 | ␉return NULL;␊ |
1335 | }␊ |
1336 | ␊ |
1337 | ␊ |
1338 | long XMLCastStringOffset(TagPtr dict)␊ |
1339 | {␊ |
1340 | ␉if(dict && ((dict->type == kTagTypeString) || (dict->type == kTagTypeKey)))␊ |
1341 | ␉{␊ |
1342 | ␉␉return dict->offset;␊ |
1343 | ␉}␊ |
1344 | ␉else␊ |
1345 | ␉{␊ |
1346 | ␉␉return -1;␊ |
1347 | ␉}␊ |
1348 | }␊ |
1349 | ␊ |
1350 | bool XMLIsBoolean(TagPtr entry)␊ |
1351 | {␊ |
1352 | ␉return entry && ((entry->type == kTagTypeTrue) || (entry->type == kTagTypeFalse));␊ |
1353 | }␊ |
1354 | ␊ |
1355 | bool XMLCastBoolean(TagPtr dict)␊ |
1356 | {␊ |
1357 | ␉if(!dict)␊ |
1358 | ␉{␊ |
1359 | ␉␉return false;␊ |
1360 | ␉}␊ |
1361 | ␊ |
1362 | ␉if(dict->type == kTagTypeTrue)␊ |
1363 | ␉{␊ |
1364 | ␉␉return true;␊ |
1365 | ␉}␊ |
1366 | ␉return false;␊ |
1367 | }␊ |
1368 | ␊ |
1369 | bool XMLIsInteger(TagPtr entry)␊ |
1370 | {␊ |
1371 | return entry && (entry->type == kTagTypeInteger);␊ |
1372 | }␊ |
1373 | ␊ |
1374 | int XMLCastInteger(TagPtr dict)␊ |
1375 | {␊ |
1376 | ␉if(!dict)␊ |
1377 | ␉{␊ |
1378 | ␉␉//printf("XMLCastInteger: null dict\n");␊ |
1379 | ␉␉return 0;␊ |
1380 | ␉}␊ |
1381 | ␊ |
1382 | ␉if(dict->type == kTagTypeInteger)␊ |
1383 | ␉{␊ |
1384 | ␉␉return (int)(dict->string);␊ |
1385 | ␉}␊ |
1386 | ␉return 0;␊ |
1387 | }␊ |
1388 | ␊ |
1389 | bool XMLAddTagToDictionary(TagPtr dict, char *key, TagPtr value)␊ |
1390 | {␊ |
1391 | ␉if (!dict || dict->type != kTagTypeDict)␊ |
1392 | ␉{␊ |
1393 | ␉␉return false;␊ |
1394 | ␉}␊ |
1395 | ␊ |
1396 | ␉TagPtr tmpTag;␊ |
1397 | ␉char* string;␊ |
1398 | ␊ |
1399 | ␉tmpTag = NewTag();␊ |
1400 | ␉if (tmpTag == 0)␊ |
1401 | ␉{␊ |
1402 | ␉␉return false;␊ |
1403 | ␉}␊ |
1404 | ␊ |
1405 | ␉string = NewSymbol(key);␊ |
1406 | ␉if (string == 0)␊ |
1407 | ␉{␊ |
1408 | ␉␉XMLFreeTag(tmpTag);␊ |
1409 | ␉␉return false;␊ |
1410 | ␉}␊ |
1411 | ␊ |
1412 | ␉tmpTag->type = kTagTypeKey;␊ |
1413 | ␉tmpTag->string = string;␊ |
1414 | ␉tmpTag->tag = value;␊ |
1415 | ␉tmpTag->offset = 0;␊ |
1416 | ␉tmpTag->tagNext = 0;␊ |
1417 | ␊ |
1418 | ␉TagPtr tagList = dict->tag;␊ |
1419 | ␉if(!tagList)␊ |
1420 | ␉{␊ |
1421 | ␉␉// First tag␊ |
1422 | ␉␉dict->tag = tmpTag;␊ |
1423 | ␉␉return true;␊ |
1424 | ␉}␊ |
1425 | ␉while(tagList && tagList->tagNext) tagList = tagList->tagNext;␊ |
1426 | ␉if(tagList)␊ |
1427 | ␉{␊ |
1428 | ␉␉tagList->tagNext = tmpTag;␊ |
1429 | ␉␉return true;␊ |
1430 | ␉}␊ |
1431 | ␊ |
1432 | ␉XMLFreeTag(tmpTag);␊ |
1433 | ␉return false;␊ |
1434 | }␊ |
1435 | |