test-parsing.c

   1 /*
   2  * Example trivial client program that uses the sparse library
   3  * to tokenize, pre-process and parse a C file, and prints out
   4  * the results.
   5  *
   6  * Copyright (C) 2003 Transmeta Corp, all rights reserved.
   7  */
   8 #include <stdarg.h>
   9 #include <stdlib.h>
  10 #include <stdio.h>
  11 #include <string.h>
  12 #include <ctype.h>
  13 #include <unistd.h>
  14 #include <fcntl.h>
  15
  16 #include "lib.h"
  17 #include "token.h"
  18 #include "parse.h"
  19 #include "symbol.h"
  20 #include "expression.h"
  21
  22 unsigned int pre_buffer_size = 0;
  23 unsigned char pre_buffer[8192];
  24
  25 static void add_pre_buffer(const char *fmt, ...)
  26 {
  27         va_list args;
  28         unsigned int size;
  29
  30         va_start(args, fmt);
  31         size = pre_buffer_size;
  32         size += vsnprintf(pre_buffer + size,
  33                 sizeof(pre_buffer) - size,
  34                 fmt, args);
  35         pre_buffer_size = size;
  36         va_end(args);
  37 }
  38
  39 static void handle_switch(char *arg)
  40 {
  41         switch (*arg) {
  42         case 'D': {
  43                 const char *name = arg+1;
  44                 const char *value = "";
  45                 for (;;) {
  46                         char c;
  47                         c = *++arg;
  48                         if (!c)
  49                                 break;
  50                         if (isspace(c) || c == '=') {
  51                                 *arg = '\0';
  52                                 value = arg+1;
  53                                 break;
  54                         }
  55                 }
  56                 add_pre_buffer("#define %s %s\n", name, value);
  57                 return;
  58         }
  59
  60         case 'I':
  61                 add_pre_buffer("#add_include \"%s/\"\n", arg+1);
  62                 return;
  63         default:
  64                 fprintf(stderr, "unknown switch '%s'\n", arg);
  65         }
  66 }
  67
  68 void clean_up_statement(struct statement *stmt, void *_parent, int flags)
  69 {
  70         evaluate_statement(stmt);
  71 }
  72
  73 void clean_up_symbol(struct symbol *sym, void *_parent, int flags)
  74 {
  75         evaluate_symbol(sym);
  76 }
  77
  78 int main(int argc, char **argv)
  79 {
  80         int i, fd;
  81         char *filename = NULL;
  82         struct token *token;
  83         struct symbol_list *list = NULL;
  84
  85         // Initialize symbol stream first, so that we can add defines etc
  86         init_symbols();
  87
  88         // Stupid defines to make various headers happy
  89         add_pre_buffer("#define __GNUC__ 2\n");
  90         add_pre_buffer("#define __GNUC_MINOR__ 95\n");
  91
  92         for (i = 1; i < argc; i++) {
  93                 char *arg = argv[i];
  94                 if (arg[0] == '-') {
  95                         handle_switch(arg+1);
  96                         continue;
  97                 }
  98                 filename = arg;
  99         }
 100
 101
 102         fd = open(filename, O_RDONLY);
 103         if (fd < 0)
 104                 die("No such file: %s", argv[1]);
 105
 106         // Tokenize the input stream
 107         token = tokenize(filename, fd, NULL);
 108         close(fd);
 109
 110         // Prepend the initial built-in stream
 111         token = tokenize_buffer(pre_buffer, pre_buffer_size, token);
 112
 113         // Pre-process the stream
 114         token = preprocess(token);
 115
 116         // Parse the resulting C code
 117         translation_unit(token, &list);
 118
 119         // Do type evaluation and simplify
 120         symbol_iterate(list, clean_up_symbol, NULL);
 121
 122 #if 1
 123         // Show the end result.
 124         show_symbol_list(list, "\n\n");
 125         printf("\n\n");
 126 #endif
 127
 128         // And show the allocation statistics
 129         show_ident_alloc();
 130         show_token_alloc();
 131         show_symbol_alloc();
 132         show_expression_alloc();
 133         show_statement_alloc();
 134         show_string_alloc();
 135         show_bytes_alloc();
 136         return 0;
 137 }