Mercurial Hosting > luan

annotate src/luan/LuanException.java @ 1125:442abdfff437

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
include luan stack in LuanException.printStackTrace()
author Franklin Schmidt <fschmidt@gmail.com>
date Thu, 24 Aug 2017 14:03:36 -0600
parents e15be31cee92
children 9fa8b8389578
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
2df768b926aa start Luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
1 package luan;
2df768b926aa start Luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
2
200
9fb218211763 add Package.block();
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 171
diff changeset
3 import java.io.StringWriter;
9fb218211763 add Package.block();
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 171
diff changeset
4 import java.io.PrintWriter;
1125
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
5 import java.io.PrintStream;
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
6 import java.util.List;
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
7 import java.util.ArrayList;
1
2df768b926aa start Luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
8
200
9fb218211763 add Package.block();
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 171
diff changeset
9
781
fbbdd369a13a rename DeepCloner to LuanCloner
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
10 public final class LuanException extends Exception implements LuanCloneable {
689
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
11 private LuanTable table;
1
2df768b926aa start Luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
12
646
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
13 public LuanException(String msg,Throwable cause) {
481
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
14 super(msg,cause);
42
786699c78837 implement try-catch
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 40
diff changeset
15 }
786699c78837 implement try-catch
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 40
diff changeset
16
646
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
17 public LuanException(String msg) {
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
18 super(msg);
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
19 }
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
20
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
21 public LuanException(Throwable cause) {
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
22 super(cause);
689
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
23 }
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
24
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
25 private LuanException(String msg,Throwable cause,int nonsense) {
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
26 super(msg,cause);
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
27 }
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
28
784
6a7c6879158d revert shallowClone()
Franklin Schmidt <fschmidt@gmail.com>
parents: 783
diff changeset
29 @Override public LuanException shallowClone() {
689
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
30 return new LuanException(getMessage(),getCause(),99);
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
31 }
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
32
781
fbbdd369a13a rename DeepCloner to LuanCloner
Franklin Schmidt <fschmidt@gmail.com>
parents: 775
diff changeset
33 @Override public void deepenClone(LuanCloneable dc,LuanCloner cloner) {
689
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
34 LuanException clone = (LuanException)dc;
782
655280eab1e2 start limited cloning
Franklin Schmidt <fschmidt@gmail.com>
parents: 781
diff changeset
35 clone.table = (LuanTable)cloner.clone(table);
646
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
36 }
cdc70de628b5 simplify LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 645
diff changeset
37
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
38 public LuanTable table() {
783
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
39 if( table==null ) {
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
40 table = new LuanTable();
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
41 table.rawPut( "java", this );
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
42 LuanTable metatable = new LuanTable();
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
43 table.setMetatable(metatable);
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
44 try {
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
45 table.rawPut( "get_message", new LuanJavaFunction(
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
46 LuanException.class.getMethod( "getMessage" ), this
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
47 ) );
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
48 table.rawPut( "throw", new LuanJavaFunction(
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
49 LuanException.class.getMethod( "throwThis" ), this
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
50 ) );
1122
e15be31cee92 remove LuanException.getFullMessage()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1121
diff changeset
51 table.rawPut( "get_stack_trace_string", new LuanJavaFunction(
e15be31cee92 remove LuanException.getFullMessage()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1121
diff changeset
52 LuanException.class.getMethod( "getLuanStackTraceString" ), this
e15be31cee92 remove LuanException.getFullMessage()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1121
diff changeset
53 ) );
783
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
54 table.rawPut( "get_java_stack_trace_string", new LuanJavaFunction(
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
55 LuanException.class.getMethod( "getJavaStackTraceString" ), this
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
56 ) );
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
57 metatable.rawPut( "__to_string", new LuanJavaFunction(
1121
4cf541886663 check for too many arguments to java fns
Franklin Schmidt <fschmidt@gmail.com>
parents: 784
diff changeset
58 LuanException.class.getMethod( "__to_string", LuanTable.class ), this
783
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
59 ) );
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
60 } catch(NoSuchMethodException e) {
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
61 throw new RuntimeException(e);
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
62 }
Franklin Schmidt <fschmidt@gmail.com>
parents: 782
diff changeset
63 }
689
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
64 return table;
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
65 }
51a134a8c89b fix LuanException
Franklin Schmidt <fschmidt@gmail.com>
parents: 683
diff changeset
66
481
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
67 public void throwThis() throws LuanException {
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
68 throw this;
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
69 }
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
70
1121
4cf541886663 check for too many arguments to java fns
Franklin Schmidt <fschmidt@gmail.com>
parents: 784
diff changeset
71 public String __to_string(LuanTable ignore) {
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
72 return getLuanStackTraceString();
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
73 }
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
74
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
75 public String getJavaStackTraceString() {
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
76 return getJavaStackTraceString(this);
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
77 }
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
78
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
79 private static String getJavaStackTraceString(Throwable th) {
645
859c0dedc8b6 remove LuanSource
Franklin Schmidt <fschmidt@gmail.com>
parents: 578
diff changeset
80 StringWriter sw = new StringWriter();
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
81 th.printStackTrace(new PrintWriter(sw));
645
859c0dedc8b6 remove LuanSource
Franklin Schmidt <fschmidt@gmail.com>
parents: 578
diff changeset
82 return sw.toString();
37
8a57ebfdfd78 add JavaLib
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 2
diff changeset
83 }
481
5d4a78c93383 luan errors are now tables
Franklin Schmidt <fschmidt@gmail.com>
parents: 200
diff changeset
84
772
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
85 public static List<StackTraceElement> justLuan(StackTraceElement[] orig) {
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
86 List<StackTraceElement> list = new ArrayList<StackTraceElement>();
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
87 for( int i=0; i<orig.length; i++ ) {
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
88 StackTraceElement ste = orig[i];
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
89 if( !ste.getClassName().startsWith("luan.impl.EXP") )
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
90 continue;
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
91 list.add(ste);
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
92 if( !ste.getMethodName().equals("doCall") )
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
93 i++;
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
94 }
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
95 return list;
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
96 }
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
97
772
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
98 public static String toString(StackTraceElement ste) {
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
99 StringBuilder sb = new StringBuilder();
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
100 sb.append( ste.getFileName() ).append( " line " ).append( ste.getLineNumber() );
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
101 String method = ste.getMethodName();
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
102 if( !method.equals("doCall") )
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
103 sb.append( " in function '" ).append( method.substring(1) ).append( "'" );
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
104 return sb.toString();
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
105 }
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
106
1125
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
107 private StringBuilder luanStackTrace() {
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
108 StringBuilder sb = new StringBuilder();
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
109 sb.append( getMessage() );
772
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
110 for( StackTraceElement ste : justLuan(getStackTrace()) ) {
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
111 sb.append( "\n\t" ).append( toString(ste) );
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
112 }
1125
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
113 return sb;
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
114 }
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
115
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
116 public String getLuanStackTraceString() {
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
117 StringBuilder sb = luanStackTrace();
682
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
118 Throwable cause = getCause();
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
119 if( cause != null )
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
120 sb.append( "\nCaused by: " ).append( getJavaStackTraceString(cause) );
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
121 return sb.toString();
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
122 }
0c334975d526 finish stack trace
Franklin Schmidt <fschmidt@gmail.com>
parents: 646
diff changeset
123
683
67dd1449e354 fix java security
Franklin Schmidt <fschmidt@gmail.com>
parents: 682
diff changeset
124 public static String currentSource() {
67dd1449e354 fix java security
Franklin Schmidt <fschmidt@gmail.com>
parents: 682
diff changeset
125 LuanException ex = new LuanException("currentSource");
772
bffbef96ca6d add public static methods to LuanException for building luan stack traces
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
126 List<StackTraceElement> st = ex.justLuan(ex.getStackTrace());
683
67dd1449e354 fix java security
Franklin Schmidt <fschmidt@gmail.com>
parents: 682
diff changeset
127 return st.isEmpty() ? null : st.get(0).getFileName();
67dd1449e354 fix java security
Franklin Schmidt <fschmidt@gmail.com>
parents: 682
diff changeset
128 }
67dd1449e354 fix java security
Franklin Schmidt <fschmidt@gmail.com>
parents: 682
diff changeset
129
1125
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
130 @Override public void printStackTrace(PrintStream s) {
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
131 s.print("Luan: ");
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
132 s.println(luanStackTrace());
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
133 s.print("Caused by: ");
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
134 super.printStackTrace(s);
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
135 }
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
136
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
137 @Override public void printStackTrace(PrintWriter s) {
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
138 s.print("Luan: ");
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
139 s.println(luanStackTrace());
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
140 s.print("Caused by: ");
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
141 super.printStackTrace(s);
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
142 }
442abdfff437 include luan stack in LuanException.printStackTrace()
Franklin Schmidt <fschmidt@gmail.com>
parents: 1122
diff changeset
143
1
2df768b926aa start Luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
144 }