/* $OpenBSD: err.c,v 1.28 2011/09/21 18:08:07 jsg Exp $ */ /* $NetBSD: err.c,v 1.8 1995/10/02 17:37:00 jpo Exp $ */ /* * Copyright (c) 1994, 1995 Jochen Pohl * All Rights Reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Jochen Pohl for * The NetBSD Project. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ /* number of errors found */ int nerr; /* number of syntax errors */ int sytxerr; #include #include #include #include "lint1.h" static const char *lbasename(const char *); static void verror(int, va_list); static void vwarning(int, va_list); static void excerpt(pos_t *); const char *msgs[] = { "syntax error: empty declaration", /* 0 */ "old style declaration; add int", /* 1 */ "empty declaration", /* 2 */ "%s declared in argument declaration list", /* 3 */ "illegal type combination", /* 4 */ "modifying typedef with '%s'; only qualifiers allowed", /* 5 */ "use 'double' instead of 'long float'", /* 6 */ "only one storage class allowed", /* 7 */ "illegal storage class", /* 8 */ "only register valid as formal parameter storage class", /* 9 */ "duplicate '%s'", /* 10 */ "bit-field initializer out of range", /* 11 */ "compiler takes size of function", /* 12 */ "incomplete enum type: %s", /* 13 */ "compiler takes alignment of function", /* 14 */ "function returns illegal type", /* 15 */ "array of function is illegal", /* 16 */ "null dimension", /* 17 */ "illegal use of 'void'", /* 18 */ "void type for %s", /* 19 */ "zero or negative array dimension", /* 20 */ "redeclaration of formal parameter %s", /* 21 */ "incomplete or misplaced function definition", /* 22 */ "undefined label %s", /* 23 */ "cannot initialize function: %s", /* 24 */ "cannot initialize typedef: %s", /* 25 */ "cannot initialize extern declaration: %s", /* 26 */ "redeclaration of %s", /* 27 */ "redefinition of %s", /* 28 */ "previously declared extern, becomes static: %s", /* 29 */ "redeclaration of %s; ANSI C requires static", /* 30 */ "incomplete structure or union %s: %s", /* 31 */ "argument type defaults to 'int': %s", /* 32 */ "duplicate member name: %s", /* 33 */ "nonportable bit-field type", /* 34 */ "illegal bit-field type", /* 35 */ "illegal bit-field size", /* 36 */ "zero size bit-field", /* 37 */ "function illegal in structure or union", /* 38 */ "illegal zero sized structure member: %s", /* 39 */ "unknown size: %s", /* 40 */ "illegal use of bit-field", /* 41 */ "forward reference to enum type", /* 42 */ "redefinition hides earlier one: %s", /* 43 */ "declaration introduces new type in ANSI C: %s %s", /* 44 */ "base type is really '%s %s'", /* 45 */ "(%s) tag redeclared", /* 46 */ "zero sized %s", /* 47 */ "overflow in enumeration values: %s", /* 48 */ "struct or union member must be named", /* 49 */ "a function is declared as an argument: %s", /* 50 */ "parameter mismatch: %d declared, %d defined", /* 51 */ "cannot initialize parameter: %s", /* 52 */ "declared argument %s is missing", /* 53 */ "trailing ',' prohibited in enum declaration", /* 54 */ "integral constant expression expected", /* 55 */ "integral constant too large", /* 56 */ "enumeration constant hides parameter: %s", /* 57 */ "type does not match prototype: %s", /* 58 */ "formal parameter lacks name: param #%d", /* 59 */ "void must be sole parameter", /* 60 */ "void parameter cannot have name: %s", /* 61 */ "function prototype parameters must have types", /* 62 */ "prototype does not match old-style definition", /* 63 */ "()-less function definition", /* 64 */ "%s has no named members", /* 65 */ "syntax requires ';' after last struct/union member", /* 66 */ "cannot return incomplete type", /* 67 */ "typedef already qualified with '%s'", /* 68 */ "inappropriate qualifiers with 'void'", /* 69 */ "%soperand of '%s' is unsigned in ANSI C", /* 70 */ "too many characters in character constant", /* 71 */ "typedef declares no type name", /* 72 */ "empty character constant", /* 73 */ "no hex digits follow \\x", /* 74 */ "overflow in hex escape", /* 75 */ "character escape does not fit in character", /* 76 */ "bad octal digit %c", /* 77 */ "nonportable character escape", /* 78 */ "dubious escape \\%c", /* 79 */ "dubious escape \\%o", /* 80 */ "\\a undefined in traditional C", /* 81 */ "\\x undefined in traditional C", /* 82 */ "storage class after type is obsolescent", /* 83 */ "ANSI C requires formal parameter before '...'", /* 84 */ "dubious tag declaration: %s %s", /* 85 */ "automatic hides external declaration: %s", /* 86 */ "static hides external declaration: %s", /* 87 */ "typedef hides external declaration: %s", /* 88 */ "typedef redeclared: %s", /* 89 */ "inconsistent redeclaration of extern: %s", /* 90 */ "declaration hides parameter: %s", /* 91 */ "inconsistent redeclaration of static: %s", /* 92 */ "dubious static function at block level: %s", /* 93 */ "function has illegal storage class: %s", /* 94 */ "declaration hides earlier one: %s", /* 95 */ "cannot dereference non-pointer type", /* 96 */ "suffix U is illegal in traditional C", /* 97 */ "suffixes F and L are illegal in traditional C", /* 98 */ "%s undefined", /* 99 */ "unary + is illegal in traditional C", /* 100 */ "undefined struct/union member: %s", /* 101 */ "illegal member use: %s", /* 102 */ "left operand of '.' must be struct/union object", /* 103 */ "left operand of '->' must be pointer to struct/union", /* 104 */ "non-unique member requires struct/union %s", /* 105 */ "left operand of '->' must be pointer", /* 106 */ "operands of '%s' have incompatible types", /* 107 */ "operand of '%s' has incompatible type", /* 108 */ "void type illegal in expression", /* 109 */ "pointer to function is not allowed here", /* 110 */ "unacceptable operand of '%s'", /* 111 */ "cannot take address of bit-field", /* 112 */ "cannot take address of register %s", /* 113 */ "%soperand of '%s' must be lvalue", /* 114 */ "%soperand of '%s' must be modifiable lvalue", /* 115 */ "illegal pointer subtraction", /* 116 */ "bitwise operation on signed value possibly nonportable", /* 117 */ "semantics of '%s' change in ANSI C; use explicit cast", /* 118 */ "conversion of '%s' to '%s' is out of range", /* 119 */ "bitwise operation on signed value nonportable", /* 120 */ "negative shift", /* 121 */ "shift greater than size of object", /* 122 */ "illegal combination of pointer and integer, op %s", /* 123 */ "illegal pointer combination, op %s", /* 124 */ "ANSI C forbids ordered comparisons of pointers to functions",/* 125 */ "incompatible types in conditional", /* 126 */ "'&' before array or function: ignored", /* 127 */ "operands have incompatible pointer types, op %s", /* 128 */ "expression has null effect", /* 129 */ "enum type mismatch, op %s", /* 130 */ "conversion from '%s' to '%s' may sign-extend incorrectly", /* 131 */ "converted from '%s' to '%s'", /* 132 */ "conversion of pointer to '%s' loses bits", /* 133 */ "conversion of pointer to '%s' may lose bits", /* 134 */ "possible pointer alignment problem", /* 135 */ "cannot do pointer arithmetic on operand of unknown size", /* 136 */ "use of incomplete enum type, op %s", /* 137 */ "unknown operand size, op %s", /* 138 */ "division by 0", /* 139 */ "modulus by 0", /* 140 */ "integer overflow detected, op %s", /* 141 */ "floating point overflow detected, op %s", /* 142 */ "cannot take size of incomplete type", /* 143 */ "cannot take size of function", /* 144 */ "cannot take size of bit-field", /* 145 */ "cannot take size of void", /* 146 */ "invalid cast expression", /* 147 */ "improper cast of void expression", /* 148 */ "illegal function", /* 149 */ "argument mismatch: %d arg%s passed, %d expected", /* 150 */ "void expressions may not be arguments, arg #%d", /* 151 */ "argument cannot have unknown size, arg #%d", /* 152 */ "%s() arg #%d: incompatible pointer type", /* 153 */ "%s() arg #%d: illegal combination of pointer and integer", /* 154 */ "%s() arg #%d: argument is incompatible with prototype", /* 155 */ "%s() arg #%d: enum type mismatch", /* 156 */ "ANSI C treats constant as unsigned", /* 157 */ "%s may be used before set", /* 158 */ "assignment in conditional context", /* 159 */ "operator '==' found where '=' was expected", /* 160 */ "constant in conditional context", /* 161 */ "comparison of %s with %s, op %s", /* 162 */ "a cast does not yield an lvalue", /* 163 */ "assignment of negative constant to unsigned type", /* 164 */ "constant truncated by assignment", /* 165 */ "precision lost in bit-field assignment", /* 166 */ "array subscript cannot be negative: %ld", /* 167 */ "array subscript cannot be > %d: %ld", /* 168 */ "precedence confusion possible: parenthesize!", /* 169 */ "first operand must have scalar type, op ? :", /* 170 */ "assignment type mismatch", /* 171 */ "too many struct/union initializers", /* 172 */ "too many array initializers", /* 173 */ "too many initializers", /* 174 */ "initialisation of an incomplete type", /* 175 */ "invalid initializer", /* 176 */ "non-constant initializer", /* 177 */ "initializer does not fit", /* 178 */ "cannot initialize struct/union with no named member", /* 179 */ "bit-field initializer does not fit", /* 180 */ "{}-enclosed initializer required", /* 181 */ "incompatible pointer types", /* 182 */ "illegal combination of pointer and integer", /* 183 */ "illegal pointer combination", /* 184 */ "initialisation type mismatch", /* 185 */ "bit-field initialisation is illegal in traditional C", /* 186 */ "non-null byte ignored in string initializer", /* 187 */ "no automatic aggregate initialization in traditional C", /* 188 */ "assignment of struct/union illegal in traditional C", /* 189 */ "empty array declaration: %s", /* 190 */ "%s set but not used in function %s", /* 191 */ "%s unused in function %s", /* 192 */ "statement not reached", /* 193 */ "label %s redefined", /* 194 */ "case not in switch", /* 195 */ "case label affected by conversion", /* 196 */ "non-constant case expression", /* 197 */ "non-integral case expression", /* 198 */ "duplicate case in switch: %ld", /* 199 */ "duplicate case in switch: %lu", /* 200 */ "default outside switch", /* 201 */ "duplicate default in switch", /* 202 */ "case label must be of type `int' in traditional C", /* 203 */ "controlling expressions must have scalar type", /* 204 */ "switch expression must have integral type", /* 205 */ "enumeration value(s) not handled in switch", /* 206 */ "loop not entered at top", /* 207 */ "break outside loop or switch", /* 208 */ "continue outside loop", /* 209 */ "enum type mismatch in initialisation", /* 210 */ "return value type mismatch", /* 211 */ "cannot return incomplete type", /* 212 */ "void function %s cannot return value", /* 213 */ "function %s expects to return value", /* 214 */ "function implicitly declared to return int", /* 215 */ "function %s has return (e); and return;", /* 216 */ "function %s falls off bottom without returning value", /* 217 */ "ANSI C treats constant as unsigned, op %s", /* 218 */ "concatenated strings are illegal in traditional C", /* 219 */ "fallthrough on case statement", /* 220 */ "initialisation of unsigned with negative constant", /* 221 */ "conversion of negative constant to unsigned type", /* 222 */ "end-of-loop code not reached", /* 223 */ "cannot recover from previous errors", /* 224 */ "static function called but not defined: %s()", /* 225 */ "static variable %s unused", /* 226 */ "const object %s should have initializer", /* 227 */ "function cannot return const or volatile object", /* 228 */ "questionable conversion of function pointer", /* 229 */ "nonportable character comparison, op %s", /* 230 */ "argument %s unused in function %s()", /* 231 */ "label %s unused in function %s()", /* 232 */ "struct %s never defined", /* 233 */ "union %s never defined", /* 234 */ "enum %s never defined", /* 235 */ "static function %s unused", /* 236 */ "redeclaration of formal parameter %s", /* 237 */ "initialisation of union is illegal in traditional C", /* 238 */ "constant argument to NOT", /* 239 */ "assignment of different structures", /* 240 */ "dubious operation on enum, op %s", /* 241 */ "combination of '%s' and '%s', op %s", /* 242 */ "dubious comparison of enums, op %s", /* 243 */ "illegal structure pointer combination", /* 244 */ "illegal structure pointer combination, op %s", /* 245 */ "dubious conversion of enum to '%s'", /* 246 */ "pointer casts may be troublesome", /* 247 */ "floating-point constant out of range", /* 248 */ "syntax error", /* 249 */ "unknown character \\%o", /* 250 */ "malformed integer constant", /* 251 */ "integer constant out of range", /* 252 */ "unterminated character constant", /* 253 */ "newline in string or char constant", /* 254 */ "undefined or invalid # directive", /* 255 */ "unterminated comment", /* 256 */ "extra characters in lint comment", /* 257 */ "unterminated string constant", /* 258 */ "%s() arg #%d: converted from '%s' to '%s'", /* 259 */ "previous declaration of %s", /* 260 */ "previous definition of %s", /* 261 */ "\\\" inside character constants undefined in traditional C", /* 262 */ "\\? undefined in traditional C", /* 263 */ "\\v undefined in traditional C", /* 264 */ "%s C does not support 'long long'", /* 265 */ "'long double' is illegal in traditional C", /* 266 */ "shift equal to size of object", /* 267 */ "variable declared inline: %s", /* 268 */ "argument declared inline: %s", /* 269 */ "function prototypes are illegal in traditional C", /* 270 */ "switch expression must be of type `int' in traditional C", /* 271 */ "empty translation unit", /* 272 */ "bit-field type '%s' invalid in ANSI C", /* 273 */ "ANSI C forbids comparison of %s with %s", /* 274 */ "cast discards 'const' from pointer target type", /* 275 */ "", /* 276 */ "initialisation of '%s' with '%s'", /* 277 */ "%s() arg #%d: combination of '%s' and '%s'", /* 278 */ "combination of '%s' and '%s' in return", /* 279 */ "must be outside function: /* %s */", /* 280 */ "duplicate use of /* %s */", /* 281 */ "must precede function definition: /* %s */", /* 282 */ "argument number mismatch with directive: /* %s */", /* 283 */ "fallthrough on default statement", /* 284 */ "prototype declaration", /* 285 */ "function definition is not a prototype", /* 286 */ "function declaration is not a prototype", /* 287 */ "dubious use of /* VARARGS */ with /* %s */", /* 288 */ "can't be used together: /* PRINTFLIKE */ /* SCANFLIKE */", /* 289 */ "static function %s declared but not defined", /* 290 */ "invalid multibyte character", /* 291 */ "cannot concatenate wide and regular string literals", /* 292 */ "argument %d must be 'char *' for PRINTFLIKE/SCANFLIKE", /* 293 */ "multi-character character constant", /* 294 */ "%s() arg #%d: conversion of '%s' to '%s' is out of range", /* 295 */ "%s() arg #%d: conversion of negative constant to unsigned type", /* 296 */ "%s() arg #%d: conversion from '%s' to '%s' may sign-extend incorrectly", /* 297 */ "%s() arg #%d: converted from '%s' to '%s'", /* 298 */ "prototype does not match old style definition, arg #%d", /* 299 */ "old style definition", /* 300 */ "array of incomplete type", /* 301 */ "%s returns pointer to automatic object", /* 302 */ "ANSI C forbids conversion of %s to %s", /* 303 */ "ANSI C forbids conversion of %s to %s, arg #%d", /* 304 */ "ANSI C forbids conversion of %s to %s, op %s", /* 305 */ "constant truncated by conversion, op %s", /* 306 */ "static variable %s set but not used", /* 307 */ "", /* 308 */ "extra bits set to 0 in conversion of '%s' to '%s', op %s", /* 309 */ "right shift of %d-bit quantity by %lld bits", /* 310 */ "case ranges are illegal in ANSI C", /* 311 */ "suspicious operator for sizeof: %s", /* 312 */ "conversion of %s() return value from '%s' to '%s'", /* 313 */ "hexadecimal float constants are illegal in traditional C", /* 314 */ "empty body of the if statement", /* 315 */ "empty body of the else statement", /* 316 */ }; /* * If Fflag is not set lbasename() returns a pointer to the last * component of the path, otherwise it returns the argument. */ static const char * lbasename(const char *path) { const char *cp, *cp1, *cp2; if (Fflag) return (path); cp = cp1 = cp2 = path; while (*cp != '\0') { if (*cp++ == '/') { cp2 = cp1; cp1 = cp; } } return (*cp1 == '\0' ? cp2 : cp1); } static void verror(int n, va_list ap) { const char *fn; fn = lbasename(curr_pos.p_file); (void)printf("%s:%d: ", fn, curr_pos.p_line); (void)vprintf(msgs[n], ap); (void)printf("\n"); nerr++; if (fflag) excerpt(&curr_pos); } static void vwarning(int n, va_list ap) { const char *fn; if (nowarn) /* this warning is suppressed by a LINTED comment */ return; fn = lbasename(curr_pos.p_file); (void)printf("%s:%d: warning: ", fn, curr_pos.p_line); (void)vprintf(msgs[n], ap); (void)printf("\n"); if (fflag) excerpt(&curr_pos); } void error(int n, ...) { va_list ap; va_start(ap, n); verror(n, ap); va_end(ap); } void lerror(const char *msg, ...) { va_list ap; const char *fn; va_start(ap, msg); fn = lbasename(curr_pos.p_file); (void)fprintf(stderr, "%s:%d: lint error: ", fn, curr_pos.p_line); (void)vfprintf(stderr, msg, ap); (void)fprintf(stderr, "\n"); va_end(ap); exit(1); } void warning(int n, ...) { va_list ap; va_start(ap, n); vwarning(n, ap); va_end(ap); } void message(int n, ...) { va_list ap; const char *fn; va_start(ap, n); fn = lbasename(curr_pos.p_file); (void)printf("%s:%d: ", fn, curr_pos.p_line); (void)vprintf(msgs[n], ap); (void)printf("\n"); va_end(ap); if (fflag) excerpt(&curr_pos); } int gnuism(int n, ...) { va_list ap; int msg; va_start(ap, n); if (sflag && !gflag) { verror(n, ap); msg = 1; } else if (!sflag && gflag) { msg = 0; } else { vwarning(n, ap); msg = 1; } va_end(ap); return (msg); } static void excerpt(pos_t *pos) { static FILE *fp = NULL; static const char *file = NULL; static int lineno = 0; char *buf, *lbuf; size_t len; if (!pos || !pos->p_file) return; /* don't print the same line twice */ if (pos->p_line == lineno) return; if (fp == NULL || file != pos->p_file || pos->p_line < lineno) { if (fp) fclose(fp); if (!(fp = fopen(pos->p_file, "r"))) return; file = pos->p_file; lineno = 0; } lbuf = NULL; while (lineno < pos->p_line && (buf = fgetln(fp, &len))) { if (buf[len - 1] == '\n') buf[len - 1] = '\0'; else { /* EOF without EOL, copy and add the NUL */ if (!(lbuf = malloc(len + 1))) err(1, NULL); lbuf[len] = '\0'; buf = lbuf; } lineno++; } if (buf) printf("%s:%d: %s\n", pos->p_file, lineno, buf); free(lbuf); }