propose-patch
[org.ibex.core.git] / src / org / xwt / js / JS.java
index ce48cb5..e0451c9 100644 (file)
@@ -1,27 +1,88 @@
-// Copyright 2003 Adam Megacz, see the COPYING file for licensing [GPL] 
-
+// Copyright 2004 Adam Megacz, see the COPYING file for licensing [GPL] 
 package org.xwt.js; 
+
 import org.xwt.util.*; 
+import org.xwt.*; 
 import java.io.*;
 import java.util.*;
 
-/**
- *  The public API for the JS engine.  JS itself is actually a class
- *  implementing the absolute minimal amount of functionality for an
- *  Object which can be manipulated by JavaScript code.  The static
- *  methods, fields, and inner classes of JS define the publicly
- *  visible API for the XWT JavaScript engine; code outside this
- *  package should never depend on anything not defined in this file.
- */
-public abstract class JS { 
-
-    // Public Helper Methods //////////////////////////////////////////////////////////////////////
-
-    /** parse and compile a function */
-    public static CompiledFunction parse(String sourceName, int firstLine, Reader sourceCode) throws IOException {
-        return new CompiledFunction(sourceName, firstLine, sourceCode, null);
+/** The minimum set of functionality required for objects which are manipulated by JavaScript */
+public class JS extends org.xwt.util.BalancedTree { 
+
+    public static final Object METHOD = new Object();
+    public final JS unclone() { return _unclone(); }
+    public Enumeration keys() throws JSExn { return entries == null ? emptyEnumeration : entries.keys(); }
+    public Object get(Object key) throws JSExn { return entries == null ? null : entries.get(key, null); }
+    public void put(Object key, Object val) throws JSExn { (entries==null?entries=new Hash():entries).put(key,null,val); }
+    public Object callMethod(Object method, Object a0, Object a1, Object a2, Object[] rest, int nargs) throws JSExn {
+        throw new JSExn("attempted to call the null value (method "+method+")");
+    }    
+    public Object call(Object a0, Object a1, Object a2, Object[] rest, int nargs) throws JSExn {
+        throw new JSExn("you cannot call this object (class=" + this.getClass().getName() +")");
+    }
+
+    JS _unclone() { return this; }
+    public static class Cloneable extends JS {
+        public Cloneable() { }
+        public Object jsclone() throws JSExn {
+            return new Clone(this);
+        }
+    }
+
+    public static class Clone extends JS.Cloneable {
+        protected JS.Cloneable clonee = null;
+        JS _unclone() { return clonee.unclone(); }
+        public JS.Cloneable getClonee() { return clonee; }
+        public Clone(JS.Cloneable clonee) { this.clonee = clonee; }
+        public boolean equals(Object o) {
+            if (!(o instanceof JS)) return false;
+            return unclone() == ((JS)o).unclone();
+        }
+        public Enumeration keys() throws JSExn { return clonee.keys(); }
+        public Object get(Object key) throws JSExn { return clonee.get(key); }
+        public void put(Object key, Object val) throws JSExn { clonee.put(key, val); }
+        public Object callMethod(Object method, Object a0, Object a1, Object a2, Object[] rest, int nargs) throws JSExn {
+            return clonee.callMethod(method, a0, a1, a2, rest, nargs);
+        }    
+        public Object call(Object a0, Object a1, Object a2, Object[] rest, int nargs) throws JSExn {
+            return clonee.call(a0, a1, a2, rest, nargs);
+        }
     }
 
+    // Static Interpreter Control Methods ///////////////////////////////////////////////////////////////
+
+    /** log a message with the current JavaScript sourceName/line */
+    public static void log(Object message) { info(message); }
+    public static void debug(Object message) { Log.debug(Interpreter.getSourceName() + ":" + Interpreter.getLine(), message); }
+    public static void info(Object message) { Log.info(Interpreter.getSourceName() + ":" + Interpreter.getLine(), message); }
+    public static void warn(Object message) { Log.warn(Interpreter.getSourceName() + ":" + Interpreter.getLine(), message); }
+    public static void error(Object message) { Log.error(Interpreter.getSourceName() + ":" + Interpreter.getLine(), message); }
+
+    public static class NotPauseableException extends Exception { NotPauseableException() { } }
+
+    /** returns a callback which will restart the context; expects a value to be pushed onto the stack when unpaused */
+    public static UnpauseCallback pause() throws NotPauseableException {
+        Interpreter i = Interpreter.current();
+        if (i.pausecount == -1) throw new NotPauseableException();
+        i.pausecount++;
+        return new JS.UnpauseCallback(i);
+    }
+
+    public static class UnpauseCallback implements Scheduler.Task {
+        Interpreter i;
+        UnpauseCallback(Interpreter i) { this.i = i; }
+        public void perform() throws JSExn { unpause(null); }
+        public void unpause(Object o) throws JSExn {
+            // FIXME: if o instanceof JSExn, throw it into the JSworld
+            i.stack.push(o);
+            i.resume();
+        }
+    }
+
+
+
+    // Static Helper Methods ///////////////////////////////////////////////////////////////////////////////////
+
     /** coerce an object to a Boolean */
     public static boolean toBoolean(Object o) {
         if (o == null) return false;
@@ -48,213 +109,128 @@ public abstract class JS {
 
     /** coerce an object to a Number */
     public static Number toNumber(Object o) {
-        if (o == null) return new Long(0);
+        if (o == null) return ZERO;
         if (o instanceof Number) return ((Number)o);
 
         // NOTE: There are about 3 pages of rules in ecma262 about string to number conversions
         //       We aren't even close to following all those rules.  We probably never will be.
-        if (o instanceof String) try { return new Double((String)o); } catch (NumberFormatException e) { return new Double(Double.NaN); }
-        if (o instanceof Boolean) return ((Boolean)o).booleanValue() ? new Long(1) : new Long(0);
-        if (o instanceof JS) return ((JS)o).coerceToNumber();
+        if (o instanceof String) try { return N((String)o); } catch (NumberFormatException e) { return N(Double.NaN); }
+        if (o instanceof Boolean) return ((Boolean)o).booleanValue() ? N(1) : ZERO;
         throw new Error("toNumber() got object of type " + o.getClass().getName() + " which we don't know how to handle");
     }
-    
+
     /** coerce an object to a String */
     public static String toString(Object o) {
         if(o == null) return "null";
         if(o instanceof String) return (String) o;
         if(o instanceof Integer || o instanceof Long || o instanceof Boolean) return o.toString();
-        if(o instanceof JS) return ((JS)o).coerceToString();
+        if(o instanceof JSArray) return o.toString();
+        if(o instanceof JSDate) return o.toString();
         if(o instanceof Double || o instanceof Float) {
             double d = ((Number)o).doubleValue();
             if((int)d == d) return Integer.toString((int)d);
             return o.toString();
         }
-        return o.toString();
+        throw new RuntimeException("can't coerce that!");
     }
-    
+
     // Instance Methods ////////////////////////////////////////////////////////////////////
+
+    public static final Integer ZERO = new Integer(0);
  
-    public abstract Object get(Object key) throws JS.Exn; 
-    public abstract void put(Object key, Object val) throws JS.Exn; 
-    public void put(Object key, Object val, TailCall tail) throws JS.Exn { put(key, val); }
-    public abstract Object[] keys(); 
-    public Object callMethod(Object method, Array args, boolean checkOnly) throws JS.Exn {
-       if(checkOnly) return Boolean.FALSE;
-       Object o = get(method);
-       if(o instanceof JS.Callable) {
-           return ((JS.Callable)o).call(args);
-       } else if(o == null) {
-           throw new JS.Exn("Attempted to call non-existent method: " + method);
-       } else {
-           throw new JS.Exn("Attempted to call a non-method: " +method);
-       }
+    // 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;
     }
     
-    public Number coerceToNumber() { return new Integer(0); }
-    public String coerceToString() { throw new JS.Exn("tried to coerce a JavaScript object to a String"); }
-    public boolean coerceToBoolean() { return true; }
+    private static Enumeration emptyEnumeration = new Enumeration() {
+            public boolean hasMoreElements() { return false; }
+            public Object nextElement() { throw new NoSuchElementException(); }
+        };
     
-    public String typeName() { return "object"; }
-
-
-    // Inner Classes /////////////////////////////////////////////////////////////////////////
-
-    /** A sensible implementation of the abstract methods in the JS class */
-    public static class Obj extends JS {
-        private Hash entries = null;
-        private boolean sealed = false;
-        public Obj() { this(false); }
-        public Obj(boolean sealed) { this.sealed = sealed; }
-        public void setSeal(boolean sealed) { this.sealed = sealed; }      ///< a sealed object cannot have its properties modified
-        public void put(Object key, Object val) { put2(key, null, val); }
-        protected void put2(Object key, Object key2, Object val) {
-            if (sealed) return;
-            if (entries == null) entries = new Hash();
-            entries.put(key, key2, val); }
-        public Object[] keys() { return entries == null ? new Object[0] : entries.keys(); }
-        public Object get(Object key) { return get(key, null); }
-        protected Object get(Object key, Object key2) {
-            if (entries == null) return null;
-            if(key2 == null && callMethod((String)key, null, true) == Boolean.TRUE)
-                return new Internal.CallableStub(this, key);
-            return entries.get(key, key2);
-        }
-    }
+    private Hash entries = null;
 
-    /** An exception which can be thrown and caught by JavaScript code */
-    public static class Exn extends RuntimeException { 
-        private Object js = null; 
-        public Exn(Object js) { this.js = js; } 
-        public String toString() { return "JS.Exn: " + js; }
-        public String getMessage() { return toString(); }
-        public Object getObject() { return js; } 
-    } 
-
-    /** The publicly-visible face of JavaScript Array objects */
-    public static class Array extends ArrayImpl {
-        public Array() { }
-        public Array(int size) { super(size); }
-        public void setSize(int i) { super.setSize(i); }
-        public int length() { return super.length(); }
-        public Object elementAt(int i) { return super.elementAt(i); }
-        public void addElement(Object o) { super.addElement(o); }
-        public void setElementAt(Object o, int i) { super.setElementAt(o, i); }
-        public Object get(Object key) { return super._get(key); }
-        public void put(Object key, Object val) { super._put(key, val); }
+    public static JS fromReader(String sourceName, int firstLine, Reader sourceCode) throws IOException {
+        return JSFunction._fromReader(sourceName, firstLine, sourceCode);
     }
 
-    /** Any object which becomes part of the scope chain must support this interface */ 
-    public static class Scope extends ScopeImpl { 
-        public Scope(Scope parentScope) { this(parentScope, false); }
-        public Scope(Scope parentScope, boolean sealed) { super(parentScope, sealed); }
-        /** transparent scopes are not returned by THIS */
-        public boolean isTransparent() { return super.isTransparent(); }
-        public boolean has(Object key) { return super.has(key); }
-        public Object get(Object key) { return super._get(key); }
-        public void put(Object key, Object val) { super._put(key, val); }
-        public void declare(String s) { super.declare(s); }
-    } 
-
-    /** the result of a graft */
-    public static class Graft extends JS {
-        private JS graftee;
-        private Object replaced_key;
-        private Object replaced_val;
-        public Graft(JS graftee, Object key, Object val) {
-            if (graftee instanceof Array) throw new JS.Exn("can't graft onto Arrays (yet)");
-            if (graftee instanceof Callable) throw new JS.Exn("can't graft onto Callables (yet)");
-            if (graftee instanceof Scope) throw new JS.Exn("can't graft onto Scopes (yet)");
-            this.graftee = graftee;
-            replaced_key = key;
-            replaced_val = val;
-        }
-        public boolean equals(Object o) { return (this == o || graftee.equals(o)); }
-        public int hashCode() { return graftee.hashCode(); }
-        public Object get(Object key) { return replaced_key.equals(key) ? replaced_val : graftee.get(key); }
-        public void put(Object key, Object val) { graftee.put(key, val); }
-        public Object callMethod(Object method, Array args, boolean checkOnly) throws JS.Exn {
-            if (!replaced_key.equals(method)) return graftee.callMethod(method, args, checkOnly);
-            if (replaced_val instanceof Callable) return checkOnly ? Boolean.TRUE : ((Callable)replaced_val).call(args);
-            if (checkOnly) return Boolean.FALSE;
-            throw new JS.Exn("attempt to call non-function");
-        }
-        public Number coerceToNumber() { return graftee.coerceToNumber(); }
-        public String coerceToString() { return graftee.coerceToString(); }
-        public boolean coerceToBoolean() { return graftee.coerceToBoolean(); }
-        public String typeName() { return graftee.typeName(); }
-        public Object[] keys() {
-            Object[] ret = graftee.keys();
-            for(int i=0; i<ret.length; i++) if (replaced_key.equals(ret[i])) return ret;
-            Object[] ret2 = new Object[ret.length + 1];
-            System.arraycopy(ret, 0, ret2, 0, ret.length);
-            ret2[ret2.length - 1] = replaced_key;
-            return ret2;
-        }
+    // HACK: caller can't know if the argument is a JSFunction or not...
+    public static JS cloneWithNewParentScope(JS j, JSScope s) {
+        return ((JSFunction)j)._cloneWithNewParentScope(s);
     }
 
-    /** anything that is callable with the () operator */
-    public static abstract class Callable extends JS.Obj {
-        public abstract Object call(JS.Array args) throws JS.Exn;
-    }
 
-    /** a Callable which was compiled from JavaScript code */
-    public static class CompiledFunction extends CompiledFunctionImpl {
-        public int getNumFormalArgs() { return numFormalArgs; }
-        CompiledFunction(String sourceName, int firstLine, Reader sourceCode, Scope scope) throws IOException {
-            super(sourceName, firstLine, sourceCode, scope);
-        }
-    }
-    
-    /** a scope that is populated with js objects and functions normally found in the global scope */
-    public static class GlobalScope extends GlobalScopeImpl {
-        public GlobalScope() { this(null); }
-        public GlobalScope(JS.Scope parent) { super(parent); }
+    // Trap support //////////////////////////////////////////////////////////////////////////////
+
+    /** override and return true to allow placing traps on this object.
+     *  if isRead true, this is a read trap, otherwise write trap
+     **/
+    protected boolean isTrappable(Object name, boolean isRead) { return true; }
+
+    /** performs a put, triggering traps if present; traps are run in an unpauseable interpreter */
+    public void putAndTriggerTraps(Object key, Object value) throws JSExn {
+        Trap t = getTrap(key);
+        if (t != null) t.invoke(value);
+        else put(key, value);
     }
 
-    public static final JS Math = new org.xwt.js.Math();
+    /** performs a get, triggering traps if present; traps are run in an unpauseable interpreter */
+    public Object getAndTriggerTraps(Object key) throws JSExn {
+        Trap t = getTrap(key);
+        if (t != null) return t.invoke();
+        else return get(key);
+    }
 
-    public static class TailCall {
-        CompiledFunction func = null;
-        JS.Array args = null;
-        public TailCall() { }
-        public TailCall set(CompiledFunction func) { this.func = func; this.args = new JS.Array(); return this; }
-        public TailCall set(CompiledFunction func, JS.Array args) { this.func = func; this.args = args; return this; }
+    /** retrieve a trap from the entries hash */
+    protected final Trap getTrap(Object key) {
+        return entries == null ? null : (Trap)entries.get(key, Trap.class);
     }
-    /** encapsulates a single JavaScript thread; the JS.Thread->java.lang.Thread mapping is 1:1 */
-    public static class Thread {
-
-        CompiledFunction currentCompiledFunction = null;
-        Vec stack = new Vec();
-        public Scope scope = null;
-        int pc = 0;
-        boolean paused = false;
-
-        public Thread(CompiledFunction function) { this(function, null); }
-        public Thread(CompiledFunction function, Scope scope) { this(function, scope, new JS.Array()); }
-        public Thread(CompiledFunction function, Scope scope, JS.Array args) {
-            if (scope == null) scope = new CompiledFunctionImpl.FunctionScope("unknown", function.parentScope);
-            stack.push(new CompiledFunctionImpl.CallMarker(this));
-            stack.push(args);
-            this.currentCompiledFunction = function;
-            this.scope = scope;
-        }
 
-        public static JS.Thread current() { return (JS.Thread)javaThreadToJSThread.get(java.lang.Thread.currentThread()); }
-        public Object resume() { bind(); paused = false; Object ret = CompiledFunctionImpl.eval(this); unbind(); return ret; }
-        public void pause() { paused = true; unbind(); }
-        public void bind() { javaThreadToJSThread.put(java.lang.Thread.currentThread(), this); }
-        public void unbind() { if (current() == this) javaThreadToJSThread.remove(java.lang.Thread.currentThread()); }
-        public int getLine() { return currentCompiledFunction == null ? -1 : currentCompiledFunction.getLine(this); }
-        public String getSourceName() { return currentCompiledFunction == null ? null : currentCompiledFunction.getSourceName();  }
-
-        /** fetches the currently-executing javascript function */
-        public JS.CompiledFunction getCurrentCompiledFunction() { return currentCompiledFunction; }
-        private static Hashtable javaThreadToJSThread = new Hashtable();
+    /** retrieve a trap from the entries hash */
+    protected final void putTrap(Object key, Trap value) {
+        if (entries == null) entries = new Hash();
+        entries.put(key, Trap.class, value);
     }
-} 
 
+    /** adds a trap, avoiding duplicates */
+    protected final void addTrap(Object name, JSFunction f) throws JSExn {
+        if (f.numFormalArgs > 1) throw new JSExn("traps must take either one argument (write) or no arguments (read)");
+        boolean isRead = f.numFormalArgs == 0;
+        if (!isTrappable(name, isRead)) throw new JSExn("not allowed "+(isRead?"read":"write")+" trap on property: "+name);
+        for(Trap t = getTrap(name); t != null; t = t.next) if (t.f == f) return;
+        putTrap(name, new Trap(this, name.toString(), f, (Trap)getTrap(name)));
+    }
 
+    /** deletes a trap, if present */
+    protected final void delTrap(Object name, JSFunction f) {
+        Trap t = (Trap)getTrap(name);
+        if (t == null) return;
+        if (t.f == f) { putTrap(t.name, t.next); return; }
+        for(; t.next != null; t = t.next) if (t.next.f == f) { t.next = t.next.next; return; }
+    }
 
 
+}