soltools/mkdepend/parse.c

30 char *hash_lookup( char *symbol, struct symhash *symbols );
31 void hash_undefine( char *symbol, struct symhash *symbols );
33     struct inclist *file_red, struct symhash *symbols );
36     int parse_it, struct symhash *symbols);
38     register struct inclist *file_red, register struct symhash *symbols);
43 int find_includes(filep, file, file_red, recursion, failOK, incCollection, symbols)  in find_includes()  argument
49 	struct symhash		*symbols;
56 		switch(type = deftype(line, filep, file_red, file, TRUE, symbols)) {
60 				file_red, recursion+1, failOK, incCollection, symbols);
63 				type = gobble(filep, file, file_red, symbols);
65 				gobble(filep, file, file_red, symbols);
74 			type = gobble(filep, file, file_red, symbols);
77 					  file_red, recursion+1, recfailOK, incCollection, symbols);
87 			if ((type == IFDEF && hash_lookup(line, symbols))
88 			 || (type == IFNDEF && !hash_lookup(line, symbols))) {
94 					file_red, recursion+1, failOK, incCollection, symbols);
96 					type = gobble(filep, file, file_red, symbols);
98 					gobble(filep, file, file_red, symbols);
105 				type = gobble(filep, file, file_red, symbols);
108 						file_red, recursion + 1, failOK, incCollection, symbols);
120 				gobble(filep, file, file_red, symbols);
125 			define(line, &symbols);
133 			hash_undefine(line, symbols);
136 			add_include(filep, file, file_red, line, FALSE, failOK, incCollection, symbols);
139 			add_include(filep, file, file_red, line, TRUE, failOK, incCollection, symbols);
170 int gobble(filep, file, file_red, symbols)  in gobble()  argument
173 	struct symhash		*symbols;
179 		switch(type = deftype(line, filep, file_red, file, FALSE, symbols)) {
185 			type = gobble(filep, file, file_red, symbols);
188 			    type = gobble(filep, file, file_red, symbols);
190 			        (void)gobble(filep, file, file_red, symbols);
224 int deftype (line, filep, file_red, file, parse_it, symbols)  in deftype()  argument
229 	struct symhash	*symbols;
265 	    ret = zero_value(p, filep, file_red, symbols);
294 		ret = zero_value(p, filep, file_red, symbols);
316 			char *sym = hash_lookup(p, symbols);
325 				sym = hash_lookup(p, symbols);
389 int zero_value(exp, filep, file_red, symbols)  in zero_value()  argument
393 	register struct symhash *symbols;
395 	global_symbols = symbols; /* HACK! see above */
402 void define( def, symbols )  in define()  argument
404     struct symhash **symbols;
419     hash_define( def, val, symbols );
438 struct symhash *hash_copy( symbols )  in hash_copy()  argument
439     struct symhash *symbols;  in hash_copy()
443     if ( !symbols )
450         if ( !symbols->s_pairs[ i ] )
454             struct pair *it = symbols->s_pairs[ i ];
474 void hash_free( symbols )  in hash_free()  argument
475     struct symhash *symbols;  in hash_free()
479     if ( !symbols )
484         struct pair *it = symbols->s_pairs[ i ];
493     free( symbols->s_pairs );
496 void hash_define( name, val, symbols )  in hash_define()  argument
498     struct symhash **symbols;
503     if ( !symbols )
507     if ( *symbols == NULL )
511         *symbols = (struct symhash *) malloc( sizeof( struct symhash ) );
512         if ( *symbols == NULL )
516             (*symbols)->s_pairs[i] = NULL;
520     it = (*symbols)->s_pairs[ hashval ];
525         it = (*symbols)->s_pairs[ hashval ] = (struct pair*) malloc( sizeof( struct pair ) );
552 char *hash_lookup( symbol, symbols )  in hash_lookup()  argument
554     struct symhash *symbols;
558     if ( !symbols )
561     it = symbols->s_pairs[ hash( symbol ) ];
573 void hash_undefine( symbol, symbols )  in hash_undefine()  argument
575     struct symhash *symbols;
580     if ( !symbols )
584     it = symbols->s_pairs[ hashval ];
603             symbols->s_pairs[ hashval ] = NULL;