Add Dart_GetClosureInfo

runtime/vm/debugger_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_debugger_api.h"
 
 #include "vm/class_finalizer.h"
 #include "vm/compiler.h"
 #include "vm/dart_api_impl.h"
 #include "vm/dart_api_state.h"
@@ skipping 581 matching lines @@
 
   // Construct the super type object, canonicalize it and return.
   Type& instantiated_type = Type::Handle(
       Type::New(super_cls, super_type_args_array, Scanner::kDummyTokenIndex));
   ASSERT(!instantiated_type.IsNull());
   instantiated_type.SetIsFinalized();
   return Api::NewHandle(isolate, instantiated_type.Canonicalize());
 }
 
 
+DART_EXPORT Dart_Handle Dart_GetClosureInfo(
+                            Dart_Handle closure,
+                            Dart_Handle* name,
+                            Dart_CodeLocation* location) {
+  Isolate* isolate = Isolate::Current();
+  DARTSCOPE(isolate);
+  UNWRAP_AND_CHECK_PARAM(Instance, instance, closure);
+  CHECK_NOT_NULL(location);
+
+  if (!instance.IsClosure()) {
+    return Api::NewError("%s: parameter 0 is not a closure", CURRENT_FUNC);
+  }
+  const Function& func = Function::Handle(Closure::function(instance));
+  ASSERT(!func.IsNull());
+  if (name != NULL) {
+    *name = Api::NewHandle(isolate, func.QualifiedUserVisibleName());
+  }
+  if (location != NULL) {
+    if (func.token_pos() >= 0) {
+      const Class& cls = Class::Handle(func.origin());
+      ASSERT(!cls.IsNull());
+      const Library& lib = Library::Handle(isolate, cls.library());
+      ASSERT(!lib.IsNull());
+      const Script& script = Script::Handle(cls.script());
+      ASSERT(!script.IsNull());
+      location->script_url = Api::NewHandle(isolate, script.url());
+      location->library_id = lib.index();
+      location->token_pos = func.token_pos();
+    } else {
+      location->script_url = Api::NewHandle(isolate, String::null());
+      location->library_id = -1;
+      location->token_pos = -1;
+    }
+  }
+  return Api::True();
+}
+
+
 DART_EXPORT Dart_Handle Dart_GetClassInfo(
                             intptr_t cls_id,
                             Dart_Handle* class_name,
                             intptr_t* library_id,
                             intptr_t* super_class_id,
                             Dart_Handle* static_fields) {
   Isolate* isolate = Isolate::Current();
   DARTSCOPE(isolate);
   if (!isolate->class_table()->IsValidIndex(cls_id)) {
     return Api::NewError("%s: %" Pd " is not a valid class id",
@@ skipping 290 matching lines @@
 
 
 DART_EXPORT char* Dart_GetVmStatus(const char* request) {
   if (strncmp(request, "/isolate/", 9) == 0) {
     return Isolate::GetStatus(request);
   }
   return NULL;
 }
 
 }  // namespace dart