0
0
mirror of https://github.com/mongodb/mongo.git synced 2024-11-30 09:06:21 +01:00
mongodb/scripting/v8_db.cpp

995 lines
37 KiB
C++

// v8_db.cpp
/* Copyright 2009 10gen Inc.
*
* 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.
*/
#include "v8_wrapper.h"
#include "v8_utils.h"
#include "engine_v8.h"
#include "v8_db.h"
#include "util/base64.h"
#include "util/text.h"
#include "../client/syncclusterconnection.h"
#include "../s/d_logic.h"
#include <iostream>
using namespace std;
using namespace v8;
namespace mongo {
#define DDD(x)
v8::Handle<v8::FunctionTemplate> getMongoFunctionTemplate( V8Scope* scope, bool local ) {
v8::Handle<v8::FunctionTemplate> mongo;
if ( local ) {
mongo = scope->createV8Function(mongoConsLocal);
}
else {
mongo = scope->createV8Function(mongoConsExternal);
}
mongo->InstanceTemplate()->SetInternalFieldCount( 1 );
v8::Handle<v8::Template> proto = mongo->PrototypeTemplate();
scope->injectV8Function("find", mongoFind, proto);
scope->injectV8Function("insert", mongoInsert, proto);
scope->injectV8Function("remove", mongoRemove, proto);
scope->injectV8Function("update", mongoUpdate, proto);
v8::Handle<FunctionTemplate> ic = scope->createV8Function(internalCursorCons);
ic->InstanceTemplate()->SetInternalFieldCount( 1 );
v8::Handle<v8::Template> icproto = ic->PrototypeTemplate();
scope->injectV8Function("next", internalCursorNext, icproto);
scope->injectV8Function("hasNext", internalCursorHasNext, icproto);
scope->injectV8Function("objsLeftInBatch", internalCursorObjsLeftInBatch, icproto);
proto->Set( scope->getV8Str( "internalCursor" ) , ic );
return mongo;
}
v8::Handle<v8::FunctionTemplate> getNumberLongFunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> numberLong = scope->createV8Function(numberLongInit);
v8::Local<v8::Template> proto = numberLong->PrototypeTemplate();
scope->injectV8Function("valueOf", numberLongValueOf, proto);
scope->injectV8Function("toNumber", numberLongToNumber, proto);
scope->injectV8Function("toString", numberLongToString, proto);
return numberLong;
}
v8::Handle<v8::FunctionTemplate> getBinDataFunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> binData = scope->createV8Function(binDataInit);
binData->InstanceTemplate()->SetInternalFieldCount(1);
v8::Local<v8::Template> proto = binData->PrototypeTemplate();
scope->injectV8Function("toString", binDataToString, proto);
scope->injectV8Function("base64", binDataToBase64, proto);
scope->injectV8Function("hex", binDataToHex, proto);
return binData;
}
v8::Handle<v8::FunctionTemplate> getUUIDFunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> templ = scope->createV8Function(uuidInit);
templ->InstanceTemplate()->SetInternalFieldCount(1);
v8::Local<v8::Template> proto = templ->PrototypeTemplate();
scope->injectV8Function("toString", binDataToString, proto);
scope->injectV8Function("base64", binDataToBase64, proto);
scope->injectV8Function("hex", binDataToHex, proto);
return templ;
}
v8::Handle<v8::FunctionTemplate> getMD5FunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> templ = scope->createV8Function(md5Init);
templ->InstanceTemplate()->SetInternalFieldCount(1);
v8::Local<v8::Template> proto = templ->PrototypeTemplate();
scope->injectV8Function("toString", binDataToString, proto);
scope->injectV8Function("base64", binDataToBase64, proto);
scope->injectV8Function("hex", binDataToHex, proto);
return templ;
}
v8::Handle<v8::FunctionTemplate> getHexDataFunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> templ = scope->createV8Function(hexDataInit);
templ->InstanceTemplate()->SetInternalFieldCount(1);
v8::Local<v8::Template> proto = templ->PrototypeTemplate();
scope->injectV8Function("toString", binDataToString, proto);
scope->injectV8Function("base64", binDataToBase64, proto);
scope->injectV8Function("hex", binDataToHex, proto);
return templ;
}
v8::Handle<v8::FunctionTemplate> getTimestampFunctionTemplate(V8Scope* scope) {
v8::Handle<v8::FunctionTemplate> ts = scope->createV8Function(dbTimestampInit);
v8::Local<v8::Template> proto = ts->PrototypeTemplate();
ts->InstanceTemplate()->SetInternalFieldCount( 1 );
return ts;
}
// void installDBTypes( V8Scope* scope, Handle<ObjectTemplate>& global ) {
// v8::Handle<v8::FunctionTemplate> db = scope->createV8Function(dbInit);
// db->InstanceTemplate()->SetNamedPropertyHandler( collectionFallback );
// global->Set(v8::String::New("DB") , db );
//
// v8::Handle<v8::FunctionTemplate> dbCollection = scope->createV8Function(collectionInit);
// dbCollection->InstanceTemplate()->SetNamedPropertyHandler( collectionFallback );
// global->Set(v8::String::New("DBCollection") , dbCollection );
//
//
// v8::Handle<v8::FunctionTemplate> dbQuery = scope->createV8Function(dbQueryInit);
// dbQuery->InstanceTemplate()->SetIndexedPropertyHandler( dbQueryIndexAccess );
// global->Set(v8::String::New("DBQuery") , dbQuery );
//
// global->Set( v8::String::New("ObjectId") , newV8Function< objectIdInit >(scope) );
//
// global->Set( v8::String::New("DBRef") , newV8Function< dbRefInit >(scope) );
//
// global->Set( v8::String::New("DBPointer") , newV8Function< dbPointerInit >(scope) );
//
// global->Set( v8::String::New("BinData") , getBinDataFunctionTemplate(scope) );
//
// global->Set( v8::String::New("NumberLong") , getNumberLongFunctionTemplate(scope) );
//
// global->Set( v8::String::New("Timestamp") , getTimestampFunctionTemplate(scope) );
// }
void installDBTypes( V8Scope* scope, v8::Handle<v8::Object>& global ) {
v8::Handle<v8::FunctionTemplate> db = scope->createV8Function(dbInit);
db->InstanceTemplate()->SetNamedPropertyHandler( collectionFallback );
global->Set(scope->getV8Str("DB") , db->GetFunction() );
v8::Handle<v8::FunctionTemplate> dbCollection = scope->createV8Function(collectionInit);
dbCollection->InstanceTemplate()->SetNamedPropertyHandler( collectionFallback );
global->Set(scope->getV8Str("DBCollection") , dbCollection->GetFunction() );
v8::Handle<v8::FunctionTemplate> dbQuery = scope->createV8Function(dbQueryInit);
dbQuery->InstanceTemplate()->SetIndexedPropertyHandler( dbQueryIndexAccess );
global->Set(scope->getV8Str("DBQuery") , dbQuery->GetFunction() );
scope->injectV8Function("ObjectId", objectIdInit, global);
scope->injectV8Function("DBRef", dbRefInit, global);
scope->injectV8Function("DBPointer", dbPointerInit, global);
global->Set( scope->getV8Str("BinData") , getBinDataFunctionTemplate(scope)->GetFunction() );
global->Set( scope->getV8Str("UUID") , getUUIDFunctionTemplate(scope)->GetFunction() );
global->Set( scope->getV8Str("MD5") , getMD5FunctionTemplate(scope)->GetFunction() );
global->Set( scope->getV8Str("HexData") , getHexDataFunctionTemplate(scope)->GetFunction() );
global->Set( scope->getV8Str("NumberLong") , getNumberLongFunctionTemplate(scope)->GetFunction() );
global->Set( scope->getV8Str("Timestamp") , getTimestampFunctionTemplate(scope)->GetFunction() );
BSONObjBuilder b;
b.appendMaxKey( "" );
b.appendMinKey( "" );
BSONObj o = b.obj();
BSONObjIterator i( o );
global->Set( scope->getV8Str("MaxKey"), scope->mongoToV8Element( i.next() ) );
global->Set( scope->getV8Str("MinKey"), scope->mongoToV8Element( i.next() ) );
global->Get( scope->getV8Str( "Object" ) )->ToObject()->Set( scope->getV8Str("bsonsize") , scope->createV8Function(bsonsize)->GetFunction() );
}
void destroyConnection( Persistent<Value> self, void* parameter) {
delete static_cast<DBClientBase*>(parameter);
self.Dispose();
self.Clear();
}
Handle<Value> mongoConsExternal(V8Scope* scope, const Arguments& args) {
char host[255];
if ( args.Length() > 0 && args[0]->IsString() ) {
assert( args[0]->ToString()->Utf8Length() < 250 );
args[0]->ToString()->WriteAscii( host );
}
else {
strcpy( host , "127.0.0.1" );
}
string errmsg;
ConnectionString cs = ConnectionString::parse( host , errmsg );
if ( ! cs.isValid() )
return v8::ThrowException( v8::String::New( errmsg.c_str() ) );
DBClientWithCommands * conn;
{
V8Unlock ul;
conn = cs.connect( errmsg );
}
if ( ! conn )
return v8::ThrowException( v8::String::New( errmsg.c_str() ) );
Persistent<v8::Object> self = Persistent<v8::Object>::New( args.Holder() );
self.MakeWeak( conn , destroyConnection );
{
V8Unlock ul;
ScriptEngine::runConnectCallback( *conn );
}
args.This()->SetInternalField( 0 , External::New( conn ) );
args.This()->Set( scope->getV8Str( "slaveOk" ) , Boolean::New( false ) );
args.This()->Set( scope->getV8Str( "host" ) , scope->getV8Str( host ) );
return v8::Undefined();
}
Handle<Value> mongoConsLocal(V8Scope* scope, const Arguments& args) {
if ( args.Length() > 0 )
return v8::ThrowException( v8::String::New( "local Mongo constructor takes no args" ) );
DBClientBase * conn;
{
V8Unlock ul;
conn = createDirectClient();
}
Persistent<v8::Object> self = Persistent<v8::Object>::New( args.This() );
self.MakeWeak( conn , destroyConnection );
// NOTE I don't believe the conn object will ever be freed.
args.This()->SetInternalField( 0 , External::New( conn ) );
args.This()->Set( scope->getV8Str( "slaveOk" ) , Boolean::New( false ) );
args.This()->Set( scope->getV8Str( "host" ) , scope->getV8Str( "EMBEDDED" ) );
return v8::Undefined();
}
// ---
#ifdef _WIN32
#define GETNS char * ns = new char[args[0]->ToString()->Utf8Length()]; args[0]->ToString()->WriteUtf8( ns );
#else
#define GETNS char ns[args[0]->ToString()->Utf8Length()]; args[0]->ToString()->WriteUtf8( ns );
#endif
DBClientBase * getConnection( const Arguments& args ) {
Local<External> c = External::Cast( *(args.This()->GetInternalField( 0 )) );
DBClientBase * conn = (DBClientBase*)(c->Value());
assert( conn );
return conn;
}
// ---- real methods
void destroyCursor( Persistent<Value> self, void* parameter) {
delete static_cast<mongo::DBClientCursor*>(parameter);
self.Dispose();
self.Clear();
}
/**
0 - namespace
1 - query
2 - fields
3 - limit
4 - skip
*/
Handle<Value> mongoFind(V8Scope* scope, const Arguments& args) {
HandleScope handle_scope;
jsassert( args.Length() == 7 , "find needs 7 args" );
jsassert( args[1]->IsObject() , "needs to be an object" );
DBClientBase * conn = getConnection( args );
GETNS;
BSONObj q = scope->v8ToMongo( args[1]->ToObject() );
DDD( "query:" << q );
BSONObj fields;
bool haveFields = args[2]->IsObject() && args[2]->ToObject()->GetPropertyNames()->Length() > 0;
if ( haveFields )
fields = scope->v8ToMongo( args[2]->ToObject() );
Local<v8::Object> mongo = args.This();
Local<v8::Value> slaveOkVal = mongo->Get( scope->getV8Str( "slaveOk" ) );
jsassert( slaveOkVal->IsBoolean(), "slaveOk member invalid" );
bool slaveOk = slaveOkVal->BooleanValue();
try {
auto_ptr<mongo::DBClientCursor> cursor;
int nToReturn = (int)(args[3]->ToNumber()->Value());
int nToSkip = (int)(args[4]->ToNumber()->Value());
int batchSize = (int)(args[5]->ToNumber()->Value());
int options = (int)(args[6]->ToNumber()->Value());
{
V8Unlock u;
cursor = conn->query( ns, q , nToReturn , nToSkip , haveFields ? &fields : 0, options | ( slaveOk ? QueryOption_SlaveOk : 0 ) , batchSize );
}
v8::Function * cons = (v8::Function*)( *( mongo->Get( scope->getV8Str( "internalCursor" ) ) ) );
assert( cons );
Persistent<v8::Object> c = Persistent<v8::Object>::New( cons->NewInstance() );
c.MakeWeak( cursor.get() , destroyCursor );
c->SetInternalField( 0 , External::New( cursor.release() ) );
return handle_scope.Close(c);
}
catch ( ... ) {
return v8::ThrowException( v8::String::New( "socket error on query" ) );
}
}
v8::Handle<v8::Value> mongoInsert(V8Scope* scope, const v8::Arguments& args) {
jsassert( args.Length() == 2 , "insert needs 2 args" );
jsassert( args[1]->IsObject() , "have to insert an object" );
if ( args.This()->Get( scope->getV8Str( "readOnly" ) )->BooleanValue() )
return v8::ThrowException( v8::String::New( "js db in read only mode" ) );
DBClientBase * conn = getConnection( args );
GETNS;
v8::Handle<v8::Object> in = args[1]->ToObject();
if ( ! in->Has( scope->getV8Str( "_id" ) ) ) {
v8::Handle<v8::Value> argv[1];
in->Set( scope->getV8Str( "_id" ) , scope->getObjectIdCons()->NewInstance( 0 , argv ) );
}
BSONObj o = scope->v8ToMongo( in );
DDD( "want to save : " << o.jsonString() );
try {
V8Unlock u;
conn->insert( ns , o );
}
catch ( ... ) {
return v8::ThrowException( v8::String::New( "socket error on insert" ) );
}
return v8::Undefined();
}
v8::Handle<v8::Value> mongoRemove(V8Scope* scope, const v8::Arguments& args) {
jsassert( args.Length() == 2 || args.Length() == 3 , "remove needs 2 args" );
jsassert( args[1]->IsObject() , "have to remove an object template" );
if ( args.This()->Get( scope->getV8Str( "readOnly" ) )->BooleanValue() )
return v8::ThrowException( v8::String::New( "js db in read only mode" ) );
DBClientBase * conn = getConnection( args );
GETNS;
v8::Handle<v8::Object> in = args[1]->ToObject();
BSONObj o = scope->v8ToMongo( in );
bool justOne = false;
if ( args.Length() > 2 ) {
justOne = args[2]->BooleanValue();
}
DDD( "want to remove : " << o.jsonString() );
try {
V8Unlock u;
conn->remove( ns , o , justOne );
}
catch ( ... ) {
return v8::ThrowException( v8::String::New( "socket error on remove" ) );
}
return v8::Undefined();
}
v8::Handle<v8::Value> mongoUpdate(V8Scope* scope, const v8::Arguments& args) {
jsassert( args.Length() >= 3 , "update needs at least 3 args" );
jsassert( args[1]->IsObject() , "1st param to update has to be an object" );
jsassert( args[2]->IsObject() , "2nd param to update has to be an object" );
if ( args.This()->Get( scope->getV8Str( "readOnly" ) )->BooleanValue() )
return v8::ThrowException( v8::String::New( "js db in read only mode" ) );
DBClientBase * conn = getConnection( args );
GETNS;
v8::Handle<v8::Object> q = args[1]->ToObject();
v8::Handle<v8::Object> o = args[2]->ToObject();
bool upsert = args.Length() > 3 && args[3]->IsBoolean() && args[3]->ToBoolean()->Value();
bool multi = args.Length() > 4 && args[4]->IsBoolean() && args[4]->ToBoolean()->Value();
try {
BSONObj q1 = scope->v8ToMongo( q );
BSONObj o1 = scope->v8ToMongo( o );
V8Unlock u;
conn->update( ns , q1 , o1 , upsert, multi );
}
catch ( ... ) {
return v8::ThrowException( v8::String::New( "socket error on remove" ) );
}
return v8::Undefined();
}
// --- cursor ---
mongo::DBClientCursor * getCursor( const Arguments& args ) {
Local<External> c = External::Cast( *(args.This()->GetInternalField( 0 ) ) );
mongo::DBClientCursor * cursor = (mongo::DBClientCursor*)(c->Value());
return cursor;
}
v8::Handle<v8::Value> internalCursorCons(V8Scope* scope, const v8::Arguments& args) {
return v8::Undefined();
}
v8::Handle<v8::Value> internalCursorNext(V8Scope* scope, const v8::Arguments& args) {
mongo::DBClientCursor * cursor = getCursor( args );
if ( ! cursor )
return v8::Undefined();
BSONObj o;
{
V8Unlock u;
o = cursor->next();
}
bool ro = false;
if (args.This()->Has(scope->V8STR_RO))
ro = args.This()->Get(scope->V8STR_RO)->BooleanValue();
return scope->mongoToLZV8( o, false, ro );
}
v8::Handle<v8::Value> internalCursorHasNext(V8Scope* scope, const v8::Arguments& args) {
mongo::DBClientCursor * cursor = getCursor( args );
if ( ! cursor )
return Boolean::New( false );
bool ret;
{
V8Unlock u;
ret = cursor->more();
}
return Boolean::New( ret );
}
v8::Handle<v8::Value> internalCursorObjsLeftInBatch(V8Scope* scope, const v8::Arguments& args) {
mongo::DBClientCursor * cursor = getCursor( args );
if ( ! cursor )
return v8::Number::New( (double) 0 );
int ret;
{
V8Unlock u;
ret = cursor->objsLeftInBatch();
}
return v8::Number::New( (double) ret );
}
// v8::Handle<v8::Value> internalCursorReadOnly(V8Scope* scope, const v8::Arguments& args) {
// Local<v8::Object> cursor = args.This();
// cursor->Set(scope->V8STR_RO, v8::Undefined());
// return cursor;
// }
// --- DB ----
v8::Handle<v8::Value> dbInit(V8Scope* scope, const v8::Arguments& args) {
assert( args.Length() == 2 );
args.This()->Set( scope->getV8Str( "_mongo" ) , args[0] );
args.This()->Set( scope->getV8Str( "_name" ) , args[1] );
for ( int i=0; i<args.Length(); i++ )
assert( ! args[i]->IsUndefined() );
return v8::Undefined();
}
v8::Handle<v8::Value> collectionInit( V8Scope* scope, const v8::Arguments& args ) {
assert( args.Length() == 4 );
args.This()->Set( scope->getV8Str( "_mongo" ) , args[0] );
args.This()->Set( scope->getV8Str( "_db" ) , args[1] );
args.This()->Set( scope->getV8Str( "_shortName" ) , args[2] );
args.This()->Set( scope->getV8Str( "_fullName" ) , args[3] );
if ( haveLocalShardingInfo( toSTLString( args[3] ) ) )
return v8::ThrowException( v8::String::New( "can't use sharded collection from db.eval" ) );
for ( int i=0; i<args.Length(); i++ )
assert( ! args[i]->IsUndefined() );
return v8::Undefined();
}
v8::Handle<v8::Value> dbQueryInit( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> t = args.This();
assert( args.Length() >= 4 );
t->Set( scope->getV8Str( "_mongo" ) , args[0] );
t->Set( scope->getV8Str( "_db" ) , args[1] );
t->Set( scope->getV8Str( "_collection" ) , args[2] );
t->Set( scope->getV8Str( "_ns" ) , args[3] );
if ( args.Length() > 4 && args[4]->IsObject() )
t->Set( scope->getV8Str( "_query" ) , args[4] );
else
t->Set( scope->getV8Str( "_query" ) , v8::Object::New() );
if ( args.Length() > 5 && args[5]->IsObject() )
t->Set( scope->getV8Str( "_fields" ) , args[5] );
else
t->Set( scope->getV8Str( "_fields" ) , v8::Null() );
if ( args.Length() > 6 && args[6]->IsNumber() )
t->Set( scope->getV8Str( "_limit" ) , args[6] );
else
t->Set( scope->getV8Str( "_limit" ) , Number::New( 0 ) );
if ( args.Length() > 7 && args[7]->IsNumber() )
t->Set( scope->getV8Str( "_skip" ) , args[7] );
else
t->Set( scope->getV8Str( "_skip" ) , Number::New( 0 ) );
if ( args.Length() > 8 && args[8]->IsNumber() )
t->Set( scope->getV8Str( "_batchSize" ) , args[8] );
else
t->Set( scope->getV8Str( "_batchSize" ) , Number::New( 0 ) );
if ( args.Length() > 9 && args[9]->IsNumber() )
t->Set( scope->getV8Str( "_options" ) , args[9] );
else
t->Set( scope->getV8Str( "_options" ) , Number::New( 0 ) );
t->Set( scope->getV8Str( "_cursor" ) , v8::Null() );
t->Set( scope->getV8Str( "_numReturned" ) , v8::Number::New(0) );
t->Set( scope->getV8Str( "_special" ) , Boolean::New(false) );
return v8::Undefined();
}
v8::Handle<v8::Value> collectionFallback( v8::Local<v8::String> name, const v8::AccessorInfo &info) {
DDD( "collectionFallback [" << name << "]" );
v8::Handle<v8::Value> real = info.This()->GetPrototype()->ToObject()->Get( name );
if ( ! real->IsUndefined() )
return real;
string sname = toSTLString( name );
if ( sname[0] == '_' ) {
if ( ! ( info.This()->HasRealNamedProperty( name ) ) )
return v8::Undefined();
return info.This()->GetRealNamedPropertyInPrototypeChain( name );
}
v8::Handle<v8::Value> getCollection = info.This()->GetPrototype()->ToObject()->Get( v8::String::New( "getCollection" ) );
assert( getCollection->IsFunction() );
v8::Function * f = (v8::Function*)(*getCollection);
v8::Handle<v8::Value> argv[1];
argv[0] = name;
return f->Call( info.This() , 1 , argv );
}
v8::Handle<v8::Value> dbQueryIndexAccess( unsigned int index , const v8::AccessorInfo& info ) {
v8::Handle<v8::Value> arrayAccess = info.This()->GetPrototype()->ToObject()->Get( v8::String::New( "arrayAccess" ) );
assert( arrayAccess->IsFunction() );
v8::Function * f = (v8::Function*)(*arrayAccess);
v8::Handle<v8::Value> argv[1];
argv[0] = v8::Number::New( index );
return f->Call( info.This() , 1 , argv );
}
v8::Handle<v8::Value> objectIdInit( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> it = args.This();
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function * f = scope->getObjectIdCons();
it = f->NewInstance();
}
OID oid;
if ( args.Length() == 0 ) {
oid.init();
}
else {
string s = toSTLString( args[0] );
try {
Scope::validateObjectIdString( s );
}
catch ( const MsgAssertionException &m ) {
string error = m.toString();
return v8::ThrowException( v8::String::New( error.c_str() ) );
}
oid.init( s );
}
it->Set( scope->getV8Str( "str" ) , v8::String::New( oid.str().c_str() ) );
return it;
}
v8::Handle<v8::Value> dbRefInit( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 2 && args.Length() != 0) {
return v8::ThrowException( v8::String::New( "DBRef needs 2 arguments" ) );
}
v8::Handle<v8::Object> it = args.This();
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function* f = scope->getNamedCons( "DBRef" );
it = f->NewInstance();
}
if ( args.Length() == 2 ) {
it->Set( scope->getV8Str( "$ref" ) , args[0] );
it->Set( scope->getV8Str( "$id" ) , args[1] );
}
return it;
}
v8::Handle<v8::Value> dbPointerInit( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 2) {
return v8::ThrowException( v8::String::New( "DBPointer needs 2 arguments" ) );
}
v8::Handle<v8::Object> it = args.This();
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function* f = scope->getNamedCons( "DBPointer" );
it = f->NewInstance();
}
it->Set( scope->getV8Str( "ns" ) , args[0] );
it->Set( scope->getV8Str( "id" ) , args[1] );
it->SetHiddenValue( scope->getV8Str( "__DBPointer" ), v8::Number::New( 1 ) );
return it;
}
v8::Handle<v8::Value> dbTimestampInit( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> it = args.This();
if ( args.Length() == 0 ) {
it->Set( scope->getV8Str( "t" ) , v8::Number::New( 0 ) );
it->Set( scope->getV8Str( "i" ) , v8::Number::New( 0 ) );
}
else if ( args.Length() == 2 ) {
it->Set( scope->getV8Str( "t" ) , args[0] );
it->Set( scope->getV8Str( "i" ) , args[1] );
}
else {
return v8::ThrowException( v8::String::New( "Timestamp needs 0 or 2 arguments" ) );
}
it->SetInternalField( 0, v8::Uint32::New( Timestamp ) );
return it;
}
v8::Handle<v8::Value> binDataInit( V8Scope* scope, const v8::Arguments& args ) {
v8::Local<v8::Object> it = args.This();
Handle<Value> type;
Handle<Value> len;
int rlen;
char* data;
if (args.Length() == 3) {
// 3 args: len, type, data
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function* f = scope->getNamedCons( "BinData" );
it = f->NewInstance();
}
len = args[0];
rlen = len->IntegerValue();
type = args[1];
v8::String::Utf8Value utf( args[ 2 ] );
char* tmp = *utf;
data = new char[rlen];
memcpy(data, tmp, rlen);
}
else if ( args.Length() == 2 ) {
// 2 args: type, base64 string
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function* f = scope->getNamedCons( "BinData" );
it = f->NewInstance();
}
type = args[0];
v8::String::Utf8Value utf( args[ 1 ] );
string decoded = base64::decode( *utf );
const char* tmp = decoded.data();
rlen = decoded.length();
data = new char[rlen];
memcpy(data, tmp, rlen);
len = v8::Number::New(rlen);
// it->Set( scope->getV8Str( "data" ), v8::String::New( decoded.data(), decoded.length() ) );
}
else {
return v8::ThrowException( v8::String::New( "BinData needs 2 or 3 arguments" ) );
}
it->Set( scope->getV8Str( "len" ) , len );
it->Set( scope->getV8Str( "type" ) , type );
it->SetHiddenValue( scope->V8STR_BINDATA, v8::Number::New( 1 ) );
Persistent<v8::Object> res = scope->wrapArrayObject(it, data);
return res;
}
v8::Handle<v8::Value> binDataToString( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> it = args.This();
int len = it->Get( scope->V8STR_LEN )->Int32Value();
int type = it->Get( scope->V8STR_TYPE )->Int32Value();
Local<External> c = External::Cast( *(it->GetInternalField( 0 )) );
char* data = (char*)(c->Value());
stringstream ss;
ss << "BinData(" << type << ",\"";
base64::encode( ss, data, len );
ss << "\")";
string ret = ss.str();
return v8::String::New( ret.c_str() );
}
v8::Handle<v8::Value> binDataToBase64( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> it = args.This();
int len = Handle<v8::Number>::Cast(it->Get(scope->V8STR_LEN))->Int32Value();
Local<External> c = External::Cast( *(it->GetInternalField( 0 )) );
char* data = (char*)(c->Value());
stringstream ss;
base64::encode( ss, (const char *)data, len );
return v8::String::New(ss.str().c_str());
}
v8::Handle<v8::Value> binDataToHex( V8Scope* scope, const v8::Arguments& args ) {
v8::Handle<v8::Object> it = args.This();
int len = Handle<v8::Number>::Cast(it->Get(scope->V8STR_LEN))->Int32Value();
Local<External> c = External::Cast( *(it->GetInternalField( 0 )) );
char* data = (char*)(c->Value());
stringstream ss;
ss << hex;
for( int i = 0; i < len; i++ ) {
unsigned v = (unsigned char) data[i];
ss << v;
}
return v8::String::New(ss.str().c_str());
}
static v8::Handle<v8::Value> hexToBinData( V8Scope* scope, v8::Local<v8::Object> it, int type, string hexstr ) {
int len = hexstr.length() / 2;
char* data = new char[len];
const char* src = hexstr.c_str();
for( int i = 0; i < 16; i++ ) {
data[i] = fromHex(src + i * 2);
}
it->Set( scope->V8STR_LEN , v8::Number::New(len) );
it->Set( scope->V8STR_TYPE , v8::Number::New(type) );
it->SetHiddenValue( scope->V8STR_BINDATA, v8::Number::New( 1 ) );
Persistent<v8::Object> res = scope->wrapArrayObject(it, data);
return res;
}
v8::Handle<v8::Value> uuidInit( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 1) {
return v8::ThrowException( v8::String::New( "UUIS needs 1 argument" ) );
}
v8::String::Utf8Value utf( args[ 0 ] );
if( utf.length() != 32 ) {
return v8::ThrowException( v8::String::New( "UUIS string must have 32 characters" ) );
}
return hexToBinData(scope, args.This(), bdtUUID, *utf);
}
// v8::Handle<v8::Value> uuidToString( V8Scope* scope, const v8::Arguments& args ) {
// v8::Handle<v8::Object> it = args.This();
// Local<External> c = External::Cast( *(it->GetInternalField( 0 )) );
// char* data = (char*)(c->Value());
//
// stringstream ss;
// ss << "UUID(\"" << toHex(data, 16) << "\")";
// return v8::String::New( ss.str().c_str() );
// }
v8::Handle<v8::Value> md5Init( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 1) {
return v8::ThrowException( v8::String::New( "MD5 needs 1 argument" ) );
}
v8::String::Utf8Value utf( args[ 0 ] );
if( utf.length() != 32 ) {
return v8::ThrowException( v8::String::New( "MD5 string must have 32 characters" ) );
}
return hexToBinData(scope, args.This(), MD5Type, *utf);
}
v8::Handle<v8::Value> hexDataInit( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 2) {
return v8::ThrowException( v8::String::New( "HexData needs 2 arguments" ) );
}
v8::String::Utf8Value utf( args[ 1 ] );
return hexToBinData(scope, args.This(), args[0]->IntegerValue(), *utf);
}
v8::Handle<v8::Value> numberLongInit( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 0 && args.Length() != 1 && args.Length() != 3) {
return v8::ThrowException( v8::String::New( "NumberLong needs 0, 1 or 3 arguments" ) );
}
v8::Handle<v8::Object> it = args.This();
if ( it->IsUndefined() || it == v8::Context::GetCurrent()->Global() ) {
v8::Function* f = scope->getNamedCons( "NumberLong" );
it = f->NewInstance();
}
if ( args.Length() == 0 ) {
it->Set( scope->getV8Str( "floatApprox" ), v8::Number::New( 0 ) );
}
else if ( args.Length() == 1 ) {
if ( args[ 0 ]->IsNumber() ) {
it->Set( scope->getV8Str( "floatApprox" ), args[ 0 ] );
}
else {
v8::String::Utf8Value data( args[ 0 ] );
string num = *data;
const char *numStr = num.c_str();
long long n;
try {
n = parseLL( numStr );
}
catch ( const AssertionException & ) {
return v8::ThrowException( v8::String::New( "could not convert string to long long" ) );
}
unsigned long long val = n;
if ( (long long)val == (long long)(double)(long long)(val) ) {
it->Set( scope->getV8Str( "floatApprox" ), v8::Number::New( (double)(long long)( val ) ) );
}
else {
it->Set( scope->getV8Str( "floatApprox" ), v8::Number::New( (double)(long long)( val ) ) );
it->Set( scope->getV8Str( "top" ), v8::Integer::New( val >> 32 ) );
it->Set( scope->getV8Str( "bottom" ), v8::Integer::New( (unsigned long)(val & 0x00000000ffffffff) ) );
}
}
}
else {
it->Set( scope->getV8Str( "floatApprox" ) , args[0] );
it->Set( scope->getV8Str( "top" ) , args[1] );
it->Set( scope->getV8Str( "bottom" ) , args[2] );
}
it->SetHiddenValue( scope->getV8Str( "__NumberLong" ), v8::Number::New( 1 ) );
return it;
}
long long numberLongVal( const v8::Handle< v8::Object > &it ) {
if ( !it->Has( v8::String::New( "top" ) ) )
return (long long)( it->Get( v8::String::New( "floatApprox" ) )->NumberValue() );
return
(long long)
( (unsigned long long)( it->Get( v8::String::New( "top" ) )->ToInt32()->Value() ) << 32 ) +
(unsigned)( it->Get( v8::String::New( "bottom" ) )->ToInt32()->Value() );
}
v8::Handle<v8::Value> numberLongValueOf( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 0) {
return v8::ThrowException( v8::String::New( "toNumber needs 0 arguments" ) );
}
v8::Handle<v8::Object> it = args.This();
long long val = numberLongVal( it );
return v8::Number::New( double( val ) );
}
v8::Handle<v8::Value> numberLongToNumber( V8Scope* scope, const v8::Arguments& args ) {
return numberLongValueOf( scope, args );
}
v8::Handle<v8::Value> numberLongToString( V8Scope* scope, const v8::Arguments& args ) {
if (args.Length() != 0) {
return v8::ThrowException( v8::String::New( "toString needs 0 arguments" ) );
}
v8::Handle<v8::Object> it = args.This();
stringstream ss;
long long val = numberLongVal( it );
const long long limit = 2LL << 30;
if ( val <= -limit || limit <= val )
ss << "NumberLong(\"" << val << "\")";
else
ss << "NumberLong(" << val << ")";
string ret = ss.str();
return v8::String::New( ret.c_str() );
}
v8::Handle<v8::Value> bsonsize( V8Scope* scope, const v8::Arguments& args ) {
if ( args.Length() != 1 )
return v8::ThrowException( v8::String::New( "bsonsize needs 1 argument" ) );
if ( args[0]->IsNull() )
return v8::Number::New(0);
if ( ! args[ 0 ]->IsObject() )
return v8::ThrowException( v8::String::New( "argument to bsonsize has to be an object" ) );
return v8::Number::New( scope->v8ToMongo( args[ 0 ]->ToObject() ).objsize() );
}
// to be called with v8 mutex
void enableV8Interrupt() {
if ( globalScriptEngine->haveGetInterruptSpecCallback() ) {
__interruptSpecToThreadId[ globalScriptEngine->getInterruptSpec() ] = v8::V8::GetCurrentThreadId();
}
}
// to be called with v8 mutex
void disableV8Interrupt() {
if ( globalScriptEngine->haveGetInterruptSpecCallback() ) {
__interruptSpecToThreadId.erase( globalScriptEngine->getInterruptSpec() );
}
}
namespace v8Locks {
boost::mutex& __v8Mutex = *( new boost::mutex );
ThreadLocalValue< bool > __locked;
RecursiveLock::RecursiveLock() : _unlock() {
if ( !__locked.get() ) {
__v8Mutex.lock();
__locked.set( true );
_unlock = true;
}
}
RecursiveLock::~RecursiveLock() {
if ( _unlock ) {
__v8Mutex.unlock();
__locked.set( false );
}
}
RecursiveUnlock::RecursiveUnlock() : _lock() {
if ( __locked.get() ) {
__v8Mutex.unlock();
__locked.set( false );
_lock = true;
}
}
RecursiveUnlock::~RecursiveUnlock() {
if ( _lock ) {
__v8Mutex.lock();
__locked.set( true );
}
}
} // namespace v8Locks
}