lex.cpp

Go to the documentation of this file.

#include "lex/Lexer.hpp"
#include <mutable/lex/TokenType.hpp>
#include <mutable/util/ArgParser.hpp>
#include <mutable/util/Diagnostic.hpp>
#include <mutable/util/fn.hpp>
#include <cerrno>
#include <cstdlib>
#include <cstring>
#include <fstream>
#include <iostream>
 
 
using namespace m;
 
 
void usage(std::ostream &out, const char *name)
{
    out << "Performs lexicographic analysis of the input.\n"
        << "USAGE:\n\t" << name << " <FILE>"
        << "\n\t" << name << " -"
        << std::endl;
}
 
int main(int argc, const char **argv)
{
    ArgParser AP;
#define ADD(TYPE, VAR, INIT, SHORT, LONG, DESCR, CALLBACK)\
    TYPE VAR = INIT;\
    {\
        AP.add<TYPE>(SHORT, LONG, DESCR, CALLBACK);\
    }
    ADD(bool, show_help, false,             /* Type, Var, Init  */
        "-h", "--help",                     /* Short, Long      */
        "prints this help message",         /* Description      */
        [&](bool) { show_help = true; });   /* Callback         */
    ADD(bool, color, false,                 /* Type, Var, Init  */
        nullptr, "--color",                 /* Short, Long      */
        "use colors",                       /* Description      */
        [&](bool) { color = true; });       /* Callback         */
#undef ADD
    AP.parse_args(argc, argv);
 
    if (show_help) {
        usage(std::cout, argv[0]);
        std::cout << "WHERE\n" << AP;
        std::exit(EXIT_SUCCESS);
    }
 
    if (AP.args().size() != 1) {
        usage(std::cerr, argv[0]);
        std::cerr << "WHERE\n" << AP;
        std::exit(EXIT_FAILURE);
    }
 
    const char *filename = AP.args()[0];
    std::istream *in;
    if (streq(filename, "-")) {
        /* read from stdin */
        in = &std::cin;
    } else {
        /* read from file */
        in = new std::ifstream(filename, std::ios_base::in);
    }
 
    if (in->fail()) {
        if (in == &std::cin)
            std::cerr << "Failed to open stdin: ";
        else
            std::cerr << "Failed to open the file '" << filename << "': ";
        std::cerr << strerror(errno) << std::endl;
    }
 
    Diagnostic diag(color, std::cout, std::cerr);
    ThreadSafeStringPool pool;
    ast::Lexer lexer(diag, pool, filename, *in);
 
    while (auto tok = lexer.next())
        diag(tok.pos) << tok.text << ' ' << tok.type << std::endl;
 
    if (in != &std::cin)
        delete in;
 
    std::exit(diag.num_errors() ? EXIT_FAILURE : EXIT_SUCCESS);
}