Mercurial Hosting > luan
annotate src/luan/LuanException.java @ 1255:4f571a974132
replace Thread.schedule with Thread.once and Thread.repeating
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Mon, 03 Sep 2018 06:13:55 -0600 |
parents | 442abdfff437 |
children | 9fa8b8389578 |
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 | 6 import java.util.List; |
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 | 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 | 23 } |
24 | |
25 private LuanException(String msg,Throwable cause,int nonsense) { | |
26 super(msg,cause); | |
27 } | |
28 | |
784
6a7c6879158d
revert shallowClone()
Franklin Schmidt <fschmidt@gmail.com>
parents:
783
diff
changeset
|
29 @Override public LuanException shallowClone() { |
689 | 30 return new LuanException(getMessage(),getCause(),99); |
31 } | |
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 | 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 | 38 public LuanTable table() { |
783 | 39 if( table==null ) { |
40 table = new LuanTable(); | |
41 table.rawPut( "java", this ); | |
42 LuanTable metatable = new LuanTable(); | |
43 table.setMetatable(metatable); | |
44 try { | |
45 table.rawPut( "get_message", new LuanJavaFunction( | |
46 LuanException.class.getMethod( "getMessage" ), this | |
47 ) ); | |
48 table.rawPut( "throw", new LuanJavaFunction( | |
49 LuanException.class.getMethod( "throwThis" ), this | |
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 | 54 table.rawPut( "get_java_stack_trace_string", new LuanJavaFunction( |
55 LuanException.class.getMethod( "getJavaStackTraceString" ), this | |
56 ) ); | |
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 | 59 ) ); |
60 } catch(NoSuchMethodException e) { | |
61 throw new RuntimeException(e); | |
62 } | |
63 } | |
689 | 64 return table; |
65 } | |
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 | 72 return getLuanStackTraceString(); |
73 } | |
74 | |
75 public String getJavaStackTraceString() { | |
76 return getJavaStackTraceString(this); | |
77 } | |
78 | |
79 private static String getJavaStackTraceString(Throwable th) { | |
645 | 80 StringWriter sw = new StringWriter(); |
682 | 81 th.printStackTrace(new PrintWriter(sw)); |
645 | 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 | 86 List<StackTraceElement> list = new ArrayList<StackTraceElement>(); |
87 for( int i=0; i<orig.length; i++ ) { | |
88 StackTraceElement ste = orig[i]; | |
89 if( !ste.getClassName().startsWith("luan.impl.EXP") ) | |
90 continue; | |
91 list.add(ste); | |
92 if( !ste.getMethodName().equals("doCall") ) | |
93 i++; | |
94 } | |
95 return list; | |
96 } | |
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 | 108 StringBuilder sb = new StringBuilder(); |
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 | 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 | 118 Throwable cause = getCause(); |
119 if( cause != null ) | |
120 sb.append( "\nCaused by: " ).append( getJavaStackTraceString(cause) ); | |
121 return sb.toString(); | |
122 } | |
123 | |
683 | 124 public static String currentSource() { |
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 | 127 return st.isEmpty() ? null : st.get(0).getFileName(); |
128 } | |
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 } |