+++ /dev/null
-// Copyright 2004 Adam Megacz, see the COPYING file for licensing [GPL]
-package org.ibex.js;
-
-import org.ibex.util.*;
-import java.io.*;
-import java.util.*;
-
-/** The minimum set of functionality required for objects which are manipulated by JavaScript */
-public abstract class JS {
- public static final JS METHOD = new JS() { };
-
- public JS.Enumeration keys() throws JSExn { throw new JSExn("you can't enumerate the keys of this object (class=" + getClass().getName() +")"); }
- public JS get(JS key) throws JSExn { return null; }
- public void put(JS key, JS val) throws JSExn { throw new JSExn("" + key + " is read only (class=" + getClass().getName() +")"); }
-
- public JS callMethod(JS method, JS a0, JS a1, JS a2, JS[] rest, int nargs) throws JSExn {
- throw new JSExn("method not found (" + JS.debugToString(method) + ")");
- }
- public JS call(JS a0, JS a1, JS a2, JS[] rest, int nargs) throws JSExn {
- throw new JSExn("you cannot call this object (class=" + this.getClass().getName() +")");
- }
- public InputStream getInputStream() throws IOException {
- throw new IOException("this object doesn't have a stream associated with it " + getClass().getName() + ")");
- }
-
- public final JS unclone() { return _unclone(); }
- public final JS jsclone() throws JSExn { return new Clone(this); }
- public final boolean hasTrap(JS key) { return getTrap(key) != null; }
- public final boolean equals(Object o) { return this == o || ((o instanceof JS) && jsequals((JS)o)); }
- // Discourage people from using toString()
- public final String toString() { return "JS Object [class=" + getClass().getName() + "]"; }
-
- // Package private methods
- Trap getTrap(JS key) { return null; }
- void putTrap(JS key, Trap value) throws JSExn { throw new JSExn("traps cannot be placed on this object (class=" + this.getClass().getName() +")"); }
- String coerceToString() throws JSExn { throw new JSExn("can't coerce to a string (class=" + getClass().getName() +")"); }
- boolean jsequals(JS o) { return this == o; }
- JS _unclone() { return this; }
-
- public static class O extends JS implements Cloneable {
- private Hash entries;
-
- public Enumeration keys() throws JSExn { return entries == null ? (Enumeration)EMPTY_ENUMERATION : (Enumeration)new JavaEnumeration(null,entries.keys()); }
- public JS get(JS key) throws JSExn { return entries == null ? null : (JS)entries.get(key, null); }
- public void put(JS key, JS val) throws JSExn { (entries==null?entries=new Hash():entries).put(key,null,val); }
-
- /** retrieve a trap from the entries hash */
- final Trap getTrap(JS key) {
- return entries == null ? null : (Trap)entries.get(key, Trap.class);
- }
-
- /** retrieve a trap from the entries hash */
- final void putTrap(JS key, Trap value) {
- if (entries == null) entries = new Hash();
- entries.put(key, Trap.class, value);
- }
- }
-
- public interface Cloneable { }
-
- public static class Clone extends O {
- protected final JS clonee;
- public Clone(JS clonee) throws JSExn {
- if(!(clonee instanceof Cloneable)) throw new JSExn("" + clonee.getClass().getName() + " isn't cloneable");
- this.clonee = clonee;
- }
- JS _unclone() { return clonee.unclone(); }
- boolean jsequals(JS o) { return clonee.jsequals(o); }
-
- public Enumeration keys() throws JSExn { return clonee.keys(); }
- public final JS get(JS key) throws JSExn { return clonee.get(key); }
- public final void put(JS key, JS val) throws JSExn { clonee.put(key,val); }
- public final JS callMethod(JS method, JS a0, JS a1, JS a2, JS[] rest, int nargs) throws JSExn {
- return clonee.callMethod(method,a0,a1,a2,rest,nargs);
- }
- public JS call(JS a0, JS a1, JS a2, JS[] rest, int nargs) throws JSExn {
- return clonee.call(a0, a1, a2, rest, nargs);
- }
- public InputStream getInputStream() throws IOException { return clonee.getInputStream(); }
- // FIXME: This shouldn't be necessary (its for Ibex.Blessing)
- public JS getClonee() { return clonee; }
- }
-
- public static abstract class Enumeration extends JS {
- final Enumeration parent;
- boolean done;
- public Enumeration(Enumeration parent) { this.parent = parent; }
- protected abstract boolean _hasMoreElements();
- protected abstract JS _nextElement() throws JSExn;
-
- public final boolean hasMoreElements() {
- if(!done && !_hasMoreElements()) done = true;
- return !done ? true : parent != null ? parent.hasMoreElements() : false;
- }
- public final JS nextElement() throws JSExn { return !done ? _nextElement() : parent != null ? parent.nextElement() : null; }
-
- public JS get(JS key) throws JSExn {
- //#jswitch(key)
- case "hasMoreElements": return B(hasMoreElements());
- case "nextElement": return nextElement();
- //#end
- return super.get(key);
- }
- }
-
- public static class EmptyEnumeration extends Enumeration {
- public EmptyEnumeration(Enumeration parent) { super(parent); }
- protected boolean _hasMoreElements() { return false; }
- protected JS _nextElement() { return null; }
- }
- public static class JavaEnumeration extends Enumeration {
- private final java.util.Enumeration e;
- public JavaEnumeration(Enumeration parent, java.util.Enumeration e) { super(parent); this.e = e; }
- protected boolean _hasMoreElements() { return e.hasMoreElements(); }
- protected JS _nextElement() { return (JS) e.nextElement(); }
- }
-
- // 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();
- boolean get;
- switch(i.f.op[i.pc]) {
- case Tokens.RETURN: case ByteCodes.PUT: get = false; break;
- case ByteCodes.GET: case ByteCodes.CALL: get = true; break;
- default: throw new Error("should never happen");
- }
- i.pausecount++;
- return new JS.UnpauseCallback(i,get);
- }
-
- public static class UnpauseCallback implements Task {
- private Interpreter i;
- private boolean get;
- UnpauseCallback(Interpreter i, boolean get) { this.i = i; this.get = get; }
- public void perform() throws JSExn { unpause(); }
- public JS unpause() throws JSExn { return unpause((JS)null); }
- public JS unpause(JS o) throws JSExn {
- if (o == JS.METHOD) throw new JSExn("can't return a method to a paused context");
- if(get) i.stack.push(o);
- return i.resume();
- }
- public JS unpause(JSExn e) throws JSExn {
- i.catchException(e);
- return i.resume();
- }
- }
-
-
-
- // Static Helper Methods ///////////////////////////////////////////////////////////////////////////////////
-
- /** coerce an object to a Boolean */
- public static boolean toBoolean(JS o) {
- if(o == null) return false;
- if(o instanceof JSNumber) return ((JSNumber)o).toBoolean();
- if(o instanceof JSString) return ((JSString)o).s.length() != 0;
- return true;
- }
- //#repeat long/int/double/float toLong/toInt/toDouble/toFloat Long/Integer/Double/Float parseLong/parseInt/parseDouble/parseFloat
- /** coerce an object to a Number */
- public static long toLong(JS o) throws JSExn {
- if(o == null) return 0;
- if(o instanceof JSNumber) return ((JSNumber)o).toLong();
- if(o instanceof JSString) return Long.parseLong(o.coerceToString());
- throw new JSExn("can't coerce a " + o.getClass().getName() + " to a number");
- }
- //#end
-
- public static String toString(JS o) throws JSExn {
- if(o == null) return "null";
- return o.coerceToString();
- }
-
- public static String debugToString(JS o) {
- try { return toString(o); }
- catch(JSExn e) { return o.toString(); }
- }
-
- public static boolean isInt(JS o) {
- if(o == null) return true;
- if(o instanceof JSNumber.I) return true;
- if(o instanceof JSNumber.B) return false;
- if(o instanceof JSNumber) {
- JSNumber n = (JSNumber) o;
- return n.toInt() == n.toDouble();
- }
- if(o instanceof JSString) {
- String s = ((JSString)o).s;
- for(int i=0;i<s.length();i++)
- if(s.charAt(i) < '0' || s.charAt(i) > '9') return false;
- return true;
- }
- return false;
- }
-
- public static boolean isString(JS o) {
- if(o instanceof JSString) return true;
- return false;
- }
-
- // Instance Methods ////////////////////////////////////////////////////////////////////
-
- public final static JS NaN = new JSNumber.D(Double.NaN);
- public final static JS ZERO = new JSNumber.I(0);
- public final static JS ONE = new JSNumber.I(1);
- public final static JS MATH = new JSMath();
-
- public static final JS T = new JSNumber.B(true);
- public static final JS F = new JSNumber.B(false);
-
- public static final JS B(boolean b) { return b ? T : F; }
- public static final JS B(int i) { return i==0 ? F : T; }
-
- private static final int CACHE_SIZE = 65536 / 4; // must be a power of two
- private static final JSString[] stringCache = new JSString[CACHE_SIZE];
- public static final JS S(String s) {
- if(s == null) return null;
- int slot = s.hashCode()&(CACHE_SIZE-1);
- JSString ret = stringCache[slot];
- if(ret == null || !ret.s.equals(s)) stringCache[slot] = ret = new JSString(s);
- return ret;
- }
- public static final JS S(String s, boolean intern) { return intern ? JSString.intern(s) : S(s); }
-
- public static final JS N(double d) { return new JSNumber.D(d); }
- public static final JS N(long l) { return new JSNumber.L(l); }
-
- public static final JS N(Number n) {
- if(n instanceof Integer) return N(n.intValue());
- if(n instanceof Long) return N(n.longValue());
- return N(n.doubleValue());
- }
-
- private static final JSNumber.I[] smallIntCache = new JSNumber.I[CACHE_SIZE];
- private static final JSNumber.I[] largeIntCache = new JSNumber.I[CACHE_SIZE];
- public static final JS N(int i) {
- JSNumber.I ret = null;
- int idx = i + smallIntCache.length / 2;
- if (idx < CACHE_SIZE && idx > 0) {
- ret = smallIntCache[idx];
- if (ret != null) return ret;
- }
- else ret = largeIntCache[Math.abs(idx % CACHE_SIZE)];
- if (ret == null || ret.i != i) {
- ret = new JSNumber.I(i);
- if (idx < smallIntCache.length && idx > 0) smallIntCache[idx] = ret;
- else largeIntCache[Math.abs(idx % CACHE_SIZE)] = ret;
- }
- return ret;
- }
-
- private static Enumeration EMPTY_ENUMERATION = new EmptyEnumeration(null);
-
- public static JS fromReader(String sourceName, int firstLine, Reader sourceCode) throws IOException {
- return Parser.fromReader(sourceName, firstLine, sourceCode);
- }
-
- public static JS cloneWithNewGlobalScope(JS js, JS s) {
- if(js instanceof JSFunction)
- return ((JSFunction)js)._cloneWithNewParentScope(new JSScope.Top(s));
- else
- return js;
- }
-
-
- // Trap support //////////////////////////////////////////////////////////////////////////////
-
- /** performs a put, triggering traps if present; traps are run in an unpauseable interpreter */
- public final void putAndTriggerTraps(JS key, JS value) throws JSExn {
- Trap t = getTrap(key);
- if(t == null || (t = t.writeTrap()) == null) put(key,value);
- else new Interpreter(t,value,false).resume();
- }
-
- /** performs a get, triggering traps if present; traps are run in an unpauseable interpreter */
- public final JS getAndTriggerTraps(JS key) throws JSExn {
- Trap t = getTrap(key);
- if (t == null || (t = t.readTrap()) == null) return get(key);
- else return new Interpreter(t,null,false).resume();
- }
-
- public final JS justTriggerTraps(JS key, JS value) throws JSExn {
- Trap t = getTrap(key);
- if(t == null || (t = t.writeTrap()) == null) return value;
- else return new Interpreter(t,value,true).resume();
- }
-
- /** adds a trap, avoiding duplicates */
- // FIXME: This shouldn't be public, it is needed for a hack in Template.java
- public void addTrap(JS key, 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;
- for(Trap t = getTrap(key); t != null; t = t.next) if (t.f == f) return;
- putTrap(key, new Trap(this, key, f, (Trap)getTrap(key)));
- }
-
- /** deletes a trap, if present */
- // FIXME: This shouldn't be public, it is needed for a hack in Template.java
- public void delTrap(JS key, JSFunction f) throws JSExn {
- Trap t = (Trap)getTrap(key);
- if (t == null) return;
- if (t.f == f) { putTrap(t.target, t.next); return; }
- for(; t.next != null; t = t.next) if (t.next.f == f) { t.next = t.next.next; return; }
- }
-
-
-}