Thu, 15 Jan 2015 15:55:04 +0100
Back out 97036ab72558 which inappropriately compared turds to third parties.
michael@0 | 1 | /* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- |
michael@0 | 2 | * vim: set ts=8 sts=4 et sw=4 tw=99: |
michael@0 | 3 | * This Source Code Form is subject to the terms of the Mozilla Public |
michael@0 | 4 | * License, v. 2.0. If a copy of the MPL was not distributed with this |
michael@0 | 5 | * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ |
michael@0 | 6 | |
michael@0 | 7 | /* |
michael@0 | 8 | * JavaScript Debugging support - Object support |
michael@0 | 9 | */ |
michael@0 | 10 | |
michael@0 | 11 | #include "jsd.h" |
michael@0 | 12 | |
michael@0 | 13 | /* |
michael@0 | 14 | * #define JSD_TRACE 1 |
michael@0 | 15 | */ |
michael@0 | 16 | |
michael@0 | 17 | #ifdef JSD_TRACE |
michael@0 | 18 | #define TRACEOBJ(jsdc, jsdobj, which) _traceObj(jsdc, jsdobj, which) |
michael@0 | 19 | |
michael@0 | 20 | static char * |
michael@0 | 21 | _describeObj(JSDContext* jsdc, JSDObject *jsdobj) |
michael@0 | 22 | { |
michael@0 | 23 | return |
michael@0 | 24 | JS_smprintf("%0x new'd in %s at line %d using ctor %s in %s at line %d", |
michael@0 | 25 | (int)jsdobj, |
michael@0 | 26 | JSD_GetObjectNewURL(jsdc, jsdobj), |
michael@0 | 27 | JSD_GetObjectNewLineNumber(jsdc, jsdobj), |
michael@0 | 28 | JSD_GetObjectConstructorName(jsdc, jsdobj), |
michael@0 | 29 | JSD_GetObjectConstructorURL(jsdc, jsdobj), |
michael@0 | 30 | JSD_GetObjectConstructorLineNumber(jsdc, jsdobj)); |
michael@0 | 31 | } |
michael@0 | 32 | |
michael@0 | 33 | static void |
michael@0 | 34 | _traceObj(JSDContext* jsdc, JSDObject* jsdobj, int which) |
michael@0 | 35 | { |
michael@0 | 36 | char* description; |
michael@0 | 37 | |
michael@0 | 38 | if( !jsdobj ) |
michael@0 | 39 | return; |
michael@0 | 40 | |
michael@0 | 41 | description = _describeObj(jsdc, jsdobj); |
michael@0 | 42 | |
michael@0 | 43 | printf("%s : %s\n", |
michael@0 | 44 | which == 0 ? "new " : |
michael@0 | 45 | which == 1 ? "final" : |
michael@0 | 46 | "ctor ", |
michael@0 | 47 | description); |
michael@0 | 48 | if(description) |
michael@0 | 49 | free(description); |
michael@0 | 50 | } |
michael@0 | 51 | #else |
michael@0 | 52 | #define TRACEOBJ(jsdc, jsdobj, which) ((void)0) |
michael@0 | 53 | #endif /* JSD_TRACE */ |
michael@0 | 54 | |
michael@0 | 55 | #ifdef DEBUG |
michael@0 | 56 | void JSD_ASSERT_VALID_OBJECT(JSDObject* jsdobj) |
michael@0 | 57 | { |
michael@0 | 58 | MOZ_ASSERT(jsdobj); |
michael@0 | 59 | MOZ_ASSERT(!JS_CLIST_IS_EMPTY(&jsdobj->links)); |
michael@0 | 60 | MOZ_ASSERT(jsdobj->obj); |
michael@0 | 61 | } |
michael@0 | 62 | #endif |
michael@0 | 63 | |
michael@0 | 64 | |
michael@0 | 65 | static void |
michael@0 | 66 | _destroyJSDObject(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 67 | { |
michael@0 | 68 | MOZ_ASSERT(JSD_OBJECTS_LOCKED(jsdc)); |
michael@0 | 69 | |
michael@0 | 70 | JS_REMOVE_LINK(&jsdobj->links); |
michael@0 | 71 | JS_HashTableRemove(jsdc->objectsTable, jsdobj->obj); |
michael@0 | 72 | |
michael@0 | 73 | if(jsdobj->newURL) |
michael@0 | 74 | jsd_DropAtom(jsdc, jsdobj->newURL); |
michael@0 | 75 | if(jsdobj->ctorURL) |
michael@0 | 76 | jsd_DropAtom(jsdc, jsdobj->ctorURL); |
michael@0 | 77 | if(jsdobj->ctorName) |
michael@0 | 78 | jsd_DropAtom(jsdc, jsdobj->ctorName); |
michael@0 | 79 | free(jsdobj); |
michael@0 | 80 | } |
michael@0 | 81 | |
michael@0 | 82 | void |
michael@0 | 83 | jsd_Constructing(JSDContext* jsdc, JSContext *cx, JSObject *obj, |
michael@0 | 84 | JSAbstractFramePtr frame) |
michael@0 | 85 | { |
michael@0 | 86 | JSDObject* jsdobj; |
michael@0 | 87 | JS::RootedScript script(cx); |
michael@0 | 88 | JSDScript* jsdscript; |
michael@0 | 89 | const char* ctorURL; |
michael@0 | 90 | JSString* ctorNameStr; |
michael@0 | 91 | const char* ctorName; |
michael@0 | 92 | |
michael@0 | 93 | JSD_LOCK_OBJECTS(jsdc); |
michael@0 | 94 | jsdobj = jsd_GetJSDObjectForJSObject(jsdc, obj); |
michael@0 | 95 | if( jsdobj && !jsdobj->ctorURL ) |
michael@0 | 96 | { |
michael@0 | 97 | script = frame.script(); |
michael@0 | 98 | if( script ) |
michael@0 | 99 | { |
michael@0 | 100 | ctorURL = JS_GetScriptFilename(script); |
michael@0 | 101 | if( ctorURL ) |
michael@0 | 102 | jsdobj->ctorURL = jsd_AddAtom(jsdc, ctorURL); |
michael@0 | 103 | |
michael@0 | 104 | JSD_LOCK_SCRIPTS(jsdc); |
michael@0 | 105 | jsdscript = jsd_FindOrCreateJSDScript(jsdc, cx, script, frame); |
michael@0 | 106 | JSD_UNLOCK_SCRIPTS(jsdc); |
michael@0 | 107 | if( jsdscript && (ctorNameStr = jsd_GetScriptFunctionId(jsdc, jsdscript)) ) { |
michael@0 | 108 | if( (ctorName = JS_EncodeString(cx, ctorNameStr)) ) { |
michael@0 | 109 | jsdobj->ctorName = jsd_AddAtom(jsdc, ctorName); |
michael@0 | 110 | JS_free(cx, (void *) ctorName); |
michael@0 | 111 | } |
michael@0 | 112 | } |
michael@0 | 113 | jsdobj->ctorLineno = JS_GetScriptBaseLineNumber(cx, script); |
michael@0 | 114 | } |
michael@0 | 115 | } |
michael@0 | 116 | TRACEOBJ(jsdc, jsdobj, 3); |
michael@0 | 117 | JSD_UNLOCK_OBJECTS(jsdc); |
michael@0 | 118 | } |
michael@0 | 119 | |
michael@0 | 120 | static JSHashNumber |
michael@0 | 121 | _hash_root(const void *key) |
michael@0 | 122 | { |
michael@0 | 123 | return ((JSHashNumber)(ptrdiff_t) key) >> 2; /* help lame MSVC1.5 on Win16 */ |
michael@0 | 124 | } |
michael@0 | 125 | |
michael@0 | 126 | bool |
michael@0 | 127 | jsd_InitObjectManager(JSDContext* jsdc) |
michael@0 | 128 | { |
michael@0 | 129 | JS_INIT_CLIST(&jsdc->objectsList); |
michael@0 | 130 | jsdc->objectsTable = JS_NewHashTable(256, _hash_root, |
michael@0 | 131 | JS_CompareValues, JS_CompareValues, |
michael@0 | 132 | nullptr, nullptr); |
michael@0 | 133 | return !!jsdc->objectsTable; |
michael@0 | 134 | } |
michael@0 | 135 | |
michael@0 | 136 | void |
michael@0 | 137 | jsd_DestroyObjectManager(JSDContext* jsdc) |
michael@0 | 138 | { |
michael@0 | 139 | jsd_DestroyObjects(jsdc); |
michael@0 | 140 | JSD_LOCK_OBJECTS(jsdc); |
michael@0 | 141 | JS_HashTableDestroy(jsdc->objectsTable); |
michael@0 | 142 | JSD_UNLOCK_OBJECTS(jsdc); |
michael@0 | 143 | } |
michael@0 | 144 | |
michael@0 | 145 | void |
michael@0 | 146 | jsd_DestroyObjects(JSDContext* jsdc) |
michael@0 | 147 | { |
michael@0 | 148 | JSD_LOCK_OBJECTS(jsdc); |
michael@0 | 149 | while( !JS_CLIST_IS_EMPTY(&jsdc->objectsList) ) |
michael@0 | 150 | _destroyJSDObject(jsdc, (JSDObject*)JS_NEXT_LINK(&jsdc->objectsList)); |
michael@0 | 151 | JSD_UNLOCK_OBJECTS(jsdc); |
michael@0 | 152 | } |
michael@0 | 153 | |
michael@0 | 154 | JSDObject* |
michael@0 | 155 | jsd_IterateObjects(JSDContext* jsdc, JSDObject** iterp) |
michael@0 | 156 | { |
michael@0 | 157 | JSDObject *jsdobj = *iterp; |
michael@0 | 158 | |
michael@0 | 159 | MOZ_ASSERT(JSD_OBJECTS_LOCKED(jsdc)); |
michael@0 | 160 | |
michael@0 | 161 | if( !jsdobj ) |
michael@0 | 162 | jsdobj = (JSDObject *)jsdc->objectsList.next; |
michael@0 | 163 | if( jsdobj == (JSDObject *)&jsdc->objectsList ) |
michael@0 | 164 | return nullptr; |
michael@0 | 165 | *iterp = (JSDObject*) jsdobj->links.next; |
michael@0 | 166 | return jsdobj; |
michael@0 | 167 | } |
michael@0 | 168 | |
michael@0 | 169 | JSObject* |
michael@0 | 170 | jsd_GetWrappedObject(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 171 | { |
michael@0 | 172 | return jsdobj->obj; |
michael@0 | 173 | } |
michael@0 | 174 | |
michael@0 | 175 | const char* |
michael@0 | 176 | jsd_GetObjectNewURL(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 177 | { |
michael@0 | 178 | if( jsdobj->newURL ) |
michael@0 | 179 | return JSD_ATOM_TO_STRING(jsdobj->newURL); |
michael@0 | 180 | return nullptr; |
michael@0 | 181 | } |
michael@0 | 182 | |
michael@0 | 183 | unsigned |
michael@0 | 184 | jsd_GetObjectNewLineNumber(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 185 | { |
michael@0 | 186 | return jsdobj->newLineno; |
michael@0 | 187 | } |
michael@0 | 188 | |
michael@0 | 189 | const char* |
michael@0 | 190 | jsd_GetObjectConstructorURL(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 191 | { |
michael@0 | 192 | if( jsdobj->ctorURL ) |
michael@0 | 193 | return JSD_ATOM_TO_STRING(jsdobj->ctorURL); |
michael@0 | 194 | return nullptr; |
michael@0 | 195 | } |
michael@0 | 196 | |
michael@0 | 197 | unsigned |
michael@0 | 198 | jsd_GetObjectConstructorLineNumber(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 199 | { |
michael@0 | 200 | return jsdobj->ctorLineno; |
michael@0 | 201 | } |
michael@0 | 202 | |
michael@0 | 203 | const char* |
michael@0 | 204 | jsd_GetObjectConstructorName(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 205 | { |
michael@0 | 206 | if( jsdobj->ctorName ) |
michael@0 | 207 | return JSD_ATOM_TO_STRING(jsdobj->ctorName); |
michael@0 | 208 | return nullptr; |
michael@0 | 209 | } |
michael@0 | 210 | |
michael@0 | 211 | JSDObject* |
michael@0 | 212 | jsd_GetJSDObjectForJSObject(JSDContext* jsdc, JSObject* jsobj) |
michael@0 | 213 | { |
michael@0 | 214 | JSDObject* jsdobj; |
michael@0 | 215 | |
michael@0 | 216 | JSD_LOCK_OBJECTS(jsdc); |
michael@0 | 217 | jsdobj = (JSDObject*) JS_HashTableLookup(jsdc->objectsTable, jsobj); |
michael@0 | 218 | JSD_UNLOCK_OBJECTS(jsdc); |
michael@0 | 219 | return jsdobj; |
michael@0 | 220 | } |
michael@0 | 221 | |
michael@0 | 222 | JSDObject* |
michael@0 | 223 | jsd_GetObjectForValue(JSDContext* jsdc, JSDValue* jsdval) |
michael@0 | 224 | { |
michael@0 | 225 | return jsd_GetJSDObjectForJSObject(jsdc, JSVAL_TO_OBJECT(jsdval->val)); |
michael@0 | 226 | } |
michael@0 | 227 | |
michael@0 | 228 | JSDValue* |
michael@0 | 229 | jsd_GetValueForObject(JSDContext* jsdc, JSDObject* jsdobj) |
michael@0 | 230 | { |
michael@0 | 231 | return jsd_NewValue(jsdc, OBJECT_TO_JSVAL(jsdobj->obj)); |
michael@0 | 232 | } |
michael@0 | 233 | |
michael@0 | 234 |