scripts/dtc/dtc-lexer.l

1 /* SPDX-License-Identifier: GPL-2.0-or-later */
6 %option noyywrap nounput noinput never-interactive
12 PROPNODECHAR	[a-zA-Z0-9,._+*#?@-]
14 LABEL		[a-zA-Z_][a-zA-Z0-9_]*
24 #include "dtc-parser.tab.h"
39 #define DPRINT(fmt, ...)	do { } while (0)
56 			yytext[yyleng-1] = '\0';
60 <*>^"#"(line)?[ \t]+[0-9]+[ \t]+{STRING}([ \t]+[0-9]+)* {
72 			for (fnend = yytext + yyleng - 1;
73 			     *fnend != '"'; fnend--)
78 						     fnend - fnstart - 1);
81 			if (memchr(fn.val, '\0', fn.len - 1))
84 			/* -1 since #line is the number of the next line */
85 			srcpos_set_line(xstrdup(fn.val), atoi(line) - 1);
98 					yyleng-2);
102 <*>"/dts-v1/"	{
103 			DPRINT("Keyword: /dts-v1/\n");
126 <*>"/delete-property/"	{
127 			DPRINT("Keyword: /delete-property/\n");
133 <*>"/delete-node/"	{
134 			DPRINT("Keyword: /delete-node/\n");
140 <*>"/omit-if-no-ref/"	{
141 			DPRINT("Keyword: /omit-if-no-ref/\n");
150 			yylval.labelref[yyleng-1] = '\0';
154 <V1>([0-9]+|0[xX][0-9a-fA-F]+)(U|L|UL|LL|ULL)? {
158 			errno = 0;
159 			yylval.integer = strtoull(yytext, &e, 0);
172 				assert(errno == 0);
180 			d = data_copy_escape_string(yytext+1, yyleng-2);
183 				yylval.integer = 0;
185 				yylval.integer = (unsigned char)d.val[0];
190 						      d.len - 1);
203 <*>"&{"{PATHCHAR}*\}	{	/* new-style path reference */
204 			yytext[yyleng-1] = '\0';
210 <BYTESTRING>[0-9a-fA-F]{2} {
224 			yylval.propnodename = xstrdup((yytext[0] == '\\') ?
236 <*>{COMMENT}+	/* eat C-style comments */
237 <*>{LINECOMMENT}+ /* eat C++-style comments */
249 			DPRINT("Char: %c (\\x%02x)\n", yytext[0],
250 				(unsigned)yytext[0]);
251 			if (yytext[0] == '[') {
255 			if ((yytext[0] == '{')
256 			    || (yytext[0] == ';')) {
260 			return yytext[0];
271 	yyin = current_srcfile->f;
279 	if (srcfile_pop() == 0)
283 	yyin = current_srcfile->f;