Add external byte array API and finalize external strings and byte arrays.

runtime/vm/object.cc

 // 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.
 
 #include "vm/object.h"
 
 #include "platform/assert.h"
 #include "vm/assembler.h"
 #include "vm/bigint_operations.h"
 #include "vm/bootstrap.h"
 #include "vm/code_generator.h"
 #include "vm/code_index_table.h"
 #include "vm/code_patcher.h"
 #include "vm/compiler.h"
 #include "vm/compiler_stats.h"
 #include "vm/class_finalizer.h"
 #include "vm/dart.h"
+#include "vm/dart_api_state.h"
 #include "vm/dart_entry.h"
 #include "vm/debuginfo.h"
 #include "vm/exceptions.h"
 #include "vm/growable_array.h"
 #include "vm/heap.h"
 #include "vm/ic_data.h"
 #include "vm/object_store.h"
 #include "vm/parser.h"
 #include "vm/runtime_entry.h"
 #include "vm/scopes.h"
@@ skipping 6511 matching lines @@
     result ^= FourByteString::New(len, space);
   }
   String::Copy(result, 0, str, 0, len);
   return result.raw();
 }
 
 
 RawString* String::NewExternal(const uint8_t* characters,
                                intptr_t len,
                                void* peer,
-                               PeerFinalizer callback,
+                               Dart_PeerFinalizer callback,
                                Heap::Space space) {
   return ExternalOneByteString::New(characters, len, peer, callback, space);
 }
 
 
 RawString* String::NewExternal(const uint16_t* characters,
                                intptr_t len,
                                void* peer,
-                               PeerFinalizer callback,
+                               Dart_PeerFinalizer callback,
                                Heap::Space space) {
   return ExternalTwoByteString::New(characters, len, peer, callback, space);
 }
 
 
 RawString* String::NewExternal(const uint32_t* characters,
                                intptr_t len,
                                void* peer,
-                               PeerFinalizer callback,
+                               Dart_PeerFinalizer callback,
                                Heap::Space space) {
   return ExternalFourByteString::New(characters, len, peer, callback, space);
 }
 
 
 void String::Copy(const String& dst, intptr_t dst_offset,
                   const uint8_t* characters,
                   intptr_t len) {
   ASSERT(dst_offset >= 0);
   ASSERT(len >= 0);
@@ skipping 746 matching lines @@
   }
   return result.raw();
 }
 
 
 const char* FourByteString::ToCString() const {
   return String::ToCString();
 }
 
 
-RawExternalOneByteString* ExternalOneByteString::New(const uint8_t* data,
-                                                     intptr_t len,
-                                                     void* peer,
-                                                     PeerFinalizer callback,
-                                                     Heap::Space space) {
+static void AddFinalizer(const Object& referent,
+                         void* peer,
+                         Dart_WeakPersistentHandleFinalizer callback) {
+  ASSERT(callback != NULL);
+  ApiState* state = Isolate::Current()->api_state();
+  ASSERT(state != NULL);
+  WeakPersistentHandle* weak_ref =
+      state->weak_persistent_handles().AllocateHandle();
+  weak_ref->set_raw(referent);
+  weak_ref->set_peer(peer);
+  weak_ref->set_callback(callback);
+}
+
+
+RawExternalOneByteString* ExternalOneByteString::New(
+    const uint8_t* data,
+    intptr_t len,
+    void* peer,
+    Dart_PeerFinalizer callback,
+    Heap::Space space) {
   Isolate* isolate = Isolate::Current();
 
   const Class& cls =
       Class::Handle(isolate->object_store()->external_one_byte_string_class());
   ExternalOneByteString& result = ExternalOneByteString::Handle();
+  ExternalStringData<uint8_t>* external_data =
+      new ExternalStringData<uint8_t>(data, peer, callback);
   {
-    ExternalStringData<uint8_t>* external_data =
-        new ExternalStringData<uint8_t>(data, peer, callback);
     RawObject* raw = Object::Allocate(cls,
                                       ExternalOneByteString::InstanceSize(),
                                       space);
     NoGCScope no_gc;
     result ^= raw;
     result.SetLength(len);
     result.SetHash(0);
     result.SetExternalData(external_data);
   }
+  AddFinalizer(result, external_data, ExternalOneByteString::Finalize);
   return result.raw();
 }
 
 
+static void DeleteWeakPersistentHandle(Dart_Handle handle) {
+  ApiState* state = Isolate::Current()->api_state();
+  ASSERT(state != NULL);
+  WeakPersistentHandle* weak_ref =
+      reinterpret_cast<WeakPersistentHandle*>(handle);
+  ASSERT(state->IsValidWeakPersistentHandle(handle));
+  state->weak_persistent_handles().FreeHandle(weak_ref);
+}
+
+
+void ExternalOneByteString::Finalize(Dart_Handle handle, void* peer) {
+  delete reinterpret_cast<ExternalStringData<uint8_t>*>(peer);
+  DeleteWeakPersistentHandle(handle);
+}
+
+
 const char* ExternalOneByteString::ToCString() const {
   return String::ToCString();
 }
 
 
-RawExternalTwoByteString* ExternalTwoByteString::New(const uint16_t* data,
-                                                     intptr_t len,
-                                                     void* peer,
-                                                     PeerFinalizer callback,
-                                                     Heap::Space space) {
+RawExternalTwoByteString* ExternalTwoByteString::New(
+    const uint16_t* data,
+    intptr_t len,
+    void* peer,
+    Dart_PeerFinalizer callback,
+    Heap::Space space) {
   Isolate* isolate = Isolate::Current();
 
   const Class& cls =
       Class::Handle(isolate->object_store()->external_two_byte_string_class());
   ExternalTwoByteString& result = ExternalTwoByteString::Handle();
+  ExternalStringData<uint16_t>* external_data =
+      new ExternalStringData<uint16_t>(data, peer, callback);
   {
-    ExternalStringData<uint16_t>* external_data =
-        new ExternalStringData<uint16_t>(data, peer, callback);
     RawObject* raw = Object::Allocate(cls,
                                       ExternalTwoByteString::InstanceSize(),
                                       space);
     NoGCScope no_gc;
     result ^= raw;
     result.SetLength(len);
     result.SetHash(0);
     result.SetExternalData(external_data);
   }
+  AddFinalizer(result, external_data, ExternalTwoByteString::Finalize);
   return result.raw();
 }
 
 
+void ExternalTwoByteString::Finalize(Dart_Handle handle, void* peer) {
+  delete reinterpret_cast<ExternalStringData<uint16_t>*>(peer);
+  DeleteWeakPersistentHandle(handle);
+}
+
+
 const char* ExternalTwoByteString::ToCString() const {
   return String::ToCString();
 }
 
 
-RawExternalFourByteString* ExternalFourByteString::New(const uint32_t* data,
-                                                       intptr_t len,
-                                                       void* peer,
-                                                       PeerFinalizer callback,
-                                                       Heap::Space space) {
+RawExternalFourByteString* ExternalFourByteString::New(
+    const uint32_t* data,
+    intptr_t len,
+    void* peer,
+    Dart_PeerFinalizer callback,
+    Heap::Space space) {
   Isolate* isolate = Isolate::Current();
 
   const Class& cls =
       Class::Handle(isolate->object_store()->external_four_byte_string_class());
   ExternalFourByteString& result = ExternalFourByteString::Handle();
+  ExternalStringData<uint32_t>* external_data =
+      new ExternalStringData<uint32_t>(data, peer, callback);
   {
-    ExternalStringData<uint32_t>* external_data =
-        new ExternalStringData<uint32_t>(data, peer, callback);
     RawObject* raw = Object::Allocate(cls,
                                       ExternalFourByteString::InstanceSize(),
                                       space);
     NoGCScope no_gc;
     result ^= raw;
     result.SetLength(len);
     result.SetHash(0);
     result.SetExternalData(external_data);
   }
+  AddFinalizer(result, external_data, ExternalFourByteString::Finalize);
   return result.raw();
 }
 
 
+void ExternalFourByteString::Finalize(Dart_Handle handle, void* peer) {
+  delete reinterpret_cast<ExternalStringData<uint32_t>*>(peer);
+  DeleteWeakPersistentHandle(handle);
+}
+
+
 const char* ExternalFourByteString::ToCString() const {
   return String::ToCString();
 }
 
 
 RawBool* Bool::True() {
   return Isolate::Current()->object_store()->true_value();
 }
 
 
@@ skipping 220 matching lines @@
   }
   return result.raw();
 }
 
 
 const char* InternalByteArray::ToCString() const {
   return "_InternalByteArray";
 }
 
 
+void ExternalByteArray::Finalize(Dart_Handle handle, void* peer) {
+  delete reinterpret_cast<ExternalByteArrayData*>(peer);
+  DeleteWeakPersistentHandle(handle);
+}
+
+
 RawExternalByteArray* ExternalByteArray::New(uint8_t* data,
                                              intptr_t len,
+                                             void* peer,
+                                             Dart_PeerFinalizer callback,
                                              Heap::Space space) {
   Isolate* isolate = Isolate::Current();
   const Class& external_byte_array_class =
       Class::Handle(isolate->object_store()->external_byte_array_class());
   ExternalByteArray& result = ExternalByteArray::Handle();
+  ExternalByteArrayData* external_data =
+        new ExternalByteArrayData(data, peer, callback);
   {
     RawObject* raw = Object::Allocate(external_byte_array_class,
                                       ExternalByteArray::InstanceSize(),
                                       space);
     NoGCScope no_gc;
     result ^= raw;
     result.SetLength(len);
-    result.SetData(data);
+    result.SetExternalData(external_data);
   }
+  AddFinalizer(result, external_data, ExternalByteArray::Finalize);
   return result.raw();
 }
 
 
 const char* ExternalByteArray::ToCString() const {
   return "_ExternalByteArray";
 }
 
 
 RawClosure* Closure::New(const Function& function,
@@ skipping 298 matching lines @@
   const String& str = String::Handle(pattern());
   const char* format = "JSRegExp: pattern=%s flags=%s";
   intptr_t len = OS::SNPrint(NULL, 0, format, str.ToCString(), Flags());
   char* chars = reinterpret_cast<char*>(
       Isolate::Current()->current_zone()->Allocate(len + 1));
   OS::SNPrint(chars, (len + 1), format, str.ToCString(), Flags());
   return chars;
 }
 
 }  // namespace dart