SharedValue KObject::GetNS(const char *name) { std::string s(name); std::string::size_type last = 0; std::string::size_type pos = s.find_first_of("."); SharedValue current; KObject* scope = this; while (pos != std::string::npos) { std::string token = s.substr(last,pos-last); current = scope->Get(token.c_str()); if (current->IsObject()) { scope = current->ToObject().get(); } else { return Value::Undefined; } last = pos + 1; pos = s.find_first_of(".", last); } if (pos!=s.length()) { std::string token = s.substr(last); current = scope->Get(token.c_str()); } return current; }
SharedKObject KObject::GetObject(const char* name, SharedKObject defaultValue) { SharedValue prop = this->Get(name); if (prop->IsObject()) { return prop->ToObject(); } else { return defaultValue; } }
VALUE RubyUtils::ToRubyValue(SharedValue value) { if (value->IsNull() || value->IsUndefined()) { return Qnil; } if (value->IsBool()) { return value->ToBool() ? Qtrue : Qfalse; } else if (value->IsNumber()) { return rb_float_new(value->ToNumber()); } else if (value->IsString()) { return rb_str_new2(value->ToString()); } else if (value->IsObject()) { AutoPtr<KRubyObject> ro = value->ToObject().cast<KRubyObject>(); if (!ro.isNull()) return ro->ToRuby(); AutoPtr<KRubyHash> rh = value->ToObject().cast<KRubyHash>(); if (!rh.isNull()) return rh->ToRuby(); return RubyUtils::KObjectToRubyValue(value); } else if (value->IsMethod()) { AutoPtr<KRubyMethod> rm = value->ToMethod().cast<KRubyMethod>(); if (!rm.isNull()) return rm->ToRuby(); else return RubyUtils::KMethodToRubyValue(value); } else if (value->IsList()) { AutoPtr<KRubyList> rl = value->ToList().cast<KRubyList>(); if (!rl.isNull()) return rl->ToRuby(); else return RubyUtils::KListToRubyValue(value); } return Qnil; }
void KPHPArrayObject::AddKrollValueToPHPArray(SharedValue value, zval *phpArray) { if (value->IsNull() || value->IsUndefined()) { add_next_index_null(phpArray); } else if (value->IsBool()) { if (value->ToBool()) add_next_index_bool(phpArray, 1); else add_next_index_bool(phpArray, 0); } else if (value->IsNumber()) { /* No way to check whether the number is an integer or a double here. All Kroll numbers are doubles, so return a double. This could cause some PHP to function incorrectly if it's doing strict type checking. */ add_next_index_double(phpArray, value->ToNumber()); } else if (value->IsString()) { add_next_index_stringl(phpArray, (char *) value->ToString(), strlen(value->ToString()), 1); } else if (value->IsObject()) { /*TODO: Implement*/ } else if (value->IsMethod()) { /*TODO: Implement*/ } else if (value->IsList()) { zval *phpValue; AutoPtr<KPHPArrayObject> pl = value->ToList().cast<KPHPArrayObject>(); if (!pl.isNull()) phpValue = pl->ToPHP(); else phpValue = PHPUtils::ToPHPValue(value); add_next_index_zval(phpArray, phpValue); } }
HRESULT STDMETHODCALLTYPE ScriptEvaluator::matchesMimeType(BSTR mimeType, BOOL *result) { std::string moduleName = GetModuleName(BSTRToString(mimeType)); SharedKObject global = host->GetGlobalObject(); SharedValue moduleValue = global->Get(moduleName.c_str()); *result = FALSE; if (!moduleValue->IsNull() && moduleValue->IsObject()) { if (!moduleValue->ToObject()->Get("evaluate")->IsNull() && !moduleValue->ToObject()->Get("evaluate")->IsUndefined() && moduleValue->ToObject()->Get("evaluate")->IsMethod()) { *result = TRUE; } } return S_OK; }
void HTTPClientBinding::SendFile(const ValueList& args, SharedValue result) { if (this->Get("connected")->ToBool()) { throw ValueException::FromString("already connected"); } if (args.size()==1) { // can be a string of data or a file SharedValue v = args.at(0); if (v->IsObject()) { // probably a file SharedKObject obj = v->ToObject(); if (obj->Get("isFile")->IsMethod()) { std::string file = obj->Get("toString")->ToMethod()->Call()->ToString(); this->filestream = new Poco::FileInputStream(file); Poco::Path p(file); this->filename = p.getFileName(); } else { this->datastream = obj->Get("toString")->ToMethod()->Call()->ToString(); } } else if (v->IsString()) { this->filestream = new Poco::FileInputStream(v->ToString()); } else { throw ValueException::FromString("unknown data type"); } } this->thread = new Poco::Thread(); this->thread->start(&HTTPClientBinding::Run,(void*)this); if (!this->async) { PRINTD("Waiting on HTTP Client thread to finish"); this->thread->join(); } }
void HTTPClientBinding::Send(const ValueList& args, SharedValue result) { if (this->Get("connected")->ToBool()) { throw ValueException::FromString("already connected"); } if (args.size()==1) { // can be a string of data or a file SharedValue v = args.at(0); if (v->IsObject()) { // probably a file SharedKObject obj = v->ToObject(); this->datastream = obj->Get("toString")->ToMethod()->Call()->ToString(); } else if (v->IsString()) { this->datastream = v->ToString(); } else if (v->IsNull() || v->IsUndefined()) { this->datastream = ""; } else { throw ValueException::FromString("unknown data type"); } } this->thread = new Poco::Thread(); this->thread->start(&HTTPClientBinding::Run,(void*)this); if (!this->async) { PRINTD("Waiting on HTTP Client thread to finish (sync)"); Poco::Stopwatch sw; sw.start(); while (!this->shutdown && sw.elapsedSeconds() * 1000 < this->timeout) { this->thread->tryJoin(100); } PRINTD("HTTP Client thread finished (sync)"); } }