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 i, 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         basename = strrchr(filename, '/');
  58         if (!basename)
  59                 basename = filename;
  60         else if ((basename == filename) && (basename[1] == 0)) {
  61                 fprintf(stderr, "um\n");
  62                 exit(1);
  63         } else {
  64                 basename++;
  65                 if (*basename == 0) {
  66                         fprintf(stderr, "um\n");
  67                         exit(1);
  68                 }
  69         }
  70
  71         fd = open(filename, O_RDONLY);
  72         if (fd < 0)
  73                 die("No such file: %s", argv[1]);
  74
  75         // Tokenize the input stream
  76         token = tokenize(filename, fd, NULL);
  77         close(fd);
  78
  79         // Prepend the initial built-in stream
  80         token = tokenize_buffer(pre_buffer, pre_buffer_size, token);
  81
  82         // Pre-process the stream
  83         token = preprocess(token);
  84
  85         // Parse the resulting C code
  86         translation_unit(token, &used_list);
  87
  88         // Do type evaluation and simplification
  89         symbol_iterate(used_list, clean_up_symbol, NULL);
  90
  91         // Show the end result.
  92         emit_unit(basename, used_list);
  93
  94 #if 0
  95         // And show the allocation statistics
  96         show_ident_alloc();
  97         show_token_alloc();
  98         show_symbol_alloc();
  99         show_expression_alloc();
 100         show_statement_alloc();
 101         show_string_alloc();
 102         show_bytes_alloc();
 103 #endif
 104         return 0;
 105 }