1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License, Version 1.0 only 6 * (the "License"). You may not use this file except in compliance 7 * with the License. 8 * 9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10 * or http://www.opensolaris.org/os/licensing. 11 * See the License for the specific language governing permissions 12 * and limitations under the License. 13 * 14 * When distributing Covered Code, include this CDDL HEADER in each 15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16 * If applicable, add the following below this CDDL HEADER, with the 17 * fields enclosed by brackets "[]" replaced with your own identifying 18 * information: Portions Copyright [yyyy] [name of copyright owner] 19 * 20 * CDDL HEADER END 21 */ 22 /* 23 * Copyright 2004 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 * 26 * eftinfo.c -- main routine for eftinfo command 27 * 28 * argument processing and the general flow through all the other 29 * modules is driven by this file. 30 */ 31 32 #pragma ident "%Z%%M% %I% %E% SMI" 33 34 #include <stdio.h> 35 #include <string.h> 36 #ifdef sun 37 #include <stdlib.h> 38 #else 39 #include <getopt.h> 40 #endif /* sun */ 41 #include "out.h" 42 #include "alloc.h" 43 #include "stats.h" 44 #include "stable.h" 45 #include "literals.h" 46 #include "lut.h" 47 #include "esclex.h" 48 #include "ptree.h" 49 #include "tree.h" 50 #include "check.h" 51 #include "version.h" 52 #include "eftread.h" 53 54 /* stuff exported by yacc-generated parsers */ 55 extern void yyparse(void); 56 extern int yydebug; 57 58 /* 59 * This external definition has to be here. If we put it in literals.h 60 * lint complains about the declaration not being used within the block 61 * when compiling literals.c. 62 */ 63 extern void literals_init(void); 64 65 static const char *Usage = "[-DEPghpqvw] eft-files..."; 66 static const char *Help = 67 "\t-D Print dictionaries EFT references.\n" 68 "\t-E Print ereports EFT will consume.\n" 69 "\t-P Print problems EFT can diagnose.\n" 70 "\t-g Print generated iterators (use with -p)\n" 71 "\t-h Print this help message\n" 72 "\t-p Print complete propagation tree\n" 73 "\t-q Quiet mode, no header info printed\n" 74 "\t-v Enable verbose output\n" 75 "\t-w Enable language warnings"; 76 /* 77 * and some undocumented extras... 78 * "\t-S Print stats for compiler memory usage, etc.\n" 79 * "\t-Y Enable parser debug output\n" 80 * "\t-d Enable general debug output\n" 81 * "\t-y Enable lexer debug output\n" 82 * 83 */ 84 85 int Debug; 86 int Verbose; 87 int Warn; 88 89 extern int Pchildgen; /* flag to ptree for printing generated interators */ 90 91 extern struct lut *Dicts; 92 93 /*ARGSUSED*/ 94 static void 95 dictprint(const char *s, void *rhs, void *arg) 96 { 97 static char *sep = ""; 98 99 out(O_OK|O_NONL, "%s%s", sep, s); 100 sep = ":"; 101 } 102 103 void 104 main(int argc, char *argv[]) 105 { 106 int c; 107 int count; 108 int Dflag = 0; 109 int Eflag = 0; 110 int yflag = 0; 111 int Pflag = 0; 112 int Sflag = 0; 113 int pflag = 0; 114 int qflag = 0; 115 116 alloc_init(); 117 out_init(argv[0]); 118 stats_init(1); /* extended stats always enabled for eftinfo */ 119 stable_init(0); 120 literals_init(); 121 lut_init(); 122 tree_init(); 123 124 while ((c = getopt(argc, argv, "DEPSYdghpqvwy")) != EOF) { 125 switch (c) { 126 case 'D': 127 Dflag++; 128 break; 129 130 case 'E': 131 Eflag++; 132 break; 133 134 case 'y': 135 yflag++; 136 break; 137 138 case 'P': 139 Pflag++; 140 break; 141 142 case 'S': 143 Sflag++; 144 break; 145 146 case 'Y': 147 yydebug++; 148 break; 149 150 case 'd': 151 Debug++; 152 break; 153 154 case 'g': 155 Pchildgen++; 156 break; 157 158 case 'h': 159 case '?': 160 out(O_PROG, "version %d.%d", 161 VERSION_MAJOR, VERSION_MINOR); 162 out(O_DIE|O_USAGE, "%s\n%s", Usage, Help); 163 /*NOTREACHED*/ 164 165 case 'p': 166 pflag++; 167 break; 168 169 case 'q': 170 qflag++; 171 break; 172 173 case 'v': 174 Verbose++; 175 break; 176 177 case 'w': 178 Warn++; 179 break; 180 181 default: 182 out(O_DIE|O_USAGE, Usage); 183 /*NOTREACHED*/ 184 } 185 } 186 187 out(O_PROG|O_VERB, "version %d.%d", 188 VERSION_MAJOR, VERSION_MINOR); 189 argc -= optind; 190 191 if (argc < 1) 192 out(O_DIE|O_USAGE, Usage); 193 194 if (!qflag) 195 eftread_showheader(1); 196 197 lex_init(&argv[optind], NULL, yflag); 198 check_init(); 199 yyparse(); 200 (void) lex_fini(); 201 202 tree_report(); 203 204 if (count = out_errcount()) 205 out(O_DIE, "%d error%s encountered, exiting.", OUTS(count)); 206 207 if (Dflag) { 208 out(O_OK|O_NONL, "Dictionaries: "); 209 lut_walk(Dicts, (lut_cb)dictprint, (void *)0); 210 out(O_OK, NULL); 211 } 212 213 if (Eflag) 214 ptree_ereport(O_OK, NULL); 215 216 if (Pflag) { 217 ptree_fault(O_OK, NULL); 218 ptree_upset(O_OK, NULL); 219 ptree_defect(O_OK, NULL); 220 } 221 222 if (pflag) 223 ptree_name_iter(O_OK, tree_root(NULL)); 224 225 if (Sflag) { 226 out(O_OK, "Stats:"); 227 stats_publish(); 228 } 229 230 out_exit(0); 231 /*NOTREACHED*/ 232 } 233