/* Cycript - Optimizing JavaScript Compiler/Runtime
- * Copyright (C) 2009-2010 Jay Freeman (saurik)
+ * Copyright (C) 2009-2012 Jay Freeman (saurik)
*/
/* GNU Lesser General Public License, Version 3 {{{ */
return Run(pool, client, CYUTF8String(code.c_str(), code.size()));
}
-FILE *fout_;
+static std::ostream *out_;
-static void Output(CYUTF8String json, FILE *fout, bool expand = false) {
+static void Output(CYUTF8String json, std::ostream *out, bool expand = false) {
const char *data(json.data);
size_t size(json.size);
- if (data == NULL || fout == NULL)
+ if (data == NULL || out == NULL)
return;
- if (!expand || data[0] != '"' && data[0] != '\'')
- fputs(data, fout);
+ if (!expand ||
+ data[0] != '@' && data[0] != '"' && data[0] != '\'' ||
+ data[0] == '@' && data[1] != '"' && data[1] != '\''
+ )
+ out->write(data, size);
else for (size_t i(0); i != size; ++i)
if (data[i] != '\\')
- fputc(data[i], fout);
+ *out << data[i];
else switch(data[++i]) {
case '\0': goto done;
- case '\\': fputc('\\', fout); break;
- case '\'': fputc('\'', fout); break;
- case '"': fputc('"', fout); break;
- case 'b': fputc('\b', fout); break;
- case 'f': fputc('\f', fout); break;
- case 'n': fputc('\n', fout); break;
- case 'r': fputc('\r', fout); break;
- case 't': fputc('\t', fout); break;
- case 'v': fputc('\v', fout); break;
- default: fputc('\\', fout); --i; break;
+ case '\\': *out << '\\'; break;
+ case '\'': *out << '\''; break;
+ case '"': *out << '"'; break;
+ case 'b': *out << '\b'; break;
+ case 'f': *out << '\f'; break;
+ case 'n': *out << '\n'; break;
+ case 'r': *out << '\r'; break;
+ case 't': *out << '\t'; break;
+ case 'v': *out << '\v'; break;
+ default: *out << '\\'; --i; break;
}
done:
- fputs("\n", fout);
- fflush(fout);
+ *out << std::endl;
}
-static void Run(int client, const char *data, size_t size, FILE *fout = NULL, bool expand = false) {
+static void Run(int client, const char *data, size_t size, std::ostream *out = NULL, bool expand = false) {
CYPool pool;
- Output(Run(pool, client, CYUTF8String(data, size)), fout, expand);
+ Output(Run(pool, client, CYUTF8String(data, size)), out, expand);
}
-static void Run(int client, std::string &code, FILE *fout = NULL, bool expand = false) {
- Run(client, code.c_str(), code.size(), fout, expand);
+static void Run(int client, std::string &code, std::ostream *out = NULL, bool expand = false) {
+ Run(client, code.c_str(), code.size(), out, expand);
}
int (*append_history$)(int, const char *);
static std::string command_;
static CYExpression *ParseExpression(CYUTF8String code) {
- std::ostringstream str;
- str << '(' << code << ')';
- std::string string(str.str());
-
- CYDriver driver;
- driver.data_ = string.c_str();
- driver.size_ = string.size();
+ std::stringstream stream;
+ stream << '(' << code << ')';
+ CYDriver driver(stream);
cy::parser parser(driver);
Setup(driver, parser);
if (parser.parse() != 0 || !driver.errors_.empty())
return NULL;
- CYExpress *express(dynamic_cast<CYExpress *>(driver.program_->statements_));
- _assert(express != NULL);
- return express->expression_;
+ CYOptions options;
+ CYContext context(options);
+
+ // XXX: this could be replaced with a CYStatement::Primitive()
+ if (CYExpress *express = dynamic_cast<CYExpress *>(driver.program_->statements_))
+ return express->expression_->Primitive(context);
+
+ return NULL;
}
static int client_;
rl_attempted_completion_over = TRUE;
CYLocalPool pool;
- CYDriver driver;
- cy::parser parser(driver);
- Setup(driver, parser);
std::string line(rl_line_buffer, start);
- std::string command(command_ + line);
-
- driver.data_ = command.c_str();
- driver.size_ = command.size();
+ std::istringstream stream(command_ + line);
+ CYDriver driver(stream);
driver.auto_ = true;
+ cy::parser parser(driver);
+ Setup(driver, parser);
+
if (parser.parse() != 0 || !driver.errors_.empty())
return NULL;
driver.program_ = $ CYProgram($ CYExpress($C3(ParseExpression(
" function(object, prefix, word) {\n"
" var names = [];\n"
- " var pattern = '^' + prefix + word;\n"
- " var length = prefix.length;\n"
+ " var before = prefix.length;\n"
+ " prefix += word;\n"
+ " var entire = prefix.length;\n"
" for (name in object)\n"
- " if (name.match(pattern) != null)\n"
- " names.push(name.substr(length));\n"
+ " if (name.substring(0, entire) == prefix)\n"
+ " names.push(name.substr(before));\n"
" return names;\n"
" }\n"
), expression, $S(begin.c_str()), $S(word))));
std::string code(str.str());
CYUTF8String json(Run(pool, client_, code));
+ // XXX: if this fails we should not try to parse it
CYExpression *result(ParseExpression(json));
if (result == NULL)
CYArray *array(dynamic_cast<CYArray *>(result));
if (array == NULL) {
- fprintf(fout_, "\n");
- Output(json, fout_);
+ *out_ << '\n';
+ Output(json, out_);
rl_forced_update_display();
return NULL;
}
bool debug(false);
bool expand(false);
- fout_ = stdout;
+ out_ = &std::cout;
// rl_completer_word_break_characters is broken in libedit
rl_basic_word_break_characters = break_;
if (setjmp(ctrlc_) != 0) {
mode_ = Working;
- fputs("\n", fout_);
- fflush(fout_);
+ *out_ << std::endl;
goto restart;
}
std::string data(line + 1);
if (data == "bypass") {
bypass = !bypass;
- fprintf(fout_, "bypass == %s\n", bypass ? "true" : "false");
- fflush(fout_);
+ *out_ << "bypass == " << (bypass ? "true" : "false") << std::endl;
} else if (data == "debug") {
debug = !debug;
- fprintf(fout_, "debug == %s\n", debug ? "true" : "false");
- fflush(fout_);
+ *out_ << "debug == " << (debug ? "true" : "false") << std::endl;
} else if (data == "expand") {
expand = !expand;
- fprintf(fout_, "expand == %s\n", expand ? "true" : "false");
- fflush(fout_);
+ *out_ << "expand == " << (expand ? "true" : "false") << std::endl;
}
add_history(line);
++histlines;
code = command_;
else {
CYLocalPool pool;
- CYDriver driver;
+
+ std::istringstream stream(command_);
+ CYDriver driver(stream);
+
cy::parser parser(driver);
Setup(driver, parser);
- driver.data_ = command_.c_str();
- driver.size_ = command_.size();
-
if (parser.parse() != 0 || !driver.errors_.empty()) {
for (CYDriver::Errors::const_iterator error(driver.errors_.begin()); error != driver.errors_.end(); ++error) {
cy::position begin(error->location_.begin);
if (debug)
std::cout << code << std::endl;
- Run(client_, code, fout_, expand);
+ Run(client_, code, out_, expand);
}
if (append_history$ != NULL) {
write_history(histfile);
}
- fputs("\n", fout_);
- fflush(fout_);
+ *out_ << std::endl;
}
static void *Map(const char *path, size_t *psize) {
Console(options);
else {
CYLocalPool pool;
- CYDriver driver(script ?: "<stdin>");
- cy::parser parser(driver);
- Setup(driver, parser);
char *start, *end;
+ std::istream *indirect;
if (script == NULL) {
start = NULL;
end = NULL;
-
- driver.file_ = stdin;
+ indirect = &std::cin;
} else {
size_t size;
start = reinterpret_cast<char *>(Map(script, &size));
start = end;
}
- driver.data_ = start;
- driver.size_ = end - start;
+ indirect = NULL;
}
+ CYStream direct(start, end);
+ std::istream &stream(indirect == NULL ? direct : *indirect);
+ CYDriver driver(stream, script ?: "<stdin>");
+
+ cy::parser parser(driver);
+ Setup(driver, parser);
+
if (parser.parse() != 0 || !driver.errors_.empty()) {
for (CYDriver::Errors::const_iterator i(driver.errors_.begin()); i != driver.errors_.end(); ++i)
std::cerr << i->location_.begin << ": " << i->message_ << std::endl;
} else if (driver.program_ != NULL)
if (client_ != -1) {
+ // XXX: this code means that you can't pipe to another process
std::string code(start, end-start);
- Run(client_, code, stdout);
+ Run(client_, code, &std::cout);
} else {
std::ostringstream str;
CYOutput out(str, options);
if (compile)
std::cout << code;
else
- Run(client_, code, stdout);
+ Run(client_, code, &std::cout);
}
}
projects / cycript.git / blobdiff