src/edu/berkeley/sbp/chr/CharInput.java

   1 // Copyright 2006 all rights reserved; see LICENSE file for BSD-style license
   2
   3 package edu.berkeley.sbp.chr;
   4 import java.io.*;
   5 import java.util.*;
   6 import java.lang.reflect.*;
   7 import java.lang.ref.*;
   8 import edu.berkeley.sbp.*;
   9 import edu.berkeley.sbp.util.*;
  10 import edu.berkeley.sbp.misc.*;
  11 import edu.berkeley.sbp.Input.Location;
  12
  13 public class CharInput extends Cartesian.Input<Character> {
  14
  15     private static class RollbackReader extends Reader {
  16         private final Reader r;
  17         public RollbackReader(Reader r) { this.r = r; }
  18
  19         private char[] queue = new char[1024];
  20         private int head = 0;
  21         private int tail = 0;
  22
  23         private void unread(char c) {
  24             if (tail >= queue.length) {
  25                 if (tail - head > queue.length/2) {
  26                     char[] queue2 = new char[queue.length * 2];
  27                     System.arraycopy(queue, head, queue2, 0, tail-head);
  28                 } else {
  29                     System.arraycopy(queue, head, queue, 0, tail-head);
  30                 }
  31                 tail = tail-head;
  32                 head = 0;
  33             }
  34             queue[tail++] = c;
  35         }
  36
  37         public void close() throws IOException { r.close(); }
  38         public int read() throws IOException {
  39             if (tail>head)
  40                 return queue[head++];
  41             return r.read();
  42         }
  43         public int read(char cbuf[]) throws IOException { return read(cbuf, 0, cbuf.length); }
  44         public int read(char cbuf[], int off, int len) throws IOException {
  45             if (tail>head) {
  46                 int count = Math.min(len, tail-head);
  47                 System.arraycopy(queue, head, cbuf, off, count);
  48                 head += count;
  49                 return count;
  50             }
  51             return r.read(cbuf, off, len);
  52         }
  53         public long skip(long n) throws IOException { return r.skip(n); }
  54         public boolean ready() throws IOException { return true; }
  55         public boolean markSupported() { return false; }
  56         public void mark(int readAheadLimit) throws IOException { throw new IOException("not supported"); }
  57         public void reset() throws IOException { throw new IOException("not supported"); }
  58     }
  59
  60     private final RollbackReader r;
  61
  62     public CharInput(String s)                { this(new StringReader(s)); }
  63     public CharInput(Reader r)                { this(r, null); }
  64     public CharInput(Reader r,      String s) { this.r = new RollbackReader(new BufferedReader(r)); }
  65     public CharInput(InputStream i)           { this(i, null); }
  66     public CharInput(InputStream i, String s) { this(new InputStreamReader(i), s); }
  67
  68     public CharInput(InputStream i, String s, boolean indent) {
  69         this(new InputStreamReader(i), s);
  70         this.indent = indent;
  71     }
  72
  73     boolean cr = false;
  74     boolean indent = false;
  75     private int count = 0;
  76     private StringBuilder cache = new StringBuilder();
  77
  78     public void setCacheEnabled(boolean enabled) {
  79         if (!enabled) cache = null;
  80         else if (cache == null) cache = new StringBuilder();
  81     }
  82
  83     int indentation = -1;
  84     int lastIndentation = 0;
  85     int delta = 0;
  86
  87     public boolean   isCR() { return cr; }
  88     public Character _next() throws IOException {
  89         Character ret = __next();
  90         if (ret==null) return null;
  91         char c = ret.charValue();
  92         if (indent) {
  93             if (ret==CharAtom.left)  System.out.print("\033[31m{\033[0m");
  94             else if (ret==CharAtom.right) System.out.print("\033[31m}\033[0m");
  95             else System.out.print(c+"");
  96         }
  97         return ret;
  98     }
  99     public Character __next() throws IOException {
 100
 101         cr = false;
 102
 103         int i = r.read();
 104         if (i==-1) {
 105             if (indent && indentation >= 0) {
 106                 redent(indentation - lastIndentation);
 107                 lastIndentation = indentation;
 108                 indentation = -1;
 109                 return __next();
 110             }
 111             return null;
 112         }
 113         char c = (char)i;
 114         if (cache != null) cache.append(c);
 115         cr = c=='\n';
 116
 117         if (indent)
 118             if (cr && ignore) {
 119                 ignore = false;
 120             } else if (cr) {
 121                 while(true) {
 122                     indentation = 0;
 123                     do { i = r.read(); if (i==' ') indentation++; } while (i==' ');
 124                     if (i=='\n') { /* FIXME */ continue; }
 125                     if (i==-1) { /* FIXME */ }
 126                      if (indentation - lastIndentation > 0) {
 127                         r.unread('\n');
 128                         for(int j=0; j<indentation; j++) r.unread(' ');
 129                         redent(indentation - lastIndentation);
 130                     } else {
 131                         redent(indentation - lastIndentation);
 132                         r.unread('\n');
 133                         for(int j=0; j<indentation; j++) r.unread(' ');
 134                     }
 135                     if (i != -1) r.unread((char)i);
 136                     ignore = true;
 137                     break;
 138                 }
 139                 lastIndentation = indentation;
 140                 indentation = -1;
 141                 return __next();
 142             }
 143
 144         return c;
 145     }
 146
 147     private boolean ignore = false;
 148
 149     private void redent(int i) {
 150         if (i<0) { r.unread(CharAtom.right); redent(i+1); return; }
 151         if (i>0) { r.unread(CharAtom.left); redent(i-1); return; }
 152     }
 153
 154     public String showRegion(Region<Character> rc) {
 155         if (cache == null) return null;
 156         Cartesian.Region r = (Cartesian.Region)rc;
 157         int start = r.getStart().getScalar()+1;
 158         int end = r.getEnd().getScalar()+1;
 159         if (start < 0) start = 0;
 160         if (end < start) end = start;
 161         if (end > cache.length()) end = cache.length();
 162         String ret;
 163         if (end-start < 60) ret = cachesubstring(start, end);
 164         else ret = cachesubstring(start, start+25) +
 165                  "..." +
 166                  cachesubstring(end-25, end);
 167         return StringUtil.escapify(ret, "\n\r");
 168     }
 169
 170     private String cachesubstring(int start, int end) {
 171         if (start < 0) start = 0;
 172         if (end < 0)   end = 0;
 173         if (start >= cache.length()) start = cache.length();
 174         if (end >= cache.length()) end = cache.length();
 175         return cache.substring(start, end);
 176     }
 177
 178 }