Home | History | Annotate | Line # | Download | only in lint1
main1.c revision 1.14
      1 /*	$NetBSD: main1.c,v 1.14 2003/04/18 03:21:02 lukem Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1994, 1995 Jochen Pohl
      5  * All Rights Reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *      This product includes software developed by Jochen Pohl for
     18  *	The NetBSD Project.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 #if defined(__RCSID) && !defined(lint)
     36 __RCSID("$NetBSD: main1.c,v 1.14 2003/04/18 03:21:02 lukem Exp $");
     37 #endif
     38 
     39 #include <sys/types.h>
     40 #include <stdio.h>
     41 #include <string.h>
     42 #include <stdlib.h>
     43 #include <unistd.h>
     44 #include <errno.h>
     45 #include <limits.h>
     46 
     47 #include "lint1.h"
     48 
     49 /* set yydebug to 1*/
     50 int	yflag;
     51 
     52 /*
     53  * Print warnings if an assignment of an integertype to another integertype
     54  * causes an implizit narrowing conversion. If aflag is 1, these warnings
     55  * are printed only if the source type is at least as wide as long. If aflag
     56  * is greater than 1, they are always printed.
     57  */
     58 int	aflag;
     59 
     60 /* Print a warning if a break statement cannot be reached. */
     61 int	bflag;
     62 
     63 /* Print warnings for pointer casts. */
     64 int	cflag;
     65 
     66 /* Print various debug information. */
     67 int	dflag;
     68 
     69 /* Perform stricter checking of enum types and operations on enum types. */
     70 int	eflag;
     71 
     72 /* Print complete pathnames, not only the basename. */
     73 int	Fflag;
     74 
     75 /* Enable some extensions of gcc */
     76 int	gflag;
     77 
     78 /* Treat warnings as errors */
     79 int	wflag;
     80 
     81 /*
     82  * Apply a number of heuristic tests to attempt to intuit bugs, improve
     83  * style, and reduce waste.
     84  */
     85 int	hflag;
     86 
     87 /* Attempt to check portability to other dialects of C. */
     88 int	pflag;
     89 
     90 /*
     91  * In case of redeclarations/redefinitions print the location of the
     92  * previous declaration/definition.
     93  */
     94 int	rflag;
     95 
     96 /* Strict ANSI C mode. */
     97 int	sflag;
     98 
     99 /* Traditional C mode. */
    100 int	tflag;
    101 
    102 /* Enable C9X extensions */
    103 int	Sflag;
    104 /*
    105  * Complain about functions and external variables used and not defined,
    106  * or defined and not used.
    107  */
    108 int	uflag = 1;
    109 
    110 /* Complain about unused function arguments. */
    111 int	vflag = 1;
    112 
    113 /* Complain about structures which are never defined. */
    114 int	zflag = 1;
    115 
    116 err_set	msgset;
    117 
    118 static	void	usage(void);
    119 
    120 int main(int, char *[]);
    121 
    122 int
    123 main(int argc, char *argv[])
    124 {
    125 	int	c;
    126 	char	*ptr;
    127 
    128 	setprogname(argv[0]);
    129 
    130 	ERR_ZERO(&msgset);
    131 	while ((c = getopt(argc, argv, "abcdeghmprstuvwyzFSX:")) != -1) {
    132 		switch (c) {
    133 		case 'a':	aflag++;	break;
    134 		case 'b':	bflag = 1;	break;
    135 		case 'c':	cflag = 1;	break;
    136 		case 'd':	dflag = 1;	break;
    137 		case 'e':	eflag = 1;	break;
    138 		case 'F':	Fflag = 1;	break;
    139 		case 'g':	gflag = 1;	break;
    140 		case 'h':	hflag = 1;	break;
    141 		case 'p':	pflag = 1;	break;
    142 		case 'r':	rflag = 1;	break;
    143 		case 's':	sflag = 1;	break;
    144 		case 'S':	Sflag = 1;	break;
    145 		case 't':	tflag = 1;	break;
    146 		case 'u':	uflag = 0;	break;
    147 		case 'w':	wflag = 1;	break;
    148 		case 'v':	vflag = 0;	break;
    149 		case 'y':	yflag = 1;	break;
    150 		case 'z':	zflag = 0;	break;
    151 
    152 		case 'm':
    153 			msglist();
    154 			return(0);
    155 
    156 		case 'X':
    157 			for (ptr = strtok(optarg, ","); ptr;
    158 			    ptr = strtok(NULL, ",")) {
    159 				char *eptr;
    160 				long msg;
    161 
    162 				errno = 0;
    163 				msg = strtol(ptr, &eptr, 0);
    164 				if ((msg == LONG_MIN || msg == LONG_MAX) &&
    165 				    errno == ERANGE)
    166 				    err(1, "invalid error message id '%s'",
    167 					ptr);
    168 				if (*eptr || ptr == eptr || msg < 0 ||
    169 				    msg >= ERR_SETSIZE)
    170 					errx(1, "invalid error message id '%s'",
    171 					    ptr);
    172 				ERR_SET(msg, &msgset);
    173 			}
    174 			break;
    175 		case '?':
    176 		default:
    177 			usage();
    178 			break;
    179 		}
    180 	}
    181 	argc -= optind;
    182 	argv += optind;
    183 
    184 	if (argc != 2)
    185 		usage();
    186 
    187 	/* open the input file */
    188 	if ((yyin = fopen(argv[0], "r")) == NULL)
    189 		err(1, "cannot open '%s'", argv[0]);
    190 
    191 	/* initialize output */
    192 	outopen(argv[1]);
    193 
    194 	if (yflag)
    195 		yydebug = 1;
    196 
    197 	initmem();
    198 	initdecl();
    199 	initscan();
    200 	initmtab();
    201 
    202 	yyparse();
    203 
    204 	/* Following warnings cannot be suppressed by LINTED */
    205 	nowarn = 0;
    206 
    207 	chkglsyms();
    208 
    209 	outclose();
    210 
    211 	return (nerr != 0);
    212 }
    213 
    214 static void
    215 usage(void)
    216 {
    217 	(void)fprintf(stderr,
    218 	    "Usage: %s [-abcdeghmprstuvwyzFS] [-X <id>[,<id>]... src dest\n",
    219 	    getprogname());
    220 	exit(1);
    221 }
    222 
    223 void
    224 norecover(void)
    225 {
    226 	/* cannot recover from previous errors */
    227 	error(224);
    228 	exit(1);
    229 }
    230