1 %option nostdinit noyywrap never-interactive full ecs
2 %option 8bit nodefault perf-report perf-report
4 %x COMMAND HELP STRING PARAM
7 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
8 * Released under the terms of the GNU GPL v2.0.
21 #define START_STRSIZE 16
29 static int text_size, text_asize;
32 struct buffer *parent;
33 YY_BUFFER_STATE state;
36 struct buffer *current_buf;
38 static int last_ts, first_ts;
40 static void zconf_endhelp(void);
41 static void zconf_endfile(void);
43 static void new_string(void)
45 text = xmalloc(START_STRSIZE);
46 text_asize = START_STRSIZE;
51 static void append_string(const char *str, int size)
53 int new_size = text_size + size + 1;
54 if (new_size > text_asize) {
55 new_size += START_STRSIZE - 1;
56 new_size &= -START_STRSIZE;
57 text = realloc(text, new_size);
58 text_asize = new_size;
60 memcpy(text + text_size, str, size);
65 static void alloc_string(const char *str, int size)
67 text = xmalloc(size + 1);
68 memcpy(text, str, size);
72 static void warn_ignored_character(char chr)
75 "%s:%d:warning: ignoring unsupported character '%c'\n",
76 zconf_curname(), zconf_lineno(), chr);
88 current_file->lineno++;
106 const struct kconf_id *id = kconf_id_lookup(yytext, yyleng);
108 current_pos.file = current_file;
109 current_pos.lineno = current_file->lineno;
110 if (id && id->flags & TF_COMMAND) {
114 alloc_string(yytext, yyleng);
115 zconflval.string = text;
118 . warn_ignored_character(*yytext);
121 current_file->lineno++;
129 "(" return T_OPEN_PAREN;
130 ")" return T_CLOSE_PAREN;
133 "!=" return T_UNEQUAL;
134 "<=" return T_LESS_EQUAL;
135 ">=" return T_GREATER_EQUAL;
137 ">" return T_GREATER;
143 \n BEGIN(INITIAL); current_file->lineno++; return T_EOL;
145 const struct kconf_id *id = kconf_id_lookup(yytext, yyleng);
146 if (id && id->flags & TF_PARAM) {
150 alloc_string(yytext, yyleng);
151 zconflval.string = text;
155 \\\n current_file->lineno++;
157 . warn_ignored_character(*yytext);
165 append_string(yytext, yyleng);
166 zconflval.string = text;
170 append_string(yytext, yyleng);
173 append_string(yytext + 1, yyleng - 1);
174 zconflval.string = text;
178 append_string(yytext + 1, yyleng - 1);
181 if (str == yytext[0]) {
183 zconflval.string = text;
186 append_string(yytext, 1);
189 printf("%s:%d:warning: multi-line strings not supported\n", zconf_curname(), zconf_lineno());
190 current_file->lineno++;
202 for (i = 0; i < yyleng; i++) {
203 if (yytext[i] == '\t')
216 append_string(" ", 8);
219 append_string(" ", ts);
223 current_file->lineno++;
228 current_file->lineno++;
229 append_string("\n", 1);
233 if ((yytext[yyleng-1] != ' ') && (yytext[yyleng-1] != '\t'))
237 append_string(yytext, yyleng);
257 void zconf_starthelp(void)
260 last_ts = first_ts = 0;
264 static void zconf_endhelp(void)
266 zconflval.string = text;
272 * Try to open specified file with following names:
275 * The latter is used when srctree is separate from objtree
276 * when compiling the kernel.
277 * Return NULL if file is not found.
279 FILE *zconf_fopen(const char *name)
281 char *env, fullname[PATH_MAX+1];
284 f = fopen(name, "r");
285 if (!f && name != NULL && name[0] != '/') {
286 env = getenv(SRCTREE);
288 sprintf(fullname, "%s/%s", env, name);
289 f = fopen(fullname, "r");
295 void zconf_initscan(const char *name)
297 yyin = zconf_fopen(name);
299 printf("can't find file %s\n", name);
303 current_buf = xmalloc(sizeof(*current_buf));
304 memset(current_buf, 0, sizeof(*current_buf));
306 current_file = file_lookup(name);
307 current_file->lineno = 1;
310 static void __zconf_nextfile(const char *name)
313 struct file *file = file_lookup(name);
314 struct buffer *buf = xmalloc(sizeof(*buf));
315 memset(buf, 0, sizeof(*buf));
317 current_buf->state = YY_CURRENT_BUFFER;
318 yyin = zconf_fopen(file->name);
320 printf("%s:%d: can't open file \"%s\"\n",
321 zconf_curname(), zconf_lineno(), file->name);
324 yy_switch_to_buffer(yy_create_buffer(yyin, YY_BUF_SIZE));
325 buf->parent = current_buf;
328 for (iter = current_file->parent; iter; iter = iter->parent ) {
329 if (!strcmp(current_file->name,iter->name) ) {
330 printf("%s:%d: recursive inclusion detected. "
331 "Inclusion path:\n current file : '%s'\n",
332 zconf_curname(), zconf_lineno(),
334 iter = current_file->parent;
336 strcmp(iter->name,current_file->name)) {
337 printf(" included from: '%s:%d'\n",
338 iter->name, iter->lineno-1);
342 printf(" included from: '%s:%d'\n",
343 iter->name, iter->lineno+1);
348 file->parent = current_file;
352 void zconf_nextfile(const char *name)
357 char path[PATH_MAX], *p;
359 err = glob(name, GLOB_ERR | GLOB_MARK, NULL, &gl);
361 /* ignore wildcard patterns that return no result */
362 if (err == GLOB_NOMATCH && strchr(name, '*')) {
367 if (err == GLOB_NOMATCH) {
368 p = strdup(current_file->name);
370 snprintf(path, sizeof(path), "%s/%s", dirname(p), name);
371 err = glob(path, GLOB_ERR | GLOB_MARK, NULL, &gl);
377 const char *reason = "unknown error";
381 reason = "out of memory";
384 reason = "read error";
387 reason = "No files found";
393 printf("%s:%d: glob failed: %s \"%s\"\n", zconf_curname(), zconf_lineno(),
399 for (i = 0; i < gl.gl_pathc; i++)
400 __zconf_nextfile(gl.gl_pathv[i]);
403 static void zconf_endfile(void)
405 struct buffer *parent;
407 current_file = current_file->parent;
409 parent = current_buf->parent;
412 yy_delete_buffer(YY_CURRENT_BUFFER);
413 yy_switch_to_buffer(parent->state);
416 current_buf = parent;
419 int zconf_lineno(void)
421 return current_pos.lineno;
424 const char *zconf_curname(void)
426 return current_pos.file ? current_pos.file->name : "<none>";