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

   1 // Copyright 2006-2007 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(Reader r,      String s) {
  63         this.name = s;
  64         this.r = new RollbackReader(new BufferedReader(r));
  65     }
  66     public CharInput(String s)                  { this(new StringReader(s)); }
  67     public CharInput(Reader r)                  { this(r, null); }
  68     public CharInput(InputStream i)             { this(i, null); }
  69     public CharInput(InputStream i, String s)   { this(new InputStreamReader(i), s); }
  70     public CharInput(File f) throws IOException { this(new FileInputStream(f), f.getName()); }
  71
  72     public CharInput(InputStream i, String s, boolean indent) {
  73         this(new InputStreamReader(i), s);
  74         this.indent = indent;
  75     }
  76     public String getName() { return name; }
  77
  78     private String name;
  79     boolean cr = false;
  80     boolean indent = false;
  81     private int count = 0;
  82     private StringBuilder cache = new StringBuilder();
  83
  84     public void setCacheEnabled(boolean enabled) {
  85         if (!enabled) cache = null;
  86         else if (cache == null) cache = new StringBuilder();
  87     }
  88
  89     int indentation = -1;
  90     int lastIndentation = 0;
  91     int delta = 0;
  92
  93     public boolean   isCR() { return cr; }
  94     public Character _next() throws IOException {
  95         Character ret = __next();
  96         if (ret==null) return null;
  97         char c = ret.charValue();
  98         return ret;
  99     }
 100     public Character __next() throws IOException {
 101
 102         cr = false;
 103
 104         int i = r.read();
 105         if (i==-1) {
 106             if (indent && indentation >= 0) {
 107                 redent(indentation - lastIndentation);
 108                 lastIndentation = indentation;
 109                 indentation = -1;
 110                 return __next();
 111             }
 112             return null;
 113         }
 114         char c = (char)i;
 115         if (cache != null) cache.append(c);
 116         cr = c=='\n';
 117
 118         if (indent)
 119             if (cr && ignore) {
 120                 ignore = false;
 121             } else if (cr) {
 122                 while(true) {
 123                     indentation = 0;
 124                     do { i = r.read(); if (i==' ') indentation++; } while (i==' ');
 125                     if (i=='\n') { /* FIXME */ continue; }
 126                     if (i==-1) { /* FIXME */ }
 127                      if (indentation - lastIndentation > 0) {
 128                         r.unread('\n');
 129                         for(int j=0; j<indentation; j++) r.unread(' ');
 130                         redent(indentation - lastIndentation);
 131                     } else {
 132                         redent(indentation - lastIndentation);
 133                         r.unread('\n');
 134                         for(int j=0; j<indentation; j++) r.unread(' ');
 135                     }
 136                     if (i != -1) r.unread((char)i);
 137                     ignore = true;
 138                     break;
 139                 }
 140                 lastIndentation = indentation;
 141                 indentation = -1;
 142                 return __next();
 143             }
 144
 145         return c;
 146     }
 147
 148     private boolean ignore = false;
 149
 150     private void redent(int i) {
 151         if (i<0) { r.unread(CharAtom.right); redent(i+1); return; }
 152         if (i>0) { r.unread(CharAtom.left); redent(i-1); return; }
 153     }
 154
 155     public String showRegion(Region<Character> rc, int maxLength) {
 156         if (cache == null) return null;
 157         Cartesian.Region r = (Cartesian.Region)rc;
 158         int start = r.getStart().getScalar();
 159         int end = r.getEnd().getScalar();
 160         if (start < 0) start = 0;
 161         if (end < start) end = start;
 162         if (end > cache.length()) end = cache.length();
 163         String ret;
 164         if (end-start < maxLength) ret = cachesubstring(start, end);
 165         else ret = cachesubstring(start, start+(maxLength/2-5)) +
 166                  "..." +
 167                  cachesubstring(end-(maxLength/2-5), end);
 168         return StringUtil.escapify(ret, "\n\r\t");
 169     }
 170
 171     private String cachesubstring(int start, int end) {
 172         if (start < 0) start = 0;
 173         if (end < 0)   end = 0;
 174         if (start >= cache.length()) start = cache.length();
 175         if (end >= cache.length()) end = cache.length();
 176         return cache.substring(start, end);
 177     }
 178
 179     public void close() { }
 180 }