OLD | NEW |
1 // Copyright (c) 2011, the Dart project authors. Please see the AUTHORS file | 1 // Copyright (c) 2011, the Dart project authors. Please see the AUTHORS file |
2 // for details. All rights reserved. Use of this source code is governed by a | 2 // for details. All rights reserved. Use of this source code is governed by a |
3 // BSD-style license that can be found in the LICENSE file. | 3 // BSD-style license that can be found in the LICENSE file. |
4 | 4 |
5 #include "include/dart_api.h" | 5 #include "include/dart_api.h" |
6 | 6 |
7 #include "vm/unit_test.h" | 7 #include "vm/unit_test.h" |
8 | 8 |
9 // Custom Isolate Test. | 9 // Custom Isolate Test. |
10 // | 10 // |
(...skipping 61 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
72 " echo('Received: ' + message);\n" | 72 " echo('Received: ' + message);\n" |
73 " });\n" | 73 " });\n" |
74 " });\n" | 74 " });\n" |
75 " return 'success';\n" | 75 " return 'success';\n" |
76 "}\n"; | 76 "}\n"; |
77 | 77 |
78 | 78 |
79 // An entry in our event queue. | 79 // An entry in our event queue. |
80 class Event { | 80 class Event { |
81 protected: | 81 protected: |
82 Event() : next_(NULL) {} | 82 explicit Event(Dart_Isolate isolate) : isolate_(isolate), next_(NULL) {} |
83 | 83 |
84 public: | 84 public: |
85 virtual ~Event() {} | 85 virtual ~Event() {} |
86 virtual void Process() = 0; | 86 virtual void Process() = 0; |
87 | 87 |
88 virtual bool IsShutdownEvent(Dart_Isolate isolate) { | 88 Dart_Isolate isolate() const { return isolate_; } |
89 return false; | 89 |
| 90 private: |
| 91 friend class EventQueue; |
| 92 Dart_Isolate isolate_; |
| 93 Event* next_; |
| 94 }; |
| 95 |
| 96 |
| 97 // A simple event queue for our test. |
| 98 class EventQueue { |
| 99 public: |
| 100 EventQueue() { |
| 101 head_ = NULL; |
90 } | 102 } |
91 virtual bool IsMessageEvent(Dart_Isolate isolate, Dart_Port port) { | 103 |
92 return false; | 104 void Add(Event* event) { |
| 105 if (head_ == NULL) { |
| 106 head_ = event; |
| 107 tail_ = event; |
| 108 } else { |
| 109 tail_->next_ = event; |
| 110 tail_ = event; |
| 111 } |
| 112 } |
| 113 |
| 114 Event* Get() { |
| 115 if (head_ == NULL) { |
| 116 return NULL; |
| 117 } |
| 118 Event* tmp = head_; |
| 119 head_ = head_->next_; |
| 120 if (head_ == NULL) { |
| 121 // Not necessary, but why not. |
| 122 tail_ = NULL; |
| 123 } |
| 124 |
| 125 return tmp; |
| 126 } |
| 127 |
| 128 void RemoveEventsForIsolate(Dart_Isolate isolate) { |
| 129 Event* cur = head_; |
| 130 Event* prev = NULL; |
| 131 while (cur != NULL) { |
| 132 Event* next = cur->next_; |
| 133 if (cur->isolate() == isolate) { |
| 134 // Remove matching event. |
| 135 if (prev != NULL) { |
| 136 prev->next_ = next; |
| 137 } else { |
| 138 head_ = next; |
| 139 } |
| 140 delete cur; |
| 141 } else { |
| 142 // Advance. |
| 143 prev = cur; |
| 144 } |
| 145 cur = next; |
| 146 } |
| 147 tail_ = prev; |
93 } | 148 } |
94 | 149 |
95 private: | 150 private: |
96 friend class EventQueue; | 151 Event* head_; |
97 Event* next_; | 152 Event* tail_; |
98 }; | 153 }; |
| 154 EventQueue* event_queue; |
99 | 155 |
100 | 156 |
101 // Start an isolate. | 157 // Start an isolate. |
102 class StartEvent : public Event { | 158 class StartEvent : public Event { |
103 public: | 159 public: |
104 StartEvent(Dart_Isolate isolate, const char* main) | 160 StartEvent(Dart_Isolate isolate, const char* main) |
105 : isolate_(isolate), main_(main) {} | 161 : Event(isolate), main_(main) {} |
106 | 162 |
107 virtual void Process(); | 163 virtual void Process(); |
108 private: | 164 private: |
109 Dart_Isolate isolate_; | |
110 const char* main_; | 165 const char* main_; |
111 }; | 166 }; |
112 | 167 |
113 | 168 |
114 void StartEvent::Process() { | 169 void StartEvent::Process() { |
115 OS::Print(">> StartEvent with isolate(%p)--\n", isolate_); | 170 OS::Print(">> StartEvent with isolate(%p)--\n", isolate()); |
116 Dart_EnterIsolate(isolate_); | 171 Dart_EnterIsolate(isolate()); |
117 Dart_EnterScope(); | 172 Dart_EnterScope(); |
118 Dart_Handle result; | 173 Dart_Handle result; |
119 | 174 |
120 // Reload all the test classes here. | 175 // Reload all the test classes here. |
121 // | 176 // |
122 // TODO(turnidge): Use the create isolate callback instead? | 177 // TODO(turnidge): Use the create isolate callback instead? |
123 Dart_Handle lib = TestCase::LoadTestScript(kCustomIsolateScriptChars, | 178 Dart_Handle lib = TestCase::LoadTestScript(kCustomIsolateScriptChars, |
124 NativeLookup); | 179 NativeLookup); |
125 EXPECT_VALID(lib); | 180 EXPECT_VALID(lib); |
126 EXPECT_VALID(Dart_CompileAll()); | 181 EXPECT_VALID(Dart_CompileAll()); |
(...skipping 16 matching lines...) Expand all Loading... |
143 NULL); | 198 NULL); |
144 EXPECT_VALID(result); | 199 EXPECT_VALID(result); |
145 free(const_cast<char*>(main_)); | 200 free(const_cast<char*>(main_)); |
146 main_ = NULL; | 201 main_ = NULL; |
147 | 202 |
148 Dart_ExitScope(); | 203 Dart_ExitScope(); |
149 Dart_ExitIsolate(); | 204 Dart_ExitIsolate(); |
150 } | 205 } |
151 | 206 |
152 | 207 |
153 // Shutdown an isolate. | 208 // Notify an isolate of a pending message. |
154 class ShutdownEvent : public Event { | 209 class MessageEvent : public Event { |
155 public: | 210 public: |
156 explicit ShutdownEvent(Dart_Isolate isolate) : isolate_(isolate) {} | 211 explicit MessageEvent(Dart_Isolate isolate) : Event(isolate) {} |
157 | 212 |
158 virtual bool IsShutdownEvent(Dart_Isolate isolate) { | 213 ~MessageEvent() { |
159 return isolate == isolate_; | |
160 } | 214 } |
161 | 215 |
162 virtual void Process(); | 216 virtual void Process(); |
163 private: | |
164 Dart_Isolate isolate_; | |
165 }; | |
166 | |
167 | |
168 void ShutdownEvent::Process() { | |
169 OS::Print("<< ShutdownEvent with isolate(%p)--\n", isolate_); | |
170 Dart_EnterIsolate(isolate_); | |
171 Dart_ShutdownIsolate(); | |
172 } | |
173 | |
174 | |
175 // Deliver a message to an isolate. | |
176 class MessageEvent : public Event { | |
177 public: | |
178 MessageEvent(Dart_Isolate isolate, Dart_Port dest, Dart_Port reply, | |
179 Dart_Message msg) | |
180 : isolate_(isolate), dest_(dest), reply_(reply), msg_(msg) {} | |
181 | |
182 ~MessageEvent() { | |
183 free(msg_); | |
184 msg_ = NULL; | |
185 } | |
186 | |
187 virtual bool IsMessageEvent(Dart_Isolate isolate, Dart_Port port) { | |
188 return isolate == isolate_ && (port == kCloseAllPorts || port == dest_); | |
189 } | |
190 | |
191 virtual void Process(); | |
192 private: | |
193 Dart_Isolate isolate_; | |
194 Dart_Port dest_; | |
195 Dart_Port reply_; | |
196 Dart_Message msg_; | |
197 }; | 217 }; |
198 | 218 |
199 | 219 |
200 void MessageEvent::Process() { | 220 void MessageEvent::Process() { |
201 OS::Print("$$ MessageEvent with dest port %lld--\n", dest_); | 221 OS::Print("$$ MessageEvent with isolate(%p)\n", isolate()); |
202 Dart_EnterIsolate(isolate_); | 222 Dart_EnterIsolate(isolate()); |
203 Dart_EnterScope(); | 223 Dart_EnterScope(); |
204 | 224 |
205 Dart_Handle result = Dart_HandleMessage(dest_, reply_, msg_); | 225 Dart_Handle result = Dart_HandleMessage(); |
206 EXPECT_VALID(result); | 226 EXPECT_VALID(result); |
207 | 227 |
208 Dart_ExitScope(); | 228 if (!Dart_HasLivePorts()) { |
209 Dart_ExitIsolate(); | 229 OS::Print("<< Shutting down isolate(%p)\n", isolate()); |
| 230 event_queue->RemoveEventsForIsolate(isolate()); |
| 231 Dart_ShutdownIsolate(); |
| 232 } else { |
| 233 Dart_ExitScope(); |
| 234 Dart_ExitIsolate(); |
| 235 } |
| 236 ASSERT(Dart_CurrentIsolate() == NULL); |
210 } | 237 } |
211 | 238 |
212 | 239 |
213 // A simple event queue for our test. | 240 static void NotifyMessage(Dart_Isolate dest_isolate) { |
214 class EventQueue { | 241 OS::Print("-- Notify isolate(%p) of pending message --\n", dest_isolate); |
215 public: | |
216 EventQueue() { | |
217 head_ = NULL; | |
218 } | |
219 | |
220 void Add(Event* event) { | |
221 if (head_ == NULL) { | |
222 head_ = event; | |
223 tail_ = event; | |
224 } else { | |
225 tail_->next_ = event; | |
226 tail_ = event; | |
227 } | |
228 } | |
229 | |
230 Event* Get() { | |
231 if (head_ == NULL) { | |
232 return NULL; | |
233 } | |
234 Event* tmp = head_; | |
235 head_ = head_->next_; | |
236 if (head_ == NULL) { | |
237 tail_ = NULL; | |
238 } | |
239 | |
240 return tmp; | |
241 } | |
242 | |
243 void ClosePort(Dart_Isolate isolate, Dart_Port port) { | |
244 Event* cur = head_; | |
245 Event* prev = NULL; | |
246 while (cur != NULL) { | |
247 Event* next = cur->next_; | |
248 if (cur->IsMessageEvent(isolate, port)) { | |
249 // Remove matching event. | |
250 if (prev != NULL) { | |
251 prev->next_ = next; | |
252 } else { | |
253 head_ = next; | |
254 } | |
255 delete cur; | |
256 } else { | |
257 // Advance. | |
258 prev = cur; | |
259 } | |
260 cur = next; | |
261 } | |
262 tail_ = prev; | |
263 } | |
264 | |
265 private: | |
266 Event* head_; | |
267 Event* tail_; | |
268 }; | |
269 EventQueue* event_queue; | |
270 Event* current_event; | |
271 | |
272 static bool PostMessage(Dart_Isolate dest_isolate, | |
273 Dart_Port dest_port, | |
274 Dart_Port reply_port, | |
275 Dart_Message message) { | |
276 OS::Print("-- Posting message dest(%d) reply(%d) --\n", | |
277 dest_port, reply_port); | |
278 OS::Print("-- Adding MessageEvent to queue --\n"); | 242 OS::Print("-- Adding MessageEvent to queue --\n"); |
279 event_queue->Add( | 243 event_queue->Add(new MessageEvent(dest_isolate)); |
280 new MessageEvent(dest_isolate, dest_port, reply_port, message)); | |
281 return true; | |
282 } | |
283 | |
284 | |
285 static void ClosePort(Dart_Isolate isolate, | |
286 Dart_Port port) { | |
287 OS::Print("-- Closing port (%lld) for isolate(%p) --\n", | |
288 port, isolate); | |
289 | |
290 // Remove any pending events for the isolate/port. | |
291 event_queue->ClosePort(isolate, port); | |
292 | |
293 Dart_Isolate current = Dart_CurrentIsolate(); | |
294 if (current) { | |
295 Dart_ExitIsolate(); | |
296 } | |
297 Dart_EnterIsolate(isolate); | |
298 if (!Dart_HasLivePorts() && | |
299 (current_event == NULL || !current_event->IsShutdownEvent(isolate))) { | |
300 OS::Print("-- Adding ShutdownEvent to queue --\n"); | |
301 event_queue->Add(new ShutdownEvent(isolate)); | |
302 } | |
303 Dart_ExitIsolate(); | |
304 if (current) { | |
305 Dart_EnterIsolate(current); | |
306 } | |
307 } | 244 } |
308 | 245 |
309 | 246 |
310 static Dart_NativeFunction NativeLookup(Dart_Handle name, int argc) { | 247 static Dart_NativeFunction NativeLookup(Dart_Handle name, int argc) { |
311 const char* name_str = NULL; | 248 const char* name_str = NULL; |
312 EXPECT(Dart_IsString(name)); | 249 EXPECT(Dart_IsString(name)); |
313 EXPECT_VALID(Dart_StringToCString(name, &name_str)); | 250 EXPECT_VALID(Dart_StringToCString(name, &name_str)); |
314 if (strcmp(name_str, "native_echo") == 0) { | 251 if (strcmp(name_str, "native_echo") == 0) { |
315 return &native_echo; | 252 return &native_echo; |
316 } else if (strcmp(name_str, "CustomIsolateImpl_start") == 0) { | 253 } else if (strcmp(name_str, "CustomIsolateImpl_start") == 0) { |
(...skipping 34 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
351 EXPECT_VALID(Dart_StringToCString(param, &isolate_main)); | 288 EXPECT_VALID(Dart_StringToCString(param, &isolate_main)); |
352 isolate_main = strdup(isolate_main); | 289 isolate_main = strdup(isolate_main); |
353 | 290 |
354 // Save current isolate. | 291 // Save current isolate. |
355 Dart_Isolate saved_isolate = Dart_CurrentIsolate(); | 292 Dart_Isolate saved_isolate = Dart_CurrentIsolate(); |
356 Dart_ExitIsolate(); | 293 Dart_ExitIsolate(); |
357 | 294 |
358 // Create a new Dart_Isolate. | 295 // Create a new Dart_Isolate. |
359 Dart_Isolate new_isolate = TestCase::CreateTestIsolate(); | 296 Dart_Isolate new_isolate = TestCase::CreateTestIsolate(); |
360 EXPECT(new_isolate != NULL); | 297 EXPECT(new_isolate != NULL); |
361 Dart_SetMessageCallbacks(&PostMessage, &ClosePort); | 298 Dart_SetMessageNotifyCallback(&NotifyMessage); |
362 Dart_Port new_port = Dart_GetMainPortId(); | 299 Dart_Port new_port = Dart_GetMainPortId(); |
363 | 300 |
364 OS::Print("-- Adding StartEvent to queue --\n"); | 301 OS::Print("-- Adding StartEvent to queue --\n"); |
365 event_queue->Add(new StartEvent(new_isolate, isolate_main)); | 302 event_queue->Add(new StartEvent(new_isolate, isolate_main)); |
366 | 303 |
367 // Restore the original isolate. | 304 // Restore the original isolate. |
368 Dart_ExitIsolate(); | 305 Dart_ExitIsolate(); |
369 Dart_EnterIsolate(saved_isolate); | 306 Dart_EnterIsolate(saved_isolate); |
370 Dart_EnterScope(); | 307 Dart_EnterScope(); |
371 | 308 |
372 Dart_Handle send_port = Dart_NewSendPort(new_port); | 309 Dart_Handle send_port = Dart_NewSendPort(new_port); |
373 EXPECT_VALID(send_port); | 310 EXPECT_VALID(send_port); |
374 Dart_SetReturnValue(args, send_port); | 311 Dart_SetReturnValue(args, send_port); |
375 | 312 |
376 OS::Print("-- Exit: CustomIsolateImpl_start --\n"); | 313 OS::Print("-- Exit: CustomIsolateImpl_start --\n"); |
377 Dart_ExitScope(); | 314 Dart_ExitScope(); |
378 } | 315 } |
379 | 316 |
380 | 317 |
381 UNIT_TEST_CASE(CustomIsolates) { | 318 UNIT_TEST_CASE(CustomIsolates) { |
382 event_queue = new EventQueue(); | 319 event_queue = new EventQueue(); |
383 current_event = NULL; | |
384 | 320 |
385 Dart_Isolate dart_isolate = TestCase::CreateTestIsolate(); | 321 Dart_Isolate dart_isolate = TestCase::CreateTestIsolate(); |
386 EXPECT(dart_isolate != NULL); | 322 EXPECT(dart_isolate != NULL); |
387 Dart_SetMessageCallbacks(&PostMessage, &ClosePort); | 323 Dart_SetMessageNotifyCallback(&NotifyMessage); |
388 Dart_EnterScope(); | 324 Dart_EnterScope(); |
389 Dart_Handle result; | 325 Dart_Handle result; |
390 | 326 |
391 // Create a test library. | 327 // Create a test library. |
392 Dart_Handle lib = TestCase::LoadTestScript(kCustomIsolateScriptChars, | 328 Dart_Handle lib = TestCase::LoadTestScript(kCustomIsolateScriptChars, |
393 NativeLookup); | 329 NativeLookup); |
394 EXPECT_VALID(lib); | 330 EXPECT_VALID(lib); |
395 | 331 |
396 // Run main. | 332 // Run main. |
397 result = Dart_InvokeStatic(lib, | 333 result = Dart_InvokeStatic(lib, |
398 Dart_NewString(""), | 334 Dart_NewString(""), |
399 Dart_NewString("main"), | 335 Dart_NewString("main"), |
400 0, | 336 0, |
401 NULL); | 337 NULL); |
402 EXPECT_VALID(result); | 338 EXPECT_VALID(result); |
403 EXPECT(Dart_IsString(result)); | 339 EXPECT(Dart_IsString(result)); |
404 const char* result_str = NULL; | 340 const char* result_str = NULL; |
405 EXPECT_VALID(Dart_StringToCString(result, &result_str)); | 341 EXPECT_VALID(Dart_StringToCString(result, &result_str)); |
406 EXPECT_STREQ("success", result_str); | 342 EXPECT_STREQ("success", result_str); |
407 | 343 |
408 Dart_ExitScope(); | 344 Dart_ExitScope(); |
409 Dart_ExitIsolate(); | 345 Dart_ExitIsolate(); |
410 | 346 |
411 OS::Print("-- Starting event loop --\n"); | 347 OS::Print("-- Starting event loop --\n"); |
412 Event* event = event_queue->Get(); | 348 Event* event = event_queue->Get(); |
413 while (event) { | 349 while (event) { |
414 current_event = event; | |
415 event->Process(); | 350 event->Process(); |
416 current_event = NULL; | |
417 delete event; | 351 delete event; |
418 event = event_queue->Get(); | 352 event = event_queue->Get(); |
419 } | 353 } |
420 OS::Print("-- Finished event loop --\n"); | 354 OS::Print("-- Finished event loop --\n"); |
421 EXPECT_STREQ("Received: 43", saved_echo); | 355 EXPECT_STREQ("Received: 43", saved_echo); |
422 free(const_cast<char*>(saved_echo)); | 356 free(const_cast<char*>(saved_echo)); |
423 | 357 |
424 delete event_queue; | 358 delete event_queue; |
425 } | 359 } |
426 | 360 |
427 #endif // TARGET_ARCH_IA32. | 361 #endif // TARGET_ARCH_IA32. |
428 | 362 |
429 } // namespace dart | 363 } // namespace dart |
OLD | NEW |