From ce4a32fe52ef09d8f5ff1dd22c001110902b60a2 Mon Sep 17 00:00:00 2001 From: toma Date: Wed, 25 Nov 2009 17:56:58 +0000 Subject: Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features. BUG:215923 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdelibs@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da --- kjs/error_object.cpp | 192 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 192 insertions(+) create mode 100644 kjs/error_object.cpp (limited to 'kjs/error_object.cpp') diff --git a/kjs/error_object.cpp b/kjs/error_object.cpp new file mode 100644 index 000000000..1b2451489 --- /dev/null +++ b/kjs/error_object.cpp @@ -0,0 +1,192 @@ +// -*- c-basic-offset: 2 -*- +/* + * This file is part of the KDE libraries + * Copyright (C) 1999-2000 Harri Porten (porten@kde.org) + * Copyright (C) 2003 Apple Computer, Inc. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + * + */ + +#include "value.h" +#include "object.h" +#include "types.h" +#include "interpreter.h" +#include "operations.h" +#include "error_object.h" +//#include "debugger.h" + +using namespace KJS; + +// ------------------------------ ErrorInstanceImp ---------------------------- + +const ClassInfo ErrorInstanceImp::info = {"Error", 0, 0, 0}; + +ErrorInstanceImp::ErrorInstanceImp(ObjectImp *proto) + : ObjectImp(proto) +{ +} + +// ------------------------------ ErrorPrototypeImp ---------------------------- + +// ECMA 15.9.4 +ErrorPrototypeImp::ErrorPrototypeImp(ExecState *exec, + ObjectPrototypeImp *objectProto, + FunctionPrototypeImp *funcProto) + : ObjectImp(objectProto) +{ + Value protect(this); + setInternalValue(Undefined()); + // The constructor will be added later in ErrorObjectImp's constructor + + put(exec, namePropertyName, String("Error"), DontEnum); + put(exec, messagePropertyName, String("Unknown error"), DontEnum); + putDirect(toStringPropertyName, new ErrorProtoFuncImp(exec,funcProto), DontEnum); +} + +// ------------------------------ ErrorProtoFuncImp ---------------------------- + +ErrorProtoFuncImp::ErrorProtoFuncImp(ExecState * /*exec*/, FunctionPrototypeImp *funcProto) + : InternalFunctionImp(funcProto) +{ + Value protect(this); + putDirect(lengthPropertyName, NumberImp::zero(), DontDelete|ReadOnly|DontEnum); + ident = "toString"; +} + +bool ErrorProtoFuncImp::implementsCall() const +{ + return true; +} + +Value ErrorProtoFuncImp::call(ExecState *exec, Object &thisObj, const List &/*args*/) +{ + // toString() + UString s = "Error"; + + Value v = thisObj.get(exec, namePropertyName); + if (v.type() != UndefinedType) { + s = v.toString(exec); + } + + v = thisObj.get(exec, messagePropertyName); + if (v.type() != UndefinedType) { + s += ": " + v.toString(exec); // Mozilla compatible format + } + + return String(s); +} + +// ------------------------------ ErrorObjectImp ------------------------------- + +ErrorObjectImp::ErrorObjectImp(ExecState * /*exec*/, FunctionPrototypeImp *funcProto, + ErrorPrototypeImp *errorProto) + : InternalFunctionImp(funcProto) +{ + Value protect(this); + // ECMA 15.11.3.1 Error.prototype + putDirect(prototypePropertyName, errorProto, DontEnum|DontDelete|ReadOnly); + putDirect(lengthPropertyName, NumberImp::one(), DontDelete|ReadOnly|DontEnum); + //putDirect(namePropertyName, String(n)); +} + +bool ErrorObjectImp::implementsConstruct() const +{ + return true; +} + +// ECMA 15.9.3 +Object ErrorObjectImp::construct(ExecState *exec, const List &args) +{ + Object proto = Object::dynamicCast(exec->lexicalInterpreter()->builtinErrorPrototype()); + ObjectImp *imp = new ErrorInstanceImp(proto.imp()); + Object obj(imp); + + if (!args.isEmpty() && args[0].type() != UndefinedType) { + imp->putDirect(messagePropertyName, new StringImp(args[0].toString(exec))); + } + + return obj; +} + +bool ErrorObjectImp::implementsCall() const +{ + return true; +} + +// ECMA 15.9.2 +Value ErrorObjectImp::call(ExecState *exec, Object &/*thisObj*/, const List &args) +{ + // "Error()" gives the sames result as "new Error()" + return construct(exec,args); +} + +// ------------------------------ NativeErrorPrototypeImp ---------------------- + +NativeErrorPrototypeImp::NativeErrorPrototypeImp(ExecState * /*exec*/, ErrorPrototypeImp *errorProto, + ErrorType et, UString name, UString message) + : ObjectImp(errorProto) +{ + Value protect(this); + errType = et; + putDirect(namePropertyName, new StringImp(name), 0); + putDirect(messagePropertyName, new StringImp(message), 0); +} + +// ------------------------------ NativeErrorImp ------------------------------- + +const ClassInfo NativeErrorImp::info = {"Function", &InternalFunctionImp::info, 0, 0}; + +NativeErrorImp::NativeErrorImp(ExecState * /*exec*/, FunctionPrototypeImp *funcProto, + const Object &prot) + : InternalFunctionImp(funcProto), proto(0) +{ + Value protect(this); + proto = static_cast(prot.imp()); + + putDirect(lengthPropertyName, NumberImp::one(), DontDelete|ReadOnly|DontEnum); // ECMA 15.11.7.5 + putDirect(prototypePropertyName, proto, DontDelete|ReadOnly|DontEnum); +} + +bool NativeErrorImp::implementsConstruct() const +{ + return true; +} + +Object NativeErrorImp::construct(ExecState *exec, const List &args) +{ + ObjectImp *imp = new ErrorInstanceImp(proto); + Object obj(imp); + if (args[0].type() != UndefinedType) + imp->putDirect(messagePropertyName, new StringImp(args[0].toString(exec))); + return obj; +} + +bool NativeErrorImp::implementsCall() const +{ + return true; +} + +Value NativeErrorImp::call(ExecState *exec, Object &/*thisObj*/, const List &args) +{ + return construct(exec,args); +} + +void NativeErrorImp::mark() +{ + ObjectImp::mark(); + if (proto && !proto->marked()) + proto->mark(); +} -- cgit v1.2.1