2010-05-10 11:44:09 -07:00
|
|
|
%{
|
|
|
|
/*
|
|
|
|
* Copyright © 2010 Intel Corporation
|
|
|
|
*
|
|
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
|
|
* copy of this software and associated documentation files (the "Software"),
|
|
|
|
* to deal in the Software without restriction, including without limitation
|
|
|
|
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
|
|
* and/or sell copies of the Software, and to permit persons to whom the
|
|
|
|
* Software is furnished to do so, subject to the following conditions:
|
|
|
|
*
|
|
|
|
* The above copyright notice and this permission notice (including the next
|
|
|
|
* paragraph) shall be included in all copies or substantial portions of the
|
|
|
|
* Software.
|
|
|
|
*
|
|
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
|
|
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
|
|
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
|
|
|
* DEALINGS IN THE SOFTWARE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
|
2010-05-10 13:17:25 -07:00
|
|
|
#include "glcpp.h"
|
2010-05-10 11:44:09 -07:00
|
|
|
#include "glcpp-parse.h"
|
|
|
|
%}
|
|
|
|
|
2010-05-10 11:52:29 -07:00
|
|
|
%option reentrant noyywrap
|
2010-05-12 12:45:33 -07:00
|
|
|
%option extra-type="glcpp_parser_t *"
|
2010-05-10 11:44:09 -07:00
|
|
|
|
2010-05-10 16:16:06 -07:00
|
|
|
SPACE [[:space:]]
|
|
|
|
NONSPACE [^[:space:]]
|
2010-05-12 12:17:10 -07:00
|
|
|
NEWLINE [\n]
|
2010-05-10 16:16:06 -07:00
|
|
|
HSPACE [ \t]
|
2010-05-14 17:29:24 -07:00
|
|
|
HASH ^{HSPACE}*#{HSPACE}*
|
2010-05-10 16:16:06 -07:00
|
|
|
IDENTIFIER [_a-zA-Z][_a-zA-Z0-9]*
|
2010-05-25 13:09:03 -07:00
|
|
|
PUNCTUATION [][(){}.&*~!/%<>^|;,+-]
|
|
|
|
OTHER [^][(){}.&*~!/%<>^|;,=#[:space:]+-]+
|
2010-05-12 12:17:10 -07:00
|
|
|
|
2010-05-24 11:29:02 -07:00
|
|
|
DECIMAL_INTEGER [1-9][0-9]*[uU]?
|
|
|
|
OCTAL_INTEGER 0[0-7]*[uU]?
|
|
|
|
HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
|
|
|
|
|
2010-05-10 11:44:09 -07:00
|
|
|
%%
|
|
|
|
|
2010-05-25 13:09:03 -07:00
|
|
|
{HASH}define{HSPACE}+/{IDENTIFIER}"(" {
|
2010-05-25 16:59:02 -07:00
|
|
|
yyextra->space_tokens = 0;
|
2010-05-25 13:09:03 -07:00
|
|
|
return HASH_DEFINE_FUNC;
|
2010-05-20 22:27:07 -07:00
|
|
|
}
|
|
|
|
|
2010-05-25 13:09:03 -07:00
|
|
|
{HASH}define {
|
2010-05-25 16:59:02 -07:00
|
|
|
yyextra->space_tokens = 0;
|
2010-05-25 13:09:03 -07:00
|
|
|
return HASH_DEFINE_OBJ;
|
2010-05-24 11:29:02 -07:00
|
|
|
}
|
|
|
|
|
2010-05-25 13:09:03 -07:00
|
|
|
{HASH}undef {
|
2010-05-25 16:59:02 -07:00
|
|
|
yyextra->space_tokens = 0;
|
2010-05-25 13:09:03 -07:00
|
|
|
return HASH_UNDEF;
|
2010-05-24 11:29:02 -07:00
|
|
|
}
|
|
|
|
|
2010-05-26 09:32:12 -07:00
|
|
|
{HASH}if {
|
|
|
|
yyextra->space_tokens = 0;
|
|
|
|
return HASH_IF;
|
|
|
|
}
|
|
|
|
|
|
|
|
{HASH}elif {
|
|
|
|
yyextra->space_tokens = 0;
|
|
|
|
return HASH_ELIF;
|
|
|
|
}
|
|
|
|
|
|
|
|
{HASH}else {
|
|
|
|
yyextra->space_tokens = 0;
|
|
|
|
return HASH_ELSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
{HASH}endif {
|
|
|
|
yyextra->space_tokens = 0;
|
|
|
|
return HASH_ENDIF;
|
|
|
|
}
|
|
|
|
|
2010-05-25 13:09:03 -07:00
|
|
|
{HASH} {
|
2010-05-25 16:59:02 -07:00
|
|
|
yyextra->space_tokens = 0;
|
2010-05-25 13:09:03 -07:00
|
|
|
return HASH;
|
2010-05-20 22:27:07 -07:00
|
|
|
}
|
|
|
|
|
2010-05-26 09:32:12 -07:00
|
|
|
{DECIMAL_INTEGER} {
|
|
|
|
yylval.ival = strtoll (yytext, NULL, 10);
|
|
|
|
return INTEGER;
|
|
|
|
}
|
|
|
|
|
|
|
|
{OCTAL_INTEGER} {
|
|
|
|
yylval.ival = strtoll (yytext + 1, NULL, 8);
|
|
|
|
return INTEGER;
|
|
|
|
}
|
|
|
|
|
|
|
|
{HEXADECIMAL_INTEGER} {
|
|
|
|
yylval.ival = strtoll (yytext + 2, NULL, 16);
|
|
|
|
return INTEGER;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
{IDENTIFIER} {
|
2010-05-25 13:09:03 -07:00
|
|
|
yylval.str = xtalloc_strdup (yyextra, yytext);
|
|
|
|
return IDENTIFIER;
|
2010-05-24 10:37:38 -07:00
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"<<" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return LEFT_SHIFT;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
">>" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return RIGHT_SHIFT;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"<=" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return LESS_OR_EQUAL;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
">=" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return GREATER_OR_EQUAL;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"==" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return EQUAL;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"!=" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return NOT_EQUAL;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"&&" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return AND;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"||" {
|
2010-05-24 10:37:38 -07:00
|
|
|
return OR;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
"##" {
|
2010-05-25 13:09:03 -07:00
|
|
|
return PASTE;
|
2010-05-20 22:27:07 -07:00
|
|
|
}
|
|
|
|
|
2010-05-26 09:32:12 -07:00
|
|
|
"defined" {
|
|
|
|
return DEFINED;
|
|
|
|
}
|
|
|
|
|
2010-05-25 16:59:02 -07:00
|
|
|
{PUNCTUATION} {
|
2010-05-25 13:09:03 -07:00
|
|
|
return yytext[0];
|
2010-05-19 13:28:24 -07:00
|
|
|
}
|
|
|
|
|
2010-05-25 15:04:32 -07:00
|
|
|
{OTHER}+ {
|
|
|
|
yylval.str = xtalloc_strdup (yyextra, yytext);
|
|
|
|
return OTHER;
|
|
|
|
}
|
|
|
|
|
|
|
|
{HSPACE}+ {
|
2010-05-25 16:59:02 -07:00
|
|
|
if (yyextra->space_tokens) {
|
|
|
|
return SPACE;
|
|
|
|
}
|
2010-05-12 13:19:23 -07:00
|
|
|
}
|
|
|
|
|
2010-05-25 15:04:32 -07:00
|
|
|
\n {
|
|
|
|
return NEWLINE;
|
|
|
|
}
|
|
|
|
|
2010-05-10 11:44:09 -07:00
|
|
|
%%
|