SharedKList KObject::GetList(const char* name, SharedKList defaultValue) { SharedValue prop = this->Get(name); if (prop->IsList()) { return prop->ToList(); } 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); } }
void KObject::GetStringList(const char *name, std::vector<std::string> &list) { SharedValue prop = this->Get(name); if(!prop->IsUndefined() && prop->IsList()) { SharedKList values = prop->ToList(); if (values->Size() > 0) { for (unsigned int c = 0; c < values->Size(); c++) { SharedValue v = values->At(c); if (v->IsString()) { const char *s = v->ToString(); list.push_back(s); } } } } }