match_token( token_endmenu, "endmenu" );	break;    case 'f':	match_token( token_fi, "fi" );	break;    case 'h':	match_token( token_hex, "hex" );	break;    case 'i':	match_token( token_if, "if" );	match_token( token_int, "int" );	break;    case 'm':	match_token( token_mainmenu_name, "mainmenu_name" );	match_token( token_mainmenu_option, "mainmenu_option" );	break;    case 's':	match_token( token_source, "source" );	match_token( token_string, "string" );	break;    case 't':	match_token( token_then, "then" );	match_token( token_tristate, "tristate" );	break;    case 'u':	match_token( token_unset, "unset" );	break;    }#undef match_token    if ( token == token_source )    {	while ( *pnt == ' ' || *pnt == '\t' )	    pnt++;	do_source( pnt );	return;    }    if ( token == token_then )    {	if ( config_last != NULL && config_last->token == token_if )	    return;	syntax_error( "bogus 'then'" );    }#if 0    if ( token == token_unset )    {	fprintf( stderr, "Ignoring 'unset' command\n" );	return;    }#endif    if ( token == token_UNKNOWN )	syntax_error( "unknown command" );    /*     * Allocate an item.     */    cfg = malloc( sizeof(*cfg) );    memset( cfg, 0, sizeof(*cfg) );    if ( config_last == NULL )	{ config_last = config_list = cfg; }    else	{ config_last->next = cfg; config_last = cfg; }    /*     * Tokenize the arguments.     */    while ( *pnt == ' ' || *pnt == '\t' )	pnt++;    cfg->token = token;    switch ( token )    {    default:	syntax_error( "unknown token" );    case token_bool:    case token_tristate:	pnt = get_qstring ( pnt, &cfg->label );	pnt = get_string  ( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	break;    case token_choice_header:	{	    static int choose_number = 0;	    char * choice_list;	    pnt = get_qstring ( pnt, &cfg->label  );	    pnt = get_qstring ( pnt, &choice_list );	    pnt = get_string  ( pnt, &cfg->value  );	    cfg->nameindex = -(choose_number++);	    tokenize_choices( cfg, choice_list );	    free( choice_list );	}	break;    case token_comment:	pnt = get_qstring(pnt, &cfg->label);	if ( last_menuoption != NULL )	{	    pnt = get_qstring(pnt, &cfg->label);	    last_menuoption->label = cfg->label;	    last_menuoption = NULL;	}	break;    case token_define_bool:    case token_define_tristate:	pnt = get_string( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	while ( *pnt == ' ' || *pnt == '\t' )	    pnt++;	if ( ( pnt[0] == 'Y'  || pnt[0] == 'M' || pnt[0] == 'N'	||     pnt[0] == 'y'  || pnt[0] == 'm' || pnt[0] == 'n' )	&&   ( pnt[1] == '\0' || pnt[1] == ' ' || pnt[1] == '\t' ) )	{	    if      ( *pnt == 'n' || *pnt == 'N' ) cfg->value = strdup( "CONSTANT_N" );	    else if ( *pnt == 'y' || *pnt == 'Y' ) cfg->value = strdup( "CONSTANT_Y" );	    else if ( *pnt == 'm' || *pnt == 'M' ) cfg->value = strdup( "CONSTANT_M" );	}	else if ( *pnt == '$' )	{	    pnt++;	    pnt = get_string( pnt, &cfg->value );	}	else	{	    syntax_error( "unknown define_bool value" );	}	get_varnum( cfg->value );	break;    case token_define_hex:    case token_define_int:	pnt = get_string( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	pnt = get_string( pnt, &cfg->value );	break;    case token_define_string:	pnt = get_string( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	pnt = get_qstring( pnt, &cfg->value );	break;    case token_dep_bool:    case token_dep_mbool:    case token_dep_tristate:	pnt = get_qstring ( pnt, &cfg->label );	pnt = get_string  ( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	while ( *pnt == ' ' || *pnt == '\t' )	    pnt++;	dep_ptr = &(cfg->depend);	do {	    *dep_ptr = (struct dependency *) malloc( sizeof( struct dependency ) );	    (*dep_ptr)->next = NULL;	    if ( ( pnt[0] == 'Y'  || pnt[0] == 'M' || pnt[0] == 'N'	    ||     pnt[0] == 'y'  || pnt[0] == 'm' || pnt[0] == 'n' )	    &&   ( pnt[1] == '\0' || pnt[1] == ' ' || pnt[1] == '\t' ) )	    {		/* dep_tristate 'foo' CONFIG_FOO m */		if      ( pnt[0] == 'Y' || pnt[0] == 'y' )		    (*dep_ptr)->name = strdup( "CONSTANT_Y" );		else if ( pnt[0] == 'N' || pnt[0] == 'n' )		    (*dep_ptr)->name = strdup( "CONSTANT_N" );		else		    (*dep_ptr)->name = strdup( "CONSTANT_M" );		pnt++;		get_varnum( (*dep_ptr)->name );	    }	    else if ( *pnt == '$' )	    {		pnt++;		pnt = get_string( pnt, &(*dep_ptr)->name );		get_varnum( (*dep_ptr)->name );	    }	    else	    {		syntax_error( "can't handle dep_bool/dep_mbool/dep_tristate condition" );	    }	    dep_ptr = &(*dep_ptr)->next;	    while ( *pnt == ' ' || *pnt == '\t' )		pnt++;	} while ( *pnt );	/*	 * Create a conditional for this object's dependencies.	 */	{	    char fake_if [1024];	    struct dependency * dep;	    struct condition ** cond_ptr;	    int first = 1;	    cond_ptr = &(cfg->cond);	    for ( dep = cfg->depend; dep; dep = dep->next )	    {		if ( token == token_dep_tristate		&& ! strcmp( dep->name, "CONSTANT_M" ) )		{		    continue;		}		if ( first )		{		    first = 0;		}		else		{		    *cond_ptr = malloc( sizeof(struct condition) );		    memset( *cond_ptr, 0, sizeof(struct condition) );		    (*cond_ptr)->op = op_and;		    cond_ptr = &(*cond_ptr)->next;		}		*cond_ptr = malloc( sizeof(struct condition) );		memset( *cond_ptr, 0, sizeof(struct condition) );		(*cond_ptr)->op = op_lparen;		if ( token == token_dep_bool )		    sprintf( fake_if, "[ \"$%s\" = \"y\" -o \"$%s\" = \"\" ]; then",			dep->name, dep->name );		else		    sprintf( fake_if, "[ \"$%s\" = \"y\" -o \"$%s\" = \"m\" -o \"$%s\" = \"\" ]; then",			dep->name, dep->name, dep->name );		(*cond_ptr)->next = tokenize_if( fake_if );		while ( *cond_ptr )		    cond_ptr = &(*cond_ptr)->next;		*cond_ptr = malloc( sizeof(struct condition) );		memset( *cond_ptr, 0, sizeof(struct condition) );		(*cond_ptr)->op = op_rparen;		cond_ptr = &(*cond_ptr)->next;	    }	}	break;    case token_else:    case token_endmenu:    case token_fi:	break;    case token_hex:    case token_int:	pnt = get_qstring ( pnt, &cfg->label );	pnt = get_string  ( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	pnt = get_string  ( pnt, &cfg->value );	break;    case token_string:	pnt = get_qstring ( pnt, &cfg->label );	pnt = get_string  ( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	pnt = get_qstring  ( pnt, &cfg->value );	break;    case token_if:	cfg->cond = tokenize_if( pnt );	break;    case token_mainmenu_name:	pnt = get_qstring( pnt, &cfg->label );	break;    case token_mainmenu_option:	if ( strncmp( pnt, "next_comment", 12 ) == 0 )	    last_menuoption = cfg;	else	    pnt = get_qstring( pnt, &cfg->label );	break;    case token_unset:	pnt = get_string( pnt, &buffer );	cfg->nameindex = get_varnum( buffer );	while ( *pnt == ' ' || *pnt == '\t' )	    pnt++;	while (*pnt)	{	    cfg->next = (struct kconfig *) malloc( sizeof(struct kconfig) );	    memset( cfg->next, 0, sizeof(struct kconfig) );	    cfg = cfg->next;	    cfg->token = token_unset;	    pnt = get_string( pnt, &buffer );	    cfg->nameindex = get_varnum( buffer );	    while ( *pnt == ' ' || *pnt == '\t' )		pnt++;	}	break;    }    return;}/* * Implement the "source" command. */static void do_source( const char * filename ){    char buffer [1024];    FILE * infile;    const char * old_file;    int old_lineno;    int offset;    /* open the file */    if ( strcmp( filename, "-" ) == 0 )	infile = stdin;    else	infile = fopen( filename, "r" );    /* if that failed, try ../filename */    if ( infile == NULL )    {	sprintf( buffer, "../%s", filename );	infile = fopen( buffer, "r" );    }    if ( infile == NULL )    {	sprintf( buffer, "unable to open %s", filename );	syntax_error( buffer );    }    /* push the new file name and line number */    old_file     = current_file;    old_lineno   = lineno;    current_file = filename;    lineno       = 0;    /* read and process lines */    for ( offset = 0; ; )    {	char * pnt;	/* read a line */	fgets( buffer + offset, sizeof(buffer) - offset, infile );	if ( feof( infile ) )	    break;	lineno++;	/* strip the trailing return character */	pnt = buffer + strlen(buffer) - 1;	if ( *pnt == '\n' )	    *pnt-- = '\0';	/* eat \ NL pairs */	if ( *pnt == '\\' )	{	    offset = pnt - buffer;	    continue;	}	/* tokenize this line */	tokenize_line( buffer );	offset = 0;    }    /* that's all, folks */    if ( infile != stdin )	fclose( infile );    current_file = old_file;    lineno       = old_lineno;    return;}/* * Main program. */int main( int argc, const char * argv [] ){    do_source        ( "-"         );    fix_conditionals ( config_list );    dump_tk_script   ( config_list );    return 0;}