Chameleon

Chameleon Svn Source Tree

Root/branches/rewrite/i386/libsaio/stringTable.c

Source at commit 1065 created 12 years 9 months ago.
By meklort, Stripping out a bunch of code...
1/*␊
2 * Copyright (c) 1999-2003 Apple Computer, Inc. All rights reserved.␊
3 *␊
4 * @APPLE_LICENSE_HEADER_START@␊
5 * ␊
6 * Portions Copyright (c) 1999-2003 Apple Computer, Inc. All Rights␊
7 * Reserved. This file contains Original Code and/or Modifications of␊
8 * Original Code as defined in and that are subject to the Apple Public␊
9 * Source License Version 2.0 (the "License"). You may not use this file␊
10 * except in compliance with the License. Please obtain a copy of the␊
11 * License at http://www.apple.com/publicsource and read it before using␊
12 * this file.␊
13 * ␊
14 * The 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 * Copyright 1993 NeXT, Inc.␊
26 * All rights reserved.␊
27 */␊
28␊
29#include "bootstruct.h"␊
30#include "libsaio.h"␊
31#include "xml.h"␊
32␊
33extern char *Language;␊
34extern char *LoadableFamilies;␊
35␊
36bool sysConfigValid;␊
37␊
38/*␊
39 * Compare a string to a key with quoted characters␊
40 */␊
41static inline int␊
42keyncmp(const char *str, const char *key, int n)␊
43{␊
44 int c;␊
45 while (n--) {␊
46␉c = *key++;␊
47␉if (c == '\\') {␊
48␉ switch(c = *key++) {␊
49␉ case 'n':␊
50␉␉c = '\n';␊
51␉␉break;␊
52␉ case 'r':␊
53␉␉c = '\r';␊
54␉␉break;␊
55␉ case 't':␊
56␉␉c = '\t';␊
57␉␉break;␊
58␉ default:␊
59␉␉break;␊
60␉ }␊
61␉} else if (c == '\"') {␊
62␉ /* Premature end of key */␊
63␉ return 1;␊
64␉}␊
65␉if (c != *str++) {␊
66␉ return 1;␊
67␉}␊
68 }␊
69 return 0;␊
70}␊
71␊
72#if UNUSED␊
73␊
74static void eatThru(char val, const char **table_p)␊
75{␊
76␉register const char *table = *table_p;␊
77␉register bool found = false;␊
78␊
79␉while (*table && !found)␊
80␉{␊
81␉␉if (*table == '\\') table += 2;␊
82␉␉else␊
83␉␉{␊
84␉␉␉if (*table == val) found = true;␊
85␉␉␉table++;␊
86␉␉}␊
87␉}␊
88␉*table_p = table;␊
89}␊
90␊
91/* Remove key and its associated value from the table. */␊
92␊
93bool␊
94removeKeyFromTable(const char *key, char *table)␊
95{␊
96 register int len;␊
97 register char *tab;␊
98 char *buf;␊
99␊
100 len = strlen(key);␊
101 tab = (char *)table;␊
102 buf = (char *)malloc(len + 3);␊
103␊
104 sprintf(buf, "\"%s\"", key);␊
105 len = strlen(buf);␊
106␊
107 while(*tab) {␊
108 if(strncmp(buf, tab, len) == 0) {␊
109 char c;␊
110␊
111 while((c = *(tab + len)) != ';') {␊
112 if(c == 0) {␊
113 len = -1;␊
114 goto out;␊
115 }␊
116 len++;␊
117 }␊
118 len++;␊
119 if(*(tab + len) == '\n') len++;␊
120 goto out;␊
121 }␊
122 tab++;␊
123 }␊
124 len = -1;␊
125out:␊
126 free(buf);␊
127␊
128 if(len == -1) return false;␊
129␊
130 while((*tab = *(tab + len))) {␊
131 tab++;␊
132 }␊
133␊
134 return true;␊
135}␊
136␊
137char *␊
138newStringFromList(␊
139 char **list,␊
140 int *size␊
141)␊
142{␊
143 char *begin = *list, *end;␊
144 char *newstr;␊
145 int newsize = *size;␊
146 int bufsize;␊
147 ␊
148 while (*begin && newsize && isspace(*begin)) {␊
149␉begin++;␊
150␉newsize--;␊
151 }␊
152 end = begin;␊
153 while (*end && newsize && !isspace(*end)) {␊
154␉end++;␊
155␉newsize--;␊
156 }␊
157 if (begin == end)␊
158␉return 0;␊
159 bufsize = end - begin + 1;␊
160 newstr = malloc(bufsize);␊
161 strlcpy(newstr, begin, bufsize);␊
162 *list = end;␊
163 *size = newsize;␊
164 return newstr;␊
165}␊
166␊
167#endif␊
168␊
169/* ␊
170 * compress == compress escaped characters to one character␊
171 */␊
172int stringLength(const char *table, int compress)␊
173{␊
174␉int ret = 0;␊
175␊
176␉while (*table)␊
177␉{␊
178␉␉if (*table == '\\')␊
179␉␉{␊
180␉␉␉table += 2;␊
181␉␉␉ret += 1 + (compress ? 0 : 1);␊
182␉␉}␊
183␉␉else␊
184␉␉{␊
185␉␉␉if (*table == '\"') return ret;␊
186␉␉␉ret++;␊
187␉␉␉table++;␊
188␉␉}␊
189␉}␊
190␉return ret;␊
191}␊
192␊
193␊
194bool getValueForConfigTableKey(config_file_t *config, const char *key, const char **val, int *size)␊
195{␊
196␉if (config->dictionary != 0 ) {␊
197␉␉// Look up key in XML dictionary␊
198␉␉TagPtr value;␊
199␉␉value = XMLGetProperty(config->dictionary, key);␊
200␉␉if (value != 0) {␊
201␉␉␉if (value->type != kTagTypeString) {␊
202␉␉␉␉error("Non-string tag '%s' found in config file\n",␊
203␉␉␉␉␉ key);␊
204␉␉␉␉return false;␊
205␉␉␉}␊
206␉␉␉*val = value->string;␊
207␉␉␉*size = strlen(value->string);␊
208␉␉␉return true;␊
209␉␉}␊
210␉} else {␊
211␉␊
212␉␉// Legacy plist-style table␊
213␊
214␉}␊
215␊
216␉return false;␊
217}␊
218␊
219#if UNUSED␊
220␊
221/*␊
222 * Returns a new malloc'ed string if one is found␊
223 * in the string table matching 'key'. Also translates␊
224 * \n escapes in the string.␊
225 */␊
226char *newStringForStringTableKey(␊
227␉char *table,␊
228␉char *key,␊
229␉config_file_t *config␊
230)␊
231{␊
232 const char *val;␊
233 char *newstr, *p;␊
234 int size;␊
235 ␊
236 if (getValueForConfigTableKey(config, key, &val, &size)) {␊
237␉newstr = (char *)malloc(size+1);␊
238␉for (p = newstr; size; size--, p++, val++) {␊
239␉ if ((*p = *val) == '\\') {␊
240␉␉switch (*++val) {␊
241␉␉case 'r':␊
242␉␉ *p = '\r';␊
243␉␉ break;␊
244␉␉case 'n':␊
245␉␉ *p = '\n';␊
246␉␉ break;␊
247␉␉case 't':␊
248␉␉ *p = '\t';␊
249␉␉ break;␊
250␉␉default:␊
251␉␉ *p = *val;␊
252␉␉ break;␊
253␉␉}␊
254␉␉size--;␊
255␉ }␊
256␉}␊
257␉*p = '\0';␊
258␉return newstr;␊
259 } else {␊
260␉return 0;␊
261 }␊
262}␊
263␊
264#endif␊
265␊
266char *␊
267newStringForKey(char *key, config_file_t *config)␊
268{␊
269 const char *val;␊
270 char *newstr;␊
271 int size;␊
272 ␊
273 if (getValueForKey(key, &val, &size, config) && size) {␊
274␉newstr = (char *)malloc(size + 1);␊
275␉strlcpy(newstr, val, size + 1);␊
276␉return newstr;␊
277 } else {␊
278␉return 0;␊
279 }␊
280}␊
281␊
282/* parse a command line␊
283 * in the form: [<argument> ...] [<option>=<value> ...]␊
284 * both <option> and <value> must be either composed of␊
285 * non-whitespace characters, or enclosed in quotes.␊
286 */␊
287␊
288static const char *getToken(const char *line, const char **begin, int *len)␊
289{␊
290 if (*line == '\"') {␊
291␉*begin = ++line;␊
292␉while (*line && *line != '\"')␊
293␉ line++;␊
294␉*len = line++ - *begin;␊
295 } else {␊
296␉*begin = line;␊
297␉while (*line && !isspace(*line) && *line != '=')␊
298␉ line++;␊
299␉*len = line - *begin;␊
300 }␊
301 return line;␊
302}␊
303␊
304bool getValueForBootKey(const char *line, const char *match, const char **matchval, int *len)␊
305{␊
306 const char *key, *value;␊
307 int key_len, value_len;␊
308 bool retval = false;␊
309 ␊
310 while (*line) {␊
311␉/* look for keyword or argument */␊
312␉while (isspace(*line)) line++;␊
313␊
314␉/* now look for '=' or whitespace */␊
315␉line = getToken(line, &key, &key_len);␊
316␉/* line now points to '=' or space */␊
317␉if (*line && !isspace(*line)) {␊
318␉ line = getToken(++line, &value, &value_len);␊
319␉} else {␊
320␉ value = line;␊
321␉ value_len = 0;␊
322␉}␊
323␉if ((strlen(match) == key_len)␊
324␉ && strncmp(match, key, key_len) == 0) {␊
325␉ *matchval = value;␊
326␉ *len = value_len;␊
327␉ retval = true;␊
328 /* Continue to look for this key; last one wins. */␊
329␉}␊
330 }␊
331 return retval;␊
332}␊
333␊
334/* Return NULL if no option has been successfully retrieved, or the string otherwise */␊
335const char * getStringForKey(const char * key, config_file_t *config)␊
336{␊
337 static const char* value =0;␊
338 int len=0;␊
339 if(!getValueForKey(key, &value, &len, config)) value = 0;␊
340 return value;␊
341}␊
342␊
343␊
344/* Returns TRUE if a value was found, FALSE otherwise.␊
345 * The boolean value of the key is stored in 'val'.␊
346 */␊
347␊
348bool getBoolForKey( const char *key, bool *result_val, config_file_t *config )␊
349{␊
350 const char *key_val;␊
351 int size;␊
352 ␊
353 if (getValueForKey(key, &key_val, &size, config)) {␊
354 if ( (size >= 1) && (key_val[0] == 'Y' || key_val[0] == 'y') ) {␊
355 *result_val = true;␊
356 } else {␊
357 *result_val = false;␊
358 }␊
359 return true;␊
360 }␊
361 return false;␊
362}␊
363␊
364bool getIntForKey( const char *key, int *value, config_file_t *config )␊
365{␊
366 const char *val;␊
367 int size, sum;␊
368 bool negative = false;␊
369 ␊
370 if (getValueForKey(key, &val, &size, config))␊
371␉{␊
372␉␉if ( size )␊
373␉␉{␊
374␉␉␉if (*val == '-')␊
375␉␉␉{␊
376␉␉␉␉negative = true;␊
377␉␉␉␉val++;␊
378␉␉␉␉size--;␊
379␉␉␉}␊
380␉␉␉␊
381␉␉␉for (sum = 0; size > 0; size--)␊
382␉␉␉{␊
383␉␉␉␉if (*val < '0' || *val > '9')␊
384␉␉␉␉␉return false;␊
385␉␉␉␉␊
386␉␉␉␉sum = (sum * 10) + (*val++ - '0');␊
387␉␉␉}␊
388␉␉␉␊
389␉␉␉if (negative)␊
390␉␉␉␉sum = -sum;␊
391␉␉␉␊
392␉␉␉*value = sum;␊
393␉␉␉return true;␊
394␉␉}␊
395␉}␊
396 return false;␊
397}␊
398␊
399/*␊
400 *␊
401 */␊
402␊
403bool getDimensionForKey( const char *key, unsigned int *value, config_file_t *config, unsigned int dimension_max, unsigned int object_size )␊
404{␊
405␉const char *val;␊
406␉␊
407 int size = 0;␊
408␉int sum = 0;␊
409 ␊
410␉bool negative = false;␊
411␉bool percentage = false;␊
412␉␊
413 if (getValueForKey(key, &val, &size, config))␊
414␉{␊
415␉␉if ( size )␊
416␉␉{␊
417␉␉␉if (*val == '-')␊
418␉␉␉{␊
419␉␉␉␉negative = true;␊
420␉␉␉␉val++;␊
421␉␉␉␉size--;␊
422␉␉␉}␊
423␉␉␉␊
424␉␉␉if (val[size-1] == '%')␊
425␉␉␉{␊
426␉␉␉␉percentage = true;␊
427␉␉␉␉size--;␊
428␉␉␉}␊
429␉␉␉␊
430␉␉␉// convert string to integer␊
431␉␉␉for (sum = 0; size > 0; size--)␊
432␉␉␉{␊
433␉␉␉␉if (*val < '0' || *val > '9')␊
434␉␉␉␉␉return false;␊
435␉␉␉␉␊
436␉␉␉␉sum = (sum * 10) + (*val++ - '0');␊
437␉␉␉}␊
438␉␉␉␊
439␉␉␉if (percentage)␊
440␉␉␉␉sum = ( dimension_max * sum ) / 100;␊
441␉␉␉␊
442␉␉␉// calculate offset from opposite origin␊
443␉␉␉if (negative)␊
444␉␉␉␉sum = ( ( dimension_max - object_size ) - sum );␊
445␉␉␉␊
446␉␉} else {␊
447␉␉␉␊
448␉␉␉// null value calculate center␊
449␉␉␉sum = ( dimension_max - object_size ) / 2;␊
450␉␉␉␊
451␉␉}␊
452␉␉␊
453␉␉*value = (uint16_t) sum;␊
454␉␉return true;␊
455␉}␊
456␉␊
457␉// key not found␊
458 return false;␊
459}␊
460␊
461/*␊
462 *␉get color value from plist format #RRGGBB␊
463 */␊
464␊
465bool getColorForKey( const char *key, unsigned int *value, config_file_t *config )␊
466{␊
467 const char *val;␊
468 int size;␊
469 ␊
470 if (getValueForKey(key, &val, &size, config))␊
471␉{␊
472␉␉if (*val == '#')␊
473␉␉{␊
474 val++;␊
475␉␉␉*value = strtol(val, NULL, 16);␊
476␉␉␉return true;␊
477 }␊
478 }␊
479 return false;␊
480}␊
481␊
482bool getValueForKey( const char *key, const char **val, int *size, config_file_t *config )␊
483{␊
484 return getValueForConfigTableKey(config, key, val, size);␊
485}␊
486␊
487␊
488#if UNUSED␊
489void␊
490printSystemConfig(char *p1)␊
491{␊
492 char *p2 = p1, tmp;␊
493␊
494 while (*p1 != '\0') {␊
495␉while (*p2 != '\0' && *p2 != '\n') p2++;␊
496␉tmp = *p2;␊
497␉*p2 = '\0';␊
498␉printf("%s\n", p1);␊
499␉*p2 = tmp;␊
500␉if (tmp == '\0') break;␊
501␉p1 = ++p2;␊
502 }␊
503}␊
504#endif␊
505␊
506//==========================================================================␊
507// ParseXMLFile␊
508// Modifies the input buffer.␊
509// Expects to see one dictionary in the XML file.␊
510// Puts the first dictionary it finds in the␊
511// tag pointer and returns 0, or returns -1 if not found␊
512// (and does not modify dict pointer).␊
513// Prints an error message if there is a parsing error.␊
514//␊
515int ParseXMLFile( char * buffer, TagPtr * dict )␊
516{␊
517 long length, pos;␊
518 TagPtr tag;␊
519 pos = 0;␊
520 char *configBuffer;␊
521 ␊
522 configBuffer = malloc(strlen(buffer)+1);␊
523 strcpy(configBuffer, buffer);␊
524␊
525 while (1)␊
526 {␊
527 length = XMLParseNextTag(configBuffer + pos, &tag);␊
528 if (length == -1) break;␊
529 ␊
530 pos += length;␊
531 ␊
532 if (tag == 0) continue;␊
533 if (tag->type == kTagTypeDict) break;␊
534 ␊
535 XMLFreeTag(tag);␊
536 }␊
537 free(configBuffer);␊
538 if (length < 0) {␊
539 error ("Error parsing plist file\n");␊
540 return -1;␊
541 }␊
542 *dict = tag;␊
543 return 0;␊
544}␊
545␊
546/* loadConfigFile␊
547 *␊
548 * Returns 0 - successful.␊
549 *␉␉ -1 - unsuccesful.␊
550 */␊
551int loadConfigFile (const char *configFile, config_file_t *config)␊
552{␊
553␉int fd, count;␊
554␊
555␉if ((fd = open_bvdev("bt(0,0)", configFile, 0)) < 0) {␊
556␉␉return -1;␊
557␉}␊
558␉// read file␊
559␉count = read(fd, config->plist, IO_CONFIG_DATA_SIZE);␊
560␉close(fd);␊
561␉␊
562␉// build xml dictionary␊
563␉ParseXMLFile(config->plist, &config->dictionary);␊
564␉return 0;␊
565}␊
566␊
567␊
568/* loadSystemConfig␊
569 *␊
570 * Returns 0 - successful.␊
571 *␉␉ -1 - unsuccesful.␊
572 */␊
573int loadSystemConfig(config_file_t *config)␊
574{␊
575␉char *dirspec[] = {␊
576␉␉"/Extra/com.apple.Boot.plist",␊
577␉␉"bt(0,0)/Extra/com.apple.Boot.plist",␊
578␉␉"/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
579␉␉"/com.apple.boot.P/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
580␉␉"/com.apple.boot.R/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
581␉␉"/com.apple.boot.S/Library/Preferences/SystemConfiguration/com.apple.Boot.plist"␊
582␉};␊
583␊
584␉int i, fd, count, ret=-1;␊
585␊
586␉for(i = 0; i< sizeof(dirspec)/sizeof(dirspec[0]); i++)␊
587␉{␊
588␉␉if ((fd = open(dirspec[i], 0)) >= 0)␊
589␉␉{␊
590␉␉␉// read file␊
591␉␉␉count = read(fd, config->plist, IO_CONFIG_DATA_SIZE);␊
592␉␉␉close(fd);␊
593␉␉␉␊
594␉␉␉// build xml dictionary␊
595␉␉␉ParseXMLFile(config->plist, &config->dictionary);␊
596␉␉␉sysConfigValid = true;␉␊
597␉␉␉ret=0;␊
598␉␉␉␊
599␉␉␉// enable canOverride flag␊
600␉␉␉config->canOverride = true;␊
601␊
602␉␉␉break;␊
603␉␉}␊
604␉}␊
605␉return ret;␊
606}␊
607␊
608/* loadOverrideConfig␊
609 *␊
610 * Returns 0 - successful.␊
611 *␉␉ -1 - unsuccesful.␊
612 */␊
613int loadOverrideConfig(config_file_t *config)␊
614{␊
615␉char *dirspec[] = {␊
616␉␉"rd(0,0)/Extra/com.apple.Boot.plist",␊
617␉␉"/Extra/com.apple.Boot.plist",␊
618␉␉"/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
619␉␉"/com.apple.boot.P/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
620␉␉"/com.apple.boot.R/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
621␉␉"/com.apple.boot.S/Library/Preferences/SystemConfiguration/com.apple.Boot.plist"␊
622␉};␊
623␊
624␉int i, fd, count, ret=-1;␊
625␊
626␉for(i = 0; i< sizeof(dirspec)/sizeof(dirspec[0]); i++)␊
627␉{␊
628␉␉if ((fd = open(dirspec[i], 0)) >= 0)␊
629␉␉{␊
630␉␉␉// read file␊
631␉␉␉count = read(fd, config->plist, IO_CONFIG_DATA_SIZE);␊
632␉␉␉close(fd);␊
633␉␉␉␊
634␉␉␉// build xml dictionary␊
635␉␉␉ParseXMLFile(config->plist, &config->dictionary);␊
636␉␉␉sysConfigValid = true;␉␊
637␉␉␉ret=0;␊
638␉␉␉break;␊
639␉␉}␊
640␉}␊
641␉return ret;␊
642}␊
643␊
644/* loadHelperConfig␊
645 *␊
646 * Returns 0 - successful.␊
647 *␉␉ -1 - unsuccesful.␊
648 */␊
649int loadHelperConfig(config_file_t *config)␊
650{␊
651␉char *dirspec[] = {␊
652␉␉"/com.apple.boot.P/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
653␉␉"/com.apple.boot.R/Library/Preferences/SystemConfiguration/com.apple.Boot.plist",␊
654␉␉"/com.apple.boot.S/Library/Preferences/SystemConfiguration/com.apple.Boot.plist"␊
655␉};␊
656␊
657␉int i, fd, count, ret=-1;␊
658␊
659␉for(i = 0; i< sizeof(dirspec)/sizeof(dirspec[0]); i++)␊
660␉{␊
661␉␉if ((fd = open(dirspec[i], 0)) >= 0)␊
662␉␉{␊
663␉␉␉// read file␊
664␉␉␉count = read(fd, config->plist, IO_CONFIG_DATA_SIZE);␊
665␉␉␉close(fd);␊
666␉␉␉␊
667␉␉␉// build xml dictionary␊
668␉␉␉ParseXMLFile(config->plist, &config->dictionary);␊
669␉␉␉sysConfigValid = true;␉␊
670␉␉␉ret=0;␊
671␉␉␉break;␊
672␉␉}␊
673␉}␊
674␉return ret;␊
675}␊
676␊
677char * newString(const char * oldString)␊
678{␊
679 if ( oldString )␊
680 return strcpy(malloc(strlen(oldString)+1), oldString);␊
681 else␊
682 return NULL;␊
683}␊
684␊
685/*␊
686 * Extracts the next argument from the command line, double quotes are allowed here.␊
687 */␊
688char * getNextArg(char ** argPtr, char * val)␊
689{␊
690 char * ptr = *argPtr;␊
691 const char * strStart;␊
692 int len = 0;␊
693 bool isQuoted = false;␊
694␊
695 *val = '\0';␊
696␊
697 // Scan for the next non-whitespace character.␊
698 while ( *ptr && (*ptr == ' ' || *ptr == '=') )␊
699 {␊
700 ptr++;␊
701 }␊
702 ␊
703 strStart = ptr;␊
704␊
705 // Skip the leading double quote character.␊
706 if (*ptr == '\"')␊
707 {␊
708 isQuoted = true;␊
709 ptr++;␊
710 strStart++;␊
711 }␊
712␊
713 // Scan for the argument terminator character.␊
714 // This can be either a NULL character - in case we reach the end of the string,␊
715 // a double quote in case of quoted argument,␊
716 // or a whitespace character (' ' or '=') for non-quoted argument.␊
717 while (*ptr && !( (isQuoted && (*ptr == '\"')) ||␊
718 (!isQuoted && (*ptr == ' ' || *ptr == '=')) )␊
719 )␊
720 {␊
721 ptr++;␊
722 }␊
723␊
724 len = ptr - strStart;␊
725␊
726 // Skip the closing double quote character and adjust␊
727 // the starting pointer for the next getNextArg call.␊
728 if (*ptr && isQuoted && *ptr == '\"')␊
729 ptr++;␊
730␊
731 // Copy the extracted argument to val.␊
732 strncat(val, strStart, len);␊
733␊
734 // Set command line pointer.␊
735 *argPtr = ptr;␊
736␊
737 return ptr;␊
738}␊
739

Archive Download this file

Revision: 1065