bin/yacc/error.c

   1 /*              $OpenBSD: error.c,v 1.14 2014/03/08 01:05:39 tedu Exp $         */
   2 /*              $NetBSD: error.c,v 1.4 1996/03/19 03:21:32 jtc Exp $            */
   3
   4 /*
   5  * Copyright (c) 1989 The Regents of the University of California.
   6  * All rights reserved.
   7  *
   8  * This code is derived from software contributed to Berkeley by
   9  * Robert Paul Corbett.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  * 3. Neither the name of the University nor the names of its contributors
  20  *    may be used to endorse or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  34  */
  35
  36 /* routines for printing error messages  */
  37
  38 #include "defs.h"
  39
  40
  41 void
  42 fatal(char *msg)
  43 {
  44         fprintf(stderr, "%s: %s\n", input_file_name, msg);
  45         done(2);
  46 }
  47
  48
  49 void
  50 no_space(void)
  51 {
  52         fprintf(stderr, "%s: yacc is out of space\n", input_file_name);
  53         done(2);
  54 }
  55
  56
  57 void
  58 open_error(char *filename)
  59 {
  60         fprintf(stderr, "%s: cannot open source file %s\n",
  61             input_file_name, filename);
  62         done(2);
  63 }
  64
  65 void
  66 open_write_error(char *filename)
  67 {
  68         fprintf(stderr, "%s: cannot open target file %s for writing\n",
  69             input_file_name, filename);
  70         done(2);
  71 }
  72
  73 void
  74 unexpected_EOF(void)
  75 {
  76         fprintf(stderr, "%s:%d: unexpected end-of-file\n",
  77             input_file_name, lineno);
  78         done(1);
  79 }
  80
  81
  82 void
  83 print_pos(char *st_line, char *st_cptr)
  84 {
  85         char *s;
  86
  87         if (st_line == 0)
  88                 return;
  89         for (s = st_line; *s != '\n'; ++s) {
  90                 if (isprint((unsigned char)*s) || *s == '\t')
  91                         putc(*s, stderr);
  92                 else
  93                         putc('?', stderr);
  94         }
  95         putc('\n', stderr);
  96         for (s = st_line; s < st_cptr; ++s) {
  97                 if (*s == '\t')
  98                         putc('\t', stderr);
  99                 else
 100                         putc(' ', stderr);
 101         }
 102         putc('^', stderr);
 103         putc('\n', stderr);
 104 }
 105
 106 void
 107 syntax_error(int st_lineno, char *st_line, char *st_cptr)
 108 {
 109         fprintf(stderr, "%s:%d: syntax error\n",
 110             input_file_name, st_lineno);
 111         print_pos(st_line, st_cptr);
 112         done(1);
 113 }
 114
 115 void
 116 unterminated_comment(int c_lineno, char *c_line, char *c_cptr)
 117 {
 118         fprintf(stderr, "%s:%d: unmatched /*\n",
 119             input_file_name, c_lineno);
 120         print_pos(c_line, c_cptr);
 121         done(1);
 122 }
 123
 124 void
 125 unterminated_string(int s_lineno, char *s_line, char *s_cptr)
 126 {
 127         fprintf(stderr, "%s:%d:, unterminated string\n",
 128             input_file_name, s_lineno);
 129         print_pos(s_line, s_cptr);
 130         done(1);
 131 }
 132
 133 void
 134 unterminated_text(int t_lineno, char *t_line, char *t_cptr)
 135 {
 136         fprintf(stderr, "%s:%d: unmatched %%{\n",
 137             input_file_name, t_lineno);
 138         print_pos(t_line, t_cptr);
 139         done(1);
 140 }
 141
 142 void
 143 unterminated_union(int u_lineno, char *u_line, char *u_cptr)
 144 {
 145         fprintf(stderr, "%s:%d: unterminated %%union declaration\n",
 146             input_file_name, u_lineno);
 147         print_pos(u_line, u_cptr);
 148         done(1);
 149 }
 150
 151 void
 152 over_unionized(char *u_cptr)
 153 {
 154         fprintf(stderr, "%s:%d: too many %%union declarations\n",
 155             input_file_name, lineno);
 156         print_pos(line, u_cptr);
 157         done(1);
 158 }
 159
 160 void
 161 illegal_tag(int t_lineno, char *t_line, char *t_cptr)
 162 {
 163         fprintf(stderr, "%s:%d: illegal tag\n",
 164             input_file_name, t_lineno);
 165         print_pos(t_line, t_cptr);
 166         done(1);
 167 }
 168
 169
 170 void
 171 illegal_character(char *c_cptr)
 172 {
 173         fprintf(stderr, "%s:%d: illegal character\n",
 174             input_file_name, lineno);
 175         print_pos(line, c_cptr);
 176         done(1);
 177 }
 178
 179
 180 void
 181 used_reserved(char *s)
 182 {
 183         fprintf(stderr, "%s:%d: illegal use of reserved symbol %s\n",
 184             input_file_name, lineno, s);
 185         done(1);
 186 }
 187
 188 void
 189 tokenized_start(char *s)
 190 {
 191         fprintf(stderr, "%s:%d: the start symbol %s cannot be declared to be a token\n",
 192             input_file_name, lineno, s);
 193         done(1);
 194 }
 195
 196 void
 197 retyped_warning(char *s)
 198 {
 199         fprintf(stderr, "%s:%d: the type of %s has been redeclared\n",
 200             input_file_name, lineno, s);
 201 }
 202
 203 void
 204 reprec_warning(char *s)
 205 {
 206         fprintf(stderr, "%s:%d: the precedence of %s has been redeclared\n",
 207             input_file_name, lineno, s);
 208 }
 209
 210 void
 211 revalued_warning(char *s)
 212 {
 213         fprintf(stderr, "%s:%d: the value of %s has been redeclared\n",
 214             input_file_name, lineno, s);
 215 }
 216
 217 void
 218 terminal_start(char *s)
 219 {
 220         fprintf(stderr, "%s:%d: the start symbol %s is a token\n",
 221             input_file_name, lineno, s);
 222         done(1);
 223 }
 224
 225 void
 226 restarted_warning(void)
 227 {
 228         fprintf(stderr, "%s:%d: the start symbol has been redeclared\n",
 229              input_file_name, lineno);
 230 }
 231
 232 void
 233 no_grammar(void)
 234 {
 235         fprintf(stderr, "%s:%d: no grammar has been specified\n",
 236             input_file_name, lineno);
 237         done(1);
 238 }
 239
 240 void
 241 terminal_lhs(int s_lineno)
 242 {
 243         fprintf(stderr, "%s:%d: a token appears on the lhs of a production\n",
 244             input_file_name, s_lineno);
 245         done(1);
 246 }
 247
 248 void
 249 prec_redeclared(void)
 250 {
 251         fprintf(stderr, "%s:%d: conflicting %%prec specifiers\n",
 252             input_file_name, lineno);
 253 }
 254
 255 void
 256 unterminated_action(int a_lineno, char *a_line, char *a_cptr)
 257 {
 258         fprintf(stderr, "%s:%d: unterminated action\n",
 259             input_file_name, a_lineno);
 260         print_pos(a_line, a_cptr);
 261         done(1);
 262 }
 263
 264 void
 265 dollar_warning(int a_lineno, int i)
 266 {
 267         fprintf(stderr, "%s:%d: $%d references beyond the end of the current rule\n",
 268             input_file_name, a_lineno, i);
 269 }
 270
 271 void
 272 dollar_error(int a_lineno, char *a_line, char *a_cptr)
 273 {
 274         fprintf(stderr, "%s:%d: illegal $-name\n",
 275             input_file_name, a_lineno);
 276         print_pos(a_line, a_cptr);
 277         done(1);
 278 }
 279
 280
 281 void
 282 untyped_lhs(void)
 283 {
 284         fprintf(stderr, "%s:%d: $$ is untyped\n",
 285             input_file_name, lineno);
 286         done(1);
 287 }
 288
 289 void
 290 untyped_rhs(int i, char *s)
 291 {
 292         fprintf(stderr, "%s:%d: $%d (%s) is untyped\n",
 293             input_file_name, lineno, i, s);
 294         done(1);
 295 }
 296
 297 void
 298 unknown_rhs(int i)
 299 {
 300         fprintf(stderr, "%s:%d: $%d is untyped\n",
 301             input_file_name, lineno, i);
 302         done(1);
 303 }
 304
 305 void
 306 default_action_warning(void)
 307 {
 308         fprintf(stderr, "%s:%d: the default action assigns an undefined value to $$\n",
 309             input_file_name, lineno);
 310 }
 311
 312 void
 313 undefined_goal(char *s)
 314 {
 315         fprintf(stderr, "%s: the start symbol %s is undefined\n", input_file_name, s);
 316         done(1);
 317 }
 318
 319 void
 320 undefined_symbol_warning(char *s)
 321 {
 322         fprintf(stderr, "%s: the symbol %s is undefined\n", input_file_name, s);
 323 }