src/main.cpp

   1
   2 #include "private.h"
   3
   4 using namespace Aqua;
   5
   6 bool read_file(const std::string& path, std::string* dest)
   7 {
   8     std::fstream in;
   9     in.open(path, std::ios::in);
  10     *dest = std::string((std::istreambuf_iterator<char>(in)), (std::istreambuf_iterator<char>()));
  11     return true;
  12 }
  13
  14 void make_argv(Interpreter& ip, size_t start, std::vector<std::string>& args)
  15 {
  16     size_t i;
  17     auto arr = ip.makeArray();
  18     for(i=start; i<args.size(); i++)
  19     {
  20         arr->add(ip.makeString(args[i]));
  21     }
  22     ip.setGlobal(ip.makeString("ARGV"), arr);
  23 }
  24
  25 int interp_main(std::vector<std::string>& args)
  26 {
  27     std::string fname;
  28     std::string source;
  29     Interpreter ip;
  30     if(args.size() > 1)
  31     {
  32         fname = args[1];
  33         if(fname == "-e")
  34         {
  35             source = args[2];
  36             args[2] = "<commandline>";
  37             make_argv(ip, 2, args);
  38             ip.run(source);
  39             return 0;
  40         }
  41         else
  42         {
  43             if(read_file(fname, &source))
  44             {
  45                 make_argv(ip, 1, args);
  46                 ip.run(source);
  47                 return 0;
  48             }
  49             else
  50             {
  51                 std::cerr << "cannot open '" << fname << "' for reading" << std::endl;
  52                 return 1;
  53             }
  54         }
  55     }
  56     else
  57     {
  58         std::cerr << "no input file provided" << std::endl;
  59         return 1;
  60     }
  61     return 0;
  62 }
  63
  64 int main(int argc, char *argv[])
  65 {
  66     std::vector<std::string> args(argv, argv + argc);
  67     return interp_main(args);
  68 }