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);
384 int zero_value(exp, filep, file_red, symbols)  in zero_value()  argument
388 	register struct symhash *symbols;
390 	global_symbols = symbols; /* HACK! see above */
397 void define( def, symbols )  in define()  argument
399     struct symhash **symbols;
414     hash_define( def, val, symbols );
433 struct symhash *hash_copy( symbols )  in hash_copy()  argument
434     struct symhash *symbols;  in hash_copy()
438     if ( !symbols )
445         if ( !symbols->s_pairs[ i ] )
449             struct pair *it = symbols->s_pairs[ i ];
469 void hash_free( symbols )  in hash_free()  argument
470     struct symhash *symbols;  in hash_free()
474     if ( !symbols )
479         struct pair *it = symbols->s_pairs[ i ];
488     free( symbols->s_pairs );
491 void hash_define( name, val, symbols )  in hash_define()  argument
493     struct symhash **symbols;
498     if ( !symbols )
502     if ( *symbols == NULL )
506         *symbols = (struct symhash *) malloc( sizeof( struct symhash ) );
507         if ( *symbols == NULL )
511             (*symbols)->s_pairs[i] = NULL;
515     it = (*symbols)->s_pairs[ hashval ];
520         it = (*symbols)->s_pairs[ hashval ] = (struct pair*) malloc( sizeof( struct pair ) );
547 char *hash_lookup( symbol, symbols )  in hash_lookup()  argument
549     struct symhash *symbols;
553     if ( !symbols )
556     it = symbols->s_pairs[ hash( symbol ) ];
568 void hash_undefine( symbol, symbols )  in hash_undefine()  argument
570     struct symhash *symbols;
575     if ( !symbols )
579     it = symbols->s_pairs[ hashval ];
598             symbols->s_pairs[ hashval ] = NULL;