Home | History | Annotate | Line # | Download | only in lint1
main1.c revision 1.5
      1 /*	$NetBSD: main1.c,v 1.5 2000/07/06 01:10:51 christos 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 #ifndef lint
     36 __RCSID("$NetBSD");
     37 #endif
     38 
     39 #define FD_SETSIZE 512	/* more than the total number of error messages */
     40 #include <sys/types.h>
     41 #include <stdio.h>
     42 #include <string.h>
     43 #include <stdlib.h>
     44 #include <unistd.h>
     45 #include <err.h>
     46 #include <errno.h>
     47 #include <limits.h>
     48 
     49 #include "lint1.h"
     50 
     51 /* set yydebug to 1*/
     52 int	yflag;
     53 
     54 /*
     55  * Print warnings if an assignment of an integertype to another integertype
     56  * causes an implizit narrowing conversion. If aflag is 1, these warnings
     57  * are printed only if the source type is at least as wide as long. If aflag
     58  * is greather then 1, they are always printed.
     59  */
     60 int	aflag;
     61 
     62 /* Print a warning if a break statement cannot be reached. */
     63 int	bflag;
     64 
     65 /* Print warnings for pointer casts. */
     66 int	cflag;
     67 
     68 /* Print various debug information. */
     69 int	dflag;
     70 
     71 /* Perform stricter checking of enum types and operations on enum types. */
     72 int	eflag;
     73 
     74 /* Print complete pathnames, not only the basename. */
     75 int	Fflag;
     76 
     77 /* Enable some extensions of gcc */
     78 int	gflag;
     79 
     80 /* Treat warnings as errors */
     81 int	wflag;
     82 
     83 /*
     84  * Apply a number of heuristic tests to attempt to intuit bugs, improve
     85  * style, and reduce waste.
     86  */
     87 int	hflag;
     88 
     89 /* Attempt to check portability to other dialects of C. */
     90 int	pflag;
     91 
     92 /*
     93  * In case of redeclarations/redefinitions print the location of the
     94  * previous declaration/definition.
     95  */
     96 int	rflag;
     97 
     98 /* Strict ANSI C mode. */
     99 int	sflag;
    100 
    101 /* Traditional C mode. */
    102 int	tflag;
    103 
    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 fd_set	msgset;
    117 
    118 static	void	usage __P((void));
    119 
    120 int main __P((int, char *[]));
    121 
    122 int
    123 main(argc, argv)
    124 	int	argc;
    125 	char	*argv[];
    126 {
    127 	int	c;
    128 	char	*ptr;
    129 
    130 	FD_ZERO(&msgset);
    131 	while ((c = getopt(argc, argv, "abcdeghmprstuvwyzFX:")) != -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 't':	tflag = 1;	break;
    145 		case 'u':	uflag = 0;	break;
    146 		case 'w':	wflag = 1;	break;
    147 		case 'v':	vflag = 0;	break;
    148 		case 'y':	yflag = 1;	break;
    149 		case 'z':	zflag = 0;	break;
    150 
    151 		case 'm':
    152 			msglist();
    153 			return(0);
    154 
    155 		case 'X':
    156 			for (ptr = strtok(optarg, ","); ptr;
    157 			    ptr = strtok(NULL, ",")) {
    158 				char *eptr;
    159 				long msg = strtol(ptr, &eptr, 0);
    160 				if ((msg == LONG_MIN || msg == LONG_MAX) &&
    161 				    errno == ERANGE)
    162 				    err(1, "invalid error message id '%s'",
    163 					ptr);
    164 				if (*eptr || ptr == eptr || msg < 0 ||
    165 				    msg >= 1024)
    166 					errx(1, "invalid error message id '%s'",
    167 					    ptr);
    168 				FD_SET(msg, &msgset);
    169 			}
    170 			break;
    171 		case '?':
    172 		default:
    173 			usage();
    174 			break;
    175 		}
    176 	}
    177 	argc -= optind;
    178 	argv += optind;
    179 
    180 	if (argc != 2)
    181 		usage();
    182 
    183 	/* open the input file */
    184 	if ((yyin = fopen(argv[0], "r")) == NULL)
    185 		err(1, "cannot open '%s'", argv[0]);
    186 
    187 	/* initialize output */
    188 	outopen(argv[1]);
    189 
    190 	if (yflag)
    191 		yydebug = 1;
    192 
    193 	initmem();
    194 	initdecl();
    195 	initscan();
    196 	initmtab();
    197 
    198 	yyparse();
    199 
    200 	/* Following warnings cannot be suppressed by LINTED */
    201 	nowarn = 0;
    202 
    203 	chkglsyms();
    204 
    205 	outclose();
    206 
    207 	return (nerr != 0);
    208 }
    209 
    210 static void
    211 usage()
    212 {
    213 	extern char *__progname;
    214 
    215 	(void)fprintf(stderr,
    216 	    "Usage: %s [-abcdeghmprstuvwyzF] [-X <id>[,<id>]... src dest\n",
    217 	    __progname);
    218 	exit(1);
    219 }
    220 
    221 void
    222 norecover()
    223 {
    224 	/* cannot recover from previous errors */
    225 	error(224);
    226 	exit(1);
    227 }
    228