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

runtime/vm/dart_api_impl.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 "include/dart_api.h"
 
 #include "vm/bigint_operations.h"
 #include "vm/class_finalizer.h"
 #include "vm/compiler.h"
 #include "vm/dart.h"
@@ skipping 394 matching lines @@
 
 DART_EXPORT Dart_Handle Dart_NewWeakPersistentHandle(
     Dart_Handle object,
     void* peer,
     Dart_PeerFinalizer callback) {
   Isolate* isolate = Isolate::Current();
   CHECK_ISOLATE(isolate);
   DARTSCOPE_NOCHECKS(isolate);
   ApiState* state = isolate->api_state();
   ASSERT(state != NULL);
-  const Object& old_ref = Object::Handle(Api::UnwrapHandle(object));
-  WeakPersistentHandle* new_ref =
+  const Object& ref = Object::Handle(Api::UnwrapHandle(object));
+  WeakPersistentHandle* weak_ref =
       state->weak_persistent_handles().AllocateHandle();
-  new_ref->set_raw(old_ref);
-  new_ref->set_peer(peer);
-  new_ref->set_callback(callback);
-  return reinterpret_cast<Dart_Handle>(new_ref);
+  weak_ref->set_raw(ref);
+  weak_ref->set_peer(peer);
+  weak_ref->set_callback(callback);
+  return reinterpret_cast<Dart_Handle>(weak_ref);
 }
 
 
 DART_EXPORT void Dart_DeletePersistentHandle(Dart_Handle object) {
   Isolate* isolate = Isolate::Current();
   CHECK_ISOLATE(isolate);
   ApiState* state = isolate->api_state();
   ASSERT(state != NULL);
   if (state->IsValidWeakPersistentHandle(object)) {
     WeakPersistentHandle* weak_ref =
@@ skipping 1210 matching lines @@
 
 
 DART_EXPORT Dart_Handle Dart_NewByteArray(intptr_t length) {
   DARTSCOPE(Isolate::Current());
   const InternalByteArray& obj =
       InternalByteArray::Handle(InternalByteArray::New(length));
   return Api::NewLocalHandle(obj);
 }
 
 
+DART_EXPORT Dart_Handle Dart_NewExternalByteArray(uint8_t* data,
+                                                  intptr_t length,
+                                                  void* peer,
+                                                  Dart_PeerFinalizer callback) {
+  DARTSCOPE(Isolate::Current());

[siva, 2012/02/11 03:00:58]

Should we complain with error messages here for
 - data being NULL
 - length is a negative value (also for Dart_NewByteArray)

[cshapiro, 2012/02/11 04:11:50]

Sure, done.  I think it is okay for data to be NULL when length is 0.  I have
added code to fail all other cases with a NULL data value and when length is
negative.

+  const ExternalByteArray& obj =
+      ExternalByteArray::Handle(ExternalByteArray::New(data,
+                                                       length,
+                                                       peer,
+                                                       callback));
+  return Api::NewLocalHandle(obj);
+}
+
+
+DART_EXPORT Dart_Handle Dart_ExternalByteArrayGetPeer(Dart_Handle object,
+                                                      void** peer) {
+  DARTSCOPE(Isolate::Current());
+  const ExternalByteArray& array =
+      Api::UnwrapExternalByteArrayHandle(object);
+  if (array.IsNull()) {
+    RETURN_TYPE_ERROR(object, ExternalByteArray);
+  }
+  if (peer == NULL) {
+    return Api::NewError("%s expects argument 'peer' to be non-null.",
+                         CURRENT_FUNC);
+  }
+  *peer = array.GetPeer();
+  return Api::Success();
+}
+
+
 // --- Closures ---
 
 
 DART_EXPORT bool Dart_IsClosure(Dart_Handle object) {
   DARTSCOPE(Isolate::Current());
   const Object& obj = Object::Handle(Api::UnwrapHandle(object));
   return obj.IsClosure();
 }
 
 
@@ skipping 770 matching lines @@
     }
     delete debug_region;
   } else {
     *buffer = NULL;
     *buffer_size = 0;
   }
 }
 
 
 }  // namespace dart