X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=token.c;h=bdb331aff836e5ec261bf563be33e3bbca026ce1;hb=9a2fa0297379908605bafee1aaa9ac4c7ffb227e;hp=99c871c2257b3eb4b3d27fb8fd7ba0bced2ffe3a;hpb=114084b56a92d4bfad09d5ff0c6f4381434cce59;p=cparser

diff --git a/token.c b/token.c
index 99c871c..bdb331a 100644
--- a/token.c
+++ b/token.c
@@ -1,26 +1,58 @@
+/*
+ * This file is part of cparser.
+ * Copyright (C) 2007-2008 Matthias Braun <matze@braunis.de>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ */
 #include <config.h>
 
 #include "token_t.h"
+#include "symbol_t.h"
 
 #include <assert.h>
 #include <stdio.h>
 
 #include "symbol.h"
+#include "lang_features.h"
 #include "adt/array.h"
 
 static symbol_t *token_symbols[T_LAST_TOKEN];
+static symbol_t *pp_token_symbols[TP_LAST_TOKEN];
+
+const source_position_t builtin_source_position = { "<built-in>", 0 };
 
 void init_tokens(void)
 {
 	symbol_t *symbol;
+	int       last_id = -2;
 
 	memset(token_symbols, 0, T_LAST_TOKEN * sizeof(token_symbols[0]));
-
-#define T(x,str,val)                                               \
-	assert(T_##x >= 0 && T_##x < T_LAST_TOKEN);                    \
-	symbol               = symbol_table_insert(str);               \
-	symbol->ID           = T_##x;                                  \
-	token_symbols[T_##x] = symbol;
+	memset(pp_token_symbols, 0, TP_LAST_TOKEN * sizeof(pp_token_symbols[0]));
+
+#define T(mode,x,str,val)                                          \
+	if (T_##x > 255) {                                             \
+		assert(T_##x >= last_id);                                  \
+		last_id = T_##x;                                           \
+	}                                                              \
+	if (c_mode & (mode)) {                                         \
+		assert(T_##x >= 0 && T_##x < T_LAST_TOKEN);                \
+		symbol               = symbol_table_insert(str);           \
+		symbol->ID           = T_##x;                              \
+		token_symbols[T_##x] = symbol;                             \
+	}
 
 #define TS(x,str,val)                                              \
 	assert(T_##x >= 0 && T_##x < T_LAST_TOKEN);                    \
@@ -32,10 +64,16 @@ void init_tokens(void)
 #undef TS
 #undef T
 
-#define T(x,str,val)                                               \
+#define T(mode,x,str,val)                                          \
 	assert(TP_##x >= 0 && TP_##x < TP_LAST_TOKEN);                 \
-	symbol               = symbol_table_insert(str);               \
-	symbol->pp_ID        = TP_##x;
+	symbol                   = symbol_table_insert(str);           \
+	symbol->pp_ID            = TP_##x;                             \
+	pp_token_symbols[TP_##x] = symbol;
+
+#define TS(x,str,val)                                              \
+	assert(TP_##x >= 0 && TP_##x < T_LAST_TOKEN);                  \
+	symbol                   = symbol_table_insert(str);           \
+	pp_token_symbols[TP_##x] = symbol;
 
 #include "tokens_preprocessor.inc"
 
@@ -88,10 +126,57 @@ void print_token(FILE *f, const token_t *token)
 		fprintf(f, "floatingpointer number %LF", token->v.floatvalue);
 		break;
 	case T_STRING_LITERAL:
-		fprintf(f, "string '%s'", token->v.string);
+		fprintf(f, "string '%s'", token->v.string.begin); /* TODO suboptimal */
 		break;
 	default:
 		print_token_type(f, (token_type_t)token->type);
 		break;
 	}
 }
+
+void print_pp_token_type(FILE *f, preprocessor_token_type_t token_type)
+{
+	if(token_type == TP_EOF) {
+		fputs("end of file", f);
+		return;
+	}
+	if(token_type == TP_ERROR) {
+		fputs("error", f);
+		return;
+	}
+
+	int token_symbols_len = TP_LAST_TOKEN;
+	if(token_type < 0 || token_type >= token_symbols_len) {
+		fputs("invalid token", f);
+		return;
+	}
+
+	const symbol_t *symbol = pp_token_symbols[token_type];
+	if(symbol != NULL) {
+		fprintf(f, "'%s'", symbol->string);
+	} else {
+		if(token_type >= 0 && token_type < 256) {
+			fprintf(f, "'%c'", token_type);
+			return;
+		}
+		fputs("unknown token", f);
+	}
+}
+
+void print_pp_token(FILE *f, const token_t *token)
+{
+	switch((preprocessor_token_type_t) token->type) {
+	case TP_IDENTIFIER:
+		fprintf(f, "symbol '%s'", token->v.symbol->string);
+		break;
+	case TP_NUMBER:
+		fprintf(f, "number %s", token->v.string.begin);
+		break;
+	case TP_STRING_LITERAL:
+		fprintf(f, "string '%s'", token->v.string.begin);
+		break;
+	default:
+		print_pp_token_type(f, (preprocessor_token_type_t) token->type);
+		break;
+	}
+}