1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114

//! Very work-in-progress C parser, ported from Haskell's language-c.
//!
//! ```rust,no_run
//! extern crate parser_c;
//!
//! use parser_c::parse;
//!
//! const INPUT: &'static str = r#"
//!
//! int main() {
//!     printf("hello world!");
//!     return 0;
//! }
//!
//! "#;
//!
//! fn main() {
//!     match parse(INPUT, "simple.c") {
//!         Err(err) => {
//!             panic!("error: {:?}", err);
//!         }
//!         Ok(ast) => {
//!             println!("success: {:?}", ast);
//!         }
//!     }
//! }
//! ```

// Original file: "C.hs"

#![feature(proc_macro)]
#![feature(slice_patterns, box_syntax, box_patterns, fnbox)]
#![allow(unused_parens)]
// Cut down on number of warnings until we manage it.
#![allow(non_snake_case, non_camel_case_types, unused_imports, unused_variables, dead_code)]
#![recursion_limit="500"]

extern crate num;
#[macro_use] extern crate bitflags;
extern crate either;
extern crate num_derive;
extern crate parser_c_macro;
extern crate lazy_static;

// pub mod analysis;
#[macro_use] pub mod support;
pub mod data;
pub mod parser;
pub mod syntax;


use std::thread;

use support as corollary_support;
use corollary_support::*;
use syntax::preprocess::*;
use syntax::ast::*;
use data::input_stream::InputStream;
use data::position::Position;
use parser::{ParseError, parseC};

// NOTE: These imports are advisory. You probably need to change them to support Rust.
// use Language::C::Data;
// use Language::C::Syntax;
// use Language::C::Pretty;
// use Language::C::Parser;
// use Language::C::System::Preprocess;

fn parseCFile<C: Preprocessor>(cpp: C,
                                   tmp_dir_opt: Option<FilePath>,
                                   args: Vec<String>,
                                   input_file: FilePath)
                                   -> Result<CTranslUnit, ParseError> {

    let handleCppError = |_0| match (_0) {
        Err(exitCode) => panic!("Preprocessor failed with {:?}", exitCode),
        Ok(ok) => ok,
    };

    let input_stream = if !isPreprocessed(&input_file.path) {
        let cpp_args = __assign!((rawCppArgs(args, input_file.clone())), {
            cppTmpDir: tmp_dir_opt
        });

        handleCppError(runPreprocessor(cpp, cpp_args))
    } else {
        InputStream::from_file(&input_file)
    };

    parseC(input_stream, Position::from_file(input_file))
}

pub fn parseCFilePre(file: FilePath) -> Result<CTranslUnit, ParseError> {
    thread::Builder::new().stack_size(32 * 1024 * 1024).spawn(move || {
        let input_stream = InputStream::from_file(&file);
        parseC(input_stream, Position::from_file(file))
    }).unwrap().join().unwrap()
}

/// Basic public API. Accepts C source and a filename.
pub fn parse(input: &str, filename: &str) -> Result<CTranslUnit, ParseError> {
    // This doesn't represent possible final functionality of the crate,
    // but makes it usable at this early stage.

    let input = input.to_string();
    let filename = filename.to_string();

    // TODO which stack size is necessary? Can we eliminate this?
    thread::Builder::new().stack_size(32 * 1024 * 1024).spawn(move || {
        let input_stream = InputStream::from_string(input);

        parseC(input_stream, Position::from_file(FilePath::from(filename)))
    }).unwrap().join().unwrap()
}