#include "config.h"
#include "error_object.h"
#include "JSGlobalObject.h"
#include "object.h"
#include "operations.h"
#include "types.h"
#include "value.h"
namespace KJS {
const ClassInfo ErrorInstance::info = { "Error", 0, 0 };
ErrorInstance::ErrorInstance(JSObject* prototype)
: JSObject(prototype)
{
}
ErrorPrototype::ErrorPrototype(ExecState* exec, ObjectPrototype* objectPrototype, FunctionPrototype* functionPrototype)
: ErrorInstance(objectPrototype)
{
putDirect(exec->propertyNames().name, jsString("Error"), DontEnum);
putDirect(exec->propertyNames().message, jsString("Unknown error"), DontEnum);
putDirectFunction(new PrototypeFunction(exec, functionPrototype, 0, exec->propertyNames().toString, errorProtoFuncToString), DontEnum);
}
JSValue* errorProtoFuncToString(ExecState* exec, JSObject* thisObj, const List&)
{
UString s = "Error";
JSValue* v = thisObj->get(exec, exec->propertyNames().name);
if (!v->isUndefined())
s = v->toString(exec);
v = thisObj->get(exec, exec->propertyNames().message);
if (!v->isUndefined())
s += ": " + v->toString(exec);
return jsString(s);
}
ErrorObjectImp::ErrorObjectImp(ExecState* exec, FunctionPrototype* funcProto, ErrorPrototype* errorProto)
: InternalFunctionImp(funcProto, errorProto->classInfo()->className)
{
putDirect(exec->propertyNames().prototype, errorProto, DontEnum|DontDelete|ReadOnly);
putDirect(exec->propertyNames().length, jsNumber(1), DontDelete|ReadOnly|DontEnum);
}
bool ErrorObjectImp::implementsConstruct() const
{
return true;
}
JSObject* ErrorObjectImp::construct(ExecState* exec, const List& args)
{
JSObject* proto = static_cast<JSObject*>(exec->lexicalGlobalObject()->errorPrototype());
JSObject* imp = new ErrorInstance(proto);
JSObject* obj(imp);
if (!args[0]->isUndefined())
imp->putDirect(exec->propertyNames().message, jsString(args[0]->toString(exec)));
return obj;
}
JSValue* ErrorObjectImp::callAsFunction(ExecState* exec, JSObject* , const List& args)
{
return construct(exec, args);
}
NativeErrorPrototype::NativeErrorPrototype(ExecState* exec, ErrorPrototype* errorProto, const UString& name, const UString& message)
: JSObject(errorProto)
{
putDirect(exec->propertyNames().name, jsString(name), 0);
putDirect(exec->propertyNames().message, jsString(message), 0);
}
const ClassInfo NativeErrorImp::info = { "Function", &InternalFunctionImp::info, 0 };
NativeErrorImp::NativeErrorImp(ExecState* exec, FunctionPrototype* funcProto, NativeErrorPrototype* prot)
: InternalFunctionImp(funcProto, Identifier(prot->getDirect(exec->propertyNames().name)->getString()))
, proto(prot)
{
putDirect(exec->propertyNames().length, jsNumber(1), DontDelete|ReadOnly|DontEnum); putDirect(exec->propertyNames().prototype, proto, DontDelete|ReadOnly|DontEnum);
}
bool NativeErrorImp::implementsConstruct() const
{
return true;
}
JSObject* NativeErrorImp::construct(ExecState* exec, const List& args)
{
JSObject* imp = new ErrorInstance(proto);
JSObject* obj(imp);
if (!args[0]->isUndefined())
imp->putDirect(exec->propertyNames().message, jsString(args[0]->toString(exec)));
return obj;
}
JSValue* NativeErrorImp::callAsFunction(ExecState* exec, JSObject*, const List& args)
{
return construct(exec, args);
}
void NativeErrorImp::mark()
{
JSObject::mark();
if (proto && !proto->marked())
proto->mark();
}
}