1
0
Fork 0
arangodb/lib/V8/v8-utils.cpp

4573 lines
146 KiB
C++

////////////////////////////////////////////////////////////////////////////////
/// @brief V8 utility functions
///
/// @file
///
/// DISCLAIMER
///
/// Copyright 2014 ArangoDB GmbH, Cologne, Germany
/// Copyright 2004-2014 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 ArangoDB GmbH, Cologne, Germany
///
/// @author Dr. Frank Celler
/// @author Copyright 2014, ArangoDB GmbH, Cologne, Germany
/// @author Copyright 2011-2014, triAGENS GmbH, Cologne, Germany
////////////////////////////////////////////////////////////////////////////////
#ifdef _WIN32
#include "Basics/win-utils.h"
#endif
#include "v8-utils.h"
#include "v8-buffer.h"
#include <regex.h>
#include "Basics/Dictionary.h"
#include "Basics/FileUtils.h"
#include "Basics/Nonce.h"
#include "Basics/ProgramOptions.h"
#include "Basics/RandomGenerator.h"
#include "Basics/StringUtils.h"
#include "Basics/conversions.h"
#include "Basics/csv.h"
#include "Basics/files.h"
#include "Basics/logging.h"
#include "Basics/process-utils.h"
#include "Basics/string-buffer.h"
#include "Basics/tri-strings.h"
#include "Basics/tri-zip.h"
#include "Basics/Utf8Helper.h"
#include "Rest/HttpRequest.h"
#include "Rest/SslInterface.h"
#include "SimpleHttpClient/GeneralClientConnection.h"
#include "SimpleHttpClient/SimpleHttpClient.h"
#include "SimpleHttpClient/SimpleHttpResult.h"
#include "Statistics/statistics.h"
#include "V8/v8-conv.h"
#include "V8/v8-globals.h"
#include "unicode/normalizer2.h"
#include "3rdParty/valgrind/valgrind.h"
using namespace std;
using namespace triagens::arango;
using namespace triagens::basics;
using namespace triagens::httpclient;
using namespace triagens::rest;
// -----------------------------------------------------------------------------
// --SECTION-- GENERAL
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief Random string generators
////////////////////////////////////////////////////////////////////////////////
namespace {
static Random::UniformCharacter JSAlphaNumGenerator("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789");
static Random::UniformCharacter JSNumGenerator("0123456789");
static Random::UniformCharacter JSSaltGenerator("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!@#$%^&*(){}[]:;<>,.?/|");
}
// -----------------------------------------------------------------------------
// --SECTION-- public classes
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief Converts an object to a UTF-8-encoded and normalized character array.
////////////////////////////////////////////////////////////////////////////////
TRI_Utf8ValueNFC::TRI_Utf8ValueNFC (TRI_memory_zone_t* memoryZone,
v8::Handle<v8::Value> const obj)
: _str(nullptr),
_length(0),
_memoryZone(memoryZone) {
v8::String::Value str(obj);
int str_len = str.length();
_str = TRI_normalize_utf16_to_NFC(_memoryZone, *str, (size_t) str_len, &_length);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief Destroys a normalized string object
////////////////////////////////////////////////////////////////////////////////
TRI_Utf8ValueNFC::~TRI_Utf8ValueNFC () {
if (_str != nullptr) {
TRI_Free(_memoryZone, _str);
}
}
// -----------------------------------------------------------------------------
// --SECTION-- private functions
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief create a Javascript error object
////////////////////////////////////////////////////////////////////////////////
static void CreateErrorObject (v8::Isolate* isolate,
int errorNumber,
string const& message) {
if (errorNumber == TRI_ERROR_OUT_OF_MEMORY) {
LOG_ERROR("encountered out-of-memory error");
}
v8::Handle<v8::String> errorMessage = TRI_V8_STD_STRING(message);
if (errorMessage.IsEmpty()) {
isolate->ThrowException(v8::Object::New(isolate));
return;
}
v8::Handle<v8::Value> err = v8::Exception::Error(errorMessage);
if (err.IsEmpty()) {
isolate->ThrowException(v8::Object::New(isolate));
return ;
}
v8::Handle<v8::Object> errorObject = err->ToObject();
if (errorObject.IsEmpty()) {
isolate->ThrowException(v8::Object::New(isolate));
return ;
}
errorObject->Set(TRI_V8_ASCII_STRING("errorNum"), v8::Number::New(isolate, errorNumber));
errorObject->Set(TRI_V8_ASCII_STRING("errorMessage"), errorMessage);
TRI_GET_GLOBALS();
TRI_GET_GLOBAL(ArangoErrorTempl, v8::ObjectTemplate);
v8::Handle<v8::Object> ArangoError = ArangoErrorTempl->NewInstance();
if (! ArangoError.IsEmpty()) {
errorObject->SetPrototype(ArangoError);
}
isolate->ThrowException(errorObject);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads/execute a file into/in the current context
////////////////////////////////////////////////////////////////////////////////
static bool LoadJavaScriptFile (v8::Isolate* isolate,
char const* filename,
bool execute,
bool useGlobalContext) {
v8::HandleScope handleScope(isolate);
size_t length;
char* content = TRI_SlurpFile(TRI_UNKNOWN_MEM_ZONE, filename, &length);
if (content == nullptr) {
LOG_TRACE("cannot load java script file '%s': %s", filename, TRI_last_error());
return false;
}
if (useGlobalContext) {
char const* prologue = "(function() { ";
char const* epilogue = "/* end-of-file */ })()";
char* contentWrapper = TRI_Concatenate3StringZ(TRI_UNKNOWN_MEM_ZONE,
prologue,
content,
epilogue);
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
length += strlen(prologue) + strlen(epilogue);
content = contentWrapper;
}
if (content == nullptr) {
LOG_TRACE("cannot load java script file '%s': %s", filename, TRI_errno_string(TRI_ERROR_OUT_OF_MEMORY));
return false;
}
v8::Handle<v8::String> name = TRI_V8_STRING(filename);
v8::Handle<v8::String> source = TRI_V8_PAIR_STRING(content, (int) length);
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
v8::Handle<v8::Script> script = v8::Script::Compile(source, name);
// compilation failed, print errors that happened during compilation
if (script.IsEmpty()) {
return false;
}
if (execute) {
// execute script
v8::Handle<v8::Value> result = script->Run();
if (result.IsEmpty()) {
return false;
}
}
LOG_TRACE("loaded java script file: '%s'", filename);
return true;
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads all files from a directory into the current context
////////////////////////////////////////////////////////////////////////////////
static bool LoadJavaScriptDirectory (v8::Isolate* isolate,
char const* path,
bool execute,
bool useGlobalContext) {
v8::HandleScope scope(isolate);
TRI_vector_string_t files;
bool result;
regex_t re;
size_t i;
LOG_TRACE("loading JavaScript directory: '%s'", path);
files = TRI_FilesDirectory(path);
regcomp(&re, "^(.*)\\.js$", REG_ICASE | REG_EXTENDED);
result = true;
for (i = 0; i < files._length; ++i) {
v8::TryCatch tryCatch;
bool ok;
char const* filename;
char* full;
filename = files._buffer[i];
if (regexec(&re, filename, 0, 0, 0) != 0) {
continue;
}
full = TRI_Concatenate2File(path, filename);
ok = LoadJavaScriptFile(isolate, full, execute, useGlobalContext);
TRI_FreeString(TRI_CORE_MEM_ZONE, full);
result = result && ok;
if (! ok) {
if (tryCatch.CanContinue()) {
TRI_LogV8Exception(isolate, &tryCatch);
}
else {
TRI_GET_GLOBALS();
v8g->_canceled = true;
}
}
}
TRI_DestroyVectorString(&files);
regfree(&re);
return result;
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates a distribution vector
////////////////////////////////////////////////////////////////////////////////
static v8::Handle<v8::Array> DistributionList (v8::Isolate* isolate,
StatisticsVector const& dist) {
v8::EscapableHandleScope scope(isolate);
v8::Handle<v8::Array> result = v8::Array::New(isolate);
for (uint32_t i = 0; i < (uint32_t) dist._value.size(); ++i) {
result->Set(i, v8::Number::New(isolate, dist._value[i]));
}
return scope.Escape<v8::Array>(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief fills the distribution
////////////////////////////////////////////////////////////////////////////////
static void FillDistribution (v8::Isolate* isolate,
v8::Handle<v8::Object> list,
v8::Handle<v8::String> name,
StatisticsDistribution const& dist) {
v8::Handle<v8::Object> result = v8::Object::New(isolate);
result->Set(TRI_V8_ASCII_STRING("sum"), v8::Number::New(isolate, dist._total));
result->Set(TRI_V8_ASCII_STRING("count"), v8::Number::New(isolate, (double) dist._count));
v8::Handle<v8::Array> counts = v8::Array::New(isolate, (int) dist._counts.size());
uint32_t pos = 0;
for (vector<uint64_t>::const_iterator i = dist._counts.begin(); i != dist._counts.end(); ++i, ++pos) {
counts->Set(pos, v8::Number::New(isolate, (double) *i));
}
result->Set(TRI_V8_ASCII_STRING("counts"), counts);
list->Set(name, result);
}
// -----------------------------------------------------------------------------
// --SECTION-- JS functions
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the program options
////////////////////////////////////////////////////////////////////////////////
static void JS_Options (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("options()");
}
auto json = triagens::basics::ProgramOptions::getJson();
if (json != nullptr) {
auto result = TRI_ObjectJson(isolate, json);
// remove this variable
result->ToObject()->ForceDelete(TRI_V8_STRING("server.password"));
TRI_V8_RETURN(result);
}
TRI_V8_RETURN(v8::Object::New(isolate));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief decodes a base64-encoded string
///
/// @FUN{internal.base64Decode(@FA{value})}
///
/// Base64-decodes the string @FA{value}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Base64Decode(const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("base64Decode(<value>)");
}
try {
string const value = TRI_ObjectToString(args[0]);
string const base64 = StringUtils::decodeBase64(value);
TRI_V8_RETURN_STD_STRING(base64);
}
catch (...) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), TRI_last_error());
}
TRI_ASSERT(false);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief encodes a string as base64
///
/// @FUN{internal.base64Encode(@FA{value})}
///
/// Base64-encodes the string @FA{value}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Base64Encode (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("base64Encode(<value>)");
}
try {
string const&& value = TRI_ObjectToString(args[0]);
string const&& base64 = StringUtils::encodeBase64(value);
TRI_V8_RETURN_STD_STRING(base64);
}
catch (...) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), TRI_last_error());
}
TRI_ASSERT(false);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief parses a Javascript snippet, but does not execute it
///
/// @FUN{internal.parse(@FA{script})}
///
/// Parses the @FA{script} code, but does not execute it.
/// Will return *true* if the code does not have a parse error, and throw
/// an exception otherwise.
////////////////////////////////////////////////////////////////////////////////
static void JS_Parse (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE("parse(<script>)");
}
v8::Handle<v8::Value> source = args[0];
v8::Handle<v8::Value> filename;
if (args.Length() > 1) {
filename = args[1];
}
else {
filename = TRI_V8_ASCII_STRING("<snippet>");
}
if (! source->IsString()) {
TRI_V8_THROW_TYPE_ERROR("<script> must be a string");
}
v8::TryCatch tryCatch;
v8::Handle<v8::Script> script = v8::Script::Compile(source->ToString(), filename->ToString());
// compilation failed, we have caught an exception
if (tryCatch.HasCaught()) {
if (tryCatch.CanContinue()) {
string err = TRI_StringifyV8Exception(isolate, &tryCatch);
TRI_V8_THROW_SYNTAX_ERROR(err.c_str());
}
else {
TRI_GET_GLOBALS();
v8g->_canceled = true;
TRI_V8_RETURN_UNDEFINED();
}
}
// compilation failed, we don't know why
if (script.IsEmpty()) {
TRI_V8_RETURN_FALSE();
}
else {
TRI_V8_RETURN_TRUE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief parses a Javascript file, but does not execute it
///
/// @FUN{internal.parseFile(@FA{filename})}
///
/// Parses the file @FA{filename}, but does not execute it.
/// Will return *true* if the code does not have a parse error, and throw
/// an exception otherwise.
////////////////////////////////////////////////////////////////////////////////
static void JS_ParseFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("parseFile(<filename>)");
}
if (!args[0]->IsString() && !args[0]->IsStringObject()) {
TRI_V8_THROW_EXCEPTION_USAGE("parseFile(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a UTF-8 string");
}
size_t length;
char* content = TRI_SlurpFile(TRI_UNKNOWN_MEM_ZONE, *name, &length);
if (content == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), "cannot read file");
}
v8::Handle<v8::Value> result;
auto script = v8::Script::Compile(TRI_V8_PAIR_STRING(content,(int) length),
args[0]->ToString());
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
// compilation failed, print errors that happened during compilation
if (script.IsEmpty()) {
TRI_V8_RETURN(result);
}
else {
TRI_V8_RETURN_TRUE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief helper function for internal.download()
////////////////////////////////////////////////////////////////////////////////
static std::string GetEndpointFromUrl (std::string const& url) {
char const* p = url.c_str();
char const* e = p + url.size();
size_t slashes = 0;
while (p < e) {
if (*p == '/') {
if (++slashes == 3) {
return url.substr(0, p - url.c_str());
}
}
++p;
}
return url;
}
////////////////////////////////////////////////////////////////////////////////
/// @brief downloads data from a URL
///
/// @FUN{internal.download(@FA{url}, @FA{body}, @FA{options}, @FA{outfile})}
///
/// Downloads the data from the URL specified by @FA{url} and saves the
/// response body to @FA{outfile}. The following @FA{options} are supported:
///
/// - @LIT{method}: the HTTP method to be used. The supported HTTP methods are
/// @LIT{DELETE}, @LIT{GET}, @LIT{HEAD}, @LIT{POST}, @LIT{PUT}, @LIT{PATCH}
///
/// - @LIT{timeout}: a timeout value for the connection
///
/// - @LIT{followRedirects}: whether or not to follow redirects
///
/// - @LIT{maxRedirects}: maximum number of redirects to follow, only useful
/// if @LIT{followRedirects} is *true*.
///
/// - @LIT{returnBodyOnError}: whether or not to return / save body on HTTP
/// error
///
/// - @LIT{returnBodyAsBuffer}: whether or not to return the result body in
/// a Buffer object (default is false, body will be returned in a String)
///
/// - @LIT{headers}: an optional array of headers to be sent for the first
/// (non-redirect) request.
///
/// Up to 5 redirects will be followed. Any user-defined headers will only be
/// sent for the first request. If no timeout is given, a default timeout will
/// be used.
///
/// If @FA{outfile} is specified, the result body will be saved in a file
/// specified by @FA{outfile}. If @FA{outfile} already exists, an error will
/// be thrown.
///
/// If @FA{outfile} is not specified, the result body will be returned in the
/// @LIT{body} attribute of the result object.
////////////////////////////////////////////////////////////////////////////////
static void JS_Download (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
std::string const signature = "download(<url>, <body>, <options>, <outfile>)";
if (args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE(signature);
}
std::string url = TRI_ObjectToString(args[0]);
if (! url.empty() && url[0] == '/') {
// a relative url. now make this an absolute URL if possible
auto json = triagens::basics::ProgramOptions::getJson();
if (json != nullptr) {
// check if there are endpoints defined in the server options
auto eps = TRI_LookupObjectJson(json, "server.endpoint");
// endpoints should be an array
if (TRI_IsArrayJson(eps)) {
// it is. now iterate over the list and pick the first one
for (size_t i = 0; i < TRI_LengthArrayJson(eps); ++i) {
auto ep = static_cast<TRI_json_t const*>(TRI_AtVector(&eps->_value._objects, i));
if (TRI_IsStringJson(ep)) {
// prepend host and port to relative URL
url = std::string(ep->_value._string.data, ep->_value._string.length - 1) + url;
// ipv4: replace 0.0.0.0 with 127.0.0.1
auto pos = url.find("0.0.0.0");
if (pos != std::string::npos) {
url.replace(pos, strlen("0.0.0.0"), "127.0.0.1");
}
// ipv6: replace [::] with [::1]
pos = url.find("[::]");
if (pos != std::string::npos) {
url.replace(pos, strlen("[::]"), "[::1]");
}
if (url.substr(0, 4) == "tcp:") {
url = "http:" + url.substr(4);
}
else if (url.substr(0, 4) == "ssl:") {
url = "https:" + url.substr(4);
}
// note: there can be endpoints not starting with tcp:// or ssl://, e.g. unix://...
// for these endpoints, the generated URL will be invalid, and this will trigger an
// "unsupport URL error" below
break;
}
}
}
}
}
std::string lastEndpoint = GetEndpointFromUrl(url);
std::string body;
if (args.Length() > 1) {
if (args[1]->IsString() || args[1]->IsStringObject()) {
// supplied body is a string
body = TRI_ObjectToString(args[1]);
}
else if (args[1]->IsObject() && V8Buffer::hasInstance(isolate, args[1])) {
// supplied body is a Buffer object
char const* data = V8Buffer::data(args[1].As<v8::Object>());
size_t size = V8Buffer::length(args[1].As<v8::Object>());
if (data == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid <body> buffer value");
}
body.assign(data, size);
}
}
// options
// ------------------------------------------------------------------------
std::map<std::string, std::string> headerFields;
double timeout = 10.0;
bool returnBodyAsBuffer = false;
bool followRedirects = true;
HttpRequest::HttpRequestType method = HttpRequest::HTTP_REQUEST_GET;
bool returnBodyOnError = false;
int maxRedirects = 5;
if (args.Length() > 2) {
if (! args[2]->IsObject()) {
TRI_V8_THROW_EXCEPTION_USAGE(signature);
}
v8::Handle<v8::Array> options = v8::Handle<v8::Array>::Cast(args[2]);
if (options.IsEmpty()) {
TRI_V8_THROW_EXCEPTION_USAGE(signature);
}
// method
if (options->Has(TRI_V8_ASCII_STRING("method"))) {
string methodString = TRI_ObjectToString(options->Get(TRI_V8_ASCII_STRING("method")));
method = HttpRequest::translateMethod(methodString);
}
// headers
if (options->Has(TRI_V8_ASCII_STRING("headers"))) {
v8::Handle<v8::Object> v8Headers = options->Get(TRI_V8_ASCII_STRING("headers")).As<v8::Object> ();
if (v8Headers->IsObject()) {
v8::Handle<v8::Array> props = v8Headers->GetPropertyNames();
for (uint32_t i = 0; i < props->Length(); i++) {
v8::Handle<v8::Value> key = props->Get(i);
headerFields[TRI_ObjectToString(key)] = TRI_ObjectToString(v8Headers->Get(key));
}
}
}
// timeout
if (options->Has(TRI_V8_ASCII_STRING("timeout"))) {
if (! options->Get(TRI_V8_ASCII_STRING("timeout"))->IsNumber()) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid option value for timeout");
}
timeout = TRI_ObjectToDouble(options->Get(TRI_V8_ASCII_STRING("timeout")));
}
// return body as a buffer?
if (options->Has(TRI_V8_ASCII_STRING("returnBodyAsBuffer"))) {
returnBodyAsBuffer = TRI_ObjectToBoolean(options->Get(TRI_V8_ASCII_STRING("returnBodyAsBuffer")));
}
// follow redirects
if (options->Has(TRI_V8_ASCII_STRING("followRedirects"))) {
followRedirects = TRI_ObjectToBoolean(options->Get(TRI_V8_ASCII_STRING("followRedirects")));
}
// max redirects
if (options->Has(TRI_V8_ASCII_STRING("maxRedirects"))) {
if (! options->Get(TRI_V8_ASCII_STRING("maxRedirects"))->IsNumber()) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid option value for maxRedirects");
}
maxRedirects = (int) TRI_ObjectToInt64(options->Get(TRI_V8_ASCII_STRING("maxRedirects")));
}
if (body.size() > 0 &&
(method == HttpRequest::HTTP_REQUEST_GET ||
method == HttpRequest::HTTP_REQUEST_HEAD)) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "should not provide a body value for this request method");
}
if (options->Has(TRI_V8_ASCII_STRING("returnBodyOnError"))) {
returnBodyOnError = TRI_ObjectToBoolean(options->Get(TRI_V8_ASCII_STRING("returnBodyOnError")));
}
}
// outfile
string outfile;
if (args.Length() >= 4) {
if (args[3]->IsString() || args[3]->IsStringObject()) {
outfile = TRI_ObjectToString(args[3]);
}
if (outfile.empty()) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid value provided for outfile");
}
if (TRI_ExistsFile(outfile.c_str())) {
TRI_V8_THROW_EXCEPTION(TRI_ERROR_CANNOT_OVERWRITE_FILE);
}
}
int numRedirects = 0;
while (numRedirects < maxRedirects) {
std::string endpoint;
std::string relative;
if (url.substr(0, 7) == "http://") {
size_t found = url.find('/', 7);
relative = "/";
if (found != string::npos) {
relative.append(url.substr(found + 1));
endpoint = url.substr(7, found - 7);
}
else {
endpoint = url.substr(7);
}
found = endpoint.find(":");
if (found == string::npos) {
endpoint = endpoint + ":80";
}
endpoint = "tcp://" + endpoint;
}
else if (url.substr(0, 8) == "https://") {
size_t found = url.find('/', 8);
relative = "/";
if (found != string::npos) {
relative.append(url.substr(found + 1));
endpoint = url.substr(8, found - 8);
}
else {
endpoint = url.substr(8);
}
found = endpoint.find(":");
if (found == string::npos) {
endpoint = endpoint + ":443";
}
endpoint = "ssl://" + endpoint;
}
else if (! url.empty() && url[0] == '/') {
// relative URL. prefix it with last endpoint
relative = url;
url = lastEndpoint + url;
endpoint = lastEndpoint;
if (endpoint.substr(0, 5) == "http:") {
endpoint = "tcp:" + endpoint.substr(5);
}
else if (endpoint.substr(0, 6) == "https:") {
endpoint = "ssl:" + endpoint.substr(6);
}
}
else {
TRI_V8_THROW_SYNTAX_ERROR("unsupported URL specified");
}
LOG_TRACE("downloading file. endpoint: %s, relative URL: %s",
endpoint.c_str(),
url.c_str());
Endpoint* ep = Endpoint::clientFactory(endpoint);
if (ep == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid URL");
}
GeneralClientConnection* connection = GeneralClientConnection::factory(ep, timeout, timeout, 3, 0);
if (connection == nullptr) {
delete ep;
TRI_V8_THROW_EXCEPTION_MEMORY();
}
SimpleHttpClient* client = new SimpleHttpClient(connection, timeout, false);
v8::Handle<v8::Object> result = v8::Object::New(isolate);
if (numRedirects > 0) {
// do not send extra headers now
headerFields.clear();
}
// send the actual request
SimpleHttpResult* response = client->request(method,
relative,
(body.size() > 0 ? body.c_str() : nullptr),
body.size(),
headerFields);
int returnCode = 500; // set a default
string returnMessage;
if (response == nullptr || ! response->isComplete()) {
// save error message
returnMessage = client->getErrorMessage();
returnCode = 500;
delete client;
if (response != nullptr && response->getHttpReturnCode() > 0) {
returnCode = response->getHttpReturnCode();
}
}
else {
delete client;
returnMessage = response->getHttpReturnMessage();
returnCode = response->getHttpReturnCode();
// follow redirects?
if (followRedirects &&
(returnCode == 301 || returnCode == 302 || returnCode == 307)) {
bool found;
url = response->getHeaderField(string("location"), found);
delete response;
delete connection;
connection = nullptr;
delete ep;
if (! found) {
TRI_V8_THROW_EXCEPTION_INTERNAL("caught invalid redirect URL");
}
numRedirects++;
if (url.substr(0, 5) == "http:" || url.substr(0, 6) == "https:") {
lastEndpoint = GetEndpointFromUrl(url);
}
continue;
}
result->Set(TRI_V8_ASCII_STRING("code"), v8::Number::New(isolate, returnCode));
result->Set(TRI_V8_ASCII_STRING("message"), TRI_V8_STD_STRING(returnMessage));
// process response headers
auto const& responseHeaders = response->getHeaderFields();
v8::Handle<v8::Object> headers = v8::Object::New(isolate);
for (auto const& it : responseHeaders) {
headers->ForceSet(TRI_V8_STD_STRING(it.first), TRI_V8_STD_STRING(it.second));
}
result->ForceSet(TRI_V8_ASCII_STRING("headers"), headers);
if (returnBodyOnError || (returnCode >= 200 && returnCode <= 299)) {
try {
if (outfile.size() > 0) {
// save outfile
FileUtils::spit(outfile, response->getBody());
}
else {
// set "body" attribute in result
const StringBuffer& sb = response->getBody();
if (returnBodyAsBuffer) {
V8Buffer* buffer = V8Buffer::New(isolate, sb.c_str(), sb.length());
v8::Local<v8::Object> bufferObject = v8::Local<v8::Object>::New(isolate, buffer->_handle);
result->Set(TRI_V8_ASCII_STRING("body"),
bufferObject);
}
else {
result->Set(TRI_V8_ASCII_STRING("body"),
TRI_V8_STD_STRING(sb));
}
}
}
catch (...) {
}
}
}
result->Set(TRI_V8_ASCII_STRING("code"), v8::Number::New(isolate, returnCode));
result->Set(TRI_V8_ASCII_STRING("message"), TRI_V8_STD_STRING(returnMessage));
if (response) {
delete response;
}
if (connection) {
delete connection;
}
delete ep;
TRI_V8_RETURN(result);
}
TRI_V8_THROW_EXCEPTION_INTERNAL("too many redirects");
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes a script
///
/// @FUN{internal.execute(@FA{script}, @FA{sandbox}, *filename*)}
///
/// Executes the @FA{script} with the @FA{sandbox} as context. Global variables
/// assigned inside the @FA{script}, will be visible in the @FA{sandbox} object
/// after execution. The *filename* is used for displaying error
/// messages.
///
/// If @FA{sandbox} is undefined, then @FN{execute} uses the current context.
////////////////////////////////////////////////////////////////////////////////
static void JS_Execute (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 3) {
TRI_V8_THROW_EXCEPTION_USAGE("execute(<script>, <sandbox>, <filename>)");
}
v8::Handle<v8::Value> source = args[0];
v8::Handle<v8::Value> sandboxValue = args[1];
v8::Handle<v8::Value> filename = args[2];
if (! source->IsString()) {
TRI_V8_THROW_TYPE_ERROR("<script> must be a string");
}
bool useSandbox = sandboxValue->IsObject();
v8::Handle<v8::Object> sandbox;
v8::Handle<v8::Context> context;
if (useSandbox) {
sandbox = sandboxValue->ToObject();
// create new context
context = v8::Context::New(isolate);
context->Enter();
// copy sandbox into context
v8::Handle<v8::Array> keys = sandbox->GetPropertyNames();
for (uint32_t i = 0; i < keys->Length(); i++) {
v8::Handle<v8::String> key = keys->Get(v8::Integer::New(isolate, i))->ToString();
v8::Handle<v8::Value> value = sandbox->Get(key);
if (TRI_IsTraceLogging(__FILE__)) {
TRI_Utf8ValueNFC keyName(TRI_UNKNOWN_MEM_ZONE, key);
if (*keyName != 0) {
LOG_TRACE("copying key '%s' from sandbox to context", *keyName);
}
}
if (value == sandbox) {
value = context->Global();
}
context->Global()->Set(key, value);
}
}
// execute script inside the context
v8::Handle<v8::Script> script;
v8::Handle<v8::Value> result;
{
v8::TryCatch tryCatch;
script = v8::Script::Compile(source->ToString(), filename->ToString());
// compilation failed, print errors that happened during compilation
if (script.IsEmpty()) {
if (useSandbox) {
context->DetachGlobal();
context->Exit();
}
if (tryCatch.CanContinue()) {
TRI_V8_LOG_THROW_EXCEPTION(tryCatch);
}
else {
tryCatch.ReThrow();
TRI_GET_GLOBALS();
v8g->_canceled = true;
TRI_V8_RETURN_UNDEFINED();
}
}
// compilation succeeded, run the script
result = script->Run();
if (result.IsEmpty()) {
if (useSandbox) {
context->DetachGlobal();
context->Exit();
}
if (tryCatch.CanContinue()) {
TRI_V8_LOG_THROW_EXCEPTION(tryCatch);
}
else {
tryCatch.ReThrow();
TRI_GET_GLOBALS();
v8g->_canceled = true;
TRI_V8_RETURN_UNDEFINED();
}
}
}
// copy result back into the sandbox
if (useSandbox) {
v8::Handle<v8::Array> keys = context->Global()->GetPropertyNames();
for (uint32_t i = 0; i < keys->Length(); i++) {
v8::Handle<v8::String> key = keys->Get(v8::Integer::New(isolate, i))->ToString();
v8::Handle<v8::Value> value = context->Global()->Get(key);
if (TRI_IsTraceLogging(__FILE__)) {
TRI_Utf8ValueNFC keyName(TRI_UNKNOWN_MEM_ZONE, key);
if (*keyName != nullptr) {
LOG_TRACE("copying key '%s' from context to sandbox", *keyName);
}
}
if (value == context->Global()) {
value = sandbox;
}
sandbox->Set(key, value);
}
context->DetachGlobal();
context->Exit();
}
if (useSandbox) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN(result);
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief registers the executes file function
////////////////////////////////////////////////////////////////////////////////
static void JS_RegisterExecuteFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
TRI_GET_GLOBALS();
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("registerExecuteCallback(<func>)");
}
auto func = v8::Handle<v8::Function>::Cast(args[0]);
v8g->ExecuteFileCallback.Reset(isolate, func);
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief checks if a file of any type or directory exists
/// @startDocuBlock JS_Exists
/// `fs.exists(path)`
///
/// Returns true if a file (of any type) or a directory exists at a given
/// path. If the file is a broken symbolic link, returns false.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_Exists (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("exists(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
if (TRI_ExistsFile(*name)) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief checks if a file of any type or directory exists
/// @startDocuBlock JS_Exists
/// `fs.exists(path)`
///
/// Returns true if a file (of any type) or a directory exists at a given
/// path. If the file is a broken symbolic link, returns false.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_ChMod (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("chmod(<path><mode>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
string const modeStr = TRI_ObjectToString(args[1]);
if ((modeStr.length() > 5) || (modeStr.length() == 0)) {
TRI_V8_THROW_TYPE_ERROR("<mode> must be a string with up to 4 octal digits in it plus a leading zero.");
}
long mode = 0;
for (uint32_t i = 0; i < modeStr.length(); i++) {
if (! isdigit(modeStr[i])) {
TRI_V8_THROW_TYPE_ERROR("<mode> must be a string with up to 4 octal digits in it plus a leading zero.");
}
char buf[2];
buf[0] = modeStr[i];
buf[1] = '\0';
uint8_t digit = (uint8_t) atoi(buf);
if (digit >= 8) {
TRI_V8_THROW_TYPE_ERROR("<mode> must be a string with up to 4 octal digits in it plus a leading zero.");
}
mode = mode | digit << ((modeStr.length() - i - 1) * 3);
}
string err;
int rc = TRI_ChMod(*name, mode, err);
if (rc != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(rc, err);
}
TRI_V8_RETURN_TRUE();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief gets the size of a file
/// @startDocuBlock JS_Size
/// `fs.size(path)`
///
/// Returns the size of the file specified by *path*.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_SizeFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("size(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
if (! TRI_ExistsFile(*name) || TRI_IsDirectory(*name)) {
TRI_V8_THROW_EXCEPTION(TRI_ERROR_FILE_NOT_FOUND);
}
int64_t size = TRI_SizeFile(*name);
if (size < 0) {
TRI_V8_THROW_EXCEPTION(TRI_ERROR_FILE_NOT_FOUND);
}
TRI_V8_RETURN(v8::Number::New(isolate, (double) size));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads in a line from stdin
////////////////////////////////////////////////////////////////////////////////
static void JS_Getline (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
string line;
getline(cin, line);
TRI_V8_RETURN_STD_STRING(line);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the temporary directory
/// @startDocuBlock JS_GetTempPath
/// `fs.getTempPath()`
///
/// Returns the absolute path of the temporary directory
///
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_GetTempPath (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("getTempPath()");
}
char* path = TRI_GetUserTempPath();
if (path == nullptr) {
TRI_V8_THROW_EXCEPTION_MEMORY();
}
v8::Handle<v8::Value> result = TRI_V8_STRING(path);
TRI_Free(TRI_CORE_MEM_ZONE, path);
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the name for a (new) temporary file
/// @startDocuBlock JS_GetTempFile
/// `fs.getTempFile(directory, createFile)`
///
/// Returns the name for a new temporary file in directory *directory*.
/// If *createFile* is *true*, an empty file will be created so no other
/// process can create a file of the same name.
///
/// **Note**: The directory *directory* must exist.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_GetTempFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() > 2) {
TRI_V8_THROW_EXCEPTION_USAGE("getTempFile(<directory>, <createFile>)");
}
const char* p = NULL;
string path;
if (args.Length() > 0) {
path = TRI_ObjectToString(args[0]);
p = path.c_str();
}
bool create = false;
if (args.Length() > 1) {
create = TRI_ObjectToBoolean(args[1]);
}
char* result = 0;
long systemError;
std::string errorMessage;
if (TRI_GetTempName(p, &result, create, systemError, errorMessage) != TRI_ERROR_NO_ERROR) {
errorMessage = std::string("could not create temp file: ") + errorMessage;
TRI_V8_THROW_EXCEPTION_INTERNAL(errorMessage);
}
const string tempfile(result);
TRI_Free(TRI_CORE_MEM_ZONE, result);
// return result
TRI_V8_RETURN_STD_STRING(tempfile);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief tests if path is a directory
/// @startDocuBlock JS_IsDirectory
/// `fs.isDirectory(path)`
///
/// Returns true if the *path* points to a directory.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_IsDirectory (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("isDirectory(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
// return result
if (TRI_IsDirectory(*name)) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief tests if path is a file
/// @startDocuBlock JS_IsFile
/// `fs.isFile(path)`
///
/// Returns true if the *path* points to a file.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_IsFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("isFile(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
// return result
if (TRI_ExistsFile(*name) && ! TRI_IsDirectory(*name)) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief makes a given path absolute
/// @startDocuBlock JS_MakeAbsolute
/// `fs.makeAbsolute(path)`
///
/// Returns the given string if it is an absolute path, otherwise an
/// absolute path to the same location is returned.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_MakeAbsolute(const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("makeAbsolute(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
int err = 0;
string cwd = triagens::basics::FileUtils::currentDirectory(&err);
if (0 != err) {
TRI_V8_THROW_EXCEPTION_MESSAGE(err,"cannot get current working directory");
}
char *abs = TRI_GetAbsolutePath (*name, cwd.c_str());
v8::Handle<v8::String> res;
if (0 != abs) {
res = TRI_V8_STRING(abs);
TRI_Free(TRI_UNKNOWN_MEM_ZONE, abs);
}
else {
res = TRI_V8_STD_STRING(cwd);
}
// return result
TRI_V8_RETURN(res);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the directory listing
/// @startDocuBlock JS_List
/// `fs.list(path)`
///
/// The functions returns the names of all the files in a directory, in
/// lexically sorted order. Throws an exception if the directory cannot be
/// traversed (or path is not a directory).
///
/// **Note**: this means that list("x") of a directory containing "a" and "b" would
/// return ["a", "b"], not ["x/a", "x/b"].
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_List (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("listTree(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
// constructed listing
v8::Handle<v8::Array> result = v8::Array::New(isolate);
TRI_vector_string_t list = TRI_FilesDirectory(*name);
uint32_t j = 0;
for (size_t i = 0; i < list._length; ++i) {
const char* f = list._buffer[i];
result->Set(j++, TRI_V8_STRING(f));
}
TRI_DestroyVectorString(&list);
// return result
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the directory tree
/// @startDocuBlock JS_ListTree
/// `fs.listTree(path)`
///
/// The function returns an array that starts with the given path, and all of
/// the paths relative to the given path, discovered by a depth first traversal
/// of every directory in any visited directory, reporting but not traversing
/// symbolic links to directories. The first path is always *""*, the path
/// relative to itself.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_ListTree (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("listTree(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
// constructed listing
v8::Handle<v8::Array> result = v8::Array::New(isolate);
TRI_vector_string_t list = TRI_FullTreeDirectory(*name);
uint32_t j = 0;
for (size_t i = 0; i < list._length; ++i) {
const char* f = list._buffer[i];
result->Set(j++, TRI_V8_STRING(f));
}
TRI_DestroyVectorString(&list);
// return result
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates a directory
/// @startDocuBlock JS_MakeDirectory
/// `fs.makeDirectory(path)`
///
/// Creates the directory specified by *path*.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_MakeDirectory (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// 2nd argument (permissions) are ignored for now
// extract arguments
if (args.Length() != 1 && args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("makeDirectory(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
long systemError = 0;
std::string systemErrorStr;
int res = TRI_CreateDirectory(*name, systemError, systemErrorStr);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(res, systemErrorStr);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates a directory
/// @startDocuBlock JS_MakeDirectoryRecursive
/// `fs.makeDirectoryRecursive(path)`
///
/// Creates the directory hierarchy specified by *path*.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_MakeDirectoryRecursive (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// 2nd argument (permissions) are ignored for now
// extract arguments
if (args.Length() != 1 && args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("makeDirectoryRecursive(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
long systemError = 0;
std::string systemErrorStr;
int res = TRI_CreateRecursiveDirectory(*name, systemError, systemErrorStr);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(res, systemErrorStr);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief unzips a file
/// @startDocuBlock JS_Unzip
/// `fs.unzipFile(filename, outpath, skipPaths, overwrite, password)`
///
/// Unzips the zip file specified by *filename* into the path specified by
/// *outpath*. Overwrites any existing target files if *overwrite* is set
/// to *true*.
///
/// Returns *true* if the file was unzipped successfully.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_UnzipFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() < 2) {
TRI_V8_THROW_EXCEPTION_USAGE("unzipFile(<filename>, <outPath>, <skipPaths>, <overwrite>, <password>)");
}
const string filename = TRI_ObjectToString(args[0]);
const string outPath = TRI_ObjectToString(args[1]);
bool skipPaths = false;
if (args.Length() > 2) {
skipPaths = TRI_ObjectToBoolean(args[2]);
}
bool overwrite = false;
if (args.Length() > 3) {
overwrite = TRI_ObjectToBoolean(args[3]);
}
const char* p = nullptr;
string password;
if (args.Length() > 4) {
password = TRI_ObjectToString(args[4]);
p = password.c_str();
}
std::string errMsg;
int res = TRI_UnzipFile(filename.c_str(), outPath.c_str(), skipPaths, overwrite, p, errMsg);
if (res == TRI_ERROR_NO_ERROR) {
TRI_V8_RETURN_TRUE();
}
TRI_V8_THROW_EXCEPTION_MESSAGE(res, errMsg);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief zips a file
/// @startDocuBlock JS_Zip
/// `fs.zipFile(filename, chdir, files, password)`
///
/// Stores the files specified by *files* in the zip file *filename*. If
/// the file *filename* already exists, an error is thrown. The list of input
/// files *files* must be given as a list of absolute filenames. If *chdir* is
/// not empty, the *chdir* prefix will be stripped from the filename in the
/// zip file, so when it is unzipped filenames will be relative.
/// Specifying a password is optional.
///
/// Returns *true* if the file was zipped successfully.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_ZipFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() < 3 || args.Length() > 4) {
TRI_V8_THROW_EXCEPTION_USAGE("zipFile(<filename>, <chdir>, <files>, <password>)");
}
const string filename = TRI_ObjectToString(args[0]);
const string dir = TRI_ObjectToString(args[1]);
if (! args[2]->IsArray()) {
TRI_V8_THROW_EXCEPTION_USAGE("<files> must be a list");
}
v8::Handle<v8::Array> files = v8::Handle<v8::Array>::Cast(args[2]);
int res = TRI_ERROR_NO_ERROR;
TRI_vector_string_t filenames;
TRI_InitVectorString(&filenames, TRI_UNKNOWN_MEM_ZONE);
for (uint32_t i = 0 ; i < files->Length(); ++i) {
v8::Handle<v8::Value> file = files->Get(i);
if (file->IsString()) {
string fname = TRI_ObjectToString(file);
TRI_PushBackVectorString(&filenames, TRI_DuplicateStringZ(TRI_UNKNOWN_MEM_ZONE, fname.c_str()));
}
else {
res = TRI_ERROR_BAD_PARAMETER;
break;
}
}
if (res != TRI_ERROR_NO_ERROR) {
TRI_DestroyVectorString(&filenames);
TRI_V8_THROW_EXCEPTION_USAGE("zipFile(<filename>, <chdir>, <files>, <password>)");
}
const char* p = nullptr;
string password;
if (args.Length() == 4) {
password = TRI_ObjectToString(args[3]);
p = password.c_str();
}
res = TRI_ZipFile(filename.c_str(), dir.c_str(), &filenames, p);
TRI_DestroyVectorString(&filenames);
if (res == TRI_ERROR_NO_ERROR) {
TRI_V8_RETURN_TRUE();
}
TRI_V8_THROW_EXCEPTION(res);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads a file and executes it
///
/// @FUN{internal.load(*filename*)}
///
/// Reads in a files and executes the contents in the current context.
////////////////////////////////////////////////////////////////////////////////
static void JS_Load (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("load(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a UTF-8 string");
}
size_t length;
char* content = TRI_SlurpFile(TRI_UNKNOWN_MEM_ZONE, *name, &length);
if (content == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), "cannot read file");
}
v8::Handle<v8::Value> filename = args[0];
// save state of __dirname and __filename
v8::Handle<v8::Object> current = isolate->GetCurrentContext()->Global();
auto oldFilename = current->Get(TRI_V8_ASCII_STRING("__filename"));
current->ForceSet(TRI_V8_ASCII_STRING("__filename"), filename);
auto oldDirname = current->Get(TRI_V8_ASCII_STRING("__dirname"));
auto dirname = TRI_Dirname(TRI_ObjectToString(filename).c_str());
current->ForceSet(TRI_V8_ASCII_STRING("__dirname"), TRI_V8_STRING(dirname));
TRI_FreeString(TRI_CORE_MEM_ZONE, dirname);
v8::Handle<v8::Value> result =
TRI_ExecuteJavaScriptString(isolate,
isolate->GetCurrentContext(),
TRI_V8_PAIR_STRING(content, length),
filename->ToString(),
false);
// restore old values for __dirname and __filename
if (oldFilename.IsEmpty() || oldFilename->IsUndefined()) {
current->ForceDelete(TRI_V8_ASCII_STRING("__filename"));
}
else {
current->ForceSet(TRI_V8_ASCII_STRING("__filename"), oldFilename);
}
if (oldDirname.IsEmpty() || oldDirname->IsUndefined()) {
current->ForceDelete(TRI_V8_ASCII_STRING("__dirname"));
}
else {
current->ForceSet(TRI_V8_ASCII_STRING("__dirname"), oldDirname);
}
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief logs a message
///
/// @FUN{internal.log(@FA{level}, @FA{message})}
///
/// Logs the @FA{message} at the given log @FA{level}.
///
/// Valid log-level are:
///
/// - fatal
/// - error
/// - warning
/// - info
/// - debug
/// - trace
////////////////////////////////////////////////////////////////////////////////
static void JS_Log (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("log(<level>, <message>)");
}
TRI_Utf8ValueNFC level(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*level == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<level> must be a string");
}
TRI_Utf8ValueNFC message(TRI_UNKNOWN_MEM_ZONE, args[1]);
if (*message == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<message> must be a string");
}
if (TRI_CaseEqualString(*level, "fatal")) {
LOG_ERROR("(FATAL) %s", *message);
}
else if (TRI_CaseEqualString(*level, "error")) {
LOG_ERROR("%s", *message);
}
else if (TRI_CaseEqualString(*level, "warning")) {
LOG_WARNING("%s", *message);
}
else if (TRI_CaseEqualString(*level, "info")) {
LOG_INFO("%s", *message);
}
else if (TRI_CaseEqualString(*level, "debug")) {
LOG_DEBUG("%s", *message);
}
else if (TRI_CaseEqualString(*level, "trace")) {
LOG_TRACE("%s", *message);
}
else {
LOG_ERROR("(unknown log level '%s') %s", *level, *message);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief gets or sets the log-level
///
/// @FUN{internal.logLevel()}
///
/// Returns the current log-level as string.
///
/// @verbinclude fluent37
///
/// @FUN{internal.logLevel(@FA{level})}
///
/// Changes the current log-level. Valid log-level are:
///
/// - fatal
/// - error
/// - warning
/// - info
/// - debug
/// - trace
///
/// @verbinclude fluent38
////////////////////////////////////////////////////////////////////////////////
static void JS_LogLevel (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (1 <= args.Length()) {
TRI_Utf8ValueNFC str(TRI_UNKNOWN_MEM_ZONE, args[0]);
TRI_SetLogLevelLogging(*str);
}
TRI_V8_RETURN_STRING(TRI_LogLevelLogging());
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the md5 sum of a text
///
/// @FUN{internal.md5(@FA{text})}
///
/// Computes an md5 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Md5 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("md5(<text>)");
}
v8::String::Utf8Value str(args[0]);
if (*str == nullptr) {
TRI_V8_RETURN_UNDEFINED();
}
// create md5
char hash[17];
char* p = &hash[0];
size_t length;
SslInterface::sslMD5(*str, str.length(), p, length);
// as hex
char hex[33];
p = &hex[0];
SslInterface::sslHEX(hash, 16, p, length);
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, 32);
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief generates random numbers
///
/// @FUN{internal.genRandomNumbers(@FA{length})}
///
/// Generates a string of a given @FA{length} containing numbers.
////////////////////////////////////////////////////////////////////////////////
static void JS_RandomNumbers (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1 || ! args[0]->IsNumber()) {
TRI_V8_THROW_EXCEPTION_USAGE("genRandomNumbers(<length>)");
}
int length = (int) TRI_ObjectToInt64(args[0]);
if (length <= 0 || length > 65536) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "<length> must be between 0 and 65536");
}
string&& str = JSNumGenerator.random(length);
TRI_V8_RETURN_STD_STRING(str);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief generates random alpha-numbers
///
/// @FUN{internal.genRandomAlphaNumbers(@FA{length})}
///
/// Generates a string of a given @FA{length} containing numbers and characters.
////////////////////////////////////////////////////////////////////////////////
static void JS_RandomAlphaNum (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1 || ! args[0]->IsNumber()) {
TRI_V8_THROW_EXCEPTION_USAGE("genRandomAlphaNumbers(<length>)");
}
int length = (int) TRI_ObjectToInt64(args[0]);
if (length <= 0 || length > 65536) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "<length> must be between 0 and 65536");
}
string&& str = JSAlphaNumGenerator.random(length);
TRI_V8_RETURN_STD_STRING(str);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief generates a salt
///
/// @FUN{internal.genRandomSalt()}
///
/// Generates a string containing numbers and characters (length 8).
////////////////////////////////////////////////////////////////////////////////
static void JS_RandomSalt (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("genRandomSalt()");
}
string str = JSSaltGenerator.random(8);
TRI_V8_RETURN_STD_STRING(str);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief generates a nonce
///
/// @FUN{internal.createNonce()}
///
/// Generates a base64 encoded nonce string. (length of the string is 16)
////////////////////////////////////////////////////////////////////////////////
static void JS_CreateNonce (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("createNonce()");
}
string str = Nonce::createNonce();
TRI_V8_RETURN_STD_STRING(str);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief checks a base64 encoded nonce
///
/// @FUN{internal.checkAndMarkNonce(@FA{nonce})}
///
/// Checks and marks a @FA{nonce}
////////////////////////////////////////////////////////////////////////////////
static void JS_MarkNonce (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("checkAndMarkNonce(<nonce>)");
}
TRI_Utf8ValueNFC base64u(TRI_CORE_MEM_ZONE, args[0]);
if (base64u.length() != 16) {
TRI_V8_THROW_TYPE_ERROR("expecting 16-Byte base64url-encoded nonce");
}
string raw = StringUtils::decodeBase64U(*base64u);
if (raw.size() != 12) {
TRI_V8_THROW_TYPE_ERROR("expecting 12-Byte nonce");
}
if (Nonce::checkAndMark(raw)) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief gets the last modification time of a file
/// @startDocuBlock JS_MTime
/// `fs.mtime(filename)`
///
/// Returns the last modification date of the specified file. The date is
/// returned as a Unix timestamp (number of seconds elapsed since January 1 1970).
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_MTime (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract two arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("mtime(<filename>)");
}
string filename = TRI_ObjectToString(args[0]);
int64_t mtime;
int res = TRI_MTimeFile(filename.c_str(), &mtime);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION(res);
}
TRI_V8_RETURN(v8::Number::New(isolate, static_cast<double>(mtime)));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief renames a file
/// @startDocuBlock JS_MoveFile
/// `fs.move(source, destination)`
///
/// Moves *source* to destination. Failure to move the file, or
/// specifying a directory for destination when source is a file will throw an
/// exception. Likewise, specifying a directory as source and destination will
/// fail.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_MoveFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract two arguments
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("move(<source>, <destination>)");
}
string source = TRI_ObjectToString(args[0]);
string destination = TRI_ObjectToString(args[1]);
bool const sourceIsDirectory = TRI_IsDirectory(source.c_str());
bool const destinationIsDirectory = TRI_IsDirectory(destination.c_str());
if (sourceIsDirectory && destinationIsDirectory) {
// source is a directory, destination is a directory. this is unsupported
TRI_V8_THROW_EXCEPTION_PARAMETER("cannot move source directory into destination directory");
}
if (TRI_IsRegularFile(source.c_str()) &&
destinationIsDirectory) {
// source is a file, destination is a directory. this is unsupported
TRI_V8_THROW_EXCEPTION_PARAMETER("cannot move source file into destination directory");
}
std::string systemErrorStr;
long errorNo;
int res = TRI_RenameFile(source.c_str(), destination.c_str(), &errorNo, &systemErrorStr);
if (res != TRI_ERROR_NO_ERROR) {
std::string errMsg = "cannot move file [" +
source +
"] to [" +
destination +
" ] : " +
std::to_string(errorNo) +
": " +
systemErrorStr;
TRI_V8_THROW_EXCEPTION_MESSAGE(res, errMsg);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief copies a directory structure
/// @startDocuBlock JS_CopyDirectoryRecursive
/// `fs.copyRecursive(source, destination)`
///
/// Copies *source* to destination. Failure to copy the file, or
/// specifying a directory for destination when source is a file will throw an
/// exception. Likewise, specifying a directory as source and destination will
/// fail.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_CopyRecursive (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract two arguments
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("copyRecursive(<source>, <destination>)");
}
string source = TRI_ObjectToString(args[0]);
string destination = TRI_ObjectToString(args[1]);
bool const sourceIsDirectory = TRI_IsDirectory(source.c_str());
bool const destinationIsDirectory = TRI_IsDirectory(destination.c_str());
if (sourceIsDirectory && destinationIsDirectory) {
// source is a directory, destination is a directory. this is unsupported
TRI_V8_THROW_EXCEPTION_PARAMETER("cannot copy source directory into destination directory");
}
if (TRI_IsRegularFile(source.c_str()) &&
destinationIsDirectory) {
// source is a file, destination is a directory. this is unsupported
TRI_V8_THROW_EXCEPTION_PARAMETER("cannot copy source file into destination directory");
}
std::string systemErrorStr;
long errorNo;
int res = TRI_CreateRecursiveDirectory(destination.c_str(), errorNo, systemErrorStr);
if (res != TRI_ERROR_NO_ERROR) {
std::string errMsg = "cannot copy file [" +
source +
"] to [" +
destination +
" ] : " +
std::to_string(errorNo) +
" - Unable to create target directory: " +
systemErrorStr;
TRI_V8_THROW_EXCEPTION_MESSAGE(res, errMsg);
}
if (!FileUtils::copyRecursive(source, destination, systemErrorStr)) {
std::string errMsg = "cannot copy directory [" +
source +
"] to [" +
destination +
" ] : " +
std::to_string(errorNo) +
": " +
systemErrorStr;
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, errMsg);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief copies a file into a target file
/// @startDocuBlock JS_CopyFile
/// `fs.copyRecursive(source, destination)`
///
/// Copies *source* to destination. If Destination is a directory, a file
/// of the same name will be created, else it will be the name of the new file.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_CopyFile (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract two arguments
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("copyFile(<source>, <destination>)");
}
string source = TRI_ObjectToString(args[0]);
string destination = TRI_ObjectToString(args[1]);
bool const destinationIsDirectory = TRI_IsDirectory(destination.c_str());
if (! TRI_IsRegularFile(source.c_str())) {
TRI_V8_THROW_EXCEPTION_PARAMETER("can only copy regular files.");
}
std::string systemErrorStr;
if (destinationIsDirectory) {
const char* file = strrchr(source.c_str(), TRI_DIR_SEPARATOR_CHAR);
if (file == nullptr) {
if (destination[destination.length()] == TRI_DIR_SEPARATOR_CHAR) {
destination += TRI_DIR_SEPARATOR_CHAR;
}
destination += source;
}
else {
destination += file;
}
}
if (!TRI_CopyFile(source, destination, systemErrorStr)) {
std::string errMsg = "cannot copy file [" +
source +
"] to [" +
destination +
" ] : " +
systemErrorStr;
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, errMsg);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief outputs the arguments
///
/// @FUN{internal.output(@FA{string1}, @FA{string2}, @FA{string3}, ...)}
///
/// Outputs the arguments to standard output.
///
/// @verbinclude fluent39
////////////////////////////////////////////////////////////////////////////////
static void JS_Output (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
for (int i = 0; i < args.Length(); i++) {
// extract the next argument
v8::Handle<v8::Value> val = args[i];
// convert it into a string
v8::String::Utf8Value utf8(val);
// TRI_Utf8ValueNFC utf8(TRI_UNKNOWN_MEM_ZONE, val);
if (*utf8 == nullptr) {
continue;
}
// print the argument
char const* ptr = *utf8;
size_t len = utf8.length();
while (0 < len) {
ssize_t n = TRI_WRITE(1, ptr, (TRI_write_t) len);
if (n < 0) {
break;
}
len -= n;
ptr += n;
}
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the current process information
/// `internal.processStatistics()`
///
/// Returns information about the current process:
///
/// - minorPageFaults: The number of minor faults the process has made
/// which have not required loading a memory page from disk.
///
/// - majorPageFaults: The number of major faults the process has made
/// which have required loading a memory page from disk.
///
/// - userTime: Amount of time that this process has been scheduled in
/// user mode, measured in clock ticks.
///
/// - systemTime: Amount of time that this process has been scheduled
/// in kernel mode, measured in clock ticks.
///
/// - numberOfThreads: Number of threads in this process.
///
/// - residentSize: Resident Set Size: total size of the number of pages
/// the process has in real memory. This is just the pages which count
/// toward text, data, or stack space. This does not include pages which
/// have not been demand-loaded in, or which are swapped out.
///
/// The resident set size is reported in bytes.
///
/// - residentSizePercent: resident size as percent of the total physical
/// memory size.
///
/// - virtualSize: Virtual memory size in bytes.
///
/// @EXAMPLE_ARANGOSH_OUTPUT{internalStatistics}
/// require("internal").processStat();
/// @END_EXAMPLE_ARANGOSH_OUTPUT
////////////////////////////////////////////////////////////////////////////////
static void JS_ProcessStatistics (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::Handle<v8::Object> result = v8::Object::New(isolate);
TRI_process_info_t info = TRI_ProcessInfoSelf();
double rss = (double) info._residentSize;
double rssp = 0;
if (TRI_PhysicalMemory != 0) {
rssp = rss / TRI_PhysicalMemory;
}
result->Set(TRI_V8_ASCII_STRING("minorPageFaults"), v8::Number::New(isolate, (double) info._minorPageFaults));
result->Set(TRI_V8_ASCII_STRING("majorPageFaults"), v8::Number::New(isolate, (double) info._majorPageFaults));
result->Set(TRI_V8_ASCII_STRING("userTime"), v8::Number::New(isolate, (double) info._userTime / (double) info._scClkTck));
result->Set(TRI_V8_ASCII_STRING("systemTime"), v8::Number::New(isolate, (double) info._systemTime / (double) info._scClkTck));
result->Set(TRI_V8_ASCII_STRING("numberOfThreads"), v8::Number::New(isolate, (double) info._numberThreads));
result->Set(TRI_V8_ASCII_STRING("residentSize"), v8::Number::New(isolate, rss));
result->Set(TRI_V8_ASCII_STRING("residentSizePercent"), v8::Number::New(isolate, rssp));
result->Set(TRI_V8_ASCII_STRING("virtualSize"), v8::Number::New(isolate, (double) info._virtualSize));
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief generates a random number using OpenSSL
///
/// @FUN{internal.rand()}
///
/// Generates a random number
////////////////////////////////////////////////////////////////////////////////
static void JS_Rand (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// check arguments
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("rand()");
}
int iterations = 0;
while (iterations++ < 5) {
int32_t value;
int result = SslInterface::sslRand(&value);
if (result != 0) {
// error
break;
}
// no error, now check what random number was produced
if (value != 0) {
// a number != 0 was produced. that is sufficient
TRI_V8_RETURN(v8::Number::New(isolate, value));
}
// we don't want to return 0 as the result, so we try again
}
// we failed to produce a valid random number
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads in a file
/// @startDocuBlock JS_Read
/// `fs.read(filename)`
///
/// Reads in a file and returns the content as string. Please note that the
/// file content must be encoded in UTF-8.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_Read (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("read(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a UTF-8 string");
}
size_t length;
char* content = TRI_SlurpFile(TRI_UNKNOWN_MEM_ZONE, *name, &length);
if (content == nullptr) {
std::string msg = TRI_last_error();
msg += ": while reading ";
msg += *name;
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), msg);
}
auto result = TRI_V8_PAIR_STRING(content, length);
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads in a file
/// @startDocuBlock JS_ReadBuffer
/// `fs.readBuffer(filename)`
///
/// Reads in a file and returns its content in a Buffer object.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_ReadBuffer (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("readBuffer(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a UTF-8 string");
}
size_t length;
char* content = TRI_SlurpFile(TRI_UNKNOWN_MEM_ZONE, *name, &length);
if (content == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), TRI_last_error());
}
V8Buffer* buffer = V8Buffer::New(isolate, content, length);
TRI_FreeString(TRI_UNKNOWN_MEM_ZONE, content);
TRI_V8_RETURN(buffer->_handle);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads in a file as base64
/// @startDocuBlock JS_Read64
/// `fs.read64(filename)`
///
/// Reads in a file and returns the content as string. The file content is
/// Base64 encoded.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_Read64 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("read(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a UTF-8 string");
}
string base64;
try {
string&& content = FileUtils::slurp(*name);
base64 = StringUtils::encodeBase64(content);
}
catch (...) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_errno(), TRI_last_error());
}
TRI_V8_RETURN_STD_STRING(base64);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief writes to a file
///
/// @startDocuBlock JS_Save
/// `fs.write(filename, content)`
///
/// Writes the content into a file. Content can be a string or a Buffer object.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_Save (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 2) {
TRI_V8_THROW_EXCEPTION_USAGE("write(<filename>, <content>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a string");
}
if (args[1]->IsObject() && V8Buffer::hasInstance(isolate, args[1])) {
// content is a buffer
char const* data = V8Buffer::data(args[1].As<v8::Object>());
size_t size = V8Buffer::length(args[1].As<v8::Object>());
if (data == nullptr) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER, "invalid <content> buffer value");
}
ofstream file;
file.open(*name, ios::out | ios::binary);
if (file.is_open()) {
file.write(data, size);
file.close();
TRI_V8_RETURN_TRUE();
}
}
else {
TRI_Utf8ValueNFC content(TRI_UNKNOWN_MEM_ZONE, args[1]);
if (*content == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<content> must be a string");
}
ofstream file;
file.open(*name, ios::out | ios::binary);
if (file.is_open()) {
file << *content;
file.close();
TRI_V8_RETURN_TRUE();
}
}
TRI_V8_THROW_EXCEPTION_SYS("cannot write file");
}
////////////////////////////////////////////////////////////////////////////////
/// @brief removes a file
/// @startDocuBlock JS_Remove
/// `fs.remove(filename)`
///
/// Removes the file *filename* at the given path. Throws an exception if the
/// path corresponds to anything that is not a file or a symbolic link. If
/// "path" refers to a symbolic link, removes the symbolic link.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_Remove (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("remove(<filename>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
int res = TRI_UnlinkFile(*name);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(res, "cannot remove file");
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief removes an empty directory
/// @startDocuBlock JS_RemoveDirectory
/// `fs.removeDirectory(path)`
///
/// Removes a directory if it is empty. Throws an exception if the path is not
/// an empty directory.
///
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_RemoveDirectory (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("removeDirectory(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
if (! TRI_IsDirectory(*name)) {
std::string err = std::string("<path> must be a valid directory name (have '") + *name + "')";
TRI_V8_THROW_EXCEPTION_PARAMETER(err);
}
int res = TRI_RemoveEmptyDirectory(*name);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(res, "cannot remove directory");
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief removes a directory
/// @startDocuBlock JS_RemoveDirectoryRecursive
/// `fs.removeDirectoryRecursive(path)`
///
/// Removes a directory with all subelements. Throws an exception if the path
/// is not a directory.
/// @endDocuBlock
////////////////////////////////////////////////////////////////////////////////
static void JS_RemoveRecursiveDirectory (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE("removeDirectoryRecursive(<path>)");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<path> must be a string");
}
if (! TRI_IsDirectory(*name)) {
std::string err = std::string("<path> must be a valid directory name (have '") + *name + "')";
TRI_V8_THROW_EXCEPTION_PARAMETER(err);
}
bool force = false;
if (args.Length() > 1) {
force = TRI_ObjectToBoolean(args[1]);
}
if (! force) {
// check if we're inside the temp directory. force will override this check
char* tempPath = TRI_GetUserTempPath();
if (tempPath == nullptr || strlen(tempPath) < 6) {
// some security measure so we don't accidently delete all our files
if (tempPath != 0) {
TRI_FreeString(TRI_CORE_MEM_ZONE, tempPath);
}
TRI_V8_THROW_EXCEPTION_PARAMETER("temporary directory name is too short. will not remove directory");
}
const string path(*name);
#ifdef _WIN32
// windows paths are case-insensitive
if (! TRI_CaseEqualString2(path.c_str(), tempPath, strlen(tempPath))) {
#else
if (! TRI_EqualString2(path.c_str(), tempPath, strlen(tempPath))) {
#endif
std::string errorMessage = std::string("directory to be removed [") + path + "] is outside of temporary path [" + tempPath + "]";
TRI_FreeString(TRI_CORE_MEM_ZONE, tempPath);
TRI_V8_THROW_EXCEPTION_PARAMETER(errorMessage);
}
TRI_FreeString(TRI_CORE_MEM_ZONE, tempPath);
}
int res = TRI_RemoveDirectory(*name);
if (res != TRI_ERROR_NO_ERROR) {
TRI_V8_THROW_EXCEPTION_MESSAGE(res, "cannot remove directory");
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns server statistics
///
/// @FUN{internal.serverStatistics()}
///
/// Returns information about the server:
///
/// - `uptime`: time since server start in seconds.
////////////////////////////////////////////////////////////////////////////////
static void JS_ServerStatistics (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
TRI_server_statistics_t info = TRI_GetServerStatistics();
v8::Handle<v8::Object> result = v8::Object::New(isolate);
result->Set(TRI_V8_ASCII_STRING("uptime"), v8::Number::New(isolate, (double) info._uptime));
result->Set(TRI_V8_ASCII_STRING("physicalMemory"), v8::Number::New(isolate, (double) TRI_PhysicalMemory));
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief formats the arguments
///
/// @FUN{internal.sprintf(@FA{format}, @FA{argument1}, ...)}
///
/// Formats the arguments according to the format string @FA{format}.
////////////////////////////////////////////////////////////////////////////////
static void JS_SPrintF (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
size_t len = args.Length();
if (len == 0) {
TRI_V8_RETURN_STRING("");
}
TRI_Utf8ValueNFC format(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*format == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<format> must be a UTF-8 string");
}
string result;
size_t p = 1;
for (char const* ptr = *format; *ptr; ++ptr) {
if (*ptr == '%') {
++ptr;
switch (*ptr) {
case '%':
result += '%';
break;
case 'd':
case 'f':
case 'i': {
if (len <= p) {
result += "%";
result += *ptr;
}
else {
bool e;
double f = TRI_ObjectToDouble(args[(int) p], e);
if (e) {
result += "NaN";
}
else {
char b[1024];
if (*ptr == 'f') {
snprintf(b, sizeof(b), "%f", f);
}
else {
snprintf(b, sizeof(b), "%ld", (long) f);
}
result += b;
}
++p;
}
break;
}
case 'o':
case 's': {
if (len <= p) {
result += "%";
result += *ptr;
}
else {
TRI_Utf8ValueNFC text(TRI_UNKNOWN_MEM_ZONE, args[(int) p]);
if (*text == nullptr) {
string msg = StringUtils::itoa(p) + ".th argument must be a string in format '" + *format + "'";
TRI_V8_THROW_EXCEPTION_PARAMETER(msg.c_str());
}
++p;
result += *text;
}
break;
}
default:
result += "%";
result += *ptr;
break;
}
}
else {
result += *ptr;
}
}
for (size_t i = p; i < len; ++i) {
TRI_Utf8ValueNFC text(TRI_UNKNOWN_MEM_ZONE, args[(int) i]);
if (*text == nullptr) {
string msg = StringUtils::itoa(i) + ".th argument must be a string in format '" + *format + "'";
TRI_V8_THROW_TYPE_ERROR(msg.c_str());
}
result += " ";
result += *text;
}
TRI_V8_RETURN_STD_STRING(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the sha512 sum
///
/// @FUN{internal.sha512(@FA{text})}
///
/// Computes an sha512 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sha512 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("sha512(<text>)");
}
string key = TRI_ObjectToString(args[0]);
// create sha512
char* hash = 0;
size_t hashLen;
SslInterface::sslSHA512(key.c_str(), key.size(), hash, hashLen);
// as hex
char* hex = 0;
size_t hexLen;
SslInterface::sslHEX(hash, hashLen, hex, hexLen);
delete[] hash;
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, (int) hexLen);
delete[] hex;
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the sha384 sum
///
/// @FUN{internal.sha384(@FA{text})}
///
/// Computes an sha384 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sha384 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("sha384(<text>)");
}
string key = TRI_ObjectToString(args[0]);
// create sha384
char* hash = 0;
size_t hashLen;
SslInterface::sslSHA384(key.c_str(), key.size(), hash, hashLen);
// as hex
char* hex = 0;
size_t hexLen;
SslInterface::sslHEX(hash, hashLen, hex, hexLen);
delete[] hash;
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, (int) hexLen);
delete[] hex;
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the sha256 sum
///
/// @FUN{internal.sha256(@FA{text})}
///
/// Computes an sha256 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sha256 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("sha256(<text>)");
}
string key = TRI_ObjectToString(args[0]);
// create sha256
char* hash = 0;
size_t hashLen;
SslInterface::sslSHA256(key.c_str(), key.size(), hash, hashLen);
// as hex
char* hex = 0;
size_t hexLen;
SslInterface::sslHEX(hash, hashLen, hex, hexLen);
delete[] hash;
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, (int) hexLen);
delete[] hex;
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the sha224 sum
///
/// @FUN{internal.sha224(@FA{text})}
///
/// Computes an sha224 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sha224 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("sha224(<text>)");
}
string key = TRI_ObjectToString(args[0]);
// create sha224
char* hash = 0;
size_t hashLen;
SslInterface::sslSHA224(key.c_str(), key.size(), hash, hashLen);
// as hex
char* hex = 0;
size_t hexLen;
SslInterface::sslHEX(hash, hashLen, hex, hexLen);
delete[] hash;
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, (int) hexLen);
delete[] hex;
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the sha1 sum
///
/// @FUN{internal.sha1(@FA{text})}
///
/// Computes an sha1 for the @FA{text}.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sha1 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1 || ! args[0]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("sha1(<text>)");
}
string key = TRI_ObjectToString(args[0]);
// create sha1
char* hash = 0;
size_t hashLen;
SslInterface::sslSHA1(key.c_str(), key.size(), hash, hashLen);
// as hex
char* hex = 0;
size_t hexLen;
SslInterface::sslHEX(hash, hashLen, hex, hexLen);
delete[] hash;
// and return
v8::Handle<v8::String> hashStr = TRI_V8_PAIR_STRING(hex, (int) hexLen);
delete[] hex;
TRI_V8_RETURN(hashStr);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief sleeps
///
/// @FUN{internal.sleep(@FA{seconds})}
///
/// Wait for @FA{seconds}, without calling the garbage collection.
////////////////////////////////////////////////////////////////////////////////
static void JS_Sleep (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("sleep(<seconds>)");
}
double n = TRI_ObjectToDouble(args[0]);
double until = TRI_microtime() + n;
// TODO: use select etc. to wait until point in time
while (TRI_microtime() < until) {
usleep(10000);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the current time
///
/// @FUN{internal.time()}
///
/// Returns the current time in seconds.
///
/// @verbinclude fluent36
////////////////////////////////////////////////////////////////////////////////
static void JS_Time (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
TRI_V8_RETURN(v8::Number::New(isolate, TRI_microtime()));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief waits for the specified amount of time and calls the garbage
/// collection.
///
/// @FUN{internal.wait(@FA{seconds})}
///
/// Wait for @FA{seconds}, call the garbage collection.
////////////////////////////////////////////////////////////////////////////////
static void JS_Wait (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE("wait(<seconds>, <gc>)");
}
double n = TRI_ObjectToDouble(args[0]);
bool gc = true; // default is to trigger the gc
if (args.Length() > 1) {
gc = TRI_ObjectToBoolean(args[1]);
}
if (gc) {
TRI_RunGarbageCollectionV8(isolate, n);
}
// wait without gc
double until = TRI_microtime() + n;
while (TRI_microtime() < until) {
usleep(100);
}
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief intentionally causes a segfault
///
/// @FUN{internal.debugSegfault(@FA{message})}
///
/// intentionally cause a segmentation violation
////////////////////////////////////////////////////////////////////////////////
#ifdef TRI_ENABLE_FAILURE_TESTS
static void JS_DebugSegfault (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("debugSegfault(<message>)");
}
string const message = TRI_ObjectToString(args[0]);
TRI_SegfaultDebugging(message.c_str());
// we may get here if we are in non-maintainer mode
TRI_V8_RETURN_UNDEFINED();
}
#endif
////////////////////////////////////////////////////////////////////////////////
/// @brief sets a failure point
///
/// @FUN{internal.debugSetFailAt(@FA{point})}
///
/// Set a point for an intentional system failure
////////////////////////////////////////////////////////////////////////////////
#ifdef TRI_ENABLE_FAILURE_TESTS
static void JS_DebugSetFailAt (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("debugSetFailAt(<point>)");
}
string const point = TRI_ObjectToString(args[0]);
TRI_AddFailurePointDebugging(point.c_str());
TRI_V8_RETURN_UNDEFINED();
}
#endif
////////////////////////////////////////////////////////////////////////////////
/// @brief removes a failure point
///
/// @FUN{internal.debugRemoveFailAt(@FA{point})}
///
/// Remove a point for an intentional system failure
////////////////////////////////////////////////////////////////////////////////
#ifdef TRI_ENABLE_FAILURE_TESTS
static void JS_DebugRemoveFailAt (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("debugRemoveFailAt(<point>)");
}
string const point = TRI_ObjectToString(args[0]);
TRI_RemoveFailurePointDebugging(point.c_str());
TRI_V8_RETURN_UNDEFINED();
}
#endif
////////////////////////////////////////////////////////////////////////////////
/// @brief clears all failure points
///
/// @FUN{internal.debugClearFailAt()}
///
/// Remove all points for intentional system failures
////////////////////////////////////////////////////////////////////////////////
static void JS_DebugClearFailAt (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("debugClearFailAt()");
}
// if failure testing is not enabled, this is a no-op
#ifdef TRI_ENABLE_FAILURE_TESTS
TRI_ClearFailurePointsDebugging();
#endif
TRI_V8_RETURN_UNDEFINED();
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns whether failure points can be used
///
/// @FUN{internal.debugCanUseFailAt()}
///
/// Returns whether failure points can be be used
////////////////////////////////////////////////////////////////////////////////
static void JS_DebugCanUseFailAt (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() != 0) {
TRI_V8_THROW_EXCEPTION_USAGE("debugCanUseFailAt()");
}
if (TRI_CanUseFailurePointsDebugging()) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the current request and connection statistics
////////////////////////////////////////////////////////////////////////////////
static void JS_ClientStatistics (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::Handle<v8::Object> result = v8::Object::New(isolate);
StatisticsCounter httpConnections;
StatisticsCounter totalRequests;
vector<StatisticsCounter> methodRequests;
StatisticsCounter asyncRequests;
StatisticsDistribution connectionTime;
TRI_FillConnectionStatistics(httpConnections, totalRequests, methodRequests, asyncRequests, connectionTime);
result->Set(TRI_V8_ASCII_STRING("httpConnections"), v8::Number::New(isolate, (double) httpConnections._count));
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("connectionTime"), connectionTime);
StatisticsDistribution totalTime;
StatisticsDistribution requestTime;
StatisticsDistribution queueTime;
StatisticsDistribution ioTime;
StatisticsDistribution bytesSent;
StatisticsDistribution bytesReceived;
TRI_FillRequestStatistics(totalTime, requestTime, queueTime, ioTime, bytesSent, bytesReceived);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("totalTime"), totalTime);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("requestTime"), requestTime);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("queueTime"), queueTime);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("ioTime"), ioTime);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("bytesSent"), bytesSent);
FillDistribution(isolate, result, TRI_V8_ASCII_STRING("bytesReceived"), bytesReceived);
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the PBKDF2 HMAC SHA1 derived key
///
/// @FUN{internal.PBKDF2(@FA{salt}, @FA{password}, @FA{iterations}, @FA{keyLength})}
///
/// Computes the PBKDF2 HMAC SHA1 derived key for the @FA{password}.
////////////////////////////////////////////////////////////////////////////////
static void JS_PBKDF2 (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() < 4 || ! args[0]->IsString() || ! args[1]->IsString() || ! args[2]->IsNumber() || ! args[3]->IsNumber()) {
TRI_V8_THROW_EXCEPTION_USAGE("PBKDF2(<salt>, <password>, <iterations>, <keyLength>)");
}
string salt = TRI_ObjectToString(args[0]);
string password = TRI_ObjectToString(args[1]);
int iterations = (int) TRI_ObjectToInt64(args[2]);
int keyLength = (int) TRI_ObjectToInt64(args[3]);
string result = SslInterface::sslPBKDF2(salt.c_str(), salt.size(), password.c_str(), password.size(), iterations, keyLength);
TRI_V8_RETURN_STD_STRING(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief computes the HMAC signature
///
/// @FUN{internal.HMAC(@FA{key}, @FA{message}, @FA{algorithm})}
///
/// Computes the HMAC for the @FA{message}.
////////////////////////////////////////////////////////////////////////////////
static void JS_HMAC (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract arguments
if (args.Length() < 2 || ! args[0]->IsString() || ! args[1]->IsString()) {
TRI_V8_THROW_EXCEPTION_USAGE("HMAC(<key>, <text>, <algorithm>)");
}
string key = TRI_ObjectToString(args[0]);
string message = TRI_ObjectToString(args[1]);
SslInterface::Algorithm al = SslInterface::Algorithm::ALGORITHM_SHA256;
if (args.Length() > 2 && ! args[2]->IsUndefined()) {
string algorithm = TRI_ObjectToString(args[2]);
StringUtils::tolowerInPlace(&algorithm);
if (algorithm == "sha1") {
al = SslInterface::Algorithm::ALGORITHM_SHA1;
}
else if (algorithm == "sha512") {
al = SslInterface::Algorithm::ALGORITHM_SHA512;
}
else if (algorithm == "sha384") {
al = SslInterface::Algorithm::ALGORITHM_SHA384;
}
else if (algorithm == "sha256") {
al = SslInterface::Algorithm::ALGORITHM_SHA256;
}
else if (algorithm == "sha224") {
al = SslInterface::Algorithm::ALGORITHM_SHA224;
}
else if (algorithm == "md5") {
al = SslInterface::Algorithm::ALGORITHM_MD5;
}
else {
TRI_V8_THROW_EXCEPTION_PARAMETER("invalid value for <algorithm>");
}
}
string result = SslInterface::sslHMAC(key.c_str(), key.size(), message.c_str(), message.size(), al);
TRI_V8_RETURN_STD_STRING(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the current http statistics
////////////////////////////////////////////////////////////////////////////////
static void JS_HttpStatistics (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::Handle<v8::Object> result = v8::Object::New(isolate);
StatisticsCounter httpConnections;
StatisticsCounter totalRequests;
vector<StatisticsCounter> methodRequests;
StatisticsCounter asyncRequests;
StatisticsDistribution connectionTime;
TRI_FillConnectionStatistics(httpConnections, totalRequests, methodRequests, asyncRequests, connectionTime);
// request counters
result->Set(TRI_V8_ASCII_STRING("requestsTotal"), v8::Number::New(isolate, (double) totalRequests._count));
result->Set(TRI_V8_ASCII_STRING("requestsAsync"), v8::Number::New(isolate, (double) asyncRequests._count));
result->Set(TRI_V8_ASCII_STRING("requestsGet"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_GET]._count));
result->Set(TRI_V8_ASCII_STRING("requestsHead"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_HEAD]._count));
result->Set(TRI_V8_ASCII_STRING("requestsPost"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_POST]._count));
result->Set(TRI_V8_ASCII_STRING("requestsPut"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_PUT]._count));
result->Set(TRI_V8_ASCII_STRING("requestsPatch"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_PATCH]._count));
result->Set(TRI_V8_ASCII_STRING("requestsDelete"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_DELETE]._count));
result->Set(TRI_V8_ASCII_STRING("requestsOptions"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_OPTIONS]._count));
result->Set(TRI_V8_ASCII_STRING("requestsOther"), v8::Number::New(isolate, (double) methodRequests[(int) HttpRequest::HTTP_REQUEST_ILLEGAL]._count));
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes a external program
////////////////////////////////////////////////////////////////////////////////
static void JS_ExecuteExternal (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (3 < args.Length() || args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE(
"executeExternal(<filename>[, <arguments> [,<usePipes>] ])");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a string");
}
char** arguments = 0;
uint32_t n = 0;
if (2 <= args.Length()) {
v8::Handle<v8::Value> a = args[1];
if (a->IsArray()) {
v8::Handle<v8::Array> arr = v8::Handle<v8::Array>::Cast(a);
n = arr->Length();
arguments = (char**) TRI_Allocate(TRI_CORE_MEM_ZONE, n * sizeof(char*), false);
for (uint32_t i = 0; i < n; ++i) {
TRI_Utf8ValueNFC arg(TRI_UNKNOWN_MEM_ZONE, arr->Get(i));
if (*arg == nullptr) {
arguments[i] = TRI_DuplicateString("");
}
else {
arguments[i] = TRI_DuplicateString(*arg);
}
}
}
else {
n = 1;
arguments = (char**) TRI_Allocate(TRI_CORE_MEM_ZONE, n * sizeof(char*), false);
TRI_Utf8ValueNFC arg(TRI_UNKNOWN_MEM_ZONE, a);
if (*arg == nullptr) {
arguments[0] = TRI_DuplicateString("");
}
else {
arguments[0] = TRI_DuplicateString(*arg);
}
}
}
bool usePipes = false;
if (3 <= args.Length()) {
usePipes = TRI_ObjectToBoolean(args[2]);
}
TRI_external_id_t external;
TRI_CreateExternalProcess(*name, (const char**) arguments, (size_t) n,
usePipes, &external);
if (arguments != 0) {
for (uint32_t i = 0; i < n; ++i) {
TRI_FreeString(TRI_CORE_MEM_ZONE, arguments[i]);
}
TRI_Free(TRI_CORE_MEM_ZONE, arguments);
}
if (external._pid == TRI_INVALID_PROCESS_ID) {
TRI_V8_THROW_ERROR("Process could not be started");
}
v8::Handle<v8::Object> result = v8::Object::New(isolate);
result->Set(TRI_V8_ASCII_STRING("pid"), v8::Number::New(isolate, external._pid));
// Now report about possible stdin and stdout pipes:
#ifndef _WIN32
if (external._readPipe >= 0) {
result->Set(TRI_V8_ASCII_STRING("readPipe"),
v8::Number::New(isolate, external._readPipe));
}
if (external._writePipe >= 0) {
result->Set(TRI_V8_ASCII_STRING("writePipe"),
v8::Number::New(isolate, external._writePipe));
}
#else
size_t readPipe_len, writePipe_len;
if (0 != external._readPipe) {
char* readPipe = TRI_EncodeHexString((const char *)external._readPipe,
sizeof(HANDLE), &readPipe_len);
result->Set(TRI_V8_ASCII_STRING("readPipe"),
TRI_V8_PAIR_STRING(readPipe, (int) readPipe_len));
TRI_FreeString(TRI_CORE_MEM_ZONE, readPipe);
}
if (0 != external._writePipe) {
char* writePipe = TRI_EncodeHexString((const char *)external._writePipe,
sizeof(HANDLE), &writePipe_len);
result->Set(TRI_V8_ASCII_STRING("writePipe"),
TRI_V8_PAIR_STRING(writePipe, (int) writePipe_len));
TRI_FreeString(TRI_CORE_MEM_ZONE, writePipe);
}
#endif
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief returns the status of an external process
////////////////////////////////////////////////////////////////////////////////
static void JS_StatusExternal (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::Handle<v8::String> pidname = TRI_V8_ASCII_STRING("pid");
// extract the arguments
if (args.Length() < 1 || args.Length() > 2 ||
!args[0]->IsObject()) {
TRI_V8_THROW_EXCEPTION_USAGE(
"statusExternal(<external-identifier>[, <wait>])");
}
v8::Handle<v8::Object> obj = v8::Handle<v8::Object>::Cast(args[0]);
if (! obj->Has(pidname)) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER,
"statusExternal: pid must be given");
}
TRI_external_id_t pid;
memset(&pid, 0, sizeof(TRI_external_id_t));
#ifndef _WIN32
pid._pid = static_cast<TRI_pid_t>(TRI_ObjectToUInt64(obj->Get(pidname), true));
#else
pid._pid = static_cast<DWORD>(TRI_ObjectToUInt64(obj->Get(pidname), true));
#endif
bool wait = false;
if (args.Length() == 2) {
wait = TRI_ObjectToBoolean(args[1]);
}
TRI_external_status_t external = TRI_CheckExternalProcess(pid, wait);
v8::Handle<v8::Object> result = v8::Object::New(isolate);
const char * status = "UNKNOWN";
switch (external._status) {
case TRI_EXT_NOT_STARTED: status = "NOT-STARTED"; break;
case TRI_EXT_PIPE_FAILED: status = "FAILED"; break;
case TRI_EXT_FORK_FAILED: status = "FAILED"; break;
case TRI_EXT_RUNNING: status = "RUNNING"; break;
case TRI_EXT_NOT_FOUND: status = "NOT-FOUND"; break;
case TRI_EXT_TERMINATED: status = "TERMINATED"; break;
case TRI_EXT_ABORTED: status = "ABORTED"; break;
case TRI_EXT_STOPPED: status = "STOPPED"; break;
}
result->Set(TRI_V8_ASCII_STRING("status"), TRI_V8_STRING(status));
if (external._status == TRI_EXT_TERMINATED) {
result->Set(TRI_V8_ASCII_STRING("exit"), v8::Integer::New(isolate, static_cast<int32_t>(external._exitStatus)));
}
else if (external._status == TRI_EXT_ABORTED) {
result->Set(TRI_V8_ASCII_STRING("signal"), v8::Integer::New(isolate, static_cast<int32_t>(external._exitStatus)));
}
if (external._errorMessage.length() > 0) {
result->Set(TRI_V8_ASCII_STRING("errorMessage"), TRI_V8_STD_STRING(external._errorMessage));
}
// return the result
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes a external program
////////////////////////////////////////////////////////////////////////////////
static void JS_ExecuteAndWaitExternal (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (3 < args.Length() || args.Length() < 1) {
TRI_V8_THROW_EXCEPTION_USAGE(
"executeAndWaitExternal(<filename>[, <arguments> [,<usePipes>] ])");
}
TRI_Utf8ValueNFC name(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (*name == nullptr) {
TRI_V8_THROW_TYPE_ERROR("<filename> must be a string");
}
char** arguments = 0;
uint32_t n = 0;
if (2 <= args.Length()) {
v8::Handle<v8::Value> a = args[1];
if (a->IsArray()) {
v8::Handle<v8::Array> arr = v8::Handle<v8::Array>::Cast(a);
n = arr->Length();
arguments = (char**) TRI_Allocate(TRI_CORE_MEM_ZONE, n * sizeof(char*), false);
for (uint32_t i = 0; i < n; ++i) {
TRI_Utf8ValueNFC arg(TRI_UNKNOWN_MEM_ZONE, arr->Get(i));
if (*arg == nullptr) {
arguments[i] = TRI_DuplicateString("");
}
else {
arguments[i] = TRI_DuplicateString(*arg);
}
}
}
else {
n = 1;
arguments = (char**) TRI_Allocate(TRI_CORE_MEM_ZONE, n * sizeof(char*), false);
TRI_Utf8ValueNFC arg(TRI_UNKNOWN_MEM_ZONE, a);
if (*arg == nullptr) {
arguments[0] = TRI_DuplicateString("");
}
else {
arguments[0] = TRI_DuplicateString(*arg);
}
}
}
bool usePipes = false;
if (3 <= args.Length()) {
usePipes = TRI_ObjectToBoolean(args[2]);
}
TRI_external_id_t external;
TRI_CreateExternalProcess(*name, (const char**) arguments, (size_t) n,
usePipes, &external);
if (arguments != 0) {
for (uint32_t i = 0; i < n; ++i) {
TRI_FreeString(TRI_CORE_MEM_ZONE, arguments[i]);
}
TRI_Free(TRI_CORE_MEM_ZONE, arguments);
}
if (external._pid == TRI_INVALID_PROCESS_ID) {
TRI_V8_THROW_ERROR("Process could not be started");
}
v8::Handle<v8::Object> result = v8::Object::New(isolate);
result->Set(TRI_V8_ASCII_STRING("pid"), v8::Number::New(isolate, external._pid));
// Now report about possible stdin and stdout pipes:
#ifndef _WIN32
if (external._readPipe >= 0) {
result->Set(TRI_V8_ASCII_STRING("readPipe"),
v8::Number::New(isolate, external._readPipe));
}
if (external._writePipe >= 0) {
result->Set(TRI_V8_ASCII_STRING("writePipe"),
v8::Number::New(isolate, external._writePipe));
}
#else
size_t readPipe_len, writePipe_len;
if (0 != external._readPipe) {
char* readPipe = TRI_EncodeHexString((const char *)external._readPipe,
sizeof(HANDLE), &readPipe_len);
result->Set(TRI_V8_ASCII_STRING("readPipe"),
TRI_V8_PAIR_STRING(readPipe, (int) readPipe_len));
TRI_FreeString(TRI_CORE_MEM_ZONE, readPipe);
}
if (0 != external._writePipe) {
char* writePipe = TRI_EncodeHexString((const char *)external._writePipe,
sizeof(HANDLE), &writePipe_len);
result->Set(TRI_V8_ASCII_STRING("writePipe"),
TRI_V8_PAIR_STRING(writePipe, (int) writePipe_len));
TRI_FreeString(TRI_CORE_MEM_ZONE, writePipe);
}
#endif
TRI_external_id_t pid;
memset(&pid, 0, sizeof(TRI_external_id_t));
pid._pid = external._pid;
TRI_external_status_t external_status = TRI_CheckExternalProcess(pid, true);
const char* status = "UNKNOWN";
switch (external_status._status) {
case TRI_EXT_NOT_STARTED: status = "NOT-STARTED"; break;
case TRI_EXT_PIPE_FAILED: status = "FAILED"; break;
case TRI_EXT_FORK_FAILED: status = "FAILED"; break;
case TRI_EXT_RUNNING: status = "RUNNING"; break;
case TRI_EXT_NOT_FOUND: status = "NOT-FOUND"; break;
case TRI_EXT_TERMINATED: status = "TERMINATED"; break;
case TRI_EXT_ABORTED: status = "ABORTED"; break;
case TRI_EXT_STOPPED: status = "STOPPED"; break;
}
result->Set(TRI_V8_ASCII_STRING("status"), TRI_V8_ASCII_STRING(status));
if (external_status._status == TRI_EXT_TERMINATED) {
result->Set(TRI_V8_ASCII_STRING("exit"), v8::Integer::New(isolate, static_cast<int32_t>(external_status._exitStatus)));
}
else if (external_status._status == TRI_EXT_ABORTED) {
result->Set(TRI_V8_ASCII_STRING("signal"), v8::Integer::New(isolate, static_cast<int32_t>(external_status._exitStatus)));
}
if (external_status._errorMessage.length() > 0) {
result->Set(TRI_V8_ASCII_STRING("errorMessage"),
TRI_V8_STD_STRING(external_status._errorMessage));
}
// return the result
TRI_V8_RETURN(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief kills an external process
////////////////////////////////////////////////////////////////////////////////
static void JS_KillExternal (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::Handle<v8::String> pidname = TRI_V8_ASCII_STRING("pid");
// extract the arguments
if (args.Length() != 1 || ! args[0]->IsObject()) {
TRI_V8_THROW_EXCEPTION_USAGE("killExternal(<external-identifier>)");
}
v8::Handle<v8::Object> obj = v8::Handle<v8::Object>::Cast(args[0]);
if (! obj->Has(pidname)) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER,
"statusExternal: pid must be given");
}
TRI_external_id_t pid;
memset(&pid, 0, sizeof(TRI_external_id_t));
#ifndef _WIN32
pid._pid = static_cast<TRI_pid_t>(TRI_ObjectToUInt64(obj->Get(pidname),true));
#else
pid._pid = static_cast<DWORD>(TRI_ObjectToUInt64(obj->Get(pidname), true));
#endif
// return the result
if (TRI_KillExternalProcess(pid)) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief checks if a port is available
////////////////////////////////////////////////////////////////////////////////
static void JS_TestPort (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
// extract the arguments
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("testPort(<address>)");
}
string address = TRI_ObjectToString(args[0]);
Endpoint* endpoint = Endpoint::serverFactory(address, 10, false);
if (0 == endpoint) {
TRI_V8_THROW_EXCEPTION_MESSAGE(TRI_ERROR_BAD_PARAMETER,
"address description invalid, cannot create endpoint");
}
TRI_socket_t s = endpoint->connect(1, 1);
bool available = TRI_isvalidsocket(s);
if (available) {
endpoint->disconnect();
}
delete endpoint;
// return the result
if (available) {
TRI_V8_RETURN_TRUE();
}
else {
TRI_V8_RETURN_FALSE();
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief ArangoError
////////////////////////////////////////////////////////////////////////////////
static void JS_ArangoError (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
TRI_GET_GLOBALS();
TRI_GET_GLOBAL_STRING(ErrorKey);
TRI_GET_GLOBAL_STRING(ErrorNumKey);
v8::Handle<v8::Object> self = args.Holder()->ToObject();
self->Set(ErrorKey, v8::True(isolate));
self->Set(ErrorNumKey, v8::Integer::New(isolate, TRI_ERROR_FAILED));
if (0 < args.Length() && args[0]->IsObject()) {
TRI_GET_GLOBAL_STRING(CodeKey);
TRI_GET_GLOBAL_STRING(ErrorMessageKey);
v8::Handle<v8::Object> data = args[0]->ToObject();
if (data->Has(ErrorKey)) {
self->Set(ErrorKey, data->Get(ErrorKey));
}
if (data->Has(CodeKey)) {
self->Set(CodeKey, data->Get(CodeKey));
}
if (data->Has(ErrorNumKey)) {
self->Set(ErrorNumKey, data->Get(ErrorNumKey));
}
if (data->Has(ErrorMessageKey)) {
self->Set(ErrorMessageKey, data->Get(ErrorMessageKey));
}
}
{
// call Error.captureStackTrace(this) so the ArangoError object gets a nifty stack trace
v8::Handle<v8::Object> current = isolate->GetCurrentContext()->Global();
v8::Handle<v8::Value> errorObject = current->Get(TRI_V8_ASCII_STRING("Error"));
v8::Handle<v8::Object> err = v8::Handle<v8::Object>::Cast(errorObject);
v8::Handle<v8::Function> captureStackTrace = v8::Handle<v8::Function>::Cast(err->Get(TRI_V8_ASCII_STRING("captureStackTrace")));
v8::Handle<v8::Value> arguments[] = { self };
captureStackTrace->Call(current, 1, arguments);
}
TRI_V8_RETURN(self);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief SleepAndRequeue
////////////////////////////////////////////////////////////////////////////////
static void JS_SleepAndRequeue (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
TRI_GET_GLOBALS();
v8::Handle<v8::Object> self = args.Holder()->ToObject();
if (0 < args.Length() && args[0]->IsObject()) {
v8::Handle<v8::Object> data = args[0]->ToObject();
TRI_GET_GLOBAL_STRING(SleepKey);
if (data->Has(SleepKey)) {
self->Set(SleepKey, data->Get(SleepKey));
}
}
TRI_V8_RETURN(self);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief isIP
////////////////////////////////////////////////////////////////////////////////
static void JS_IsIP (const v8::FunctionCallbackInfo<v8::Value>& args) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
if (args.Length() != 1) {
TRI_V8_THROW_EXCEPTION_USAGE("isIP(<value>)");
}
TRI_Utf8ValueNFC address(TRI_UNKNOWN_MEM_ZONE, args[0]);
if (TRI_InetPton4(*address, NULL) == TRI_ERROR_NO_ERROR) {
TRI_V8_RETURN(v8::Number::New(isolate, 4));
}
else if (TRI_InetPton6(*address, NULL) == 0) {
TRI_V8_RETURN(v8::Number::New(isolate, 6));
}
else {
TRI_V8_RETURN(v8::Number::New(isolate, 0));
}
}
// -----------------------------------------------------------------------------
// --SECTION-- public functions
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief reports an exception
////////////////////////////////////////////////////////////////////////////////
string TRI_StringifyV8Exception (v8::Isolate* isolate, v8::TryCatch* tryCatch) {
v8::HandleScope handle_scope(isolate);
TRI_Utf8ValueNFC exception(TRI_UNKNOWN_MEM_ZONE, tryCatch->Exception());
const char* exceptionString = *exception;
v8::Handle<v8::Message> message = tryCatch->Message();
string result;
// V8 didn't provide any extra information about this error; just print the exception.
if (message.IsEmpty()) {
if (exceptionString == nullptr) {
result = "JavaScript exception\n";
}
else {
result = "JavaScript exception: " + string(exceptionString) + "\n";
}
}
else {
TRI_Utf8ValueNFC filename(TRI_UNKNOWN_MEM_ZONE, message->GetScriptResourceName());
const char* filenameString = *filename;
int linenum = message->GetLineNumber();
int start = message->GetStartColumn() + 1;
int end = message->GetEndColumn();
if ((filenameString == nullptr) ||
(! strcmp(filenameString, TRI_V8_SHELL_COMMAND_NAME))) {
if (exceptionString == nullptr) {
result = "JavaScript exception\n";
}
else {
result = "JavaScript exception: " + string(exceptionString) + "\n";
}
}
else {
if (exceptionString == nullptr) {
result = "JavaScript exception in file '" + string(filenameString) + "' at "
+ StringUtils::itoa(linenum) + "," + StringUtils::itoa(start) + "\n";
}
else {
result = "JavaScript exception in file '" + string(filenameString) + "' at "
+ StringUtils::itoa(linenum) + "," + StringUtils::itoa(start)
+ ": " + exceptionString + "\n";
}
}
TRI_Utf8ValueNFC sourceline(TRI_UNKNOWN_MEM_ZONE, message->GetSourceLine());
if (*sourceline) {
string l = *sourceline;
result += "!" + l + "\n";
if (1 < start) {
l = string(start - 1, ' ');
}
else {
l = "";
}
l += string((size_t)(end - start + 1), '^');
result += "!" + l + "\n";
}
TRI_Utf8ValueNFC stacktrace(TRI_UNKNOWN_MEM_ZONE, tryCatch->StackTrace());
if (*stacktrace && stacktrace.length() > 0) {
result += "stacktrace: " + string(*stacktrace) + "\n";
}
}
return result;
}
////////////////////////////////////////////////////////////////////////////////
/// @brief prints an exception and stacktrace
////////////////////////////////////////////////////////////////////////////////
void TRI_LogV8Exception (v8::Isolate* isolate,
v8::TryCatch* tryCatch) {
v8::HandleScope handle_scope(isolate);
TRI_Utf8ValueNFC exception(TRI_UNKNOWN_MEM_ZONE, tryCatch->Exception());
const char* exceptionString = *exception;
v8::Handle<v8::Message> message = tryCatch->Message();
// V8 didn't provide any extra information about this error; just print the exception.
if (message.IsEmpty()) {
if (exceptionString == nullptr) {
LOG_ERROR("JavaScript exception");
}
else {
LOG_ERROR("JavaScript exception: %s", exceptionString);
}
}
else {
TRI_Utf8ValueNFC filename(TRI_UNKNOWN_MEM_ZONE, message->GetScriptResourceName());
const char* filenameString = *filename;
#ifdef TRI_ENABLE_LOGGER
// if ifdef is not used, the compiler will complain about linenum being unused
int linenum = message->GetLineNumber();
#endif
int start = message->GetStartColumn() + 1;
int end = message->GetEndColumn();
if (filenameString == nullptr) {
if (exceptionString == nullptr) {
LOG_ERROR("JavaScript exception");
}
else {
LOG_ERROR("JavaScript exception: %s", exceptionString);
}
}
else {
if (exceptionString == nullptr) {
LOG_ERROR("JavaScript exception in file '%s' at %d,%d", filenameString, linenum, start);
}
else {
LOG_ERROR("JavaScript exception in file '%s' at %d,%d: %s", filenameString, linenum, start, exceptionString);
}
}
TRI_Utf8ValueNFC sourceline(TRI_UNKNOWN_MEM_ZONE, message->GetSourceLine());
if (*sourceline) {
string l = *sourceline;
LOG_ERROR("!%s", l.c_str());
if (1 < start) {
l = string(start - 1, ' ');
}
else {
l = "";
}
l += string((size_t)(end - start + 1), '^');
LOG_ERROR("!%s", l.c_str());
}
TRI_Utf8ValueNFC stacktrace(TRI_UNKNOWN_MEM_ZONE, tryCatch->StackTrace());
if (*stacktrace && stacktrace.length() > 0) {
LOG_ERROR("stacktrace: %s", *stacktrace);
}
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads a file into the current context
////////////////////////////////////////////////////////////////////////////////
bool TRI_ExecuteGlobalJavaScriptFile (v8::Isolate* isolate, char const* filename) {
return LoadJavaScriptFile(isolate, filename, true, false);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief reads all files from a directory into the current context
////////////////////////////////////////////////////////////////////////////////
bool TRI_ExecuteGlobalJavaScriptDirectory (v8::Isolate* isolate, char const* path) {
return LoadJavaScriptDirectory(isolate, path, true, false);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes a file in a local context
////////////////////////////////////////////////////////////////////////////////
bool TRI_ExecuteLocalJavaScriptFile (v8::Isolate* isolate, char const* filename) {
return LoadJavaScriptFile(isolate, filename, true, true);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes all files from a directory in a local context
////////////////////////////////////////////////////////////////////////////////
bool TRI_ExecuteLocalJavaScriptDirectory (v8::Isolate* isolate, char const* path) {
return LoadJavaScriptDirectory(isolate, path, true, true);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief parses a file
////////////////////////////////////////////////////////////////////////////////
bool TRI_ParseJavaScriptFile (v8::Isolate* isolate, char const* filename) {
return LoadJavaScriptFile(isolate, filename, false, false);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief executes a string within a V8 context, optionally print the result
////////////////////////////////////////////////////////////////////////////////
v8::Handle<v8::Value> TRI_ExecuteJavaScriptString (v8::Isolate* isolate,
v8::Handle<v8::Context> context,
v8::Handle<v8::String> const source,
v8::Handle<v8::String> const name,
bool printResult) {
v8::EscapableHandleScope scope(isolate);
v8::Handle<v8::Value> result;
v8::Handle<v8::Script> script = v8::Script::Compile(source, name);
// compilation failed, print errors that happened during compilation
if (script.IsEmpty()) {
return scope.Escape<v8::Value>(result);
}
// compilation succeeded, run the script
result = script->Run();
if (result.IsEmpty()) {
return scope.Escape<v8::Value>(result);
}
else {
// if all went well and the result wasn't undefined then print the returned value
if (printResult && ! result->IsUndefined()) {
v8::TryCatch tryCatch;
v8::Handle<v8::String> printFuncName = TRI_V8_ASCII_STRING("print");
v8::Handle<v8::Function> print = v8::Handle<v8::Function>::Cast(context->Global()->Get(printFuncName));
v8::Handle<v8::Value> arguments[] = { result };
print->Call(print, 1, arguments);
if (tryCatch.HasCaught()) {
if (tryCatch.CanContinue()) {
TRI_LogV8Exception(isolate, &tryCatch);
}
else {
TRI_GET_GLOBALS();
v8g->_canceled = true;
scope.Escape<v8::Value>(v8::Undefined(isolate));
}
}
}
return scope.Escape<v8::Value>(result);
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates an error in a javascript object, based on error number only
////////////////////////////////////////////////////////////////////////////////
void TRI_CreateErrorObject (v8::Isolate *isolate, int errorNumber) {
v8::HandleScope scope(isolate);
CreateErrorObject(isolate, errorNumber, TRI_errno_string(errorNumber));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates an error in a javascript object, using supplied text
////////////////////////////////////////////////////////////////////////////////
void TRI_CreateErrorObject (v8::Isolate *isolate,
int errorNumber,
string const& message) {
v8::HandleScope scope(isolate);
CreateErrorObject(isolate, errorNumber, message);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates an error in a javascript object
////////////////////////////////////////////////////////////////////////////////
void TRI_CreateErrorObject (v8::Isolate *isolate,
int errorNumber,
string const& message,
bool autoPrepend) {
v8::HandleScope scope(isolate);
if (autoPrepend) {
CreateErrorObject(isolate, errorNumber,
message + ": " + string(TRI_errno_string(errorNumber)));
}
else {
CreateErrorObject(isolate, errorNumber, message);
}
}
////////////////////////////////////////////////////////////////////////////////
/// @brief normalizes a v8 object
////////////////////////////////////////////////////////////////////////////////
void TRI_normalize_V8_Obj (const v8::FunctionCallbackInfo<v8::Value>& args,
v8::Handle<v8::Value> obj) {
v8::Isolate* isolate = args.GetIsolate();
v8::HandleScope scope(isolate);
v8::String::Value str(obj);
size_t str_len = str.length();
if (str_len > 0) {
UErrorCode errorCode = U_ZERO_ERROR;
const Normalizer2* normalizer = Normalizer2::getInstance(NULL, "nfc", UNORM2_COMPOSE ,errorCode);
if (U_FAILURE(errorCode)) {
TRI_V8_RETURN(TRI_V8_PAIR_STRING((char*)*str, (int) str_len));
}
UnicodeString result = normalizer->normalize(UnicodeString((UChar*) *str, (int32_t) str_len), errorCode);
if (U_FAILURE(errorCode)) {
TRI_V8_RETURN(TRI_V8_STRING_UTF16(*str, (int) str_len));
}
// ..........................................................................
// Take note here: we are assuming that the ICU type UChar is two bytes.
// There is no guarantee that this will be the case on all platforms and
// compilers. v8 expects uint16_t (2 bytes)
// ..........................................................................
TRI_V8_RETURN(TRI_V8_STRING_UTF16( (const uint16_t*) result.getBuffer(), result.length()));
}
TRI_V8_RETURN(v8::String::NewFromUtf8(isolate, ""));
}
////////////////////////////////////////////////////////////////////////////////
/// @brief creates the path list
////////////////////////////////////////////////////////////////////////////////
v8::Handle<v8::Array> static TRI_V8PathList (v8::Isolate* isolate, string const& modules) {
v8::EscapableHandleScope scope(isolate);
#ifdef _WIN32
vector<string> paths = StringUtils::split(modules, ";", '\0');
#else
vector<string> paths = StringUtils::split(modules, ";:");
#endif
const uint32_t n = (uint32_t) paths.size();
v8::Handle<v8::Array> result = v8::Array::New(isolate, n);
for (uint32_t i = 0; i < n; ++i) {
result->Set(v8::Integer::New(isolate, i), TRI_V8_STD_STRING(paths[i]));
}
return scope.Escape<v8::Array>(result);
}
////////////////////////////////////////////////////////////////////////////////
/// @brief execute a single garbage collection run
////////////////////////////////////////////////////////////////////////////////
bool TRI_SingleRunGarbageCollectionV8 (v8::Isolate* isolate,
int idleTimeInMs) {
isolate->LowMemoryNotification();
bool rc = isolate->IdleNotification(idleTimeInMs);
isolate->RunMicrotasks();
return rc;
}
////////////////////////////////////////////////////////////////////////////////
/// @brief run the V8 garbage collection for at most a specifiable amount of
/// time
////////////////////////////////////////////////////////////////////////////////
void TRI_RunGarbageCollectionV8 (v8::Isolate* isolate,
double availableTime) {
int idleTimeInMs = 1000;
if (availableTime >= 5.0) {
idleTimeInMs = 5000;
}
if (availableTime >= 10.0) {
idleTimeInMs = 10000;
}
double const until = TRI_microtime() + availableTime;
int totalGcTimeInMs = static_cast<int>(availableTime) * 1000;
int gcAttempts = totalGcTimeInMs / idleTimeInMs;
if (gcAttempts <= 0) {
// minimum is to run the GC once
gcAttempts = 1;
}
int gcTries = 0;
while (++gcTries <= gcAttempts) {
if (TRI_SingleRunGarbageCollectionV8(isolate, idleTimeInMs)) {
return;
}
}
size_t i = 0;
while (TRI_microtime() < until) {
if (++i % 1000 == 0) {
// garbage collection only every x iterations, otherwise we'll use too much CPU
if (++gcTries > gcAttempts ||
TRI_SingleRunGarbageCollectionV8(isolate, idleTimeInMs)) {
return;
}
}
usleep(100);
}
}
// -----------------------------------------------------------------------------
// --SECTION-- module initialisation
// -----------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////
/// @brief stores the V8 utils functions inside the global variable
////////////////////////////////////////////////////////////////////////////////
extern void TRI_InitV8Env (v8::Isolate* isolate,
v8::Handle<v8::Context> context,
string const& startupPath,
string const& modules);
void TRI_InitV8Utils (v8::Isolate* isolate,
v8::Handle<v8::Context> context,
string const& startupPath,
string const& modules) {
v8::HandleScope scope(isolate);
// check the isolate
TRI_v8_global_t* v8g = TRI_GetV8Globals(isolate);
TRI_ASSERT(v8g != nullptr);
v8::Handle<v8::FunctionTemplate> ft;
v8::Handle<v8::ObjectTemplate> rt;
// .............................................................................
// generate the general error template
// .............................................................................
ft = v8::FunctionTemplate::New(isolate, JS_ArangoError);
ft->SetClassName(TRI_V8_ASCII_STRING("ArangoError"));
// ArangoError is a "sub-class" of Error
v8::Handle<v8::Function> ArangoErrorFunc = ft->GetFunction();
v8::Handle<v8::Value> ErrorObject = context->Global()->Get(TRI_V8_ASCII_STRING("Error"));
v8::Handle<v8::Value> ErrorPrototype = ErrorObject->ToObject()->Get(TRI_V8_ASCII_STRING("prototype"));
ArangoErrorFunc->Get(TRI_V8_ASCII_STRING("prototype"))->ToObject()->SetPrototype(ErrorPrototype);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("ArangoError"), ArangoErrorFunc);
rt = ft->InstanceTemplate();
v8g->ArangoErrorTempl.Reset(isolate, rt);
// .............................................................................
// sleep and requeue a job
// .............................................................................
ft = v8::FunctionTemplate::New(isolate, JS_SleepAndRequeue);
ft->SetClassName(TRI_V8_ASCII_STRING("SleepAndRequeue"));
// SleepAndRequeue is a "sub-class" of Error
v8::Handle<v8::Function> SleepAndRequeueFunc = ft->GetFunction();
SleepAndRequeueFunc->Get(TRI_V8_ASCII_STRING("prototype"))->ToObject()->SetPrototype(ErrorPrototype);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SleepAndRequeue"), SleepAndRequeueFunc);
rt = ft->InstanceTemplate();
v8g->SleepAndRequeueTempl.Reset(isolate, rt);
v8g->SleepAndRequeueFuncTempl.Reset(isolate, ft);
// .............................................................................
// create the global functions
// .............................................................................
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_CHMOD"), JS_ChMod);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_EXISTS"), JS_Exists);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_FILESIZE"), JS_SizeFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_GET_TEMP_FILE"), JS_GetTempFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_GET_TEMP_PATH"), JS_GetTempPath);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_IS_DIRECTORY"), JS_IsDirectory);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_IS_FILE"), JS_IsFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_LIST"), JS_List);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_LIST_TREE"), JS_ListTree);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_MAKE_ABSOLUTE"), JS_MakeAbsolute);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_MAKE_DIRECTORY"), JS_MakeDirectory);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_MAKE_DIRECTORY_RECURSIVE"), JS_MakeDirectoryRecursive);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_MOVE"), JS_MoveFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_COPY_RECURSIVE"), JS_CopyRecursive);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_COPY_FILE"), JS_CopyFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_MTIME"), JS_MTime);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_REMOVE"), JS_Remove);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_REMOVE_DIRECTORY"), JS_RemoveDirectory);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_REMOVE_RECURSIVE_DIRECTORY"), JS_RemoveRecursiveDirectory);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_UNZIP_FILE"), JS_UnzipFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("FS_ZIP_FILE"), JS_ZipFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_BASE64DECODE"), JS_Base64Decode);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_BASE64ENCODE"), JS_Base64Encode);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_CHECK_AND_MARK_NONCE"), JS_MarkNonce);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_CLIENT_STATISTICS"), JS_ClientStatistics);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_CREATE_NONCE"), JS_CreateNonce);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DOWNLOAD"), JS_Download);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_EXECUTE"), JS_Execute);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_EXECUTE_EXTERNAL"), JS_ExecuteExternal);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_EXECUTE_EXTERNAL_AND_WAIT"), JS_ExecuteAndWaitExternal);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_GEN_RANDOM_ALPHA_NUMBERS"), JS_RandomAlphaNum);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_GEN_RANDOM_NUMBERS"), JS_RandomNumbers);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_GEN_RANDOM_SALT"), JS_RandomSalt);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_GETLINE"), JS_Getline);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_HMAC"), JS_HMAC);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_HTTP_STATISTICS"), JS_HttpStatistics);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_IS_IP"), JS_IsIP);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_KILL_EXTERNAL"), JS_KillExternal);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_LOAD"), JS_Load);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_LOG"), JS_Log);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_LOG_LEVEL"), JS_LogLevel);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_MD5"), JS_Md5);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_OPTIONS"), JS_Options);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_OUTPUT"), JS_Output);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_PARSE"), JS_Parse);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_PARSE_FILE"), JS_ParseFile);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_PBKDF2"), JS_PBKDF2);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_PROCESS_STATISTICS"), JS_ProcessStatistics);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_RAND"), JS_Rand);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_READ"), JS_Read);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_READ64"), JS_Read64);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_READ_BUFFER"), JS_ReadBuffer);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SAVE"), JS_Save);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SERVER_STATISTICS"), JS_ServerStatistics);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SHA1"), JS_Sha1);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SHA224"), JS_Sha224);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SHA256"), JS_Sha256);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SHA384"), JS_Sha384);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SHA512"), JS_Sha512);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SLEEP"), JS_Sleep);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_SPRINTF"), JS_SPrintF);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_STATUS_EXTERNAL"), JS_StatusExternal);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_TEST_PORT"), JS_TestPort);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_TIME"), JS_Time);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_WAIT"), JS_Wait);
// register callback functions
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("REGISTER_EXECUTE_FILE"), JS_RegisterExecuteFile);
// debugging functions
#ifdef TRI_ENABLE_FAILURE_TESTS
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DEBUG_SEGFAULT"), JS_DebugSegfault);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DEBUG_SET_FAILAT"), JS_DebugSetFailAt);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DEBUG_REMOVE_FAILAT"), JS_DebugRemoveFailAt);
#endif
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DEBUG_CLEAR_FAILAT"), JS_DebugClearFailAt);
TRI_AddGlobalFunctionVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_DEBUG_CAN_USE_FAILAT"), JS_DebugCanUseFailAt);
// .............................................................................
// create the global variables
// .............................................................................
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("HOME"), TRI_V8_STD_STRING(FileUtils::homeDirectory()));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("MODULES_PATH"), TRI_V8PathList(isolate, modules));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("STARTUP_PATH"), TRI_V8_STD_STRING(startupPath));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("PATH_SEPARATOR"), TRI_V8_ASCII_STRING(TRI_DIR_SEPARATOR_STR));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("VALGRIND"), RUNNING_ON_VALGRIND > 0 ? v8::True(isolate) : v8::False(isolate));
#ifdef COVERAGE
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("COVERAGE"), v8::True(isolate));
#else
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("COVERAGE"), v8::False(isolate));
#endif
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("VERSION"), TRI_V8_ASCII_STRING(TRI_VERSION));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("CONNECTION_TIME_DISTRIBUTION"), DistributionList(isolate, TRI_ConnectionTimeDistributionVectorStatistics));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("REQUEST_TIME_DISTRIBUTION"), DistributionList(isolate, TRI_RequestTimeDistributionVectorStatistics));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("BYTES_SENT_DISTRIBUTION"), DistributionList(isolate, TRI_BytesSentDistributionVectorStatistics));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("BYTES_RECEIVED_DISTRIBUTION"), DistributionList(isolate, TRI_BytesReceivedDistributionVectorStatistics));
TRI_AddGlobalVariableVocbase(isolate, context, TRI_V8_ASCII_STRING("SYS_PLATFORM"), TRI_V8_ASCII_STRING(TRI_PLATFORM));
TRI_InitV8Env(isolate, context, startupPath, modules);
}
// -----------------------------------------------------------------------------
// --SECTION-- END-OF-FILE
// -----------------------------------------------------------------------------
// Local Variables:
// mode: outline-minor
// outline-regexp: "/// @brief\\|/// {@inheritDoc}\\|/// @page\\|// --SECTION--\\|/// @\\}"
// End: