4 * Basic tokenization structures. NOTE! Those tokens had better
5 * be pretty small, since we're going to keep them all in memory
8 * Copyright (C) 2003 Transmeta Corp.
11 * Licensed under the Open Software License version 1.1
14 #include <sys/types.h>
18 * This describes the pure lexical elements (tokens), with
19 * no semantic meaning. In other words, an identifier doesn't
20 * have a type or meaning, it is only a specific string in
23 * Semantic meaning is handled elsewhere.
30 /* Use these to check for "already parsed" */
31 int constant
, nesting
;
32 struct ident
*protect
;
37 extern int input_stream_nr
;
38 extern struct stream
*input_streams
;
40 extern int ident_hit
, ident_miss
;
43 struct ident
*next
; /* Hash chain of identifiers */
44 struct symbol
*symbols
; /* Pointer to semantic meaning list */
45 unsigned char len
; /* Length of identifier name */
46 unsigned char tainted
;
47 char name
[]; /* Actual identifier */
62 TOKEN_QUOTED_ARGUMENT
,
69 /* Combination tokens */
70 #define COMBINATION_STRINGS { \
88 SPECIAL_ADD_ASSIGN
= 256,
112 SPECIAL_ARG_SEPARATOR
,
115 SPECIAL_UNSIGNED_LTE
,
116 SPECIAL_UNSIGNED_GTE
,
124 /* will fit into 32 bits */
133 * This is a very common data structure, it should be kept
134 * as small as humanly possible. Big (rare) types go as
143 unsigned int special
;
144 struct string
*string
;
147 struct argcount count
;
151 #define MAX_STRING 4095
153 static inline struct token
*containing_token(struct token
**p
)
155 void *addr
= (char*)p
- ((char*)&((struct token
*)0)->next
- (char*)0);
159 #define token_type(x) ((x)->pos.type)
162 * Last token in the stream - points to itself.
163 * This allows us to not test for NULL pointers
164 * when following the token->next chain..
166 extern int preprocessing
, verbose
;
167 extern struct token eof_token_entry
;
168 #define eof_token(x) ((x) == &eof_token_entry)
170 extern int init_stream(const char *, int fd
);
171 extern struct ident
*hash_ident(struct ident
*);
172 extern struct ident
*built_in_ident(const char *);
173 extern struct token
*built_in_token(int, const char *);
174 extern const char *show_special(int);
175 extern const char *show_ident(const struct ident
*);
176 extern const char *show_string(const struct string
*string
);
177 extern const char *show_token(const struct token
*);
178 extern struct token
* tokenize(const char *, int, struct token
*);
179 extern struct token
* tokenize_buffer(unsigned char *, unsigned long, struct token
*);
181 extern void die(const char *, ...);
182 extern void show_identifier_stats(void);
183 extern struct token
*preprocess(struct token
*);
185 static inline int match_op(struct token
*token
, int op
)
187 return token
->pos
.type
== TOKEN_SPECIAL
&& token
->special
== op
;
190 static inline int match_ident(struct token
*token
, struct ident
*id
)
192 return token
->pos
.type
== TOKEN_IDENT
&& token
->ident
== id
;