зеркало из https://github.com/mozilla/pjs.git
1755 строки
55 KiB
C++
1755 строки
55 KiB
C++
/* -*- Mode: c++; c-basic-offset: 4; tab-width: 40; indent-tabs-mode: nil -*- */
|
|
/* vim: set ts=40 sw=4 et tw=99: */
|
|
/* ***** 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 WebGL impl
|
|
*
|
|
* The Initial Developer of the Original Code is
|
|
* Mozilla Foundation
|
|
* Portions created by the Initial Developer are Copyright (C) 2009
|
|
* the Initial Developer. All Rights Reserved.
|
|
*
|
|
* Contributor(s):
|
|
* Vladimir Vukicevic <vladimir@pobox.com>
|
|
*
|
|
* 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 ***** */
|
|
|
|
#include <string.h>
|
|
|
|
#include "jstypes.h"
|
|
#include "jsstdint.h"
|
|
#include "jsutil.h"
|
|
#include "jshash.h"
|
|
#include "jsprf.h"
|
|
#include "jsapi.h"
|
|
#include "jsarray.h"
|
|
#include "jsatom.h"
|
|
#include "jsbool.h"
|
|
#include "jsbuiltins.h"
|
|
#include "jscntxt.h"
|
|
#include "jsversion.h"
|
|
#include "jsgc.h"
|
|
#include "jsinterp.h"
|
|
#include "jslock.h"
|
|
#include "jsnum.h"
|
|
#include "jsobj.h"
|
|
#include "jsstaticcheck.h"
|
|
#include "jsbit.h"
|
|
#include "jsvector.h"
|
|
#include "jstypedarray.h"
|
|
|
|
#include "jsobjinlines.h"
|
|
|
|
using namespace js;
|
|
using namespace js::gc;
|
|
|
|
static bool
|
|
ValueIsLength(JSContext *cx, const Value &v, jsuint *len)
|
|
{
|
|
if (v.isInt32()) {
|
|
int32_t i = v.toInt32();
|
|
if (i < 0)
|
|
return false;
|
|
*len = i;
|
|
return true;
|
|
}
|
|
|
|
if (v.isDouble()) {
|
|
jsdouble d = v.toDouble();
|
|
if (JSDOUBLE_IS_NaN(d))
|
|
return false;
|
|
|
|
jsuint length = jsuint(d);
|
|
if (d != jsdouble(length))
|
|
return false;
|
|
|
|
*len = length;
|
|
return true;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/*
|
|
* ArrayBuffer
|
|
*
|
|
* This class holds the underlying raw buffer that the TypedArray classes
|
|
* access. It can be created explicitly and passed to a TypedArray, or
|
|
* can be created implicitly by constructing a TypedArray with a size.
|
|
*/
|
|
ArrayBuffer *
|
|
ArrayBuffer::fromJSObject(JSObject *obj)
|
|
{
|
|
while (!js_IsArrayBuffer(obj))
|
|
obj = obj->getProto();
|
|
return reinterpret_cast<ArrayBuffer*>(obj->getPrivate());
|
|
}
|
|
|
|
JSBool
|
|
ArrayBuffer::prop_getByteLength(JSContext *cx, JSObject *obj, jsid id, Value *vp)
|
|
{
|
|
ArrayBuffer *abuf = ArrayBuffer::fromJSObject(obj);
|
|
if (abuf)
|
|
vp->setInt32(jsint(abuf->byteLength));
|
|
return true;
|
|
}
|
|
|
|
void
|
|
ArrayBuffer::class_finalize(JSContext *cx, JSObject *obj)
|
|
{
|
|
ArrayBuffer *abuf = ArrayBuffer::fromJSObject(obj);
|
|
if (abuf) {
|
|
abuf->freeStorage(cx);
|
|
cx->delete_(abuf);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* new ArrayBuffer(byteLength)
|
|
*/
|
|
JSBool
|
|
ArrayBuffer::class_constructor(JSContext *cx, uintN argc, Value *vp)
|
|
{
|
|
int32 nbytes = 0;
|
|
if (argc > 0 && !ValueToECMAInt32(cx, vp[2], &nbytes))
|
|
return false;
|
|
|
|
JSObject *bufobj = create(cx, nbytes);
|
|
if (!bufobj)
|
|
return false;
|
|
vp->setObject(*bufobj);
|
|
return true;
|
|
}
|
|
|
|
JSObject *
|
|
ArrayBuffer::create(JSContext *cx, int32 nbytes)
|
|
{
|
|
JSObject *obj = NewBuiltinClassInstance(cx, &ArrayBuffer::jsclass);
|
|
if (!obj)
|
|
return NULL;
|
|
|
|
if (nbytes < 0) {
|
|
/*
|
|
* We're just not going to support arrays that are bigger than what will fit
|
|
* as an integer value; if someone actually ever complains (validly), then we
|
|
* can fix.
|
|
*/
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL, JSMSG_BAD_ARRAY_LENGTH);
|
|
return NULL;
|
|
}
|
|
|
|
ArrayBuffer *abuf = cx->new_<ArrayBuffer>();
|
|
if (!abuf)
|
|
return NULL;
|
|
|
|
if (!abuf->allocateStorage(cx, nbytes)) {
|
|
Foreground::delete_(abuf);
|
|
return NULL;
|
|
}
|
|
|
|
obj->setPrivate(abuf);
|
|
return obj;
|
|
}
|
|
|
|
bool
|
|
ArrayBuffer::allocateStorage(JSContext *cx, uint32 nbytes)
|
|
{
|
|
JS_ASSERT(data == 0);
|
|
|
|
if (nbytes) {
|
|
data = cx->calloc_(nbytes);
|
|
if (!data)
|
|
return false;
|
|
}
|
|
|
|
byteLength = nbytes;
|
|
return true;
|
|
}
|
|
|
|
void
|
|
ArrayBuffer::freeStorage(JSContext *cx)
|
|
{
|
|
if (data) {
|
|
cx->free_(data);
|
|
#ifdef DEBUG
|
|
// the destructor asserts that data is 0 in debug builds
|
|
data = NULL;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
ArrayBuffer::~ArrayBuffer()
|
|
{
|
|
JS_ASSERT(data == NULL);
|
|
}
|
|
|
|
/*
|
|
* TypedArray
|
|
*
|
|
* The non-templated base class for the specific typed implementations.
|
|
* This class holds all the member variables that are used by
|
|
* the subclasses.
|
|
*/
|
|
|
|
TypedArray *
|
|
TypedArray::fromJSObject(JSObject *obj)
|
|
{
|
|
while (!js_IsTypedArray(obj))
|
|
obj = obj->getProto();
|
|
return reinterpret_cast<TypedArray*>(obj->getPrivate());
|
|
}
|
|
|
|
inline bool
|
|
TypedArray::isArrayIndex(JSContext *cx, jsid id, jsuint *ip)
|
|
{
|
|
jsuint index;
|
|
if (js_IdIsIndex(id, &index) && index < length) {
|
|
if (ip)
|
|
*ip = index;
|
|
return true;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
typedef Value (* TypedArrayPropertyGetter)(TypedArray *tarray);
|
|
|
|
template <TypedArrayPropertyGetter Get>
|
|
class TypedArrayGetter {
|
|
public:
|
|
static inline bool get(JSContext *cx, JSObject *obj, jsid id, Value *vp) {
|
|
do {
|
|
if (js_IsTypedArray(obj)) {
|
|
TypedArray *tarray = TypedArray::fromJSObject(obj);
|
|
if (tarray)
|
|
*vp = Get(tarray);
|
|
return true;
|
|
}
|
|
} while ((obj = obj->getProto()) != NULL);
|
|
return true;
|
|
}
|
|
};
|
|
|
|
inline Value
|
|
getBuffer(TypedArray *tarray)
|
|
{
|
|
return ObjectValue(*tarray->bufferJS);
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::prop_getBuffer(JSContext *cx, JSObject *obj, jsid id, Value *vp)
|
|
{
|
|
return TypedArrayGetter<getBuffer>::get(cx, obj, id, vp);
|
|
}
|
|
|
|
inline Value
|
|
getByteOffset(TypedArray *tarray)
|
|
{
|
|
return Int32Value(tarray->byteOffset);
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::prop_getByteOffset(JSContext *cx, JSObject *obj, jsid id, Value *vp)
|
|
{
|
|
return TypedArrayGetter<getByteOffset>::get(cx, obj, id, vp);
|
|
}
|
|
|
|
inline Value
|
|
getByteLength(TypedArray *tarray)
|
|
{
|
|
return Int32Value(tarray->byteLength);
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::prop_getByteLength(JSContext *cx, JSObject *obj, jsid id, Value *vp)
|
|
{
|
|
return TypedArrayGetter<getByteLength>::get(cx, obj, id, vp);
|
|
}
|
|
|
|
inline Value
|
|
getLength(TypedArray *tarray)
|
|
{
|
|
return Int32Value(tarray->length);
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::prop_getLength(JSContext *cx, JSObject *obj, jsid id, Value *vp)
|
|
{
|
|
return TypedArrayGetter<getLength>::get(cx, obj, id, vp);
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::obj_lookupProperty(JSContext *cx, JSObject *obj, jsid id,
|
|
JSObject **objp, JSProperty **propp)
|
|
{
|
|
TypedArray *tarray = fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
|
|
if (tarray->isArrayIndex(cx, id)) {
|
|
*propp = (JSProperty *) 1; /* non-null to indicate found */
|
|
*objp = obj;
|
|
return true;
|
|
}
|
|
|
|
JSObject *proto = obj->getProto();
|
|
if (!proto) {
|
|
*objp = NULL;
|
|
*propp = NULL;
|
|
return true;
|
|
}
|
|
|
|
return proto->lookupProperty(cx, id, objp, propp);
|
|
}
|
|
|
|
void
|
|
TypedArray::obj_trace(JSTracer *trc, JSObject *obj)
|
|
{
|
|
TypedArray *tarray = fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
MarkObject(trc, *tarray->bufferJS, "typedarray.buffer");
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::obj_getAttributes(JSContext *cx, JSObject *obj, jsid id, uintN *attrsp)
|
|
{
|
|
*attrsp = (JSID_IS_ATOM(id, cx->runtime->atomState.lengthAtom))
|
|
? JSPROP_PERMANENT | JSPROP_READONLY
|
|
: JSPROP_PERMANENT | JSPROP_ENUMERATE;
|
|
return true;
|
|
}
|
|
|
|
JSBool
|
|
TypedArray::obj_setAttributes(JSContext *cx, JSObject *obj, jsid id, uintN *attrsp)
|
|
{
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_CANT_SET_ARRAY_ATTRS);
|
|
return false;
|
|
}
|
|
|
|
/* Helper clamped uint8 type */
|
|
|
|
int32 JS_FASTCALL
|
|
js_TypedArray_uint8_clamp_double(const double x)
|
|
{
|
|
// Not < so that NaN coerces to 0
|
|
if (!(x >= 0))
|
|
return 0;
|
|
|
|
if (x > 255)
|
|
return 255;
|
|
|
|
jsdouble toTruncate = x + 0.5;
|
|
JSUint8 y = JSUint8(toTruncate);
|
|
|
|
/*
|
|
* now val is rounded to nearest, ties rounded up. We want
|
|
* rounded to nearest ties to even, so check whether we had a
|
|
* tie.
|
|
*/
|
|
if (y == toTruncate) {
|
|
/*
|
|
* It was a tie (since adding 0.5 gave us the exact integer
|
|
* we want). Since we rounded up, we either already have an
|
|
* even number or we have an odd number but the number we
|
|
* want is one less. So just unconditionally masking out the
|
|
* ones bit should do the trick to get us the value we
|
|
* want.
|
|
*/
|
|
return (y & ~1);
|
|
}
|
|
|
|
return y;
|
|
}
|
|
|
|
JS_DEFINE_CALLINFO_1(extern, INT32, js_TypedArray_uint8_clamp_double, DOUBLE,
|
|
1, nanojit::ACCSET_NONE)
|
|
|
|
|
|
struct uint8_clamped {
|
|
uint8 val;
|
|
|
|
uint8_clamped() { }
|
|
uint8_clamped(const uint8_clamped& other) : val(other.val) { }
|
|
|
|
// invoke our assignment helpers for constructor conversion
|
|
uint8_clamped(uint8 x) { *this = x; }
|
|
uint8_clamped(uint16 x) { *this = x; }
|
|
uint8_clamped(uint32 x) { *this = x; }
|
|
uint8_clamped(int8 x) { *this = x; }
|
|
uint8_clamped(int16 x) { *this = x; }
|
|
uint8_clamped(int32 x) { *this = x; }
|
|
uint8_clamped(jsdouble x) { *this = x; }
|
|
|
|
inline uint8_clamped& operator= (const uint8_clamped& x) {
|
|
val = x.val;
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (uint8 x) {
|
|
val = x;
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (uint16 x) {
|
|
val = (x > 255) ? 255 : uint8(x);
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (uint32 x) {
|
|
val = (x > 255) ? 255 : uint8(x);
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (int8 x) {
|
|
val = (x >= 0) ? uint8(x) : 0;
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (int16 x) {
|
|
val = (x >= 0)
|
|
? ((x < 255)
|
|
? uint8(x)
|
|
: 255)
|
|
: 0;
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (int32 x) {
|
|
val = (x >= 0)
|
|
? ((x < 255)
|
|
? uint8(x)
|
|
: 255)
|
|
: 0;
|
|
return *this;
|
|
}
|
|
|
|
inline uint8_clamped& operator= (const jsdouble x) {
|
|
val = uint8(js_TypedArray_uint8_clamp_double(x));
|
|
return *this;
|
|
}
|
|
|
|
inline operator uint8() const {
|
|
return val;
|
|
}
|
|
};
|
|
|
|
/* Make sure the compiler isn't doing some funky stuff */
|
|
JS_STATIC_ASSERT(sizeof(uint8_clamped) == 1);
|
|
|
|
template<typename NativeType> static inline const int TypeIDOfType();
|
|
template<> inline const int TypeIDOfType<int8>() { return TypedArray::TYPE_INT8; }
|
|
template<> inline const int TypeIDOfType<uint8>() { return TypedArray::TYPE_UINT8; }
|
|
template<> inline const int TypeIDOfType<int16>() { return TypedArray::TYPE_INT16; }
|
|
template<> inline const int TypeIDOfType<uint16>() { return TypedArray::TYPE_UINT16; }
|
|
template<> inline const int TypeIDOfType<int32>() { return TypedArray::TYPE_INT32; }
|
|
template<> inline const int TypeIDOfType<uint32>() { return TypedArray::TYPE_UINT32; }
|
|
template<> inline const int TypeIDOfType<float>() { return TypedArray::TYPE_FLOAT32; }
|
|
template<> inline const int TypeIDOfType<double>() { return TypedArray::TYPE_FLOAT64; }
|
|
template<> inline const int TypeIDOfType<uint8_clamped>() { return TypedArray::TYPE_UINT8_CLAMPED; }
|
|
|
|
template<typename NativeType> static inline const bool TypeIsUnsigned() { return false; }
|
|
template<> inline const bool TypeIsUnsigned<uint8>() { return true; }
|
|
template<> inline const bool TypeIsUnsigned<uint16>() { return true; }
|
|
template<> inline const bool TypeIsUnsigned<uint32>() { return true; }
|
|
|
|
template<typename NativeType> static inline const bool TypeIsFloatingPoint() { return false; }
|
|
template<> inline const bool TypeIsFloatingPoint<float>() { return true; }
|
|
template<> inline const bool TypeIsFloatingPoint<double>() { return true; }
|
|
|
|
template<typename NativeType> class TypedArrayTemplate;
|
|
|
|
typedef TypedArrayTemplate<int8> Int8Array;
|
|
typedef TypedArrayTemplate<uint8> Uint8Array;
|
|
typedef TypedArrayTemplate<int16> Int16Array;
|
|
typedef TypedArrayTemplate<uint16> Uint16Array;
|
|
typedef TypedArrayTemplate<int32> Int32Array;
|
|
typedef TypedArrayTemplate<uint32> Uint32Array;
|
|
typedef TypedArrayTemplate<float> Float32Array;
|
|
typedef TypedArrayTemplate<double> Float64Array;
|
|
typedef TypedArrayTemplate<uint8_clamped> Uint8ClampedArray;
|
|
|
|
template<typename NativeType>
|
|
class TypedArrayTemplate
|
|
: public TypedArray
|
|
{
|
|
public:
|
|
typedef NativeType ThisType;
|
|
typedef TypedArrayTemplate<NativeType> ThisTypeArray;
|
|
static const int ArrayTypeID() { return TypeIDOfType<NativeType>(); }
|
|
static const bool ArrayTypeIsUnsigned() { return TypeIsUnsigned<NativeType>(); }
|
|
static const bool ArrayTypeIsFloatingPoint() { return TypeIsFloatingPoint<NativeType>(); }
|
|
|
|
static JSFunctionSpec jsfuncs[];
|
|
|
|
static inline Class *slowClass()
|
|
{
|
|
return &TypedArray::slowClasses[ArrayTypeID()];
|
|
}
|
|
|
|
static inline Class *fastClass()
|
|
{
|
|
return &TypedArray::fastClasses[ArrayTypeID()];
|
|
}
|
|
|
|
static JSBool
|
|
obj_getProperty(JSContext *cx, JSObject *obj, JSObject *receiver, jsid id, Value *vp)
|
|
{
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
|
|
if (JSID_IS_ATOM(id, cx->runtime->atomState.lengthAtom)) {
|
|
vp->setNumber(tarray->length);
|
|
return true;
|
|
}
|
|
|
|
jsuint index;
|
|
if (tarray->isArrayIndex(cx, id, &index)) {
|
|
// this inline function is specialized for each type
|
|
tarray->copyIndexToValue(cx, index, vp);
|
|
} else {
|
|
JSObject *obj2;
|
|
JSProperty *prop;
|
|
const Shape *shape;
|
|
|
|
JSObject *proto = obj->getProto();
|
|
if (!proto) {
|
|
vp->setUndefined();
|
|
return true;
|
|
}
|
|
|
|
vp->setUndefined();
|
|
if (js_LookupPropertyWithFlags(cx, proto, id, cx->resolveFlags, &obj2, &prop) < 0)
|
|
return false;
|
|
|
|
if (prop) {
|
|
if (obj2->isNative()) {
|
|
shape = (Shape *) prop;
|
|
if (!js_NativeGet(cx, obj, obj2, shape, JSGET_METHOD_BARRIER, vp))
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
static JSBool
|
|
obj_setProperty(JSContext *cx, JSObject *obj, jsid id, Value *vp, JSBool strict)
|
|
{
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
|
|
if (JSID_IS_ATOM(id, cx->runtime->atomState.lengthAtom)) {
|
|
vp->setNumber(tarray->length);
|
|
return true;
|
|
}
|
|
|
|
jsuint index;
|
|
// We can't just chain to js_SetProperty, because we're not a normal object.
|
|
if (!tarray->isArrayIndex(cx, id, &index)) {
|
|
#if 0
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_INDEX);
|
|
return false;
|
|
#endif
|
|
// Silent ignore is better than an exception here, because
|
|
// at some point we may want to support other properties on
|
|
// these objects. This is especially true when these arrays
|
|
// are used to implement HTML Canvas 2D's PixelArray objects,
|
|
// which used to be plain old arrays.
|
|
vp->setUndefined();
|
|
return true;
|
|
}
|
|
|
|
if (vp->isInt32()) {
|
|
tarray->setIndex(index, NativeType(vp->toInt32()));
|
|
return true;
|
|
}
|
|
|
|
jsdouble d;
|
|
|
|
if (vp->isDouble()) {
|
|
d = vp->toDouble();
|
|
} else if (vp->isNull()) {
|
|
d = 0.0f;
|
|
} else if (vp->isPrimitive()) {
|
|
JS_ASSERT(vp->isString() || vp->isUndefined() || vp->isBoolean());
|
|
if (vp->isString()) {
|
|
// note that ValueToNumber will always succeed with a string arg
|
|
ValueToNumber(cx, *vp, &d);
|
|
} else if (vp->isUndefined()) {
|
|
d = js_NaN;
|
|
} else {
|
|
d = (double) vp->toBoolean();
|
|
}
|
|
} else {
|
|
// non-primitive assignments become NaN or 0 (for float/int arrays)
|
|
d = js_NaN;
|
|
}
|
|
|
|
// If the array is an integer array, we only handle up to
|
|
// 32-bit ints from this point on. if we want to handle
|
|
// 64-bit ints, we'll need some changes.
|
|
|
|
// Assign based on characteristics of the destination type
|
|
if (ArrayTypeIsFloatingPoint()) {
|
|
tarray->setIndex(index, NativeType(d));
|
|
} else if (ArrayTypeIsUnsigned()) {
|
|
JS_ASSERT(sizeof(NativeType) <= 4);
|
|
uint32 n = js_DoubleToECMAUint32(d);
|
|
tarray->setIndex(index, NativeType(n));
|
|
} else if (ArrayTypeID() == TypedArray::TYPE_UINT8_CLAMPED) {
|
|
// The uint8_clamped type has a special rounding converter
|
|
// for doubles.
|
|
tarray->setIndex(index, NativeType(d));
|
|
} else {
|
|
JS_ASSERT(sizeof(NativeType) <= 4);
|
|
int32 n = js_DoubleToECMAInt32(d);
|
|
tarray->setIndex(index, NativeType(n));
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
static JSBool
|
|
obj_defineProperty(JSContext *cx, JSObject *obj, jsid id, const Value *v,
|
|
PropertyOp getter, StrictPropertyOp setter, uintN attrs)
|
|
{
|
|
if (JSID_IS_ATOM(id, cx->runtime->atomState.lengthAtom))
|
|
return true;
|
|
|
|
Value tmp = *v;
|
|
return obj_setProperty(cx, obj, id, &tmp, false);
|
|
}
|
|
|
|
static JSBool
|
|
obj_deleteProperty(JSContext *cx, JSObject *obj, jsid id, Value *rval, JSBool strict)
|
|
{
|
|
if (JSID_IS_ATOM(id, cx->runtime->atomState.lengthAtom)) {
|
|
rval->setBoolean(false);
|
|
return true;
|
|
}
|
|
|
|
TypedArray *tarray = TypedArray::fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
|
|
if (tarray->isArrayIndex(cx, id)) {
|
|
rval->setBoolean(false);
|
|
return true;
|
|
}
|
|
|
|
rval->setBoolean(true);
|
|
return true;
|
|
}
|
|
|
|
static JSBool
|
|
obj_enumerate(JSContext *cx, JSObject *obj, JSIterateOp enum_op,
|
|
Value *statep, jsid *idp)
|
|
{
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
JS_ASSERT(tarray);
|
|
|
|
/*
|
|
* Iteration is "length" (if JSENUMERATE_INIT_ALL), then [0, length).
|
|
* *statep is JSVAL_TRUE if enumerating "length" and
|
|
* JSVAL_TO_INT(index) when enumerating index.
|
|
*/
|
|
switch (enum_op) {
|
|
case JSENUMERATE_INIT_ALL:
|
|
statep->setBoolean(true);
|
|
if (idp)
|
|
*idp = ::INT_TO_JSID(tarray->length + 1);
|
|
break;
|
|
|
|
case JSENUMERATE_INIT:
|
|
statep->setInt32(0);
|
|
if (idp)
|
|
*idp = ::INT_TO_JSID(tarray->length);
|
|
break;
|
|
|
|
case JSENUMERATE_NEXT:
|
|
if (statep->isTrue()) {
|
|
*idp = ATOM_TO_JSID(cx->runtime->atomState.lengthAtom);
|
|
statep->setInt32(0);
|
|
} else {
|
|
uint32 index = statep->toInt32();
|
|
if (index < uint32(tarray->length)) {
|
|
*idp = ::INT_TO_JSID(index);
|
|
statep->setInt32(index + 1);
|
|
} else {
|
|
JS_ASSERT(index == tarray->length);
|
|
statep->setNull();
|
|
}
|
|
}
|
|
break;
|
|
|
|
case JSENUMERATE_DESTROY:
|
|
statep->setNull();
|
|
break;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
static JSType
|
|
obj_typeOf(JSContext *cx, JSObject *obj)
|
|
{
|
|
return JSTYPE_OBJECT;
|
|
}
|
|
|
|
static JSObject *
|
|
createTypedArray(JSContext *cx, JSObject *bufobj, uint32 byteOffset, uint32 len)
|
|
{
|
|
JSObject *obj = NewBuiltinClassInstance(cx, slowClass());
|
|
if (!obj)
|
|
return NULL;
|
|
|
|
ThisTypeArray *tarray = cx->new_<ThisTypeArray>(bufobj, byteOffset, len);
|
|
if (!tarray)
|
|
return NULL;
|
|
|
|
JS_ASSERT(obj->getClass() == slowClass());
|
|
obj->setSharedNonNativeMap();
|
|
obj->clasp = fastClass();
|
|
obj->setPrivate(tarray);
|
|
|
|
// FIXME Bug 599008: make it ok to call preventExtensions here.
|
|
obj->flags |= JSObject::NOT_EXTENSIBLE;
|
|
|
|
return obj;
|
|
}
|
|
|
|
/*
|
|
* new [Type]Array(length)
|
|
* new [Type]Array(otherTypedArray)
|
|
* new [Type]Array(JSArray)
|
|
* new [Type]Array(ArrayBuffer, [optional] byteOffset, [optional] length)
|
|
*/
|
|
static JSBool
|
|
class_constructor(JSContext *cx, uintN argc, Value *vp)
|
|
{
|
|
/* N.B. this is a constructor for slowClass, not fastClass! */
|
|
JSObject *obj = create(cx, argc, JS_ARGV(cx, vp));
|
|
if (!obj)
|
|
return false;
|
|
vp->setObject(*obj);
|
|
return true;
|
|
}
|
|
|
|
static JSObject *
|
|
create(JSContext *cx, uintN argc, Value *argv)
|
|
{
|
|
/* N.B. there may not be an argv[-2]/argv[-1]. */
|
|
|
|
/* () or (number) */
|
|
jsuint len = 0;
|
|
if (argc == 0 || ValueIsLength(cx, argv[0], &len)) {
|
|
JSObject *bufobj = createBufferWithSizeAndCount(cx, len);
|
|
if (!bufobj)
|
|
return NULL;
|
|
|
|
return createTypedArray(cx, bufobj, 0, len);
|
|
}
|
|
|
|
/* (not an object) */
|
|
if (!argv[0].isObject()) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return NULL;
|
|
}
|
|
|
|
JSObject *dataObj = &argv[0].toObject();
|
|
|
|
/* (typedArray) */
|
|
if (js_IsTypedArray(dataObj)) {
|
|
TypedArray *otherTypedArray = TypedArray::fromJSObject(dataObj);
|
|
JS_ASSERT(otherTypedArray);
|
|
|
|
uint32 len = otherTypedArray->length;
|
|
JSObject *bufobj = createBufferWithSizeAndCount(cx, len);
|
|
if (!bufobj)
|
|
return NULL;
|
|
|
|
JSObject *obj = createTypedArray(cx, bufobj, 0, len);
|
|
if (!obj || !copyFrom(cx, obj, otherTypedArray, 0))
|
|
return NULL;
|
|
return obj;
|
|
}
|
|
|
|
/* (obj, byteOffset, length). */
|
|
int32_t byteOffset = -1;
|
|
int32_t length = -1;
|
|
|
|
if (argc > 1) {
|
|
if (!ValueToInt32(cx, argv[1], &byteOffset))
|
|
return NULL;
|
|
if (byteOffset < 0) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_NEGATIVE_ARG, "1");
|
|
return NULL;
|
|
}
|
|
|
|
if (argc > 2) {
|
|
if (!ValueToInt32(cx, argv[2], &length))
|
|
return NULL;
|
|
if (length < 0) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_NEGATIVE_ARG, "2");
|
|
return NULL;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* (obj, byteOffset, length) */
|
|
return createTypedArrayWithOffsetLength(cx, dataObj, byteOffset, length);
|
|
}
|
|
|
|
static void
|
|
class_finalize(JSContext *cx, JSObject *obj)
|
|
{
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
if (tarray)
|
|
cx->delete_(tarray);
|
|
}
|
|
|
|
/* subarray(start[, end]) */
|
|
static JSBool
|
|
fun_subarray(JSContext *cx, uintN argc, Value *vp)
|
|
{
|
|
JSObject *obj = ToObject(cx, &vp[1]);
|
|
if (!obj)
|
|
return false;
|
|
|
|
if (!InstanceOf(cx, obj, ThisTypeArray::fastClass(), vp + 2))
|
|
return false;
|
|
|
|
if (obj->getClass() != fastClass()) {
|
|
// someone tried to apply this subarray() to the wrong class
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_INCOMPATIBLE_METHOD,
|
|
fastClass()->name, "subarray", obj->getClass()->name);
|
|
return false;
|
|
}
|
|
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
if (!tarray)
|
|
return true;
|
|
|
|
// these are the default values
|
|
int32_t begin = 0, end = tarray->length;
|
|
int32_t length = int32(tarray->length);
|
|
|
|
if (argc > 0) {
|
|
Value *argv = JS_ARGV(cx, vp);
|
|
if (!ValueToInt32(cx, argv[0], &begin))
|
|
return false;
|
|
if (begin < 0) {
|
|
begin += length;
|
|
if (begin < 0)
|
|
begin = 0;
|
|
} else if (begin > length) {
|
|
begin = length;
|
|
}
|
|
|
|
if (argc > 1) {
|
|
if (!ValueToInt32(cx, argv[1], &end))
|
|
return false;
|
|
if (end < 0) {
|
|
end += length;
|
|
if (end < 0)
|
|
end = 0;
|
|
} else if (end > length) {
|
|
end = length;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (begin > end)
|
|
begin = end;
|
|
|
|
JSObject *nobj = createSubarray(cx, tarray, begin, end);
|
|
if (!nobj)
|
|
return false;
|
|
vp->setObject(*nobj);
|
|
return true;
|
|
}
|
|
|
|
/* set(array[, offset]) */
|
|
static JSBool
|
|
fun_set(JSContext *cx, uintN argc, Value *vp)
|
|
{
|
|
JSObject *obj = ToObject(cx, &vp[1]);
|
|
if (!obj)
|
|
return false;
|
|
|
|
if (!InstanceOf(cx, obj, ThisTypeArray::fastClass(), vp + 2))
|
|
return false;
|
|
|
|
if (obj->getClass() != fastClass()) {
|
|
// someone tried to apply this set() to the wrong class
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_INCOMPATIBLE_METHOD,
|
|
fastClass()->name, "set", obj->getClass()->name);
|
|
return false;
|
|
}
|
|
|
|
ThisTypeArray *tarray = ThisTypeArray::fromJSObject(obj);
|
|
if (!tarray)
|
|
return true;
|
|
|
|
// these are the default values
|
|
int32_t off = 0;
|
|
|
|
Value *argv = JS_ARGV(cx, vp);
|
|
if (argc > 1) {
|
|
if (!ValueToInt32(cx, argv[1], &off))
|
|
return false;
|
|
|
|
if (off < 0 || uint32_t(off) > tarray->length) {
|
|
// the given offset is bogus
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
uint32 offset(off);
|
|
|
|
// first arg must be either a typed array or a JS array
|
|
if (argc == 0 || !argv[0].isObject()) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return false;
|
|
}
|
|
|
|
JSObject *arg0 = argv[0].toObjectOrNull();
|
|
if (js_IsTypedArray(arg0)) {
|
|
TypedArray *src = TypedArray::fromJSObject(arg0);
|
|
if (!src ||
|
|
src->length > tarray->length - offset)
|
|
{
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return false;
|
|
}
|
|
|
|
if (!copyFrom(cx, obj, src, offset))
|
|
return false;
|
|
} else {
|
|
jsuint len;
|
|
if (!js_GetLengthProperty(cx, arg0, &len))
|
|
return false;
|
|
|
|
// avoid overflow; we know that offset <= length
|
|
if (len > tarray->length - offset) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return false;
|
|
}
|
|
|
|
if (!copyFrom(cx, obj, arg0, len, offset))
|
|
return false;
|
|
}
|
|
|
|
vp->setUndefined();
|
|
return true;
|
|
}
|
|
|
|
static ThisTypeArray *
|
|
fromJSObject(JSObject *obj)
|
|
{
|
|
JS_ASSERT(obj->getClass() == fastClass());
|
|
return reinterpret_cast<ThisTypeArray*>(obj->getPrivate());
|
|
}
|
|
|
|
public:
|
|
TypedArrayTemplate(JSObject *bufobj, uint32 byteOffset, uint32 len)
|
|
{
|
|
JS_ASSERT(bufobj->getClass() == &ArrayBuffer::jsclass);
|
|
|
|
type = ArrayTypeID();
|
|
bufferJS = bufobj;
|
|
buffer = ArrayBuffer::fromJSObject(bufobj);
|
|
|
|
this->byteOffset = byteOffset;
|
|
|
|
JS_ASSERT(byteOffset <= buffer->byteLength);
|
|
this->data = buffer->offsetData(byteOffset);
|
|
JS_ASSERT(buffer->data <= this->data);
|
|
JS_ASSERT(this->data <= buffer->offsetData(buffer->byteLength));
|
|
|
|
this->byteLength = len * sizeof(NativeType);
|
|
JS_ASSERT(buffer->byteLength - byteOffset >= this->byteLength);
|
|
|
|
this->length = len;
|
|
}
|
|
|
|
static JSObject *
|
|
createTypedArrayWithOffsetLength(JSContext *cx, JSObject *other,
|
|
int32 byteOffsetInt, int32 lengthInt)
|
|
{
|
|
JS_ASSERT(!js_IsTypedArray(other));
|
|
|
|
/* Handle creation from an ArrayBuffer not ArrayBuffer.prototype. */
|
|
ArrayBuffer *abuf;
|
|
if (other->getClass() == &ArrayBuffer::jsclass &&
|
|
((abuf = ArrayBuffer::fromJSObject(other)) != NULL)) {
|
|
uint32 boffset = (byteOffsetInt < 0) ? 0 : uint32(byteOffsetInt);
|
|
|
|
if (boffset > abuf->byteLength || boffset % sizeof(NativeType) != 0) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return NULL; // invalid byteOffset
|
|
}
|
|
|
|
uint32 len;
|
|
if (lengthInt < 0) {
|
|
len = (abuf->byteLength - boffset) / sizeof(NativeType);
|
|
if (len * sizeof(NativeType) != (abuf->byteLength - boffset)) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return NULL; // given byte array doesn't map exactly to sizeof(NativeType)*N
|
|
}
|
|
} else {
|
|
len = (uint32) lengthInt;
|
|
}
|
|
|
|
// Go slowly and check for overflow.
|
|
uint32 arrayByteLength = len*sizeof(NativeType);
|
|
if (uint32(len) >= INT32_MAX / sizeof(NativeType) ||
|
|
uint32(boffset) >= INT32_MAX - arrayByteLength)
|
|
{
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return NULL; // overflow occurred along the way when calculating boffset+len*sizeof(NativeType)
|
|
}
|
|
|
|
if (arrayByteLength + boffset > abuf->byteLength) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_TYPED_ARRAY_BAD_ARGS);
|
|
return NULL; // boffset+len is too big for the arraybuffer
|
|
}
|
|
|
|
return createTypedArray(cx, other, boffset, len);
|
|
}
|
|
|
|
/*
|
|
* Otherwise create a new typed array and copy len properties from the
|
|
* object.
|
|
*/
|
|
jsuint len;
|
|
if (!js_GetLengthProperty(cx, other, &len))
|
|
return NULL;
|
|
|
|
JSObject *bufobj = createBufferWithSizeAndCount(cx, len);
|
|
if (!bufobj)
|
|
return NULL;
|
|
|
|
JSObject *obj = createTypedArray(cx, bufobj, 0, len);
|
|
if (!obj || !copyFrom(cx, obj, other, len))
|
|
return NULL;
|
|
return obj;
|
|
}
|
|
|
|
const NativeType
|
|
getIndex(uint32 index) const
|
|
{
|
|
return *(static_cast<const NativeType*>(data) + index);
|
|
}
|
|
|
|
void
|
|
setIndex(uint32 index, NativeType val)
|
|
{
|
|
*(static_cast<NativeType*>(data) + index) = val;
|
|
}
|
|
|
|
inline void copyIndexToValue(JSContext *cx, uint32 index, Value *vp);
|
|
|
|
static JSObject *
|
|
createSubarray(JSContext *cx, ThisTypeArray *tarray, uint32 begin, uint32 end)
|
|
{
|
|
JS_ASSERT(tarray);
|
|
|
|
JS_ASSERT(0 <= begin);
|
|
JS_ASSERT(begin <= tarray->length);
|
|
JS_ASSERT(0 <= end);
|
|
JS_ASSERT(end <= tarray->length);
|
|
|
|
JSObject *bufobj = tarray->bufferJS;
|
|
JS_ASSERT(bufobj);
|
|
|
|
JS_ASSERT(begin <= end);
|
|
uint32 length = end - begin;
|
|
|
|
JS_ASSERT(begin < UINT32_MAX / sizeof(NativeType));
|
|
JS_ASSERT(UINT32_MAX - begin * sizeof(NativeType) >= tarray->byteOffset);
|
|
uint32 byteOffset = tarray->byteOffset + begin * sizeof(NativeType);
|
|
|
|
return createTypedArray(cx, bufobj, byteOffset, length);
|
|
}
|
|
|
|
protected:
|
|
static NativeType
|
|
nativeFromValue(JSContext *cx, const Value &v)
|
|
{
|
|
if (v.isInt32())
|
|
return NativeType(v.toInt32());
|
|
|
|
if (v.isDouble()) {
|
|
double d = v.toDouble();
|
|
if (!ArrayTypeIsFloatingPoint() && JS_UNLIKELY(JSDOUBLE_IS_NaN(d)))
|
|
return NativeType(int32(0));
|
|
if (TypeIsFloatingPoint<NativeType>())
|
|
return NativeType(d);
|
|
if (TypeIsUnsigned<NativeType>())
|
|
return NativeType(js_DoubleToECMAUint32(d));
|
|
return NativeType(js_DoubleToECMAInt32(d));
|
|
}
|
|
|
|
if (v.isPrimitive() && !v.isMagic()) {
|
|
jsdouble dval;
|
|
ValueToNumber(cx, v, &dval);
|
|
return NativeType(dval);
|
|
}
|
|
|
|
if (ArrayTypeIsFloatingPoint())
|
|
return NativeType(js_NaN);
|
|
|
|
return NativeType(int32(0));
|
|
}
|
|
|
|
static bool
|
|
copyFrom(JSContext *cx, JSObject *thisTypedArrayObj,
|
|
JSObject *ar, jsuint len, jsuint offset = 0)
|
|
{
|
|
ThisTypeArray *thisTypedArray = fromJSObject(thisTypedArrayObj);
|
|
JS_ASSERT(thisTypedArray);
|
|
|
|
JS_ASSERT(offset <= thisTypedArray->length);
|
|
JS_ASSERT(len <= thisTypedArray->length - offset);
|
|
NativeType *dest = static_cast<NativeType*>(thisTypedArray->data) + offset;
|
|
|
|
if (ar->isDenseArray() && ar->getDenseArrayCapacity() >= len) {
|
|
JS_ASSERT(ar->getArrayLength() == len);
|
|
|
|
Value *src = ar->getDenseArrayElements();
|
|
|
|
for (uintN i = 0; i < len; ++i)
|
|
*dest++ = nativeFromValue(cx, *src++);
|
|
} else {
|
|
// slow path
|
|
Value v;
|
|
|
|
for (uintN i = 0; i < len; ++i) {
|
|
if (!ar->getProperty(cx, ::INT_TO_JSID(i), &v))
|
|
return false;
|
|
*dest++ = nativeFromValue(cx, v);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool
|
|
copyFrom(JSContext *cx, JSObject *thisTypedArrayObj, TypedArray *tarray, jsuint offset)
|
|
{
|
|
ThisTypeArray *thisTypedArray = fromJSObject(thisTypedArrayObj);
|
|
JS_ASSERT(thisTypedArray);
|
|
|
|
JS_ASSERT(offset <= thisTypedArray->length);
|
|
JS_ASSERT(tarray->length <= thisTypedArray->length - offset);
|
|
if (tarray->buffer == thisTypedArray->buffer)
|
|
return thisTypedArray->copyFromWithOverlap(cx, tarray, offset);
|
|
|
|
NativeType *dest = static_cast<NativeType*>(thisTypedArray->data) + offset;
|
|
|
|
if (tarray->type == thisTypedArray->type) {
|
|
memcpy(dest, tarray->data, tarray->byteLength);
|
|
return true;
|
|
}
|
|
|
|
uintN srclen = tarray->length;
|
|
switch (tarray->type) {
|
|
case TypedArray::TYPE_INT8: {
|
|
int8 *src = static_cast<int8*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT8:
|
|
case TypedArray::TYPE_UINT8_CLAMPED: {
|
|
uint8 *src = static_cast<uint8*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_INT16: {
|
|
int16 *src = static_cast<int16*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT16: {
|
|
uint16 *src = static_cast<uint16*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_INT32: {
|
|
int32 *src = static_cast<int32*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT32: {
|
|
uint32 *src = static_cast<uint32*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_FLOAT32: {
|
|
float *src = static_cast<float*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_FLOAT64: {
|
|
double *src = static_cast<double*>(tarray->data);
|
|
for (uintN i = 0; i < srclen; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
default:
|
|
JS_NOT_REACHED("copyFrom with a TypedArray of unknown type");
|
|
break;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
bool
|
|
copyFromWithOverlap(JSContext *cx, TypedArray *tarray, jsuint offset)
|
|
{
|
|
JS_ASSERT(offset <= length);
|
|
|
|
NativeType *dest = static_cast<NativeType*>(data) + offset;
|
|
|
|
if (tarray->type == type) {
|
|
memmove(dest, tarray->data, tarray->byteLength);
|
|
return true;
|
|
}
|
|
|
|
// We have to make a copy of the source array here, since
|
|
// there's overlap, and we have to convert types.
|
|
void *srcbuf = cx->malloc_(tarray->byteLength);
|
|
if (!srcbuf)
|
|
return false;
|
|
memcpy(srcbuf, tarray->data, tarray->byteLength);
|
|
|
|
switch (tarray->type) {
|
|
case TypedArray::TYPE_INT8: {
|
|
int8 *src = (int8*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT8:
|
|
case TypedArray::TYPE_UINT8_CLAMPED: {
|
|
uint8 *src = (uint8*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_INT16: {
|
|
int16 *src = (int16*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT16: {
|
|
uint16 *src = (uint16*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_INT32: {
|
|
int32 *src = (int32*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_UINT32: {
|
|
uint32 *src = (uint32*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_FLOAT32: {
|
|
float *src = (float*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
case TypedArray::TYPE_FLOAT64: {
|
|
double *src = (double*) srcbuf;
|
|
for (uintN i = 0; i < tarray->length; ++i)
|
|
*dest++ = NativeType(*src++);
|
|
break;
|
|
}
|
|
default:
|
|
JS_NOT_REACHED("copyFromWithOverlap with a TypedArray of unknown type");
|
|
break;
|
|
}
|
|
|
|
UnwantedForeground::free_(srcbuf);
|
|
return true;
|
|
}
|
|
|
|
static JSObject *
|
|
createBufferWithSizeAndCount(JSContext *cx, uint32 count)
|
|
{
|
|
size_t size = sizeof(NativeType);
|
|
if (size != 0 && count >= INT32_MAX / size) {
|
|
JS_ReportErrorNumber(cx, js_GetErrorMessage, NULL,
|
|
JSMSG_NEED_DIET, "size and count");
|
|
return false;
|
|
}
|
|
|
|
int32 bytelen = size * count;
|
|
return ArrayBuffer::create(cx, bytelen);
|
|
}
|
|
};
|
|
|
|
// this default implementation is only valid for integer types
|
|
// less than 32-bits in size.
|
|
template<typename NativeType>
|
|
void
|
|
TypedArrayTemplate<NativeType>::copyIndexToValue(JSContext *cx, uint32 index, Value *vp)
|
|
{
|
|
JS_STATIC_ASSERT(sizeof(NativeType) < 4);
|
|
|
|
vp->setInt32(getIndex(index));
|
|
}
|
|
|
|
// and we need to specialize for 32-bit integers and floats
|
|
template<>
|
|
void
|
|
TypedArrayTemplate<int32>::copyIndexToValue(JSContext *cx, uint32 index, Value *vp)
|
|
{
|
|
int32 val = getIndex(index);
|
|
vp->setInt32(val);
|
|
}
|
|
|
|
template<>
|
|
void
|
|
TypedArrayTemplate<uint32>::copyIndexToValue(JSContext *cx, uint32 index, Value *vp)
|
|
{
|
|
uint32 val = getIndex(index);
|
|
vp->setNumber(val);
|
|
}
|
|
|
|
template<>
|
|
void
|
|
TypedArrayTemplate<float>::copyIndexToValue(JSContext *cx, uint32 index, Value *vp)
|
|
{
|
|
float val = getIndex(index);
|
|
double dval = val;
|
|
|
|
/*
|
|
* Doubles in typed arrays could be typed-punned arrays of integers. This
|
|
* could allow user code to break the engine-wide invariant that only
|
|
* canonical nans are stored into jsvals, which means user code could
|
|
* confuse the engine into interpreting a double-typed jsval as an
|
|
* object-typed jsval.
|
|
*
|
|
* This could be removed for platforms/compilers known to convert a 32-bit
|
|
* non-canonical nan to a 64-bit canonical nan.
|
|
*/
|
|
if (JS_UNLIKELY(JSDOUBLE_IS_NaN(dval)))
|
|
dval = js_NaN;
|
|
|
|
vp->setDouble(dval);
|
|
}
|
|
|
|
template<>
|
|
void
|
|
TypedArrayTemplate<double>::copyIndexToValue(JSContext *cx, uint32 index, Value *vp)
|
|
{
|
|
double val = getIndex(index);
|
|
|
|
/*
|
|
* Doubles in typed arrays could be typed-punned arrays of integers. This
|
|
* could allow user code to break the engine-wide invariant that only
|
|
* canonical nans are stored into jsvals, which means user code could
|
|
* confuse the engine into interpreting a double-typed jsval as an
|
|
* object-typed jsval.
|
|
*/
|
|
if (JS_UNLIKELY(JSDOUBLE_IS_NaN(val)))
|
|
val = js_NaN;
|
|
|
|
vp->setDouble(val);
|
|
}
|
|
|
|
/***
|
|
*** JS impl
|
|
***/
|
|
|
|
/*
|
|
* ArrayBuffer (base)
|
|
*/
|
|
|
|
Class ArrayBuffer::jsclass = {
|
|
"ArrayBuffer",
|
|
JSCLASS_HAS_PRIVATE | JSCLASS_HAS_CACHED_PROTO(JSProto_ArrayBuffer),
|
|
PropertyStub, /* addProperty */
|
|
PropertyStub, /* delProperty */
|
|
PropertyStub, /* getProperty */
|
|
StrictPropertyStub, /* setProperty */
|
|
EnumerateStub,
|
|
ResolveStub,
|
|
ConvertStub,
|
|
ArrayBuffer::class_finalize,
|
|
};
|
|
|
|
JSPropertySpec ArrayBuffer::jsprops[] = {
|
|
{ "byteLength",
|
|
-1, JSPROP_SHARED | JSPROP_PERMANENT | JSPROP_READONLY,
|
|
Jsvalify(ArrayBuffer::prop_getByteLength), JS_StrictPropertyStub },
|
|
{0,0,0,0,0}
|
|
};
|
|
|
|
/*
|
|
* shared TypedArray
|
|
*/
|
|
|
|
JSPropertySpec TypedArray::jsprops[] = {
|
|
{ js_length_str,
|
|
-1, JSPROP_SHARED | JSPROP_PERMANENT | JSPROP_READONLY,
|
|
Jsvalify(TypedArray::prop_getLength), JS_StrictPropertyStub },
|
|
{ "byteLength",
|
|
-1, JSPROP_SHARED | JSPROP_PERMANENT | JSPROP_READONLY,
|
|
Jsvalify(TypedArray::prop_getByteLength), JS_StrictPropertyStub },
|
|
{ "byteOffset",
|
|
-1, JSPROP_SHARED | JSPROP_PERMANENT | JSPROP_READONLY,
|
|
Jsvalify(TypedArray::prop_getByteOffset), JS_StrictPropertyStub },
|
|
{ "buffer",
|
|
-1, JSPROP_SHARED | JSPROP_PERMANENT | JSPROP_READONLY,
|
|
Jsvalify(TypedArray::prop_getBuffer), JS_StrictPropertyStub },
|
|
{0,0,0,0,0}
|
|
};
|
|
|
|
/*
|
|
* TypedArray boilerplate
|
|
*/
|
|
|
|
#define IMPL_TYPED_ARRAY_STATICS(_typedArray) \
|
|
template<> JSFunctionSpec _typedArray::jsfuncs[] = { \
|
|
JS_FN("subarray", _typedArray::fun_subarray, 2, 0), \
|
|
JS_FN("set", _typedArray::fun_set, 2, 0), \
|
|
JS_FS_END \
|
|
}
|
|
|
|
#define IMPL_TYPED_ARRAY_SLOW_CLASS(_typedArray) \
|
|
{ \
|
|
#_typedArray, \
|
|
JSCLASS_HAS_PRIVATE | JSCLASS_HAS_CACHED_PROTO(JSProto_##_typedArray), \
|
|
PropertyStub, /* addProperty */ \
|
|
PropertyStub, /* delProperty */ \
|
|
PropertyStub, /* getProperty */ \
|
|
StrictPropertyStub, /* setProperty */ \
|
|
EnumerateStub, \
|
|
ResolveStub, \
|
|
ConvertStub, \
|
|
FinalizeStub \
|
|
}
|
|
|
|
#define IMPL_TYPED_ARRAY_FAST_CLASS(_typedArray) \
|
|
{ \
|
|
#_typedArray, \
|
|
Class::NON_NATIVE | JSCLASS_HAS_PRIVATE, \
|
|
PropertyStub, /* addProperty */ \
|
|
PropertyStub, /* delProperty */ \
|
|
PropertyStub, /* getProperty */ \
|
|
StrictPropertyStub, /* setProperty */ \
|
|
EnumerateStub, \
|
|
ResolveStub, \
|
|
ConvertStub, \
|
|
_typedArray::class_finalize, \
|
|
NULL, /* reserved0 */ \
|
|
NULL, /* checkAccess */ \
|
|
NULL, /* call */ \
|
|
NULL, /* construct */ \
|
|
NULL, /* xdrObject */ \
|
|
NULL, /* hasInstance */ \
|
|
_typedArray::obj_trace, \
|
|
JS_NULL_CLASS_EXT, \
|
|
{ \
|
|
_typedArray::obj_lookupProperty, \
|
|
_typedArray::obj_defineProperty, \
|
|
_typedArray::obj_getProperty, \
|
|
_typedArray::obj_setProperty, \
|
|
_typedArray::obj_getAttributes, \
|
|
_typedArray::obj_setAttributes, \
|
|
_typedArray::obj_deleteProperty, \
|
|
_typedArray::obj_enumerate, \
|
|
_typedArray::obj_typeOf, \
|
|
NULL, /* thisObject */ \
|
|
NULL, /* clear */ \
|
|
} \
|
|
}
|
|
|
|
#define INIT_TYPED_ARRAY_CLASS(_typedArray,_type) \
|
|
do { \
|
|
proto = js_InitClass(cx, obj, NULL, \
|
|
&TypedArray::slowClasses[TypedArray::_type], \
|
|
_typedArray::class_constructor, 3, \
|
|
_typedArray::jsprops, \
|
|
_typedArray::jsfuncs, \
|
|
NULL, NULL); \
|
|
if (!proto) \
|
|
return NULL; \
|
|
JSObject *ctor = JS_GetConstructor(cx, proto); \
|
|
if (!ctor || \
|
|
!JS_DefineProperty(cx, ctor, "BYTES_PER_ELEMENT", \
|
|
INT_TO_JSVAL(sizeof(_typedArray::ThisType)), \
|
|
JS_PropertyStub, JS_StrictPropertyStub, \
|
|
JSPROP_PERMANENT | JSPROP_READONLY) || \
|
|
!JS_DefineProperty(cx, proto, "BYTES_PER_ELEMENT", \
|
|
INT_TO_JSVAL(sizeof(_typedArray::ThisType)), \
|
|
JS_PropertyStub, JS_StrictPropertyStub, \
|
|
JSPROP_PERMANENT | JSPROP_READONLY)) \
|
|
{ \
|
|
return NULL; \
|
|
} \
|
|
proto->setPrivate(0); \
|
|
} while (0)
|
|
|
|
IMPL_TYPED_ARRAY_STATICS(Int8Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Uint8Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Int16Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Uint16Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Int32Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Uint32Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Float32Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Float64Array);
|
|
IMPL_TYPED_ARRAY_STATICS(Uint8ClampedArray);
|
|
|
|
Class TypedArray::fastClasses[TYPE_MAX] = {
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Int8Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Uint8Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Int16Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Uint16Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Int32Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Uint32Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Float32Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Float64Array),
|
|
IMPL_TYPED_ARRAY_FAST_CLASS(Uint8ClampedArray)
|
|
};
|
|
|
|
Class TypedArray::slowClasses[TYPE_MAX] = {
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Int8Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Uint8Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Int16Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Uint16Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Int32Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Uint32Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Float32Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Float64Array),
|
|
IMPL_TYPED_ARRAY_SLOW_CLASS(Uint8ClampedArray)
|
|
};
|
|
|
|
JS_FRIEND_API(JSObject *)
|
|
js_InitTypedArrayClasses(JSContext *cx, JSObject *obj)
|
|
{
|
|
/* Idempotency required: we initialize several things, possibly lazily. */
|
|
JSObject *stop;
|
|
if (!js_GetClassObject(cx, obj, JSProto_ArrayBuffer, &stop))
|
|
return NULL;
|
|
if (stop)
|
|
return stop;
|
|
|
|
JSObject *proto;
|
|
|
|
INIT_TYPED_ARRAY_CLASS(Int8Array,TYPE_INT8);
|
|
INIT_TYPED_ARRAY_CLASS(Uint8Array,TYPE_UINT8);
|
|
INIT_TYPED_ARRAY_CLASS(Int16Array,TYPE_INT16);
|
|
INIT_TYPED_ARRAY_CLASS(Uint16Array,TYPE_UINT16);
|
|
INIT_TYPED_ARRAY_CLASS(Int32Array,TYPE_INT32);
|
|
INIT_TYPED_ARRAY_CLASS(Uint32Array,TYPE_UINT32);
|
|
INIT_TYPED_ARRAY_CLASS(Float32Array,TYPE_FLOAT32);
|
|
INIT_TYPED_ARRAY_CLASS(Float64Array,TYPE_FLOAT64);
|
|
INIT_TYPED_ARRAY_CLASS(Uint8ClampedArray,TYPE_UINT8_CLAMPED);
|
|
|
|
proto = js_InitClass(cx, obj, NULL, &ArrayBuffer::jsclass,
|
|
ArrayBuffer::class_constructor, 1,
|
|
ArrayBuffer::jsprops, NULL, NULL, NULL);
|
|
if (!proto)
|
|
return NULL;
|
|
|
|
proto->setPrivate(NULL);
|
|
return proto;
|
|
}
|
|
|
|
JS_FRIEND_API(JSBool)
|
|
js_IsArrayBuffer(JSObject *obj)
|
|
{
|
|
JS_ASSERT(obj);
|
|
return obj->getClass() == &ArrayBuffer::jsclass;
|
|
}
|
|
|
|
JS_FRIEND_API(JSBool)
|
|
js_IsTypedArray(JSObject *obj)
|
|
{
|
|
JS_ASSERT(obj);
|
|
Class *clasp = obj->getClass();
|
|
return clasp >= &TypedArray::fastClasses[0] &&
|
|
clasp < &TypedArray::fastClasses[TypedArray::TYPE_MAX];
|
|
}
|
|
|
|
JS_FRIEND_API(JSObject *)
|
|
js_CreateArrayBuffer(JSContext *cx, jsuint nbytes)
|
|
{
|
|
return ArrayBuffer::create(cx, nbytes);
|
|
}
|
|
|
|
static inline JSObject *
|
|
TypedArrayConstruct(JSContext *cx, jsint atype, uintN argc, Value *argv)
|
|
{
|
|
switch (atype) {
|
|
case TypedArray::TYPE_INT8:
|
|
return Int8Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_UINT8:
|
|
return Uint8Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_INT16:
|
|
return Int16Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_UINT16:
|
|
return Uint16Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_INT32:
|
|
return Int32Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_UINT32:
|
|
return Uint32Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_FLOAT32:
|
|
return Float32Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_FLOAT64:
|
|
return Float64Array::create(cx, argc, argv);
|
|
|
|
case TypedArray::TYPE_UINT8_CLAMPED:
|
|
return Uint8ClampedArray::create(cx, argc, argv);
|
|
|
|
default:
|
|
JS_NOT_REACHED("shouldn't have gotten here");
|
|
return false;
|
|
}
|
|
}
|
|
|
|
JS_FRIEND_API(JSObject *)
|
|
js_CreateTypedArray(JSContext *cx, jsint atype, jsuint nelements)
|
|
{
|
|
JS_ASSERT(atype >= 0 && atype < TypedArray::TYPE_MAX);
|
|
|
|
Value nelems = Int32Value(nelements);
|
|
return TypedArrayConstruct(cx, atype, 1, &nelems);
|
|
}
|
|
|
|
JS_FRIEND_API(JSObject *)
|
|
js_CreateTypedArrayWithArray(JSContext *cx, jsint atype, JSObject *arrayArg)
|
|
{
|
|
JS_ASSERT(atype >= 0 && atype < TypedArray::TYPE_MAX);
|
|
|
|
Value arrval = ObjectValue(*arrayArg);
|
|
return TypedArrayConstruct(cx, atype, 1, &arrval);
|
|
}
|
|
|
|
JS_FRIEND_API(JSObject *)
|
|
js_CreateTypedArrayWithBuffer(JSContext *cx, jsint atype, JSObject *bufArg,
|
|
jsint byteoffset, jsint length)
|
|
{
|
|
JS_ASSERT(atype >= 0 && atype < TypedArray::TYPE_MAX);
|
|
JS_ASSERT(bufArg && ArrayBuffer::fromJSObject(bufArg));
|
|
JS_ASSERT_IF(byteoffset < 0, length < 0);
|
|
|
|
Value vals[4];
|
|
|
|
int argc = 1;
|
|
vals[0].setObject(*bufArg);
|
|
|
|
if (byteoffset >= 0) {
|
|
vals[argc].setInt32(byteoffset);
|
|
argc++;
|
|
}
|
|
|
|
if (length >= 0) {
|
|
vals[argc].setInt32(length);
|
|
argc++;
|
|
}
|
|
|
|
AutoArrayRooter tvr(cx, JS_ARRAY_LENGTH(vals), vals);
|
|
return TypedArrayConstruct(cx, atype, argc, &vals[0]);
|
|
}
|
|
|
|
JS_FRIEND_API(JSBool)
|
|
js_ReparentTypedArrayToScope(JSContext *cx, JSObject *obj, JSObject *scope)
|
|
{
|
|
JS_ASSERT(obj);
|
|
|
|
scope = JS_GetGlobalForObject(cx, scope);
|
|
if (!scope)
|
|
return JS_FALSE;
|
|
|
|
if (!js_IsTypedArray(obj))
|
|
return JS_FALSE;
|
|
|
|
TypedArray *typedArray = TypedArray::fromJSObject(obj);
|
|
|
|
JSObject *buffer = typedArray->bufferJS;
|
|
JS_ASSERT(js_IsArrayBuffer(buffer));
|
|
|
|
JSObject *proto;
|
|
JSProtoKey key =
|
|
JSCLASS_CACHED_PROTO_KEY(&TypedArray::slowClasses[typedArray->type]);
|
|
if (!js_GetClassPrototype(cx, scope, key, &proto))
|
|
return JS_FALSE;
|
|
|
|
obj->setProto(proto);
|
|
obj->setParent(scope);
|
|
|
|
key = JSCLASS_CACHED_PROTO_KEY(&ArrayBuffer::jsclass);
|
|
if (!js_GetClassPrototype(cx, scope, key, &proto))
|
|
return JS_FALSE;
|
|
|
|
buffer->setProto(proto);
|
|
buffer->setParent(scope);
|
|
|
|
return JS_TRUE;
|
|
}
|