external/bsd/flex/dist/tests/test-bison-yylloc/scanner.l

   1 /*
   2  * This file is part of flex.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  *
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * Neither the name of the University nor the names of its contributors
  15  * may be used to endorse or promote products derived from this software
  16  * without specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  19  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  20  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  21  * PURPOSE.
  22  */
  23
  24 %{
  25 /* The scanner expects to link to bison yylval . */
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include "parser.h"
  29 #include "config.h"
  30 static char* STRDUP(char* s1);
  31 #define YY_EXTRA_TYPE int
  32 %}
  33
  34 %option 8bit outfile="scanner.c" prefix="test"
  35 %option reentrant bison-bridge bison-locations yylineno
  36 %option nomain nounput noyy_top_state noyywrap nodefault warn
  37 %option prefix="test" header="scanner.h"
  38
  39
  40 %%
  41
  42     if ( !yyextra)
  43         yyextra = 1;
  44
  45 ^[[:digit:]]+  {
  46         yylval->lineno = yyextra++;
  47         yylloc->first_line = (int)strtol(yytext,NULL,10);
  48         return LINENO;
  49     }
  50 ":"  { return COLON; }
  51 " "  { return SPACE; }
  52 "="  { return EQUAL; }
  53 [[:alnum:]_]+ {  yylval->str = STRDUP(yytext); return IDENT;}
  54
  55 \r|\n { }
  56 .     { yyterminate();}
  57 %%
  58
  59
  60 static char* STRDUP(char* s1)
  61 {
  62     char* s2 = (char*)malloc(strlen(s1)+1);
  63     sprintf(s2,"%s",s1);
  64     return s2;
  65 }