1 /* 2 * Copyright (C) 1999-2002 Harri Porten (porten (at) kde.org) 3 * Copyright (C) 2001 Peter Kelly (pmk (at) post.com) 4 * Copyright (C) 2004, 2007, 2008 Apple Inc. All rights reserved. 5 * 6 * This library is free software; you can redistribute it and/or 7 * modify it under the terms of the GNU Library General Public 8 * License as published by the Free Software Foundation; either 9 * version 2 of the License, or (at your option) any later version. 10 * 11 * This library is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14 * Library General Public License for more details. 15 * 16 * You should have received a copy of the GNU Library General Public License 17 * along with this library; see the file COPYING.LIB. If not, write to 18 * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 19 * Boston, MA 02110-1301, USA. 20 * 21 */ 22 23 #include "config.h" 24 #include "InternalFunction.h" 25 26 #include "FunctionPrototype.h" 27 #include "JSGlobalObject.h" 28 #include "JSString.h" 29 30 namespace JSC { 31 32 // Ensure the compiler generates a vtable for InternalFunction! 33 void InternalFunction::vtableAnchor() {} 34 35 ASSERT_CLASS_FITS_IN_CELL(InternalFunction); 36 37 const ClassInfo InternalFunction::s_info = { "Function", &JSObjectWithGlobalObject::s_info, 0, 0 }; 38 39 InternalFunction::InternalFunction(VPtrStealingHackType) 40 : JSObjectWithGlobalObject(VPtrStealingHack) 41 { 42 } 43 44 InternalFunction::InternalFunction(JSGlobalData* globalData, JSGlobalObject* globalObject, Structure* structure, const Identifier& name) 45 : JSObjectWithGlobalObject(globalObject, structure) 46 { 47 ASSERT(inherits(&s_info)); 48 putDirect(*globalData, globalData->propertyNames->name, jsString(globalData, name.isNull() ? "" : name.ustring()), DontDelete | ReadOnly | DontEnum); 49 } 50 51 const UString& InternalFunction::name(ExecState* exec) 52 { 53 return asString(getDirect(exec->globalData(), exec->globalData().propertyNames->name))->tryGetValue(); 54 } 55 56 const UString InternalFunction::displayName(ExecState* exec) 57 { 58 JSValue displayName = getDirect(exec->globalData(), exec->globalData().propertyNames->displayName); 59 60 if (displayName && isJSString(&exec->globalData(), displayName)) 61 return asString(displayName)->tryGetValue(); 62 63 return UString(); 64 } 65 66 const UString InternalFunction::calculatedDisplayName(ExecState* exec) 67 { 68 const UString explicitName = displayName(exec); 69 70 if (!explicitName.isEmpty()) 71 return explicitName; 72 73 return name(exec); 74 } 75 76 } // namespace JSC 77
