- public abstract Object get(Object key) throws JS.Exn;
- public abstract void put(Object key, Object val) throws JS.Exn;
- public abstract Object[] keys();
-
- public Number coerceToNumber() { throw new Error("you cannot coerce a " + this.getClass().getName() + " into a Number"); }
- public String coerceToString() { throw new Error("you cannot coerce a " + this.getClass().getName() + " into a String"); }
- public boolean coerceToBoolean() { throw new Error("you cannot coerce a " + this.getClass().getName() + " into a Boolean"); }
-
-
- // Subclasses /////////////////////////////////////////////////////////////////////////
-
- public static class Obj extends JS {
- private Hash entries = new Hash();
- private boolean sealed = false;
- public Obj() { this(false); }
- public Obj(boolean sealed) { this.sealed = sealed; }
- public void setSeal(boolean sealed) { this.sealed = sealed; }
- public Object get(Object key) { return entries.get(key); }
- public void put(Object key, Object val) { if (!sealed) entries.put(key, val); }
- public Object[] keys() { return(entries.keys()); }
- }
-
- public static class Exn extends RuntimeException {
- private Object js = null;
- public Exn(Object js) { this.js = js; }
- public String toString() { return "JS.Exn: " + js.toString(); }
- public String getMessage() { return toString(); }
- public Object getObject() { return js; }
- }
-
- public static class Array extends Obj {
- private Vec vec = new Vec();
- private static int intVal(Object o) {
- if (o instanceof Number) {
- int intVal = ((Number)o).intValue();
- if (intVal == ((Number)o).doubleValue()) return intVal;
- return Integer.MIN_VALUE;
- }
- if (!(o instanceof String)) return Integer.MIN_VALUE;
- String s = (String)o;
- for(int i=0; i<s.length(); i++) if (s.charAt(i) < '0' || s.charAt(i) > '9') return Integer.MIN_VALUE;
- return Integer.parseInt(s);
- }
- public Object get(Object key) throws JS.Exn {
- // FIXME: HACK!
- if (key.equals("cascade")) return org.xwt.Trap.cascadeFunction;
- if (key.equals("trapee")) return org.xwt.Trap.currentTrapee();
- if (key.equals("length")) return new Long(vec.size());
- int i = intVal(key);
- if (i == Integer.MIN_VALUE) return super.get(key);
- try {
- return vec.elementAt(i);
- } catch (ArrayIndexOutOfBoundsException e) {
- throw new JS.Exn(e.getMessage());
- }
- }
- public void put(Object key, Object val) {
- if (key.equals("length")) vec.setSize(Parser.toNumber(val).intValue());
- int i = intVal(key);
- if (i == Integer.MIN_VALUE) super.put(key, val);
- else {
- if (i >= vec.size()) vec.setSize(i+1);
- vec.setElementAt(val, i);
- }
- }
- public Object[] keys() {
- Object[] sup = super.keys();
- Object[] ret = new Object[vec.size() + 1 + sup.length];
- System.arraycopy(sup, 0, ret, vec.size(), sup.length);
- for(int i=0; i<vec.size(); i++) ret[i] = new Integer(i);
- ret[vec.size()] = "length";
- return ret;
- }
- public int length() { return vec.size(); }
- public Object elementAt(int i) { return vec.elementAt(i); }
- public void addElement(Object o) { vec.addElement(o); }
- public void setElementAt(Object o, int i) { vec.setElementAt(o, i); }
- }
-
- public static Hashtable currentFunction = new Hashtable();
- public static abstract class Function extends Obj {
- public abstract Object _call(JS.Array args) throws JS.Exn;
- public String getSourceName() throws JS.Exn { return "unknown"; }
- public final Object call(JS.Array args) throws JS.Exn { return _call(args); }
- }
-
- public static class Script extends Function {
- Vector e = null;
- private Script(Vector e) { this.e = e; }
- public String getSourceName() throws JS.Exn { return ((Parser.Expr)e.elementAt(0)).sourceName; }
- public Object _call(JS.Array args) throws JS.Exn {
- Scope rootScope = (Scope)args.elementAt(0);
- Function saved = (Function)currentFunction.get(Thread.currentThread());
- currentFunction.put(Thread.currentThread(), this);
- try {
- for(int i=0; i<e.size(); i++)
- ((Parser.Expr)e.elementAt(i)).eval(rootScope);
- } catch (Parser.ReturnException e) {
- // ignore
- } catch (Parser.ControlTransferException e) {
- throw new JS.Exn("block threw a ControlTransferException: " + e);
- } finally {
- if (saved == null) currentFunction.remove(Thread.currentThread());
- else currentFunction.put(Thread.currentThread(), saved);
- }
- return null;
- }
- public static Script parse(Reader r, String sourceName, int line) throws IOException {
- Parser p = new Parser(r, sourceName, line);
- try {
- Vector exprs = new Vector();
- while(true) {
- Parser.Expr ret = p.parseBlock(false);
- if (ret == null || (ret.code == Parser.LC && ret.left == null)) break;
- exprs.addElement(ret);
- }
- return new Script(exprs);
- } catch (Exception e) {
- if (Log.on) Log.log(Parser.class, e);
- return null;
- }
- }
- }
-
- /** Any object which becomes part of the scope chain must support this interface */
- public static class Scope extends Obj {
- private Scope parentScope;
- private static Object NULL = new Object();
- public Scope(Scope parentScope) { this(parentScope, false); }
- public Scope(Scope parentScope, boolean sealed) { super(sealed); this.parentScope = parentScope; }
- public Scope getParentScope() { return parentScope; }
-
- // transparent scopes are not returned by THIS
- public boolean isTransparent() { return false; }
-
- public boolean has(Object key) { return super.get(key) != null; }
- public Object get(Object key) {
- if (!has(key)) return parentScope == null ? null : getParentScope().get(key);
- Object ret = super.get(key); return ret == NULL ? null : ret;
- }
- public void put(Object key, Object val) {
- if (!has(key) && parentScope != null) getParentScope().put(key, val);
- else super.put(key, val == null ? NULL : val);
- }
- public Object[] keys() { throw new Error("you can't enumerate the properties of a Scope"); }
- public void declare(String s) { if (isTransparent()) getParentScope().declare(s); else super.put(s, NULL);}
- }
-
+ // this gets around a wierd fluke in the Java type checking rules for ?..:
+ public static final Object T = Boolean.TRUE;
+ public static final Object F = Boolean.FALSE;
+
+ public static final Boolean B(boolean b) { return b ? Boolean.TRUE : Boolean.FALSE; }
+ public static final Boolean B(int i) { return i==0 ? Boolean.FALSE : Boolean.TRUE; }
+ public static final Number N(String s) { return s.indexOf('.') == -1 ? N(Integer.parseInt(s)) : new Double(s); }
+ public static final Number N(double d) { return (int)d == d ? N((int)d) : new Double(d); }
+ public static final Number N(long l) { return N((int)l); }
+
+ private static final Integer[] smallIntCache = new Integer[65535 / 4];
+ private static final Integer[] largeIntCache = new Integer[65535 / 4];
+ public static final Number N(int i) {
+ Integer ret = null;
+ int idx = i + smallIntCache.length / 2;
+ if (idx < smallIntCache.length && idx > 0) {
+ ret = smallIntCache[idx];
+ if (ret != null) return ret;
+ }
+ else ret = largeIntCache[Math.abs(idx % largeIntCache.length)];
+ if (ret == null || ret.intValue() != i) {
+ ret = new Integer(i);
+ if (idx < smallIntCache.length && idx > 0) smallIntCache[idx] = ret;
+ else largeIntCache[Math.abs(idx % largeIntCache.length)] = ret;
+ }
+ return ret;
+ }
+
+ private static Enumeration emptyEnumeration = new Enumeration() {
+ public boolean hasMoreElements() { return false; }
+ public Object nextElement() { throw new NoSuchElementException(); }
+ };
+
+ private Hash entries = null;
+
+ public static JS fromReader(String sourceName, int firstLine, Reader sourceCode) throws IOException {
+ return JSFunction._fromReader(sourceName, firstLine, sourceCode);
+ }