From d955226c2197578f69c510282a4e9ad1ea8fe771 Mon Sep 17 00:00:00 2001
From: kergoth <kergoth>
Date: Thu, 31 Oct 2002 17:11:35 +0000
Subject: Initial bits to start work on revamping the buildsystem

---
(limited to 'scripts/kconfig/cml1.l')

diff --git a/scripts/kconfig/cml1.l b/scripts/kconfig/cml1.l
new file mode 100644
index 0000000..d6c33a0
--- a/dev/null
+++ b/scripts/kconfig/cml1.l
@@ -0,0 +1,213 @@
+%option nounput backup nostdinit noyywrap full ecs
+%option 8bit backup nodefault perf-report perf-report
+%x STRING
+%{
+/*
+ * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
+ * Released under the terms of the GNU GPL v2.0.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include "cml1.h"
+
+char *text;
+static char *text_ptr;
+static int text_size, text_asize;
+
+struct buffer {
+	struct buffer *parent;
+	YY_BUFFER_STATE state;
+};
+
+struct buffer *current_buf;
+
+int lineno(void)
+{
+	if (current_buf)
+		return current_file->lineno;
+	else
+		return 0;
+}
+
+void scan_init(char *file)
+{
+	struct buffer *buf = malloc(sizeof(*buf));
+	memset(buf, 0, sizeof(*buf));
+
+	yyin = fopen(file, "r");
+	if (!yyin) {
+		printf("can't find file %s\n", file);
+		exit(1);
+	}
+	current_buf = buf;
+
+	current_file = lookup_file(file);
+	current_file->lineno = 0;
+	current_file->flags = FILE_BUSY;
+}
+
+void scan_nextfile(char *name)
+{
+	struct file *file = lookup_file(name);
+	struct buffer *buf = malloc(sizeof(*buf));
+	memset(buf, 0, sizeof(*buf));
+
+	current_buf->state = YY_CURRENT_BUFFER;
+	yyin = fopen(name, "r");
+	if (!yyin) {
+		printf("can't find file %s\n", name);
+		exit(1);
+	}
+	yy_switch_to_buffer(yy_create_buffer(yyin, YY_BUF_SIZE));
+	buf->parent = current_buf;
+	current_buf = buf;
+
+	if (file->flags & FILE_BUSY) {
+		printf("recursive scan (%s)?\n", name);
+		exit(1);
+	}
+	file->flags |= FILE_BUSY;
+	file->lineno = 0;
+	file->parent = current_file;
+	current_file = file;
+}
+
+#define START_STRSIZE	16
+
+void new_string(void)
+{
+	text = malloc(START_STRSIZE);
+	text_asize = START_STRSIZE;
+	text_ptr = text;
+	text_size = 0;
+	*text_ptr = 0;
+}
+
+void append_string(const char *str, int size)
+{
+	int new_size = text_size + size + 1;
+	if (new_size > text_asize) {
+		text = realloc(text, new_size);
+		text_asize = new_size;
+		text_ptr = text + text_size;
+	}
+	memcpy(text_ptr, str, size);
+	text_ptr += size;
+	text_size += size;
+	*text_ptr = 0;
+}
+
+void alloc_string(const char *str, int size)
+{
+	text = malloc(size + 1);
+	memcpy(text, str, size);
+	text[size] = 0;
+}
+
+%}
+%%
+	int str = 0;
+
+\"|\'	{
+	str = yytext[0];
+	new_string();
+	BEGIN(STRING);
+}
+<STRING>{
+	[^'"\n\\]+	{
+		append_string(yytext, yyleng);
+	}
+	\'|\"	{
+		if (str == yytext[0]) {
+			BEGIN(INITIAL);
+			cml1lval.string = text;
+			//printf("s:%s", text);
+			return str == '"' ? T_WORD_DQUOTE : T_WORD_QUOTE;
+		} else
+			append_string(yytext, 1);
+	}
+	\\[ \t]*\n	append_string(yytext+yyleng-1, 1); current_file->lineno++;
+	\\[ \t]*	append_string(yytext+1, yyleng-1);
+	\\.		append_string(yytext+1, 1);
+	\n	{
+		printf(":%d: open string!\n", current_file->lineno+1);
+		exit(0);
+	}
+	<<EOF>>	{
+		printf(":%d: open string!\n", current_file->lineno+1);
+		exit(0);
+	}
+}
+mainmenu_name[ \t]	return T_MAINMENU_NAME;
+mainmenu_option[ \t]	return T_MAINMENU_OPTION;
+next_comment/[ \t\n]	return T_NEXT_COMMENT;
+endmenu/[ \t\n]		return T_ENDMENU;
+comment[ \t]		return T_COMMENT;
+bool[ \t]		return T_BOOL;
+hex[ \t]		return T_HEX;
+int[ \t]		return T_INT;
+string[ \t]		return T_STRING;
+tristate[ \t]		return T_TRISTATE;
+define_bool[ \t]	return T_DEFINE_BOOL;
+define_hex[ \t]		return T_DEFINE_HEX;
+define_int[ \t]		return T_DEFINE_INT;
+define_string[ \t]	return T_DEFINE_STRING;
+define_tristate[ \t]	return T_DEFINE_TRISTATE;
+dep_bool[ \t]		return T_DEP_BOOL;
+dep_mbool[ \t]		return T_DEP_MBOOL;
+dep_tristate[ \t]	return T_DEP_TRISTATE;
+unset[ \t]		return T_UNSET;
+choice[ \t]		return T_CHOICE;
+source[ \t]		return T_SOURCE;
+if[ \t]			return T_IF;
+else/[ \t\n]		return T_ELSE;
+fi/[ \t\n]		return T_FI;
+then/[ \t\n]		return T_THEN;
+\[			return '[';
+\]			return ']';
+;			return ';';
+!=			return T_UNEQUAL;
+=			return '=';
+!			return '!';
+-a			return T_AND;
+-o			return T_OR;
+#[^\n]*	{
+	/* comment */
+	current_file->lineno++;
+	alloc_string(yytext, yyleng);
+	cml1lval.string = text;
+	return T_SH_COMMENT;
+}
+[ \t]+			/* space */
+\\\n			current_file->lineno++;	/* ignore */
+\n	{
+	current_file->lineno++;
+	return '\n';
+}
+[[:alnum:]$/][[:graph:]]*	{
+	alloc_string(yytext, yyleng);
+	cml1lval.string = text;
+	//printf("w:%s", text);
+	return T_WORD;
+}
+.	{
+		printf("%s:%d: invalid character 0x%x(%c)\n", current_file->name, current_file->lineno+1, yytext[0], yytext[0]);
+		exit(1);
+}
+<<EOF>>	{
+	if (current_buf->parent) {
+		struct buffer *buf = current_buf;
+		current_buf = buf->parent;
+		current_file->flags |= FILE_SCANNED;
+		current_file->flags &= ~FILE_BUSY;
+		current_file = current_file->parent;
+		yy_delete_buffer(YY_CURRENT_BUFFER);
+		yy_switch_to_buffer(current_buf->state);
+		free(buf);
+	} else
+		yyterminate();
+}
+%%
--
cgit v0.9.0.2