/* $NetBSD: scanner.l,v 1.1.1.1 2009/10/26 00:29:32 christos Exp $ */ /* * This file is part of flex. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE. */ %{ /* A scanner file to build "scanner.c". Input language is any text. "#include " causes a new scanner to be created. */ #include #include #include "config.h" %} %option 8bit outfile="scanner.c" prefix="test" %option nounput nomain noyywrap %option reentrant %option warn %x GET_FILENAME %% { ^"#include"[[:blank:]]+"<" { BEGIN(GET_FILENAME); } .|\n { ECHO; } } { [[:alnum:]_.-]+> { /* recurse */ yyscan_t scanner; FILE * fp; yytext[yyleng-1]='\0'; if((fp=fopen(yytext,"r"))==NULL) { fprintf(stderr,"*** Error: Could not open include file \"%s\".\n", yytext); yyterminate(); } yylex_init(&scanner); yyset_in( fp, scanner); yyset_out( stdout, scanner); yylex(scanner); yylex_destroy(scanner); BEGIN(0); } .|\n { fprintf(stderr,"Invalid input \"%s\".\n", yytext); yyterminate(); } } <> { fclose(yyin); yyterminate();} %% int main (int argc, char** argv); int main ( argc, argv ) int argc; char ** argv; { FILE * fp; yyscan_t scanner; if( argc != 2 ) { fprintf(stderr,"*** Error: Must specifiy one filename.\n"); exit(-1); } if((fp=fopen(argv[1],"r"))==NULL) { fprintf(stderr,"*** Error: fopen(%s) failed.\n",argv[1]); exit(-1); } yylex_init(&scanner); yyset_in( fp, scanner); yyset_out( stdout, scanner); yylex(scanner); yylex_destroy(scanner); printf("TEST RETURNING OK.\n"); return 0; }