Add support for native ports in the vm.

runtime/vm/dart_api_impl_test.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 "platform/assert.h"
 #include "platform/utils.h"
 #include "vm/dart_api_impl.h"
 #include "vm/dart_api_state.h"
 #include "vm/thread.h"
@@ skipping 2730 matching lines @@
 
   result = Dart_InvokeStatic(result,
                              Dart_NewString(""),
                              Dart_NewString("main"),
                              0,
                              NULL);
   EXPECT_VALID(result);
 }
 
 
+void NewNativePort_send123(Dart_Port dest_port_id,
+                           Dart_Port reply_port_id,
+                           uint8_t* data) {
+  intptr_t response = 123;
+  Dart_PostIntArray(reply_port_id, 1, &response);
+}
+
+
+TEST_CASE(NewNativePort) {
+  const char* kScriptChars =
+      "void callPort(SendPort port) {\n"
+      "    port.call(null).receive((message, replyTo) {\n"
+      "      throw new Exception(message[0]);\n"
+      "    });\n"
+      "}\n";
+  Dart_Handle lib = TestCase::LoadTestScript(kScriptChars, NULL);
+  Dart_Port port_id =
+      Dart_NewNativePort("Port123", NewNativePort_send123, true);

[siva, 2012/01/28 00:21:05]

For completeness should we make this test case a UNIT_TEST_CASE create the
native port without any isolates and then create an isolate and do the
invokestatic business.

[turnidge, 2012/01/31 20:04:31]

I don't understand why this helps.

On 2012/01/28 00:21:05, asiva wrote:

[siva, 2012/02/01 00:38:56]

This ties back to my comment regarding Dart_NewNativePort(...) not requiring an
Isolate to be present.

We want to test that Dart_NewNativePort works even when there is no current
Isolate and hence my suggestion to turn it into a UNIT_TEST

On 2012/01/31 20:04:31, turnidge wrote:

[turnidge, 2012/02/01 18:51:26]

I now test in both configurations.

+
+  Dart_Handle send_port = Dart_NewSendPort(port_id);
+  EXPECT_VALID(send_port);
+
+  Dart_Handle dart_args[1];
+  dart_args[0] = send_port;
+  Dart_Handle result = Dart_InvokeStatic(lib,
+                                         Dart_NewString(""),
+                                         Dart_NewString("callPort"),
+                                         1,
+                                         dart_args);
+  EXPECT_VALID(result);
+  result = Dart_RunLoop();
+  EXPECT(Dart_IsError(result));
+  EXPECT(Dart_ErrorHasException(result));
+  EXPECT_SUBSTRING("Exception: 123\n", Dart_GetError(result));
+
+  // Delete the native port.
+  EXPECT(Dart_CloseNativePort(port_id));
+}
+
+
 static bool RunLoopTestCallback(const char* name_prefix,
                                 void* data, char** error) {
   const char* kScriptChars =
       "#import('builtin');\n"
       "class MyIsolate extends Isolate {\n"
       "  MyIsolate() : super() { }\n"
       "  void main() {\n"
       "    port.receive((message, replyTo) {\n"
       "      if (message) {\n"
       "        throw new Exception('MakeChildExit');\n"
@@ skipping 238 matching lines @@
   // We should have received the expected number of interrupts.
   EXPECT_EQ(kInterruptCount, interrupt_count);
 
   // Give the spawned thread enough time to properly exit.
   Isolate::SetInterruptCallback(saved);
 }
 
 #endif  // defined(TARGET_ARCH_IA32) || defined(TARGET_ARCH_X64).
 
 }  // namespace dart