nameSyntaxLex.l revision 7c478bd95313f5f23a4c958a745db2134aa03244
%{
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*
* Copyright (c) 2000 by Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <string.h>
/* this is the lexer for the libfru NamingSyntax */
/* parser.h MUST occur before nameSyntax.tab.h */
#include "Parser.h"
extern char *gParserString;
#undef input
#undef unput
#define input()(*gParserString++)
#define unput(c)(*--gParserString=c)
#undef lex_input
#define lex_input()(*gParserString++)
#include "y.tab.h"
/* Keep the separator symbols here because the lexer is the only one who knows
* about the string being parsed. */
%}
%%
"$" { return LAST; }
"+" { return ADD; }
"/" { return SEPIDENT; }
"[" { return ITERBEGIN; }
"]" { return ITEREND; }
[0-9]+ { yylval.num = atoi (yytext); return NUMBER; }
[_a-zA-Z0-9]+ { yylval.name = strdup(yytext); return NAME; }
%%