2009-06-10 18:29:44 -07:00
|
|
|
/* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
|
2009-02-11 19:48:00 -08:00
|
|
|
* vim: set ts=8 sw=4 et tw=79:
|
2007-03-22 10:30:00 -07:00
|
|
|
*
|
|
|
|
* ***** BEGIN LICENSE BLOCK *****
|
|
|
|
* Version: MPL 1.1/GPL 2.0/LGPL 2.1
|
|
|
|
*
|
|
|
|
* The contents of this file are subject to the Mozilla Public License Version
|
|
|
|
* 1.1 (the "License"); you may not use this file except in compliance with
|
|
|
|
* the License. You may obtain a copy of the License at
|
|
|
|
* http://www.mozilla.org/MPL/
|
|
|
|
*
|
|
|
|
* Software distributed under the License is distributed on an "AS IS" basis,
|
|
|
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
|
|
|
* for the specific language governing rights and limitations under the
|
|
|
|
* License.
|
|
|
|
*
|
|
|
|
* The Original Code is Mozilla Communicator client code, released
|
|
|
|
* March 31, 1998.
|
|
|
|
*
|
|
|
|
* The Initial Developer of the Original Code is
|
|
|
|
* Netscape Communications Corporation.
|
|
|
|
* Portions created by the Initial Developer are Copyright (C) 1998
|
|
|
|
* the Initial Developer. All Rights Reserved.
|
|
|
|
*
|
|
|
|
* Contributor(s):
|
|
|
|
*
|
|
|
|
* Alternatively, the contents of this file may be used under the terms of
|
|
|
|
* either of the GNU General Public License Version 2 or later (the "GPL"),
|
|
|
|
* or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
|
|
|
|
* in which case the provisions of the GPL or the LGPL are applicable instead
|
|
|
|
* of those above. If you wish to allow use of your version of this file only
|
|
|
|
* under the terms of either the GPL or the LGPL, and not to allow others to
|
|
|
|
* use your version of this file under the terms of the MPL, indicate your
|
|
|
|
* decision by deleting the provisions above and replace them with the notice
|
|
|
|
* and other provisions required by the GPL or the LGPL. If you do not delete
|
|
|
|
* the provisions above, a recipient may use your version of this file under
|
|
|
|
* the terms of any one of the MPL, the GPL or the LGPL.
|
|
|
|
*
|
|
|
|
* ***** END LICENSE BLOCK ***** */
|
|
|
|
|
|
|
|
/*
|
|
|
|
* JS object implementation.
|
|
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include "jstypes.h"
|
2009-03-18 11:38:16 -07:00
|
|
|
#include "jsstdint.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
#include "jsarena.h" /* Added by JSIFY */
|
|
|
|
#include "jsbit.h"
|
|
|
|
#include "jsutil.h" /* Added by JSIFY */
|
|
|
|
#include "jshash.h" /* Added by JSIFY */
|
|
|
|
#include "jsdhash.h"
|
|
|
|
#include "jsprf.h"
|
|
|
|
#include "jsapi.h"
|
|
|
|
#include "jsarray.h"
|
|
|
|
#include "jsatom.h"
|
|
|
|
#include "jsbool.h"
|
2008-10-08 15:08:33 -07:00
|
|
|
#include "jsbuiltins.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
#include "jscntxt.h"
|
2008-09-05 10:19:17 -07:00
|
|
|
#include "jsversion.h"
|
2007-11-29 06:49:42 -08:00
|
|
|
#include "jsemit.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
#include "jsfun.h"
|
|
|
|
#include "jsgc.h"
|
|
|
|
#include "jsinterp.h"
|
|
|
|
#include "jslock.h"
|
|
|
|
#include "jsnum.h"
|
|
|
|
#include "jsobj.h"
|
|
|
|
#include "jsopcode.h"
|
2007-11-29 06:49:42 -08:00
|
|
|
#include "jsparse.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
#include "jsscope.h"
|
|
|
|
#include "jsscript.h"
|
2009-09-10 10:23:52 -07:00
|
|
|
#include "jsscriptinlines.h"
|
2009-01-30 15:40:05 -08:00
|
|
|
#include "jsstaticcheck.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
#include "jsstr.h"
|
2009-01-30 15:40:05 -08:00
|
|
|
#include "jstracer.h"
|
2009-02-18 16:31:09 -08:00
|
|
|
#include "jsdbgapi.h"
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
#if JS_HAS_GENERATORS
|
|
|
|
#include "jsiter.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#if JS_HAS_XML_SUPPORT
|
|
|
|
#include "jsxml.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#if JS_HAS_XDR
|
|
|
|
#include "jsxdrapi.h"
|
|
|
|
#endif
|
|
|
|
|
2007-10-19 15:24:32 -07:00
|
|
|
#ifdef INCLUDE_MOZILLA_DTRACE
|
|
|
|
#include "jsdtracef.h"
|
|
|
|
#endif
|
|
|
|
|
2009-07-13 14:55:04 -07:00
|
|
|
#include "jsatominlines.h"
|
2009-09-10 09:50:43 -07:00
|
|
|
#include "jsscriptinlines.h"
|
2009-07-13 14:55:04 -07:00
|
|
|
|
2008-06-20 02:55:49 -07:00
|
|
|
#include "jsautooplen.h"
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
#ifdef JS_THREADSAFE
|
|
|
|
#define NATIVE_DROP_PROPERTY js_DropProperty
|
|
|
|
|
|
|
|
extern void
|
|
|
|
js_DropProperty(JSContext *cx, JSObject *obj, JSProperty *prop);
|
|
|
|
#else
|
|
|
|
#define NATIVE_DROP_PROPERTY NULL
|
|
|
|
#endif
|
|
|
|
|
|
|
|
JS_FRIEND_DATA(JSObjectOps) js_ObjectOps = {
|
2009-05-14 03:35:23 -07:00
|
|
|
NULL,
|
2007-03-22 10:30:00 -07:00
|
|
|
js_LookupProperty, js_DefineProperty,
|
|
|
|
js_GetProperty, js_SetProperty,
|
|
|
|
js_GetAttributes, js_SetAttributes,
|
|
|
|
js_DeleteProperty, js_DefaultValue,
|
|
|
|
js_Enumerate, js_CheckAccess,
|
|
|
|
NULL, NATIVE_DROP_PROPERTY,
|
|
|
|
js_Call, js_Construct,
|
2009-04-01 05:32:51 -07:00
|
|
|
js_HasInstance, js_TraceObject,
|
2009-08-27 22:53:26 -07:00
|
|
|
js_Clear
|
2007-03-22 10:30:00 -07:00
|
|
|
};
|
|
|
|
|
|
|
|
JSClass js_ObjectClass = {
|
|
|
|
js_Object_str,
|
2007-12-20 15:29:31 -08:00
|
|
|
JSCLASS_HAS_CACHED_PROTO(JSProto_Object),
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_PropertyStub, JS_PropertyStub, JS_PropertyStub, JS_PropertyStub,
|
2009-07-22 09:23:21 -07:00
|
|
|
JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, NULL,
|
2007-03-22 10:30:00 -07:00
|
|
|
JSCLASS_NO_OPTIONAL_MEMBERS
|
|
|
|
};
|
|
|
|
|
|
|
|
#if JS_HAS_OBJ_PROTO_PROP
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_getSlot(JSContext *cx, JSObject *obj, jsval id, jsval *vp);
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_setSlot(JSContext *cx, JSObject *obj, jsval id, jsval *vp);
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_getCount(JSContext *cx, JSObject *obj, jsval id, jsval *vp);
|
|
|
|
|
|
|
|
static JSPropertySpec object_props[] = {
|
|
|
|
/* These two must come first; see object_props[slot].name usage below. */
|
|
|
|
{js_proto_str, JSSLOT_PROTO, JSPROP_PERMANENT|JSPROP_SHARED,
|
|
|
|
obj_getSlot, obj_setSlot},
|
|
|
|
{js_parent_str,JSSLOT_PARENT,JSPROP_READONLY|JSPROP_PERMANENT|JSPROP_SHARED,
|
|
|
|
obj_getSlot, obj_setSlot},
|
2008-08-28 16:37:03 -07:00
|
|
|
{js_count_str, 0, JSPROP_READONLY|JSPROP_PERMANENT|JSPROP_SHARED,
|
|
|
|
obj_getCount, NULL},
|
2007-03-22 10:30:00 -07:00
|
|
|
{0,0,0,0,0}
|
|
|
|
};
|
|
|
|
|
|
|
|
/* NB: JSSLOT_PROTO and JSSLOT_PARENT are already indexes into object_props. */
|
|
|
|
#define JSSLOT_COUNT 2
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
ReportStrictSlot(JSContext *cx, uint32 slot)
|
|
|
|
{
|
|
|
|
if (slot == JSSLOT_PROTO)
|
|
|
|
return JS_TRUE;
|
|
|
|
return JS_ReportErrorFlagsAndNumber(cx,
|
|
|
|
JSREPORT_WARNING | JSREPORT_STRICT,
|
|
|
|
js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_DEPRECATED_USAGE,
|
|
|
|
object_props[slot].name);
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_getSlot(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
uint32 slot;
|
|
|
|
jsid propid;
|
|
|
|
JSAccessMode mode;
|
|
|
|
uintN attrs;
|
|
|
|
JSObject *pobj;
|
|
|
|
JSClass *clasp;
|
|
|
|
|
|
|
|
slot = (uint32) JSVAL_TO_INT(id);
|
|
|
|
if (id == INT_TO_JSVAL(JSSLOT_PROTO)) {
|
|
|
|
propid = ATOM_TO_JSID(cx->runtime->atomState.protoAtom);
|
|
|
|
mode = JSACC_PROTO;
|
|
|
|
} else {
|
|
|
|
propid = ATOM_TO_JSID(cx->runtime->atomState.parentAtom);
|
|
|
|
mode = JSACC_PARENT;
|
|
|
|
}
|
|
|
|
|
2009-08-11 13:05:44 -07:00
|
|
|
/* Let obj->checkAccess get the slot's value, based on the access mode. */
|
|
|
|
if (!obj->checkAccess(cx, propid, mode, vp, &attrs))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
pobj = JSVAL_TO_OBJECT(*vp);
|
|
|
|
if (pobj) {
|
|
|
|
clasp = OBJ_GET_CLASS(cx, pobj);
|
|
|
|
if (clasp == &js_CallClass || clasp == &js_BlockClass) {
|
|
|
|
/* Censor activations and lexical scopes per ECMA-262. */
|
|
|
|
*vp = JSVAL_NULL;
|
2009-04-18 11:10:59 -07:00
|
|
|
} else {
|
|
|
|
/*
|
|
|
|
* DeclEnv only exists as a parent for a Call object which we
|
|
|
|
* censor. So it cannot escape to scripts.
|
|
|
|
*/
|
|
|
|
JS_ASSERT(clasp != &js_DeclEnvClass);
|
|
|
|
if (pobj->map->ops->thisObject) {
|
|
|
|
pobj = pobj->map->ops->thisObject(cx, pobj);
|
|
|
|
if (!pobj)
|
|
|
|
return JS_FALSE;
|
|
|
|
*vp = OBJECT_TO_JSVAL(pobj);
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_setSlot(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *pobj;
|
|
|
|
uint32 slot;
|
|
|
|
jsid propid;
|
|
|
|
uintN attrs;
|
|
|
|
|
|
|
|
if (!JSVAL_IS_OBJECT(*vp))
|
|
|
|
return JS_TRUE;
|
|
|
|
pobj = JSVAL_TO_OBJECT(*vp);
|
|
|
|
|
|
|
|
if (pobj) {
|
|
|
|
/*
|
|
|
|
* Innerize pobj here to avoid sticking unwanted properties on the
|
|
|
|
* outer object. This ensures that any with statements only grant
|
|
|
|
* access to the inner object.
|
|
|
|
*/
|
|
|
|
OBJ_TO_INNER_OBJECT(cx, pobj);
|
|
|
|
if (!pobj)
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
slot = (uint32) JSVAL_TO_INT(id);
|
|
|
|
if (JS_HAS_STRICT_OPTION(cx) && !ReportStrictSlot(cx, slot))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
/* __parent__ is readonly and permanent, only __proto__ may be set. */
|
|
|
|
propid = ATOM_TO_JSID(cx->runtime->atomState.protoAtom);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->checkAccess(cx, propid, (JSAccessMode)(JSACC_PROTO|JSACC_WRITE), vp, &attrs))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
2009-05-01 13:48:27 -07:00
|
|
|
return js_SetProtoOrParent(cx, obj, slot, pobj, JS_TRUE);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_getCount(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
jsval iter_state;
|
|
|
|
jsid num_properties;
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
if (JS_HAS_STRICT_OPTION(cx) && !ReportStrictSlot(cx, JSSLOT_COUNT))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
/* Get the number of properties to enumerate. */
|
|
|
|
iter_state = JSVAL_NULL;
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->enumerate(cx, JSENUMERATE_INIT, &iter_state, &num_properties);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
if (!JSVAL_IS_INT(num_properties)) {
|
|
|
|
JS_ASSERT(0);
|
|
|
|
*vp = JSVAL_ZERO;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
*vp = num_properties;
|
|
|
|
|
|
|
|
out:
|
|
|
|
if (iter_state != JSVAL_NULL)
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->enumerate(cx, JSENUMERATE_DESTROY, &iter_state, 0);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
#else /* !JS_HAS_OBJ_PROTO_PROP */
|
|
|
|
|
|
|
|
#define object_props NULL
|
|
|
|
|
|
|
|
#endif /* !JS_HAS_OBJ_PROTO_PROP */
|
|
|
|
|
|
|
|
JSBool
|
2009-05-01 13:48:27 -07:00
|
|
|
js_SetProtoOrParent(JSContext *cx, JSObject *obj, uint32 slot, JSObject *pobj,
|
|
|
|
JSBool checkForCycles)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-05-01 13:48:27 -07:00
|
|
|
JS_ASSERT(slot == JSSLOT_PARENT || slot == JSSLOT_PROTO);
|
2009-05-02 11:49:45 -07:00
|
|
|
JS_ASSERT_IF(!checkForCycles, obj != pobj);
|
2009-05-01 13:48:27 -07:00
|
|
|
|
|
|
|
if (slot == JSSLOT_PROTO) {
|
2009-05-29 01:47:51 -07:00
|
|
|
if (OBJ_IS_NATIVE(obj)) {
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
bool ok = !!js_GetMutableScope(cx, obj);
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
if (!ok)
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2009-05-01 13:48:27 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Regenerate property cache shape ids for all of the scopes along the
|
|
|
|
* old prototype chain to invalidate their property cache entries, in
|
2009-07-09 13:27:21 -07:00
|
|
|
* case any entries were filled by looking up through obj.
|
2009-05-01 13:48:27 -07:00
|
|
|
*/
|
2009-06-03 16:34:37 -07:00
|
|
|
JSObject *oldproto = obj;
|
2009-05-01 13:48:27 -07:00
|
|
|
while (oldproto && OBJ_IS_NATIVE(oldproto)) {
|
|
|
|
JS_LOCK_OBJ(cx, oldproto);
|
|
|
|
JSScope *scope = OBJ_SCOPE(oldproto);
|
2009-07-09 13:27:21 -07:00
|
|
|
scope->protoShapeChange(cx);
|
2009-07-21 14:25:11 -07:00
|
|
|
JSObject *tmp = STOBJ_GET_PROTO(oldproto);
|
2009-05-01 13:48:27 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, oldproto);
|
|
|
|
oldproto = tmp;
|
2008-01-29 22:29:49 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-05-01 13:48:27 -07:00
|
|
|
if (!pobj || !checkForCycles) {
|
|
|
|
if (slot == JSSLOT_PROTO)
|
2009-08-27 22:53:26 -07:00
|
|
|
obj->setProto(pobj);
|
2009-05-01 13:48:27 -07:00
|
|
|
else
|
2009-08-27 22:53:26 -07:00
|
|
|
obj->setParent(pobj);
|
2009-05-01 13:48:27 -07:00
|
|
|
} else {
|
|
|
|
/*
|
|
|
|
* Use the GC machinery to serialize access to all objects on the
|
|
|
|
* prototype or parent chain.
|
|
|
|
*/
|
|
|
|
JSSetSlotRequest ssr;
|
|
|
|
ssr.obj = obj;
|
|
|
|
ssr.pobj = pobj;
|
|
|
|
ssr.slot = (uint16) slot;
|
|
|
|
ssr.cycle = false;
|
|
|
|
|
|
|
|
JSRuntime *rt = cx->runtime;
|
2008-07-21 16:58:24 -07:00
|
|
|
JS_LOCK_GC(rt);
|
2009-05-01 13:48:27 -07:00
|
|
|
ssr.next = rt->setSlotRequests;
|
|
|
|
rt->setSlotRequests = &ssr;
|
|
|
|
for (;;) {
|
|
|
|
js_GC(cx, GC_SET_SLOT_REQUEST);
|
|
|
|
JS_UNLOCK_GC(rt);
|
|
|
|
if (!rt->setSlotRequests)
|
|
|
|
break;
|
|
|
|
JS_LOCK_GC(rt);
|
|
|
|
}
|
2008-01-29 22:29:49 -08:00
|
|
|
|
2009-05-01 13:48:27 -07:00
|
|
|
if (ssr.cycle) {
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_CYCLIC_VALUE,
|
2007-03-22 10:30:00 -07:00
|
|
|
#if JS_HAS_OBJ_PROTO_PROP
|
|
|
|
object_props[slot].name
|
|
|
|
#else
|
|
|
|
(slot == JSSLOT_PROTO) ? js_proto_str
|
|
|
|
: js_parent_str
|
|
|
|
#endif
|
|
|
|
);
|
2009-05-01 13:48:27 -07:00
|
|
|
return JS_FALSE;
|
2008-01-29 00:45:14 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2008-09-06 15:21:43 -07:00
|
|
|
static JSHashNumber
|
2007-03-22 10:30:00 -07:00
|
|
|
js_hash_object(const void *key)
|
|
|
|
{
|
|
|
|
return (JSHashNumber)JS_PTR_TO_UINT32(key) >> JSVAL_TAGBITS;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSHashEntry *
|
|
|
|
MarkSharpObjects(JSContext *cx, JSObject *obj, JSIdArray **idap)
|
|
|
|
{
|
|
|
|
JSSharpObjectMap *map;
|
|
|
|
JSHashTable *table;
|
|
|
|
JSHashNumber hash;
|
|
|
|
JSHashEntry **hep, *he;
|
|
|
|
jsatomid sharpid;
|
|
|
|
JSIdArray *ida;
|
|
|
|
JSBool ok;
|
|
|
|
jsint i, length;
|
|
|
|
jsid id;
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
|
|
|
JSObject *obj2;
|
|
|
|
JSProperty *prop;
|
|
|
|
uintN attrs;
|
|
|
|
#endif
|
|
|
|
jsval val;
|
|
|
|
|
2008-01-31 22:01:17 -08:00
|
|
|
JS_CHECK_RECURSION(cx, return NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
map = &cx->sharpObjectMap;
|
2009-01-16 09:59:46 -08:00
|
|
|
JS_ASSERT(map->depth >= 1);
|
2007-03-22 10:30:00 -07:00
|
|
|
table = map->table;
|
|
|
|
hash = js_hash_object(obj);
|
|
|
|
hep = JS_HashTableRawLookup(table, hash, obj);
|
|
|
|
he = *hep;
|
|
|
|
if (!he) {
|
|
|
|
sharpid = 0;
|
|
|
|
he = JS_HashTableRawAdd(table, hep, hash, obj,
|
|
|
|
JS_UINT32_TO_PTR(sharpid));
|
|
|
|
if (!he) {
|
|
|
|
JS_ReportOutOfMemory(cx);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
ida = JS_Enumerate(cx, obj);
|
|
|
|
if (!ida)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
ok = JS_TRUE;
|
|
|
|
for (i = 0, length = ida->length; i < length; i++) {
|
|
|
|
id = ida->vector[i];
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->lookupProperty(cx, id, &obj2, &prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok)
|
|
|
|
break;
|
|
|
|
if (!prop)
|
|
|
|
continue;
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj2->getAttributes(cx, id, prop, &attrs);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (ok) {
|
|
|
|
if (OBJ_IS_NATIVE(obj2) &&
|
|
|
|
(attrs & (JSPROP_GETTER | JSPROP_SETTER))) {
|
2009-02-19 00:33:37 -08:00
|
|
|
JSScopeProperty *sprop = (JSScopeProperty *) prop;
|
2007-03-22 10:30:00 -07:00
|
|
|
val = JSVAL_NULL;
|
|
|
|
if (attrs & JSPROP_GETTER)
|
2009-09-03 14:41:19 -07:00
|
|
|
val = sprop->getterValue();
|
2007-03-22 10:30:00 -07:00
|
|
|
if (attrs & JSPROP_SETTER) {
|
|
|
|
if (val != JSVAL_NULL) {
|
|
|
|
/* Mark the getter, then set val to setter. */
|
|
|
|
ok = (MarkSharpObjects(cx, JSVAL_TO_OBJECT(val),
|
|
|
|
NULL)
|
|
|
|
!= NULL);
|
|
|
|
}
|
2009-09-03 14:41:19 -07:00
|
|
|
val = sprop->setterValue();
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
} else {
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->getProperty(cx, id, &val);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
#else
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->getProperty(cx, id, &val);
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
|
|
|
if (!ok)
|
|
|
|
break;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(val) &&
|
|
|
|
!MarkSharpObjects(cx, JSVAL_TO_OBJECT(val), NULL)) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!ok || !idap)
|
|
|
|
JS_DestroyIdArray(cx, ida);
|
|
|
|
if (!ok)
|
|
|
|
return NULL;
|
|
|
|
} else {
|
|
|
|
sharpid = JS_PTR_TO_UINT32(he->value);
|
|
|
|
if (sharpid == 0) {
|
|
|
|
sharpid = ++map->sharpgen << SHARP_ID_SHIFT;
|
|
|
|
he->value = JS_UINT32_TO_PTR(sharpid);
|
|
|
|
}
|
|
|
|
ida = NULL;
|
|
|
|
}
|
|
|
|
if (idap)
|
|
|
|
*idap = ida;
|
|
|
|
return he;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSHashEntry *
|
|
|
|
js_EnterSharpObject(JSContext *cx, JSObject *obj, JSIdArray **idap,
|
|
|
|
jschar **sp)
|
|
|
|
{
|
|
|
|
JSSharpObjectMap *map;
|
|
|
|
JSHashTable *table;
|
|
|
|
JSIdArray *ida;
|
|
|
|
JSHashNumber hash;
|
|
|
|
JSHashEntry *he, **hep;
|
|
|
|
jsatomid sharpid;
|
|
|
|
char buf[20];
|
|
|
|
size_t len;
|
|
|
|
|
2009-02-10 14:07:01 -08:00
|
|
|
if (!JS_CHECK_OPERATION_LIMIT(cx))
|
2007-03-22 10:30:00 -07:00
|
|
|
return NULL;
|
|
|
|
|
|
|
|
/* Set to null in case we return an early error. */
|
|
|
|
*sp = NULL;
|
|
|
|
map = &cx->sharpObjectMap;
|
|
|
|
table = map->table;
|
|
|
|
if (!table) {
|
|
|
|
table = JS_NewHashTable(8, js_hash_object, JS_CompareValues,
|
|
|
|
JS_CompareValues, NULL, NULL);
|
|
|
|
if (!table) {
|
|
|
|
JS_ReportOutOfMemory(cx);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
map->table = table;
|
|
|
|
JS_KEEP_ATOMS(cx->runtime);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* From this point the control must flow either through out: or bad:. */
|
|
|
|
ida = NULL;
|
|
|
|
if (map->depth == 0) {
|
2009-01-16 09:59:46 -08:00
|
|
|
/*
|
|
|
|
* Although MarkSharpObjects tries to avoid invoking getters,
|
|
|
|
* it ends up doing so anyway under some circumstances; for
|
|
|
|
* example, if a wrapped object has getters, the wrapper will
|
|
|
|
* prevent MarkSharpObjects from recognizing them as such.
|
|
|
|
* This could lead to js_LeaveSharpObject being called while
|
|
|
|
* MarkSharpObjects is still working.
|
|
|
|
*
|
|
|
|
* Increment map->depth while we call MarkSharpObjects, to
|
|
|
|
* ensure that such a call doesn't free the hash table we're
|
|
|
|
* still using.
|
|
|
|
*/
|
|
|
|
++map->depth;
|
2007-03-22 10:30:00 -07:00
|
|
|
he = MarkSharpObjects(cx, obj, &ida);
|
2009-01-16 09:59:46 -08:00
|
|
|
--map->depth;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!he)
|
|
|
|
goto bad;
|
|
|
|
JS_ASSERT((JS_PTR_TO_UINT32(he->value) & SHARP_BIT) == 0);
|
|
|
|
if (!idap) {
|
|
|
|
JS_DestroyIdArray(cx, ida);
|
|
|
|
ida = NULL;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
hash = js_hash_object(obj);
|
|
|
|
hep = JS_HashTableRawLookup(table, hash, obj);
|
|
|
|
he = *hep;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* It's possible that the value of a property has changed from the
|
|
|
|
* first time the object's properties are traversed (when the property
|
|
|
|
* ids are entered into the hash table) to the second (when they are
|
2009-08-11 13:05:44 -07:00
|
|
|
* converted to strings), i.e., the JSObject::getProperty() call is not
|
2007-03-22 10:30:00 -07:00
|
|
|
* idempotent.
|
|
|
|
*/
|
|
|
|
if (!he) {
|
|
|
|
he = JS_HashTableRawAdd(table, hep, hash, obj, NULL);
|
|
|
|
if (!he) {
|
|
|
|
JS_ReportOutOfMemory(cx);
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
sharpid = 0;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
sharpid = JS_PTR_TO_UINT32(he->value);
|
|
|
|
if (sharpid != 0) {
|
|
|
|
len = JS_snprintf(buf, sizeof buf, "#%u%c",
|
|
|
|
sharpid >> SHARP_ID_SHIFT,
|
|
|
|
(sharpid & SHARP_BIT) ? '#' : '=');
|
|
|
|
*sp = js_InflateString(cx, buf, &len);
|
|
|
|
if (!*sp) {
|
|
|
|
if (ida)
|
|
|
|
JS_DestroyIdArray(cx, ida);
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
out:
|
|
|
|
JS_ASSERT(he);
|
|
|
|
if ((sharpid & SHARP_BIT) == 0) {
|
|
|
|
if (idap && !ida) {
|
|
|
|
ida = JS_Enumerate(cx, obj);
|
|
|
|
if (!ida) {
|
|
|
|
if (*sp) {
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(*sp);
|
2007-03-22 10:30:00 -07:00
|
|
|
*sp = NULL;
|
|
|
|
}
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
map->depth++;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (idap)
|
|
|
|
*idap = ida;
|
|
|
|
return he;
|
|
|
|
|
|
|
|
bad:
|
|
|
|
/* Clean up the sharpObjectMap table on outermost error. */
|
|
|
|
if (map->depth == 0) {
|
|
|
|
JS_UNKEEP_ATOMS(cx->runtime);
|
|
|
|
map->sharpgen = 0;
|
|
|
|
JS_HashTableDestroy(map->table);
|
|
|
|
map->table = NULL;
|
|
|
|
}
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
js_LeaveSharpObject(JSContext *cx, JSIdArray **idap)
|
|
|
|
{
|
|
|
|
JSSharpObjectMap *map;
|
|
|
|
JSIdArray *ida;
|
|
|
|
|
|
|
|
map = &cx->sharpObjectMap;
|
|
|
|
JS_ASSERT(map->depth > 0);
|
|
|
|
if (--map->depth == 0) {
|
|
|
|
JS_UNKEEP_ATOMS(cx->runtime);
|
|
|
|
map->sharpgen = 0;
|
|
|
|
JS_HashTableDestroy(map->table);
|
|
|
|
map->table = NULL;
|
|
|
|
}
|
|
|
|
if (idap) {
|
|
|
|
ida = *idap;
|
|
|
|
if (ida) {
|
|
|
|
JS_DestroyIdArray(cx, ida);
|
|
|
|
*idap = NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2008-09-06 15:21:43 -07:00
|
|
|
static intN
|
2007-03-22 10:30:00 -07:00
|
|
|
gc_sharp_table_entry_marker(JSHashEntry *he, intN i, void *arg)
|
|
|
|
{
|
2007-04-16 23:53:37 -07:00
|
|
|
JS_CALL_OBJECT_TRACER((JSTracer *)arg, (JSObject *)he->key,
|
|
|
|
"sharp table entry");
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_DHASH_NEXT;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2007-04-16 23:53:37 -07:00
|
|
|
js_TraceSharpMap(JSTracer *trc, JSSharpObjectMap *map)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JS_ASSERT(map->depth > 0);
|
|
|
|
JS_ASSERT(map->table);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* During recursive calls to MarkSharpObjects a non-native object or
|
|
|
|
* object with a custom getProperty method can potentially return an
|
|
|
|
* unrooted value or even cut from the object graph an argument of one of
|
|
|
|
* MarkSharpObjects recursive invocations. So we must protect map->table
|
|
|
|
* entries against GC.
|
|
|
|
*
|
|
|
|
* We can not simply use JSTempValueRooter to mark the obj argument of
|
|
|
|
* MarkSharpObjects during recursion as we have to protect *all* entries
|
|
|
|
* in JSSharpObjectMap including those that contains otherwise unreachable
|
|
|
|
* objects just allocated through custom getProperty. Otherwise newer
|
|
|
|
* allocations can re-use the address of an object stored in the hashtable
|
|
|
|
* confusing js_EnterSharpObject. So to address the problem we simply
|
|
|
|
* mark all objects from map->table.
|
|
|
|
*
|
|
|
|
* An alternative "proper" solution is to use JSTempValueRooter in
|
|
|
|
* MarkSharpObjects with code to remove during finalization entries
|
|
|
|
* with otherwise unreachable objects. But this is way too complex
|
|
|
|
* to justify spending efforts.
|
|
|
|
*/
|
2007-04-16 23:53:37 -07:00
|
|
|
JS_HashTableEnumerateEntries(map->table, gc_sharp_table_entry_marker, trc);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#if JS_HAS_TOSOURCE
|
2007-08-01 21:33:52 -07:00
|
|
|
static JSBool
|
|
|
|
obj_toSource(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSBool ok, outermost;
|
2007-08-01 21:33:52 -07:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSHashEntry *he;
|
|
|
|
JSIdArray *ida;
|
|
|
|
jschar *chars, *ochars, *vsharp;
|
|
|
|
const jschar *idstrchars, *vchars;
|
|
|
|
size_t nchars, idstrlength, gsoplength, vlength, vsharplength, curlen;
|
2008-07-20 05:53:21 -07:00
|
|
|
const char *comma;
|
2007-03-22 10:30:00 -07:00
|
|
|
jsint i, j, length, valcnt;
|
|
|
|
jsid id;
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
|
|
|
JSObject *obj2;
|
|
|
|
JSProperty *prop;
|
|
|
|
uintN attrs;
|
|
|
|
#endif
|
|
|
|
jsval *val;
|
2007-10-13 13:09:48 -07:00
|
|
|
jsval localroot[4] = {JSVAL_NULL, JSVAL_NULL, JSVAL_NULL, JSVAL_NULL};
|
|
|
|
JSTempValueRooter tvr;
|
2007-05-15 15:41:24 -07:00
|
|
|
JSString *gsopold[2];
|
2007-03-22 10:30:00 -07:00
|
|
|
JSString *gsop[2];
|
|
|
|
JSString *idstr, *valstr, *str;
|
|
|
|
|
2008-01-31 22:01:17 -08:00
|
|
|
JS_CHECK_RECURSION(cx, return JS_FALSE);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-09-08 10:51:10 -07:00
|
|
|
MUST_FLOW_THROUGH("out");
|
2007-10-13 13:09:48 -07:00
|
|
|
JS_PUSH_TEMP_ROOT(cx, 4, localroot, &tvr);
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* If outermost, we need parentheses to be an expression, not a block. */
|
|
|
|
outermost = (cx->sharpObjectMap.depth == 0);
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj || !(he = js_EnterSharpObject(cx, obj, &ida, &chars))) {
|
2007-10-13 13:09:48 -07:00
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
if (IS_SHARP(he)) {
|
|
|
|
/*
|
|
|
|
* We didn't enter -- obj is already "sharp", meaning we've visited it
|
|
|
|
* already in our depth first search, and therefore chars contains a
|
|
|
|
* string of the form "#n#".
|
|
|
|
*/
|
|
|
|
JS_ASSERT(!ida);
|
|
|
|
#if JS_HAS_SHARP_VARS
|
|
|
|
nchars = js_strlen(chars);
|
|
|
|
#else
|
|
|
|
chars[0] = '{';
|
|
|
|
chars[1] = '}';
|
|
|
|
chars[2] = 0;
|
|
|
|
nchars = 2;
|
|
|
|
#endif
|
|
|
|
goto make_string;
|
|
|
|
}
|
|
|
|
JS_ASSERT(ida);
|
|
|
|
ok = JS_TRUE;
|
|
|
|
|
|
|
|
if (!chars) {
|
|
|
|
/* If outermost, allocate 4 + 1 for "({})" and the terminator. */
|
2009-07-27 21:10:12 -07:00
|
|
|
chars = (jschar *) js_malloc(((outermost ? 4 : 2) + 1) * sizeof(jschar));
|
2007-03-22 10:30:00 -07:00
|
|
|
nchars = 0;
|
|
|
|
if (!chars)
|
|
|
|
goto error;
|
|
|
|
if (outermost)
|
|
|
|
chars[nchars++] = '(';
|
|
|
|
} else {
|
|
|
|
/* js_EnterSharpObject returned a string of the form "#n=" in chars. */
|
|
|
|
MAKE_SHARP(he);
|
|
|
|
nchars = js_strlen(chars);
|
|
|
|
chars = (jschar *)
|
2009-07-27 21:10:12 -07:00
|
|
|
js_realloc((ochars = chars), (nchars + 2 + 1) * sizeof(jschar));
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!chars) {
|
2009-07-27 21:10:12 -07:00
|
|
|
js_free(ochars);
|
2007-03-22 10:30:00 -07:00
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
if (outermost) {
|
|
|
|
/*
|
|
|
|
* No need for parentheses around the whole shebang, because #n=
|
|
|
|
* unambiguously begins an object initializer, and never a block
|
|
|
|
* statement.
|
|
|
|
*/
|
|
|
|
outermost = JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
chars[nchars++] = '{';
|
|
|
|
|
|
|
|
comma = NULL;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* We have four local roots for cooked and raw value GC safety. Hoist the
|
2007-10-13 13:09:48 -07:00
|
|
|
* "localroot + 2" out of the loop using the val local, which refers to
|
|
|
|
* the raw (unconverted, "uncooked") values.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2007-10-13 13:09:48 -07:00
|
|
|
val = localroot + 2;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
for (i = 0, length = ida->length; i < length; i++) {
|
2007-05-01 11:07:44 -07:00
|
|
|
JSBool idIsLexicalIdentifier, needOldStyleGetterSetter;
|
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
/* Get strings for id and value and GC-root them via vp. */
|
2007-03-22 10:30:00 -07:00
|
|
|
id = ida->vector[i];
|
|
|
|
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->lookupProperty(cx, id, &obj2, &prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok)
|
|
|
|
goto error;
|
2007-05-01 11:07:44 -07:00
|
|
|
#endif
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Convert id to a jsval and then to a string. Decide early whether we
|
|
|
|
* prefer get/set or old getter/setter syntax.
|
|
|
|
*/
|
|
|
|
idstr = js_ValueToString(cx, ID_TO_VALUE(id));
|
|
|
|
if (!idstr) {
|
|
|
|
ok = JS_FALSE;
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
2007-05-01 11:07:44 -07:00
|
|
|
goto error;
|
|
|
|
}
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = STRING_TO_JSVAL(idstr); /* local root */
|
2007-05-01 11:07:44 -07:00
|
|
|
idIsLexicalIdentifier = js_IsIdentifier(idstr);
|
2007-07-13 14:23:39 -07:00
|
|
|
needOldStyleGetterSetter =
|
2007-05-01 11:07:44 -07:00
|
|
|
!idIsLexicalIdentifier ||
|
2009-06-10 18:29:44 -07:00
|
|
|
js_CheckKeyword(idstr->chars(), idstr->length()) != TOK_EOF;
|
2007-05-01 11:07:44 -07:00
|
|
|
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
valcnt = 0;
|
|
|
|
if (prop) {
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj2->getAttributes(cx, id, prop, &attrs);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok) {
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
if (OBJ_IS_NATIVE(obj2) &&
|
|
|
|
(attrs & (JSPROP_GETTER | JSPROP_SETTER))) {
|
2009-02-19 00:33:37 -08:00
|
|
|
JSScopeProperty *sprop = (JSScopeProperty *) prop;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (attrs & JSPROP_GETTER) {
|
2009-09-03 14:41:19 -07:00
|
|
|
val[valcnt] = sprop->getterValue();
|
2007-05-15 15:41:24 -07:00
|
|
|
gsopold[valcnt] =
|
2007-03-22 10:30:00 -07:00
|
|
|
ATOM_TO_STRING(cx->runtime->atomState.getterAtom);
|
2007-05-15 15:41:24 -07:00
|
|
|
gsop[valcnt] =
|
|
|
|
ATOM_TO_STRING(cx->runtime->atomState.getAtom);
|
2007-05-21 11:02:33 -07:00
|
|
|
|
|
|
|
valcnt++;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
if (attrs & JSPROP_SETTER) {
|
2009-09-03 14:41:19 -07:00
|
|
|
val[valcnt] = sprop->setterValue();
|
2007-05-15 15:41:24 -07:00
|
|
|
gsopold[valcnt] =
|
2007-03-22 10:30:00 -07:00
|
|
|
ATOM_TO_STRING(cx->runtime->atomState.setterAtom);
|
2007-05-15 15:41:24 -07:00
|
|
|
gsop[valcnt] =
|
|
|
|
ATOM_TO_STRING(cx->runtime->atomState.setAtom);
|
2007-05-21 11:02:33 -07:00
|
|
|
|
|
|
|
valcnt++;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
} else {
|
|
|
|
valcnt = 1;
|
|
|
|
gsop[0] = NULL;
|
2007-05-15 15:41:24 -07:00
|
|
|
gsopold[0] = NULL;
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->getProperty(cx, id, &val[0]);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#else /* !JS_HAS_GETTER_SETTER */
|
|
|
|
|
2007-05-01 11:07:44 -07:00
|
|
|
/*
|
|
|
|
* We simplify the source code at the price of minor dead code bloat in
|
2008-09-05 10:19:17 -07:00
|
|
|
* the ECMA version (for testing only, see jsversion.h). The null
|
2007-05-01 11:07:44 -07:00
|
|
|
* default values in gsop[j] suffice to disable non-ECMA getter and
|
|
|
|
* setter code.
|
|
|
|
*/
|
2007-03-22 10:30:00 -07:00
|
|
|
valcnt = 1;
|
|
|
|
gsop[0] = NULL;
|
2007-05-15 15:41:24 -07:00
|
|
|
gsopold[0] = NULL;
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->getProperty(cx, id, &val[0]);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
#endif /* !JS_HAS_GETTER_SETTER */
|
|
|
|
|
|
|
|
if (!ok)
|
|
|
|
goto error;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If id is a string that's not an identifier, then it needs to be
|
|
|
|
* quoted. Also, negative integer ids must be quoted.
|
|
|
|
*/
|
2007-08-11 13:25:16 -07:00
|
|
|
if (JSID_IS_ATOM(id)
|
2007-05-01 11:07:44 -07:00
|
|
|
? !idIsLexicalIdentifier
|
2007-08-11 13:25:16 -07:00
|
|
|
: (!JSID_IS_INT(id) || JSID_TO_INT(id) < 0)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
idstr = js_QuoteString(cx, idstr, (jschar)'\'');
|
|
|
|
if (!idstr) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto error;
|
|
|
|
}
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = STRING_TO_JSVAL(idstr); /* local root */
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2009-06-10 18:29:44 -07:00
|
|
|
idstr->getCharsAndLength(idstrchars, idstrlength);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
for (j = 0; j < valcnt; j++) {
|
|
|
|
/* Convert val[j] to its canonical source form. */
|
|
|
|
valstr = js_ValueToSource(cx, val[j]);
|
|
|
|
if (!valstr) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto error;
|
|
|
|
}
|
2007-10-13 13:09:48 -07:00
|
|
|
localroot[j] = STRING_TO_JSVAL(valstr); /* local root */
|
2009-06-10 18:29:44 -07:00
|
|
|
valstr->getCharsAndLength(vchars, vlength);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-05-15 15:41:24 -07:00
|
|
|
if (vchars[0] == '#')
|
|
|
|
needOldStyleGetterSetter = JS_TRUE;
|
|
|
|
|
|
|
|
if (needOldStyleGetterSetter)
|
|
|
|
gsop[j] = gsopold[j];
|
|
|
|
|
2007-06-05 13:20:07 -07:00
|
|
|
/* If val[j] is a non-sharp object, consider sharpening it. */
|
|
|
|
vsharp = NULL;
|
|
|
|
vsharplength = 0;
|
|
|
|
#if JS_HAS_SHARP_VARS
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(val[j]) && vchars[0] != '#') {
|
|
|
|
he = js_EnterSharpObject(cx, JSVAL_TO_OBJECT(val[j]), NULL,
|
|
|
|
&vsharp);
|
|
|
|
if (!he) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
if (IS_SHARP(he)) {
|
|
|
|
vchars = vsharp;
|
|
|
|
vlength = js_strlen(vchars);
|
|
|
|
needOldStyleGetterSetter = JS_TRUE;
|
|
|
|
gsop[j] = gsopold[j];
|
|
|
|
} else {
|
|
|
|
if (vsharp) {
|
|
|
|
vsharplength = js_strlen(vsharp);
|
|
|
|
MAKE_SHARP(he);
|
|
|
|
needOldStyleGetterSetter = JS_TRUE;
|
|
|
|
gsop[j] = gsopold[j];
|
|
|
|
}
|
|
|
|
js_LeaveSharpObject(cx, NULL);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
#ifndef OLD_GETTER_SETTER
|
|
|
|
/*
|
|
|
|
* Remove '(function ' from the beginning of valstr and ')' from the
|
|
|
|
* end so that we can put "get" in front of the function definition.
|
|
|
|
*/
|
2007-05-01 11:07:44 -07:00
|
|
|
if (gsop[j] && VALUE_IS_FUNCTION(cx, val[j]) &&
|
|
|
|
!needOldStyleGetterSetter) {
|
2007-05-30 13:05:31 -07:00
|
|
|
JSFunction *fun = JS_ValueToFunction(cx, val[j]);
|
2007-05-18 16:12:56 -07:00
|
|
|
const jschar *start = vchars;
|
2007-05-30 13:05:31 -07:00
|
|
|
const jschar *end = vchars + vlength;
|
|
|
|
|
2007-05-29 14:05:09 -07:00
|
|
|
uint8 parenChomp = 0;
|
|
|
|
if (vchars[0] == '(') {
|
2007-05-18 16:12:56 -07:00
|
|
|
vchars++;
|
2007-05-29 14:05:09 -07:00
|
|
|
parenChomp = 1;
|
|
|
|
}
|
2007-05-30 13:05:31 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Try to jump "getter" or "setter" keywords, if we suspect
|
|
|
|
* they might appear here. This code can be confused by people
|
|
|
|
* defining Function.prototype.toString, so let's be cautious.
|
|
|
|
*/
|
2008-03-29 03:34:29 -07:00
|
|
|
if (JSFUN_GETTER_TEST(fun->flags) ||
|
|
|
|
JSFUN_SETTER_TEST(fun->flags)) { /* skip "getter/setter" */
|
2007-06-12 15:07:20 -07:00
|
|
|
const jschar *tmp = js_strchr_limit(vchars, ' ', end);
|
|
|
|
if (tmp)
|
|
|
|
vchars = tmp + 1;
|
2007-05-30 13:05:31 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Try to jump "function" keyword. */
|
|
|
|
if (vchars)
|
|
|
|
vchars = js_strchr_limit(vchars, ' ', end);
|
|
|
|
|
2007-05-21 11:01:08 -07:00
|
|
|
if (vchars) {
|
2007-05-30 13:05:31 -07:00
|
|
|
if (*vchars == ' ')
|
|
|
|
vchars++;
|
|
|
|
vlength = end - vchars - parenChomp;
|
2007-05-21 11:01:08 -07:00
|
|
|
} else {
|
|
|
|
gsop[j] = NULL;
|
|
|
|
vchars = start;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2007-05-15 15:41:24 -07:00
|
|
|
#else
|
|
|
|
needOldStyleGetterSetter = JS_TRUE;
|
|
|
|
gsop[j] = gsopold[j];
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#define SAFE_ADD(n) \
|
|
|
|
JS_BEGIN_MACRO \
|
|
|
|
size_t n_ = (n); \
|
|
|
|
curlen += n_; \
|
|
|
|
if (curlen < n_) \
|
|
|
|
goto overflow; \
|
|
|
|
JS_END_MACRO
|
|
|
|
|
|
|
|
curlen = nchars;
|
|
|
|
if (comma)
|
|
|
|
SAFE_ADD(2);
|
|
|
|
SAFE_ADD(idstrlength + 1);
|
|
|
|
if (gsop[j])
|
2009-06-10 18:29:44 -07:00
|
|
|
SAFE_ADD(gsop[j]->length() + 1);
|
2007-03-22 10:30:00 -07:00
|
|
|
SAFE_ADD(vsharplength);
|
|
|
|
SAFE_ADD(vlength);
|
|
|
|
/* Account for the trailing null. */
|
|
|
|
SAFE_ADD((outermost ? 2 : 1) + 1);
|
|
|
|
#undef SAFE_ADD
|
|
|
|
|
|
|
|
if (curlen > (size_t)-1 / sizeof(jschar))
|
|
|
|
goto overflow;
|
|
|
|
|
|
|
|
/* Allocate 1 + 1 at end for closing brace and terminating 0. */
|
|
|
|
chars = (jschar *)
|
2009-07-27 21:10:12 -07:00
|
|
|
js_realloc((ochars = chars), curlen * sizeof(jschar));
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!chars) {
|
|
|
|
/* Save code space on error: let JS_free ignore null vsharp. */
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(vsharp);
|
|
|
|
js_free(ochars);
|
2007-03-22 10:30:00 -07:00
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (comma) {
|
|
|
|
chars[nchars++] = comma[0];
|
|
|
|
chars[nchars++] = comma[1];
|
|
|
|
}
|
|
|
|
comma = ", ";
|
|
|
|
|
2007-05-01 11:07:44 -07:00
|
|
|
if (needOldStyleGetterSetter) {
|
|
|
|
js_strncpy(&chars[nchars], idstrchars, idstrlength);
|
|
|
|
nchars += idstrlength;
|
|
|
|
if (gsop[j]) {
|
|
|
|
chars[nchars++] = ' ';
|
2009-06-10 18:29:44 -07:00
|
|
|
gsoplength = gsop[j]->length();
|
|
|
|
js_strncpy(&chars[nchars], gsop[j]->chars(),
|
2007-05-01 11:07:44 -07:00
|
|
|
gsoplength);
|
|
|
|
nchars += gsoplength;
|
|
|
|
}
|
|
|
|
chars[nchars++] = ':';
|
|
|
|
} else { /* New style "decompilation" */
|
|
|
|
if (gsop[j]) {
|
2009-06-10 18:29:44 -07:00
|
|
|
gsoplength = gsop[j]->length();
|
|
|
|
js_strncpy(&chars[nchars], gsop[j]->chars(),
|
2007-05-01 11:07:44 -07:00
|
|
|
gsoplength);
|
|
|
|
nchars += gsoplength;
|
|
|
|
chars[nchars++] = ' ';
|
|
|
|
}
|
|
|
|
js_strncpy(&chars[nchars], idstrchars, idstrlength);
|
|
|
|
nchars += idstrlength;
|
|
|
|
/* Extraneous space after id here will be extracted later */
|
|
|
|
chars[nchars++] = gsop[j] ? ' ' : ':';
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2007-05-15 15:41:24 -07:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (vsharplength) {
|
|
|
|
js_strncpy(&chars[nchars], vsharp, vsharplength);
|
|
|
|
nchars += vsharplength;
|
|
|
|
}
|
|
|
|
js_strncpy(&chars[nchars], vchars, vlength);
|
|
|
|
nchars += vlength;
|
|
|
|
|
|
|
|
if (vsharp)
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(vsharp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
chars[nchars++] = '}';
|
|
|
|
if (outermost)
|
|
|
|
chars[nchars++] = ')';
|
|
|
|
chars[nchars] = 0;
|
|
|
|
|
|
|
|
error:
|
|
|
|
js_LeaveSharpObject(cx, &ida);
|
|
|
|
|
|
|
|
if (!ok) {
|
|
|
|
if (chars)
|
2009-07-27 21:10:12 -07:00
|
|
|
js_free(chars);
|
2007-10-13 13:09:48 -07:00
|
|
|
goto out;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
if (!chars) {
|
|
|
|
JS_ReportOutOfMemory(cx);
|
2007-10-13 13:09:48 -07:00
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
make_string:
|
2007-08-15 23:23:06 -07:00
|
|
|
str = js_NewString(cx, chars, nchars);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!str) {
|
2009-07-27 21:10:12 -07:00
|
|
|
js_free(chars);
|
2007-10-13 13:09:48 -07:00
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = STRING_TO_JSVAL(str);
|
2007-10-13 13:09:48 -07:00
|
|
|
ok = JS_TRUE;
|
|
|
|
out:
|
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
return ok;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
overflow:
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(vsharp);
|
|
|
|
js_free(chars);
|
2007-03-22 10:30:00 -07:00
|
|
|
chars = NULL;
|
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
#endif /* JS_HAS_TOSOURCE */
|
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
static JSBool
|
|
|
|
obj_toString(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-02-17 16:12:33 -08:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
jschar *chars;
|
|
|
|
size_t nchars;
|
|
|
|
const char *clazz, *prefix;
|
|
|
|
JSString *str;
|
|
|
|
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
2008-03-06 12:05:18 -08:00
|
|
|
obj = js_GetWrappedObject(cx, obj);
|
|
|
|
clazz = OBJ_GET_CLASS(cx, obj)->name;
|
2007-03-22 10:30:00 -07:00
|
|
|
nchars = 9 + strlen(clazz); /* 9 for "[object ]" */
|
2009-07-27 21:10:12 -07:00
|
|
|
chars = (jschar *) cx->malloc((nchars + 1) * sizeof(jschar));
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!chars)
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
prefix = "[object ";
|
|
|
|
nchars = 0;
|
|
|
|
while ((chars[nchars] = (jschar)*prefix) != 0)
|
|
|
|
nchars++, prefix++;
|
|
|
|
while ((chars[nchars] = (jschar)*clazz) != 0)
|
|
|
|
nchars++, clazz++;
|
|
|
|
chars[nchars++] = ']';
|
|
|
|
chars[nchars] = 0;
|
|
|
|
|
2007-08-15 23:23:06 -07:00
|
|
|
str = js_NewString(cx, chars, nchars);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!str) {
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(chars);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = STRING_TO_JSVAL(str);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_toLocaleString(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-02-17 16:12:33 -08:00
|
|
|
jsval thisv;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSString *str;
|
|
|
|
|
2008-02-17 16:12:33 -08:00
|
|
|
thisv = JS_THIS(cx, vp);
|
|
|
|
if (JSVAL_IS_NULL(thisv))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
str = js_ValueToString(cx, thisv);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!str)
|
|
|
|
return JS_FALSE;
|
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = STRING_TO_JSVAL(str);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_valueOf(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-02-17 16:12:33 -08:00
|
|
|
*vp = JS_THIS(cx, vp);
|
|
|
|
return !JSVAL_IS_NULL(*vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-12-16 19:03:42 -08:00
|
|
|
#ifdef JS_TRACER
|
|
|
|
static jsval FASTCALL
|
|
|
|
Object_p_valueOf(JSContext* cx, JSObject* obj, JSString *hint)
|
|
|
|
{
|
|
|
|
return OBJECT_TO_JSVAL(obj);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* Check whether principals subsumes scopeobj's principals, and return true
|
|
|
|
* if so (or if scopeobj has no principals, for backward compatibility with
|
|
|
|
* the JS API, which does not require principals), and false otherwise.
|
|
|
|
*/
|
|
|
|
JSBool
|
|
|
|
js_CheckPrincipalsAccess(JSContext *cx, JSObject *scopeobj,
|
|
|
|
JSPrincipals *principals, JSAtom *caller)
|
|
|
|
{
|
2008-09-05 16:24:53 -07:00
|
|
|
JSSecurityCallbacks *callbacks;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSPrincipals *scopePrincipals;
|
|
|
|
const char *callerstr;
|
|
|
|
|
2008-09-05 16:24:53 -07:00
|
|
|
callbacks = JS_GetSecurityCallbacks(cx);
|
|
|
|
if (callbacks && callbacks->findObjectPrincipals) {
|
|
|
|
scopePrincipals = callbacks->findObjectPrincipals(cx, scopeobj);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!principals || !scopePrincipals ||
|
|
|
|
!principals->subsume(principals, scopePrincipals)) {
|
|
|
|
callerstr = js_AtomToPrintableString(cx, caller);
|
|
|
|
if (!callerstr)
|
|
|
|
return JS_FALSE;
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_BAD_INDIRECT_CALL, callerstr);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_CheckScopeChainValidity(JSContext *cx, JSObject *scopeobj, const char *caller)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
JSExtendedClass *xclasp;
|
|
|
|
JSObject *inner;
|
|
|
|
|
|
|
|
if (!scopeobj)
|
|
|
|
goto bad;
|
|
|
|
|
|
|
|
OBJ_TO_INNER_OBJECT(cx, scopeobj);
|
|
|
|
if (!scopeobj)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
inner = scopeobj;
|
|
|
|
|
|
|
|
/* XXX This is an awful gross hack. */
|
|
|
|
while (scopeobj) {
|
|
|
|
clasp = OBJ_GET_CLASS(cx, scopeobj);
|
|
|
|
if (clasp->flags & JSCLASS_IS_EXTENDED) {
|
|
|
|
xclasp = (JSExtendedClass*)clasp;
|
|
|
|
if (xclasp->innerObject &&
|
|
|
|
xclasp->innerObject(cx, scopeobj) != scopeobj) {
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
scopeobj = OBJ_GET_PARENT(cx, scopeobj);
|
|
|
|
}
|
|
|
|
|
|
|
|
return inner;
|
|
|
|
|
|
|
|
bad:
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_BAD_INDIRECT_CALL, caller);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
2008-03-06 14:52:58 -08:00
|
|
|
const char *
|
|
|
|
js_ComputeFilename(JSContext *cx, JSStackFrame *caller,
|
|
|
|
JSPrincipals *principals, uintN *linenop)
|
|
|
|
{
|
|
|
|
uint32 flags;
|
2008-09-05 16:24:53 -07:00
|
|
|
#ifdef DEBUG
|
|
|
|
JSSecurityCallbacks *callbacks = JS_GetSecurityCallbacks(cx);
|
|
|
|
#endif
|
2008-03-06 14:52:58 -08:00
|
|
|
|
2008-09-05 16:24:53 -07:00
|
|
|
JS_ASSERT(principals || !(callbacks && callbacks->findObjectPrincipals));
|
2008-03-06 14:52:58 -08:00
|
|
|
flags = JS_GetScriptFilenameFlags(caller->script);
|
|
|
|
if ((flags & JSFILENAME_PROTECTED) &&
|
2008-08-27 13:56:34 -07:00
|
|
|
principals &&
|
2008-03-06 14:52:58 -08:00
|
|
|
strcmp(principals->codebase, "[System Principal]")) {
|
|
|
|
*linenop = 0;
|
|
|
|
return principals->codebase;
|
|
|
|
}
|
|
|
|
|
2009-06-25 16:03:46 -07:00
|
|
|
if (caller->regs && js_GetOpcode(cx, caller->script, caller->regs->pc) == JSOP_EVAL) {
|
|
|
|
JS_ASSERT(js_GetOpcode(cx, caller->script, caller->regs->pc + JSOP_EVAL_LENGTH) == JSOP_LINENO);
|
|
|
|
*linenop = GET_UINT16(caller->regs->pc + JSOP_EVAL_LENGTH);
|
2008-03-24 10:00:01 -07:00
|
|
|
} else {
|
2008-11-13 00:30:20 -08:00
|
|
|
*linenop = js_FramePCToLineNumber(cx, caller);
|
2008-03-24 10:00:01 -07:00
|
|
|
}
|
2008-03-06 14:52:58 -08:00
|
|
|
return caller->script->filename;
|
|
|
|
}
|
|
|
|
|
2009-01-27 16:40:40 -08:00
|
|
|
#ifndef EVAL_CACHE_CHAIN_LIMIT
|
|
|
|
# define EVAL_CACHE_CHAIN_LIMIT 4
|
|
|
|
#endif
|
|
|
|
|
|
|
|
static inline JSScript **
|
|
|
|
EvalCacheHash(JSContext *cx, JSString *str)
|
|
|
|
{
|
|
|
|
const jschar *s;
|
|
|
|
size_t n;
|
|
|
|
uint32 h;
|
|
|
|
|
2009-06-10 18:29:44 -07:00
|
|
|
str->getCharsAndLength(s, n);
|
2009-01-27 16:40:40 -08:00
|
|
|
if (n > 100)
|
|
|
|
n = 100;
|
|
|
|
for (h = 0; n; s++, n--)
|
|
|
|
h = JS_ROTATE_LEFT32(h, 4) ^ *s;
|
|
|
|
|
|
|
|
h *= JS_GOLDEN_RATIO;
|
|
|
|
h >>= 32 - JS_EVAL_CACHE_SHIFT;
|
|
|
|
return &JS_SCRIPTS_TO_GC(cx)[h];
|
|
|
|
}
|
|
|
|
|
2008-10-08 15:08:33 -07:00
|
|
|
static JSBool
|
|
|
|
obj_eval(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSStackFrame *fp, *caller;
|
|
|
|
JSBool indirectCall;
|
2009-01-27 16:40:40 -08:00
|
|
|
uint32 tcflags;
|
|
|
|
JSPrincipals *principals;
|
2007-03-22 10:30:00 -07:00
|
|
|
const char *file;
|
|
|
|
uintN line;
|
2009-01-27 16:40:40 -08:00
|
|
|
JSString *str;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSScript *script;
|
|
|
|
JSBool ok;
|
2009-01-27 16:40:40 -08:00
|
|
|
JSScript **bucket = NULL; /* avoid GCC warning with early decl&init */
|
2007-10-09 15:42:42 -07:00
|
|
|
#if JS_HAS_EVAL_THIS_SCOPE
|
|
|
|
JSObject *callerScopeChain = NULL, *callerVarObj = NULL;
|
|
|
|
JSObject *setCallerScopeChain = NULL;
|
|
|
|
JSBool setCallerVarObj = JS_FALSE;
|
|
|
|
#endif
|
|
|
|
|
2008-12-09 08:38:32 -08:00
|
|
|
fp = js_GetTopStackFrame(cx);
|
|
|
|
caller = js_GetScriptedCaller(cx, fp);
|
2008-05-06 14:59:49 -07:00
|
|
|
indirectCall = (caller && caller->regs && *caller->regs->pc != JSOP_EVAL);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-03-04 16:27:50 -08:00
|
|
|
/*
|
|
|
|
* This call to js_GetWrappedObject is safe because of the security checks
|
|
|
|
* we do below. However, the control flow below is confusing, so we double
|
|
|
|
* check. There are two cases:
|
|
|
|
* - Direct call: This object is never used. So unwrapping can't hurt.
|
|
|
|
* - Indirect call: If this object isn't already the scope chain (which
|
|
|
|
* we're guaranteed to be allowed to access) then we do a security
|
|
|
|
* check.
|
|
|
|
*/
|
|
|
|
obj = js_GetWrappedObject(cx, obj);
|
|
|
|
|
2007-07-13 14:23:39 -07:00
|
|
|
/*
|
2007-06-04 16:03:03 -07:00
|
|
|
* Ban all indirect uses of eval (global.foo = eval; global.foo(...)) and
|
|
|
|
* calls that attempt to use a non-global object as the "with" object in
|
|
|
|
* the former indirect case.
|
|
|
|
*/
|
2009-03-04 16:27:50 -08:00
|
|
|
{
|
|
|
|
JSObject *parent = OBJ_GET_PARENT(cx, obj);
|
|
|
|
if (indirectCall || parent) {
|
|
|
|
uintN flags = parent
|
|
|
|
? JSREPORT_ERROR
|
|
|
|
: JSREPORT_STRICT | JSREPORT_WARNING;
|
|
|
|
if (!JS_ReportErrorFlagsAndNumber(cx, flags, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_BAD_INDIRECT_CALL,
|
|
|
|
js_eval_str)) {
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2007-06-05 16:42:00 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
if (!JSVAL_IS_STRING(argv[0])) {
|
|
|
|
*rval = argv[0];
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If the caller is a lightweight function and doesn't have a variables
|
|
|
|
* object, then we need to provide one for the compiler to stick any
|
|
|
|
* declared (var) variables into.
|
|
|
|
*/
|
2009-02-18 23:57:24 -08:00
|
|
|
if (caller && !caller->varobj && !js_GetCallObject(cx, caller))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
2008-12-12 23:47:23 -08:00
|
|
|
/* Accept an optional trailing argument that overrides the scope object. */
|
2009-03-04 16:27:50 -08:00
|
|
|
JSObject *scopeobj = NULL;
|
2008-12-12 23:47:23 -08:00
|
|
|
if (argc >= 2) {
|
|
|
|
if (!js_ValueToObject(cx, argv[1], &scopeobj))
|
|
|
|
return JS_FALSE;
|
|
|
|
argv[1] = OBJECT_TO_JSVAL(scopeobj);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-02-08 17:54:31 -08:00
|
|
|
/* From here on, control must exit through label out with ok set. */
|
2008-09-08 10:51:10 -07:00
|
|
|
MUST_FLOW_THROUGH("out");
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!scopeobj) {
|
2007-10-09 15:42:42 -07:00
|
|
|
#if JS_HAS_EVAL_THIS_SCOPE
|
|
|
|
/* If obj.eval(str), emulate 'with (obj) eval(str)' in the caller. */
|
|
|
|
if (indirectCall) {
|
|
|
|
callerScopeChain = js_GetScopeChain(cx, caller);
|
2008-02-08 17:54:31 -08:00
|
|
|
if (!callerScopeChain) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-10-09 15:42:42 -07:00
|
|
|
OBJ_TO_INNER_OBJECT(cx, obj);
|
2008-02-08 17:54:31 -08:00
|
|
|
if (!obj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-10-09 15:42:42 -07:00
|
|
|
if (obj != callerScopeChain) {
|
2008-02-08 17:54:31 -08:00
|
|
|
ok = js_CheckPrincipalsAccess(cx, obj,
|
2008-12-19 15:47:20 -08:00
|
|
|
JS_StackFramePrincipals(cx, caller),
|
2008-02-08 17:54:31 -08:00
|
|
|
cx->runtime->atomState.evalAtom);
|
|
|
|
if (!ok)
|
|
|
|
goto out;
|
2007-10-09 15:42:42 -07:00
|
|
|
|
|
|
|
scopeobj = js_NewWithObject(cx, obj, callerScopeChain, -1);
|
2008-02-08 17:54:31 -08:00
|
|
|
if (!scopeobj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-10-09 15:42:42 -07:00
|
|
|
|
|
|
|
/* Set fp->scopeChain too, for the compiler. */
|
|
|
|
caller->scopeChain = fp->scopeChain = scopeobj;
|
|
|
|
|
|
|
|
/* Remember scopeobj so we can null its private when done. */
|
|
|
|
setCallerScopeChain = scopeobj;
|
|
|
|
}
|
|
|
|
|
|
|
|
callerVarObj = caller->varobj;
|
|
|
|
if (obj != callerVarObj) {
|
|
|
|
/* Set fp->varobj too, for the compiler. */
|
|
|
|
caller->varobj = fp->varobj = obj;
|
|
|
|
setCallerVarObj = JS_TRUE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2007-06-04 16:03:03 -07:00
|
|
|
/*
|
|
|
|
* Compile using caller's current scope object.
|
|
|
|
*
|
|
|
|
* NB: This means that native callers (who reach this point through
|
|
|
|
* the C API) must use the two parameter form.
|
|
|
|
*/
|
2007-03-22 10:30:00 -07:00
|
|
|
if (caller) {
|
|
|
|
scopeobj = js_GetScopeChain(cx, caller);
|
2007-10-09 15:42:42 -07:00
|
|
|
if (!scopeobj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-12-12 23:47:23 -08:00
|
|
|
} else {
|
2009-03-04 16:27:50 -08:00
|
|
|
scopeobj = js_GetWrappedObject(cx, scopeobj);
|
|
|
|
OBJ_TO_INNER_OBJECT(cx, scopeobj);
|
|
|
|
if (!scopeobj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2008-12-12 23:47:23 -08:00
|
|
|
ok = js_CheckPrincipalsAccess(cx, scopeobj,
|
|
|
|
JS_StackFramePrincipals(cx, caller),
|
|
|
|
cx->runtime->atomState.evalAtom);
|
|
|
|
if (!ok)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
scopeobj = js_NewWithObject(cx, scopeobj,
|
|
|
|
JS_GetGlobalForObject(cx, scopeobj), -1);
|
|
|
|
if (!scopeobj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2008-12-15 16:42:40 -08:00
|
|
|
argv[1] = OBJECT_TO_JSVAL(scopeobj);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Ensure we compile this eval with the right object in the scope chain. */
|
|
|
|
scopeobj = js_CheckScopeChainValidity(cx, scopeobj, js_eval_str);
|
2007-10-09 15:42:42 -07:00
|
|
|
if (!scopeobj) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-01-27 16:40:40 -08:00
|
|
|
tcflags = TCF_COMPILE_N_GO;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (caller) {
|
2009-04-05 21:17:22 -07:00
|
|
|
tcflags |= TCF_PUT_STATIC_LEVEL(caller->script->staticLevel + 1);
|
2007-03-22 10:30:00 -07:00
|
|
|
principals = JS_EvalFramePrincipals(cx, fp, caller);
|
2008-03-06 14:52:58 -08:00
|
|
|
file = js_ComputeFilename(cx, caller, principals, &line);
|
2007-03-22 10:30:00 -07:00
|
|
|
} else {
|
2009-01-27 16:40:40 -08:00
|
|
|
principals = NULL;
|
2007-03-22 10:30:00 -07:00
|
|
|
file = NULL;
|
|
|
|
line = 0;
|
|
|
|
}
|
|
|
|
|
2009-01-27 16:40:40 -08:00
|
|
|
str = JSVAL_TO_STRING(argv[0]);
|
|
|
|
script = NULL;
|
|
|
|
|
|
|
|
/* Cache local eval scripts indexed by source qualified by scope. */
|
|
|
|
bucket = EvalCacheHash(cx, str);
|
|
|
|
if (caller->fun) {
|
|
|
|
uintN count = 0;
|
|
|
|
JSScript **scriptp = bucket;
|
|
|
|
|
|
|
|
EVAL_CACHE_METER(probe);
|
|
|
|
while ((script = *scriptp) != NULL) {
|
|
|
|
if ((script->flags & JSSF_SAVED_CALLER_FUN) &&
|
|
|
|
script->version == cx->version &&
|
|
|
|
(script->principals == principals ||
|
|
|
|
(principals->subsume(principals, script->principals) &&
|
|
|
|
script->principals->subsume(script->principals, principals)))) {
|
|
|
|
/*
|
|
|
|
* Get the prior (cache-filling) eval's saved caller function.
|
2009-04-05 21:17:22 -07:00
|
|
|
* See JSCompiler::compileScript in jsparse.cpp.
|
2009-01-27 16:40:40 -08:00
|
|
|
*/
|
|
|
|
JSFunction *fun;
|
2009-09-09 16:52:55 -07:00
|
|
|
fun = script->getFunction(0);
|
2009-01-27 16:40:40 -08:00
|
|
|
|
|
|
|
if (fun == caller->fun) {
|
|
|
|
/*
|
|
|
|
* Get the source string passed for safekeeping in the
|
2009-04-05 21:17:22 -07:00
|
|
|
* atom map by the prior eval to JSCompiler::compileScript.
|
2009-01-27 16:40:40 -08:00
|
|
|
*/
|
|
|
|
JSString *src = ATOM_TO_STRING(script->atomMap.vector[0]);
|
|
|
|
|
|
|
|
if (src == str || js_EqualStrings(src, str)) {
|
|
|
|
/*
|
|
|
|
* Source matches, qualify by comparing scopeobj to the
|
|
|
|
* COMPILE_N_GO-memoized parent of the first literal
|
|
|
|
* function or regexp object if any. If none, then this
|
|
|
|
* script has no compiled-in dependencies on the prior
|
|
|
|
* eval's scopeobj.
|
|
|
|
*/
|
2009-09-09 16:52:55 -07:00
|
|
|
JSObjectArray *objarray = script->objects();
|
2009-01-27 16:40:40 -08:00
|
|
|
int i = 1;
|
|
|
|
if (objarray->length == 1) {
|
|
|
|
if (script->regexpsOffset != 0) {
|
2009-09-09 16:52:55 -07:00
|
|
|
objarray = script->regexps();
|
2009-01-27 16:40:40 -08:00
|
|
|
i = 0;
|
|
|
|
} else {
|
|
|
|
EVAL_CACHE_METER(noscope);
|
|
|
|
i = -1;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (i < 0 ||
|
|
|
|
STOBJ_GET_PARENT(objarray->vector[i]) == scopeobj) {
|
|
|
|
EVAL_CACHE_METER(hit);
|
|
|
|
*scriptp = script->u.nextToGC;
|
|
|
|
script->u.nextToGC = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (++count == EVAL_CACHE_CHAIN_LIMIT) {
|
|
|
|
script = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
EVAL_CACHE_METER(step);
|
|
|
|
scriptp = &script->u.nextToGC;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2007-10-09 15:42:42 -07:00
|
|
|
if (!script) {
|
2009-04-05 21:17:22 -07:00
|
|
|
script = JSCompiler::compileScript(cx, scopeobj, caller, principals, tcflags,
|
2009-06-10 18:29:44 -07:00
|
|
|
str->chars(), str->length(),
|
2009-04-05 21:17:22 -07:00
|
|
|
NULL, file, line, str);
|
2009-01-27 16:40:40 -08:00
|
|
|
if (!script) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
goto out;
|
|
|
|
}
|
2007-10-09 15:42:42 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
if (argc < 2) {
|
|
|
|
/* Execute using caller's new scope object (might be a Call object). */
|
|
|
|
if (caller)
|
|
|
|
scopeobj = caller->scopeChain;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Belt-and-braces: check that the lesser of eval's principals and the
|
|
|
|
* caller's principals has access to scopeobj.
|
|
|
|
*/
|
|
|
|
ok = js_CheckPrincipalsAccess(cx, scopeobj, principals,
|
|
|
|
cx->runtime->atomState.evalAtom);
|
|
|
|
if (ok)
|
|
|
|
ok = js_Execute(cx, scopeobj, script, caller, JSFRAME_EVAL, rval);
|
|
|
|
|
2009-01-27 16:40:40 -08:00
|
|
|
script->u.nextToGC = *bucket;
|
|
|
|
*bucket = script;
|
2008-08-21 05:04:20 -07:00
|
|
|
#ifdef CHECK_SCRIPT_OWNER
|
|
|
|
script->owner = NULL;
|
|
|
|
#endif
|
2007-10-09 15:42:42 -07:00
|
|
|
|
|
|
|
out:
|
|
|
|
#if JS_HAS_EVAL_THIS_SCOPE
|
|
|
|
/* Restore OBJ_GET_PARENT(scopeobj) not callerScopeChain in case of Call. */
|
|
|
|
if (setCallerScopeChain) {
|
|
|
|
caller->scopeChain = callerScopeChain;
|
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, setCallerScopeChain) == &js_WithClass);
|
2009-08-04 14:06:55 -07:00
|
|
|
setCallerScopeChain->setPrivate(NULL);
|
2007-10-09 15:42:42 -07:00
|
|
|
}
|
|
|
|
if (setCallerVarObj)
|
|
|
|
caller->varobj = callerVarObj;
|
|
|
|
#endif
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
#if JS_HAS_OBJ_WATCHPOINT
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
obj_watch_handler(JSContext *cx, JSObject *obj, jsval id, jsval old, jsval *nvp,
|
|
|
|
void *closure)
|
|
|
|
{
|
|
|
|
JSObject *callable;
|
2008-09-05 16:24:53 -07:00
|
|
|
JSSecurityCallbacks *callbacks;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSStackFrame *caller;
|
|
|
|
JSPrincipals *subject, *watcher;
|
|
|
|
JSResolvingKey key;
|
|
|
|
JSResolvingEntry *entry;
|
|
|
|
uint32 generation;
|
|
|
|
jsval argv[3];
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
callable = (JSObject *) closure;
|
|
|
|
|
2008-09-05 16:24:53 -07:00
|
|
|
callbacks = JS_GetSecurityCallbacks(cx);
|
|
|
|
if (callbacks && callbacks->findObjectPrincipals) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Skip over any obj_watch_* frames between us and the real subject. */
|
2008-12-09 08:38:32 -08:00
|
|
|
caller = js_GetScriptedCaller(cx, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (caller) {
|
|
|
|
/*
|
|
|
|
* Only call the watch handler if the watcher is allowed to watch
|
|
|
|
* the currently executing script.
|
|
|
|
*/
|
2008-09-05 16:24:53 -07:00
|
|
|
watcher = callbacks->findObjectPrincipals(cx, callable);
|
2007-03-22 10:30:00 -07:00
|
|
|
subject = JS_StackFramePrincipals(cx, caller);
|
|
|
|
|
|
|
|
if (watcher && subject && !watcher->subsume(watcher, subject)) {
|
|
|
|
/* Silently don't call the watch handler. */
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Avoid recursion on (obj, id) already being watched on cx. */
|
|
|
|
key.obj = obj;
|
|
|
|
key.id = id;
|
|
|
|
if (!js_StartResolving(cx, &key, JSRESFLAG_WATCH, &entry))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!entry)
|
|
|
|
return JS_TRUE;
|
|
|
|
generation = cx->resolvingTable->generation;
|
|
|
|
|
|
|
|
argv[0] = id;
|
|
|
|
argv[1] = old;
|
|
|
|
argv[2] = *nvp;
|
|
|
|
ok = js_InternalCall(cx, obj, OBJECT_TO_JSVAL(callable), 3, argv, nvp);
|
|
|
|
js_StopResolving(cx, &key, JSRESFLAG_WATCH, entry, generation);
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_watch(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSObject *callable;
|
|
|
|
jsval userid, value;
|
|
|
|
jsid propid;
|
2007-08-01 21:33:52 -07:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
uintN attrs;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (argc <= 1) {
|
|
|
|
js_ReportMissingArg(cx, vp, 1);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
callable = js_ValueToCallableObject(cx, &vp[3], 0);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!callable)
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
/* Compute the unique int/atom symbol id needed by js_LookupProperty. */
|
2007-08-01 21:33:52 -07:00
|
|
|
userid = vp[2];
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!JS_ValueToId(cx, userid, &propid))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj || !obj->checkAccess(cx, propid, JSACC_WATCH, &value, &attrs))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (attrs & JSPROP_READONLY)
|
|
|
|
return JS_TRUE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2008-07-01 12:47:09 -07:00
|
|
|
|
|
|
|
if (OBJ_IS_DENSE_ARRAY(cx, obj) && !js_MakeArraySlow(cx, obj))
|
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_SetWatchPoint(cx, obj, userid, obj_watch_handler, callable);
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_unwatch(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-02-17 16:12:33 -08:00
|
|
|
JSObject *obj;
|
|
|
|
|
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2008-08-08 09:02:50 -07:00
|
|
|
return JS_ClearWatchPoint(cx, obj, argc != 0 ? vp[2] : JSVAL_VOID,
|
|
|
|
NULL, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* JS_HAS_OBJ_WATCHPOINT */
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Prototype and property query methods, to complement the 'in' and
|
|
|
|
* 'instanceof' operators.
|
|
|
|
*/
|
|
|
|
|
|
|
|
/* Proposed ECMA 15.2.4.5. */
|
2008-10-08 15:08:33 -07:00
|
|
|
static JSBool
|
|
|
|
obj_hasOwnProperty(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2007-08-01 21:33:52 -07:00
|
|
|
JSObject *obj;
|
|
|
|
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
return obj &&
|
2008-08-08 09:02:50 -07:00
|
|
|
js_HasOwnPropertyHelper(cx, obj->map->ops->lookupProperty, argc, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
2008-08-08 09:02:50 -07:00
|
|
|
js_HasOwnPropertyHelper(JSContext *cx, JSLookupPropOp lookup, uintN argc,
|
|
|
|
jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsid id;
|
2008-08-08 09:02:50 -07:00
|
|
|
if (!JS_ValueToId(cx, argc != 0 ? vp[2] : JSVAL_VOID, &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2009-07-21 19:35:59 -07:00
|
|
|
|
|
|
|
JSBool found;
|
|
|
|
JSObject *obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj || !js_HasOwnProperty(cx, lookup, obj, id, &found))
|
|
|
|
return JS_FALSE;
|
|
|
|
*vp = BOOLEAN_TO_JSVAL(found);
|
|
|
|
return JS_TRUE;
|
2008-08-11 17:47:05 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_HasOwnProperty(JSContext *cx, JSLookupPropOp lookup, JSObject *obj, jsid id,
|
2009-07-21 19:35:59 -07:00
|
|
|
JSBool *foundp)
|
2008-08-11 17:47:05 -07:00
|
|
|
{
|
|
|
|
JSObject *obj2;
|
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
|
|
|
if (!lookup(cx, obj, id, &obj2, &prop))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop) {
|
2009-07-21 19:35:59 -07:00
|
|
|
*foundp = JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (obj2 == obj) {
|
2009-07-21 19:35:59 -07:00
|
|
|
*foundp = JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
} else {
|
|
|
|
JSClass *clasp;
|
|
|
|
JSExtendedClass *xclasp;
|
2007-08-17 18:24:51 -07:00
|
|
|
JSObject *outer;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-08-17 18:24:51 -07:00
|
|
|
clasp = OBJ_GET_CLASS(cx, obj2);
|
|
|
|
if (!(clasp->flags & JSCLASS_IS_EXTENDED) ||
|
|
|
|
!(xclasp = (JSExtendedClass *) clasp)->outerObject) {
|
|
|
|
outer = NULL;
|
|
|
|
} else {
|
|
|
|
outer = xclasp->outerObject(cx, obj2);
|
|
|
|
if (!outer)
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
if (outer == obj) {
|
2009-07-21 19:35:59 -07:00
|
|
|
*foundp = JS_TRUE;
|
2007-08-20 18:24:51 -07:00
|
|
|
} else if (OBJ_IS_NATIVE(obj2) && OBJ_GET_CLASS(cx, obj) == clasp) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* The combination of JSPROP_SHARED and JSPROP_PERMANENT in a
|
|
|
|
* delegated property makes that property appear to be direct in
|
|
|
|
* all delegating instances of the same native class. This hack
|
|
|
|
* avoids bloating every function instance with its own 'length'
|
|
|
|
* (AKA 'arity') property. But it must not extend across class
|
|
|
|
* boundaries, to avoid making hasOwnProperty lie (bug 320854).
|
|
|
|
*
|
|
|
|
* It's not really a hack, of course: a permanent property can't
|
|
|
|
* be deleted, and JSPROP_SHARED means "don't allocate a slot in
|
|
|
|
* any instance, prototype or delegating". Without a slot, and
|
|
|
|
* without the ability to remove and recreate (with differences)
|
|
|
|
* the property, there is no way to tell whether it is directly
|
|
|
|
* owned, or indirectly delegated.
|
|
|
|
*/
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
2009-07-21 19:35:59 -07:00
|
|
|
*foundp = SPROP_IS_SHARED_PERMANENT(sprop);
|
2007-03-22 10:30:00 -07:00
|
|
|
} else {
|
2009-07-21 19:35:59 -07:00
|
|
|
*foundp = JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
if (prop)
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2008-10-08 15:08:33 -07:00
|
|
|
#ifdef JS_TRACER
|
2009-03-19 17:19:19 -07:00
|
|
|
static JSBool FASTCALL
|
2008-10-16 12:24:10 -07:00
|
|
|
Object_p_hasOwnProperty(JSContext* cx, JSObject* obj, JSString *str)
|
2008-10-08 15:08:33 -07:00
|
|
|
{
|
2008-10-21 11:19:22 -07:00
|
|
|
jsid id;
|
2009-07-21 19:35:59 -07:00
|
|
|
JSBool found;
|
2008-10-21 11:19:22 -07:00
|
|
|
|
2009-02-03 18:49:43 -08:00
|
|
|
if (!js_ValueToStringId(cx, STRING_TO_JSVAL(str), &id) ||
|
2009-07-21 19:35:59 -07:00
|
|
|
!js_HasOwnProperty(cx, obj->map->ops->lookupProperty, obj, id, &found)) {
|
2009-04-09 16:07:00 -07:00
|
|
|
js_SetBuiltinError(cx);
|
2008-10-08 15:08:33 -07:00
|
|
|
return JSVAL_TO_BOOLEAN(JSVAL_VOID);
|
2009-02-03 18:49:43 -08:00
|
|
|
}
|
|
|
|
|
2009-07-21 19:35:59 -07:00
|
|
|
return found;
|
2008-10-08 15:08:33 -07:00
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Proposed ECMA 15.2.4.6. */
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_isPrototypeOf(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSBool b;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (!js_IsDelegate(cx, JS_THIS_OBJECT(cx, vp),
|
|
|
|
argc != 0 ? vp[2] : JSVAL_VOID, &b)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2008-08-08 09:02:50 -07:00
|
|
|
}
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = BOOLEAN_TO_JSVAL(b);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Proposed ECMA 15.2.4.7. */
|
2008-10-08 15:08:33 -07:00
|
|
|
static JSBool
|
|
|
|
obj_propertyIsEnumerable(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsid id;
|
2008-08-11 17:47:05 -07:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (!JS_ValueToId(cx, argc != 0 ? vp[2] : JSVAL_VOID, &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
2008-08-11 17:47:05 -07:00
|
|
|
return obj && js_PropertyIsEnumerable(cx, obj, id, vp);
|
|
|
|
}
|
|
|
|
|
2008-10-08 15:08:33 -07:00
|
|
|
#ifdef JS_TRACER
|
2009-03-19 17:19:19 -07:00
|
|
|
static JSBool FASTCALL
|
2008-10-16 12:24:10 -07:00
|
|
|
Object_p_propertyIsEnumerable(JSContext* cx, JSObject* obj, JSString *str)
|
2008-10-08 15:08:33 -07:00
|
|
|
{
|
|
|
|
jsid id = ATOM_TO_JSID(STRING_TO_JSVAL(str));
|
|
|
|
jsval v;
|
2009-02-03 18:49:43 -08:00
|
|
|
|
|
|
|
if (!js_PropertyIsEnumerable(cx, obj, id, &v)) {
|
2009-04-09 16:07:00 -07:00
|
|
|
js_SetBuiltinError(cx);
|
2008-10-08 15:08:33 -07:00
|
|
|
return JSVAL_TO_BOOLEAN(JSVAL_VOID);
|
2009-02-03 18:49:43 -08:00
|
|
|
}
|
|
|
|
|
2008-10-08 15:08:33 -07:00
|
|
|
JS_ASSERT(JSVAL_IS_BOOLEAN(v));
|
|
|
|
return JSVAL_TO_BOOLEAN(v);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2008-08-11 17:47:05 -07:00
|
|
|
JSBool
|
|
|
|
js_PropertyIsEnumerable(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *pobj;
|
|
|
|
uintN attrs;
|
|
|
|
JSProperty *prop;
|
|
|
|
JSBool ok;
|
|
|
|
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->lookupProperty(cx, id, &pobj, &prop))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
if (!prop) {
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* XXX ECMA spec error compatible: return false unless hasOwnProperty.
|
|
|
|
* The ECMA spec really should be fixed so propertyIsEnumerable and the
|
|
|
|
* for..in loop agree on whether prototype properties are enumerable,
|
|
|
|
* obviously by fixing this method (not by breaking the for..in loop!).
|
|
|
|
*
|
|
|
|
* We check here for shared permanent prototype properties, which should
|
|
|
|
* be treated as if they are local to obj. They are an implementation
|
|
|
|
* technique used to satisfy ECMA requirements; users should not be able
|
|
|
|
* to distinguish a shared permanent proto-property from a local one.
|
|
|
|
*/
|
2007-08-01 21:33:52 -07:00
|
|
|
if (pobj != obj &&
|
|
|
|
!(OBJ_IS_NATIVE(pobj) &&
|
2007-03-22 10:30:00 -07:00
|
|
|
SPROP_IS_SHARED_PERMANENT((JSScopeProperty *)prop))) {
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = pobj->getAttributes(cx, id, prop, &attrs);
|
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (ok)
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = BOOLEAN_TO_JSVAL((attrs & JSPROP_ENUMERATE) != 0);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
2009-01-23 15:44:01 -08:00
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_obj_defineGetter(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsval fval, junk;
|
|
|
|
jsid id;
|
2007-08-01 21:33:52 -07:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
uintN attrs;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (argc <= 1 || JS_TypeOfValue(cx, vp[3]) != JSTYPE_FUNCTION) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_BAD_GETTER_OR_SETTER,
|
|
|
|
js_getter_str);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2008-08-08 09:02:50 -07:00
|
|
|
fval = vp[3];
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
if (!JS_ValueToId(cx, vp[2], &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj || !js_CheckRedeclaration(cx, obj, id, JSPROP_GETTER, NULL, NULL))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
/*
|
|
|
|
* Getters and setters are just like watchpoints from an access
|
|
|
|
* control point of view.
|
|
|
|
*/
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->checkAccess(cx, id, JSACC_WATCH, &junk, &attrs))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->defineProperty(cx, id, JSVAL_VOID,
|
2009-08-26 14:28:36 -07:00
|
|
|
js_CastAsPropertyOp(JSVAL_TO_OBJECT(fval)), JS_PropertyStub,
|
|
|
|
JSPROP_ENUMERATE | JSPROP_GETTER | JSPROP_SHARED);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-01-23 15:44:01 -08:00
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_obj_defineSetter(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsval fval, junk;
|
|
|
|
jsid id;
|
2007-08-01 21:33:52 -07:00
|
|
|
JSObject *obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
uintN attrs;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (argc <= 1 || JS_TypeOfValue(cx, vp[3]) != JSTYPE_FUNCTION) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_BAD_GETTER_OR_SETTER,
|
|
|
|
js_setter_str);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2008-08-08 09:02:50 -07:00
|
|
|
fval = vp[3];
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-08-01 21:33:52 -07:00
|
|
|
if (!JS_ValueToId(cx, vp[2], &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
|
|
|
if (!obj || !js_CheckRedeclaration(cx, obj, id, JSPROP_SETTER, NULL, NULL))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
/*
|
|
|
|
* Getters and setters are just like watchpoints from an access
|
|
|
|
* control point of view.
|
|
|
|
*/
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->checkAccess(cx, id, JSACC_WATCH, &junk, &attrs))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->defineProperty(cx, id, JSVAL_VOID,
|
2009-08-26 14:28:36 -07:00
|
|
|
JS_PropertyStub, js_CastAsPropertyOp(JSVAL_TO_OBJECT(fval)),
|
|
|
|
JSPROP_ENUMERATE | JSPROP_SETTER | JSPROP_SHARED);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_lookupGetter(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsid id;
|
2008-02-17 16:12:33 -08:00
|
|
|
JSObject *obj, *pobj;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (!JS_ValueToId(cx, argc != 0 ? vp[2] : JSVAL_VOID, &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj || !obj->lookupProperty(cx, id, &pobj, &prop))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (prop) {
|
|
|
|
if (OBJ_IS_NATIVE(pobj)) {
|
|
|
|
sprop = (JSScopeProperty *) prop;
|
|
|
|
if (sprop->attrs & JSPROP_GETTER)
|
2009-09-03 14:41:19 -07:00
|
|
|
*vp = sprop->getterValue();
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
2007-08-01 21:33:52 -07:00
|
|
|
obj_lookupSetter(JSContext *cx, uintN argc, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
jsid id;
|
2008-02-17 16:12:33 -08:00
|
|
|
JSObject *obj, *pobj;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (!JS_ValueToId(cx, argc != 0 ? vp[2] : JSVAL_VOID, &id))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2008-02-17 16:12:33 -08:00
|
|
|
obj = JS_THIS_OBJECT(cx, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj || !obj->lookupProperty(cx, id, &pobj, &prop))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2007-08-01 21:33:52 -07:00
|
|
|
*vp = JSVAL_VOID;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (prop) {
|
|
|
|
if (OBJ_IS_NATIVE(pobj)) {
|
|
|
|
sprop = (JSScopeProperty *) prop;
|
|
|
|
if (sprop->attrs & JSPROP_SETTER)
|
2009-09-03 14:41:19 -07:00
|
|
|
*vp = sprop->setterValue();
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
#endif /* JS_HAS_GETTER_SETTER */
|
|
|
|
|
2008-08-04 16:43:12 -07:00
|
|
|
JSBool
|
|
|
|
obj_getPrototypeOf(JSContext *cx, uintN argc, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *obj;
|
|
|
|
uintN attrs;
|
|
|
|
|
2008-08-08 09:02:50 -07:00
|
|
|
if (argc == 0) {
|
|
|
|
js_ReportMissingArg(cx, vp, 0);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
2009-08-17 14:54:52 -07:00
|
|
|
if (JSVAL_IS_PRIMITIVE(vp[2])) {
|
|
|
|
char *bytes = js_DecompileValueGenerator(cx, -argc, vp[2], NULL);
|
|
|
|
if (!bytes)
|
|
|
|
return JS_FALSE;
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_UNEXPECTED_TYPE, bytes, "not an object");
|
|
|
|
JS_free(cx, bytes);
|
2008-08-04 16:43:12 -07:00
|
|
|
return JS_FALSE;
|
2009-08-17 14:54:52 -07:00
|
|
|
}
|
2008-08-04 16:43:12 -07:00
|
|
|
|
2009-08-17 14:54:52 -07:00
|
|
|
obj = JSVAL_TO_OBJECT(vp[2]);
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->checkAccess(cx, ATOM_TO_JSID(cx->runtime->atomState.protoAtom),
|
2008-08-04 16:43:12 -07:00
|
|
|
JSACC_PROTO, vp, &attrs);
|
|
|
|
}
|
|
|
|
|
2009-07-21 19:35:59 -07:00
|
|
|
static JSBool
|
|
|
|
obj_getOwnPropertyDescriptor(JSContext *cx, uintN argc, jsval *vp)
|
|
|
|
{
|
|
|
|
if (argc == 0 || JSVAL_IS_PRIMITIVE(vp[2])) {
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL, JSMSG_NOT_NONNULL_OBJECT);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *obj = JSVAL_TO_OBJECT(vp[2]);
|
|
|
|
|
|
|
|
JSAutoTempIdRooter nameidr(cx);
|
|
|
|
if (!JS_ValueToId(cx, argc >= 2 ? vp[3] : JSVAL_VOID, nameidr.addr()))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
JSBool found;
|
|
|
|
if (!js_HasOwnProperty(cx, obj->map->ops->lookupProperty, obj, nameidr.id(), &found))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!found) {
|
|
|
|
*vp = JSVAL_VOID;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
|
|
|
if (!obj->lookupProperty(cx, nameidr.id(), &pobj, &prop))
|
|
|
|
return JS_FALSE;
|
|
|
|
JS_ASSERT(prop);
|
|
|
|
|
|
|
|
JSBool ok = JS_FALSE;
|
|
|
|
uintN attrs;
|
|
|
|
JSAtomState &atomState = cx->runtime->atomState;
|
2009-09-09 17:00:26 -07:00
|
|
|
JSObject *desc;
|
2009-07-21 19:35:59 -07:00
|
|
|
MUST_FLOW_THROUGH("drop_property");
|
|
|
|
|
|
|
|
if (!pobj->getAttributes(cx, nameidr.id(), prop, &attrs))
|
|
|
|
goto drop_property;
|
|
|
|
|
|
|
|
/* We have our own property, so start creating the descriptor. */
|
2009-09-09 16:52:40 -07:00
|
|
|
desc = js_NewObject(cx, &js_ObjectClass, NULL, NULL);
|
2009-07-21 19:35:59 -07:00
|
|
|
if (!desc)
|
|
|
|
goto drop_property;
|
|
|
|
*vp = OBJECT_TO_JSVAL(desc); /* Root and return. */
|
|
|
|
|
|
|
|
if (!(attrs & (JSPROP_GETTER | JSPROP_SETTER))) {
|
|
|
|
JSAutoTempValueRooter tvr(cx);
|
|
|
|
if (!obj->getProperty(cx, nameidr.id(), tvr.addr()) ||
|
|
|
|
!desc->defineProperty(cx, ATOM_TO_JSID(atomState.valueAtom), tvr.value(),
|
|
|
|
JS_PropertyStub, JS_PropertyStub, JSPROP_ENUMERATE) ||
|
|
|
|
!desc->defineProperty(cx, ATOM_TO_JSID(atomState.writableAtom),
|
|
|
|
BOOLEAN_TO_JSVAL((attrs & JSPROP_READONLY) == 0),
|
|
|
|
JS_PropertyStub, JS_PropertyStub, JSPROP_ENUMERATE)) {
|
|
|
|
goto drop_property;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
jsval getter = JSVAL_VOID, setter = JSVAL_VOID;
|
|
|
|
if (OBJ_IS_NATIVE(obj)) {
|
|
|
|
JSScopeProperty *sprop = reinterpret_cast<JSScopeProperty *>(prop);
|
|
|
|
if (attrs & JSPROP_GETTER)
|
|
|
|
getter = js_CastAsObjectJSVal(sprop->getter);
|
|
|
|
if (attrs & JSPROP_SETTER)
|
|
|
|
setter = js_CastAsObjectJSVal(sprop->setter);
|
|
|
|
}
|
|
|
|
if (!desc->defineProperty(cx, ATOM_TO_JSID(atomState.getAtom),
|
|
|
|
getter, JS_PropertyStub, JS_PropertyStub,
|
|
|
|
JSPROP_ENUMERATE) ||
|
|
|
|
!desc->defineProperty(cx, ATOM_TO_JSID(atomState.setAtom),
|
|
|
|
setter, JS_PropertyStub, JS_PropertyStub,
|
|
|
|
JSPROP_ENUMERATE)) {
|
|
|
|
goto drop_property;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
ok = desc->defineProperty(cx, ATOM_TO_JSID(atomState.enumerableAtom),
|
|
|
|
BOOLEAN_TO_JSVAL((attrs & JSPROP_ENUMERATE) != 0),
|
|
|
|
JS_PropertyStub, JS_PropertyStub, JSPROP_ENUMERATE) &&
|
|
|
|
desc->defineProperty(cx, ATOM_TO_JSID(atomState.configurableAtom),
|
|
|
|
BOOLEAN_TO_JSVAL((attrs & JSPROP_PERMANENT) == 0),
|
|
|
|
JS_PropertyStub, JS_PropertyStub, JSPROP_ENUMERATE);
|
|
|
|
|
|
|
|
drop_property:
|
|
|
|
pobj->dropProperty(cx, prop);
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
#if JS_HAS_OBJ_WATCHPOINT
|
|
|
|
const char js_watch_str[] = "watch";
|
|
|
|
const char js_unwatch_str[] = "unwatch";
|
|
|
|
#endif
|
|
|
|
const char js_hasOwnProperty_str[] = "hasOwnProperty";
|
|
|
|
const char js_isPrototypeOf_str[] = "isPrototypeOf";
|
|
|
|
const char js_propertyIsEnumerable_str[] = "propertyIsEnumerable";
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
|
|
|
const char js_defineGetter_str[] = "__defineGetter__";
|
|
|
|
const char js_defineSetter_str[] = "__defineSetter__";
|
|
|
|
const char js_lookupGetter_str[] = "__lookupGetter__";
|
|
|
|
const char js_lookupSetter_str[] = "__lookupSetter__";
|
|
|
|
#endif
|
|
|
|
|
2008-12-16 19:03:42 -08:00
|
|
|
JS_DEFINE_TRCINFO_1(obj_valueOf,
|
2009-02-11 11:33:17 -08:00
|
|
|
(3, (static, JSVAL, Object_p_valueOf, CONTEXT, THIS, STRING, 0, 0)))
|
2008-10-21 15:58:06 -07:00
|
|
|
JS_DEFINE_TRCINFO_1(obj_hasOwnProperty,
|
2009-02-03 18:49:43 -08:00
|
|
|
(3, (static, BOOL_FAIL, Object_p_hasOwnProperty, CONTEXT, THIS, STRING, 0, 0)))
|
2008-10-21 15:58:06 -07:00
|
|
|
JS_DEFINE_TRCINFO_1(obj_propertyIsEnumerable,
|
2009-02-03 18:49:43 -08:00
|
|
|
(3, (static, BOOL_FAIL, Object_p_propertyIsEnumerable, CONTEXT, THIS, STRING, 0, 0)))
|
2008-10-08 15:08:33 -07:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
static JSFunctionSpec object_methods[] = {
|
|
|
|
#if JS_HAS_TOSOURCE
|
2008-08-11 17:47:05 -07:00
|
|
|
JS_FN(js_toSource_str, obj_toSource, 0,0),
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
2008-08-11 17:47:05 -07:00
|
|
|
JS_FN(js_toString_str, obj_toString, 0,0),
|
|
|
|
JS_FN(js_toLocaleString_str, obj_toLocaleString, 0,0),
|
2009-09-04 13:44:31 -07:00
|
|
|
JS_TN(js_valueOf_str, obj_valueOf, 0,0, &obj_valueOf_trcinfo),
|
2007-03-22 10:30:00 -07:00
|
|
|
#if JS_HAS_OBJ_WATCHPOINT
|
2008-08-11 17:47:05 -07:00
|
|
|
JS_FN(js_watch_str, obj_watch, 2,0),
|
|
|
|
JS_FN(js_unwatch_str, obj_unwatch, 1,0),
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
2009-09-04 13:44:31 -07:00
|
|
|
JS_TN(js_hasOwnProperty_str, obj_hasOwnProperty, 1,0, &obj_hasOwnProperty_trcinfo),
|
2008-08-11 17:47:05 -07:00
|
|
|
JS_FN(js_isPrototypeOf_str, obj_isPrototypeOf, 1,0),
|
2009-09-04 13:44:31 -07:00
|
|
|
JS_TN(js_propertyIsEnumerable_str, obj_propertyIsEnumerable, 1,0, &obj_propertyIsEnumerable_trcinfo),
|
2007-03-22 10:30:00 -07:00
|
|
|
#if JS_HAS_GETTER_SETTER
|
2009-01-23 15:44:01 -08:00
|
|
|
JS_FN(js_defineGetter_str, js_obj_defineGetter, 2,0),
|
|
|
|
JS_FN(js_defineSetter_str, js_obj_defineSetter, 2,0),
|
2008-08-11 17:47:05 -07:00
|
|
|
JS_FN(js_lookupGetter_str, obj_lookupGetter, 1,0),
|
|
|
|
JS_FN(js_lookupSetter_str, obj_lookupSetter, 1,0),
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
2007-08-01 21:33:52 -07:00
|
|
|
JS_FS_END
|
2007-03-22 10:30:00 -07:00
|
|
|
};
|
|
|
|
|
2008-08-04 16:43:12 -07:00
|
|
|
static JSFunctionSpec object_static_methods[] = {
|
2008-10-08 15:08:33 -07:00
|
|
|
JS_FN("getPrototypeOf", obj_getPrototypeOf, 1,0),
|
2009-07-21 19:35:59 -07:00
|
|
|
JS_FN("getOwnPropertyDescriptor", obj_getOwnPropertyDescriptor,2,0),
|
2008-08-04 16:43:12 -07:00
|
|
|
JS_FS_END
|
|
|
|
};
|
|
|
|
|
2009-07-24 03:01:37 -07:00
|
|
|
static bool
|
|
|
|
AllocSlots(JSContext *cx, JSObject *obj, size_t nslots);
|
|
|
|
|
2009-03-31 14:24:01 -07:00
|
|
|
static inline bool
|
2009-08-29 18:46:27 -07:00
|
|
|
InitScopeForObject(JSContext* cx, JSObject* obj, JSObject* proto, JSObjectOps* ops)
|
2009-03-31 14:24:01 -07:00
|
|
|
{
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(OPS_IS_NATIVE(ops));
|
|
|
|
JS_ASSERT(proto == OBJ_GET_PROTO(cx, obj));
|
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
/* Share proto's emptyScope only if obj is similar to proto. */
|
2009-08-29 18:46:27 -07:00
|
|
|
JSClass *clasp = OBJ_GET_CLASS(cx, obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
JSScope *scope;
|
|
|
|
if (proto && js_ObjectIsSimilarToProto(cx, obj, ops, clasp, proto)) {
|
|
|
|
scope = OBJ_SCOPE(proto)->getEmptyScope(cx, clasp);
|
|
|
|
if (!scope)
|
|
|
|
goto bad;
|
|
|
|
} else {
|
2009-09-02 15:58:25 -07:00
|
|
|
scope = JSScope::create(cx, ops, clasp, obj, js_GenerateShape(cx, false));
|
2009-07-21 14:25:11 -07:00
|
|
|
if (!scope)
|
|
|
|
goto bad;
|
2009-03-31 14:24:01 -07:00
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
/* Let JSScope::create set freeslot so as to reserve slots. */
|
|
|
|
JS_ASSERT(scope->freeslot >= JSSLOT_PRIVATE);
|
|
|
|
if (scope->freeslot > JS_INITIAL_NSLOTS &&
|
2009-07-24 03:01:37 -07:00
|
|
|
!AllocSlots(cx, obj, scope->freeslot)) {
|
2009-07-21 14:25:11 -07:00
|
|
|
JSScope::destroy(cx, scope);
|
|
|
|
goto bad;
|
|
|
|
}
|
2009-03-31 14:24:01 -07:00
|
|
|
}
|
2009-09-14 17:29:46 -07:00
|
|
|
obj->map = scope;
|
2009-03-31 14:24:01 -07:00
|
|
|
return true;
|
2009-05-14 03:35:23 -07:00
|
|
|
|
|
|
|
bad:
|
2009-09-14 17:29:46 -07:00
|
|
|
/* The GC nulls map initially. It should still be null on error. */
|
|
|
|
JS_ASSERT(!obj->map);
|
2009-05-14 03:35:23 -07:00
|
|
|
return false;
|
2009-03-31 14:24:01 -07:00
|
|
|
}
|
|
|
|
|
2009-07-14 17:06:09 -07:00
|
|
|
JSObject *
|
|
|
|
js_NewObjectWithGivenProto(JSContext *cx, JSClass *clasp, JSObject *proto,
|
|
|
|
JSObject *parent, size_t objectSize)
|
|
|
|
{
|
|
|
|
#ifdef INCLUDE_MOZILLA_DTRACE
|
|
|
|
if (JAVASCRIPT_OBJECT_CREATE_START_ENABLED())
|
|
|
|
jsdtrace_object_create_start(cx->fp, clasp);
|
|
|
|
#endif
|
|
|
|
|
|
|
|
/* Assert that the class is a proper class. */
|
|
|
|
JS_ASSERT_IF(clasp->flags & JSCLASS_IS_EXTENDED,
|
|
|
|
((JSExtendedClass *)clasp)->equality);
|
|
|
|
|
|
|
|
/* Always call the class's getObjectOps hook if it has one. */
|
|
|
|
JSObjectOps *ops = clasp->getObjectOps
|
|
|
|
? clasp->getObjectOps(cx, clasp)
|
|
|
|
: &js_ObjectOps;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Allocate an object from the GC heap and initialize all its fields before
|
|
|
|
* doing any operation that can potentially trigger GC. Functions have a
|
|
|
|
* larger non-standard allocation size.
|
|
|
|
*/
|
|
|
|
JSObject* obj;
|
|
|
|
if (clasp == &js_FunctionClass && !objectSize) {
|
|
|
|
obj = (JSObject*) js_NewGCFunction(cx, GCX_OBJECT);
|
|
|
|
#ifdef DEBUG
|
|
|
|
memset((uint8 *) obj + sizeof(JSObject), JS_FREE_PATTERN,
|
|
|
|
sizeof(JSFunction) - sizeof(JSObject));
|
|
|
|
#endif
|
|
|
|
} else {
|
|
|
|
JS_ASSERT(!objectSize || objectSize == sizeof(JSObject));
|
|
|
|
obj = js_NewGCObject(cx, GCX_OBJECT);
|
|
|
|
}
|
|
|
|
if (!obj)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Default parent to the parent of the prototype, which was set from
|
|
|
|
* the parent of the prototype's constructor.
|
|
|
|
*/
|
2009-09-05 08:59:11 -07:00
|
|
|
obj->init(clasp,
|
|
|
|
proto,
|
|
|
|
(!parent && proto) ? proto->getParent() : parent,
|
|
|
|
JSObject::defaultPrivate(clasp));
|
2009-07-14 17:06:09 -07:00
|
|
|
|
|
|
|
if (OPS_IS_NATIVE(ops)) {
|
2009-08-29 18:46:27 -07:00
|
|
|
if (!InitScopeForObject(cx, obj, proto, ops)) {
|
2009-07-14 17:06:09 -07:00
|
|
|
obj = NULL;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
JS_ASSERT(ops->objectMap->ops == ops);
|
|
|
|
obj->map = const_cast<JSObjectMap *>(ops->objectMap);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Check that the newborn root still holds the object. */
|
|
|
|
JS_ASSERT_IF(!cx->localRootStack, cx->weakRoots.newborn[GCX_OBJECT] == obj);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Do not call debug hooks on trace, because we might be in a non-_FAIL
|
|
|
|
* builtin. See bug 481444.
|
|
|
|
*/
|
|
|
|
if (cx->debugHooks->objectHook && !JS_ON_TRACE(cx)) {
|
|
|
|
JSAutoTempValueRooter tvr(cx, obj);
|
|
|
|
JS_KEEP_ATOMS(cx->runtime);
|
|
|
|
cx->debugHooks->objectHook(cx, obj, JS_TRUE,
|
|
|
|
cx->debugHooks->objectHookData);
|
|
|
|
JS_UNKEEP_ATOMS(cx->runtime);
|
|
|
|
cx->weakRoots.newborn[GCX_OBJECT] = obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
out:
|
|
|
|
#ifdef INCLUDE_MOZILLA_DTRACE
|
|
|
|
if (JAVASCRIPT_OBJECT_CREATE_ENABLED())
|
|
|
|
jsdtrace_object_create(cx, clasp, obj);
|
|
|
|
if (JAVASCRIPT_OBJECT_CREATE_DONE_ENABLED())
|
|
|
|
jsdtrace_object_create_done(cx->fp, clasp);
|
|
|
|
#endif
|
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_NewObject(JSContext *cx, JSClass *clasp, JSObject *proto,
|
|
|
|
JSObject *parent, size_t objectSize)
|
|
|
|
{
|
|
|
|
jsid id;
|
|
|
|
|
|
|
|
/* Bootstrap the ur-object, and make it the default prototype object. */
|
|
|
|
if (!proto) {
|
|
|
|
if (!js_GetClassId(cx, clasp, &id))
|
|
|
|
return NULL;
|
|
|
|
if (!js_GetClassPrototype(cx, parent, id, &proto))
|
|
|
|
return NULL;
|
|
|
|
if (!proto &&
|
|
|
|
!js_GetClassPrototype(cx, parent, INT_TO_JSID(JSProto_Object),
|
|
|
|
&proto)) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return js_NewObjectWithGivenProto(cx, clasp, proto, parent, objectSize);
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_Object(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
|
|
|
|
{
|
|
|
|
if (argc == 0) {
|
|
|
|
/* Trigger logic below to construct a blank object. */
|
|
|
|
obj = NULL;
|
|
|
|
} else {
|
|
|
|
/* If argv[0] is null or undefined, obj comes back null. */
|
|
|
|
if (!js_ValueToObject(cx, argv[0], &obj))
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
if (!obj) {
|
|
|
|
JS_ASSERT(!argc || JSVAL_IS_NULL(argv[0]) || JSVAL_IS_VOID(argv[0]));
|
|
|
|
if (JS_IsConstructing(cx))
|
|
|
|
return JS_TRUE;
|
|
|
|
obj = js_NewObject(cx, &js_ObjectClass, NULL, NULL);
|
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
*rval = OBJECT_TO_JSVAL(obj);
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2009-08-29 18:46:27 -07:00
|
|
|
#ifdef JS_TRACER
|
|
|
|
|
|
|
|
static inline JSObject*
|
2009-09-05 08:59:11 -07:00
|
|
|
NewNativeObject(JSContext* cx, JSClass* clasp, JSObject* proto,
|
|
|
|
JSObject *parent, jsval privateSlotValue)
|
2009-08-29 18:46:27 -07:00
|
|
|
{
|
|
|
|
JS_ASSERT(JS_ON_TRACE(cx));
|
|
|
|
JSObject* obj = js_NewGCObject(cx, GCX_OBJECT);
|
|
|
|
if (!obj)
|
|
|
|
return NULL;
|
|
|
|
|
2009-09-05 08:59:11 -07:00
|
|
|
obj->init(clasp, proto, parent, privateSlotValue);
|
2009-08-29 18:46:27 -07:00
|
|
|
return InitScopeForObject(cx, obj, proto, &js_ObjectOps) ? obj : NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject* FASTCALL
|
|
|
|
js_Object_tn(JSContext* cx, JSObject* proto)
|
|
|
|
{
|
2009-09-05 08:59:11 -07:00
|
|
|
JS_ASSERT(!(js_ObjectClass.flags & JSCLASS_HAS_PRIVATE));
|
|
|
|
return NewNativeObject(cx, &js_ObjectClass, proto, proto->getParent(),
|
|
|
|
JSVAL_VOID);
|
2009-08-29 18:46:27 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JS_DEFINE_TRCINFO_1(js_Object,
|
|
|
|
(2, (extern, CONSTRUCTOR_RETRY, js_Object_tn, CONTEXT, CALLEE_PROTOTYPE, 0, 0)))
|
|
|
|
|
|
|
|
JSObject* FASTCALL
|
|
|
|
js_NewInstance(JSContext *cx, JSClass *clasp, JSObject *ctor)
|
|
|
|
{
|
|
|
|
JS_ASSERT(HAS_FUNCTION_CLASS(ctor));
|
|
|
|
|
|
|
|
JSAtom *atom = cx->runtime->atomState.classPrototypeAtom;
|
|
|
|
|
|
|
|
JSScope *scope = OBJ_SCOPE(ctor);
|
|
|
|
#ifdef JS_THREADSAFE
|
|
|
|
if (scope->title.ownercx != cx)
|
|
|
|
return NULL;
|
|
|
|
#endif
|
|
|
|
if (!scope->owned()) {
|
|
|
|
scope = js_GetMutableScope(cx, ctor);
|
|
|
|
if (!scope)
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSScopeProperty *sprop = scope->lookup(ATOM_TO_JSID(atom));
|
|
|
|
jsval pval = sprop ? STOBJ_GET_SLOT(ctor, sprop->slot) : JSVAL_HOLE;
|
|
|
|
|
|
|
|
JSObject *proto;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(pval)) {
|
|
|
|
/* An object in ctor.prototype, let's use it as the new instance's proto. */
|
|
|
|
proto = JSVAL_TO_OBJECT(pval);
|
|
|
|
} else if (pval == JSVAL_HOLE) {
|
|
|
|
/* No ctor.prototype yet, inline and optimize fun_resolve's prototype code. */
|
|
|
|
proto = js_NewObject(cx, clasp, NULL, OBJ_GET_PARENT(cx, ctor));
|
|
|
|
if (!proto)
|
|
|
|
return NULL;
|
|
|
|
if (!js_SetClassPrototype(cx, ctor, proto, JSPROP_ENUMERATE | JSPROP_PERMANENT))
|
|
|
|
return NULL;
|
|
|
|
} else {
|
|
|
|
/* Primitive value in .prototype means we use Object.prototype for proto. */
|
|
|
|
if (!js_GetClassPrototype(cx, JSVAL_TO_OBJECT(ctor->fslots[JSSLOT_PARENT]),
|
|
|
|
INT_TO_JSID(JSProto_Object), &proto)) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-09-05 08:59:11 -07:00
|
|
|
return NewNativeObject(cx, clasp, proto, ctor->getParent(),
|
|
|
|
JSObject::defaultPrivate(clasp));
|
2009-08-29 18:46:27 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JS_DEFINE_CALLINFO_3(extern, CONSTRUCTOR_RETRY, js_NewInstance, CONTEXT, CLASS, OBJECT, 0, 0)
|
|
|
|
|
|
|
|
#else /* !JS_TRACER */
|
|
|
|
|
|
|
|
# define js_Object_trcinfo NULL
|
|
|
|
|
|
|
|
#endif /* !JS_TRACER */
|
|
|
|
|
2009-01-02 13:11:46 -08:00
|
|
|
/*
|
|
|
|
* Given pc pointing after a property accessing bytecode, return true if the
|
|
|
|
* access is "object-detecting" in the sense used by web scripts, e.g., when
|
|
|
|
* checking whether document.all is defined.
|
|
|
|
*/
|
2009-07-05 21:42:13 -07:00
|
|
|
JS_REQUIRES_STACK JSBool
|
2009-01-02 13:11:46 -08:00
|
|
|
Detecting(JSContext *cx, jsbytecode *pc)
|
|
|
|
{
|
|
|
|
JSScript *script;
|
2009-02-20 16:22:51 -08:00
|
|
|
jsbytecode *endpc;
|
2009-01-02 13:11:46 -08:00
|
|
|
JSOp op;
|
|
|
|
JSAtom *atom;
|
|
|
|
|
|
|
|
script = cx->fp->script;
|
2009-02-20 16:22:51 -08:00
|
|
|
endpc = script->code + script->length;
|
2009-02-18 16:31:09 -08:00
|
|
|
for (;; pc += js_CodeSpec[op].length) {
|
2009-08-13 14:07:13 -07:00
|
|
|
JS_ASSERT_IF(!cx->fp->imacpc, script->code <= pc && pc < endpc);
|
2009-02-20 16:22:51 -08:00
|
|
|
|
2009-01-02 13:11:46 -08:00
|
|
|
/* General case: a branch or equality op follows the access. */
|
2009-02-18 16:31:09 -08:00
|
|
|
op = js_GetOpcode(cx, script, pc);
|
2009-01-02 13:11:46 -08:00
|
|
|
if (js_CodeSpec[op].format & JOF_DETECTING)
|
|
|
|
return JS_TRUE;
|
|
|
|
|
|
|
|
switch (op) {
|
|
|
|
case JSOP_NULL:
|
|
|
|
/*
|
|
|
|
* Special case #1: handle (document.all == null). Don't sweat
|
|
|
|
* about JS1.2's revision of the equality operators here.
|
|
|
|
*/
|
2009-02-20 16:22:51 -08:00
|
|
|
if (++pc < endpc) {
|
|
|
|
op = js_GetOpcode(cx, script, pc);
|
|
|
|
return *pc == JSOP_EQ || *pc == JSOP_NE;
|
|
|
|
}
|
|
|
|
return JS_FALSE;
|
2009-01-02 13:11:46 -08:00
|
|
|
|
|
|
|
case JSOP_NAME:
|
|
|
|
/*
|
|
|
|
* Special case #2: handle (document.all == undefined). Don't
|
|
|
|
* worry about someone redefining undefined, which was added by
|
|
|
|
* Edition 3, so is read/write for backward compatibility.
|
|
|
|
*/
|
|
|
|
GET_ATOM_FROM_BYTECODE(script, pc, 0, atom);
|
2009-02-20 16:22:51 -08:00
|
|
|
if (atom == cx->runtime->atomState.typeAtoms[JSTYPE_VOID] &&
|
|
|
|
(pc += js_CodeSpec[op].length) < endpc) {
|
2009-02-18 16:31:09 -08:00
|
|
|
op = js_GetOpcode(cx, script, pc);
|
2009-01-02 13:11:46 -08:00
|
|
|
return op == JSOP_EQ || op == JSOP_NE ||
|
|
|
|
op == JSOP_STRICTEQ || op == JSOP_STRICTNE;
|
|
|
|
}
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
default:
|
|
|
|
/*
|
|
|
|
* At this point, anything but an extended atom index prefix means
|
|
|
|
* we're not detecting.
|
|
|
|
*/
|
|
|
|
if (!(js_CodeSpec[op].format & JOF_INDEXBASE))
|
|
|
|
return JS_FALSE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Infer lookup flags from the currently executing bytecode. This does
|
|
|
|
* not attempt to infer JSRESOLVE_WITH, because the current bytecode
|
|
|
|
* does not indicate whether we are in a with statement. Return defaultFlags
|
|
|
|
* if a currently executing bytecode cannot be determined.
|
|
|
|
*/
|
2009-07-05 21:42:13 -07:00
|
|
|
uintN
|
|
|
|
js_InferFlags(JSContext *cx, uintN defaultFlags)
|
2009-01-02 13:11:46 -08:00
|
|
|
{
|
2009-07-05 22:01:21 -07:00
|
|
|
#ifdef JS_TRACER
|
2009-07-05 21:42:13 -07:00
|
|
|
if (JS_ON_TRACE(cx))
|
|
|
|
return cx->bailExit->lookupFlags;
|
2009-07-05 22:01:21 -07:00
|
|
|
#endif
|
2009-07-05 21:42:13 -07:00
|
|
|
|
|
|
|
JS_ASSERT_NOT_ON_TRACE(cx);
|
|
|
|
|
2009-01-02 13:11:46 -08:00
|
|
|
JSStackFrame *fp;
|
|
|
|
jsbytecode *pc;
|
|
|
|
const JSCodeSpec *cs;
|
|
|
|
uint32 format;
|
|
|
|
uintN flags = 0;
|
|
|
|
|
|
|
|
fp = js_GetTopStackFrame(cx);
|
|
|
|
if (!fp || !fp->regs)
|
|
|
|
return defaultFlags;
|
|
|
|
pc = fp->regs->pc;
|
2009-02-18 16:31:09 -08:00
|
|
|
cs = &js_CodeSpec[js_GetOpcode(cx, fp->script, pc)];
|
2009-01-02 13:11:46 -08:00
|
|
|
format = cs->format;
|
|
|
|
if (JOF_MODE(format) != JOF_NAME)
|
|
|
|
flags |= JSRESOLVE_QUALIFIED;
|
|
|
|
if ((format & (JOF_SET | JOF_FOR)) ||
|
|
|
|
(fp->flags & JSFRAME_ASSIGNING)) {
|
|
|
|
flags |= JSRESOLVE_ASSIGNING;
|
2009-09-04 17:47:23 -07:00
|
|
|
} else if (cs->length >= 0) {
|
2009-01-02 13:11:46 -08:00
|
|
|
pc += cs->length;
|
2009-02-20 16:22:51 -08:00
|
|
|
if (pc < cx->fp->script->code + cx->fp->script->length && Detecting(cx, pc))
|
2009-01-02 13:11:46 -08:00
|
|
|
flags |= JSRESOLVE_DETECTING;
|
|
|
|
}
|
|
|
|
if (format & JOF_DECLARING)
|
|
|
|
flags |= JSRESOLVE_DECLARING;
|
|
|
|
return flags;
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* ObjectOps and Class for with-statement stack objects.
|
|
|
|
*/
|
|
|
|
static JSBool
|
|
|
|
with_LookupProperty(JSContext *cx, JSObject *obj, jsid id, JSObject **objp,
|
|
|
|
JSProperty **propp)
|
|
|
|
{
|
2009-01-02 13:11:46 -08:00
|
|
|
/* Fixes bug 463997 */
|
|
|
|
uintN flags = cx->resolveFlags;
|
|
|
|
if (flags == JSRESOLVE_INFER)
|
2009-07-05 21:42:13 -07:00
|
|
|
flags = js_InferFlags(cx, flags);
|
2009-01-02 13:11:46 -08:00
|
|
|
flags |= JSRESOLVE_WITH;
|
|
|
|
JSAutoResolveFlags rf(cx, flags);
|
2007-03-22 10:30:00 -07:00
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_LookupProperty(cx, obj, id, objp, propp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->lookupProperty(cx, id, objp, propp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_GetProperty(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_GetProperty(cx, obj, id, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->getProperty(cx, id, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_SetProperty(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_SetProperty(cx, obj, id, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->setProperty(cx, id, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_GetAttributes(JSContext *cx, JSObject *obj, jsid id, JSProperty *prop,
|
|
|
|
uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_GetAttributes(cx, obj, id, prop, attrsp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->getAttributes(cx, id, prop, attrsp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_SetAttributes(JSContext *cx, JSObject *obj, jsid id, JSProperty *prop,
|
|
|
|
uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_SetAttributes(cx, obj, id, prop, attrsp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->setAttributes(cx, id, prop, attrsp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_DeleteProperty(JSContext *cx, JSObject *obj, jsid id, jsval *rval)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_DeleteProperty(cx, obj, id, rval);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->deleteProperty(cx, id, rval);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_DefaultValue(JSContext *cx, JSObject *obj, JSType hint, jsval *vp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_DefaultValue(cx, obj, hint, vp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->defaultValue(cx, hint, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_Enumerate(JSContext *cx, JSObject *obj, JSIterateOp enum_op,
|
|
|
|
jsval *statep, jsid *idp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_Enumerate(cx, obj, enum_op, statep, idp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->enumerate(cx, enum_op, statep, idp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
with_CheckAccess(JSContext *cx, JSObject *obj, jsid id, JSAccessMode mode,
|
|
|
|
jsval *vp, uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return js_CheckAccess(cx, obj, id, mode, vp, attrsp);
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->checkAccess(cx, id, mode, vp, attrsp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSObject *
|
|
|
|
with_ThisObject(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
|
|
|
JSObject *proto = OBJ_GET_PROTO(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
return obj;
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->thisObject(cx);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JS_FRIEND_DATA(JSObjectOps) js_WithObjectOps = {
|
2009-05-14 03:35:23 -07:00
|
|
|
NULL,
|
2007-03-22 10:30:00 -07:00
|
|
|
with_LookupProperty, js_DefineProperty,
|
|
|
|
with_GetProperty, with_SetProperty,
|
|
|
|
with_GetAttributes, with_SetAttributes,
|
|
|
|
with_DeleteProperty, with_DefaultValue,
|
|
|
|
with_Enumerate, with_CheckAccess,
|
|
|
|
with_ThisObject, NATIVE_DROP_PROPERTY,
|
|
|
|
NULL, NULL,
|
2009-04-01 05:32:51 -07:00
|
|
|
NULL, js_TraceObject,
|
2009-08-27 22:53:26 -07:00
|
|
|
js_Clear
|
2007-03-22 10:30:00 -07:00
|
|
|
};
|
|
|
|
|
|
|
|
static JSObjectOps *
|
|
|
|
with_getObjectOps(JSContext *cx, JSClass *clasp)
|
|
|
|
{
|
|
|
|
return &js_WithObjectOps;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSClass js_WithClass = {
|
|
|
|
"With",
|
|
|
|
JSCLASS_HAS_PRIVATE | JSCLASS_HAS_RESERVED_SLOTS(1) | JSCLASS_IS_ANONYMOUS,
|
|
|
|
JS_PropertyStub, JS_PropertyStub, JS_PropertyStub, JS_PropertyStub,
|
2009-07-22 09:23:21 -07:00
|
|
|
JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, NULL,
|
2007-03-22 10:30:00 -07:00
|
|
|
with_getObjectOps,
|
|
|
|
0,0,0,0,0,0,0
|
|
|
|
};
|
|
|
|
|
2008-12-09 08:38:32 -08:00
|
|
|
JS_REQUIRES_STACK JSObject *
|
2007-03-22 10:30:00 -07:00
|
|
|
js_NewWithObject(JSContext *cx, JSObject *proto, JSObject *parent, jsint depth)
|
|
|
|
{
|
|
|
|
JSObject *obj;
|
|
|
|
|
2009-07-14 17:06:09 -07:00
|
|
|
obj = js_NewObject(cx, &js_WithClass, proto, parent);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!obj)
|
|
|
|
return NULL;
|
2009-08-04 14:06:55 -07:00
|
|
|
obj->setPrivate(cx->fp);
|
2007-03-22 10:30:00 -07:00
|
|
|
OBJ_SET_BLOCK_DEPTH(cx, obj, depth);
|
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_NewBlockObject(JSContext *cx)
|
|
|
|
{
|
|
|
|
/*
|
|
|
|
* Null obj's proto slot so that Object.prototype.* does not pollute block
|
2009-05-06 16:03:10 -07:00
|
|
|
* scopes and to give the block object its own scope.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2009-07-21 14:25:11 -07:00
|
|
|
JSObject *blockObj = js_NewObjectWithGivenProto(cx, &js_BlockClass, NULL, NULL);
|
2009-05-06 16:03:10 -07:00
|
|
|
JS_ASSERT_IF(blockObj, !OBJ_IS_CLONED_BLOCK(blockObj));
|
|
|
|
return blockObj;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
2009-07-21 14:25:11 -07:00
|
|
|
js_CloneBlockObject(JSContext *cx, JSObject *proto, JSStackFrame *fp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_ASSERT(!OBJ_IS_CLONED_BLOCK(proto));
|
2009-07-21 14:25:11 -07:00
|
|
|
JS_ASSERT(STOBJ_GET_CLASS(proto) == &js_BlockClass);
|
|
|
|
|
|
|
|
JSObject *clone = js_NewGCObject(cx, GCX_OBJECT);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!clone)
|
|
|
|
return NULL;
|
2009-07-21 14:25:11 -07:00
|
|
|
|
|
|
|
JSScope *scope = OBJ_SCOPE(proto);
|
|
|
|
scope->hold();
|
2009-09-09 13:53:37 -07:00
|
|
|
JS_ASSERT(!scope->owned());
|
2009-09-14 17:29:46 -07:00
|
|
|
clone->map = scope;
|
2009-07-21 14:25:11 -07:00
|
|
|
|
|
|
|
clone->classword = jsuword(&js_BlockClass);
|
2009-08-27 22:53:26 -07:00
|
|
|
clone->setProto(proto);
|
|
|
|
clone->setParent(NULL); // caller's responsibility
|
2009-08-04 14:06:55 -07:00
|
|
|
clone->setPrivate(fp);
|
2009-07-21 14:25:11 -07:00
|
|
|
clone->fslots[JSSLOT_BLOCK_DEPTH] = proto->fslots[JSSLOT_BLOCK_DEPTH];
|
|
|
|
JS_ASSERT(scope->freeslot == JSSLOT_BLOCK_DEPTH + 1);
|
|
|
|
for (uint32 i = JSSLOT_BLOCK_DEPTH + 1; i < JS_INITIAL_NSLOTS; ++i)
|
|
|
|
clone->fslots[i] = JSVAL_VOID;
|
|
|
|
clone->dslots = NULL;
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_ASSERT(OBJ_IS_CLONED_BLOCK(clone));
|
2007-03-22 10:30:00 -07:00
|
|
|
return clone;
|
|
|
|
}
|
|
|
|
|
2008-12-09 08:38:32 -08:00
|
|
|
JS_REQUIRES_STACK JSBool
|
2008-02-19 04:16:26 -08:00
|
|
|
js_PutBlockObject(JSContext *cx, JSBool normalUnwind)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2007-07-13 14:23:39 -07:00
|
|
|
JSStackFrame *fp;
|
2008-02-19 04:16:26 -08:00
|
|
|
JSObject *obj;
|
2008-05-01 14:59:52 -07:00
|
|
|
uintN depth, count;
|
|
|
|
|
|
|
|
/* Blocks have one fixed slot available for the first local.*/
|
|
|
|
JS_STATIC_ASSERT(JS_INITIAL_NSLOTS == JSSLOT_BLOCK_DEPTH + 2);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-02-19 04:16:26 -08:00
|
|
|
fp = cx->fp;
|
|
|
|
obj = fp->scopeChain;
|
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, obj) == &js_BlockClass);
|
2009-09-05 08:59:11 -07:00
|
|
|
JS_ASSERT(obj->getPrivate() == cx->fp);
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_ASSERT(OBJ_IS_CLONED_BLOCK(obj));
|
2008-02-20 01:24:02 -08:00
|
|
|
|
2008-05-01 14:59:52 -07:00
|
|
|
/*
|
|
|
|
* Block objects should never be exposed to scripts. Thus the clone should
|
|
|
|
* not own the property map and rather always share it with the prototype
|
2009-05-14 03:35:23 -07:00
|
|
|
* object. This allows us to skip updating OBJ_SCOPE(obj)->freeslot after
|
2008-05-01 14:59:52 -07:00
|
|
|
* we copy the stack slots into reserved slots.
|
|
|
|
*/
|
|
|
|
JS_ASSERT(OBJ_SCOPE(obj)->object != obj);
|
2008-02-20 01:24:02 -08:00
|
|
|
|
2008-05-01 14:59:52 -07:00
|
|
|
/* Block objects should not have reserved slots before they are put. */
|
|
|
|
JS_ASSERT(STOBJ_NSLOTS(obj) == JS_INITIAL_NSLOTS);
|
|
|
|
|
|
|
|
/* The block and its locals must be on the current stack for GC safety. */
|
|
|
|
depth = OBJ_BLOCK_DEPTH(cx, obj);
|
|
|
|
count = OBJ_BLOCK_COUNT(cx, obj);
|
2008-07-20 13:13:17 -07:00
|
|
|
JS_ASSERT(depth <= (size_t) (fp->regs->sp - StackBase(fp)));
|
|
|
|
JS_ASSERT(count <= (size_t) (fp->regs->sp - StackBase(fp) - depth));
|
2008-05-01 14:59:52 -07:00
|
|
|
|
2009-09-09 17:23:42 -07:00
|
|
|
/* See comments in CheckDestructuring from jsparse.cpp. */
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_ASSERT(count >= 1);
|
|
|
|
|
2008-07-20 13:13:17 -07:00
|
|
|
depth += fp->script->nfixed;
|
|
|
|
obj->fslots[JSSLOT_BLOCK_DEPTH + 1] = fp->slots[depth];
|
2008-05-01 14:59:52 -07:00
|
|
|
if (normalUnwind && count > 1) {
|
|
|
|
--count;
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
2009-07-24 03:01:37 -07:00
|
|
|
if (!AllocSlots(cx, obj, JS_INITIAL_NSLOTS + count))
|
2008-05-01 14:59:52 -07:00
|
|
|
normalUnwind = JS_FALSE;
|
|
|
|
else
|
2008-07-20 13:13:17 -07:00
|
|
|
memcpy(obj->dslots, fp->slots + depth + 1, count * sizeof(jsval));
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-02-15 03:38:40 -08:00
|
|
|
/* We must clear the private slot even with errors. */
|
2009-08-04 14:06:55 -07:00
|
|
|
obj->setPrivate(NULL);
|
2008-02-19 04:16:26 -08:00
|
|
|
fp->scopeChain = OBJ_GET_PARENT(cx, obj);
|
2008-02-15 03:38:40 -08:00
|
|
|
return normalUnwind;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
block_getProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
2009-09-09 13:53:37 -07:00
|
|
|
/*
|
|
|
|
* Block objects are never exposed to script, and the engine handles them
|
|
|
|
* with care. So unlike other getters, this one can assert (rather than
|
|
|
|
* check) certain invariants about obj.
|
|
|
|
*/
|
|
|
|
JS_ASSERT(obj->getClass() == &js_BlockClass);
|
2008-05-01 14:59:52 -07:00
|
|
|
JS_ASSERT(OBJ_IS_CLONED_BLOCK(obj));
|
2009-09-09 13:53:37 -07:00
|
|
|
uintN index = (uintN) JSVAL_TO_INT(id);
|
|
|
|
JS_ASSERT(index < OBJ_BLOCK_COUNT(cx, obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-08-04 14:06:55 -07:00
|
|
|
JSStackFrame *fp = (JSStackFrame *) obj->getPrivate();
|
2008-05-01 14:59:52 -07:00
|
|
|
if (fp) {
|
2008-07-20 13:13:17 -07:00
|
|
|
index += fp->script->nfixed + OBJ_BLOCK_DEPTH(cx, obj);
|
|
|
|
JS_ASSERT(index < fp->script->nslots);
|
|
|
|
*vp = fp->slots[index];
|
2009-09-09 13:53:37 -07:00
|
|
|
return true;
|
2008-05-01 14:59:52 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-09-09 13:53:37 -07:00
|
|
|
/* Values are in reserved slots immediately following DEPTH. */
|
|
|
|
uint32 slot = JSSLOT_BLOCK_DEPTH + 1 + index;
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
JS_ASSERT(slot < STOBJ_NSLOTS(obj));
|
|
|
|
*vp = STOBJ_GET_SLOT(obj, slot);
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
block_setProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
2009-09-09 13:53:37 -07:00
|
|
|
JS_ASSERT(obj->getClass() == &js_BlockClass);
|
|
|
|
JS_ASSERT(OBJ_IS_CLONED_BLOCK(obj));
|
|
|
|
uintN index = (uintN) JSVAL_TO_INT(id);
|
|
|
|
JS_ASSERT(index < OBJ_BLOCK_COUNT(cx, obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-08-04 14:06:55 -07:00
|
|
|
JSStackFrame *fp = (JSStackFrame *) obj->getPrivate();
|
2008-05-01 14:59:52 -07:00
|
|
|
if (fp) {
|
2008-07-20 13:13:17 -07:00
|
|
|
index += fp->script->nfixed + OBJ_BLOCK_DEPTH(cx, obj);
|
|
|
|
JS_ASSERT(index < fp->script->nslots);
|
|
|
|
fp->slots[index] = *vp;
|
2009-09-09 13:53:37 -07:00
|
|
|
return true;
|
2008-05-01 14:59:52 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-09-09 13:53:37 -07:00
|
|
|
/* Values are in reserved slots immediately following DEPTH. */
|
|
|
|
uint32 slot = JSSLOT_BLOCK_DEPTH + 1 + index;
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
JS_ASSERT(slot < STOBJ_NSLOTS(obj));
|
|
|
|
STOBJ_SET_SLOT(obj, slot, *vp);
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_DefineBlockVariable(JSContext *cx, JSObject *obj, jsid id, int16 index)
|
|
|
|
{
|
|
|
|
JS_ASSERT(obj->getClass() == &js_BlockClass);
|
|
|
|
JS_ASSERT(!OBJ_IS_CLONED_BLOCK(obj));
|
|
|
|
|
|
|
|
/* Use JSPROP_ENUMERATE to aid the disassembler. */
|
|
|
|
return js_DefineNativeProperty(cx, obj, id, JSVAL_VOID,
|
|
|
|
block_getProperty, block_setProperty,
|
|
|
|
JSPROP_ENUMERATE | JSPROP_PERMANENT | JSPROP_SHARED,
|
|
|
|
SPROP_HAS_SHORTID, index, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#if JS_HAS_XDR
|
|
|
|
|
2007-07-08 02:03:34 -07:00
|
|
|
#define NO_PARENT_INDEX ((uint32)-1)
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-07-08 02:03:34 -07:00
|
|
|
uint32
|
|
|
|
FindObjectIndex(JSObjectArray *array, JSObject *obj)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
size_t i;
|
|
|
|
|
2007-07-08 02:03:34 -07:00
|
|
|
if (array) {
|
|
|
|
i = array->length;
|
|
|
|
do {
|
|
|
|
|
|
|
|
if (array->vector[--i] == obj)
|
|
|
|
return i;
|
|
|
|
} while (i != 0);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
return NO_PARENT_INDEX;
|
|
|
|
}
|
|
|
|
|
2009-05-06 16:03:10 -07:00
|
|
|
JSBool
|
|
|
|
js_XDRBlockObject(JSXDRState *xdr, JSObject **objp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSContext *cx;
|
2007-07-08 02:03:34 -07:00
|
|
|
uint32 parentId;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSObject *obj, *parent;
|
|
|
|
uint16 depth, count, i;
|
|
|
|
uint32 tmp;
|
|
|
|
JSTempValueRooter tvr;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
jsid propid;
|
|
|
|
JSAtom *atom;
|
|
|
|
int16 shortid;
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
cx = xdr->cx;
|
|
|
|
#ifdef __GNUC__
|
|
|
|
obj = NULL; /* quell GCC overwarning */
|
|
|
|
#endif
|
|
|
|
|
|
|
|
if (xdr->mode == JSXDR_ENCODE) {
|
|
|
|
obj = *objp;
|
|
|
|
parent = OBJ_GET_PARENT(cx, obj);
|
2007-07-08 02:03:34 -07:00
|
|
|
parentId = (xdr->script->objectsOffset == 0)
|
|
|
|
? NO_PARENT_INDEX
|
2009-09-09 16:52:55 -07:00
|
|
|
: FindObjectIndex(xdr->script->objects(), parent);
|
2007-06-18 12:33:21 -07:00
|
|
|
depth = (uint16)OBJ_BLOCK_DEPTH(cx, obj);
|
|
|
|
count = (uint16)OBJ_BLOCK_COUNT(cx, obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
tmp = (uint32)(depth << 16) | count;
|
|
|
|
}
|
|
|
|
#ifdef __GNUC__ /* suppress bogus gcc warnings */
|
|
|
|
else count = 0;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
/* First, XDR the parent atomid. */
|
|
|
|
if (!JS_XDRUint32(xdr, &parentId))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
if (xdr->mode == JSXDR_DECODE) {
|
|
|
|
obj = js_NewBlockObject(cx);
|
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
|
|
|
*objp = obj;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If there's a parent id, then get the parent out of our script's
|
2007-07-08 02:03:34 -07:00
|
|
|
* object array. We know that we XDR block object in outer-to-inner
|
|
|
|
* order, which means that getting the parent now will work.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2007-07-08 02:03:34 -07:00
|
|
|
if (parentId == NO_PARENT_INDEX)
|
2007-03-22 10:30:00 -07:00
|
|
|
parent = NULL;
|
2007-07-08 02:03:34 -07:00
|
|
|
else
|
2009-09-09 16:52:55 -07:00
|
|
|
parent = xdr->script->getObject(parentId);
|
2007-03-22 10:30:00 -07:00
|
|
|
STOBJ_SET_PARENT(obj, parent);
|
|
|
|
}
|
|
|
|
|
|
|
|
JS_PUSH_SINGLE_TEMP_ROOT(cx, OBJECT_TO_JSVAL(obj), &tvr);
|
|
|
|
|
|
|
|
if (!JS_XDRUint32(xdr, &tmp)) {
|
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (xdr->mode == JSXDR_DECODE) {
|
|
|
|
depth = (uint16)(tmp >> 16);
|
|
|
|
count = (uint16)tmp;
|
|
|
|
STOBJ_SET_SLOT(obj, JSSLOT_BLOCK_DEPTH, INT_TO_JSVAL(depth));
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* XDR the block object's properties. We know that there are 'count'
|
|
|
|
* properties to XDR, stored as id/shortid pairs. We do not XDR any
|
|
|
|
* non-native properties, only those that the compiler created.
|
|
|
|
*/
|
|
|
|
sprop = NULL;
|
|
|
|
ok = JS_TRUE;
|
|
|
|
for (i = 0; i < count; i++) {
|
|
|
|
if (xdr->mode == JSXDR_ENCODE) {
|
|
|
|
/* Find a property to XDR. */
|
|
|
|
do {
|
|
|
|
/* If sprop is NULL, this is the first property. */
|
|
|
|
sprop = sprop ? sprop->parent : OBJ_SCOPE(obj)->lastProp;
|
|
|
|
} while (!(sprop->flags & SPROP_HAS_SHORTID));
|
|
|
|
|
2009-09-09 13:53:37 -07:00
|
|
|
JS_ASSERT(sprop->getter == block_getProperty);
|
2007-03-22 10:30:00 -07:00
|
|
|
propid = sprop->id;
|
|
|
|
JS_ASSERT(JSID_IS_ATOM(propid));
|
|
|
|
atom = JSID_TO_ATOM(propid);
|
|
|
|
shortid = sprop->shortid;
|
|
|
|
JS_ASSERT(shortid >= 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* XDR the real id, then the shortid. */
|
|
|
|
if (!js_XDRStringAtom(xdr, &atom) ||
|
|
|
|
!JS_XDRUint16(xdr, (uint16 *)&shortid)) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (xdr->mode == JSXDR_DECODE) {
|
2009-09-09 13:53:37 -07:00
|
|
|
if (!js_DefineBlockVariable(cx, obj, ATOM_TO_JSID(atom), shortid)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
ok = JS_FALSE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-08-20 10:25:09 -07:00
|
|
|
if (xdr->mode == JSXDR_DECODE) {
|
|
|
|
/* Do as the parser does and make this block scope shareable. */
|
|
|
|
OBJ_SCOPE(obj)->object = NULL;
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
2008-05-01 14:59:52 -07:00
|
|
|
static uint32
|
|
|
|
block_reserveSlots(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
|
|
|
return OBJ_IS_CLONED_BLOCK(obj) ? OBJ_BLOCK_COUNT(cx, obj) : 0;
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JSClass js_BlockClass = {
|
|
|
|
"Block",
|
2009-05-06 16:03:10 -07:00
|
|
|
JSCLASS_HAS_PRIVATE | JSCLASS_HAS_RESERVED_SLOTS(1) | JSCLASS_IS_ANONYMOUS,
|
2009-09-09 13:53:37 -07:00
|
|
|
JS_PropertyStub, JS_PropertyStub, JS_PropertyStub, JS_PropertyStub,
|
2009-07-22 09:23:21 -07:00
|
|
|
JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, NULL,
|
2009-05-06 16:03:10 -07:00
|
|
|
NULL, NULL, NULL, NULL, NULL, NULL, NULL, block_reserveSlots
|
2007-03-22 10:30:00 -07:00
|
|
|
};
|
|
|
|
|
|
|
|
JSObject *
|
2008-04-14 17:31:43 -07:00
|
|
|
js_InitEval(JSContext *cx, JSObject *obj)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2007-06-04 16:03:03 -07:00
|
|
|
/* ECMA (15.1.2.1) says 'eval' is a property of the global object. */
|
|
|
|
if (!js_DefineFunction(cx, obj, cx->runtime->atomState.evalAtom,
|
2008-10-08 15:08:33 -07:00
|
|
|
obj_eval, 1, 0)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
2008-04-14 17:31:43 -07:00
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_InitObjectClass(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
2009-03-04 19:26:16 -08:00
|
|
|
return js_InitClass(cx, obj, NULL, &js_ObjectClass, js_Object, 1,
|
2009-05-05 14:26:06 -07:00
|
|
|
object_props, object_methods, NULL, object_static_methods);
|
2009-03-04 19:26:16 -08:00
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_InitClass(JSContext *cx, JSObject *obj, JSObject *parent_proto,
|
|
|
|
JSClass *clasp, JSNative constructor, uintN nargs,
|
|
|
|
JSPropertySpec *ps, JSFunctionSpec *fs,
|
2009-05-05 14:26:06 -07:00
|
|
|
JSPropertySpec *static_ps, JSFunctionSpec *static_fs)
|
2009-03-04 19:26:16 -08:00
|
|
|
{
|
|
|
|
JSAtom *atom;
|
|
|
|
JSProtoKey key;
|
|
|
|
JSObject *proto, *ctor;
|
|
|
|
JSTempValueRooter tvr;
|
|
|
|
jsval cval, rval;
|
|
|
|
JSBool named;
|
|
|
|
JSFunction *fun;
|
|
|
|
|
|
|
|
atom = js_Atomize(cx, clasp->name, strlen(clasp->name), 0);
|
|
|
|
if (!atom)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* When initializing a standard class, if no parent_proto (grand-proto of
|
|
|
|
* instances of the class, parent-proto of the class's prototype object)
|
|
|
|
* is given, we must use Object.prototype if it is available. Otherwise,
|
|
|
|
* we could look up the wrong binding for a class name in obj. Example:
|
|
|
|
*
|
|
|
|
* String = Array;
|
|
|
|
* print("hi there".join);
|
|
|
|
*
|
|
|
|
* should print undefined, not Array.prototype.join. This is required by
|
|
|
|
* ECMA-262, alas. It might have been better to make String readonly and
|
|
|
|
* permanent in the global object, instead -- but that's too big a change
|
|
|
|
* to swallow at this point.
|
|
|
|
*/
|
|
|
|
key = JSCLASS_CACHED_PROTO_KEY(clasp);
|
|
|
|
if (key != JSProto_Null &&
|
|
|
|
!parent_proto &&
|
|
|
|
!js_GetClassPrototype(cx, obj, INT_TO_JSID(JSProto_Object),
|
|
|
|
&parent_proto)) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Create a prototype object for this class. */
|
2009-07-14 17:06:09 -07:00
|
|
|
proto = js_NewObject(cx, clasp, parent_proto, obj);
|
2009-03-04 19:26:16 -08:00
|
|
|
if (!proto)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
/* After this point, control must exit via label bad or out. */
|
|
|
|
JS_PUSH_TEMP_ROOT_OBJECT(cx, proto, &tvr);
|
|
|
|
|
|
|
|
if (!constructor) {
|
|
|
|
/*
|
|
|
|
* Lacking a constructor, name the prototype (e.g., Math) unless this
|
|
|
|
* class (a) is anonymous, i.e. for internal use only; (b) the class
|
|
|
|
* of obj (the global object) is has a reserved slot indexed by key;
|
|
|
|
* and (c) key is not the null key.
|
|
|
|
*/
|
|
|
|
if ((clasp->flags & JSCLASS_IS_ANONYMOUS) &&
|
|
|
|
(OBJ_GET_CLASS(cx, obj)->flags & JSCLASS_IS_GLOBAL) &&
|
|
|
|
key != JSProto_Null) {
|
|
|
|
named = JS_FALSE;
|
|
|
|
} else {
|
2009-08-11 13:05:44 -07:00
|
|
|
named = obj->defineProperty(cx, ATOM_TO_JSID(atom),
|
2009-03-04 19:26:16 -08:00
|
|
|
OBJECT_TO_JSVAL(proto),
|
|
|
|
JS_PropertyStub, JS_PropertyStub,
|
|
|
|
(clasp->flags & JSCLASS_IS_ANONYMOUS)
|
|
|
|
? JSPROP_READONLY | JSPROP_PERMANENT
|
2009-08-26 14:28:36 -07:00
|
|
|
: 0);
|
2009-03-04 19:26:16 -08:00
|
|
|
if (!named)
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
|
|
|
|
ctor = proto;
|
|
|
|
} else {
|
|
|
|
/* Define the constructor function in obj's scope. */
|
|
|
|
fun = js_DefineFunction(cx, obj, atom, constructor, nargs,
|
|
|
|
JSFUN_STUB_GSOPS);
|
|
|
|
named = (fun != NULL);
|
|
|
|
if (!fun)
|
|
|
|
goto bad;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Remember the class this function is a constructor for so that
|
|
|
|
* we know to create an object of this class when we call the
|
|
|
|
* constructor.
|
|
|
|
*/
|
|
|
|
FUN_CLASP(fun) = clasp;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Optionally construct the prototype object, before the class has
|
|
|
|
* been fully initialized. Allow the ctor to replace proto with a
|
|
|
|
* different object, as is done for operator new -- and as at least
|
|
|
|
* XML support requires.
|
|
|
|
*/
|
|
|
|
ctor = FUN_OBJECT(fun);
|
|
|
|
if (clasp->flags & JSCLASS_CONSTRUCT_PROTOTYPE) {
|
|
|
|
cval = OBJECT_TO_JSVAL(ctor);
|
|
|
|
if (!js_InternalConstruct(cx, proto, cval, 0, NULL, &rval))
|
|
|
|
goto bad;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(rval) && JSVAL_TO_OBJECT(rval) != proto)
|
|
|
|
proto = JSVAL_TO_OBJECT(rval);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Connect constructor and prototype by named properties. */
|
|
|
|
if (!js_SetClassPrototype(cx, ctor, proto,
|
|
|
|
JSPROP_READONLY | JSPROP_PERMANENT)) {
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Bootstrap Function.prototype (see also JS_InitStandardClasses). */
|
|
|
|
if (OBJ_GET_CLASS(cx, ctor) == clasp)
|
|
|
|
OBJ_SET_PROTO(cx, ctor, proto);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Add properties and methods to the prototype and the constructor. */
|
|
|
|
if ((ps && !JS_DefineProperties(cx, proto, ps)) ||
|
|
|
|
(fs && !JS_DefineFunctions(cx, proto, fs)) ||
|
|
|
|
(static_ps && !JS_DefineProperties(cx, ctor, static_ps)) ||
|
|
|
|
(static_fs && !JS_DefineFunctions(cx, ctor, static_fs))) {
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* If this is a standard class, cache its prototype. */
|
|
|
|
if (key != JSProto_Null && !js_SetClassObject(cx, obj, key, ctor))
|
|
|
|
goto bad;
|
|
|
|
|
|
|
|
out:
|
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
return proto;
|
|
|
|
|
|
|
|
bad:
|
|
|
|
if (named)
|
2009-08-11 13:05:44 -07:00
|
|
|
(void) obj->deleteProperty(cx, ATOM_TO_JSID(atom), &rval);
|
2009-03-04 19:26:16 -08:00
|
|
|
proto = NULL;
|
|
|
|
goto out;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#define SLOTS_TO_DYNAMIC_WORDS(nslots) \
|
|
|
|
(JS_ASSERT((nslots) > JS_INITIAL_NSLOTS), (nslots) + 1 - JS_INITIAL_NSLOTS)
|
|
|
|
|
|
|
|
#define DYNAMIC_WORDS_TO_SLOTS(words) \
|
|
|
|
(JS_ASSERT((words) > 1), (words) - 1 + JS_INITIAL_NSLOTS)
|
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
|
2009-07-24 03:01:37 -07:00
|
|
|
static bool
|
|
|
|
AllocSlots(JSContext *cx, JSObject *obj, size_t nslots)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-07-16 18:42:54 -07:00
|
|
|
JS_ASSERT(!obj->dslots);
|
|
|
|
JS_ASSERT(nslots > JS_INITIAL_NSLOTS);
|
|
|
|
|
|
|
|
jsval* slots;
|
2009-07-27 21:10:12 -07:00
|
|
|
slots = (jsval*) cx->malloc(SLOTS_TO_DYNAMIC_WORDS(nslots) * sizeof(jsval));
|
2009-07-16 18:42:54 -07:00
|
|
|
if (!slots)
|
|
|
|
return true;
|
|
|
|
|
|
|
|
*slots++ = nslots;
|
|
|
|
/* clear the newly allocated cells. */
|
|
|
|
for (jsuint n = JS_INITIAL_NSLOTS; n < nslots; ++n)
|
|
|
|
slots[n - JS_INITIAL_NSLOTS] = JSVAL_VOID;
|
|
|
|
obj->dslots = slots;
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
bool
|
|
|
|
js_GrowSlots(JSContext *cx, JSObject *obj, size_t nslots)
|
|
|
|
{
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* Minimal number of dynamic slots to allocate.
|
|
|
|
*/
|
2009-07-16 18:42:54 -07:00
|
|
|
const size_t MIN_DYNAMIC_WORDS = 4;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* The limit to switch to linear allocation strategy from the power of 2
|
|
|
|
* growth no to waste too much memory.
|
|
|
|
*/
|
2009-07-16 18:42:54 -07:00
|
|
|
const size_t LINEAR_GROWTH_STEP = JS_BIT(16);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
/* If we are allocating fslots, there is nothing to do. */
|
|
|
|
if (nslots <= JS_INITIAL_NSLOTS)
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
size_t nwords = SLOTS_TO_DYNAMIC_WORDS(nslots);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
/*
|
|
|
|
* Round up nslots so the number of bytes in dslots array is power
|
|
|
|
* of 2 to ensure exponential grouth.
|
|
|
|
*/
|
|
|
|
uintN log;
|
|
|
|
if (nwords <= MIN_DYNAMIC_WORDS) {
|
|
|
|
nwords = MIN_DYNAMIC_WORDS;
|
|
|
|
} else if (nwords < LINEAR_GROWTH_STEP) {
|
|
|
|
JS_CEILING_LOG2(log, nwords);
|
|
|
|
nwords = JS_BIT(log);
|
2007-03-22 10:30:00 -07:00
|
|
|
} else {
|
2009-07-16 18:42:54 -07:00
|
|
|
nwords = JS_ROUNDUP(nwords, LINEAR_GROWTH_STEP);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
nslots = DYNAMIC_WORDS_TO_SLOTS(nwords);
|
2009-07-16 18:42:54 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* If nothing was allocated yet, treat it as initial allocation (but with
|
|
|
|
* the exponential growth algorithm applied).
|
|
|
|
*/
|
|
|
|
jsval* slots = obj->dslots;
|
|
|
|
if (!slots)
|
2009-07-24 03:01:37 -07:00
|
|
|
return AllocSlots(cx, obj, nslots);
|
2009-07-16 18:42:54 -07:00
|
|
|
|
|
|
|
size_t oslots = size_t(slots[-1]);
|
|
|
|
|
2009-07-27 21:10:12 -07:00
|
|
|
slots = (jsval*) cx->realloc(slots - 1, nwords * sizeof(jsval));
|
2009-07-16 18:42:54 -07:00
|
|
|
*slots++ = nslots;
|
2007-03-22 10:30:00 -07:00
|
|
|
obj->dslots = slots;
|
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
/* Initialize the additional slots we added. */
|
|
|
|
JS_ASSERT(nslots > oslots);
|
|
|
|
for (size_t i = oslots; i < nslots; i++)
|
2007-03-22 10:30:00 -07:00
|
|
|
slots[i - JS_INITIAL_NSLOTS] = JSVAL_VOID;
|
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
js_ShrinkSlots(JSContext *cx, JSObject *obj, size_t nslots)
|
|
|
|
{
|
|
|
|
jsval* slots = obj->dslots;
|
|
|
|
|
|
|
|
/* Nothing to shrink? */
|
|
|
|
if (!slots)
|
|
|
|
return;
|
|
|
|
|
|
|
|
JS_ASSERT(size_t(slots[-1]) > JS_INITIAL_NSLOTS);
|
|
|
|
JS_ASSERT(nslots <= size_t(slots[-1]));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-07-16 18:42:54 -07:00
|
|
|
if (nslots <= JS_INITIAL_NSLOTS) {
|
2009-07-27 21:10:12 -07:00
|
|
|
cx->free(slots - 1);
|
2009-07-16 18:42:54 -07:00
|
|
|
obj->dslots = NULL;
|
|
|
|
} else {
|
|
|
|
size_t nwords = SLOTS_TO_DYNAMIC_WORDS(nslots);
|
2009-07-27 21:10:12 -07:00
|
|
|
slots = (jsval*) cx->realloc(slots - 1, nwords * sizeof(jsval));
|
2009-07-16 18:42:54 -07:00
|
|
|
*slots++ = nslots;
|
|
|
|
obj->dslots = slots;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-07-24 03:01:37 -07:00
|
|
|
bool
|
|
|
|
js_EnsureReservedSlots(JSContext *cx, JSObject *obj, size_t nreserved)
|
|
|
|
{
|
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
|
|
|
JS_ASSERT(!obj->dslots);
|
|
|
|
|
|
|
|
uintN nslots = JSSLOT_FREE(STOBJ_GET_CLASS(obj)) + nreserved;
|
|
|
|
if (nslots > STOBJ_NSLOTS(obj) && !AllocSlots(cx, obj, nslots))
|
|
|
|
return false;
|
|
|
|
|
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
|
|
|
if (scope->owned()) {
|
|
|
|
#ifdef JS_THREADSAFE
|
|
|
|
JS_ASSERT(scope->title.ownercx->thread == cx->thread);
|
|
|
|
#endif
|
|
|
|
JS_ASSERT(scope->freeslot == JSSLOT_FREE(STOBJ_GET_CLASS(obj)));
|
|
|
|
if (scope->freeslot < nslots)
|
|
|
|
scope->freeslot = nslots;
|
|
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
extern JSBool
|
|
|
|
js_GetClassId(JSContext *cx, JSClass *clasp, jsid *idp)
|
|
|
|
{
|
|
|
|
JSProtoKey key;
|
|
|
|
JSAtom *atom;
|
|
|
|
|
|
|
|
key = JSCLASS_CACHED_PROTO_KEY(clasp);
|
|
|
|
if (key != JSProto_Null) {
|
|
|
|
*idp = INT_TO_JSID(key);
|
|
|
|
} else if (clasp->flags & JSCLASS_IS_ANONYMOUS) {
|
|
|
|
*idp = INT_TO_JSID(JSProto_Object);
|
|
|
|
} else {
|
|
|
|
atom = js_Atomize(cx, clasp->name, strlen(clasp->name), 0);
|
|
|
|
if (!atom)
|
|
|
|
return JS_FALSE;
|
|
|
|
*idp = ATOM_TO_JSID(atom);
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2009-08-29 18:46:27 -07:00
|
|
|
JSObject*
|
2009-09-05 08:59:11 -07:00
|
|
|
js_NewNativeObject(JSContext *cx, JSClass *clasp, JSObject *proto,
|
|
|
|
jsval privateSlotValue)
|
2009-03-04 19:26:16 -08:00
|
|
|
{
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(!clasp->getObjectOps);
|
2009-08-29 18:46:27 -07:00
|
|
|
JS_ASSERT(proto->map->ops == &js_ObjectOps);
|
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, proto) == clasp);
|
2009-05-14 03:35:23 -07:00
|
|
|
|
2009-07-14 17:06:09 -07:00
|
|
|
JSObject* obj = js_NewGCObject(cx, GCX_OBJECT);
|
2009-03-04 19:26:16 -08:00
|
|
|
if (!obj)
|
|
|
|
return NULL;
|
|
|
|
|
2009-08-29 18:46:27 -07:00
|
|
|
JSScope *scope = OBJ_SCOPE(proto)->getEmptyScope(cx, clasp);
|
|
|
|
if (!scope) {
|
2009-09-14 17:29:46 -07:00
|
|
|
JS_ASSERT(!obj->map);
|
2009-08-29 18:46:27 -07:00
|
|
|
return NULL;
|
|
|
|
}
|
2009-09-14 17:29:46 -07:00
|
|
|
obj->map = scope;
|
2009-09-05 08:59:11 -07:00
|
|
|
obj->init(clasp, proto, proto->getParent(), privateSlotValue);
|
2009-08-29 18:46:27 -07:00
|
|
|
return obj;
|
2009-03-04 19:26:16 -08:00
|
|
|
}
|
|
|
|
|
2007-07-05 13:37:47 -07:00
|
|
|
JS_BEGIN_EXTERN_C
|
|
|
|
|
2008-09-06 15:21:43 -07:00
|
|
|
static JSObject *
|
2007-03-22 10:30:00 -07:00
|
|
|
js_InitNullClass(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
|
|
|
JS_ASSERT(0);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define JS_PROTO(name,code,init) extern JSObject *init(JSContext *, JSObject *);
|
|
|
|
#include "jsproto.tbl"
|
|
|
|
#undef JS_PROTO
|
|
|
|
|
|
|
|
static JSObjectOp lazy_prototype_init[JSProto_LIMIT] = {
|
|
|
|
#define JS_PROTO(name,code,init) init,
|
|
|
|
#include "jsproto.tbl"
|
|
|
|
#undef JS_PROTO
|
|
|
|
};
|
|
|
|
|
2007-07-05 13:37:47 -07:00
|
|
|
JS_END_EXTERN_C
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JSBool
|
|
|
|
js_GetClassObject(JSContext *cx, JSObject *obj, JSProtoKey key,
|
|
|
|
JSObject **objp)
|
|
|
|
{
|
|
|
|
JSBool ok;
|
|
|
|
JSObject *tmp, *cobj;
|
|
|
|
JSResolvingKey rkey;
|
|
|
|
JSResolvingEntry *rentry;
|
|
|
|
uint32 generation;
|
|
|
|
JSObjectOp init;
|
|
|
|
jsval v;
|
|
|
|
|
|
|
|
while ((tmp = OBJ_GET_PARENT(cx, obj)) != NULL)
|
|
|
|
obj = tmp;
|
|
|
|
if (!(OBJ_GET_CLASS(cx, obj)->flags & JSCLASS_IS_GLOBAL)) {
|
|
|
|
*objp = NULL;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
ok = JS_GetReservedSlot(cx, obj, key, &v);
|
|
|
|
if (!ok)
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(v)) {
|
|
|
|
*objp = JSVAL_TO_OBJECT(v);
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
rkey.obj = obj;
|
|
|
|
rkey.id = ATOM_TO_JSID(cx->runtime->atomState.classAtoms[key]);
|
|
|
|
if (!js_StartResolving(cx, &rkey, JSRESFLAG_LOOKUP, &rentry))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!rentry) {
|
|
|
|
/* Already caching key in obj -- suppress recursion. */
|
|
|
|
*objp = NULL;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
generation = cx->resolvingTable->generation;
|
|
|
|
|
|
|
|
cobj = NULL;
|
|
|
|
init = lazy_prototype_init[key];
|
|
|
|
if (init) {
|
|
|
|
if (!init(cx, obj)) {
|
|
|
|
ok = JS_FALSE;
|
|
|
|
} else {
|
|
|
|
ok = JS_GetReservedSlot(cx, obj, key, &v);
|
|
|
|
if (ok && !JSVAL_IS_PRIMITIVE(v))
|
|
|
|
cobj = JSVAL_TO_OBJECT(v);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
js_StopResolving(cx, &rkey, JSRESFLAG_LOOKUP, rentry, generation);
|
|
|
|
*objp = cobj;
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_SetClassObject(JSContext *cx, JSObject *obj, JSProtoKey key, JSObject *cobj)
|
|
|
|
{
|
|
|
|
JS_ASSERT(!OBJ_GET_PARENT(cx, obj));
|
|
|
|
if (!(OBJ_GET_CLASS(cx, obj)->flags & JSCLASS_IS_GLOBAL))
|
|
|
|
return JS_TRUE;
|
|
|
|
|
|
|
|
return JS_SetReservedSlot(cx, obj, key, OBJECT_TO_JSVAL(cobj));
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_FindClassObject(JSContext *cx, JSObject *start, jsid id, jsval *vp)
|
|
|
|
{
|
2008-12-09 08:38:32 -08:00
|
|
|
JSStackFrame *fp;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSObject *obj, *cobj, *pobj;
|
|
|
|
JSProtoKey key;
|
|
|
|
JSProperty *prop;
|
2007-12-11 02:09:58 -08:00
|
|
|
jsval v;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
2008-12-09 08:38:32 -08:00
|
|
|
/*
|
|
|
|
* Find the global object. Use cx->fp directly to avoid falling off
|
|
|
|
* trace; all JIT-elided stack frames have the same global object as
|
|
|
|
* cx->fp.
|
|
|
|
*/
|
|
|
|
VOUCH_DOES_NOT_REQUIRE_STACK();
|
|
|
|
if (!start && (fp = cx->fp) != NULL)
|
|
|
|
start = fp->scopeChain;
|
|
|
|
|
|
|
|
if (start) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Find the topmost object in the scope chain. */
|
|
|
|
do {
|
|
|
|
obj = start;
|
|
|
|
start = OBJ_GET_PARENT(cx, obj);
|
|
|
|
} while (start);
|
|
|
|
} else {
|
|
|
|
obj = cx->globalObject;
|
|
|
|
if (!obj) {
|
|
|
|
*vp = JSVAL_VOID;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
OBJ_TO_INNER_OBJECT(cx, obj);
|
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
if (JSID_IS_INT(id)) {
|
2007-07-05 13:37:47 -07:00
|
|
|
key = (JSProtoKey) JSID_TO_INT(id);
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ASSERT(key != JSProto_Null);
|
|
|
|
if (!js_GetClassObject(cx, obj, key, &cobj))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (cobj) {
|
|
|
|
*vp = OBJECT_TO_JSVAL(cobj);
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
id = ATOM_TO_JSID(cx->runtime->atomState.classAtoms[key]);
|
|
|
|
}
|
|
|
|
|
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
if (js_LookupPropertyWithFlags(cx, obj, id, JSRESOLVE_CLASSNAME,
|
|
|
|
&pobj, &prop) < 0) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2007-12-11 02:09:58 -08:00
|
|
|
v = JSVAL_VOID;
|
|
|
|
if (prop) {
|
|
|
|
if (OBJ_IS_NATIVE(pobj)) {
|
|
|
|
sprop = (JSScopeProperty *) prop;
|
|
|
|
if (SPROP_HAS_VALID_SLOT(sprop, OBJ_SCOPE(pobj))) {
|
|
|
|
v = LOCKED_OBJ_GET_SLOT(pobj, sprop->slot);
|
|
|
|
if (JSVAL_IS_PRIMITIVE(v))
|
2007-12-20 15:29:31 -08:00
|
|
|
v = JSVAL_VOID;
|
2007-12-11 02:09:58 -08:00
|
|
|
}
|
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2007-12-11 02:09:58 -08:00
|
|
|
*vp = v;
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_ConstructObject(JSContext *cx, JSClass *clasp, JSObject *proto,
|
|
|
|
JSObject *parent, uintN argc, jsval *argv)
|
|
|
|
{
|
|
|
|
jsid id;
|
|
|
|
jsval cval, rval;
|
|
|
|
JSTempValueRooter argtvr, tvr;
|
|
|
|
JSObject *obj, *ctor;
|
|
|
|
|
|
|
|
JS_PUSH_TEMP_ROOT(cx, argc, argv, &argtvr);
|
|
|
|
|
|
|
|
if (!js_GetClassId(cx, clasp, &id) ||
|
|
|
|
!js_FindClassObject(cx, parent, id, &cval)) {
|
|
|
|
JS_POP_TEMP_ROOT(cx, &argtvr);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (JSVAL_IS_PRIMITIVE(cval)) {
|
|
|
|
js_ReportIsNotFunction(cx, &cval, JSV2F_CONSTRUCT | JSV2F_SEARCH_STACK);
|
|
|
|
JS_POP_TEMP_ROOT(cx, &argtvr);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Protect cval in case a crazy getter for .prototype uproots it. After
|
|
|
|
* this point, all control flow must exit through label out with obj set.
|
|
|
|
*/
|
|
|
|
JS_PUSH_SINGLE_TEMP_ROOT(cx, cval, &tvr);
|
2008-09-08 10:51:10 -07:00
|
|
|
MUST_FLOW_THROUGH("out");
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* If proto or parent are NULL, set them to Constructor.prototype and/or
|
|
|
|
* Constructor.__parent__, just like JSOP_NEW does.
|
|
|
|
*/
|
|
|
|
ctor = JSVAL_TO_OBJECT(cval);
|
|
|
|
if (!parent)
|
|
|
|
parent = OBJ_GET_PARENT(cx, ctor);
|
|
|
|
if (!proto) {
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!ctor->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.classPrototypeAtom),
|
|
|
|
&rval)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
obj = NULL;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
if (JSVAL_IS_OBJECT(rval))
|
|
|
|
proto = JSVAL_TO_OBJECT(rval);
|
|
|
|
}
|
|
|
|
|
2009-07-14 17:06:09 -07:00
|
|
|
obj = js_NewObject(cx, clasp, proto, parent);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!obj)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
if (!js_InternalConstruct(cx, obj, cval, argc, argv, &rval))
|
|
|
|
goto bad;
|
|
|
|
|
|
|
|
if (JSVAL_IS_PRIMITIVE(rval))
|
|
|
|
goto out;
|
|
|
|
obj = JSVAL_TO_OBJECT(rval);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If the instance's class differs from what was requested, throw a type
|
|
|
|
* error. If the given class has both the JSCLASS_HAS_PRIVATE and the
|
|
|
|
* JSCLASS_CONSTRUCT_PROTOTYPE flags, and the instance does not have its
|
|
|
|
* private data set at this point, then the constructor was replaced and
|
|
|
|
* we should throw a type error.
|
|
|
|
*/
|
|
|
|
if (OBJ_GET_CLASS(cx, obj) != clasp ||
|
|
|
|
(!(~clasp->flags & (JSCLASS_HAS_PRIVATE |
|
|
|
|
JSCLASS_CONSTRUCT_PROTOTYPE)) &&
|
2009-08-04 14:06:55 -07:00
|
|
|
!obj->getPrivate())) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_WRONG_CONSTRUCTOR, clasp->name);
|
|
|
|
goto bad;
|
|
|
|
}
|
|
|
|
|
|
|
|
out:
|
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
JS_POP_TEMP_ROOT(cx, &argtvr);
|
|
|
|
return obj;
|
|
|
|
|
|
|
|
bad:
|
|
|
|
cx->weakRoots.newborn[GCX_OBJECT] = NULL;
|
|
|
|
obj = NULL;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* XXXbe if one adds props, deletes earlier props, adds more, the last added
|
|
|
|
won't recycle the deleted props' slots. */
|
|
|
|
JSBool
|
|
|
|
js_AllocSlot(JSContext *cx, JSObject *obj, uint32 *slotp)
|
|
|
|
{
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-05-14 03:35:23 -07:00
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2009-08-27 22:53:26 -07:00
|
|
|
JSClass *clasp = obj->getClass();
|
2009-05-14 03:35:23 -07:00
|
|
|
if (scope->freeslot == JSSLOT_FREE(clasp) && clasp->reserveSlots) {
|
|
|
|
/* Adjust scope->freeslot to include computed reserved slots, if any. */
|
|
|
|
scope->freeslot += clasp->reserveSlots(cx, obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-05-14 03:35:23 -07:00
|
|
|
if (scope->freeslot >= STOBJ_NSLOTS(obj) &&
|
2009-07-16 18:42:54 -07:00
|
|
|
!js_GrowSlots(cx, obj, scope->freeslot + 1)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
2008-05-01 14:59:52 -07:00
|
|
|
/* js_ReallocSlots or js_FreeSlot should set the free slots to void. */
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(JSVAL_IS_VOID(STOBJ_GET_SLOT(obj, scope->freeslot)));
|
|
|
|
*slotp = scope->freeslot++;
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
js_FreeSlot(JSContext *cx, JSObject *obj, uint32 slot)
|
|
|
|
{
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-05-14 03:35:23 -07:00
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
LOCKED_OBJ_SET_SLOT(obj, slot, JSVAL_VOID);
|
2009-07-16 18:42:54 -07:00
|
|
|
if (scope->freeslot == slot + 1)
|
2009-05-14 03:35:23 -07:00
|
|
|
scope->freeslot = slot;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-07-11 15:41:32 -07:00
|
|
|
|
|
|
|
/* JSVAL_INT_MAX as a string */
|
|
|
|
#define JSVAL_INT_MAX_STRING "1073741823"
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Convert string indexes that convert to int jsvals as ints to save memory.
|
|
|
|
* Care must be taken to use this macro every time a property name is used, or
|
|
|
|
* else double-sets, incorrect property cache misses, or other mistakes could
|
|
|
|
* occur.
|
|
|
|
*/
|
2008-02-10 17:12:29 -08:00
|
|
|
jsid
|
2009-07-11 15:41:32 -07:00
|
|
|
js_CheckForStringIndex(jsid id)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-07-11 15:41:32 -07:00
|
|
|
if (!JSID_IS_ATOM(id))
|
|
|
|
return id;
|
|
|
|
|
|
|
|
JSAtom *atom = JSID_TO_ATOM(id);
|
|
|
|
JSString *str = ATOM_TO_STRING(atom);
|
|
|
|
const jschar *s = str->flatChars();
|
|
|
|
jschar ch = *s;
|
|
|
|
|
|
|
|
JSBool negative = (ch == '-');
|
|
|
|
if (negative)
|
|
|
|
ch = *++s;
|
|
|
|
|
|
|
|
if (!JS7_ISDEC(ch))
|
|
|
|
return id;
|
|
|
|
|
|
|
|
size_t n = str->flatLength() - negative;
|
|
|
|
if (n > sizeof(JSVAL_INT_MAX_STRING) - 1)
|
|
|
|
return id;
|
|
|
|
|
|
|
|
const jschar *cp = s;
|
|
|
|
const jschar *end = s + n;
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
jsuint index = JS7_UNDEC(*cp++);
|
|
|
|
jsuint oldIndex = 0;
|
|
|
|
jsuint c = 0;
|
|
|
|
|
|
|
|
if (index != 0) {
|
|
|
|
while (JS7_ISDEC(*cp)) {
|
|
|
|
oldIndex = index;
|
|
|
|
c = JS7_UNDEC(*cp);
|
|
|
|
index = 10 * index + c;
|
|
|
|
cp++;
|
|
|
|
}
|
|
|
|
}
|
2008-11-21 11:47:35 -08:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Non-integer indexes can't be represented as integers. Also, distinguish
|
|
|
|
* index "-0" from "0", because JSVAL_INT cannot.
|
|
|
|
*/
|
|
|
|
if (cp != end || (negative && index == 0))
|
|
|
|
return id;
|
2009-07-11 15:41:32 -07:00
|
|
|
|
2008-11-21 11:47:35 -08:00
|
|
|
if (oldIndex < JSVAL_INT_MAX / 10 ||
|
|
|
|
(oldIndex == JSVAL_INT_MAX / 10 && c <= (JSVAL_INT_MAX % 10))) {
|
2007-03-22 10:30:00 -07:00
|
|
|
if (negative)
|
|
|
|
index = 0 - index;
|
|
|
|
id = INT_TO_JSID((jsint)index);
|
|
|
|
}
|
2009-07-11 15:41:32 -07:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
return id;
|
|
|
|
}
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
static JSBool
|
|
|
|
PurgeProtoChain(JSContext *cx, JSObject *obj, jsid id)
|
|
|
|
{
|
|
|
|
JSScope *scope;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
|
|
|
while (obj) {
|
|
|
|
if (!OBJ_IS_NATIVE(obj)) {
|
|
|
|
obj = OBJ_GET_PROTO(cx, obj);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = OBJ_SCOPE(obj);
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->lookup(id);
|
2008-02-07 15:18:45 -08:00
|
|
|
if (sprop) {
|
2008-08-21 03:47:33 -07:00
|
|
|
PCMETER(JS_PROPERTY_CACHE(cx).pcpurges++);
|
2009-07-09 13:27:21 -07:00
|
|
|
scope->shadowingShapeChange(cx, sprop);
|
2008-02-07 15:18:45 -08:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-04-06 13:24:34 -07:00
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
if (!STOBJ_GET_PARENT(obj)) {
|
2009-04-06 13:24:34 -07:00
|
|
|
/*
|
|
|
|
* All scope chains end in a global object, so this will change
|
|
|
|
* the global shape. jstracer.cpp assumes that the global shape
|
|
|
|
* never changes on trace, so we must deep-bail here.
|
|
|
|
*/
|
|
|
|
js_LeaveTrace(cx);
|
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
2009-08-27 22:53:26 -07:00
|
|
|
obj = obj->getProto();
|
2008-02-07 15:18:45 -08:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
}
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
2009-03-06 16:34:19 -08:00
|
|
|
void
|
|
|
|
js_PurgeScopeChainHelper(JSContext *cx, JSObject *obj, jsid id)
|
2008-02-07 15:18:45 -08:00
|
|
|
{
|
2009-08-27 22:53:26 -07:00
|
|
|
JS_ASSERT(obj->isDelegate());
|
|
|
|
PurgeProtoChain(cx, obj->getProto(), id);
|
2009-05-15 02:43:19 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* We must purge the scope chain only for Call objects as they are the only
|
|
|
|
* kind of cacheable non-global object that can gain properties after outer
|
|
|
|
* properties with the same names have been cached or traced. Call objects
|
|
|
|
* may gain such properties via eval introducing new vars; see bug 490364.
|
|
|
|
*/
|
|
|
|
if (STOBJ_GET_CLASS(obj) == &js_CallClass) {
|
|
|
|
while ((obj = OBJ_GET_PARENT(cx, obj)) != NULL) {
|
|
|
|
if (PurgeProtoChain(cx, obj, id))
|
|
|
|
break;
|
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JSScopeProperty *
|
|
|
|
js_AddNativeProperty(JSContext *cx, JSObject *obj, jsid id,
|
|
|
|
JSPropertyOp getter, JSPropertyOp setter, uint32 slot,
|
|
|
|
uintN attrs, uintN flags, intN shortid)
|
|
|
|
{
|
|
|
|
JSScope *scope;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
JS_ASSERT(!(flags & SPROP_IS_METHOD));
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/*
|
|
|
|
* Purge the property cache of now-shadowed id in obj's scope chain. Do
|
|
|
|
* this optimistically (assuming no failure below) before locking obj, so
|
|
|
|
* we can lock the shadowed scope.
|
|
|
|
*/
|
2009-03-06 16:34:19 -08:00
|
|
|
js_PurgeScopeChain(cx, obj, id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = js_GetMutableScope(cx, obj);
|
|
|
|
if (!scope) {
|
|
|
|
sprop = NULL;
|
|
|
|
} else {
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->add(cx, id, getter, setter, slot, attrs, flags, shortid);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return sprop;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSScopeProperty *
|
|
|
|
js_ChangeNativePropertyAttrs(JSContext *cx, JSObject *obj,
|
|
|
|
JSScopeProperty *sprop, uintN attrs, uintN mask,
|
|
|
|
JSPropertyOp getter, JSPropertyOp setter)
|
|
|
|
{
|
|
|
|
JSScope *scope;
|
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = js_GetMutableScope(cx, obj);
|
|
|
|
if (!scope) {
|
|
|
|
sprop = NULL;
|
|
|
|
} else {
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->change(cx, sprop, attrs, mask, getter, setter);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return sprop;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_DefineProperty(JSContext *cx, JSObject *obj, jsid id, jsval value,
|
2009-08-26 14:28:36 -07:00
|
|
|
JSPropertyOp getter, JSPropertyOp setter, uintN attrs)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-04-30 15:52:13 -07:00
|
|
|
return js_DefineNativeProperty(cx, obj, id, value, getter, setter, attrs,
|
2009-08-26 14:28:36 -07:00
|
|
|
0, 0, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Backward compatibility requires allowing addProperty hooks to mutate the
|
|
|
|
* nominal initial value of a slot-full property, while GC safety wants that
|
|
|
|
* value to be stored before the call-out through the hook. Optimize to do
|
|
|
|
* both while saving cycles for classes that stub their addProperty hook.
|
|
|
|
*/
|
2009-09-03 14:41:19 -07:00
|
|
|
static inline bool
|
|
|
|
AddPropertyHelper(JSContext *cx, JSClass *clasp, JSObject *obj, JSScope *scope,
|
|
|
|
JSScopeProperty *sprop, jsval *vp)
|
|
|
|
{
|
|
|
|
if (clasp->addProperty != JS_PropertyStub) {
|
|
|
|
jsval nominal = *vp;
|
|
|
|
|
|
|
|
if (!clasp->addProperty(cx, obj, SPROP_USERID(sprop), vp))
|
|
|
|
return false;
|
|
|
|
if (*vp != nominal) {
|
|
|
|
if (SPROP_HAS_VALID_SLOT(sprop, scope))
|
|
|
|
LOCKED_OBJ_SET_SLOT(obj, sprop->slot, *vp);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-30 15:52:13 -07:00
|
|
|
JSBool
|
2007-03-22 10:30:00 -07:00
|
|
|
js_DefineNativeProperty(JSContext *cx, JSObject *obj, jsid id, jsval value,
|
|
|
|
JSPropertyOp getter, JSPropertyOp setter, uintN attrs,
|
2009-02-03 23:14:36 -08:00
|
|
|
uintN flags, intN shortid, JSProperty **propp,
|
2009-05-15 02:43:19 -07:00
|
|
|
uintN defineHow /* = 0 */)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
JSScope *scope;
|
|
|
|
JSScopeProperty *sprop;
|
2009-07-21 14:25:11 -07:00
|
|
|
JSBool added;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
JS_ASSERT((defineHow & ~(JSDNP_CACHE_RESULT | JSDNP_DONT_PURGE | JSDNP_SET_METHOD)) == 0);
|
2009-04-17 15:25:25 -07:00
|
|
|
js_LeaveTraceIfGlobalObject(cx, obj);
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
#if JS_HAS_GETTER_SETTER
|
|
|
|
/*
|
|
|
|
* If defining a getter or setter, we must check for its counterpart and
|
|
|
|
* update the attributes and property ops. A getter or setter is really
|
|
|
|
* only half of a property.
|
|
|
|
*/
|
2008-04-23 16:17:45 -07:00
|
|
|
sprop = NULL;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (attrs & (JSPROP_GETTER | JSPROP_SETTER)) {
|
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If JS_THREADSAFE and id is found, js_LookupProperty returns with
|
|
|
|
* sprop non-null and pobj locked. If pobj == obj, the property is
|
|
|
|
* already in obj and obj has its own (mutable) scope. So if we are
|
|
|
|
* defining a getter whose setter was already defined, or vice versa,
|
|
|
|
* finish the job via js_ChangeScopePropertyAttributes, and refresh
|
|
|
|
* the property cache line for (obj, id) to map sprop.
|
|
|
|
*/
|
|
|
|
if (!js_LookupProperty(cx, obj, id, &pobj, &prop))
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
sprop = (JSScopeProperty *) prop;
|
|
|
|
if (sprop &&
|
|
|
|
pobj == obj &&
|
|
|
|
(sprop->attrs & (JSPROP_GETTER | JSPROP_SETTER))) {
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = OBJ_SCOPE(obj)->change(cx, sprop, attrs, sprop->attrs,
|
|
|
|
(attrs & JSPROP_GETTER)
|
|
|
|
? getter
|
|
|
|
: sprop->getter,
|
|
|
|
(attrs & JSPROP_SETTER)
|
|
|
|
? setter
|
|
|
|
: sprop->setter);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* NB: obj == pobj, so we can share unlock code at the bottom. */
|
|
|
|
if (!sprop)
|
2009-04-30 17:54:20 -07:00
|
|
|
goto error;
|
2008-04-23 16:17:45 -07:00
|
|
|
} else if (prop) {
|
2009-08-11 13:05:44 -07:00
|
|
|
/* NB: call JSObject::dropProperty, as pobj might not be native. */
|
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
prop = NULL;
|
2008-04-23 16:17:45 -07:00
|
|
|
sprop = NULL;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif /* JS_HAS_GETTER_SETTER */
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/*
|
2009-05-15 02:43:19 -07:00
|
|
|
* Purge the property cache of any properties named by id that are about
|
|
|
|
* to be shadowed in obj's scope chain unless it is known a priori that it
|
|
|
|
* is not possible. We do this before locking obj to avoid nesting locks.
|
2009-05-13 17:11:23 -07:00
|
|
|
*/
|
2009-05-15 02:43:19 -07:00
|
|
|
if (!(defineHow & JSDNP_DONT_PURGE))
|
|
|
|
js_PurgeScopeChain(cx, obj, id);
|
2009-05-13 17:11:23 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Check whether a readonly property or setter is being defined on a known
|
|
|
|
* prototype object. See the comment in jscntxt.h before protoHazardShape's
|
|
|
|
* member declaration.
|
2008-02-07 15:18:45 -08:00
|
|
|
*/
|
2009-08-27 22:53:26 -07:00
|
|
|
if (obj->isDelegate() && (attrs & (JSPROP_READONLY | JSPROP_SETTER)))
|
2009-05-13 17:11:23 -07:00
|
|
|
cx->runtime->protoHazardShape = js_GenerateShape(cx, false);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Lock if object locking is required by this implementation. */
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
|
|
|
|
/* Use the object's class getter and setter by default. */
|
2009-08-27 22:53:26 -07:00
|
|
|
clasp = obj->getClass();
|
2009-09-03 14:41:19 -07:00
|
|
|
if (!(defineHow & JSDNP_SET_METHOD)) {
|
|
|
|
if (!getter)
|
|
|
|
getter = clasp->getProperty;
|
|
|
|
if (!setter)
|
|
|
|
setter = clasp->setProperty;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* Get obj's own scope if it has one, or create a new one for obj. */
|
|
|
|
scope = js_GetMutableScope(cx, obj);
|
|
|
|
if (!scope)
|
2009-04-30 17:54:20 -07:00
|
|
|
goto error;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-29 07:07:21 -07:00
|
|
|
added = false;
|
2008-04-23 16:17:45 -07:00
|
|
|
if (!sprop) {
|
2008-09-03 13:30:13 -07:00
|
|
|
/* Add a new property, or replace an existing one of the same id. */
|
2008-04-23 16:17:45 -07:00
|
|
|
if (clasp->flags & JSCLASS_SHARE_ALL_PROPERTIES)
|
|
|
|
attrs |= JSPROP_SHARED;
|
2009-09-03 14:41:19 -07:00
|
|
|
|
|
|
|
if (defineHow & JSDNP_SET_METHOD) {
|
|
|
|
JS_ASSERT(clasp == &js_ObjectClass);
|
|
|
|
JS_ASSERT(VALUE_IS_FUNCTION(cx, value));
|
|
|
|
JS_ASSERT(!(attrs & (JSPROP_GETTER | JSPROP_SETTER)));
|
|
|
|
JS_ASSERT(!getter && !setter);
|
|
|
|
|
|
|
|
JSObject *funobj = JSVAL_TO_OBJECT(value);
|
|
|
|
if (FUN_OBJECT(GET_FUNCTION_PRIVATE(cx, funobj)) == funobj) {
|
|
|
|
flags |= SPROP_IS_METHOD;
|
|
|
|
getter = js_CastAsPropertyOp(funobj);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->add(cx, id, getter, setter, SPROP_INVALID_SLOT, attrs,
|
|
|
|
flags, shortid);
|
2008-04-23 16:17:45 -07:00
|
|
|
if (!sprop)
|
2009-04-30 17:54:20 -07:00
|
|
|
goto error;
|
2009-04-29 07:07:21 -07:00
|
|
|
added = true;
|
2008-04-23 16:17:45 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* Store value before calling addProperty, in case the latter GC's. */
|
2009-08-26 09:34:41 -07:00
|
|
|
if (SPROP_HAS_VALID_SLOT(sprop, scope))
|
2009-09-03 14:41:19 -07:00
|
|
|
LOCKED_OBJ_SET_SLOT(obj, sprop->slot, value);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* XXXbe called with lock held */
|
2009-09-03 14:41:19 -07:00
|
|
|
if (!AddPropertyHelper(cx, clasp, obj, scope, sprop, &value)) {
|
|
|
|
scope->remove(cx, id);
|
|
|
|
goto error;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-05-15 02:43:19 -07:00
|
|
|
if (defineHow & JSDNP_CACHE_RESULT) {
|
2009-02-03 23:14:36 -08:00
|
|
|
JS_ASSERT_NOT_ON_TRACE(cx);
|
2009-04-30 15:52:13 -07:00
|
|
|
JSPropCacheEntry *entry;
|
2009-09-18 06:55:01 -07:00
|
|
|
entry = js_FillPropertyCache(cx, obj, 0, 0, obj, sprop, added);
|
2009-04-30 15:52:13 -07:00
|
|
|
TRACE_2(SetPropHit, entry, sprop);
|
2009-02-03 23:14:36 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
if (propp)
|
|
|
|
*propp = (JSProperty *) sprop;
|
|
|
|
else
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-30 17:54:20 -07:00
|
|
|
error: // TRACE_2 jumps here on error, as well.
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_LookupProperty(JSContext *cx, JSObject *obj, jsid id, JSObject **objp,
|
|
|
|
JSProperty **propp)
|
|
|
|
{
|
2008-09-25 09:13:31 -07:00
|
|
|
return js_LookupPropertyWithFlags(cx, obj, id, cx->resolveFlags,
|
|
|
|
objp, propp) >= 0;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-07-20 13:13:17 -07:00
|
|
|
#define SCOPE_DEPTH_ACCUM(bs,val) \
|
|
|
|
JS_SCOPE_DEPTH_METERING(JS_BASIC_STATS_ACCUM(bs, val))
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
|
|
|
|
int
|
2007-03-22 10:30:00 -07:00
|
|
|
js_LookupPropertyWithFlags(JSContext *cx, JSObject *obj, jsid id, uintN flags,
|
|
|
|
JSObject **objp, JSProperty **propp)
|
|
|
|
{
|
|
|
|
JSObject *start, *obj2, *proto;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
int protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSScope *scope;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
JSClass *clasp;
|
|
|
|
JSResolveOp resolve;
|
|
|
|
JSResolvingKey key;
|
|
|
|
JSResolvingEntry *entry;
|
|
|
|
uint32 generation;
|
|
|
|
JSNewResolveOp newresolve;
|
|
|
|
JSBool ok;
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Search scopes starting with obj and following the prototype link. */
|
|
|
|
start = obj;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
for (protoIndex = 0; ; protoIndex++) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = OBJ_SCOPE(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
sprop = scope->lookup(id);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* Try obj's class resolve hook if id was not found in obj's scope. */
|
|
|
|
if (!sprop) {
|
2009-08-27 22:53:26 -07:00
|
|
|
clasp = obj->getClass();
|
2007-03-22 10:30:00 -07:00
|
|
|
resolve = clasp->resolve;
|
|
|
|
if (resolve != JS_ResolveStub) {
|
|
|
|
/* Avoid recursion on (obj, id) already being resolved on cx. */
|
|
|
|
key.obj = obj;
|
|
|
|
key.id = id;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Once we have successfully added an entry for (obj, key) to
|
|
|
|
* cx->resolvingTable, control must go through cleanup: before
|
|
|
|
* returning. But note that JS_DHASH_ADD may find an existing
|
|
|
|
* entry, in which case we bail to suppress runaway recursion.
|
|
|
|
*/
|
|
|
|
if (!js_StartResolving(cx, &key, JSRESFLAG_LOOKUP, &entry)) {
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
return -1;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
if (!entry) {
|
|
|
|
/* Already resolving id in obj -- suppress recursion. */
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
generation = cx->resolvingTable->generation;
|
|
|
|
|
|
|
|
/* Null *propp here so we can test it at cleanup: safely. */
|
|
|
|
*propp = NULL;
|
|
|
|
|
|
|
|
if (clasp->flags & JSCLASS_NEW_RESOLVE) {
|
|
|
|
newresolve = (JSNewResolveOp)resolve;
|
2009-01-02 13:11:46 -08:00
|
|
|
if (flags == JSRESOLVE_INFER)
|
2009-07-05 21:42:13 -07:00
|
|
|
flags = js_InferFlags(cx, flags);
|
2007-03-22 10:30:00 -07:00
|
|
|
obj2 = (clasp->flags & JSCLASS_NEW_RESOLVE_GETS_START)
|
|
|
|
? start
|
|
|
|
: NULL;
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
|
|
|
|
/* Protect id and all atoms from a GC nested in resolve. */
|
|
|
|
JS_KEEP_ATOMS(cx->runtime);
|
|
|
|
ok = newresolve(cx, obj, ID_TO_VALUE(id), flags, &obj2);
|
|
|
|
JS_UNKEEP_ATOMS(cx->runtime);
|
|
|
|
if (!ok)
|
|
|
|
goto cleanup;
|
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
if (obj2) {
|
|
|
|
/* Resolved: juggle locks and lookup id again. */
|
|
|
|
if (obj2 != obj) {
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2008-06-25 03:23:35 -07:00
|
|
|
if (OBJ_IS_NATIVE(obj2))
|
|
|
|
JS_LOCK_OBJ(cx, obj2);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
protoIndex = 0;
|
|
|
|
for (proto = start; proto && proto != obj2;
|
|
|
|
proto = OBJ_GET_PROTO(cx, proto)) {
|
|
|
|
protoIndex++;
|
|
|
|
}
|
2009-05-14 03:35:23 -07:00
|
|
|
if (!OBJ_IS_NATIVE(obj2)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Whoops, newresolve handed back a foreign obj2. */
|
|
|
|
JS_ASSERT(obj2 != obj);
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj2->lookupProperty(cx, id, objp, propp);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok || *propp)
|
|
|
|
goto cleanup;
|
|
|
|
JS_LOCK_OBJ(cx, obj2);
|
|
|
|
} else {
|
|
|
|
/*
|
|
|
|
* Require that obj2 have its own scope now, as we
|
|
|
|
* do for old-style resolve. If it doesn't, then
|
|
|
|
* id was not truly resolved, and we'll find it in
|
|
|
|
* the proto chain, or miss it if obj2's proto is
|
|
|
|
* not on obj's proto chain. That last case is a
|
|
|
|
* "too bad!" case.
|
|
|
|
*/
|
2009-05-14 03:35:23 -07:00
|
|
|
scope = OBJ_SCOPE(obj2);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned())
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->lookup(id);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
if (sprop) {
|
2009-07-21 14:25:11 -07:00
|
|
|
JS_ASSERT(scope == OBJ_SCOPE(obj2));
|
|
|
|
JS_ASSERT(scope->owned());
|
2007-03-22 10:30:00 -07:00
|
|
|
obj = obj2;
|
|
|
|
} else if (obj2 != obj) {
|
2008-06-25 03:23:35 -07:00
|
|
|
if (OBJ_IS_NATIVE(obj2))
|
|
|
|
JS_UNLOCK_OBJ(cx, obj2);
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
/*
|
|
|
|
* Old resolve always requires id re-lookup if obj owns
|
|
|
|
* its scope after resolve returns.
|
|
|
|
*/
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
ok = resolve(cx, obj, ID_TO_VALUE(id));
|
|
|
|
if (!ok)
|
|
|
|
goto cleanup;
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
2009-05-14 03:35:23 -07:00
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
scope = OBJ_SCOPE(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned())
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->lookup(id);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
cleanup:
|
|
|
|
js_StopResolving(cx, &key, JSRESFLAG_LOOKUP, entry, generation);
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
if (!ok)
|
|
|
|
return -1;
|
|
|
|
if (*propp)
|
|
|
|
return protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (sprop) {
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
SCOPE_DEPTH_ACCUM(&cx->runtime->protoLookupDepthStats, protoIndex);
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ASSERT(OBJ_SCOPE(obj) == scope);
|
2009-07-21 14:25:11 -07:00
|
|
|
*objp = obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
*propp = (JSProperty *) sprop;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
return protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-08-27 22:53:26 -07:00
|
|
|
proto = obj->getProto();
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
if (!proto)
|
|
|
|
break;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
if (!OBJ_IS_NATIVE(proto)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!proto->lookupProperty(cx, id, objp, propp))
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
return -1;
|
2008-03-02 23:02:53 -08:00
|
|
|
return protoIndex + 1;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
}
|
2009-07-21 14:25:11 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Correctness elsewhere (the property cache and JIT), not here in
|
|
|
|
* particular, depends on all the objects on the prototype chain having
|
|
|
|
* different scopes. This is just a convenient place to check.
|
|
|
|
*
|
|
|
|
* Cloned Block objects do in fact share their prototype's scope -- but
|
|
|
|
* that is really just a memory-saving hack, safe because Blocks cannot
|
|
|
|
* be on the prototype chain of other objects.
|
|
|
|
*/
|
|
|
|
JS_ASSERT_IF(OBJ_GET_CLASS(cx, obj) != &js_BlockClass,
|
|
|
|
OBJ_SCOPE(obj) != OBJ_SCOPE(proto));
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
obj = proto;
|
|
|
|
}
|
|
|
|
|
|
|
|
out:
|
|
|
|
*objp = NULL;
|
|
|
|
*propp = NULL;
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
return protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-04-20 17:00:59 -07:00
|
|
|
JSPropCacheEntry *
|
|
|
|
js_FindPropertyHelper(JSContext *cx, jsid id, JSBool cacheResult,
|
|
|
|
JSObject **objp, JSObject **pobjp, JSProperty **propp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-04-18 11:10:59 -07:00
|
|
|
JSObject *scopeChain, *obj, *parent, *pobj;
|
2009-04-20 17:00:59 -07:00
|
|
|
JSPropCacheEntry *entry;
|
2008-02-07 15:18:45 -08:00
|
|
|
int scopeIndex, protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSProperty *prop;
|
|
|
|
|
2009-04-20 17:00:59 -07:00
|
|
|
JS_ASSERT_IF(cacheResult, !JS_ON_TRACE(cx));
|
2009-04-18 11:10:59 -07:00
|
|
|
scopeChain = js_GetTopStackFrame(cx)->scopeChain;
|
|
|
|
|
|
|
|
/* Scan entries on the scope chain that we can cache across. */
|
2009-04-20 17:00:59 -07:00
|
|
|
entry = JS_NO_PROP_CACHE_FILL;
|
2009-04-18 11:10:59 -07:00
|
|
|
obj = scopeChain;
|
|
|
|
parent = OBJ_GET_PARENT(cx, obj);
|
|
|
|
for (scopeIndex = 0;
|
|
|
|
parent
|
2009-08-06 12:40:51 -07:00
|
|
|
? js_IsCacheableNonGlobalScope(obj)
|
2009-04-18 11:10:59 -07:00
|
|
|
: obj->map->ops->lookupProperty == js_LookupProperty;
|
|
|
|
++scopeIndex) {
|
|
|
|
protoIndex =
|
|
|
|
js_LookupPropertyWithFlags(cx, obj, id, cx->resolveFlags,
|
|
|
|
&pobj, &prop);
|
|
|
|
if (protoIndex < 0)
|
2009-04-20 17:00:59 -07:00
|
|
|
return NULL;
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (prop) {
|
2009-04-18 11:10:59 -07:00
|
|
|
#ifdef DEBUG
|
|
|
|
if (parent) {
|
|
|
|
JSClass *clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(pobj));
|
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, pobj) == clasp);
|
|
|
|
if (clasp == &js_BlockClass) {
|
|
|
|
/*
|
|
|
|
* Block instances on the scope chain are immutable and
|
|
|
|
* always share their scope with compile-time prototypes.
|
|
|
|
*/
|
2009-07-21 14:25:11 -07:00
|
|
|
JS_ASSERT(pobj == obj);
|
|
|
|
JS_ASSERT(protoIndex == 0);
|
2008-02-07 15:18:45 -08:00
|
|
|
} else {
|
2009-04-18 11:10:59 -07:00
|
|
|
/* Call and DeclEnvClass objects have no prototypes. */
|
|
|
|
JS_ASSERT(!OBJ_GET_PROTO(cx, obj));
|
|
|
|
JS_ASSERT(protoIndex == 0);
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
}
|
2009-04-18 11:10:59 -07:00
|
|
|
#endif
|
2009-04-20 17:00:59 -07:00
|
|
|
if (cacheResult) {
|
2009-09-18 06:55:01 -07:00
|
|
|
entry = js_FillPropertyCache(cx, scopeChain,
|
|
|
|
scopeIndex, protoIndex, pobj,
|
|
|
|
(JSScopeProperty *) prop, false);
|
2009-04-18 11:10:59 -07:00
|
|
|
}
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
SCOPE_DEPTH_ACCUM(&rt->scopeSearchDepthStats, scopeIndex);
|
2009-04-18 11:10:59 -07:00
|
|
|
goto out;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2009-04-18 11:10:59 -07:00
|
|
|
if (!parent) {
|
|
|
|
pobj = NULL;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
obj = parent;
|
|
|
|
parent = OBJ_GET_PARENT(cx, obj);
|
|
|
|
}
|
|
|
|
|
|
|
|
for (;;) {
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->lookupProperty(cx, id, &pobj, &prop))
|
2009-04-20 17:00:59 -07:00
|
|
|
return NULL;
|
2009-04-18 11:10:59 -07:00
|
|
|
if (prop) {
|
|
|
|
PCMETER(JS_PROPERTY_CACHE(cx).nofills++);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* We conservatively assume that a resolve hook could mutate the scope
|
2009-08-11 13:05:44 -07:00
|
|
|
* chain during JSObject::lookupProperty. So we read parent here again.
|
2009-04-18 11:10:59 -07:00
|
|
|
*/
|
|
|
|
parent = OBJ_GET_PARENT(cx, obj);
|
|
|
|
if (!parent) {
|
|
|
|
pobj = NULL;
|
2008-02-07 15:18:45 -08:00
|
|
|
break;
|
2009-04-18 11:10:59 -07:00
|
|
|
}
|
|
|
|
obj = parent;
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-18 11:10:59 -07:00
|
|
|
out:
|
|
|
|
JS_ASSERT(!!pobj == !!prop);
|
|
|
|
*objp = obj;
|
|
|
|
*pobjp = pobj;
|
|
|
|
*propp = prop;
|
2009-04-20 17:00:59 -07:00
|
|
|
return entry;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_FindProperty(JSContext *cx, jsid id, JSObject **objp, JSObject **pobjp,
|
|
|
|
JSProperty **propp)
|
|
|
|
{
|
2009-04-20 17:00:59 -07:00
|
|
|
return !!js_FindPropertyHelper(cx, id, false, objp, pobjp, propp);
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
|
2009-04-14 03:54:37 -07:00
|
|
|
JSObject *
|
2009-04-20 17:00:59 -07:00
|
|
|
js_FindIdentifierBase(JSContext *cx, JSObject *scopeChain, jsid id)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
/*
|
2009-04-11 01:11:06 -07:00
|
|
|
* This function should not be called for a global object or from the
|
|
|
|
* trace and should have a valid cache entry for native scopeChain.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2009-04-14 03:54:37 -07:00
|
|
|
JS_ASSERT(OBJ_GET_PARENT(cx, scopeChain));
|
2009-04-11 01:11:06 -07:00
|
|
|
JS_ASSERT(!JS_ON_TRACE(cx));
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-11 01:11:06 -07:00
|
|
|
JSObject *obj = scopeChain;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-14 03:54:37 -07:00
|
|
|
/*
|
|
|
|
* Loop over cacheable objects on the scope chain until we find a
|
|
|
|
* property. We also stop when we reach the global object skipping any
|
|
|
|
* farther checks or lookups. For details see the JSOP_BINDNAME case of
|
|
|
|
* js_Interpret.
|
|
|
|
*/
|
2009-08-06 12:40:51 -07:00
|
|
|
for (int scopeIndex = 0; js_IsCacheableNonGlobalScope(obj); scopeIndex++) {
|
2009-04-11 01:11:06 -07:00
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
2009-04-14 03:54:37 -07:00
|
|
|
int protoIndex = js_LookupPropertyWithFlags(cx, obj, id,
|
|
|
|
cx->resolveFlags,
|
2009-04-11 01:11:06 -07:00
|
|
|
&pobj, &prop);
|
|
|
|
if (protoIndex < 0)
|
2007-03-22 10:30:00 -07:00
|
|
|
return NULL;
|
2009-04-11 01:11:06 -07:00
|
|
|
if (prop) {
|
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(pobj));
|
2009-04-14 03:54:37 -07:00
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, pobj) == OBJ_GET_CLASS(cx, obj));
|
2009-04-20 17:00:59 -07:00
|
|
|
#ifdef DEBUG
|
|
|
|
JSPropCacheEntry *entry =
|
|
|
|
#endif
|
2009-09-18 06:55:01 -07:00
|
|
|
js_FillPropertyCache(cx, scopeChain,
|
|
|
|
scopeIndex, protoIndex, pobj,
|
|
|
|
(JSScopeProperty *) prop, false);
|
2009-04-20 17:00:59 -07:00
|
|
|
JS_ASSERT(entry);
|
2009-04-11 01:11:06 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, pobj);
|
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
2009-04-14 03:54:37 -07:00
|
|
|
/* Call and other cacheable objects always have a parent. */
|
|
|
|
obj = OBJ_GET_PARENT(cx, obj);
|
|
|
|
if (!OBJ_GET_PARENT(cx, obj))
|
2009-04-11 01:11:06 -07:00
|
|
|
return obj;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2009-04-14 03:54:37 -07:00
|
|
|
/* Loop until we find a property or reach the global object. */
|
2009-04-11 01:11:06 -07:00
|
|
|
do {
|
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->lookupProperty(cx, id, &pobj, &prop))
|
2009-04-11 01:11:06 -07:00
|
|
|
return NULL;
|
|
|
|
if (prop) {
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2009-04-11 01:11:06 -07:00
|
|
|
break;
|
|
|
|
}
|
2009-04-14 03:54:37 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* We conservatively assume that a resolve hook could mutate the scope
|
2009-08-11 13:05:44 -07:00
|
|
|
* chain during JSObject::lookupProperty. So we must check if parent is
|
|
|
|
* not null here even if it wasn't before the lookup.
|
2009-04-14 03:54:37 -07:00
|
|
|
*/
|
|
|
|
JSObject *parent = OBJ_GET_PARENT(cx, obj);
|
|
|
|
if (!parent)
|
|
|
|
break;
|
2009-04-11 01:11:06 -07:00
|
|
|
obj = parent;
|
2009-04-14 03:54:37 -07:00
|
|
|
} while (OBJ_GET_PARENT(cx, obj));
|
2007-03-22 10:30:00 -07:00
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_NativeGet(JSContext *cx, JSObject *obj, JSObject *pobj,
|
2009-09-03 14:41:19 -07:00
|
|
|
JSScopeProperty *sprop, uintN getHow, jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-03-17 10:39:51 -07:00
|
|
|
js_LeaveTraceIfGlobalObject(cx, pobj);
|
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JSScope *scope;
|
|
|
|
uint32 slot;
|
|
|
|
int32 sample;
|
2009-04-18 10:56:53 -07:00
|
|
|
JSTempValueRooter tvr, tvr2;
|
2009-04-17 12:41:00 -07:00
|
|
|
JSBool ok;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(pobj));
|
|
|
|
JS_ASSERT(JS_IS_OBJ_LOCKED(cx, pobj));
|
|
|
|
scope = OBJ_SCOPE(pobj);
|
|
|
|
|
|
|
|
slot = sprop->slot;
|
|
|
|
*vp = (slot != SPROP_INVALID_SLOT)
|
|
|
|
? LOCKED_OBJ_GET_SLOT(pobj, slot)
|
|
|
|
: JSVAL_VOID;
|
|
|
|
if (SPROP_HAS_STUB_GETTER(sprop))
|
2009-09-03 14:41:19 -07:00
|
|
|
return true;
|
|
|
|
|
|
|
|
if (JS_UNLIKELY(sprop->isMethod()) && (getHow & JSGET_NO_METHOD_BARRIER)) {
|
|
|
|
JS_ASSERT(sprop->methodValue() == *vp);
|
|
|
|
return true;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
sample = cx->runtime->propertyRemovals;
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
JS_PUSH_TEMP_ROOT_SPROP(cx, sprop, &tvr);
|
2009-04-18 10:56:53 -07:00
|
|
|
JS_PUSH_TEMP_ROOT_OBJECT(cx, pobj, &tvr2);
|
2009-09-03 14:41:19 -07:00
|
|
|
ok = sprop->get(cx, obj, pobj, vp);
|
2009-04-18 10:56:53 -07:00
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr2);
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
if (!ok)
|
2009-09-03 14:41:19 -07:00
|
|
|
return false;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_LOCK_SCOPE(cx, scope);
|
|
|
|
if (SLOT_IN_SCOPE(slot, scope) &&
|
|
|
|
(JS_LIKELY(cx->runtime->propertyRemovals == sample) ||
|
2009-07-09 13:27:21 -07:00
|
|
|
scope->has(sprop))) {
|
2009-09-03 14:41:19 -07:00
|
|
|
jsval v = *vp;
|
|
|
|
if (!scope->methodWriteBarrier(cx, sprop, v)) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
LOCKED_OBJ_SET_SLOT(pobj, slot, v);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
return true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
2009-09-03 14:41:19 -07:00
|
|
|
js_NativeSet(JSContext *cx, JSObject *obj, JSScopeProperty *sprop, bool added,
|
|
|
|
jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-04-17 12:41:00 -07:00
|
|
|
js_LeaveTraceIfGlobalObject(cx, obj);
|
|
|
|
|
|
|
|
JSScope *scope;
|
|
|
|
uint32 slot;
|
|
|
|
int32 sample;
|
|
|
|
JSTempValueRooter tvr;
|
|
|
|
JSBool ok;
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
|
|
|
JS_ASSERT(JS_IS_OBJ_LOCKED(cx, obj));
|
2009-04-17 12:41:00 -07:00
|
|
|
scope = OBJ_SCOPE(obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
slot = sprop->slot;
|
|
|
|
if (slot != SPROP_INVALID_SLOT) {
|
|
|
|
OBJ_CHECK_SLOT(obj, slot);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
/* If sprop has a stub setter, keep scope locked and just store *vp. */
|
2009-09-03 14:41:19 -07:00
|
|
|
if (SPROP_HAS_STUB_SETTER(sprop)) {
|
|
|
|
if (!added && !scope->methodWriteBarrier(cx, sprop, *vp)) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
LOCKED_OBJ_SET_SLOT(obj, slot, *vp);
|
|
|
|
return true;
|
|
|
|
}
|
2009-04-17 12:41:00 -07:00
|
|
|
} else {
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* Allow API consumers to create shared properties with stub setters.
|
|
|
|
* Such properties lack value storage, so setting them is like writing
|
|
|
|
* to /dev/null.
|
2009-02-11 19:48:00 -08:00
|
|
|
*
|
|
|
|
* But we can't short-circuit if there's a scripted getter or setter
|
|
|
|
* since we might need to throw. In that case, we let SPROP_SET
|
|
|
|
* decide whether to throw an exception. See bug 478047.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2009-02-11 19:48:00 -08:00
|
|
|
if (!(sprop->attrs & JSPROP_GETTER) && SPROP_HAS_STUB_SETTER(sprop)) {
|
|
|
|
JS_ASSERT(!(sprop->attrs & JSPROP_SETTER));
|
2009-09-03 14:41:19 -07:00
|
|
|
return true;
|
2009-02-11 19:48:00 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
sample = cx->runtime->propertyRemovals;
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
JS_PUSH_TEMP_ROOT_SPROP(cx, sprop, &tvr);
|
2009-09-03 14:41:19 -07:00
|
|
|
ok = sprop->set(cx, obj, vp);
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_POP_TEMP_ROOT(cx, &tvr);
|
|
|
|
if (!ok)
|
2009-09-03 14:41:19 -07:00
|
|
|
return false;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_LOCK_SCOPE(cx, scope);
|
|
|
|
if (SLOT_IN_SCOPE(slot, scope) &&
|
|
|
|
(JS_LIKELY(cx->runtime->propertyRemovals == sample) ||
|
2009-07-09 13:27:21 -07:00
|
|
|
scope->has(sprop))) {
|
2009-09-03 14:41:19 -07:00
|
|
|
jsval v = *vp;
|
|
|
|
if (!added && !scope->methodWriteBarrier(cx, sprop, v)) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
LOCKED_OBJ_SET_SLOT(obj, slot, v);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
return true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
2009-09-03 14:41:19 -07:00
|
|
|
js_GetPropertyHelper(JSContext *cx, JSObject *obj, jsid id, uintN getHow,
|
2009-04-20 17:00:59 -07:00
|
|
|
jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-03-09 11:25:43 -07:00
|
|
|
JSObject *aobj, *obj2;
|
2008-02-07 15:18:45 -08:00
|
|
|
int protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
JS_ASSERT_IF(getHow & JSGET_CACHE_RESULT, !JS_ON_TRACE(cx));
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2009-03-09 11:25:43 -07:00
|
|
|
aobj = js_GetProtoIfDenseArray(cx, obj);
|
|
|
|
protoIndex = js_LookupPropertyWithFlags(cx, aobj, id, cx->resolveFlags,
|
2008-09-25 09:13:31 -07:00
|
|
|
&obj2, &prop);
|
2008-02-07 15:18:45 -08:00
|
|
|
if (protoIndex < 0)
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop) {
|
|
|
|
*vp = JSVAL_VOID;
|
|
|
|
|
|
|
|
if (!OBJ_GET_CLASS(cx, obj)->getProperty(cx, obj, ID_TO_VALUE(id), vp))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
PCMETER(getHow & JSGET_CACHE_RESULT && JS_PROPERTY_CACHE(cx).nofills++);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* Give a strict warning if foo.bar is evaluated by a script for an
|
|
|
|
* object foo with no property named 'bar'.
|
|
|
|
*/
|
2009-02-02 17:25:59 -08:00
|
|
|
jsbytecode *pc;
|
|
|
|
if (JSVAL_IS_VOID(*vp) && ((pc = js_GetCurrentBytecodePC(cx)) != NULL)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JSOp op;
|
|
|
|
uintN flags;
|
|
|
|
|
2007-07-05 13:37:47 -07:00
|
|
|
op = (JSOp) *pc;
|
2009-02-18 16:31:09 -08:00
|
|
|
if (op == JSOP_TRAP) {
|
|
|
|
JS_ASSERT_NOT_ON_TRACE(cx);
|
|
|
|
op = JS_GetTrapOpcode(cx, cx->fp->script, pc);
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
if (op == JSOP_GETXPROP) {
|
|
|
|
flags = JSREPORT_ERROR;
|
|
|
|
} else {
|
|
|
|
if (!JS_HAS_STRICT_OPTION(cx) ||
|
2009-08-13 14:07:13 -07:00
|
|
|
(op != JSOP_GETPROP && op != JSOP_GETELEM) ||
|
2009-08-20 12:13:21 -07:00
|
|
|
js_CurrentPCIsInImacro(cx)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* XXX do not warn about missing __iterator__ as the function
|
|
|
|
* may be called from JS_GetMethodById. See bug 355145.
|
|
|
|
*/
|
|
|
|
if (id == ATOM_TO_JSID(cx->runtime->atomState.iteratorAtom))
|
|
|
|
return JS_TRUE;
|
|
|
|
|
2009-02-18 11:14:41 -08:00
|
|
|
/* Do not warn about tests like (obj[prop] == undefined). */
|
|
|
|
if (cx->resolveFlags == JSRESOLVE_INFER) {
|
|
|
|
js_LeaveTrace(cx);
|
|
|
|
pc += js_CodeSpec[op].length;
|
|
|
|
if (Detecting(cx, pc))
|
|
|
|
return JS_TRUE;
|
|
|
|
} else if (cx->resolveFlags & JSRESOLVE_DETECTING) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
2009-02-18 11:14:41 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
flags = JSREPORT_WARNING | JSREPORT_STRICT;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Ok, bad undefined property reference: whine about it. */
|
|
|
|
if (!js_ReportValueErrorFlags(cx, flags, JSMSG_UNDEFINED_PROP,
|
|
|
|
JSDVG_IGNORE_STACK, ID_TO_VALUE(id),
|
|
|
|
NULL, NULL, NULL)) {
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!OBJ_IS_NATIVE(obj2)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
obj2->dropProperty(cx, prop);
|
|
|
|
return obj2->getProperty(cx, id, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
sprop = (JSScopeProperty *) prop;
|
2009-04-17 12:41:00 -07:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
if (getHow & JSGET_CACHE_RESULT) {
|
2009-01-30 15:40:05 -08:00
|
|
|
JS_ASSERT_NOT_ON_TRACE(cx);
|
2009-09-18 06:55:01 -07:00
|
|
|
js_FillPropertyCache(cx, aobj, 0, protoIndex, obj2, sprop, false);
|
2008-12-09 08:38:32 -08:00
|
|
|
}
|
2009-04-30 15:52:13 -07:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
if (!js_NativeGet(cx, obj, obj2, sprop, getHow, vp))
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj2);
|
|
|
|
return JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
2008-02-07 15:18:45 -08:00
|
|
|
js_GetProperty(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
|
|
|
|
{
|
2009-09-03 14:41:19 -07:00
|
|
|
return js_GetPropertyHelper(cx, obj, id, JSGET_METHOD_BARRIER, vp);
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
|
2009-03-14 09:41:47 -07:00
|
|
|
JSBool
|
2009-09-03 14:41:19 -07:00
|
|
|
js_GetMethod(JSContext *cx, JSObject *obj, jsid id, uintN getHow, jsval *vp)
|
2009-03-14 09:41:47 -07:00
|
|
|
{
|
2009-06-29 15:19:37 -07:00
|
|
|
JSAutoResolveFlags rf(cx, JSRESOLVE_QUALIFIED);
|
|
|
|
|
2009-03-14 09:41:47 -07:00
|
|
|
if (obj->map->ops == &js_ObjectOps ||
|
|
|
|
obj->map->ops->getProperty == js_GetProperty) {
|
2009-09-03 14:41:19 -07:00
|
|
|
return js_GetPropertyHelper(cx, obj, id, getHow, vp);
|
2009-03-14 09:41:47 -07:00
|
|
|
}
|
2009-09-03 14:41:19 -07:00
|
|
|
JS_ASSERT_IF(getHow & JSGET_CACHE_RESULT, OBJ_IS_DENSE_ARRAY(cx, obj));
|
2009-03-14 09:41:47 -07:00
|
|
|
#if JS_HAS_XML_SUPPORT
|
|
|
|
if (OBJECT_IS_XML(cx, obj))
|
|
|
|
return js_GetXMLMethod(cx, obj, id, vp);
|
|
|
|
#endif
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->getProperty(cx, id, vp);
|
2009-03-14 09:41:47 -07:00
|
|
|
}
|
|
|
|
|
2009-04-15 07:09:58 -07:00
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_CheckUndeclaredVarAssignment(JSContext *cx)
|
|
|
|
{
|
|
|
|
JSStackFrame *fp;
|
|
|
|
if (!JS_HAS_STRICT_OPTION(cx) ||
|
|
|
|
!(fp = js_GetTopStackFrame(cx)) ||
|
|
|
|
!fp->regs ||
|
|
|
|
js_GetOpcode(cx, fp->script, fp->regs->pc) != JSOP_SETNAME) {
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSAtom *atom;
|
|
|
|
GET_ATOM_FROM_BYTECODE(fp->script, fp->regs->pc, 0, atom);
|
|
|
|
|
|
|
|
const char *bytes = js_AtomToPrintableString(cx, atom);
|
|
|
|
return bytes &&
|
|
|
|
JS_ReportErrorFlagsAndNumber(cx, JSREPORT_WARNING | JSREPORT_STRICT,
|
|
|
|
js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_UNDECLARED_VAR, bytes);
|
|
|
|
}
|
|
|
|
|
2009-04-30 15:52:13 -07:00
|
|
|
/*
|
|
|
|
* Note: all non-error exits in this function must notify the tracer using
|
2009-09-03 14:41:19 -07:00
|
|
|
* SetPropHit when called from the interpreter, which is detected by testing
|
|
|
|
* (defineHow & JSDNP_CACHE_RESULT).
|
2009-04-30 15:52:13 -07:00
|
|
|
*/
|
|
|
|
JSBool
|
2009-09-03 14:41:19 -07:00
|
|
|
js_SetPropertyHelper(JSContext *cx, JSObject *obj, jsid id, uintN defineHow,
|
2009-04-20 17:00:59 -07:00
|
|
|
jsval *vp)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-02-07 15:18:45 -08:00
|
|
|
int protoIndex;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
JSScope *scope;
|
|
|
|
uintN attrs, flags;
|
|
|
|
intN shortid;
|
|
|
|
JSClass *clasp;
|
|
|
|
JSPropertyOp getter, setter;
|
2009-04-29 07:07:21 -07:00
|
|
|
bool added;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
JS_ASSERT((defineHow & ~(JSDNP_CACHE_RESULT | JSDNP_SET_METHOD)) == 0);
|
|
|
|
if (defineHow & JSDNP_CACHE_RESULT)
|
2009-05-15 06:37:37 -07:00
|
|
|
JS_ASSERT_NOT_ON_TRACE(cx);
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2008-12-07 00:03:12 -08:00
|
|
|
/*
|
|
|
|
* We peek at OBJ_SCOPE(obj) without locking obj. Any race means a failure
|
|
|
|
* to seal before sharing, which is inherently ambiguous.
|
|
|
|
*/
|
2009-07-09 13:27:21 -07:00
|
|
|
if (OBJ_SCOPE(obj)->sealed() && OBJ_SCOPE(obj)->object == obj) {
|
2008-12-07 00:03:12 -08:00
|
|
|
flags = JSREPORT_ERROR;
|
|
|
|
goto read_only_error;
|
|
|
|
}
|
|
|
|
|
2008-09-25 09:13:31 -07:00
|
|
|
protoIndex = js_LookupPropertyWithFlags(cx, obj, id, cx->resolveFlags,
|
|
|
|
&pobj, &prop);
|
2008-02-07 15:18:45 -08:00
|
|
|
if (protoIndex < 0)
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2009-04-11 01:11:06 -07:00
|
|
|
if (prop) {
|
|
|
|
if (!OBJ_IS_NATIVE(pobj)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2009-04-11 01:11:06 -07:00
|
|
|
prop = NULL;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
/* We should never add properties to lexical blocks. */
|
|
|
|
JS_ASSERT(OBJ_GET_CLASS(cx, obj) != &js_BlockClass);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-04-15 07:09:58 -07:00
|
|
|
if (!OBJ_GET_PARENT(cx, obj) && !js_CheckUndeclaredVarAssignment(cx))
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
sprop = (JSScopeProperty *) prop;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Now either sprop is null, meaning id was not found in obj or one of its
|
|
|
|
* prototypes; or sprop is non-null, meaning id was found in pobj's scope.
|
|
|
|
* If JS_THREADSAFE and sprop is non-null, then scope is locked, and sprop
|
2009-08-11 13:05:44 -07:00
|
|
|
* is held: we must JSObject::dropProperty or JS_UNLOCK_SCOPE before we
|
|
|
|
* return (the two are equivalent for native objects, but we use
|
|
|
|
* JS_UNLOCK_SCOPE because it is cheaper).
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
|
|
|
attrs = JSPROP_ENUMERATE;
|
|
|
|
flags = 0;
|
|
|
|
shortid = 0;
|
|
|
|
clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
getter = clasp->getProperty;
|
|
|
|
setter = clasp->setProperty;
|
|
|
|
|
|
|
|
if (sprop) {
|
|
|
|
/*
|
|
|
|
* Set scope for use below. It was locked by js_LookupProperty, and
|
|
|
|
* we know pobj owns it (i.e., scope->object == pobj). Therefore we
|
|
|
|
* optimize JS_UNLOCK_OBJ(cx, pobj) into JS_UNLOCK_SCOPE(cx, scope).
|
|
|
|
*/
|
|
|
|
scope = OBJ_SCOPE(pobj);
|
|
|
|
|
|
|
|
attrs = sprop->attrs;
|
|
|
|
if ((attrs & JSPROP_READONLY) ||
|
2009-07-09 13:27:21 -07:00
|
|
|
(scope->sealed() && (attrs & JSPROP_SHARED))) {
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Here, we'll either return true or goto read_only_error, which
|
|
|
|
* reports a strict warning or throws an error. So we redefine
|
|
|
|
* the |flags| local variable to be JSREPORT_* flags to pass to
|
|
|
|
* JS_ReportErrorFlagsAndNumberUC at label read_only_error. We
|
|
|
|
* must likewise re-task flags further below for the other 'goto
|
|
|
|
* read_only_error;' case.
|
|
|
|
*/
|
|
|
|
flags = JSREPORT_ERROR;
|
|
|
|
if (attrs & JSPROP_READONLY) {
|
|
|
|
if (!JS_HAS_STRICT_OPTION(cx)) {
|
|
|
|
/* Just return true per ECMA if not in strict mode. */
|
2009-09-03 14:41:19 -07:00
|
|
|
PCMETER((defineHow & JSDNP_CACHE_RESULT) && JS_PROPERTY_CACHE(cx).rofills++);
|
|
|
|
if (defineHow & JSDNP_CACHE_RESULT)
|
2009-04-30 15:52:13 -07:00
|
|
|
TRACE_2(SetPropHit, JS_NO_PROP_CACHE_FILL, sprop);
|
|
|
|
return JS_TRUE;
|
2009-08-25 14:18:12 -07:00
|
|
|
#ifdef JS_TRACER
|
2009-04-30 17:54:20 -07:00
|
|
|
error: // TRACE_2 jumps here in case of error.
|
|
|
|
return JS_FALSE;
|
2009-08-25 14:18:12 -07:00
|
|
|
#endif
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Strict mode: report a read-only strict warning. */
|
|
|
|
flags = JSREPORT_STRICT | JSREPORT_WARNING;
|
|
|
|
}
|
|
|
|
goto read_only_error;
|
|
|
|
}
|
|
|
|
|
2009-08-26 09:34:41 -07:00
|
|
|
if (pobj != obj) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* We found id in a prototype object: prepare to share or shadow.
|
2008-02-07 15:18:45 -08:00
|
|
|
*
|
2007-03-22 10:30:00 -07:00
|
|
|
* NB: Thanks to the immutable, garbage-collected property tree
|
|
|
|
* maintained by jsscope.c in cx->runtime, we needn't worry about
|
|
|
|
* sprop going away behind our back after we've unlocked scope.
|
|
|
|
*/
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
|
2009-04-30 15:52:13 -07:00
|
|
|
/* Don't clone a shared prototype property. */
|
2007-03-22 10:30:00 -07:00
|
|
|
if (attrs & JSPROP_SHARED) {
|
2009-09-03 14:41:19 -07:00
|
|
|
if (defineHow & JSDNP_CACHE_RESULT) {
|
2009-04-30 15:52:13 -07:00
|
|
|
JSPropCacheEntry *entry;
|
2009-09-18 06:55:01 -07:00
|
|
|
entry = js_FillPropertyCache(cx, obj, 0, protoIndex, pobj, sprop, false);
|
2009-04-30 15:52:13 -07:00
|
|
|
TRACE_2(SetPropHit, entry, sprop);
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (SPROP_HAS_STUB_SETTER(sprop) &&
|
|
|
|
!(sprop->attrs & JSPROP_GETTER)) {
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
return sprop->set(cx, obj, vp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Restore attrs to the ECMA default for new properties. */
|
|
|
|
attrs = JSPROP_ENUMERATE;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Preserve the shortid, getter, and setter when shadowing any
|
|
|
|
* property that has a shortid. An old API convention requires
|
|
|
|
* that the property's getter and setter functions receive the
|
|
|
|
* shortid, not id, when they are called on the shadow we are
|
|
|
|
* about to create in obj's scope.
|
|
|
|
*/
|
|
|
|
if (sprop->flags & SPROP_HAS_SHORTID) {
|
|
|
|
flags = SPROP_HAS_SHORTID;
|
|
|
|
shortid = sprop->shortid;
|
|
|
|
getter = sprop->getter;
|
|
|
|
setter = sprop->setter;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Forget we found the proto-property now that we've copied any
|
|
|
|
* needed member values.
|
|
|
|
*/
|
|
|
|
sprop = NULL;
|
|
|
|
}
|
|
|
|
#ifdef __GNUC__ /* suppress bogus gcc warnings */
|
|
|
|
} else {
|
|
|
|
scope = NULL;
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2009-04-29 07:07:21 -07:00
|
|
|
added = false;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!sprop) {
|
2008-02-07 15:18:45 -08:00
|
|
|
/*
|
|
|
|
* Purge the property cache of now-shadowed id in obj's scope chain.
|
|
|
|
* Do this early, before locking obj to avoid nesting locks.
|
|
|
|
*/
|
2009-03-06 16:34:19 -08:00
|
|
|
js_PurgeScopeChain(cx, obj, id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Find or make a property descriptor with the right heritage. */
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = js_GetMutableScope(cx, obj);
|
|
|
|
if (!scope) {
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2009-09-03 14:41:19 -07:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (clasp->flags & JSCLASS_SHARE_ALL_PROPERTIES)
|
|
|
|
attrs |= JSPROP_SHARED;
|
2009-09-03 14:41:19 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Check for Object class here to avoid defining a method on a class
|
|
|
|
* with magic resolve, addProperty, getProperty, etc. hooks.
|
|
|
|
*/
|
|
|
|
if ((defineHow & JSDNP_SET_METHOD) &&
|
|
|
|
obj->getClass() == &js_ObjectClass) {
|
|
|
|
JS_ASSERT(VALUE_IS_FUNCTION(cx, *vp));
|
|
|
|
JS_ASSERT(!(attrs & (JSPROP_GETTER | JSPROP_SETTER)));
|
|
|
|
|
|
|
|
JSObject *funobj = JSVAL_TO_OBJECT(*vp);
|
|
|
|
if (FUN_OBJECT(GET_FUNCTION_PRIVATE(cx, funobj)) == funobj) {
|
|
|
|
flags |= SPROP_IS_METHOD;
|
|
|
|
getter = js_CastAsPropertyOp(funobj);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-09 13:27:21 -07:00
|
|
|
sprop = scope->add(cx, id, getter, setter, SPROP_INVALID_SLOT, attrs,
|
|
|
|
flags, shortid);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!sprop) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_FALSE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Initialize the new property value (passed to setter) to undefined.
|
|
|
|
* Note that we store before calling addProperty, to match the order
|
|
|
|
* in js_DefineNativeProperty.
|
|
|
|
*/
|
|
|
|
if (SPROP_HAS_VALID_SLOT(sprop, scope))
|
|
|
|
LOCKED_OBJ_SET_SLOT(obj, sprop->slot, JSVAL_VOID);
|
|
|
|
|
|
|
|
/* XXXbe called with obj locked */
|
2009-09-03 14:41:19 -07:00
|
|
|
if (!AddPropertyHelper(cx, clasp, obj, scope, sprop, vp)) {
|
|
|
|
scope->remove(cx, id);
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2009-04-29 07:07:21 -07:00
|
|
|
added = true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
if (defineHow & JSDNP_CACHE_RESULT) {
|
2009-04-30 15:52:13 -07:00
|
|
|
JSPropCacheEntry *entry;
|
2009-09-18 06:55:01 -07:00
|
|
|
entry = js_FillPropertyCache(cx, obj, 0, 0, obj, sprop, added);
|
2009-04-30 15:52:13 -07:00
|
|
|
TRACE_2(SetPropHit, entry, sprop);
|
2008-04-27 13:31:24 -07:00
|
|
|
}
|
2009-04-30 15:52:13 -07:00
|
|
|
|
2009-09-03 14:41:19 -07:00
|
|
|
if (!js_NativeSet(cx, obj, sprop, added, vp))
|
2009-04-30 15:52:13 -07:00
|
|
|
return NULL;
|
|
|
|
|
2009-04-17 12:41:00 -07:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-04-30 15:52:13 -07:00
|
|
|
return JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
read_only_error:
|
|
|
|
return js_ReportValueErrorFlags(cx, flags, JSMSG_READ_ONLY,
|
|
|
|
JSDVG_IGNORE_STACK, ID_TO_VALUE(id), NULL,
|
2009-04-30 15:52:13 -07:00
|
|
|
NULL, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
JSBool
|
|
|
|
js_SetProperty(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
|
|
|
|
{
|
2009-04-30 15:52:13 -07:00
|
|
|
return js_SetPropertyHelper(cx, obj, id, false, vp);
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JSBool
|
|
|
|
js_GetAttributes(JSContext *cx, JSObject *obj, jsid id, JSProperty *prop,
|
|
|
|
uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSBool noprop, ok;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
|
|
|
noprop = !prop;
|
|
|
|
if (noprop) {
|
|
|
|
if (!js_LookupProperty(cx, obj, id, &obj, &prop))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop) {
|
|
|
|
*attrsp = 0;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
if (!OBJ_IS_NATIVE(obj)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->getAttributes(cx, id, prop, attrsp);
|
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
|
|
|
*attrsp = sprop->attrs;
|
|
|
|
if (noprop)
|
2009-08-11 13:05:44 -07:00
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_SetAttributes(JSContext *cx, JSObject *obj, jsid id, JSProperty *prop,
|
|
|
|
uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSBool noprop, ok;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
|
|
|
|
noprop = !prop;
|
|
|
|
if (noprop) {
|
|
|
|
if (!js_LookupProperty(cx, obj, id, &obj, &prop))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop)
|
|
|
|
return JS_TRUE;
|
|
|
|
if (!OBJ_IS_NATIVE(obj)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
ok = obj->setAttributes(cx, id, prop, attrsp);
|
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
|
|
|
sprop = js_ChangeNativePropertyAttrs(cx, obj, sprop, *attrsp, 0,
|
|
|
|
sprop->getter, sprop->setter);
|
|
|
|
if (noprop)
|
2009-08-11 13:05:44 -07:00
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return (sprop != NULL);
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_DeleteProperty(JSContext *cx, JSObject *obj, jsid id, jsval *rval)
|
|
|
|
{
|
|
|
|
JSObject *proto;
|
|
|
|
JSProperty *prop;
|
|
|
|
JSScopeProperty *sprop;
|
|
|
|
JSScope *scope;
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
*rval = JSVAL_TRUE;
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/* Convert string indices to integers if appropriate. */
|
2009-07-11 15:41:32 -07:00
|
|
|
id = js_CheckForStringIndex(id);
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!js_LookupProperty(cx, obj, id, &proto, &prop))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop || proto != obj) {
|
|
|
|
/*
|
|
|
|
* If the property was found in a native prototype, check whether it's
|
|
|
|
* shared and permanent. Such a property stands for direct properties
|
|
|
|
* in all delegating objects, matching ECMA semantics without bloating
|
|
|
|
* each delegating object.
|
|
|
|
*/
|
|
|
|
if (prop) {
|
|
|
|
if (OBJ_IS_NATIVE(proto)) {
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
|
|
|
if (SPROP_IS_SHARED_PERMANENT(sprop))
|
|
|
|
*rval = JSVAL_FALSE;
|
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
proto->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (*rval == JSVAL_FALSE)
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If no property, or the property comes unshared or impermanent from
|
|
|
|
* a prototype, call the class's delProperty hook, passing rval as the
|
|
|
|
* result parameter.
|
|
|
|
*/
|
|
|
|
return OBJ_GET_CLASS(cx, obj)->delProperty(cx, obj, ID_TO_VALUE(id),
|
|
|
|
rval);
|
|
|
|
}
|
|
|
|
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
|
|
|
if (sprop->attrs & JSPROP_PERMANENT) {
|
2009-08-11 13:05:44 -07:00
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
*rval = JSVAL_FALSE;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* XXXbe called with obj locked */
|
2009-08-27 22:53:26 -07:00
|
|
|
if (!obj->getClass()->delProperty(cx, obj, SPROP_USERID(sprop), rval)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
scope = OBJ_SCOPE(obj);
|
|
|
|
if (SPROP_HAS_VALID_SLOT(sprop, scope))
|
|
|
|
GC_POKE(cx, LOCKED_OBJ_GET_SLOT(obj, sprop->slot));
|
|
|
|
|
2009-07-09 13:27:21 -07:00
|
|
|
ok = scope->remove(cx, id);
|
2009-08-11 13:05:44 -07:00
|
|
|
obj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_DefaultValue(JSContext *cx, JSObject *obj, JSType hint, jsval *vp)
|
|
|
|
{
|
|
|
|
jsval v, save;
|
|
|
|
JSString *str;
|
|
|
|
|
|
|
|
v = save = OBJECT_TO_JSVAL(obj);
|
|
|
|
switch (hint) {
|
|
|
|
case JSTYPE_STRING:
|
2009-07-15 17:36:24 -07:00
|
|
|
/*
|
|
|
|
* Optimize for String objects with standard toString methods. Support
|
|
|
|
* new String(...) instances whether mutated to have their own scope or
|
|
|
|
* not, as well as direct String.prototype references.
|
|
|
|
*/
|
|
|
|
if (OBJ_GET_CLASS(cx, obj) == &js_StringClass) {
|
|
|
|
jsid toStringId = ATOM_TO_JSID(cx->runtime->atomState.toStringAtom);
|
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
|
|
|
JSScopeProperty *sprop = scope->lookup(toStringId);
|
2009-07-21 14:25:11 -07:00
|
|
|
JSObject *pobj = obj;
|
2009-07-15 17:36:24 -07:00
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
if (!sprop) {
|
2009-08-27 22:53:26 -07:00
|
|
|
pobj = obj->getProto();
|
2009-07-15 17:36:24 -07:00
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
if (pobj && OBJ_GET_CLASS(cx, pobj) == &js_StringClass) {
|
2009-07-15 17:36:24 -07:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-07-21 14:25:11 -07:00
|
|
|
JS_LOCK_OBJ(cx, pobj);
|
|
|
|
scope = OBJ_SCOPE(pobj);
|
2009-07-15 17:36:24 -07:00
|
|
|
sprop = scope->lookup(toStringId);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (sprop &&
|
2009-08-26 09:34:41 -07:00
|
|
|
SPROP_HAS_STUB_GETTER(sprop) &&
|
2009-07-15 17:36:24 -07:00
|
|
|
SPROP_HAS_VALID_SLOT(sprop, scope)) {
|
2009-07-21 14:25:11 -07:00
|
|
|
jsval fval = LOCKED_OBJ_GET_SLOT(pobj, sprop->slot);
|
2009-07-15 17:36:24 -07:00
|
|
|
|
|
|
|
if (VALUE_IS_FUNCTION(cx, fval)) {
|
|
|
|
JSObject *funobj = JSVAL_TO_OBJECT(fval);
|
|
|
|
JSFunction *fun = GET_FUNCTION_PRIVATE(cx, funobj);
|
|
|
|
|
|
|
|
if (FUN_FAST_NATIVE(fun) == js_str_toString) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-09-05 08:59:11 -07:00
|
|
|
*vp = obj->fslots[JSSLOT_PRIMITIVE_THIS];
|
2009-07-15 17:36:24 -07:00
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* Propagate the exception if js_TryMethod finds an appropriate
|
|
|
|
* method, and calling that method returned failure.
|
|
|
|
*/
|
|
|
|
if (!js_TryMethod(cx, obj, cx->runtime->atomState.toStringAtom, 0, NULL,
|
|
|
|
&v)) {
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(v)) {
|
|
|
|
if (!OBJ_GET_CLASS(cx, obj)->convert(cx, obj, hint, &v))
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
if (!OBJ_GET_CLASS(cx, obj)->convert(cx, obj, hint, &v))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(v)) {
|
|
|
|
JSType type = JS_TypeOfValue(cx, v);
|
|
|
|
if (type == hint ||
|
|
|
|
(type == JSTYPE_FUNCTION && hint == JSTYPE_OBJECT)) {
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
if (!js_TryMethod(cx, obj, cx->runtime->atomState.toStringAtom, 0,
|
|
|
|
NULL, &v)) {
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(v)) {
|
|
|
|
/* Avoid recursive death when decompiling in js_ReportValueError. */
|
|
|
|
if (hint == JSTYPE_STRING) {
|
|
|
|
str = JS_InternString(cx, OBJ_GET_CLASS(cx, obj)->name);
|
|
|
|
if (!str)
|
|
|
|
return JS_FALSE;
|
|
|
|
} else {
|
|
|
|
str = NULL;
|
|
|
|
}
|
|
|
|
*vp = OBJECT_TO_JSVAL(obj);
|
|
|
|
js_ReportValueError2(cx, JSMSG_CANT_CONVERT_TO,
|
|
|
|
JSDVG_SEARCH_STACK, save, str,
|
|
|
|
(hint == JSTYPE_VOID)
|
|
|
|
? "primitive type"
|
2007-08-07 00:29:32 -07:00
|
|
|
: JS_TYPE_STR(hint));
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
out:
|
|
|
|
*vp = v;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2008-07-06 12:02:44 -07:00
|
|
|
/*
|
2008-08-19 10:00:14 -07:00
|
|
|
* Private type used to enumerate properties of a native JS object. It is
|
|
|
|
* allocated as necessary from JSENUMERATE_INIT and is freed when running the
|
|
|
|
* GC. The structure is not allocated when there are no enumerable properties
|
|
|
|
* in the object. Instead for the empty enumerator the code uses JSVAL_ZERO as
|
|
|
|
* the enumeration state.
|
|
|
|
*
|
|
|
|
* JSRuntime.nativeEnumCache caches the enumerators using scope's shape to
|
|
|
|
* avoid repeated scanning of scopes for enumerable properties. The cache
|
|
|
|
* entry is either JSNativeEnumerator* or, for the empty enumerator, the shape
|
|
|
|
* value itself. The latter is stored as (shape << 1) | 1 to ensure that it is
|
|
|
|
* always different from JSNativeEnumerator* values.
|
2008-07-06 12:02:44 -07:00
|
|
|
*/
|
|
|
|
struct JSNativeEnumerator {
|
2008-08-19 10:00:14 -07:00
|
|
|
/*
|
|
|
|
* The index into the ids array. It runs from the length down to 1 when
|
|
|
|
* the enumerator is running. It is 0 when the enumerator is finished and
|
|
|
|
* can be reused on a cache hit. Its type is jsword, not uint32, for
|
|
|
|
* compatibility with js_CompareAndSwap.
|
|
|
|
*/
|
|
|
|
jsword cursor;
|
|
|
|
|
|
|
|
uint32 length; /* length of ids array */
|
|
|
|
uint32 shape; /* "shape" number -- see jsscope.h */
|
|
|
|
JSNativeEnumerator *next; /* list linking */
|
|
|
|
jsid ids[1]; /* enumeration id array */
|
2008-07-06 12:02:44 -07:00
|
|
|
};
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-08-19 10:00:14 -07:00
|
|
|
/* The tagging of shape values requires one bit. */
|
|
|
|
JS_STATIC_ASSERT((jsuword) SHAPE_OVERFLOW_BIT <=
|
|
|
|
((jsuword) 1 << (JS_BITS_PER_WORD - 1)));
|
|
|
|
|
|
|
|
static inline size_t
|
|
|
|
NativeEnumeratorSize(uint32 length)
|
|
|
|
{
|
|
|
|
JS_ASSERT(length != 0);
|
|
|
|
return offsetof(JSNativeEnumerator, ids) + (size_t) length * sizeof(jsid);
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/*
|
|
|
|
* This function is used to enumerate the properties of native JSObjects
|
|
|
|
* and those host objects that do not define a JSNewEnumerateOp-style iterator
|
|
|
|
* function.
|
|
|
|
*/
|
|
|
|
JSBool
|
|
|
|
js_Enumerate(JSContext *cx, JSObject *obj, JSIterateOp enum_op,
|
|
|
|
jsval *statep, jsid *idp)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
JSEnumerateOp enumerate;
|
2008-07-06 12:02:44 -07:00
|
|
|
JSNativeEnumerator *ne;
|
2008-08-19 10:00:14 -07:00
|
|
|
uint32 length, shape;
|
|
|
|
size_t allocated;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSScope *scope;
|
2008-08-19 10:00:14 -07:00
|
|
|
jsuword *cachep, oldcache;
|
2008-07-06 12:02:44 -07:00
|
|
|
JSScopeProperty *sprop;
|
|
|
|
jsid *ids;
|
2008-08-19 10:00:14 -07:00
|
|
|
jsword newcursor;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
enumerate = clasp->enumerate;
|
2008-02-18 13:01:47 -08:00
|
|
|
if (clasp->flags & JSCLASS_NEW_ENUMERATE) {
|
|
|
|
JS_ASSERT(enumerate != JS_EnumerateStub);
|
2007-03-22 10:30:00 -07:00
|
|
|
return ((JSNewEnumerateOp) enumerate)(cx, obj, enum_op, statep, idp);
|
2008-02-18 13:01:47 -08:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
switch (enum_op) {
|
|
|
|
case JSENUMERATE_INIT:
|
|
|
|
if (!enumerate(cx, obj))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
/*
|
2008-07-06 12:02:44 -07:00
|
|
|
* The set of all property ids is pre-computed when the iterator is
|
|
|
|
* initialized to avoid problems caused by properties being deleted
|
|
|
|
* during the iteration.
|
|
|
|
*
|
|
|
|
* Use a do-while(0) loop to avoid too many nested ifs. If ne is null
|
2008-08-19 10:00:14 -07:00
|
|
|
* after the loop, it indicates an empty enumerator. If allocated is
|
|
|
|
* not zero after the loop, we add the newly allocated ne to the cache
|
|
|
|
* and runtime->nativeEnumerators list.
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2008-07-06 12:02:44 -07:00
|
|
|
ne = NULL;
|
|
|
|
length = 0;
|
2008-08-19 10:00:14 -07:00
|
|
|
allocated = (size_t) 0;
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = OBJ_SCOPE(obj);
|
2008-07-06 12:02:44 -07:00
|
|
|
do {
|
2008-08-19 10:00:14 -07:00
|
|
|
ENUM_CACHE_METER(nativeEnumProbes);
|
|
|
|
shape = scope->shape;
|
|
|
|
cachep = &cx->runtime->
|
|
|
|
nativeEnumCache[NATIVE_ENUM_CACHE_HASH(shape)];
|
|
|
|
oldcache = *cachep;
|
|
|
|
if (oldcache & (jsuword) 1) {
|
|
|
|
if ((uint32) (oldcache >> 1) == shape) {
|
|
|
|
/* scope has a shape with no enumerable properties. */
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
} else if (oldcache != (jsuword) 0) {
|
|
|
|
/*
|
|
|
|
* We can safely read ne->shape without taking the GC lock as
|
|
|
|
* ne is deleted only when running the GC and ne->shape is
|
|
|
|
* read-only after initialization.
|
|
|
|
*/
|
|
|
|
ne = (JSNativeEnumerator *) *cachep;
|
|
|
|
JS_ASSERT(ne->length >= 1);
|
|
|
|
if (ne->shape == shape) {
|
|
|
|
/*
|
|
|
|
* Check that ne is not running with another enumerator
|
|
|
|
* and, if so, reuse and mark it as running from now.
|
|
|
|
*/
|
|
|
|
length = ne->length;
|
|
|
|
if (js_CompareAndSwap(&ne->cursor, 0, length))
|
|
|
|
break;
|
|
|
|
length = 0;
|
|
|
|
}
|
|
|
|
ne = NULL;
|
|
|
|
}
|
|
|
|
ENUM_CACHE_METER(nativeEnumMisses);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-07-06 12:02:44 -07:00
|
|
|
/* Count all enumerable properties in object's scope. */
|
2008-08-19 10:00:14 -07:00
|
|
|
JS_ASSERT(length == 0);
|
2008-07-06 12:02:44 -07:00
|
|
|
for (sprop = SCOPE_LAST_PROP(scope); sprop; sprop = sprop->parent) {
|
2007-12-14 13:36:02 -08:00
|
|
|
if ((sprop->attrs & JSPROP_ENUMERATE) &&
|
2007-03-22 10:30:00 -07:00
|
|
|
!(sprop->flags & SPROP_IS_ALIAS) &&
|
2009-07-09 13:27:21 -07:00
|
|
|
(!scope->hadMiddleDelete() || scope->has(sprop))) {
|
2007-03-22 10:30:00 -07:00
|
|
|
length++;
|
|
|
|
}
|
|
|
|
}
|
2008-08-19 10:00:14 -07:00
|
|
|
if (length == 0) {
|
2009-09-10 04:59:43 -07:00
|
|
|
/*
|
|
|
|
* Cache the scope without enumerable properties unless its
|
|
|
|
* shape overflows, see bug 440834.
|
|
|
|
*/
|
|
|
|
if (shape < SHAPE_OVERFLOW_BIT)
|
|
|
|
*cachep = ((jsuword) shape << 1) | (jsuword) 1;
|
2008-07-06 12:02:44 -07:00
|
|
|
break;
|
2008-08-19 10:00:14 -07:00
|
|
|
}
|
2008-07-06 12:02:44 -07:00
|
|
|
|
2008-08-19 10:00:14 -07:00
|
|
|
allocated = NativeEnumeratorSize(length);
|
2009-07-27 21:10:12 -07:00
|
|
|
ne = (JSNativeEnumerator *) cx->malloc(allocated);
|
2008-07-06 12:02:44 -07:00
|
|
|
if (!ne) {
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2008-07-06 12:02:44 -07:00
|
|
|
ne->cursor = length;
|
|
|
|
ne->length = length;
|
2008-08-19 10:00:14 -07:00
|
|
|
ne->shape = shape;
|
2008-07-06 12:02:44 -07:00
|
|
|
ids = ne->ids;
|
|
|
|
for (sprop = SCOPE_LAST_PROP(scope); sprop; sprop = sprop->parent) {
|
2007-12-14 13:36:02 -08:00
|
|
|
if ((sprop->attrs & JSPROP_ENUMERATE) &&
|
2007-03-22 10:30:00 -07:00
|
|
|
!(sprop->flags & SPROP_IS_ALIAS) &&
|
2009-07-09 13:27:21 -07:00
|
|
|
(!scope->hadMiddleDelete() || scope->has(sprop))) {
|
2008-07-06 12:02:44 -07:00
|
|
|
JS_ASSERT(ids < ne->ids + length);
|
|
|
|
*ids++ = sprop->id;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
2008-07-06 12:02:44 -07:00
|
|
|
JS_ASSERT(ids == ne->ids + length);
|
|
|
|
} while (0);
|
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-07-06 12:02:44 -07:00
|
|
|
if (!ne) {
|
|
|
|
JS_ASSERT(length == 0);
|
2008-08-19 10:00:14 -07:00
|
|
|
JS_ASSERT(allocated == 0);
|
2008-07-06 12:02:44 -07:00
|
|
|
*statep = JSVAL_ZERO;
|
|
|
|
} else {
|
|
|
|
JS_ASSERT(length != 0);
|
2008-08-21 05:04:20 -07:00
|
|
|
JS_ASSERT(ne->cursor == (jsword) length);
|
2008-08-19 10:00:14 -07:00
|
|
|
if (allocated != 0) {
|
|
|
|
JS_LOCK_GC(cx->runtime);
|
2009-09-17 15:40:37 -07:00
|
|
|
if (!js_AddAsGCBytes(cx, allocated)) {
|
|
|
|
/* js_AddAsGCBytes releases the GC lock on failures. */
|
|
|
|
cx->free(ne);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2008-08-19 10:00:14 -07:00
|
|
|
ne->next = cx->runtime->nativeEnumerators;
|
|
|
|
cx->runtime->nativeEnumerators = ne;
|
|
|
|
JS_ASSERT(((jsuword) ne & (jsuword) 1) == (jsuword) 0);
|
2009-09-10 04:59:43 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Do not cache enumerators for objects with with a shape
|
|
|
|
* that had overflowed, see bug 440834.
|
|
|
|
*/
|
|
|
|
if (shape < SHAPE_OVERFLOW_BIT)
|
|
|
|
*cachep = (jsuword) ne;
|
2008-08-19 10:00:14 -07:00
|
|
|
JS_UNLOCK_GC(cx->runtime);
|
|
|
|
}
|
2008-07-06 12:02:44 -07:00
|
|
|
*statep = PRIVATE_TO_JSVAL(ne);
|
|
|
|
}
|
2008-08-19 10:00:14 -07:00
|
|
|
if (idp)
|
|
|
|
*idp = INT_TO_JSVAL(length);
|
2007-03-22 10:30:00 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
case JSENUMERATE_NEXT:
|
|
|
|
case JSENUMERATE_DESTROY:
|
2008-08-19 10:00:14 -07:00
|
|
|
if (*statep == JSVAL_ZERO) {
|
|
|
|
*statep = JSVAL_NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
ne = (JSNativeEnumerator *) JSVAL_TO_PRIVATE(*statep);
|
|
|
|
JS_ASSERT(ne->length >= 1);
|
|
|
|
JS_ASSERT(ne->cursor >= 1);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* We must not access ne->cursor when we set it to zero as it means
|
|
|
|
* that ne is free and another thread can grab it from the cache. So
|
|
|
|
* we set the state to JSVAL_ZERO in the NEXT case to avoid touching
|
|
|
|
* ne->length again in the DESTROY case.
|
|
|
|
*/
|
|
|
|
if (enum_op == JSENUMERATE_NEXT) {
|
|
|
|
newcursor = ne->cursor - 1;
|
|
|
|
*idp = ne->ids[newcursor];
|
|
|
|
ne->cursor = newcursor;
|
|
|
|
if (newcursor == 0)
|
|
|
|
*statep = JSVAL_ZERO;
|
|
|
|
} else {
|
|
|
|
/* The enumerator has not iterated over all ids. */
|
2009-06-23 09:52:03 -07:00
|
|
|
JS_ASSERT(enum_op == JSENUMERATE_DESTROY);
|
2008-08-19 10:00:14 -07:00
|
|
|
ne->cursor = 0;
|
2009-06-23 09:52:03 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Force on shutdown an extra GC cycle so all native enumerators
|
|
|
|
* on the rt->nativeEnumerators list will be removed when the GC
|
|
|
|
* calls js_TraceNativeEnumerators. See bug 499570.
|
|
|
|
*/
|
|
|
|
if (cx->runtime->state == JSRTS_LANDING)
|
|
|
|
cx->runtime->gcPoke = true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2008-07-01 18:59:18 -07:00
|
|
|
js_TraceNativeEnumerators(JSTracer *trc)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2008-08-19 10:00:14 -07:00
|
|
|
JSRuntime *rt;
|
|
|
|
JSNativeEnumerator **nep, *ne;
|
2008-07-06 12:02:44 -07:00
|
|
|
jsid *cursor, *end;
|
|
|
|
|
2008-08-19 10:00:14 -07:00
|
|
|
/*
|
2009-07-24 06:55:28 -07:00
|
|
|
* Purge native enumerators cached by shape id when the GC is about to
|
|
|
|
* re-number shapes due to shape generation overflow. Do this also when
|
|
|
|
* shutting down the runtime.
|
2008-08-19 10:00:14 -07:00
|
|
|
*/
|
|
|
|
rt = trc->context->runtime;
|
2009-07-24 06:55:28 -07:00
|
|
|
bool doGC = IS_GC_MARKING_TRACER(trc) &&
|
|
|
|
(rt->gcRegenShapes || rt->state == JSRTS_LANDING);
|
|
|
|
|
|
|
|
if (doGC) {
|
2008-08-19 10:00:14 -07:00
|
|
|
memset(&rt->nativeEnumCache, 0, sizeof rt->nativeEnumCache);
|
|
|
|
#ifdef JS_DUMP_ENUM_CACHE_STATS
|
|
|
|
printf("nativeEnumCache hit rate %g%%\n",
|
|
|
|
100.0 * (rt->nativeEnumProbes - rt->nativeEnumMisses) /
|
|
|
|
rt->nativeEnumProbes);
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
nep = &rt->nativeEnumerators;
|
|
|
|
while ((ne = *nep) != NULL) {
|
|
|
|
JS_ASSERT(ne->length != 0);
|
|
|
|
if (ne->cursor != 0) {
|
|
|
|
/* Trace ids of the running enumerator. */
|
|
|
|
cursor = ne->ids;
|
|
|
|
end = cursor + ne->length;
|
|
|
|
do {
|
2009-07-28 02:00:35 -07:00
|
|
|
js_TraceId(trc, *cursor);
|
2008-08-19 10:00:14 -07:00
|
|
|
} while (++cursor != end);
|
2009-07-24 06:55:28 -07:00
|
|
|
} else if (doGC) {
|
2009-09-17 15:40:37 -07:00
|
|
|
js_RemoveAsGCBytes(rt, NativeEnumeratorSize(ne->length));
|
2008-08-19 10:00:14 -07:00
|
|
|
*nep = ne->next;
|
2009-07-27 21:10:12 -07:00
|
|
|
trc->context->free(ne);
|
2008-08-19 10:00:14 -07:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
nep = &ne->next;
|
2008-07-06 12:02:44 -07:00
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_CheckAccess(JSContext *cx, JSObject *obj, jsid id, JSAccessMode mode,
|
|
|
|
jsval *vp, uintN *attrsp)
|
|
|
|
{
|
|
|
|
JSBool writing;
|
|
|
|
JSObject *pobj;
|
|
|
|
JSProperty *prop;
|
|
|
|
JSClass *clasp;
|
|
|
|
JSScopeProperty *sprop;
|
2008-09-05 16:24:53 -07:00
|
|
|
JSSecurityCallbacks *callbacks;
|
2007-03-22 10:30:00 -07:00
|
|
|
JSCheckAccessOp check;
|
|
|
|
|
|
|
|
writing = (mode & JSACC_WRITE) != 0;
|
|
|
|
switch (mode & JSACC_TYPEMASK) {
|
|
|
|
case JSACC_PROTO:
|
|
|
|
pobj = obj;
|
|
|
|
if (!writing)
|
|
|
|
*vp = OBJECT_TO_JSVAL(OBJ_GET_PROTO(cx, obj));
|
|
|
|
*attrsp = JSPROP_PERMANENT;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case JSACC_PARENT:
|
|
|
|
JS_ASSERT(!writing);
|
|
|
|
pobj = obj;
|
|
|
|
*vp = OBJECT_TO_JSVAL(OBJ_GET_PARENT(cx, obj));
|
|
|
|
*attrsp = JSPROP_READONLY | JSPROP_PERMANENT;
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->lookupProperty(cx, id, &pobj, &prop))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (!prop) {
|
|
|
|
if (!writing)
|
|
|
|
*vp = JSVAL_VOID;
|
|
|
|
*attrsp = 0;
|
2008-02-18 18:27:44 -08:00
|
|
|
pobj = obj;
|
|
|
|
break;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
2008-02-18 18:27:44 -08:00
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!OBJ_IS_NATIVE(pobj)) {
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2008-02-18 18:27:44 -08:00
|
|
|
|
|
|
|
/* Avoid diverging for non-natives that reuse js_CheckAccess. */
|
2008-02-20 12:01:14 -08:00
|
|
|
if (pobj->map->ops->checkAccess == js_CheckAccess) {
|
2008-08-05 14:49:50 -07:00
|
|
|
if (!writing) {
|
2008-02-20 12:01:14 -08:00
|
|
|
*vp = JSVAL_VOID;
|
2008-08-05 14:49:50 -07:00
|
|
|
*attrsp = 0;
|
|
|
|
}
|
2008-02-18 18:27:44 -08:00
|
|
|
break;
|
2008-02-20 12:01:14 -08:00
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
return pobj->checkAccess(cx, id, mode, vp, attrsp);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
sprop = (JSScopeProperty *)prop;
|
|
|
|
*attrsp = sprop->attrs;
|
|
|
|
if (!writing) {
|
|
|
|
*vp = (SPROP_HAS_VALID_SLOT(sprop, OBJ_SCOPE(pobj)))
|
|
|
|
? LOCKED_OBJ_GET_SLOT(pobj, sprop->slot)
|
|
|
|
: JSVAL_VOID;
|
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
pobj->dropProperty(cx, prop);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* If obj's class has a stub (null) checkAccess hook, use the per-runtime
|
|
|
|
* checkObjectAccess callback, if configured.
|
|
|
|
*
|
|
|
|
* We don't want to require all classes to supply a checkAccess hook; we
|
|
|
|
* need that hook only for certain classes used when precompiling scripts
|
|
|
|
* and functions ("brutal sharing"). But for general safety of built-in
|
|
|
|
* magic properties such as __proto__ and __parent__, we route all access
|
|
|
|
* checks, even for classes that stub out checkAccess, through the global
|
|
|
|
* checkObjectAccess hook. This covers precompilation-based sharing and
|
|
|
|
* (possibly unintended) runtime sharing across trust boundaries.
|
|
|
|
*/
|
|
|
|
clasp = OBJ_GET_CLASS(cx, pobj);
|
|
|
|
check = clasp->checkAccess;
|
2008-09-05 16:24:53 -07:00
|
|
|
if (!check) {
|
|
|
|
callbacks = JS_GetSecurityCallbacks(cx);
|
|
|
|
check = callbacks ? callbacks->checkObjectAccess : NULL;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
return !check || check(cx, pobj, ID_TO_VALUE(id), mode, vp);
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifdef JS_THREADSAFE
|
|
|
|
void
|
|
|
|
js_DropProperty(JSContext *cx, JSObject *obj, JSProperty *prop)
|
|
|
|
{
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef NARCISSUS
|
|
|
|
static JSBool
|
|
|
|
GetCurrentExecutionContext(JSContext *cx, JSObject *obj, jsval *rval)
|
|
|
|
{
|
|
|
|
JSObject *tmp;
|
|
|
|
jsval xcval;
|
|
|
|
|
|
|
|
while ((tmp = OBJ_GET_PARENT(cx, obj)) != NULL)
|
|
|
|
obj = tmp;
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.ExecutionContextAtom), &xcval))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (JSVAL_IS_PRIMITIVE(xcval)) {
|
|
|
|
JS_ReportError(cx, "invalid ExecutionContext in global object");
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!JSVAL_TO_OBJECT(xcval)->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.currentAtom),
|
|
|
|
rval)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_Call(JSContext *cx, JSObject *obj, uintN argc, jsval *argv, jsval *rval)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
|
|
|
|
clasp = OBJ_GET_CLASS(cx, JSVAL_TO_OBJECT(argv[-2]));
|
|
|
|
if (!clasp->call) {
|
|
|
|
#ifdef NARCISSUS
|
|
|
|
JSObject *callee, *args;
|
|
|
|
jsval fval, nargv[3];
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
callee = JSVAL_TO_OBJECT(argv[-2]);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!callee->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.__call__Atom), &fval))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (VALUE_IS_FUNCTION(cx, fval)) {
|
|
|
|
if (!GetCurrentExecutionContext(cx, obj, &nargv[2]))
|
|
|
|
return JS_FALSE;
|
2008-12-09 08:38:32 -08:00
|
|
|
args = js_GetArgsObject(cx, js_GetTopStackFrame(cx));
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!args)
|
|
|
|
return JS_FALSE;
|
|
|
|
nargv[0] = OBJECT_TO_JSVAL(obj);
|
|
|
|
nargv[1] = OBJECT_TO_JSVAL(args);
|
|
|
|
return js_InternalCall(cx, callee, fval, 3, nargv, rval);
|
|
|
|
}
|
|
|
|
if (JSVAL_IS_OBJECT(fval) && JSVAL_TO_OBJECT(fval) != callee) {
|
|
|
|
argv[-2] = fval;
|
|
|
|
ok = js_Call(cx, obj, argc, argv, rval);
|
|
|
|
argv[-2] = OBJECT_TO_JSVAL(callee);
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
#endif
|
2008-12-09 08:38:32 -08:00
|
|
|
js_ReportIsNotFunction(cx, &argv[-2], js_GetTopStackFrame(cx)->flags & JSFRAME_ITERATOR);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
return clasp->call(cx, obj, argc, argv, rval);
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_Construct(JSContext *cx, JSObject *obj, uintN argc, jsval *argv,
|
|
|
|
jsval *rval)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
|
|
|
|
clasp = OBJ_GET_CLASS(cx, JSVAL_TO_OBJECT(argv[-2]));
|
|
|
|
if (!clasp->construct) {
|
|
|
|
#ifdef NARCISSUS
|
|
|
|
JSObject *callee, *args;
|
|
|
|
jsval cval, nargv[2];
|
|
|
|
JSBool ok;
|
|
|
|
|
|
|
|
callee = JSVAL_TO_OBJECT(argv[-2]);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!callee->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.__construct__Atom),
|
|
|
|
&cval)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
if (VALUE_IS_FUNCTION(cx, cval)) {
|
|
|
|
if (!GetCurrentExecutionContext(cx, obj, &nargv[1]))
|
|
|
|
return JS_FALSE;
|
2008-12-09 08:38:32 -08:00
|
|
|
args = js_GetArgsObject(cx, js_GetTopStackFrame(cx));
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!args)
|
|
|
|
return JS_FALSE;
|
|
|
|
nargv[0] = OBJECT_TO_JSVAL(args);
|
|
|
|
return js_InternalCall(cx, callee, cval, 2, nargv, rval);
|
|
|
|
}
|
|
|
|
if (JSVAL_IS_OBJECT(cval) && JSVAL_TO_OBJECT(cval) != callee) {
|
|
|
|
argv[-2] = cval;
|
|
|
|
ok = js_Call(cx, obj, argc, argv, rval);
|
|
|
|
argv[-2] = OBJECT_TO_JSVAL(callee);
|
|
|
|
return ok;
|
|
|
|
}
|
|
|
|
#endif
|
2007-08-10 23:12:00 -07:00
|
|
|
js_ReportIsNotFunction(cx, &argv[-2], JSV2F_CONSTRUCT);
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
return clasp->construct(cx, obj, argc, argv, rval);
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_HasInstance(JSContext *cx, JSObject *obj, jsval v, JSBool *bp)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
|
|
|
|
clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
if (clasp->hasInstance)
|
|
|
|
return clasp->hasInstance(cx, obj, v, bp);
|
|
|
|
#ifdef NARCISSUS
|
|
|
|
{
|
|
|
|
jsval fval, rval;
|
|
|
|
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.__hasInstance__Atom), &fval))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (VALUE_IS_FUNCTION(cx, fval)) {
|
2008-01-22 00:56:26 -08:00
|
|
|
if (!js_InternalCall(cx, obj, fval, 1, &v, &rval))
|
|
|
|
return JS_FALSE;
|
|
|
|
*bp = js_ValueToBoolean(rval);
|
|
|
|
return JS_TRUE;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
js_ReportValueError(cx, JSMSG_BAD_INSTANCEOF_RHS,
|
|
|
|
JSDVG_SEARCH_STACK, OBJECT_TO_JSVAL(obj), NULL);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_IsDelegate(JSContext *cx, JSObject *obj, jsval v, JSBool *bp)
|
|
|
|
{
|
|
|
|
JSObject *obj2;
|
|
|
|
|
|
|
|
*bp = JS_FALSE;
|
|
|
|
if (JSVAL_IS_PRIMITIVE(v))
|
|
|
|
return JS_TRUE;
|
|
|
|
obj2 = JSVAL_TO_OBJECT(v);
|
|
|
|
while ((obj2 = OBJ_GET_PROTO(cx, obj2)) != NULL) {
|
|
|
|
if (obj2 == obj) {
|
|
|
|
*bp = JS_TRUE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_GetClassPrototype(JSContext *cx, JSObject *scope, jsid id,
|
|
|
|
JSObject **protop)
|
|
|
|
{
|
|
|
|
jsval v;
|
|
|
|
JSObject *ctor;
|
|
|
|
|
|
|
|
if (!js_FindClassObject(cx, scope, id, &v))
|
|
|
|
return JS_FALSE;
|
|
|
|
if (VALUE_IS_FUNCTION(cx, v)) {
|
|
|
|
ctor = JSVAL_TO_OBJECT(v);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!ctor->getProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.classPrototypeAtom), &v))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
if (!JSVAL_IS_PRIMITIVE(v)) {
|
|
|
|
/*
|
|
|
|
* Set the newborn root in case v is otherwise unreferenced.
|
|
|
|
* It's ok to overwrite newborn roots here, since the getter
|
|
|
|
* called just above could have. Unlike the common GC rooting
|
|
|
|
* model, our callers do not have to protect protop thanks to
|
|
|
|
* this newborn root, since they all immediately create a new
|
|
|
|
* instance that delegates to this object, or just query the
|
|
|
|
* prototype for its class.
|
|
|
|
*/
|
2007-09-16 06:03:17 -07:00
|
|
|
cx->weakRoots.newborn[GCX_OBJECT] = JSVAL_TO_GCTHING(v);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
*protop = JSVAL_IS_OBJECT(v) ? JSVAL_TO_OBJECT(v) : NULL;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* For shared precompilation of function objects, we support cloning on entry
|
|
|
|
* to an execution context in which the function declaration or expression
|
|
|
|
* should be processed as if it were not precompiled, where the precompiled
|
|
|
|
* function's scope chain does not match the execution context's. The cloned
|
|
|
|
* function object carries its execution-context scope in its parent slot; it
|
|
|
|
* links to the precompiled function (the "clone-parent") via its proto slot.
|
|
|
|
*
|
|
|
|
* Note that this prototype-based delegation leaves an unchecked access path
|
|
|
|
* from the clone to the clone-parent's 'constructor' property. If the clone
|
|
|
|
* lives in a less privileged or shared scope than the clone-parent, this is
|
|
|
|
* a security hole, a sharing hazard, or both. Therefore we check all such
|
|
|
|
* accesses with the following getter/setter pair, which we use when defining
|
|
|
|
* 'constructor' in f.prototype for all function objects f.
|
|
|
|
*/
|
|
|
|
static JSBool
|
|
|
|
CheckCtorGetAccess(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSAtom *atom;
|
|
|
|
uintN attrs;
|
|
|
|
|
|
|
|
atom = cx->runtime->atomState.constructorAtom;
|
2007-08-11 13:25:16 -07:00
|
|
|
JS_ASSERT(id == ATOM_TO_JSID(atom));
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->checkAccess(cx, ATOM_TO_JSID(atom), JSACC_READ, vp, &attrs);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static JSBool
|
|
|
|
CheckCtorSetAccess(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
JSAtom *atom;
|
|
|
|
uintN attrs;
|
|
|
|
|
|
|
|
atom = cx->runtime->atomState.constructorAtom;
|
2007-08-11 13:25:16 -07:00
|
|
|
JS_ASSERT(id == ATOM_TO_JSID(atom));
|
2009-08-11 13:05:44 -07:00
|
|
|
return obj->checkAccess(cx, ATOM_TO_JSID(atom), JSACC_WRITE, vp, &attrs);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_SetClassPrototype(JSContext *cx, JSObject *ctor, JSObject *proto,
|
|
|
|
uintN attrs)
|
|
|
|
{
|
|
|
|
/*
|
|
|
|
* Use the given attributes for the prototype property of the constructor,
|
|
|
|
* as user-defined constructors have a DontDelete prototype (which may be
|
|
|
|
* reset), while native or "system" constructors have DontEnum | ReadOnly |
|
|
|
|
* DontDelete.
|
|
|
|
*/
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!ctor->defineProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.classPrototypeAtom),
|
|
|
|
OBJECT_TO_JSVAL(proto), JS_PropertyStub, JS_PropertyStub,
|
2009-08-26 14:28:36 -07:00
|
|
|
attrs)) {
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* ECMA says that Object.prototype.constructor, or f.prototype.constructor
|
|
|
|
* for a user-defined function f, is DontEnum.
|
|
|
|
*/
|
2009-08-11 13:05:44 -07:00
|
|
|
return proto->defineProperty(cx, ATOM_TO_JSID(cx->runtime->atomState.constructorAtom),
|
2009-08-26 14:28:36 -07:00
|
|
|
OBJECT_TO_JSVAL(ctor), CheckCtorGetAccess, CheckCtorSetAccess, 0);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2007-06-14 00:07:01 -07:00
|
|
|
JSBool
|
|
|
|
js_PrimitiveToObject(JSContext *cx, jsval *vp)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
JSObject *obj;
|
|
|
|
|
|
|
|
/* Table to map primitive value's tag into the corresponding class. */
|
|
|
|
JS_STATIC_ASSERT(JSVAL_INT == 1);
|
|
|
|
JS_STATIC_ASSERT(JSVAL_DOUBLE == 2);
|
|
|
|
JS_STATIC_ASSERT(JSVAL_STRING == 4);
|
2009-08-12 16:39:23 -07:00
|
|
|
JS_STATIC_ASSERT(JSVAL_SPECIAL == 6);
|
2007-06-14 00:07:01 -07:00
|
|
|
static JSClass *const PrimitiveClasses[] = {
|
|
|
|
&js_NumberClass, /* INT */
|
|
|
|
&js_NumberClass, /* DOUBLE */
|
|
|
|
&js_NumberClass, /* INT */
|
|
|
|
&js_StringClass, /* STRING */
|
|
|
|
&js_NumberClass, /* INT */
|
|
|
|
&js_BooleanClass, /* BOOLEAN */
|
|
|
|
&js_NumberClass /* INT */
|
|
|
|
};
|
|
|
|
|
|
|
|
JS_ASSERT(!JSVAL_IS_OBJECT(*vp));
|
2008-06-25 02:43:02 -07:00
|
|
|
JS_ASSERT(!JSVAL_IS_VOID(*vp));
|
2007-06-14 00:07:01 -07:00
|
|
|
clasp = PrimitiveClasses[JSVAL_TAG(*vp) - 1];
|
2009-07-14 17:06:09 -07:00
|
|
|
obj = js_NewObject(cx, clasp, NULL, NULL);
|
2007-06-14 00:07:01 -07:00
|
|
|
if (!obj)
|
|
|
|
return JS_FALSE;
|
2009-09-05 08:59:11 -07:00
|
|
|
obj->fslots[JSSLOT_PRIMITIVE_THIS] = *vp;
|
2007-06-14 00:07:01 -07:00
|
|
|
*vp = OBJECT_TO_JSVAL(obj);
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
JSBool
|
|
|
|
js_ValueToObject(JSContext *cx, jsval v, JSObject **objp)
|
|
|
|
{
|
|
|
|
JSObject *obj;
|
|
|
|
|
|
|
|
if (JSVAL_IS_NULL(v) || JSVAL_IS_VOID(v)) {
|
|
|
|
obj = NULL;
|
|
|
|
} else if (JSVAL_IS_OBJECT(v)) {
|
|
|
|
obj = JSVAL_TO_OBJECT(v);
|
2009-08-11 13:05:44 -07:00
|
|
|
if (!obj->defaultValue(cx, JSTYPE_OBJECT, &v))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2009-03-10 05:52:10 -07:00
|
|
|
if (!JSVAL_IS_PRIMITIVE(v))
|
2007-03-22 10:30:00 -07:00
|
|
|
obj = JSVAL_TO_OBJECT(v);
|
|
|
|
} else {
|
2007-06-14 00:07:01 -07:00
|
|
|
if (!js_PrimitiveToObject(cx, &v))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
2007-06-14 00:07:01 -07:00
|
|
|
obj = JSVAL_TO_OBJECT(v);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
*objp = obj;
|
|
|
|
return JS_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSObject *
|
|
|
|
js_ValueToNonNullObject(JSContext *cx, jsval v)
|
|
|
|
{
|
|
|
|
JSObject *obj;
|
|
|
|
|
|
|
|
if (!js_ValueToObject(cx, v, &obj))
|
|
|
|
return NULL;
|
2007-11-12 21:23:22 -08:00
|
|
|
if (!obj)
|
|
|
|
js_ReportIsNullOrUndefined(cx, JSDVG_SEARCH_STACK, v, NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_TryValueOf(JSContext *cx, JSObject *obj, JSType type, jsval *rval)
|
|
|
|
{
|
|
|
|
jsval argv[1];
|
|
|
|
|
|
|
|
argv[0] = ATOM_KEY(cx->runtime->atomState.typeAtoms[type]);
|
|
|
|
return js_TryMethod(cx, obj, cx->runtime->atomState.valueOfAtom, 1, argv,
|
|
|
|
rval);
|
|
|
|
}
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_TryMethod(JSContext *cx, JSObject *obj, JSAtom *atom,
|
|
|
|
uintN argc, jsval *argv, jsval *rval)
|
|
|
|
{
|
|
|
|
JSErrorReporter older;
|
|
|
|
jsid id;
|
|
|
|
jsval fval;
|
|
|
|
JSBool ok;
|
|
|
|
|
2008-01-31 22:01:17 -08:00
|
|
|
JS_CHECK_RECURSION(cx, return JS_FALSE);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Report failure only if an appropriate method was found, and calling it
|
|
|
|
* returned failure. We propagate failure in this case to make exceptions
|
|
|
|
* behave properly.
|
|
|
|
*/
|
|
|
|
older = JS_SetErrorReporter(cx, NULL);
|
|
|
|
id = ATOM_TO_JSID(atom);
|
|
|
|
fval = JSVAL_VOID;
|
2009-09-03 14:41:19 -07:00
|
|
|
ok = js_GetMethod(cx, obj, id, JSGET_NO_METHOD_BARRIER, &fval);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (!ok)
|
|
|
|
JS_ClearPendingException(cx);
|
|
|
|
JS_SetErrorReporter(cx, older);
|
|
|
|
|
2009-01-30 15:40:05 -08:00
|
|
|
if (JSVAL_IS_PRIMITIVE(fval))
|
|
|
|
return JS_TRUE;
|
|
|
|
return js_InternalCall(cx, obj, fval, argc, argv, rval);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#if JS_HAS_XDR
|
|
|
|
|
|
|
|
JSBool
|
|
|
|
js_XDRObject(JSXDRState *xdr, JSObject **objp)
|
|
|
|
{
|
|
|
|
JSContext *cx;
|
|
|
|
JSAtom *atom;
|
|
|
|
JSClass *clasp;
|
|
|
|
uint32 classId, classDef;
|
|
|
|
JSProtoKey protoKey;
|
|
|
|
jsid classKey;
|
|
|
|
JSObject *proto;
|
|
|
|
|
|
|
|
cx = xdr->cx;
|
|
|
|
atom = NULL;
|
|
|
|
if (xdr->mode == JSXDR_ENCODE) {
|
|
|
|
clasp = OBJ_GET_CLASS(cx, *objp);
|
|
|
|
classId = JS_XDRFindClassIdByName(xdr, clasp->name);
|
|
|
|
classDef = !classId;
|
|
|
|
if (classDef) {
|
|
|
|
if (!JS_XDRRegisterClass(xdr, clasp, &classId))
|
|
|
|
return JS_FALSE;
|
|
|
|
protoKey = JSCLASS_CACHED_PROTO_KEY(clasp);
|
|
|
|
if (protoKey != JSProto_Null) {
|
|
|
|
classDef |= (protoKey << 1);
|
|
|
|
} else {
|
|
|
|
atom = js_Atomize(cx, clasp->name, strlen(clasp->name), 0);
|
|
|
|
if (!atom)
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
clasp = NULL; /* quell GCC overwarning */
|
|
|
|
classDef = 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* XDR a flag word, which could be 0 for a class use, in which case no
|
|
|
|
* name follows, only the id in xdr's class registry; 1 for a class def,
|
|
|
|
* in which case the flag word is followed by the class name transferred
|
|
|
|
* from or to atom; or a value greater than 1, an odd number that when
|
|
|
|
* divided by two yields the JSProtoKey for class. In the last case, as
|
|
|
|
* in the 0 classDef case, no name is transferred via atom.
|
|
|
|
*/
|
|
|
|
if (!JS_XDRUint32(xdr, &classDef))
|
|
|
|
return JS_FALSE;
|
2007-08-21 14:22:26 -07:00
|
|
|
if (classDef == 1 && !js_XDRStringAtom(xdr, &atom))
|
2007-03-22 10:30:00 -07:00
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
if (!JS_XDRUint32(xdr, &classId))
|
|
|
|
return JS_FALSE;
|
|
|
|
|
|
|
|
if (xdr->mode == JSXDR_DECODE) {
|
|
|
|
if (classDef) {
|
|
|
|
/* NB: we know that JSProto_Null is 0 here, for backward compat. */
|
2007-07-05 13:37:47 -07:00
|
|
|
protoKey = (JSProtoKey) (classDef >> 1);
|
2007-03-22 10:30:00 -07:00
|
|
|
classKey = (protoKey != JSProto_Null)
|
|
|
|
? INT_TO_JSID(protoKey)
|
|
|
|
: ATOM_TO_JSID(atom);
|
|
|
|
if (!js_GetClassPrototype(cx, NULL, classKey, &proto))
|
|
|
|
return JS_FALSE;
|
|
|
|
clasp = OBJ_GET_CLASS(cx, proto);
|
|
|
|
if (!JS_XDRRegisterClass(xdr, clasp, &classId))
|
|
|
|
return JS_FALSE;
|
|
|
|
} else {
|
|
|
|
clasp = JS_XDRFindClassById(xdr, classId);
|
|
|
|
if (!clasp) {
|
|
|
|
char numBuf[12];
|
|
|
|
JS_snprintf(numBuf, sizeof numBuf, "%ld", (long)classId);
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_CANT_FIND_CLASS, numBuf);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!clasp->xdrObject) {
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_CANT_XDR_CLASS, clasp->name);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
return clasp->xdrObject(xdr, objp);
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* JS_HAS_XDR */
|
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
#ifdef JS_DUMP_SCOPE_METERS
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
JSBasicStats js_entry_count_bs = JS_INIT_STATIC_BASIC_STATS;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
static void
|
|
|
|
MeterEntryCount(uintN count)
|
|
|
|
{
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
JS_BASIC_STATS_ACCUM(&js_entry_count_bs, count);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
js_DumpScopeMeters(JSRuntime *rt)
|
|
|
|
{
|
|
|
|
static FILE *logfp;
|
|
|
|
if (!logfp)
|
|
|
|
logfp = fopen("/tmp/scope.stats", "a");
|
|
|
|
|
|
|
|
{
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
double mean, sigma;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
mean = JS_MeanAndStdDevBS(&js_entry_count_bs, &sigma);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
fprintf(logfp, "scopes %u entries %g mean %g sigma %g max %u",
|
|
|
|
js_entry_count_bs.num, js_entry_count_bs.sum, mean, sigma,
|
|
|
|
js_entry_count_bs.max);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
JS_DumpHistogram(&js_entry_count_bs, logfp);
|
|
|
|
JS_BASIC_STATS_INIT(&js_entry_count_bs);
|
2007-03-22 10:30:00 -07:00
|
|
|
fflush(logfp);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2007-04-16 23:53:37 -07:00
|
|
|
#ifdef DEBUG
|
2008-02-18 13:01:47 -08:00
|
|
|
void
|
|
|
|
js_PrintObjectSlotName(JSTracer *trc, char *buf, size_t bufsize)
|
2007-04-16 23:53:37 -07:00
|
|
|
{
|
2008-02-18 13:01:47 -08:00
|
|
|
JS_ASSERT(trc->debugPrinter == js_PrintObjectSlotName);
|
2007-04-16 23:53:37 -07:00
|
|
|
|
2009-09-05 08:59:11 -07:00
|
|
|
JSObject *obj = (JSObject *)trc->debugPrintArg;
|
|
|
|
uint32 slot = (uint32)trc->debugPrintIndex;
|
|
|
|
JS_ASSERT(slot >= JSSLOT_START(obj->getClass()));
|
|
|
|
|
|
|
|
JSScopeProperty *sprop;
|
2008-02-18 13:01:47 -08:00
|
|
|
if (OBJ_IS_NATIVE(obj)) {
|
2009-09-05 08:59:11 -07:00
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2008-02-18 13:01:47 -08:00
|
|
|
sprop = SCOPE_LAST_PROP(scope);
|
|
|
|
while (sprop && sprop->slot != slot)
|
|
|
|
sprop = sprop->parent;
|
|
|
|
} else {
|
|
|
|
sprop = NULL;
|
|
|
|
}
|
2007-04-16 23:53:37 -07:00
|
|
|
|
|
|
|
if (!sprop) {
|
2009-09-05 08:59:11 -07:00
|
|
|
const char *slotname = NULL;
|
|
|
|
JSClass *clasp = obj->getClass();
|
2009-08-27 22:53:26 -07:00
|
|
|
if (clasp->flags & JSCLASS_IS_GLOBAL) {
|
2009-09-05 08:59:11 -07:00
|
|
|
uint32 key = slot - JSSLOT_START(clasp);
|
2009-08-27 22:53:26 -07:00
|
|
|
#define JS_PROTO(name,code,init) \
|
2007-04-16 23:53:37 -07:00
|
|
|
if ((code) == key) { slotname = js_##name##_str; goto found; }
|
|
|
|
#include "jsproto.tbl"
|
|
|
|
#undef JS_PROTO
|
|
|
|
}
|
2009-08-27 22:53:26 -07:00
|
|
|
found:
|
|
|
|
if (slotname)
|
|
|
|
JS_snprintf(buf, bufsize, "CLASS_OBJECT(%s)", slotname);
|
|
|
|
else
|
|
|
|
JS_snprintf(buf, bufsize, "**UNKNOWN SLOT %ld**", (long)slot);
|
2007-04-16 23:53:37 -07:00
|
|
|
} else {
|
2009-09-05 08:59:11 -07:00
|
|
|
jsval nval = ID_TO_VALUE(sprop->id);
|
2007-04-16 23:53:37 -07:00
|
|
|
if (JSVAL_IS_INT(nval)) {
|
|
|
|
JS_snprintf(buf, bufsize, "%ld", (long)JSVAL_TO_INT(nval));
|
|
|
|
} else if (JSVAL_IS_STRING(nval)) {
|
|
|
|
js_PutEscapedString(buf, bufsize, JSVAL_TO_STRING(nval), 0);
|
|
|
|
} else {
|
|
|
|
JS_snprintf(buf, bufsize, "**FINALIZED ATOM KEY**");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
void
|
|
|
|
js_TraceObject(JSTracer *trc, JSObject *obj)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
|
|
|
JS_ASSERT(OBJ_IS_NATIVE(obj));
|
2008-02-07 15:18:45 -08:00
|
|
|
|
2009-09-05 08:59:11 -07:00
|
|
|
JSContext *cx = trc->context;
|
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned() && IS_GC_MARKING_TRACER(trc)) {
|
2008-02-07 15:18:45 -08:00
|
|
|
/*
|
2009-07-21 14:25:11 -07:00
|
|
|
* Check whether we should shrink the object's slots. Skip this check
|
|
|
|
* if the scope is shared, since for Block objects and flat closures
|
|
|
|
* that share their scope, scope->freeslot can be an underestimate.
|
2008-02-07 15:18:45 -08:00
|
|
|
*/
|
2009-07-21 14:25:11 -07:00
|
|
|
size_t slots = scope->freeslot;
|
|
|
|
if (STOBJ_NSLOTS(obj) != slots)
|
|
|
|
js_ShrinkSlots(cx, obj, slots);
|
2008-02-07 15:18:45 -08:00
|
|
|
}
|
|
|
|
|
* Menu of -D flags for enabling instrumentation, as a commented-out CFLAGS += setting for convenient testing. * js_FindProperty and js_LookupPropertyWithFlags return indexes into the scope and prototype chains, respectively, to support internal instrumentation, and to pave the way for the return of the property cache (bug 365851).. * jsutil.[ch] JSBasicStats struct and functions for computing mean/sigma/max and auto-scaling histogram. * JS_SCOPE_DEPTH_METER instrumentation for compile- and run-time scope chain length instrumentation: + At compile time, rt->hostenvScopeDepthStats and rt->lexicalScopeDepthStats meter scope chains passed into the compile and evaluate APIs. + At runtime, rt->protoLookupDepthStats and rt->scopeSearchDepthStats track steps along the prototype and scope chains until the sought-after property is found. * JS_ARENAMETER uses JSBasicStats now. * Added rt->liveScopePropsPreSweep to fix the property tree stats code that rotted when property tree sweeping moved to after the finalization phase. * Un-bitrotted some DEBUG_brendan code, turned some off for myself via XXX. * Mac OS X toolchain requires initialized data shared across dynamic library member files, outlaws common data, so initialize extern metering vars. * Old HASHMETER code in jshash.[ch] is now JS_HASHMETER-controlled and based on JSBasicStats. * DEBUG_scopemeters macro renamed JS_DUMP_SCOPE_METERS; uses JSBasicStats now. * Disentangle DEBUG and DUMP_SCOPE_STATS (now JS_DUMP_PROPTREE_STATS) and fix inconsistent thread safety for liveScopeProps (sometimes atomic-incremented, sometimes runtime-locked). * Compiler-modeled maxScopeDepth will propagate via JSScript to runtime for capability-based, interpreter-inlined cache hit qualifier bits, to bypass scope and prototype chain lookup by optimizing for common monomorphic get, set, and call site referencing a prototype property in a well-named object (no shadowing or mutation in 99.9% of the cases).
2008-01-12 16:31:31 -08:00
|
|
|
#ifdef JS_DUMP_SCOPE_METERS
|
2009-07-21 14:25:11 -07:00
|
|
|
MeterEntryCount(scope->entryCount);
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|
|
|
|
|
2009-07-28 02:00:35 -07:00
|
|
|
scope->trace(trc);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2007-09-07 14:02:20 -07:00
|
|
|
if (!JS_CLIST_IS_EMPTY(&cx->runtime->watchPointList))
|
|
|
|
js_TraceWatchPoints(trc, obj);
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
/* No one runs while the GC is running, so we can use LOCKED_... here. */
|
2009-09-05 08:59:11 -07:00
|
|
|
JSClass *clasp = obj->getClass();
|
2007-04-16 23:53:37 -07:00
|
|
|
if (clasp->mark) {
|
|
|
|
if (clasp->flags & JSCLASS_MARK_IS_TRACE)
|
2008-02-07 15:18:45 -08:00
|
|
|
((JSTraceOp) clasp->mark)(trc, obj);
|
2007-04-16 23:53:37 -07:00
|
|
|
else if (IS_GC_MARKING_TRACER(trc))
|
|
|
|
(void) clasp->mark(cx, obj, trc);
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2009-08-27 22:53:26 -07:00
|
|
|
obj->traceProtoAndParent(trc);
|
|
|
|
|
2008-02-07 15:18:45 -08:00
|
|
|
/*
|
|
|
|
* An unmutated object that shares a prototype object's scope. We can't
|
|
|
|
* tell how many slots are in use in obj by looking at its scope, so we
|
|
|
|
* use STOBJ_NSLOTS(obj).
|
|
|
|
*
|
|
|
|
* NB: In case clasp->mark mutates something, leave this code here --
|
|
|
|
* don't move it up and unify it with the |if (!traceScope)| section
|
|
|
|
* above.
|
|
|
|
*/
|
2009-09-05 08:59:11 -07:00
|
|
|
uint32 nslots = STOBJ_NSLOTS(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned() && scope->freeslot < nslots)
|
2009-05-14 03:35:23 -07:00
|
|
|
nslots = scope->freeslot;
|
2009-09-05 08:59:11 -07:00
|
|
|
JS_ASSERT(nslots >= JSSLOT_START(clasp));
|
2007-04-16 23:53:37 -07:00
|
|
|
|
2009-09-05 08:59:11 -07:00
|
|
|
for (uint32 i = JSSLOT_START(clasp); i != nslots; ++i) {
|
|
|
|
jsval v = STOBJ_GET_SLOT(obj, i);
|
2007-04-16 23:53:37 -07:00
|
|
|
if (JSVAL_IS_TRACEABLE(v)) {
|
2008-02-18 13:01:47 -08:00
|
|
|
JS_SET_TRACING_DETAILS(trc, js_PrintObjectSlotName, obj, i);
|
2007-04-16 23:53:37 -07:00
|
|
|
JS_CallTracer(trc, JSVAL_TO_TRACEABLE(v), JSVAL_TRACE_KIND(v));
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
js_Clear(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
|
|
|
JSScope *scope;
|
|
|
|
uint32 i, n;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Clear our scope and the property cache of all obj's properties only if
|
2009-07-21 14:25:11 -07:00
|
|
|
* obj owns the scope (i.e., not if obj is sharing another object's scope).
|
|
|
|
* NB: we do not clear any reserved slots lying below JSSLOT_FREE(clasp).
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
scope = OBJ_SCOPE(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned()) {
|
2007-03-22 10:30:00 -07:00
|
|
|
/* Now that we're done using scope->lastProp/table, clear scope. */
|
2009-07-09 13:27:21 -07:00
|
|
|
scope->clear(cx);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
/* Clear slot values and reset freeslot so we're consistent. */
|
|
|
|
i = STOBJ_NSLOTS(obj);
|
2009-08-27 22:53:26 -07:00
|
|
|
n = JSSLOT_FREE(obj->getClass());
|
2007-03-22 10:30:00 -07:00
|
|
|
while (--i >= n)
|
|
|
|
STOBJ_SET_SLOT(obj, i, JSVAL_VOID);
|
2009-05-14 03:35:23 -07:00
|
|
|
scope->freeslot = n;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
}
|
|
|
|
|
2009-08-27 22:53:26 -07:00
|
|
|
/* On failure the function unlocks the object. */
|
|
|
|
static bool
|
|
|
|
ReservedSlotIndexOK(JSContext *cx, JSObject *obj, JSClass *clasp,
|
|
|
|
uint32 index, uint32 limit)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-08-30 11:07:19 -07:00
|
|
|
JS_ASSERT(JS_IS_OBJ_LOCKED(cx, obj));
|
2009-08-27 22:53:26 -07:00
|
|
|
|
|
|
|
/* Check the computed, possibly per-instance, upper bound. */
|
|
|
|
if (clasp->reserveSlots)
|
|
|
|
limit += clasp->reserveSlots(cx, obj);
|
|
|
|
if (index >= limit) {
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_RESERVED_SLOT_RANGE);
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool
|
|
|
|
js_GetReservedSlot(JSContext *cx, JSObject *obj, uint32 index, jsval *vp)
|
|
|
|
{
|
|
|
|
if (!OBJ_IS_NATIVE(obj)) {
|
|
|
|
*vp = JSVAL_VOID;
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
JSClass *clasp = obj->getClass();
|
|
|
|
uint32 limit = JSCLASS_RESERVED_SLOTS(clasp);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
2009-08-27 22:53:26 -07:00
|
|
|
if (index >= limit && !ReservedSlotIndexOK(cx, obj, clasp, index, limit))
|
|
|
|
return false;
|
|
|
|
|
|
|
|
uint32 slot = JSSLOT_START(clasp) + index;
|
|
|
|
*vp = (slot < STOBJ_NSLOTS(obj)) ? STOBJ_GET_SLOT(obj, slot) : JSVAL_VOID;
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
2009-08-27 22:53:26 -07:00
|
|
|
return true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-08-27 22:53:26 -07:00
|
|
|
bool
|
|
|
|
js_SetReservedSlot(JSContext *cx, JSObject *obj, uint32 index, jsval v)
|
2007-03-22 10:30:00 -07:00
|
|
|
{
|
2009-08-27 22:53:26 -07:00
|
|
|
if (!OBJ_IS_NATIVE(obj))
|
|
|
|
return true;
|
|
|
|
|
|
|
|
JSClass *clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
uint32 limit = JSCLASS_RESERVED_SLOTS(clasp);
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
2009-08-27 22:53:26 -07:00
|
|
|
if (index >= limit && !ReservedSlotIndexOK(cx, obj, clasp, index, limit))
|
|
|
|
return false;
|
|
|
|
|
|
|
|
uint32 slot = JSSLOT_START(clasp) + index;
|
2007-03-22 10:30:00 -07:00
|
|
|
if (slot >= JS_INITIAL_NSLOTS && !obj->dslots) {
|
|
|
|
/*
|
2009-07-21 14:25:11 -07:00
|
|
|
* At this point, obj may or may not own scope, and we may or may not
|
|
|
|
* need to allocate dslots. If scope is shared, scope->freeslot may not
|
|
|
|
* be accurate for obj (see comment below).
|
2007-03-22 10:30:00 -07:00
|
|
|
*/
|
2009-08-27 22:53:26 -07:00
|
|
|
uint32 nslots = JSSLOT_FREE(clasp);
|
2007-03-22 10:30:00 -07:00
|
|
|
if (clasp->reserveSlots)
|
|
|
|
nslots += clasp->reserveSlots(cx, obj);
|
|
|
|
JS_ASSERT(slot < nslots);
|
2009-07-24 03:01:37 -07:00
|
|
|
if (!AllocSlots(cx, obj, nslots)) {
|
2009-08-27 22:53:26 -07:00
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return false;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
/*
|
|
|
|
* Whether or not we grew nslots, we may need to advance freeslot.
|
|
|
|
*
|
|
|
|
* If scope is shared, do not modify scope->freeslot. It is OK for freeslot
|
|
|
|
* to be an underestimate in objects with shared scopes, as they will get
|
|
|
|
* their own scopes before mutating, and elsewhere (e.g. js_TraceObject) we
|
|
|
|
* use STOBJ_NSLOTS(obj) rather than rely on freeslot.
|
|
|
|
*/
|
2009-08-27 22:53:26 -07:00
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2009-07-21 14:25:11 -07:00
|
|
|
if (scope->owned() && slot >= scope->freeslot)
|
2009-05-14 03:35:23 -07:00
|
|
|
scope->freeslot = slot + 1;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
STOBJ_SET_SLOT(obj, slot, v);
|
2009-03-07 01:32:22 -08:00
|
|
|
GC_POKE(cx, JS_NULL);
|
2007-03-22 10:30:00 -07:00
|
|
|
JS_UNLOCK_SCOPE(cx, scope);
|
2009-08-27 22:53:26 -07:00
|
|
|
return true;
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-03-06 12:05:18 -08:00
|
|
|
JSObject *
|
|
|
|
js_GetWrappedObject(JSContext *cx, JSObject *obj)
|
|
|
|
{
|
|
|
|
JSClass *clasp;
|
|
|
|
|
|
|
|
clasp = OBJ_GET_CLASS(cx, obj);
|
|
|
|
if (clasp->flags & JSCLASS_IS_EXTENDED) {
|
|
|
|
JSExtendedClass *xclasp;
|
|
|
|
JSObject *obj2;
|
|
|
|
|
|
|
|
xclasp = (JSExtendedClass *)clasp;
|
|
|
|
if (xclasp->wrappedObject && (obj2 = xclasp->wrappedObject(cx, obj)))
|
|
|
|
return obj2;
|
|
|
|
}
|
|
|
|
return obj;
|
|
|
|
}
|
|
|
|
|
2009-03-11 08:46:45 -07:00
|
|
|
JSBool
|
|
|
|
js_IsCallable(JSObject *obj, JSContext *cx)
|
|
|
|
{
|
|
|
|
if (!OBJ_IS_NATIVE(obj))
|
|
|
|
return obj->map->ops->call != NULL;
|
|
|
|
|
|
|
|
JS_LOCK_OBJ(cx, obj);
|
|
|
|
JSBool callable = (obj->map->ops == &js_ObjectOps)
|
|
|
|
? HAS_FUNCTION_CLASS(obj) || STOBJ_GET_CLASS(obj)->call
|
|
|
|
: obj->map->ops->call != NULL;
|
|
|
|
JS_UNLOCK_OBJ(cx, obj);
|
|
|
|
return callable;
|
|
|
|
}
|
|
|
|
|
2009-04-22 03:39:08 -07:00
|
|
|
void
|
|
|
|
js_ReportGetterOnlyAssignment(JSContext *cx)
|
|
|
|
{
|
|
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
|
|
JSMSG_GETTER_ONLY, NULL);
|
|
|
|
}
|
|
|
|
|
|
|
|
JS_FRIEND_API(JSBool)
|
|
|
|
js_GetterOnlyPropertyStub(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
|
|
|
|
{
|
|
|
|
js_ReportGetterOnlyAssignment(cx);
|
|
|
|
return JS_FALSE;
|
|
|
|
}
|
|
|
|
|
2009-01-23 17:20:14 -08:00
|
|
|
#ifdef DEBUG
|
2008-09-25 09:29:12 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Routines to print out values during debugging. These are FRIEND_API to help
|
|
|
|
* the debugger find them and to support temporarily hacking js_Dump* calls
|
|
|
|
* into other code.
|
|
|
|
*/
|
|
|
|
|
|
|
|
void
|
|
|
|
dumpChars(const jschar *s, size_t n)
|
|
|
|
{
|
|
|
|
size_t i;
|
2007-03-22 10:30:00 -07:00
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
if (n == (size_t) -1) {
|
|
|
|
while (s[++n]) ;
|
|
|
|
}
|
2007-03-22 10:30:00 -07:00
|
|
|
|
|
|
|
fputc('"', stderr);
|
2008-09-25 09:29:12 -07:00
|
|
|
for (i = 0; i < n; i++) {
|
|
|
|
if (s[i] == '\n')
|
|
|
|
fprintf(stderr, "\\n");
|
|
|
|
else if (s[i] == '\t')
|
|
|
|
fprintf(stderr, "\\t");
|
|
|
|
else if (s[i] >= 32 && s[i] < 127)
|
|
|
|
fputc(s[i], stderr);
|
|
|
|
else if (s[i] <= 255)
|
|
|
|
fprintf(stderr, "\\x%02x", (unsigned int) s[i]);
|
|
|
|
else
|
|
|
|
fprintf(stderr, "\\u%04x", (unsigned int) s[i]);
|
|
|
|
}
|
|
|
|
fputc('"', stderr);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpChars(const jschar *s, size_t n)
|
|
|
|
{
|
|
|
|
fprintf(stderr, "jschar * (%p) = ", (void *) s);
|
|
|
|
dumpChars(s, n);
|
2007-03-22 10:30:00 -07:00
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
void
|
|
|
|
dumpString(JSString *str)
|
|
|
|
{
|
2009-06-10 18:29:44 -07:00
|
|
|
dumpChars(str->chars(), str->length());
|
2008-09-25 09:29:12 -07:00
|
|
|
}
|
2008-03-21 10:19:33 -07:00
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpString(JSString *str)
|
|
|
|
{
|
|
|
|
fprintf(stderr, "JSString* (%p) = jschar * (%p) = ",
|
2009-06-10 18:29:44 -07:00
|
|
|
(void *) str, (void *) str->chars());
|
2008-09-25 09:29:12 -07:00
|
|
|
dumpString(str);
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
2008-03-21 10:19:33 -07:00
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpAtom(JSAtom *atom)
|
|
|
|
{
|
|
|
|
fprintf(stderr, "JSAtom* (%p) = ", (void *) atom);
|
|
|
|
js_DumpValue(ATOM_KEY(atom));
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
void
|
|
|
|
dumpValue(jsval val)
|
|
|
|
{
|
2007-03-22 10:30:00 -07:00
|
|
|
if (JSVAL_IS_NULL(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "null");
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (JSVAL_IS_VOID(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "undefined");
|
2009-03-26 16:07:54 -07:00
|
|
|
} else if (JSVAL_IS_OBJECT(val) &&
|
|
|
|
HAS_FUNCTION_CLASS(JSVAL_TO_OBJECT(val))) {
|
|
|
|
JSObject *funobj = JSVAL_TO_OBJECT(val);
|
2009-08-04 14:06:55 -07:00
|
|
|
JSFunction *fun = GET_FUNCTION_PRIVATE(cx, funobj);
|
2009-03-26 16:07:54 -07:00
|
|
|
fprintf(stderr, "<%s %s at %p (JSFunction at %p)>",
|
|
|
|
fun->atom ? "function" : "unnamed",
|
|
|
|
fun->atom ? JS_GetStringBytes(ATOM_TO_STRING(fun->atom)) : "function",
|
|
|
|
(void *) funobj,
|
|
|
|
(void *) fun);
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (JSVAL_IS_OBJECT(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
JSObject *obj = JSVAL_TO_OBJECT(val);
|
|
|
|
JSClass *cls = STOBJ_GET_CLASS(obj);
|
|
|
|
fprintf(stderr, "<%s%s at %p>",
|
|
|
|
cls->name,
|
|
|
|
cls == &js_ObjectClass ? "" : " object",
|
2009-02-19 00:33:37 -08:00
|
|
|
(void *) obj);
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (JSVAL_IS_INT(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "%d", JSVAL_TO_INT(val));
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (JSVAL_IS_STRING(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
dumpString(JSVAL_TO_STRING(val));
|
2007-03-22 10:30:00 -07:00
|
|
|
} else if (JSVAL_IS_DOUBLE(val)) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "%g", *JSVAL_TO_DOUBLE(val));
|
|
|
|
} else if (val == JSVAL_TRUE) {
|
|
|
|
fprintf(stderr, "true");
|
|
|
|
} else if (val == JSVAL_FALSE) {
|
|
|
|
fprintf(stderr, "false");
|
2008-03-21 10:19:33 -07:00
|
|
|
} else if (val == JSVAL_HOLE) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "hole");
|
2007-03-22 10:30:00 -07:00
|
|
|
} else {
|
2008-09-25 09:29:12 -07:00
|
|
|
/* jsvals are pointer-sized, and %p is portable */
|
|
|
|
fprintf(stderr, "unrecognized jsval %p", (void *) val);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpValue(jsval val)
|
|
|
|
{
|
2009-05-20 08:10:03 -07:00
|
|
|
fprintf(stderr, "jsval %p = ", (void *) val);
|
2008-09-25 09:29:12 -07:00
|
|
|
dumpValue(val);
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
|
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpId(jsid id)
|
|
|
|
{
|
2009-05-20 08:10:03 -07:00
|
|
|
fprintf(stderr, "jsid %p = ", (void *) id);
|
2008-09-25 09:29:12 -07:00
|
|
|
dumpValue(ID_TO_VALUE(id));
|
|
|
|
fputc('\n', stderr);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2008-10-09 05:30:21 -07:00
|
|
|
static void
|
2008-09-25 09:29:12 -07:00
|
|
|
dumpScopeProp(JSScopeProperty *sprop)
|
|
|
|
{
|
|
|
|
jsid id = sprop->id;
|
|
|
|
uint8 attrs = sprop->attrs;
|
|
|
|
|
|
|
|
fprintf(stderr, " ");
|
|
|
|
if (attrs & JSPROP_ENUMERATE) fprintf(stderr, "enumerate ");
|
|
|
|
if (attrs & JSPROP_READONLY) fprintf(stderr, "readonly ");
|
|
|
|
if (attrs & JSPROP_PERMANENT) fprintf(stderr, "permanent ");
|
|
|
|
if (attrs & JSPROP_GETTER) fprintf(stderr, "getter ");
|
|
|
|
if (attrs & JSPROP_SETTER) fprintf(stderr, "setter ");
|
|
|
|
if (attrs & JSPROP_SHARED) fprintf(stderr, "shared ");
|
|
|
|
if (sprop->flags & SPROP_IS_ALIAS) fprintf(stderr, "alias ");
|
|
|
|
if (JSID_IS_ATOM(id))
|
|
|
|
dumpString(JSVAL_TO_STRING(ID_TO_VALUE(id)));
|
|
|
|
else if (JSID_IS_INT(id))
|
|
|
|
fprintf(stderr, "%d", (int) JSID_TO_INT(id));
|
|
|
|
else
|
|
|
|
fprintf(stderr, "unknown jsid %p", (void *) id);
|
|
|
|
fprintf(stderr, ": slot %d", sprop->slot);
|
|
|
|
fprintf(stderr, "\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpObject(JSObject *obj)
|
|
|
|
{
|
|
|
|
uint32 i, slots;
|
|
|
|
JSClass *clasp;
|
|
|
|
jsuint reservedEnd;
|
|
|
|
|
|
|
|
fprintf(stderr, "object %p\n", (void *) obj);
|
|
|
|
clasp = STOBJ_GET_CLASS(obj);
|
|
|
|
fprintf(stderr, "class %p %s\n", (void *)clasp, clasp->name);
|
|
|
|
|
|
|
|
/* OBJ_IS_DENSE_ARRAY ignores the cx argument. */
|
|
|
|
if (OBJ_IS_DENSE_ARRAY(BOGUS_CX, obj)) {
|
|
|
|
slots = JS_MIN((jsuint) obj->fslots[JSSLOT_ARRAY_LENGTH],
|
2009-02-21 13:33:50 -08:00
|
|
|
js_DenseArrayCapacity(obj));
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "elements\n");
|
|
|
|
for (i = 0; i < slots; i++) {
|
|
|
|
fprintf(stderr, " %3d: ", i);
|
|
|
|
dumpValue(obj->dslots[i]);
|
|
|
|
fprintf(stderr, "\n");
|
|
|
|
fflush(stderr);
|
|
|
|
}
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (OBJ_IS_NATIVE(obj)) {
|
|
|
|
JSScope *scope = OBJ_SCOPE(obj);
|
2009-07-09 13:27:21 -07:00
|
|
|
if (scope->sealed())
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "sealed\n");
|
|
|
|
|
2009-07-21 14:25:11 -07:00
|
|
|
fprintf(stderr, "properties:\n");
|
|
|
|
for (JSScopeProperty *sprop = SCOPE_LAST_PROP(scope); sprop;
|
|
|
|
sprop = sprop->parent) {
|
|
|
|
if (!scope->hadMiddleDelete() || scope->has(sprop))
|
|
|
|
dumpScopeProp(sprop);
|
2008-09-25 09:29:12 -07:00
|
|
|
}
|
|
|
|
} else {
|
|
|
|
if (!OBJ_IS_NATIVE(obj))
|
|
|
|
fprintf(stderr, "not native\n");
|
|
|
|
}
|
|
|
|
|
2009-08-04 14:06:55 -07:00
|
|
|
fprintf(stderr, "proto ");
|
|
|
|
dumpValue(OBJECT_TO_JSVAL(STOBJ_GET_PROTO(obj)));
|
|
|
|
fputc('\n', stderr);
|
|
|
|
|
|
|
|
fprintf(stderr, "parent ");
|
|
|
|
dumpValue(OBJECT_TO_JSVAL(STOBJ_GET_PARENT(obj)));
|
|
|
|
fputc('\n', stderr);
|
|
|
|
|
|
|
|
i = JSSLOT_PRIVATE;
|
|
|
|
if (clasp->flags & JSCLASS_HAS_PRIVATE) {
|
|
|
|
i = JSSLOT_PRIVATE + 1;
|
|
|
|
fprintf(stderr, "private %p\n", obj->getPrivate());
|
|
|
|
}
|
|
|
|
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "slots:\n");
|
2009-08-04 14:06:55 -07:00
|
|
|
reservedEnd = i + JSCLASS_RESERVED_SLOTS(clasp);
|
2009-09-09 13:53:37 -07:00
|
|
|
slots = (OBJ_IS_NATIVE(obj) && OBJ_SCOPE(obj)->owned())
|
2009-05-14 03:35:23 -07:00
|
|
|
? OBJ_SCOPE(obj)->freeslot
|
|
|
|
: STOBJ_NSLOTS(obj);
|
2009-08-04 14:06:55 -07:00
|
|
|
for (; i < slots; i++) {
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, " %3d ", i);
|
2009-08-04 14:06:55 -07:00
|
|
|
if (i < reservedEnd)
|
2008-09-25 09:29:12 -07:00
|
|
|
fprintf(stderr, "(reserved) ");
|
|
|
|
fprintf(stderr, "= ");
|
|
|
|
dumpValue(STOBJ_GET_SLOT(obj, i));
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
fputc('\n', stderr);
|
2007-03-22 10:30:00 -07:00
|
|
|
}
|
|
|
|
|
2009-05-20 08:10:03 -07:00
|
|
|
static void
|
|
|
|
MaybeDumpObject(const char *name, JSObject *obj)
|
|
|
|
{
|
|
|
|
if (obj) {
|
|
|
|
fprintf(stderr, " %s: ", name);
|
|
|
|
dumpValue(OBJECT_TO_JSVAL(obj));
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-09-11 19:07:00 -07:00
|
|
|
static void
|
|
|
|
MaybeDumpValue(const char *name, jsval v)
|
|
|
|
{
|
|
|
|
if (!JSVAL_IS_NULL(v)) {
|
|
|
|
fprintf(stderr, " %s: ", name);
|
|
|
|
dumpValue(v);
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-05-20 08:10:03 -07:00
|
|
|
JS_FRIEND_API(void)
|
|
|
|
js_DumpStackFrame(JSStackFrame *fp)
|
|
|
|
{
|
|
|
|
jsval *sp = NULL;
|
|
|
|
|
|
|
|
for (; fp; fp = fp->down) {
|
|
|
|
fprintf(stderr, "JSStackFrame at %p\n", (void *) fp);
|
2009-08-24 17:09:44 -07:00
|
|
|
if (fp->argv)
|
|
|
|
dumpValue(fp->argv[-2]);
|
2009-05-20 08:10:03 -07:00
|
|
|
else
|
|
|
|
fprintf(stderr, "global frame, no callee");
|
|
|
|
fputc('\n', stderr);
|
|
|
|
|
|
|
|
if (fp->script)
|
|
|
|
fprintf(stderr, "file %s line %u\n", fp->script->filename, (unsigned) fp->script->lineno);
|
|
|
|
|
|
|
|
if (fp->regs) {
|
|
|
|
if (!fp->regs->pc) {
|
|
|
|
fprintf(stderr, "*** regs && !regs->pc, skipping frame\n\n");
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
if (!fp->script) {
|
|
|
|
fprintf(stderr, "*** regs && !script, skipping frame\n\n");
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
jsbytecode *pc = fp->regs->pc;
|
|
|
|
sp = fp->regs->sp;
|
|
|
|
if (fp->imacpc) {
|
|
|
|
fprintf(stderr, " pc in imacro at %p\n called from ", pc);
|
|
|
|
pc = fp->imacpc;
|
|
|
|
} else {
|
|
|
|
fprintf(stderr, " ");
|
|
|
|
}
|
|
|
|
fprintf(stderr, "pc = %p\n", pc);
|
|
|
|
fprintf(stderr, " current op: %s\n", js_CodeName[*pc]);
|
|
|
|
}
|
|
|
|
if (sp && fp->slots) {
|
2009-05-20 16:30:20 -07:00
|
|
|
fprintf(stderr, " slots: %p\n", (void *) fp->slots);
|
|
|
|
fprintf(stderr, " sp: %p = slots + %u\n", (void *) sp, (unsigned) (sp - fp->slots));
|
2009-05-20 08:10:03 -07:00
|
|
|
if (sp - fp->slots < 10000) { // sanity
|
|
|
|
for (jsval *p = fp->slots; p < sp; p++) {
|
|
|
|
fprintf(stderr, " %p: ", (void *) p);
|
|
|
|
dumpValue(*p);
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
fprintf(stderr, " sp: %p\n", (void *) sp);
|
|
|
|
fprintf(stderr, " slots: %p\n", (void *) fp->slots);
|
|
|
|
}
|
2009-05-20 16:30:20 -07:00
|
|
|
fprintf(stderr, " argv: %p (argc: %u)\n", (void *) fp->argv, (unsigned) fp->argc);
|
2009-05-20 08:10:03 -07:00
|
|
|
MaybeDumpObject("callobj", fp->callobj);
|
2009-07-08 11:16:41 -07:00
|
|
|
MaybeDumpObject("argsobj", JSVAL_TO_OBJECT(fp->argsobj));
|
2009-05-20 08:10:03 -07:00
|
|
|
MaybeDumpObject("varobj", fp->varobj);
|
2009-09-11 19:07:00 -07:00
|
|
|
MaybeDumpValue("this", fp->thisv);
|
2009-05-20 08:10:03 -07:00
|
|
|
fprintf(stderr, " rval: ");
|
|
|
|
dumpValue(fp->rval);
|
|
|
|
fputc('\n', stderr);
|
|
|
|
|
|
|
|
fprintf(stderr, " flags:");
|
|
|
|
if (fp->flags == 0)
|
|
|
|
fprintf(stderr, " none");
|
|
|
|
if (fp->flags & JSFRAME_CONSTRUCTING)
|
|
|
|
fprintf(stderr, " constructing");
|
|
|
|
if (fp->flags & JSFRAME_COMPUTED_THIS)
|
|
|
|
fprintf(stderr, " computed_this");
|
|
|
|
if (fp->flags & JSFRAME_ASSIGNING)
|
|
|
|
fprintf(stderr, " assigning");
|
|
|
|
if (fp->flags & JSFRAME_DEBUGGER)
|
|
|
|
fprintf(stderr, " debugger");
|
|
|
|
if (fp->flags & JSFRAME_EVAL)
|
|
|
|
fprintf(stderr, " eval");
|
|
|
|
if (fp->flags & JSFRAME_ROOTED_ARGV)
|
|
|
|
fprintf(stderr, " rooted_argv");
|
|
|
|
if (fp->flags & JSFRAME_YIELDING)
|
|
|
|
fprintf(stderr, " yielding");
|
|
|
|
if (fp->flags & JSFRAME_ITERATOR)
|
|
|
|
fprintf(stderr, " iterator");
|
|
|
|
if (fp->flags & JSFRAME_GENERATOR)
|
|
|
|
fprintf(stderr, " generator");
|
2009-08-14 11:43:16 -07:00
|
|
|
if (fp->flags & JSFRAME_OVERRIDE_ARGS)
|
|
|
|
fprintf(stderr, " overridden_args");
|
2009-05-20 08:10:03 -07:00
|
|
|
fputc('\n', stderr);
|
|
|
|
|
|
|
|
if (fp->scopeChain)
|
|
|
|
fprintf(stderr, " scopeChain: (JSObject *) %p\n", (void *) fp->scopeChain);
|
|
|
|
if (fp->blockChain)
|
|
|
|
fprintf(stderr, " blockChain: (JSObject *) %p\n", (void *) fp->blockChain);
|
|
|
|
|
|
|
|
if (fp->dormantNext)
|
2009-05-20 16:30:20 -07:00
|
|
|
fprintf(stderr, " dormantNext: (JSStackFrame *) %p\n", (void *) fp->dormantNext);
|
2009-05-20 08:10:03 -07:00
|
|
|
if (fp->displaySave)
|
2009-05-20 16:30:20 -07:00
|
|
|
fprintf(stderr, " displaySave: (JSStackFrame *) %p\n", (void *) fp->displaySave);
|
2009-05-20 08:10:03 -07:00
|
|
|
|
|
|
|
fputc('\n', stderr);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2007-03-22 10:30:00 -07:00
|
|
|
#endif
|