compile.c

   1 /*
   2  * Example trivial client program that uses the sparse library
   3  * and x86 backend.
   4  *
   5  * Copyright (C) 2003 Transmeta Corp.
   6  *               2003 Linus Torvalds
   7  * Copyright 2003 Jeff Garzik
   8  *
   9  *  Licensed under the Open Software License version 1.1
  10  *
  11  */
  12 #include <stdarg.h>
  13 #include <stdlib.h>
  14 #include <stdio.h>
  15 #include <string.h>
  16 #include <ctype.h>
  17 #include <unistd.h>
  18 #include <fcntl.h>
  19
  20 #include "lib.h"
  21 #include "token.h"
  22 #include "parse.h"
  23 #include "symbol.h"
  24 #include "expression.h"
  25
  26 extern void emit_unit(const char *basename, struct symbol_list *list);
  27
  28 static void clean_up_symbol(struct symbol *sym, void *_parent, int flags)
  29 {
  30         evaluate_symbol(sym);
  31         expand_symbol(sym);
  32 }
  33
  34 int main(int argc, char **argv)
  35 {
  36         int fd;
  37         char *basename, *filename = NULL, **args;
  38         struct token *token;
  39
  40         // Initialize symbol stream first, so that we can add defines etc
  41         init_symbols();
  42
  43         create_builtin_stream();
  44
  45         args = argv;
  46         for (;;) {
  47                 char *arg = *++args;
  48                 if (!arg)
  49                         break;
  50                 if (arg[0] == '-') {
  51                         args = handle_switch(arg + 1, args);
  52                         continue;
  53                 }
  54                 filename = arg;
  55         }
  56
  57         if (filename == NULL)
  58                 die("No file specified");
  59
  60         basename = strrchr(filename, '/');
  61         if (!basename)
  62                 basename = filename;
  63         else if ((basename == filename) && (basename[1] == 0)) {
  64                 fprintf(stderr, "um\n");
  65                 exit(1);
  66         } else {
  67                 basename++;
  68                 if (*basename == 0) {
  69                         fprintf(stderr, "um\n");
  70                         exit(1);
  71                 }
  72         }
  73
  74         fd = open(filename, O_RDONLY);
  75         if (fd < 0)
  76                 die("No such file: %s", argv[1]);
  77
  78         // Tokenize the input stream
  79         token = tokenize(filename, fd, NULL);
  80         close(fd);
  81
  82         // Prepend the initial built-in stream
  83         token = tokenize_buffer(pre_buffer, pre_buffer_size, token);
  84
  85         // Pre-process the stream
  86         token = preprocess(token);
  87
  88         // Parse the resulting C code
  89         translation_unit(token, &used_list);
  90
  91         // Do type evaluation and simplification
  92         symbol_iterate(used_list, clean_up_symbol, NULL);
  93
  94         // Show the end result.
  95         emit_unit(basename, used_list);
  96
  97 #if 0
  98         // And show the allocation statistics
  99         show_ident_alloc();
 100         show_token_alloc();
 101         show_symbol_alloc();
 102         show_expression_alloc();
 103         show_statement_alloc();
 104         show_string_alloc();
 105         show_bytes_alloc();
 106 #endif
 107         return 0;
 108 }