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
56 %token <word> TOKEN_WORD
64 parser->script->statements = $1;
67 statements: statement {
68 $$ = create_statements(parser);
69 statement_append($$, $1);
71 | statements statement {
72 statement_append($1, $2);
76 statement: TOKEN_EOL {
80 $$ = create_statement_simple(parser, $1);
82 | '{' statements '}' {
83 $$ = create_statement_block(parser, $2);
85 | "if" TOKEN_DELIM statement
89 $$ = create_statement_if(parser, $3, $6, NULL);
91 | "if" TOKEN_DELIM statement
97 $$ = create_statement_if(parser, $3, $6, $9);
99 | "function" TOKEN_DELIM word TOKEN_DELIM '{' statements '}' {
100 $$ = create_statement_function(parser, $3, $6);
102 | "menuentry" TOKEN_DELIM words TOKEN_DELIM
105 $$ = create_statement_menuentry(parser, $3, $6);
107 | "submenu" TOKEN_DELIM words TOKEN_DELIM
110 /* we just flatten everything */
111 $$ = create_statement_block(parser, $6);
115 $$ = create_argv(parser);
118 | words TOKEN_DELIM word {
130 void yyerror(struct grub2_parser *parser, char const *s)
132 fprintf(stderr, "%d: error: %s '%s'\n",
133 yyget_lineno(parser->scanner),
134 s, yyget_text(parser->scanner));
137 struct grub2_statements *create_statements(struct grub2_parser *parser)
139 struct grub2_statements *stmts = talloc(parser,
140 struct grub2_statements);
141 list_init(&stmts->list);
145 struct grub2_statement *create_statement_simple(struct grub2_parser *parser,
146 struct grub2_argv *argv)
148 struct grub2_statement_simple *stmt =
149 talloc(parser, struct grub2_statement_simple);
150 stmt->st.type = STMT_TYPE_SIMPLE;
151 stmt->st.exec = statement_simple_execute;
156 struct grub2_statement *create_statement_menuentry(struct grub2_parser *parser,
157 struct grub2_argv *argv, struct grub2_statements *stmts)
159 struct grub2_statement_menuentry *stmt =
160 talloc(parser, struct grub2_statement_menuentry);
161 stmt->st.type = STMT_TYPE_MENUENTRY;
162 stmt->st.exec = statement_menuentry_execute;
164 stmt->statements = stmts;
168 struct grub2_statement *create_statement_if(struct grub2_parser *parser,
169 struct grub2_statement *condition,
170 struct grub2_statements *true_case,
171 struct grub2_statements *false_case)
173 struct grub2_statement_if *stmt =
174 talloc(parser, struct grub2_statement_if);
175 stmt->st.type = STMT_TYPE_IF;
176 stmt->st.exec = statement_if_execute;
177 stmt->condition = condition;
178 stmt->true_case = true_case;
179 stmt->false_case = false_case;
183 struct grub2_statement *create_statement_block(struct grub2_parser *parser,
184 struct grub2_statements *stmts)
186 struct grub2_statement_block *stmt =
187 talloc(parser, struct grub2_statement_block);
188 stmt->st.type = STMT_TYPE_BLOCK;
189 stmt->st.exec = NULL;
190 stmt->statements = stmts;
194 struct grub2_statement *create_statement_function(struct grub2_parser *parser,
195 struct grub2_word *name, struct grub2_statements *body)
197 struct grub2_statement_function *stmt =
198 talloc(parser, struct grub2_statement_function);
199 stmt->st.exec = statement_function_execute;
205 void statement_append(struct grub2_statements *stmts,
206 struct grub2_statement *stmt)
210 list_add_tail(&stmts->list, &stmt->list);
213 struct grub2_word *create_word_text(struct grub2_parser *parser,
216 struct grub2_word *word = talloc(parser, struct grub2_word);
217 word->type = GRUB2_WORD_TEXT;
219 word->text = talloc_strdup(word, text);
225 struct grub2_word *create_word_var(struct grub2_parser *parser,
226 const char *name, bool split)
228 struct grub2_word *word = talloc(parser, struct grub2_word);
229 word->type = GRUB2_WORD_VAR;
230 word->name = talloc_strdup(word, name);
237 struct grub2_argv *create_argv(struct grub2_parser *parser)
239 struct grub2_argv *argv = talloc(parser, struct grub2_argv);
240 list_init(&argv->words);
244 void argv_append(struct grub2_argv *argv, struct grub2_word *word)
246 list_add_tail(&argv->words, &word->argv_list);
249 void word_append(struct grub2_word *w1, struct grub2_word *w2)
255 struct grub2_parser *grub2_parser_create(struct discover_context *ctx)
257 struct grub2_parser *parser;
259 parser = talloc(ctx, struct grub2_parser);
260 yylex_init_extra(parser, &parser->scanner);
261 parser->script = create_script(parser, ctx);
266 void grub2_parser_parse(struct grub2_parser *parser, char *buf, int len)
268 YY_BUFFER_STATE bufstate;
271 bufstate = yy_scan_bytes(buf, len - 1, parser->scanner);
273 rc = yyparse(parser);
275 yy_delete_buffer(bufstate, parser->scanner);
278 script_execute(parser->script);