checkpoint
[sbp.git] / src / edu / berkeley / sbp / misc / CharToken.java
index 8804fee..9067d14 100644 (file)
@@ -4,51 +4,11 @@ import java.util.*;
 import java.lang.reflect.*;
 import java.lang.ref.*;
 import edu.berkeley.sbp.*;
-import edu.berkeley.sbp.*;
+import edu.berkeley.sbp.Token.Location;
 import edu.berkeley.sbp.util.*;
-import edu.berkeley.sbp.*;
 
 /** an implementation of Token for streams of Java <tt>char</tt> values */
-public class CharToken implements Token, IntegerTopology.IntegerMappable {
-
-    // Public //////////////////////////////////////////////////////////////////////////////
-
-    public static class CharToStringParser extends Parser<CharToken,String> {
-        public CharToStringParser(Union u) { super(u); }
-        public Topology<CharToken> top() { return new IntegerTopology<CharToken>(); }
-        public Forest<String> shiftedToken(CharToken ct, Token.Location loc) {
-            return Forest.create(loc, ct.result(), null, null, false, false);
-        }
-    }
-
-    public static class CharRange extends Atom<CharToken> {
-        private String esc(char c) { return StringUtil.escapify(c+"", "[]-~\\\"\'"); }
-        private Topology<CharToken> t;
-        public CharRange(Topology<CharToken> t) { this.t = t; }
-        public Topology<CharToken> top() { return t; }
-        public String toString() {
-            StringBuffer sb = new StringBuffer();
-            sb.append('[');
-            Range.Set ranges = ((IntegerTopology)top()).getRanges();
-            if (ranges.size() == -1 || ranges.size() > Character.MAX_VALUE/2) {
-                sb.append('~');
-                ranges = ranges.complement();
-            }
-            ranges = ranges.intersect(all);
-            for(Range r : ranges) {
-                if (r.isMinNegInf() || r.isMaxPosInf()) throw new Error("should not happen");
-                if (r.getMin()==r.getMax()) {
-                    sb.append(esc((char)r.getMin()));
-                } else{
-                    sb.append(esc((char)r.getMin()));
-                    sb.append('-');
-                    sb.append(esc((char)r.getMax()));
-                }
-            }
-            sb.append(']');
-            return sb.toString();
-        }
-    }
+public class CharToken implements IntegerMappable {
 
     /** returns an element matching all characters between <tt>start</tt> and <tt>end</tt>, inclusive */
     public static Atom positiveRange(char start, char end) {
@@ -64,8 +24,8 @@ public class CharToken implements Token, IntegerTopology.IntegerMappable {
     public static final Atom rightBrace = new CharRange(new IntegerTopology<CharToken>(9999)) { public String toString() { return "}"; } };
     public static final CharToken left       = new CharToken((char)9998);
     public static final CharToken right      = new CharToken((char)9999);
-
-    private static final Range.Set all = new Range.Set(new Range(0, Character.MAX_VALUE));
+    
+    static final Range.Set all = new Range.Set(new Range(0, Character.MAX_VALUE));
     public  static final Atom      any = new CharRange(new IntegerTopology<CharToken>(all));
     public  static final Atom     none = new CharRange(new IntegerTopology<CharToken>());
     public static IntegerTopology<CharToken> range(Range r) { return new IntegerTopology<CharToken>(r); }
@@ -108,76 +68,24 @@ public class CharToken implements Token, IntegerTopology.IntegerMappable {
 
     public int toInt() { return (int)c; }
 
-    // Statics //////////////////////////////////////////////////////////////////////////////
-
-    public static class CartesianLocation implements Location {
-        public final int line;
-        public final int col;
-        public String toString()            { return line + ":" + col; }
-        public CartesianLocation(int line, int col) { this.line = line; this.col = col; }
-    }
-    
-    /** an implementation of Token.Stream for sequences of characters */
-    public static class Stream implements Token.Stream {
-        private final String message;
+    public static class Stream extends CartesianInput<CharToken> {
         private final Reader r;
-        private int line  = 1;
-        private int col   = 1;
-
+        
         public Stream(String s)                { this(new StringReader(s)); }
-
         public Stream(Reader r)                { this(r, null); }
-        public Stream(Reader r,      String s) { this.r = r; this.message = s; }
-
+        public Stream(Reader r,      String s) { this.r = r; }
         public Stream(InputStream i)           { this(i, null); }
         public Stream(InputStream i, String s) { this(new InputStreamReader(i), s); }
 
-        private Line currentLine = new Line();
-        private class Line {
-            public StringBuffer line = new StringBuffer();
-        }
-
-        private class LocWrap implements Location {
-            Line myline = Stream.this.currentLine;
-            public final int line;
-            public final int col;
-            public String toString()            { return line + ":" + col; }
-            public LocWrap(int line, int col) { this.line = line; this.col = col; }
-            public String getContext() {
-                StringBuffer spaces = new StringBuffer();
-                for(int i=0; i<col-1; i++) spaces.append(' ');
-                spaces.append('^');
-                return "  " + myline.line.toString() + "\n  " + spaces.toString();
-            }
-        }
-
-        long then = 0;
-        private Token.Location location = new LocWrap(1, 1);
-        public Token.Location getLocation() { return location; }
-        public Token next() throws IOException {
+        boolean cr = false;
+        public boolean   isCR() { return cr; }
+        public CharToken next() throws IOException {
+            cr = false;
             int i = r.read();
             if (i==-1) return null;
             char c = (char)i;
-            location = new LocWrap(line, col);
-            Token ret = new CharToken(c);
-            String s = line + "";
-            while(s.length() < 4) s = " " + s;
-            s = "line "+s+", col " + col;
-            long now = System.currentTimeMillis();
-            if (now-then > 10) {
-                then = now;
-                System.out.print("  "+(message==null?"":message)+" " + s + "                                                                      \r");
-            }
-            if (c=='\n') { 
-                currentLine = new Line();
-                line++;
-                col = 1;
-            } else {
-                currentLine.line.append(c);
-                col++;
-            }
-            return ret;
+            cr = c=='\n';
+            return new CharToken(c);
         }
     }
-
 }