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 scanner file to build "scanner.c".
26 Input language is any text.
27 "#include <filename>" causes a new scanner to be created.
28 */
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include "config.h"
32 %}
33
34 %option 8bit outfile="scanner.c" prefix="test"
35 %option nounput nomain noyywrap
36 %option reentrant
37 %option warn
38
39 %x GET_FILENAME
40
41 %%
42
43 <INITIAL>{
44 ^"#include"[[:blank:]]+"<" { BEGIN(GET_FILENAME); }
45 .|\n { ECHO; }
46 }
47
48 <GET_FILENAME>{
49 [[:alnum:]_.-]+> {
50 /* recurse */
51 yyscan_t scanner;
52 FILE * fp;
53 yytext[yyleng-1]='\0';
54 if((fp=fopen(yytext,"r"))==NULL) {
55 fprintf(stderr,"*** Error: Could not open include file \"%s\".\n",
56 yytext);
57 yyterminate();
58 }
59 yylex_init(&scanner);
60 yyset_in( fp, scanner);
61 yyset_out( stdout, scanner);
62 yylex(scanner);
63 yylex_destroy(scanner);
64
65 BEGIN(0);
66 }
67 .|\n {
68 fprintf(stderr,"Invalid input \"%s\".\n", yytext);
69 yyterminate();
70 }
71 }
72
73 <<EOF>> { fclose(yyin); yyterminate();}
74
75 %%
76
77 int main (int argc, char** argv);
78
79 int
main(argc,argv)80 main ( argc, argv )
81 int argc;
82 char ** argv;
83 {
84 FILE * fp;
85 yyscan_t scanner;
86 if( argc != 2 ) {
87 fprintf(stderr,"*** Error: Must specifiy one filename.\n");
88 exit(-1);
89 }
90 if((fp=fopen(argv[1],"r"))==NULL) {
91 fprintf(stderr,"*** Error: fopen(%s) failed.\n",argv[1]);
92 exit(-1);
93 }
94 yylex_init(&scanner);
95 yyset_in( fp, scanner);
96 yyset_out( stdout, scanner);
97 yylex(scanner);
98 yylex_destroy(scanner);
99 printf("TEST RETURNING OK.\n");
100 return 0;
101 }
102