usr.sbin/ndiscvt/inf-token.l

   1 %{
   2 /*
   3  * Copyright (c) 2003
   4  *      Bill Paul <wpaul@windriver.com>.  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 Bill Paul.
  17  * 4. Neither the name of the author nor the names of any co-contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD
  25  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
  31  * THE POSSIBILITY OF SUCH DAMAGE.
  32  *
  33  * $DragonFly: src/usr.sbin/ndiscvt/inf-token.l,v 1.1 2004/07/30 00:24:24 dillon Exp $
  34  */
  35
  36 #include <sys/types.h>
  37 #include <ctype.h>
  38 #include <err.h>
  39 #include <stdio.h>
  40 #include <stdlib.h>
  41 #include <string.h>
  42 #include <regex.h>
  43 #include "y.tab.h"
  44
  45 int lineno = 1;
  46 #define YY_NO_UNPUT
  47
  48 int yylex(void);
  49 void yyerror(const char *);
  50
  51 static void
  52 update_lineno(const char *cp)
  53 {
  54         while (*cp)
  55                 if (*cp++ == '\n')
  56                         lineno++;
  57 }
  58
  59 %}
  60
  61 %%
  62
  63 [ \t]+                  ;
  64 \n                      { lineno++; return EOL; }
  65 \r                      ;
  66 ;.*$                    ;
  67 \/\/.*$                 ;
  68 =                       { return EQUALS; }
  69 ,                       { return COMMA; }
  70 \"(\\\"|[^"]|\"\")*\"   {
  71                         int len = strlen(yytext) - 2;
  72                         int blen = len + 1;
  73                         char *walker;
  74                         int i;
  75                         update_lineno(yytext);
  76                         yylval.str = (char *)malloc(blen);
  77                         if (yylval.str == NULL)
  78                                 goto out;
  79                         walker = yylval.str;
  80                         for (i = 1; i <= len; i++) {
  81                                 if (yytext[i] == '\"') {
  82                                         switch (yytext[i + 1]) {
  83                                         case '\"':
  84                                                 i++;
  85                                                 break;
  86                                         default:
  87                                                 break;
  88                                         }
  89                                 }
  90                                 if (yytext[i] == '\\') {
  91                                         switch (yytext[i + 1]) {
  92                                         case '\n':
  93                                                 i += 2;
  94                                                 while(isspace(yytext[i]))
  95                                                         i++;
  96                                                 break;
  97                                         case '\"':
  98                                                 i++;
  99                                                 break;
 100                                         case '(':
 101                                                 i++;
 102                                                 break;
 103                                         default:
 104                                                 break;
 105                                         }
 106                                 }
 107                                 *walker++ = yytext[i];
 108                         }
 109                         *walker++ = '\0';
 110                         out:;
 111                         return STRING;
 112                         }
 113 \[[a-zA-Z0-9%&\{\}\-\.\/_\\\*\ ]+\]     {
 114                                 int len = strlen(yytext);
 115                                 yytext[len-1] = '\0';
 116                                 yylval.str = strdup(yytext+1);
 117                                 return SECTION;
 118                         }
 119 [a-zA-Z0-9%&\{\}\-\.\/_\\\*]+           {
 120                                 yylval.str = strdup(yytext);
 121                                 return WORD;
 122                         }
 123 %%
 124
 125 void
 126 yyerror(const char *s)
 127 {
 128         errx(1, "line %d: %s%s %s.", lineno, yytext, yytext?":":"", s);
 129 }