UnwrapLeft, error reporting improvements
[sbp.git] / src / edu / berkeley / sbp / ParseFailed.java
1 // Copyright 2006 all rights reserved; see LICENSE file for BSD-style license
2
3 package edu.berkeley.sbp;
4 import edu.berkeley.sbp.*;
5 import edu.berkeley.sbp.Sequence.Position;
6 import edu.berkeley.sbp.GSS.Phase;
7 import edu.berkeley.sbp.Node;
8 import edu.berkeley.sbp.util.*;
9 import java.io.*;
10 import java.util.*;
11
12 /** thrown when the parser arrives at a state from which it is clear that no valid parse can result */
13 public class ParseFailed extends Exception {
14
15     private final Input.Location location;
16     private final Input.Region region;
17     private final Input input;
18     private final String message;
19     private final GSS gss;
20     ParseFailed() { this("", null, null, null); }
21     ParseFailed(String message, Input.Region region, Input input, GSS gss) {
22         this.region = region;
23         this.location = region.getStart();
24         this.message = message;
25         this.input = input;
26         this.gss = gss;
27     }
28     public Input.Location getLocation() { return location; }
29     private Input.Region getRegion() { return region; }
30     public String toString() {
31         StringBuilder ret = new StringBuilder();
32         ret.append(message);
33         ret.append('\n');
34         return ret.toString();
35     }
36
37     private static boolean important(Position p) {
38         if (p.isLast()) return false;
39         if (p.element() == null) return false;
40         if (!(p.element() instanceof Union)) return false;
41         Union u = (Union)p.element();
42         if (u.isSynthetic()) return false;
43         if (u.getName()==null) return false;
44         if (u.getName().length() == 0) return false;
45         char c = u.getName().charAt(0);
46         return (c >= 'A' && c <= 'Z');
47     }
48
49     static <Tok> void barf(HashMap<Element,Input.Location> sb, Node n, int indent, boolean skip, int count, Input.Location loc) {
50         if (count <= 0) {
51             barf(sb, n, indent, skip, loc);
52         } else {
53             /*
54               FIXME: removed
55             for(Node nn : (Iterable<Node>)n.parents())
56                 barf(sb, nn, indent, skip, count-1, n.phase().getLocation());
57             */
58         }
59     }
60     static <Tok> void barf(HashMap<Element,Input.Location> sb, Node n, int indent, boolean skip, Input.Location loc) {
61         if (touched.contains(n)) return;
62         touched.add(n);
63         String s = "";
64         for(int i=0; i< indent; i++) s += " ";
65         Node parent = n;
66         boolean done = false;
67         boolean alldone = false;
68         boolean go = false;
69         boolean force = false;
70         for(Position p : (Iterable<Position>)parent.state()) {
71             if (skip) p = p.next();
72             int raise = 0;
73             done = false;
74             while(p != null) {
75                 if (p.isLast()) break;
76                 if (important(p)) {
77                     Input.Location l = sb.get(p.element());
78                     if (l == null || l.compareTo(loc) < 0)
79                         sb.put(p.element(), loc);
80                     done = true;
81                     alldone = true;
82                 }
83                 /*
84                else if (p.pos-raise > 0)
85                     barf(sb, n, indent, false, 1);
86                 if (!new Grammar(null, null).possiblyEpsilon(p.element()))
87                     break;
88                 */
89                 p = p.next();
90                 raise++;
91                 if (p.isLast()) {
92                     if (!done) barf(sb, n, indent, true, 1, loc);
93                     break;
94                 }
95             }
96         }
97         if (!alldone) barf(sb, n, indent, false, 1, loc);
98     }
99
100
101
102     // FIXME
103     private static HashSet<Node> touched = new HashSet<Node>();
104     static <Tok> void complain(Node n, HashMap<String,HashSet<String>> errors, boolean force, int indent) {
105         if (touched.contains(n)) return;
106         touched.add(n);
107         for(Position p : (Iterable<Position>)n.state()) {
108             //if (!p.isLast() && !p.next().isLast()) continue;
109             if (((p.isFirst() || p.isLast()) && !force)/* || p.owner().name==null*/ ||
110                 !important(p)) {
111             /*
112               FIXME: removed
113                 for(Node n2 : n.parents())
114                     complain(n2, errors, force
115                     //| p.isFirst()
116                 , indent);
117             */
118             } else {
119                 String seqname = p.owner()/*.name*/+"";
120                 HashSet<String> hs = errors.get(seqname);
121                 if (hs==null) errors.put(seqname, hs = new HashSet<String>());
122                 String s = "";
123                 hs.add(" "+p.element()+"");
124             }
125         }
126     }
127
128     static String el(Object e) {
129         String s = e.toString();
130         if (s.length()==0 || s.charAt(0)!='\"' || s.charAt(s.length()-1)!='\"') return ANSI.yellow(s);
131         s = s.substring(1);
132         s = s.substring(0, s.length()-1);
133         StringBuffer ret = new StringBuffer();
134         for(int i=0; i<s.length(); i++) {
135             if (s.charAt(i)=='\\' && i<s.length()-1) ret.append(s.charAt(++i));
136             else ret.append(s);
137         }
138         return ANSI.purple(ret.toString());
139     }
140
141     static void error(String message, GSS.Phase phase, Object token, Input.Region region) throws ParseFailed {
142         error(message,
143               token,
144               phase,
145               region,
146               phase.getGSS().getInput(),
147               phase.getGSS());
148     }
149     private static void error(String message,
150                               Object token,
151                               Iterable<Node> nodes,
152                               Input.Region region,
153                               Input input,
154                               GSS gss) throws ParseFailed{
155         String lookAhead = token==null ? "<EOF>" : token.toString();
156         StringBuffer ret = new StringBuffer();
157         ret.append(ANSI.bold(ANSI.red(message)));
158         String toks = token+"";
159         ret.append(" at ");
160         ret.append(ANSI.yellow(region+""));
161         if (input != null) {
162             ret.append('\n');
163             ret.append("     text: ");
164             int budget = 60;
165             String second = input.showRegion(region, 60);
166             budget -= second.length();
167             Input.Location after = region.getEnd();
168             for(int i=0; i<10; i++) after = after.next() == null ? after : after.next();
169             String third = input.showRegion(region.getEnd().createRegion(after), 60);
170             budget -= third.length();
171             Input.Location before = region.getStart();
172             for(int i=0; i<budget; i++) before = before.prev() == null ? before : before.prev();
173             String first = input.showRegion(before.createRegion(region.getStart()), 60);
174             ret.append(ANSI.cyan(first));
175             ret.append(ANSI.invert(ANSI.red(second)));
176             ret.append(ANSI.cyan(third));
177             /*
178             ret.append('\n');
179             ret.append("           ");
180             for(int i=0; i<first.length(); i++) ret.append(' ');
181             for(int i=0; i<second.length(); i++) ret.append(ANSI.red("^"));
182             */
183         }
184         HashMap<Element,Input.Location> hm = new HashMap<Element,Input.Location>();
185         for(Node no : nodes)
186             barf(hm, no, 0, false, region.getStart());
187         ret.append("\n expected: ");
188         Set<Element> hs = hm.keySet();
189         if (hs.size() == 1) {
190             ret.append(hs.iterator().next());
191         } else {
192             int i=0;
193             for(Element s : hs) {
194                 Input.Location loc2 = hm.get(s);
195                 if (i==0) {
196                     ret.append("" + ANSI.purple(s));
197                 } else {
198                     ret.append("\n        or " + ANSI.purple(s));
199                 }
200                 Input.Region reg = loc2.createRegion(region.getEnd());
201                 ret.append(" to match \"" + ANSI.cyan(input.showRegion(reg, 60)) + "\" at " + ANSI.yellow(reg));
202                 i++;
203             }
204         }
205         /*
206         ret.append("\n  The author of SBP apologizes for the these nearly-useless error messages:\n\n");
207         HashMap<String,HashSet<String>> errors = new HashMap<String,HashSet<String>>();
208         for(Node n : nodes) {
209             //System.out.println(n.state);
210             complain(n, errors, false, 0);
211         }
212         for(String s : errors.keySet()) {
213             ret.append("    while parsing " + ANSI.yellow(s));
214             HashSet<String> hs = errors.get(s);
215
216             if (hs.size()==1) ret.append("\n      expected " + ANSI.yellow(el(hs.iterator().next())) + "\n\n");
217             else {
218                 ret.append("\n      expected ");
219                 boolean first = true;
220                 for(String s2 : hs) {
221                     if (!first) ret.append(" or ");
222                     first = false;
223                     ret.append(ANSI.yellow(el(s2)));
224                 }
225                 ret.append("\n\n");
226             }
227         }
228         */
229         throw new ParseFailed(ret.toString(), region, input, gss);
230     }
231
232 }