bindings/runtime_method.cpp

   1 /*
   2  * Copyright (C) 2003 Apple Computer, Inc.  All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
  14  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  16  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
  17  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  18  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  19  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  20  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
  21  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  23  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24  */
  25
  26 #include "config.h"
  27 #include "runtime_method.h"
  28
  29 #include "ExecState.h"
  30 #include "JSGlobalObject.h"
  31 #include "runtime_object.h"
  32 #include "function_object.h"
  33
  34 using namespace KJS::Bindings;
  35 using namespace KJS;
  36
  37 RuntimeMethod::RuntimeMethod(ExecState *exec, const Identifier &ident, Bindings::MethodList &m)
  38     : InternalFunctionImp(exec->lexicalGlobalObject()->functionPrototype(), ident)
  39     , _methodList(new MethodList(m))
  40 {
  41 }
  42
  43 JSValue *RuntimeMethod::lengthGetter(ExecState*, JSObject*, const Identifier&, const PropertySlot& slot)
  44 {
  45     RuntimeMethod *thisObj = static_cast<RuntimeMethod *>(slot.slotBase());
  46
  47     // Ick!  There may be more than one method with this name.  Arbitrarily
  48     // just pick the first method.  The fundamental problem here is that
  49     // JavaScript doesn't have the notion of method overloading and
  50     // Java does.
  51     // FIXME: a better solution might be to give the maximum number of parameters
  52     // of any method
  53     return jsNumber(thisObj->_methodList->at(0)->numParameters());
  54 }
  55
  56 bool RuntimeMethod::getOwnPropertySlot(ExecState* exec, const Identifier& propertyName, PropertySlot &slot)
  57 {
  58     if (propertyName == exec->propertyNames().length) {
  59         slot.setCustom(this, lengthGetter);
  60         return true;
  61     }
  62
  63     return InternalFunctionImp::getOwnPropertySlot(exec, propertyName, slot);
  64 }
  65
  66 JSValue *RuntimeMethod::callAsFunction(ExecState *exec, JSObject *thisObj, const List &args)
  67 {
  68     if (_methodList->isEmpty())
  69         return jsUndefined();
  70
  71     RuntimeObjectImp *imp = 0;
  72
  73     if (thisObj->classInfo() == &KJS::RuntimeObjectImp::info) {
  74         imp = static_cast<RuntimeObjectImp*>(thisObj);
  75     } else {
  76         // If thisObj is the DOM object for a plugin, get the corresponding
  77         // runtime object from the DOM object.
  78         JSValue* value = thisObj->get(exec, "__apple_runtime_object");
  79         if (value->isObject(&KJS::RuntimeObjectImp::info))
  80             imp = static_cast<RuntimeObjectImp*>(value);
  81     }
  82
  83     if (!imp)
  84         return throwError(exec, TypeError);
  85
  86     RefPtr<Instance> instance = imp->getInternalInstance();
  87     if (!instance)
  88         return RuntimeObjectImp::throwInvalidAccessError(exec);
  89
  90     instance->begin();
  91     JSValue *aValue = instance->invokeMethod(exec, *_methodList, args);
  92     instance->end();
  93     return aValue;
  94 }