usr.sbin/wsmoused/config_yacc.y

   1 /* $NetBSD: config_yacc.y,v 1.3 2003/08/06 22:11:49 jmmv Exp $ */
   2
   3 /*
   4  * Copyright (c) 2003 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Julio M. Merino Vidal.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. The name authors may not be used to endorse or promote products
  16  *    derived from this software without specific prior written
  17  *    permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS
  20  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  21  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY
  23  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  25  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  27  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  28  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  29  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 %{
  33
  34 #include <sys/cdefs.h>
  35
  36 #ifndef lint
  37 __RCSID("$NetBSD: config_yacc.y,v 1.3 2003/08/06 22:11:49 jmmv Exp $");
  38 #endif /* not lint */
  39
  40 #include <sys/time.h>
  41 #include <dev/wscons/wsconsio.h>
  42 #include <err.h>
  43 #include <errno.h>
  44 #include <stdio.h>
  45 #include <stdarg.h>
  46 #include <string.h>
  47 #include <stdlib.h>
  48
  49 #include "wsmoused.h"
  50
  51 int yylex(void);
  52 int yyparse(void);
  53 int yyerror(const char *, ...);
  54 void yyrestart(FILE *);
  55 struct block *config_parse(FILE *);
  56
  57 int yyline;
  58 static struct block *Conf;
  59
  60 %}
  61
  62 %token TK_EOL
  63 %token TK_EQUAL TK_LBRACE TK_RBRACE
  64 %token TK_STRING TK_MODE TK_MODEPROP
  65 %type <string> TK_STRING TK_MODEPROP
  66 %type <prop> modeprop
  67 %type <block> main outermode mode
  68 %union {
  69         char *string;
  70         struct prop *prop;
  71         struct block *block;
  72 }
  73
  74 %%
  75
  76 Config :
  77           main                  { Conf = $1;
  78                                   Conf->b_name = strdup("global"); }
  79 ;
  80
  81 /* Matches the whole configuration file and constructs a block defining it.
  82    Can contain mode properties (common to all modes) and mode definitions. */
  83 main :
  84           modeprop              { struct block *b = block_new(BLOCK_GLOBAL);
  85                                   block_add_prop(b, $1);
  86                                   $$ = b; }
  87         | main modeprop         { block_add_prop($1, $2); }
  88         | outermode             { struct block *b = block_new(BLOCK_GLOBAL);
  89                                   block_add_child(b, $1);
  90                                   $$ = b; }
  91         | main outermode        { block_add_child($1, $2); }
  92         | error TK_EOL          { yyerrok; }
  93 ;
  94
  95 /* Defines the aspect of a mode definition.  Returns the block given by the
  96    mode definition itself. */
  97 outermode :
  98           TK_MODE TK_STRING TK_LBRACE mode TK_RBRACE
  99                                 { $4->b_name = strdup($2);
 100                                   $$ = $4; }
 101         | TK_MODE TK_STRING TK_LBRACE TK_RBRACE
 102                                 { $$ = block_new(BLOCK_MODE);
 103                                   $$->b_name = strdup($2); }
 104 ;
 105
 106 /* Matches a mode and returns a block defining it.  Contains properties */
 107 mode :
 108           modeprop              { struct block *b = block_new(BLOCK_MODE);
 109                                   block_add_prop(b, $1);
 110                                   $$ = b; }
 111         | mode modeprop         { block_add_prop($1, $2); }
 112         | error TK_EOL          { yyerrok; }
 113 ;
 114
 115 /* Matches a mode property and returns a prop defining it. */
 116 modeprop :
 117         TK_MODEPROP TK_EQUAL TK_STRING TK_EOL
 118                                 { struct prop *p = prop_new();
 119                                   p->p_name = strdup($1);
 120                                   p->p_value = strdup($3);
 121                                   $$ = p; }
 122 ;
 123
 124 %%
 125
 126 int
 127 yyerror(const char *fmt, ...)
 128 {
 129         va_list ap;
 130
 131         va_start(ap, fmt);
 132         fprintf(stderr, "%s: ", getprogname());
 133         vfprintf(stderr, fmt, ap);
 134         fprintf(stderr, " in line %d\n", yyline);
 135         va_end(ap);
 136         return (0);
 137 }
 138
 139 struct block *
 140 config_parse(FILE *f)
 141 {
 142         Conf = NULL;
 143         yyrestart(f);
 144         yyline = 1;
 145         yyparse();
 146
 147         return Conf;
 148 }