3 %lex-param { yyscan_t scanner }
4 %parse-param { struct grub2_parser *parser }
8 #include <talloc/talloc.h>
14 #define YYLEX_PARAM parser->scanner
16 static void yyerror(struct grub2_parser *, char const *s);
20 struct grub2_word *word;
21 struct grub2_argv *argv;
22 struct grub2_statement *statement;
23 struct grub2_statements *statements;
27 %token TOKEN_LDSQBRACKET "[["
28 %token TOKEN_RDSQBRACKET "]]"
29 %token TOKEN_CASE "case"
31 %token TOKEN_DONE "done"
32 %token TOKEN_ELIF "elif"
33 %token TOKEN_ELSE "else"
34 %token TOKEN_ESAC "esac"
36 %token TOKEN_FOR "for"
37 %token TOKEN_FUNCTION "function"
40 %token TOKEN_MENUENTRY "menuentry"
41 %token TOKEN_SELECT "select"
42 %token TOKEN_SUBMENU "submenu"
43 %token TOKEN_THEN "then"
44 %token TOKEN_TIME "time"
45 %token TOKEN_UTIL "until"
46 %token TOKEN_WHILE "while"
48 %type <statement> statement
49 %type <statements> statements
50 %type <statement> conditional
57 %token <word> TOKEN_WORD
65 parser->script->statements = $1;
68 statements: /* empty */ {
69 $$ = create_statements(parser);
71 | statements statement TOKEN_EOL {
72 statement_append($1, $2);
75 | statements TOKEN_EOL {
79 conditional: statement TOKEN_EOL "then" TOKEN_EOL statements {
80 $$ = create_statement_conditional(parser, $1, $5);
85 $$ = create_statement_simple(parser, $1);
87 | '{' statements '}' {
88 $$ = create_statement_block(parser, $2);
90 | "if" TOKEN_DELIM conditional "fi" {
91 $$ = create_statement_if(parser, $3, NULL);
93 | "if" TOKEN_DELIM conditional
97 $$ = create_statement_if(parser, $3, $6);
99 | "function" TOKEN_DELIM word TOKEN_DELIM '{' statements '}' {
100 $$ = create_statement_function(parser, $3, $6);
102 | "menuentry" TOKEN_DELIM words TOKEN_DELIM
104 $$ = create_statement_menuentry(parser, $3, $6);
106 | "submenu" TOKEN_DELIM words TOKEN_DELIM
108 /* we just flatten everything */
109 $$ = create_statement_block(parser, $6);
113 $$ = create_argv(parser);
116 | words TOKEN_DELIM word {
128 void yyerror(struct grub2_parser *parser, char const *s)
130 fprintf(stderr, "%d: error: %s '%s'\n",
131 yyget_lineno(parser->scanner),
132 s, yyget_text(parser->scanner));
135 struct grub2_statements *create_statements(struct grub2_parser *parser)
137 struct grub2_statements *stmts = talloc(parser,
138 struct grub2_statements);
139 list_init(&stmts->list);
143 struct grub2_statement *create_statement_simple(struct grub2_parser *parser,
144 struct grub2_argv *argv)
146 struct grub2_statement_simple *stmt =
147 talloc(parser, struct grub2_statement_simple);
148 stmt->st.type = STMT_TYPE_SIMPLE;
149 stmt->st.exec = statement_simple_execute;
154 struct grub2_statement *create_statement_menuentry(struct grub2_parser *parser,
155 struct grub2_argv *argv, struct grub2_statements *stmts)
157 struct grub2_statement_menuentry *stmt =
158 talloc(parser, struct grub2_statement_menuentry);
159 stmt->st.type = STMT_TYPE_MENUENTRY;
160 stmt->st.exec = statement_menuentry_execute;
162 stmt->statements = stmts;
166 struct grub2_statement *create_statement_conditional(
167 struct grub2_parser *parser,
168 struct grub2_statement *condition,
169 struct grub2_statements *statements)
171 struct grub2_statement_conditional *stmt =
172 talloc(parser, struct grub2_statement_conditional);
173 stmt->st.type = STMT_TYPE_CONDITIONAL;
174 stmt->condition = condition;
175 stmt->statements = statements;
179 struct grub2_statement *create_statement_if(struct grub2_parser *parser,
180 struct grub2_statement *conditional,
181 struct grub2_statements *else_case)
183 struct grub2_statement_if *stmt =
184 talloc(parser, struct grub2_statement_if);
185 stmt->st.type = STMT_TYPE_IF;
186 stmt->st.exec = statement_if_execute;
187 stmt->conditional = conditional;
188 stmt->else_case = else_case;
192 struct grub2_statement *create_statement_block(struct grub2_parser *parser,
193 struct grub2_statements *stmts)
195 struct grub2_statement_block *stmt =
196 talloc(parser, struct grub2_statement_block);
197 stmt->st.type = STMT_TYPE_BLOCK;
198 stmt->st.exec = NULL;
199 stmt->statements = stmts;
203 struct grub2_statement *create_statement_function(struct grub2_parser *parser,
204 struct grub2_word *name, struct grub2_statements *body)
206 struct grub2_statement_function *stmt =
207 talloc(parser, struct grub2_statement_function);
208 stmt->st.exec = statement_function_execute;
214 void statement_append(struct grub2_statements *stmts,
215 struct grub2_statement *stmt)
219 list_add_tail(&stmts->list, &stmt->list);
222 struct grub2_word *create_word_text(struct grub2_parser *parser,
225 struct grub2_word *word = talloc(parser, struct grub2_word);
226 word->type = GRUB2_WORD_TEXT;
228 word->text = talloc_strdup(word, text);
234 struct grub2_word *create_word_var(struct grub2_parser *parser,
235 const char *name, bool split)
237 struct grub2_word *word = talloc(parser, struct grub2_word);
238 word->type = GRUB2_WORD_VAR;
239 word->name = talloc_strdup(word, name);
246 struct grub2_argv *create_argv(struct grub2_parser *parser)
248 struct grub2_argv *argv = talloc(parser, struct grub2_argv);
249 list_init(&argv->words);
253 void argv_append(struct grub2_argv *argv, struct grub2_word *word)
255 list_add_tail(&argv->words, &word->argv_list);
258 void word_append(struct grub2_word *w1, struct grub2_word *w2)
264 struct grub2_parser *grub2_parser_create(struct discover_context *ctx)
266 struct grub2_parser *parser;
268 parser = talloc(ctx, struct grub2_parser);
269 yylex_init_extra(parser, &parser->scanner);
270 parser->script = create_script(parser, ctx);
275 void grub2_parser_parse(struct grub2_parser *parser, char *buf, int len)
277 YY_BUFFER_STATE bufstate;
280 bufstate = yy_scan_bytes(buf, len - 1, parser->scanner);
282 rc = yyparse(parser);
284 yy_delete_buffer(bufstate, parser->scanner);
287 script_execute(parser->script);