scripts/dtc/dtc-lexer.l

12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  *  You should have received a copy of the GNU General Public License
17  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
21 %option noyywrap nounput noinput never-interactive
27 PROPNODECHAR	[a-zA-Z0-9,._+*#?@-]
29 LABEL		[a-zA-Z_][a-zA-Z0-9_]*
39 #include "dtc-parser.tab.h"
54 #define DPRINT(fmt, ...)	do { } while (0)
71 			yytext[yyleng-1] = '\0';
75 <*>^"#"(line)?[ \t]+[0-9]+[ \t]+{STRING}([ \t]+[0-9]+)? {
87 			for (fnend = yytext + yyleng - 1;
88 			     *fnend != '"'; fnend--)
93 						     fnend - fnstart - 1);
96 			if (memchr(fn.val, '\0', fn.len - 1))
99 			/* -1 since #line is the number of the next line */
100 			srcpos_set_line(xstrdup(fn.val), atoi(line) - 1);
113 					yyleng-2);
117 <*>"/dts-v1/"	{
118 			DPRINT("Keyword: /dts-v1/\n");
141 <*>"/delete-property/"	{
142 			DPRINT("Keyword: /delete-property/\n");
148 <*>"/delete-node/"	{
149 			DPRINT("Keyword: /delete-node/\n");
158 			yylval.labelref[yyleng-1] = '\0';
162 <V1>([0-9]+|0[xX][0-9a-fA-F]+)(U|L|UL|LL|ULL)? {
166 			errno = 0;
167 			yylval.integer = strtoull(yytext, &e, 0);
180 				assert(errno == 0);
188 			d = data_copy_escape_string(yytext+1, yyleng-2);
191 				yylval.integer = 0;
193 				yylval.integer = (unsigned char)d.val[0];
198 						      d.len - 1);
211 <*>"&{/"{PATHCHAR}*\}	{	/* new-style path reference */
212 			yytext[yyleng-1] = '\0';
218 <BYTESTRING>[0-9a-fA-F]{2} {
232 			yylval.propnodename = xstrdup((yytext[0] == '\\') ?
244 <*>{COMMENT}+	/* eat C-style comments */
245 <*>{LINECOMMENT}+ /* eat C++-style comments */
257 			DPRINT("Char: %c (\\x%02x)\n", yytext[0],
258 				(unsigned)yytext[0]);
259 			if (yytext[0] == '[') {
263 			if ((yytext[0] == '{')
264 			    || (yytext[0] == ';')) {
268 			return yytext[0];
279 	yyin = current_srcfile->f;
287 	if (srcfile_pop() == 0)
291 	yyin = current_srcfile->f;