home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / bsd_srcs / usr.sbin / htable / scan.l < prev    next >
Encoding:
Lex Description  |  1991-04-19  |  2.8 KB  |  101 lines
  1. %{
  2. /*-
  3.  * Copyright (c) 1983 The Regents of the University of California.
  4.  * All rights reserved.
  5.  *
  6.  * Redistribution and use in source and binary forms, with or without
  7.  * modification, are permitted provided that the following conditions
  8.  * are met:
  9.  * 1. Redistributions of source code must retain the above copyright
  10.  *    notice, this list of conditions and the following disclaimer.
  11.  * 2. Redistributions in binary form must reproduce the above copyright
  12.  *    notice, this list of conditions and the following disclaimer in the
  13.  *    documentation and/or other materials provided with the distribution.
  14.  * 3. All advertising materials mentioning features or use of this software
  15.  *    must display the following acknowledgement:
  16.  *    This product includes software developed by the University of
  17.  *    California, Berkeley and its contributors.
  18.  * 4. Neither the name of the University nor the names of its contributors
  19.  *    may be used to endorse or promote products derived from this software
  20.  *    without specific prior written permission.
  21.  *
  22.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  23.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  24.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  25.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  26.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  27.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  28.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  29.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  30.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  31.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  32.  * SUCH DAMAGE.
  33.  */
  34.  
  35. #ifndef lint
  36. static char sccsid[] = "@(#)scan.l    5.8 (Berkeley) 4/19/91";
  37. #endif /* not lint */
  38.  
  39. extern int yylineno;
  40. int yylineno = 1;
  41.  
  42. #include "y.tab.h"
  43. #include "htable.h"
  44. %}
  45.  
  46. BLANK    [ \t]
  47. DIGIT    [0-9]
  48. ALPHA    [A-Za-z]
  49. ANUM    [0-9A-Za-z]
  50. NAMECHR    [0-9A-Za-z./-]
  51.  
  52. %%
  53. "NET"        {
  54.             yylval.number = KW_NET;
  55.             return (KEYWORD);
  56.         }
  57.  
  58. "GATEWAY"    {
  59.             yylval.number = KW_GATEWAY;
  60.             return (KEYWORD);
  61.         }
  62.  
  63. "HOST"        {
  64.             yylval.number = KW_HOST;
  65.             return (KEYWORD);
  66.         }
  67.  
  68. {ALPHA}{NAMECHR}*{ANUM}    {
  69.             yylval.namelist = newname(yytext);
  70.             return (NAME);
  71.         }
  72.  
  73. {ALPHA}        {
  74.             yylval.namelist = newname(yytext);
  75.             return (NAME);
  76.         }
  77.  
  78. {DIGIT}+{ALPHA}{NAMECHR}* {
  79.             fprintf(stderr, "Warning: nonstandard name \"%s\"\n",
  80.                 yytext);
  81.             yylval.namelist = newname(yytext);
  82.             return (NAME);
  83.         }
  84.  
  85. {DIGIT}+    {
  86.             yylval.number = atoi(yytext);
  87.             return (NUMBER);
  88.         }
  89.  
  90. "."        return ('.');
  91. ":"        return (':');
  92. ","        return (',');
  93. "/"        return ('/');
  94. ";".*        ;
  95. "\n"{BLANK}+    ++yylineno;
  96. {BLANK}+    ;
  97. "\n"        ++yylineno; return (END);
  98. .        fprintf(stderr, "Illegal char: '%s'\n", yytext);
  99.  
  100. %%
  101.