external/bsd/flex/dist/tests/test-rescan-r/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 /* A template scanner file to build "scanner.c". */
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 %}
  29
  30 %option 8bit outfile="scanner.c" prefix="test"
  31 %option nounput nomain noyywrap reentrant
  32 %option warn stack never-interactive
  33 %x STATE_1
  34
  35 %%
  36
  37 <INITIAL>{
  38 0              yy_push_state (STATE_1, yyscanner);
  39 .|\n           return 1;
  40 }
  41 <STATE_1>{
  42 1              yy_pop_state(yyscanner);
  43 .|\n           return yy_top_state(yyscanner) + 1;
  44 }
  45
  46 %%
  47
  48 int
  49 main (int argc, char* const argv[])
  50 {
  51     FILE* fp;
  52     int i;
  53     yyscan_t  yyscanner;
  54
  55     if ((fp = fopen(argv[1],"r")) == NULL){
  56         perror("Failed to open input file.");
  57         return 1;
  58     }
  59
  60     printf("Test 1: Reusing same scanner.\n");
  61     yylex_init( &yyscanner );
  62     yyset_out ( stdout, yyscanner);
  63
  64     for (i=0; i <  4; ++i){
  65
  66         rewind(fp);
  67         yyset_in  ( fp, yyscanner);
  68
  69         while( yylex(yyscanner) )
  70             ;
  71     }
  72     yylex_destroy( yyscanner );
  73     printf("Test 1 OK\n\n");
  74
  75     printf("Test 2: Rescanning with new scanner each time.\n");
  76
  77     memset(&yyscanner,0,sizeof(yyscanner)); // Just to be clean about it.
  78
  79     for (i=0; i < 4; ++i){
  80         yyscan_t  s;
  81         yylex_init( &s );
  82         yyset_out ( stdout, s);
  83         rewind(fp);
  84         yyset_in  ( fp, s);
  85
  86         while( yylex(s) )
  87             ;
  88         yylex_destroy( s );
  89     }
  90     printf("Test 2 OK\n\n");
  91
  92
  93     printf("TEST RETURNING OK.\n");
  94     return 0;
  95 }