#include <iostream>
#include <fstream>
#include <string>
#include <vector>

#include <boost/wave.hpp>
#include <boost/wave/cpplexer/cpp_lex_token.hpp>
#include <boost/wave/cpplexer/cpp_lex_iterator.hpp>
#include <boost/spirit/include/qi.hpp>
#include <boost/spirit/include/phoenix.hpp>
#include <boost/spirit/repository/include/qi_confix.hpp>

using namespace boost::spirit::qi;

template <typename Iterator>
struct WhiteSpace : grammar<Iterator>
{
    WhiteSpace() : WhiteSpace::base_type(skip)
    {
        using boost::spirit::ascii::char_;

        skip = space;
    }

    rule<Iterator> skip;
};

template <typename Iterator>
struct Model : grammar<Iterator, int(), WhiteSpace<Iterator> >
{
    Model() : Model::base_type(model, "model")
    {
        model = int_;
    }

    rule<Iterator, int(), WhiteSpace<Iterator> > model;
};

int main(int argc, char *argv[])
{
    if (2 != argc) {
        std::cerr << "Usage: quick_start infile" << std::endl;
        return -1;
    }
    
    boost::wave::util::file_position_type current_position;

    try {
        std::ifstream instream(argv[1]);
        std::string instring;

        if (!instream.is_open()) {
            std::cerr << "Could not open input file: " << argv[1] << std::endl;
            return -2;
        }
        instream.unsetf(std::ios::skipws);
        instring = std::string(std::istreambuf_iterator<char>(instream.rdbuf()),
                                std::istreambuf_iterator<char>());

        typedef boost::wave::cpplexer::lex_token<> token_type;
        typedef boost::wave::cpplexer::lex_iterator<token_type> lex_iterator_type;
        typedef boost::wave::context<std::string::iterator, lex_iterator_type> context_type;

        context_type ctx (instring.begin(), instring.end(), argv[1]);

        context_type::iterator_type first = ctx.begin();
        context_type::iterator_type last = ctx.end();

        WhiteSpace<context_type::iterator_type> whiteSpace;
        Model<context_type::iterator_type> grammar;
        int ast;
        bool result = phrase_parse(first, last, grammar, whiteSpace, ast);

        while (first != last) {
            current_position = (*first).get_position();
            std::cout << (*first).get_value();
            ++first;
        }
    }
    catch (boost::wave::cpp_exception const& e) {
        std::cerr << e.file_name() << "(" << e.line_no() << "): " << e.description() << std::endl;
        return 2;
    }
    catch (std::exception const& e) {
        std::cerr << current_position.get_file() << "(" << current_position.get_line() << "): " << "exception caught: " << e.what() << std::endl;
        return 3;
    }
    catch (...) {
        std::cerr 
            << current_position.get_file() 
            << "(" << current_position.get_line() << "): "
            << "unexpected exception caught." << std::endl;
        return 4;
    }
    return 0;
}