dma(8) : update to version 0.9
[dragonfly.git] / libexec / dma / aliases_parse.y
CommitLineData
f67beddd 1%{
f67beddd
MS
2
3#include <err.h>
4#include <string.h>
14dfb991 5#include <syslog.h>
f67beddd
MS
6#include "dma.h"
7
8extern int yylineno;
dba19026 9static void yyerror(const char *);
f67beddd 10int yywrap(void);
dba19026 11int yylex(void);
f67beddd 12
dba19026 13static void
f67beddd
MS
14yyerror(const char *msg)
15{
14dfb991
JG
16 /**
17 * Because we do error '\n' below, we need to report the error
18 * one line above of what yylineno points to.
19 */
20 syslog(LOG_CRIT, "aliases line %d: %s", yylineno - 1, msg);
21 fprintf(stderr, "aliases line %d: %s\n", yylineno - 1, msg);
f67beddd
MS
22}
23
24int
25yywrap(void)
26{
27 return (1);
28}
29
30%}
31
32%union {
33 char *ident;
34 struct stritem *strit;
35 struct alias *alias;
36}
37
38%token <ident> T_IDENT
39%token T_ERROR
40%token T_EOF 0
41
42%type <strit> dests
43%type <alias> alias aliases
44
45%%
46
47start : aliases T_EOF
48 {
49 LIST_FIRST(&aliases) = $1;
50 }
51
52aliases : /* EMPTY */
53 {
54 $$ = NULL;
55 }
56 | alias aliases
57 {
58 if ($2 != NULL && $1 != NULL)
59 LIST_INSERT_AFTER($2, $1, next);
60 else if ($2 == NULL)
61 $2 = $1;
62 $$ = $2;
63 }
64 ;
65
66alias : T_IDENT ':' dests '\n'
67 {
68 struct alias *al;
69
70 if ($1 == NULL)
71 YYABORT;
72 al = calloc(1, sizeof(*al));
73 if (al == NULL)
74 YYABORT;
75 al->alias = $1;
76 SLIST_FIRST(&al->dests) = $3;
77 $$ = al;
78 }
79 | error '\n'
80 {
14dfb991 81 YYABORT;
f67beddd
MS
82 }
83 ;
84
85dests : T_IDENT
86 {
87 struct stritem *it;
88
89 if ($1 == NULL)
90 YYABORT;
91 it = calloc(1, sizeof(*it));
92 if (it == NULL)
93 YYABORT;
94 it->str = $1;
95 $$ = it;
96 }
97 | T_IDENT ',' dests
98 {
99 struct stritem *it;
100
101 if ($1 == NULL)
102 YYABORT;
103 it = calloc(1, sizeof(*it));
104 if (it == NULL)
105 YYABORT;
106 it->str = $1;
107 SLIST_NEXT(it, next) = $3;
108 $$ = it;
109 }
110 ;
111
112%%