annotate extensions/rt_deny_by_size/rt_deny_by_size_conf.y @ 1554:566bb46cc73f

Updated copyright information
author Sebastien Decugis <sdecugis@freediameter.net>
date Tue, 06 Oct 2020 21:34:53 +0800
parents 56f9e13f0ef0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1340
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
1 /*********************************************************************************************************
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
2 * Software License Agreement (BSD License) *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
3 * Author: Thomas Klausner <tk@giga.or.at> *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
4 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
5 * Copyright (c) 2018, Thomas Klausner *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
6 * All rights reserved. *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
7 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
8 * Written under contract by Effortel Technologies SA, http://effortel.com/ *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
9 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
10 * Redistribution and use of this software in source and binary forms, with or without modification, are *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
11 * permitted provided that the following conditions are met: *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
12 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
13 * * Redistributions of source code must retain the above *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
14 * copyright notice, this list of conditions and the *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
15 * following disclaimer. *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
16 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
17 * * Redistributions in binary form must reproduce the above *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
18 * copyright notice, this list of conditions and the *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
19 * following disclaimer in the documentation and/or other *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
20 * materials provided with the distribution. *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
21 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
22 * * Neither the name of the WIDE Project or NICT nor the *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
23 * names of its contributors may be used to endorse or *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
24 * promote products derived from this software without *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
25 * specific prior written permission of WIDE Project and *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
26 * NICT. *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
27 * *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
28 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
29 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
30 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
31 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
32 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
34 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
35 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. *
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
36 *********************************************************************************************************/
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
37
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
38 /* Yacc extension's configuration parser.
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
39 */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
40
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
41 /* For development only : */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
42 %debug
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
43 %error-verbose
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
44
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
45 /* The parser receives the configuration file filename as parameter */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
46 %parse-param {char * conffile}
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
47
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
48 /* Keep track of location */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
49 %locations
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
50 %pure-parser
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
51
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
52 %{
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
53 #include "rt_deny_by_size.h"
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
54 #include "rt_deny_by_size_conf.tab.h"
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
55
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
56 /* Forward declaration */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
57 int rt_deny_by_size_confparse(char *conffile);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
58 void rt_deny_by_size_confrestart(FILE *input_file);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
59
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
60 /* Parse the configuration file */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
61 int rt_deny_by_size_conf_handle(char * conffile)
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
62 {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
63 extern FILE *rt_deny_by_size_confin;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
64 int ret;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
65
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
66 TRACE_ENTRY("%p", conffile);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
67
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
68 TRACE_DEBUG(FULL, "Parsing configuration file: %s...", conffile);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
69
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
70 rt_deny_by_size_confin = fopen(conffile, "r");
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
71 if (rt_deny_by_size_confin == NULL) {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
72 ret = errno;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
73 TRACE_ERROR("Unable to open extension configuration file %s for reading: %s", conffile, strerror(ret));
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
74 return ret;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
75 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
76
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
77 rt_deny_by_size_confrestart(rt_deny_by_size_confin);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
78 ret = rt_deny_by_size_confparse(conffile);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
79
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
80 fclose(rt_deny_by_size_confin);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
81
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
82 if (ret != 0) {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
83 TRACE_ERROR( "Unable to parse the configuration file %s.", conffile);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
84 return EINVAL;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
85 } else {
1362
56f9e13f0ef0 Fix typo in debug message.
Thomas Klausner <tk@giga.or.at>
parents: 1340
diff changeset
86 TRACE_DEBUG(FULL, "[rt_deny_by_size] MaximumSize: %d.", rt_deny_by_size_conf.maximum_size);
1340
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
87 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
88
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
89 return 0;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
90 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
91
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
92 /* The Lex parser prototype */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
93 int rt_deny_by_size_conflex(YYSTYPE *lvalp, YYLTYPE *llocp);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
94
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
95 /* Function to report the errors */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
96 void yyerror (YYLTYPE *ploc, char * conffile, char const *s)
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
97 {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
98 TRACE_DEBUG(INFO, "Error in configuration parsing");
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
99
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
100 if (ploc->first_line != ploc->last_line)
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
101 fd_log_error("%s:%d.%d-%d.%d : %s", conffile, ploc->first_line, ploc->first_column, ploc->last_line, ploc->last_column, s);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
102 else if (ploc->first_column != ploc->last_column)
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
103 fd_log_error("%s:%d.%d-%d : %s", conffile, ploc->first_line, ploc->first_column, ploc->last_column, s);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
104 else
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
105 fd_log_error("%s:%d.%d : %s", conffile, ploc->first_line, ploc->first_column, s);
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
106 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
107
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
108 %}
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
109
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
110 /* Values returned by lex for token */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
111 %union {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
112 int integer;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
113 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
114
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
115 /* In case of error in the lexical analysis */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
116 %token LEX_ERROR
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
117
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
118 /* A (de)quoted string (malloc'd in lex parser; it must be freed after use) */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
119 %token <integer> INTEGER
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
120
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
121 /* Tokens */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
122 %token MAXIMUMSIZE
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
123
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
124
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
125 /* -------------------------------------- */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
126 %%
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
127
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
128 /* The grammar definition */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
129 conffile: /* empty is OK */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
130 | conffile size
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
131 | conffile errors
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
132 {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
133 yyerror(&yylloc, conffile, "An error occurred while parsing the configuration file");
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
134 YYABORT;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
135 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
136 ;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
137
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
138 /* Lexical or syntax error */
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
139 errors: LEX_ERROR
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
140 | error
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
141 ;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
142
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
143 size: MAXIMUMSIZE '=' INTEGER ';'
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
144 {
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
145 rt_deny_by_size_conf.maximum_size=$3;
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
146 }
daf61e573fee rt_deny_by_size: new extension
Thomas Klausner <tk@giga.or.at>
parents:
diff changeset
147 ;
"Welcome to our mercurial repository"