3 %lex-param { yyscan_t scanner }
4 %parse-param { struct grub2_parser *parser }
8 #include <talloc/talloc.h>
14 static void print_token(FILE *fp, int type, YYSTYPE value);
16 #define YYLEX_PARAM parser->scanner
17 #define YYPRINT(f, t, v) print_token(f, t, v)
19 static void yyerror(struct grub2_parser *, char const *s);
23 struct grub2_word *word;
24 struct grub2_argv *argv;
25 struct grub2_statement *statement;
26 struct grub2_statements *statements;
30 %token TOKEN_LDSQBRACKET "[["
31 %token TOKEN_RDSQBRACKET "]]"
32 %token TOKEN_CASE "case"
34 %token TOKEN_DONE "done"
35 %token TOKEN_ELIF "elif"
36 %token TOKEN_ELSE "else"
37 %token TOKEN_ESAC "esac"
39 %token TOKEN_FOR "for"
40 %token TOKEN_FUNCTION "function"
43 %token TOKEN_MENUENTRY "menuentry"
44 %token TOKEN_SELECT "select"
45 %token TOKEN_SUBMENU "submenu"
46 %token TOKEN_THEN "then"
47 %token TOKEN_TIME "time"
48 %token TOKEN_UTIL "until"
49 %token TOKEN_WHILE "while"
51 %type <statement> statement
52 %type <statements> statements
53 %type <statement> conditional
54 %type <statement> elif
55 %type <statements> elifs
62 %token <word> TOKEN_WORD
71 parser->script->statements = $1;
74 eol: TOKEN_EOL | TOKEN_EOF;
76 statements: /* empty */ {
77 $$ = create_statements(parser);
79 | statements statement eol {
80 statement_append($1, $2);
83 | statements TOKEN_EOL {
87 conditional: statement TOKEN_EOL "then" TOKEN_EOL statements {
88 $$ = create_statement_conditional(parser, $1, $5);
91 elif: "elif" TOKEN_DELIM conditional {
96 $$ = create_statements(parser);
99 statement_append($1, $2);
105 $$ = create_statement_simple(parser, $1);
107 | '{' statements '}' {
108 $$ = create_statement_block(parser, $2);
110 | "if" TOKEN_DELIM conditional elifs "fi" {
111 $$ = create_statement_if(parser, $3, $4, NULL);
113 | "if" TOKEN_DELIM conditional
118 $$ = create_statement_if(parser, $3, $4, $7);
120 | "function" TOKEN_DELIM word TOKEN_DELIM '{' statements '}' {
121 $$ = create_statement_function(parser, $3, $6);
123 | "menuentry" TOKEN_DELIM words TOKEN_DELIM
125 $$ = create_statement_menuentry(parser, $3, $6);
127 | "submenu" TOKEN_DELIM words TOKEN_DELIM
129 /* we just flatten everything */
130 $$ = create_statement_block(parser, $6);
134 $$ = create_argv(parser);
137 | words TOKEN_DELIM word {
149 void yyerror(struct grub2_parser *parser, char const *s)
151 fprintf(stderr, "%d: error: %s '%s'\n",
152 yyget_lineno(parser->scanner),
153 s, yyget_text(parser->scanner));
156 static void print_token(FILE *fp, int type, YYSTYPE value)
158 if (type != TOKEN_WORD)
160 fprintf(fp, "%s", value.word->text);
163 struct grub2_statements *create_statements(struct grub2_parser *parser)
165 struct grub2_statements *stmts = talloc(parser,
166 struct grub2_statements);
167 list_init(&stmts->list);
171 struct grub2_statement *create_statement_simple(struct grub2_parser *parser,
172 struct grub2_argv *argv)
174 struct grub2_statement_simple *stmt =
175 talloc(parser, struct grub2_statement_simple);
176 stmt->st.type = STMT_TYPE_SIMPLE;
177 stmt->st.exec = statement_simple_execute;
182 struct grub2_statement *create_statement_menuentry(struct grub2_parser *parser,
183 struct grub2_argv *argv, struct grub2_statements *stmts)
185 struct grub2_statement_menuentry *stmt =
186 talloc(parser, struct grub2_statement_menuentry);
187 stmt->st.type = STMT_TYPE_MENUENTRY;
188 stmt->st.exec = statement_menuentry_execute;
190 stmt->statements = stmts;
194 struct grub2_statement *create_statement_conditional(
195 struct grub2_parser *parser,
196 struct grub2_statement *condition,
197 struct grub2_statements *statements)
199 struct grub2_statement_conditional *stmt =
200 talloc(parser, struct grub2_statement_conditional);
201 stmt->st.type = STMT_TYPE_CONDITIONAL;
202 stmt->condition = condition;
203 stmt->statements = statements;
207 struct grub2_statement *create_statement_if(struct grub2_parser *parser,
208 struct grub2_statement *conditional,
209 struct grub2_statements *elifs,
210 struct grub2_statements *else_case)
212 struct grub2_statement_if *stmt =
213 talloc(parser, struct grub2_statement_if);
215 list_add(&elifs->list, &conditional->list);
217 stmt->st.type = STMT_TYPE_IF;
218 stmt->st.exec = statement_if_execute;
219 stmt->conditionals = elifs;
220 stmt->else_case = else_case;
224 struct grub2_statement *create_statement_block(struct grub2_parser *parser,
225 struct grub2_statements *stmts)
227 struct grub2_statement_block *stmt =
228 talloc(parser, struct grub2_statement_block);
229 stmt->st.type = STMT_TYPE_BLOCK;
230 stmt->st.exec = statement_block_execute;
231 stmt->statements = stmts;
235 struct grub2_statement *create_statement_function(struct grub2_parser *parser,
236 struct grub2_word *name, struct grub2_statements *body)
238 struct grub2_statement_function *stmt =
239 talloc(parser, struct grub2_statement_function);
240 stmt->st.exec = statement_function_execute;
246 void statement_append(struct grub2_statements *stmts,
247 struct grub2_statement *stmt)
251 list_add_tail(&stmts->list, &stmt->list);
254 struct grub2_word *create_word_text(struct grub2_parser *parser,
257 struct grub2_word *word = talloc(parser, struct grub2_word);
258 word->type = GRUB2_WORD_TEXT;
260 word->text = talloc_strdup(word, text);
266 struct grub2_word *create_word_var(struct grub2_parser *parser,
267 const char *name, bool split)
269 struct grub2_word *word = talloc(parser, struct grub2_word);
270 word->type = GRUB2_WORD_VAR;
271 word->name = talloc_strdup(word, name);
278 struct grub2_argv *create_argv(struct grub2_parser *parser)
280 struct grub2_argv *argv = talloc(parser, struct grub2_argv);
281 list_init(&argv->words);
285 void argv_append(struct grub2_argv *argv, struct grub2_word *word)
287 list_add_tail(&argv->words, &word->argv_list);
290 void word_append(struct grub2_word *w1, struct grub2_word *w2)
296 struct grub2_parser *grub2_parser_create(struct discover_context *ctx)
298 struct grub2_parser *parser;
300 parser = talloc(ctx, struct grub2_parser);
301 yylex_init_extra(parser, &parser->scanner);
302 parser->script = create_script(parser, ctx);
307 void grub2_parser_parse(struct grub2_parser *parser, char *buf, int len)
309 YY_BUFFER_STATE bufstate;
312 bufstate = yy_scan_bytes(buf, len - 1, parser->scanner);
314 rc = yyparse(parser);
316 yy_delete_buffer(bufstate, parser->scanner);
319 script_execute(parser->script);