usr/src/cmd/fm/eversholt/eftinfo/common/eftinfo.c

   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 (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21
  22 /*
  23  * Copyright 2006 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 int
 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, NULL);
 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         return (0);
 233 }