mirror of https://gitee.com/bigwinds/arangodb
402 lines
12 KiB
C++
402 lines
12 KiB
C++
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief V8 line editor
|
|
///
|
|
/// @file
|
|
///
|
|
/// DISCLAIMER
|
|
///
|
|
/// Copyright 2004-2012 triagens GmbH, Cologne, Germany
|
|
///
|
|
/// Licensed under the Apache License, Version 2.0 (the "License");
|
|
/// you may not use this file except in compliance with the License.
|
|
/// You may obtain a copy of the License at
|
|
///
|
|
/// http://www.apache.org/licenses/LICENSE-2.0
|
|
///
|
|
/// Unless required by applicable law or agreed to in writing, software
|
|
/// distributed under the License is distributed on an "AS IS" BASIS,
|
|
/// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
/// See the License for the specific language governing permissions and
|
|
/// limitations under the License.
|
|
///
|
|
/// Copyright holder is triAGENS GmbH, Cologne, Germany
|
|
///
|
|
/// @author Dr. Frank Celler
|
|
/// @author Copyright 2011-2012, triAGENS GmbH, Cologne, Germany
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
#include "MRLineEditor.h"
|
|
|
|
#include <readline/readline.h>
|
|
#include <readline/history.h>
|
|
|
|
#include "BasicsC/strings.h"
|
|
|
|
#if RL_READLINE_VERSION >= 0x0500
|
|
#define completion_matches rl_completion_matches
|
|
#endif
|
|
|
|
#include "mruby.h"
|
|
#include "mruby/compile.h"
|
|
|
|
using namespace std;
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- class MRLineEditor
|
|
// -----------------------------------------------------------------------------
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- private variables
|
|
// -----------------------------------------------------------------------------
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @addtogroup MRShell
|
|
/// @{
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief word break characters
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
#if 0
|
|
static char WordBreakCharacters[] = {
|
|
' ', '\t', '\n', '"', '\\', '\'', '`', '@',
|
|
'<', '>', '=', ';', '|', '&', '{', '}', '(', ')',
|
|
'\0'
|
|
};
|
|
#endif
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @}
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- private functions
|
|
// -----------------------------------------------------------------------------
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @addtogroup MRLineEditor
|
|
/// @{
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief completion generator
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
#if 0
|
|
static char* CompletionGenerator (char const* text, int state) {
|
|
static size_t currentIndex;
|
|
static vector<string> result;
|
|
char* prefix;
|
|
|
|
// compute the possible completion
|
|
if (state == 0) {
|
|
if (! v8::Context::InContext()) {
|
|
return 0;
|
|
}
|
|
|
|
// locate global object or sub-object
|
|
v8::Handle<v8::Object> current = v8::Context::GetCurrent()->Global();
|
|
string path;
|
|
|
|
if (*text != '\0') {
|
|
TRI_vector_string_t splitted = TRI_SplitString(text, '.');
|
|
|
|
if (1 < splitted._length) {
|
|
for (size_t i = 0; i < splitted._length - 1; ++i) {
|
|
v8::Handle<v8::String> name = v8::String::New(splitted._buffer[i]);
|
|
|
|
if (! current->Has(name)) {
|
|
TRI_DestroyVectorString(&splitted);
|
|
return 0;
|
|
}
|
|
|
|
v8::Handle<v8::Value> val = current->Get(name);
|
|
|
|
if (! val->IsObject()) {
|
|
TRI_DestroyVectorString(&splitted);
|
|
return 0;
|
|
}
|
|
|
|
current = val->ToObject();
|
|
path = path + splitted._buffer[i] + ".";
|
|
}
|
|
|
|
prefix = TRI_DuplicateString(splitted._buffer[splitted._length - 1]);
|
|
}
|
|
else {
|
|
prefix = TRI_DuplicateString(text);
|
|
}
|
|
|
|
TRI_DestroyVectorString(&splitted);
|
|
}
|
|
else {
|
|
prefix = TRI_DuplicateString(text);
|
|
}
|
|
|
|
// compute all possible completions
|
|
v8::Handle<v8::Array> properties;
|
|
v8::Handle<v8::String> cpl = v8::String::New("_COMPLETIONS");
|
|
|
|
if (current->HasOwnProperty(cpl)) {
|
|
v8::Handle<v8::Value> funcVal = current->Get(cpl);
|
|
|
|
if (funcVal->IsFunction()) {
|
|
v8::Handle<v8::Function> func = v8::Handle<v8::Function>::Cast(funcVal);
|
|
v8::Handle<v8::Value> args;
|
|
v8::Handle<v8::Value> cpls = func->Call(current, 0, &args);
|
|
|
|
if (cpls->IsArray()) {
|
|
properties = v8::Handle<v8::Array>::Cast(cpls);
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
properties = current->GetPropertyNames();
|
|
}
|
|
|
|
// locate
|
|
if (! properties.IsEmpty()) {
|
|
size_t n = properties->Length();
|
|
|
|
for (size_t i = 0; i < n; ++i) {
|
|
v8::Handle<v8::Value> v = properties->Get(i);
|
|
|
|
TRI_Utf8ValueNFC str(TRI_UNKNOWN_MEM_ZONE, v);
|
|
char const* s = *str;
|
|
|
|
if (s != 0 && *s) {
|
|
string suffix = (current->Get(v)->IsFunction()) ? "()" : "";
|
|
string name = path + s + suffix;
|
|
|
|
if (*prefix == '\0' || TRI_IsPrefixString(s, prefix)) {
|
|
result.push_back(name);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
currentIndex = 0;
|
|
|
|
TRI_FreeString(prefix);
|
|
}
|
|
|
|
if (currentIndex < result.size()) {
|
|
return TRI_DuplicateString(result[currentIndex++].c_str());
|
|
}
|
|
else {
|
|
result.clear();
|
|
return 0;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief attempted completion
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
#if 0
|
|
static char** AttemptedCompletion (char const* text, int start, int end) {
|
|
char** result;
|
|
|
|
result = completion_matches(text, CompletionGenerator);
|
|
rl_attempted_completion_over = true;
|
|
|
|
if (result != 0 && result[0] != 0 && result[1] == 0) {
|
|
size_t n = strlen(result[0]);
|
|
|
|
if (result[0][n-1] == ')') {
|
|
result[0][n-1] = '\0';
|
|
|
|
#if RL_READLINE_VERSION >= 0x0500
|
|
rl_completion_suppress_append = 1;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
return result;
|
|
}
|
|
#endif
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @}
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- constructors and destructors
|
|
// -----------------------------------------------------------------------------
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @addtogroup MRLineEditor
|
|
/// @{
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief constructs a new editor
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
MRLineEditor::MRLineEditor (MR_state_t* mrs, string const& history)
|
|
: LineEditor(history), _current(), _mrs(mrs) {
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @}
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- public methods
|
|
// -----------------------------------------------------------------------------
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @addtogroup MRLineEditor
|
|
/// @{
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief line editor open
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
bool MRLineEditor::open (const bool autoComplete) {
|
|
return LineEditor::open(autoComplete);
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @}
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// -----------------------------------------------------------------------------
|
|
// --SECTION-- protected methods
|
|
// -----------------------------------------------------------------------------
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @addtogroup LineEditor
|
|
/// @{
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @brief check if line is complete
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
bool MRLineEditor::isComplete (string const& source, size_t lineno, size_t column) {
|
|
static char const* msg1 = "syntax error, unexpected $end";
|
|
static char const* msg2 = "syntax error, unexpected keyword_end, expecting $end";
|
|
|
|
mrb_state *mrb_interpreter;
|
|
struct mrb_parser_state* parser;
|
|
|
|
char* text = TRI_DuplicateString(source.c_str());
|
|
bool complete = true;
|
|
|
|
mrb_interpreter = mrb_open();
|
|
parser = mrb_parser_new(mrb_interpreter);
|
|
parser->s = text;
|
|
parser->send = text + source.size();
|
|
parser->capture_errors = 1;
|
|
parser->lineno = 1;
|
|
|
|
mrb_parser_parse(parser);
|
|
|
|
TRI_FreeString(TRI_CORE_MEM_ZONE, text);
|
|
|
|
char const* message = parser->error_buffer[0].message;
|
|
bool eofMsg = false;
|
|
|
|
if (message != 0) {
|
|
if (TRI_EqualString2(message, msg1, strlen(msg1))) {
|
|
eofMsg = true;
|
|
}
|
|
else if (TRI_EqualString2(message, msg2, strlen(msg1))) {
|
|
eofMsg = true;
|
|
}
|
|
}
|
|
|
|
// no error or strange error
|
|
if (parser->tree != 0) {
|
|
complete = true;
|
|
}
|
|
|
|
// check for unterminated string
|
|
else if (parser->sterm) {
|
|
complete = false;
|
|
}
|
|
|
|
// check for end-of-line
|
|
else if (0 < parser->nerr && eofMsg) {
|
|
complete = false;
|
|
}
|
|
|
|
// check the parser state
|
|
else {
|
|
switch (parser->lstate) {
|
|
|
|
// an expression was just started, we can't end it like this
|
|
case EXPR_BEG:
|
|
complete = false;
|
|
break;
|
|
|
|
// a message dot was the last token, there has to come more
|
|
case EXPR_DOT:
|
|
complete = false;
|
|
break;
|
|
|
|
// a class keyword is not enough!, we need also a name of the class
|
|
case EXPR_CLASS:
|
|
complete = false;
|
|
break;
|
|
|
|
// a method name is necessary
|
|
case EXPR_FNAME:
|
|
complete = false;
|
|
break;
|
|
|
|
// if, elsif, etc. without condition
|
|
case EXPR_VALUE:
|
|
complete = false;
|
|
break;
|
|
|
|
// an argument is the last token
|
|
case EXPR_ARG:
|
|
complete = true;
|
|
break;
|
|
|
|
// TODO: what is this?
|
|
case EXPR_CMDARG:
|
|
break;
|
|
|
|
// TODO: an expression was ended
|
|
case EXPR_END:
|
|
break;
|
|
|
|
// TODO: closing parenthese
|
|
case EXPR_ENDARG:
|
|
break;
|
|
|
|
// TODO: definition end
|
|
case EXPR_ENDFN:
|
|
break;
|
|
|
|
// TODO: jump keyword like break, return, ...
|
|
case EXPR_MID:
|
|
break;
|
|
|
|
// don't know what to do with this token
|
|
case EXPR_MAX_STATE:
|
|
break;
|
|
}
|
|
}
|
|
|
|
mrb_pool_close(parser->pool);
|
|
mrb_close(mrb_interpreter);
|
|
|
|
return complete;
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
/// @}
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// Local Variables:
|
|
// mode: outline-minor
|
|
// outline-regexp: "^\\(/// @brief\\|/// {@inheritDoc}\\|/// @addtogroup\\|// --SECTION--\\|/// @\\}\\)"
|
|
// End:
|