Implement 'dart:typeddata' directly in the VM instead of using 'dart:scalarlist'

runtime/vm/raw_object.h

 // Copyright (c) 2012, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #ifndef VM_RAW_OBJECT_H_
 #define VM_RAW_OBJECT_H_
 
 #include "platform/assert.h"
 #include "vm/globals.h"
 #include "vm/token.h"
@@ skipping 69 matching lines @@
       V(ExternalUint8ClampedArray)                                             \
       V(ExternalInt16Array)                                                    \
       V(ExternalUint16Array)                                                   \
       V(ExternalInt32Array)                                                    \
       V(ExternalUint32Array)                                                   \
       V(ExternalInt64Array)                                                    \
       V(ExternalUint64Array)                                                   \
       V(ExternalFloat32x4Array)                                                \
       V(ExternalFloat32Array)                                                  \
       V(ExternalFloat64Array)                                                  \
+    V(TypedData)                                                               \
+    V(ExternalTypedData)                                                       \
     V(Stacktrace)                                                              \
     V(JSRegExp)                                                                \
     V(WeakProperty)                                                            \
     V(DartFunction)                                                            \
     V(Float32x4)                                                               \
     V(Uint32x4)                                                                \
 
 
 #define CLASS_LIST_STRINGS(V)                                                  \
   V(String)                                                                    \
     V(OneByteString)                                                           \
     V(TwoByteString)                                                           \
     V(ExternalOneByteString)                                                   \
     V(ExternalTwoByteString)
 
+#define CLASS_LIST_TYPED_DATA(V)                                               \
+  V(Int8Array)                                                                 \
+  V(Uint8Array)                                                                \
+  V(Uint8ClampedArray)                                                         \
+  V(Int16Array)                                                                \
+  V(Uint16Array)                                                               \
+  V(Int32Array)                                                                \
+  V(Uint32Array)                                                               \
+  V(Int64Array)                                                                \
+  V(Uint64Array)                                                               \
+  V(Float32Array)                                                              \
+  V(Float64Array)                                                              \
+
 #define CLASS_LIST_FOR_HANDLES(V)                                              \
   CLASS_LIST_NO_OBJECT_OR_STRING(V)                                            \
   V(String)
 
 #define CLASS_LIST_NO_OBJECT(V)                                                \
   CLASS_LIST_NO_OBJECT_OR_STRING(V)                                            \
   CLASS_LIST_STRINGS(V)
 
 #define CLASS_LIST(V)                                                          \
   V(Object)                                                                    \
@@ skipping 11 matching lines @@
 enum ClassId {
   // Illegal class id.
   kIllegalCid = 0,
 
   // List of Ids for predefined classes.
 #define DEFINE_OBJECT_KIND(clazz)                                              \
   k##clazz##Cid,
 CLASS_LIST(DEFINE_OBJECT_KIND)
 #undef DEFINE_OBJECT_KIND
 
+#define DEFINE_OBJECT_KIND(clazz)                                              \
+  kTypedData##clazz##Cid,
+CLASS_LIST_TYPED_DATA(DEFINE_OBJECT_KIND)
+#undef DEFINE_OBJECT_KIND
+
+#define DEFINE_OBJECT_KIND(clazz)                                              \
+  kExternalTypedData##clazz##Cid,
+CLASS_LIST_TYPED_DATA(DEFINE_OBJECT_KIND)
+#undef DEFINE_OBJECT_KIND
+
   // The following entries do not describe a predefined class, but instead
   // are class indexes for pre-allocated instance (Null, dynamic and Void).
   kNullCid,
   kDynamicCid,
   kVoidCid,
 
   // The following entry does not describe a real class, but instead it is an
   // id which is used to identify free list elements in the heap.
   kFreeListElement,
 
@@ skipping 208 matching lines @@
   static bool IsErrorClassId(intptr_t index);
   static bool IsNumberClassId(intptr_t index);
   static bool IsIntegerClassId(intptr_t index);
   static bool IsStringClassId(intptr_t index);
   static bool IsOneByteStringClassId(intptr_t index);
   static bool IsTwoByteStringClassId(intptr_t index);
   static bool IsExternalStringClassId(intptr_t index);
   static bool IsBuiltinListClassId(intptr_t index);
   static bool IsByteArrayClassId(intptr_t index);
   static bool IsExternalByteArrayClassId(intptr_t index);
+  static bool IsTypedDataClassId(intptr_t index);
+  static bool IsExternalTypedDataClassId(intptr_t index);
+
+  static intptr_t NumberOfTypedDataClasses();
 
  private:
   uword tags_;  // Various object tags (bits).
 
   class FreeBit : public BitField<bool, kFreeBit, 1> {};
 
   class MarkBit : public BitField<bool, kMarkBit, 1> {};
 
   class WatchedBit : public BitField<bool, kWatchedBit, 1> {};
 
@@ skipping 15 matching lines @@
 
   intptr_t GetClassId() const {
     uword tags = ptr()->tags_;
     return ClassIdTag::decode(tags);
   }
 
   friend class Api;
   friend class Array;
   friend class FreeListElement;
   friend class GCMarker;
+  friend class ExternalTypedData;
   friend class Heap;
   friend class HeapProfiler;
   friend class HeapProfilerRootVisitor;
   friend class HeapTrace;
   friend class HeapTraceDebugObjectVisitor;
   friend class HeapTraceHandleVisitor;
   friend class HeapTraceVisitor;
   friend class MarkingVisitor;
   friend class Object;
+  friend class RawExternalTypedData;
   friend class RawInstructions;
   friend class RawInstance;
+  friend class RawTypedData;
   friend class Scavenger;
   friend class SnapshotReader;
   friend class SnapshotWriter;
   friend class String;
+  friend class TypedData;
 
   DISALLOW_ALLOCATION();
   DISALLOW_IMPLICIT_CONSTRUCTORS(RawObject);
 };
 
 
 class RawClass : public RawObject {
  public:
   enum ClassState {
     kAllocated,     // Initial state.
@@ skipping 923 matching lines @@
 #define RawIntPtrArray RawInt32Array
 #define IntPtrArray Int32Array
 #elif defined(ARCH_IS_64_BIT)
 #define RawIntPtrArray RawInt64Array
 #define IntPtrArray Int64Array
 #else
 #error Architecture is not 32-bit or 64-bit.
 #endif  // ARCH_IS_32_BIT
 
 
+class RawTypedData : public RawInstance {
+  RAW_HEAP_OBJECT_IMPLEMENTATION(TypedData);
+
+ protected:
+  RawObject** from() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
+  RawSmi* length_;
+  RawObject** to() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
+
+  // Variable length data follows here.
+  uint8_t data_[0];
+};
+
+
+class RawExternalTypedData : public RawInstance {
+  RAW_HEAP_OBJECT_IMPLEMENTATION(ExternalTypedData);
+
+ protected:
+  RawObject** from() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
+  RawSmi* length_;
+  RawObject** to() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
+
+  uint8_t* data_;
+  void* peer_;
+};
+
+
 class RawByteArray : public RawInstance {
   RAW_HEAP_OBJECT_IMPLEMENTATION(ByteArray);
 
  protected:
   RawObject** from() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
   RawSmi* length_;
   RawObject** to() { return reinterpret_cast<RawObject**>(&ptr()->length_); }
 };
 
 
@@ skipping 370 matching lines @@
          kExternalUint8ClampedArrayCid == kByteArrayCid + 15 &&
          kExternalInt16ArrayCid == kByteArrayCid + 16 &&
          kExternalUint16ArrayCid == kByteArrayCid + 17 &&
          kExternalInt32ArrayCid == kByteArrayCid + 18 &&
          kExternalUint32ArrayCid == kByteArrayCid + 19 &&
          kExternalInt64ArrayCid == kByteArrayCid + 20 &&
          kExternalUint64ArrayCid == kByteArrayCid + 21 &&
          kExternalFloat32x4ArrayCid == kByteArrayCid + 22 &&
          kExternalFloat32ArrayCid == kByteArrayCid + 23 &&
          kExternalFloat64ArrayCid == kByteArrayCid + 24 &&
-         kStacktraceCid == kByteArrayCid + 25);
+         kTypedDataCid == kByteArrayCid + 25);
   return (index >= kByteArrayCid && index <= kExternalFloat64ArrayCid);
 }
 
+
 inline bool RawObject::IsExternalByteArrayClassId(intptr_t index) {
   // Make sure this function is updated when new ByteArray types are added.
   ASSERT(kExternalUint8ArrayCid == kExternalInt8ArrayCid + 1 &&
          kExternalUint8ClampedArrayCid == kExternalInt8ArrayCid + 2 &&
          kExternalInt16ArrayCid == kExternalInt8ArrayCid + 3 &&
          kExternalUint16ArrayCid == kExternalInt8ArrayCid + 4 &&
          kExternalInt32ArrayCid == kExternalInt8ArrayCid + 5 &&
          kExternalUint32ArrayCid == kExternalInt8ArrayCid + 6 &&
          kExternalInt64ArrayCid == kExternalInt8ArrayCid + 7 &&
          kExternalUint64ArrayCid == kExternalInt8ArrayCid + 8 &&
          kExternalFloat32x4ArrayCid == kExternalInt8ArrayCid + 9 &&
          kExternalFloat32ArrayCid == kExternalInt8ArrayCid + 10 &&
          kExternalFloat64ArrayCid == kExternalInt8ArrayCid + 11 &&
-         kStacktraceCid == kExternalInt8ArrayCid + 12);
+         kTypedDataCid == kExternalInt8ArrayCid + 12);
   return (index >= kExternalInt8ArrayCid && index <= kExternalFloat64ArrayCid);
 }
 
+
+inline bool RawObject::IsTypedDataClassId(intptr_t index) {
+  // Make sure this is updated when new TypedData types are added.
+  ASSERT(kTypedDataUint8ArrayCid == kTypedDataInt8ArrayCid + 1 &&
+         kTypedDataUint8ClampedArrayCid == kTypedDataInt8ArrayCid + 2 &&
+         kTypedDataInt16ArrayCid == kTypedDataInt8ArrayCid + 3 &&
+         kTypedDataUint16ArrayCid == kTypedDataInt8ArrayCid + 4 &&
+         kTypedDataInt32ArrayCid == kTypedDataInt8ArrayCid + 5 &&
+         kTypedDataUint32ArrayCid == kTypedDataInt8ArrayCid + 6 &&
+         kTypedDataInt64ArrayCid == kTypedDataInt8ArrayCid + 7 &&
+         kTypedDataUint64ArrayCid == kTypedDataInt8ArrayCid + 8 &&
+         kTypedDataFloat32ArrayCid == kTypedDataInt8ArrayCid + 9 &&
+         kTypedDataFloat64ArrayCid == kTypedDataInt8ArrayCid + 10 &&
+         kExternalTypedDataInt8ArrayCid == kTypedDataInt8ArrayCid + 11);
+  return (index >= kTypedDataInt8ArrayCid &&
+          index <= kTypedDataFloat64ArrayCid);
+}
+
+
+inline bool RawObject::IsExternalTypedDataClassId(intptr_t index) {
+  // Make sure this is updated when new ExternalTypedData types are added.
+  ASSERT((kExternalTypedDataUint8ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 1) &&
+         (kExternalTypedDataUint8ClampedArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 2) &&
+         (kExternalTypedDataInt16ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 3) &&
+         (kExternalTypedDataUint16ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 4) &&
+         (kExternalTypedDataInt32ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 5) &&
+         (kExternalTypedDataUint32ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 6) &&
+         (kExternalTypedDataInt64ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 7) &&
+         (kExternalTypedDataUint64ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 8) &&
+         (kExternalTypedDataFloat32ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 9) &&
+         (kExternalTypedDataFloat64ArrayCid ==
+          kExternalTypedDataInt8ArrayCid + 10) &&
+         (kNullCid == kExternalTypedDataInt8ArrayCid + 11));
+  return (index >= kExternalTypedDataInt8ArrayCid &&
+          index <= kExternalTypedDataFloat64ArrayCid);
+}
+
+
+inline intptr_t RawObject::NumberOfTypedDataClasses() {
+  // Make sure this is updated when new TypedData types are added.
+  ASSERT(kExternalTypedDataInt8ArrayCid == kTypedDataInt8ArrayCid + 11);
+  ASSERT(kNullCid == kExternalTypedDataInt8ArrayCid + 11);
+  return (kNullCid - kTypedDataInt8ArrayCid);
+}
+
 }  // namespace dart
 
 #endif  // VM_RAW_OBJECT_H_