2013-09-02 13:18:15 +00:00
|
|
|
|
#include <iostream>
|
|
|
|
|
#include <cstdlib>
|
|
|
|
|
|
|
|
|
|
#include <readline/readline.h>
|
|
|
|
|
#include <readline/history.h>
|
|
|
|
|
|
|
|
|
|
#include "shared.hh"
|
|
|
|
|
#include "eval.hh"
|
2013-09-02 15:53:58 +00:00
|
|
|
|
#include "eval-inline.hh"
|
|
|
|
|
#include "store-api.hh"
|
2013-09-02 13:18:15 +00:00
|
|
|
|
|
|
|
|
|
using namespace std;
|
|
|
|
|
using namespace nix;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
string programId = "nix-repl";
|
|
|
|
|
|
|
|
|
|
|
2013-09-02 15:53:58 +00:00
|
|
|
|
struct NixRepl
|
|
|
|
|
{
|
|
|
|
|
string curDir;
|
|
|
|
|
EvalState state;
|
|
|
|
|
|
|
|
|
|
StaticEnv staticEnv;
|
|
|
|
|
Env * env;
|
|
|
|
|
int displ;
|
|
|
|
|
|
|
|
|
|
NixRepl();
|
|
|
|
|
void mainLoop();
|
|
|
|
|
void processLine(string line);
|
|
|
|
|
void addVar(const Symbol & name, Value * v);
|
|
|
|
|
Expr * parseString(string s);
|
2013-09-02 16:00:48 +00:00
|
|
|
|
void evalString(string s, Value & v);
|
2013-09-02 15:53:58 +00:00
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
2013-09-02 13:18:15 +00:00
|
|
|
|
void printHelp()
|
|
|
|
|
{
|
|
|
|
|
std::cout << "Usage: nix-repl\n";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
bool getLine(string & line)
|
|
|
|
|
{
|
2013-09-02 15:53:58 +00:00
|
|
|
|
char * s = readline("nix-repl> ");
|
2013-09-02 13:18:15 +00:00
|
|
|
|
if (!s) return false;
|
|
|
|
|
line = chomp(string(s));
|
|
|
|
|
free(s);
|
|
|
|
|
if (line != "") add_history(line.c_str());
|
|
|
|
|
return true;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2013-09-02 15:53:58 +00:00
|
|
|
|
NixRepl::NixRepl()
|
|
|
|
|
: staticEnv(false, &state.staticBaseEnv)
|
2013-09-02 13:18:15 +00:00
|
|
|
|
{
|
2013-09-02 15:53:58 +00:00
|
|
|
|
curDir = absPath(".");
|
|
|
|
|
|
|
|
|
|
env = &state.allocEnv(32768);
|
|
|
|
|
env->up = &state.baseEnv;
|
|
|
|
|
displ = 0;
|
|
|
|
|
|
|
|
|
|
store = openStore();
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void NixRepl::mainLoop()
|
|
|
|
|
{
|
|
|
|
|
std::cerr << "Welcome to Nix version " << NIX_VERSION << ". Type :? for help." << std::endl << std::endl;
|
2013-09-02 13:18:15 +00:00
|
|
|
|
|
|
|
|
|
while (true) {
|
|
|
|
|
string line;
|
|
|
|
|
if (!getLine(line)) break;
|
|
|
|
|
|
2013-09-02 15:53:58 +00:00
|
|
|
|
/* Remove preceeding whitespace. */
|
|
|
|
|
size_t n = line.find_first_not_of(" \n\r\t");
|
|
|
|
|
if (n != string::npos) line = string(line, n);
|
|
|
|
|
|
2013-09-02 13:18:15 +00:00
|
|
|
|
try {
|
2013-09-02 15:53:58 +00:00
|
|
|
|
processLine(line);
|
2013-09-02 13:18:15 +00:00
|
|
|
|
} catch (Error & e) {
|
|
|
|
|
printMsg(lvlError, e.msg());
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
std::cout << std::endl;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
std::cout << std::endl;
|
|
|
|
|
}
|
2013-09-02 15:53:58 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void NixRepl::processLine(string line)
|
|
|
|
|
{
|
|
|
|
|
if (string(line, 0, 2) == ":a") {
|
|
|
|
|
Value v;
|
2013-09-02 16:00:48 +00:00
|
|
|
|
evalString(string(line, 2), v);
|
2013-09-02 15:53:58 +00:00
|
|
|
|
state.forceAttrs(v);
|
|
|
|
|
foreach (Bindings::iterator, i, *v.attrs)
|
|
|
|
|
addVar(i->name, i->value);
|
|
|
|
|
}
|
|
|
|
|
|
2013-09-02 16:00:48 +00:00
|
|
|
|
else if (string(line, 0, 2) == ":t") {
|
|
|
|
|
Value v;
|
|
|
|
|
evalString(string(line, 2), v);
|
|
|
|
|
std::cout << showType(v) << std::endl;
|
|
|
|
|
}
|
|
|
|
|
|
2013-09-02 15:53:58 +00:00
|
|
|
|
else if (string(line, 0, 1) == ":") {
|
|
|
|
|
throw Error(format("unknown command ‘%1%’") % string(line, 0, 2));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
else {
|
|
|
|
|
Value v;
|
2013-09-02 16:00:48 +00:00
|
|
|
|
evalString(line, v);
|
2013-09-02 15:53:58 +00:00
|
|
|
|
state.strictForceValue(v);
|
|
|
|
|
std::cout << v << std::endl;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void NixRepl::addVar(const Symbol & name, Value * v)
|
|
|
|
|
{
|
|
|
|
|
staticEnv.vars[name] = displ;
|
|
|
|
|
env->values[displ++] = v;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Expr * NixRepl::parseString(string s)
|
|
|
|
|
{
|
|
|
|
|
Expr * e = state.parseExprFromString(s, curDir, staticEnv);
|
|
|
|
|
return e;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2013-09-02 16:00:48 +00:00
|
|
|
|
void NixRepl::evalString(string s, Value & v)
|
|
|
|
|
{
|
|
|
|
|
Expr * e = parseString(s);
|
|
|
|
|
e->eval(state, *env, v);
|
|
|
|
|
state.forceValue(v);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2013-09-02 15:53:58 +00:00
|
|
|
|
void run(nix::Strings args)
|
|
|
|
|
{
|
|
|
|
|
NixRepl repl;
|
|
|
|
|
repl.mainLoop();
|
|
|
|
|
}
|