comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/builtins/SLStackTraceBuiltin.java @ 15064:f675818d9ad0

new getStackTrace and getCurrentFrame functionality in TruffleRuntime
author Lukas Stadler <lukas.stadler@oracle.com>
date Fri, 11 Apr 2014 11:53:11 +0200
parents
children d3add9b82b71
comparison
equal deleted inserted replaced
15063:36e1a11a72b3 15064:f675818d9ad0
1 /*
2 * Copyright (c) 2012, 2014, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 */
23 package com.oracle.truffle.sl.builtins;
24
25 import com.oracle.truffle.api.*;
26 import com.oracle.truffle.api.CompilerDirectives.SlowPath;
27 import com.oracle.truffle.api.dsl.*;
28 import com.oracle.truffle.api.frame.*;
29 import com.oracle.truffle.api.frame.FrameInstance.FrameAccess;
30 import com.oracle.truffle.api.nodes.*;
31
32 /**
33 * Returns a string representation of the current stack. This includes the {@link CallTarget}s and
34 * the contents of the {@link Frame}. Note that this is implemented as a slow path by passing
35 * {@code true} to {@link FrameInstance#getFrame(FrameAccess, boolean)}.
36 */
37 @NodeInfo(shortName = "stacktrace")
38 public abstract class SLStackTraceBuiltin extends SLBuiltinNode {
39
40 @Specialization
41 public String trace() {
42 return createStackTrace();
43 }
44
45 @SlowPath
46 private static String createStackTrace() {
47 StringBuilder str = new StringBuilder();
48 for (FrameInstance frame : Truffle.getRuntime().getStackTrace()) {
49 dumpFrame(str, frame.getCallNode().getRootNode(), frame.getFrame(FrameAccess.READ_ONLY, true), frame.isVirtualFrame());
50 }
51 return str.toString();
52 }
53
54 private static void dumpFrame(StringBuilder str, RootNode rootNode, Frame frame, boolean isVirtual) {
55 if (str.length() > 0) {
56 str.append("\n");
57 }
58 str.append("Frame: ").append(rootNode).append(isVirtual ? " (virtual)" : "");
59 FrameDescriptor frameDescriptor = frame.getFrameDescriptor();
60 for (FrameSlot s : frameDescriptor.getSlots()) {
61 str.append(", ").append(s.getIdentifier()).append("=").append(frame.getValue(s));
62 }
63 }
64 }