Expose functionality to create a stack trace to internal vm code.

runtime/vm/exceptions.cc

 // Copyright (c) 2011, 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/exceptions.h"
 
 #include "vm/dart_api_impl.h"
 #include "vm/dart_entry.h"
 #include "vm/debugger.h"
 #include "vm/flags.h"
@@ skipping 327 matching lines @@
     }
     type = test_class.super_type();
     if (type.IsNull()) return Field::null();
     test_class = type.type_class();
   };
   UNREACHABLE();
   return Field::null();
 }
 
 
+RawStacktrace* Exceptions::CurrentStacktrace() {
+  Isolate* isolate = Isolate::Current();
+  RegularStacktraceBuilder frame_builder(true);
+  BuildStackTrace(&frame_builder);
+
+  // Create arrays for code and pc_offset tuples of each frame.
+  const Array& full_code_array = Array::Handle(isolate,
+      Array::MakeArray(frame_builder.code_list()));
+  const Array& full_pc_offset_array = Array::Handle(isolate,
+      Array::MakeArray(frame_builder.pc_offset_list()));
+  const Array& full_catch_code_array = Array::Handle(isolate,
+      Array::MakeArray(frame_builder.catch_code_list()));
+  const Array& full_catch_pc_offset_array = Array::Handle(isolate,
+      Array::MakeArray(frame_builder.catch_pc_offset_list()));
+  const Stacktrace& full_stacktrace = Stacktrace::Handle(
+      Stacktrace::New(full_code_array, full_pc_offset_array));
+  full_stacktrace.SetCatchStacktrace(full_catch_code_array,
+                                     full_catch_pc_offset_array);
+  return full_stacktrace.raw();
+}
+
+
 static void ThrowExceptionHelper(const Instance& incoming_exception,
                                  const Instance& existing_stacktrace) {
   bool use_preallocated_stacktrace = false;
   Isolate* isolate = Isolate::Current();
   Instance& exception = Instance::Handle(isolate, incoming_exception.raw());
   if (exception.IsNull()) {
     exception ^= Exceptions::Create(Exceptions::kNullThrown,
                                     Object::empty_array());
   } else if (exception.raw() == isolate->object_store()->out_of_memory() ||
              exception.raw() == isolate->object_store()->stack_overflow()) {
@@ skipping 26 matching lines @@
     Array& code_array = Array::Handle(isolate, Object::empty_array().raw());
     Array& pc_offset_array =
         Array::Handle(isolate, Object::empty_array().raw());
     // If we have an error with a stacktrace field then collect the full stack
     // trace and store it into the field.
     if (!stacktrace_field.IsNull()) {
       if (exception.GetField(stacktrace_field) == Object::null()) {
         // This is an error object and we need to capture the full stack trace
         // here implicitly, so we set up the stack trace. The stack trace field
         // is set only once, it is not overriden.
-        RegularStacktraceBuilder frame_builder(true);
-        BuildStackTrace(&frame_builder);
-
-        // Create arrays for code and pc_offset tuples of each frame.
-        const Array& full_code_array = Array::Handle(isolate,
-            Array::MakeArray(frame_builder.code_list()));
-        const Array& full_pc_offset_array = Array::Handle(isolate,
-            Array::MakeArray(frame_builder.pc_offset_list()));
-        const Array& full_catch_code_array = Array::Handle(isolate,
-            Array::MakeArray(frame_builder.catch_code_list()));
-        const Array& full_catch_pc_offset_array = Array::Handle(isolate,
-            Array::MakeArray(frame_builder.catch_pc_offset_list()));
-        const Stacktrace& full_stacktrace = Stacktrace::Handle(isolate,
-            Stacktrace::New(full_code_array, full_pc_offset_array));
-        full_stacktrace.SetCatchStacktrace(full_catch_code_array,
-                                           full_catch_pc_offset_array);
+        const Stacktrace& full_stacktrace =
+            Stacktrace::Handle(isolate, Exceptions::CurrentStacktrace());
         exception.SetField(stacktrace_field, full_stacktrace);
       }
     }
     if (handler_needs_stacktrace) {
       RegularStacktraceBuilder frame_builder(false);
       BuildStackTrace(&frame_builder);
 
       // Create arrays for code and pc_offset tuples of each frame.
       code_array = Array::MakeArray(frame_builder.code_list());
       pc_offset_array = Array::MakeArray(frame_builder.pc_offset_list());
@@ skipping 290 matching lines @@
       break;
   }
 
   return DartLibraryCalls::InstanceCreate(library,
                                           *class_name,
                                           *constructor_name,
                                           arguments);
 }
 
 }  // namespace dart