moved XMLRPC and SOAP into org.ibex.js temporarily
authoradam <adam@megacz.com>
Mon, 27 Dec 2004 05:44:46 +0000 (05:44 +0000)
committeradam <adam@megacz.com>
Mon, 27 Dec 2004 05:44:46 +0000 (05:44 +0000)
darcs-hash:20041227054446-5007d-2a54f8485d0212a19d7f2f059e1858b7c0873be6.gz

src/org/ibex/js/SOAP.java [new file with mode: 0644]
src/org/ibex/js/XMLRPC.java [new file with mode: 0644]

diff --git a/src/org/ibex/js/SOAP.java b/src/org/ibex/js/SOAP.java
new file mode 100644 (file)
index 0000000..c2764d2
--- /dev/null
@@ -0,0 +1,282 @@
+// Copyright 2004 Adam Megacz, see the COPYING file for licensing [GPL]
+package org.ibex.js;
+
+import java.io.*;
+import java.util.*;
+import org.ibex.net.*;
+import org.ibex.util.*;
+import org.ibex.crypto.*;
+
+/**
+ *  A partial RPC-style SOAP 1.1 client. Implemented from the SOAP 1.1
+ *  Spec and Dave Winer's "SOAP for Busy Developers". This class
+ *  extends XMLRPC in order to share some networking logic.
+ *
+ *  Currently unsupported features/hacks:
+ *  <ul><li> Multi-ref data and circular references
+ *      <li> 'Document Style'
+ *      <li> WSDL support
+ *  </ul>
+ */
+public class SOAP extends XMLRPC {
+
+    /** the desired content of the SOAPAction header */
+    String action = null;
+
+    /** the namespace to use */
+    String nameSpace = null;
+
+    /** When you get a property from an SOAP, it just returns another SOAP with the property name tacked onto methodname. */
+    public Object get(Object name) {
+        return new SOAP(url, (method.equals("") ? "" : method + ".") + name.toString(), this, action, nameSpace); }
+
+
+    // Methods to Recieve and parse SOAP Responses ////////////////////////////////////////////////////
+
+    public void startElement(String name, String[] keys, Object[] vals, int line, int col) {
+
+        content.reset();
+        if (name.equals("SOAP-ENV:Envelope")) return;
+        if (name.equals("SOAP-ENV:Body")) return;
+        if (name.equals("SOAP-ENV:Fault")) fault = true;
+        // add a generic struct; we'll change this if our type is different
+        objects.addElement(new JS());
+
+        for(int i=0; i<keys.length; i++) {
+            String key = keys[i];
+            String value = vals[i].toString();
+            if (key.endsWith("ype")) {
+                if (value.endsWith("boolean")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(Boolean.FALSE);
+                } else if (value.endsWith("int")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new Integer(0));
+                } else if (value.endsWith("double")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new Double(0.0));
+                } else if (value.endsWith("string")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement("");
+                } else if (value.endsWith("base64")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new byte[] { });
+                } else if (value.endsWith("null")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(null);
+                } else if (value.endsWith("arrayType") || value.endsWith("JSArray") || key.endsWith("arrayType")) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new JSArray());
+                }
+            }
+        }
+    }
+
+    public void endElement(String name, int line, int col) {
+
+        if (name.equals("SOAP-ENV:Envelope")) return;
+        if (name.equals("SOAP-ENV:Body")) return;
+
+        if (content.size() > 0 && content.toString().trim().length() > 0) {
+
+            // remove ourselves
+            Object me = objects.elementAt(objects.size() - 1);
+
+            if (fault || me instanceof String) {
+                objects.removeElementAt(objects.size() - 1);
+                objects.addElement(new String(content.getBuf(), 0, content.size()).intern());
+                content.reset();
+
+            } else if (me instanceof byte[]) {
+                objects.removeElementAt(objects.size() - 1);
+                objects.addElement(new Fountain.ByteArray(Base64.decode(new String(content.getBuf(), 0, content.size())), null));
+                content.reset();                
+
+            } else if (me instanceof Integer) {
+                objects.removeElementAt(objects.size() - 1);
+                objects.addElement(new Integer(new String(content.getBuf(), 0, content.size())));
+                content.reset();
+                
+            } else if (me instanceof Boolean) {
+                objects.removeElementAt(objects.size() - 1);
+                String s = new String(content.getBuf(), 0, content.size()).trim();
+                if (s.equals("1") || s.equals("true")) objects.addElement(Boolean.TRUE);
+                else objects.addElement(Boolean.FALSE);
+                content.reset();
+                
+            } else if (me instanceof Double) {
+                objects.removeElementAt(objects.size() - 1);
+                objects.addElement(new Double(new String(content.getBuf(), 0, content.size())));
+                content.reset();
+                
+            } else {
+                // okay, we got PCDATA for what is supposedly a
+                // struct... somebody's not adding their type info...
+                String s = new String(content.getBuf(), 0, content.size()).trim();
+                boolean hasdot = false;
+                for(int i=0; i<s.length(); i++) {
+                    if (s.charAt(i) == '.') hasdot = true;
+                    if (!Character.isDigit(s.charAt(i))) {
+                        objects.removeElementAt(objects.size() - 1);
+                        objects.addElement(s);
+                        return;
+                    }
+                }
+                if (hasdot) {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new Double(s));
+                } else {
+                    objects.removeElementAt(objects.size() - 1);
+                    objects.addElement(new Integer(s));
+                }
+                content.reset();
+            }
+
+        }
+        
+        // remove ourselves
+        Object me = objects.elementAt(objects.size() - 1);
+
+        // find our parent
+        Object parent = objects.size() > 1 ? objects.elementAt(objects.size() - 2) : null;
+
+        // we want to fold stuff back into the fault object
+        if (objects.size() < 2) return;
+
+        // our parent "should" be an aggregate type -- add ourselves to it.
+        if (parent != null && parent instanceof JSArray) {
+            objects.removeElementAt(objects.size() - 1);
+            ((JSArray)parent).addElement(me);
+
+        } else if (parent != null && parent instanceof JS) {
+            objects.removeElementAt(objects.size() - 1);
+            try {
+                ((JS)parent).put(name, me);
+            } catch (JSExn e) {
+                throw new Error("this should never happen");
+            }
+
+        }
+
+    }
+
+    /** Appends the SOAP representation of <code>o</code> to <code>sb</code> */
+    void appendObject(String name, Object o, StringBuffer sb) throws JSExn {
+        if (o instanceof Number) {
+            if ((double)((Number)o).intValue() == ((Number)o).doubleValue()) {
+                sb.append("                <" + name + " xsi:type=\"xsd:int\">");
+                sb.append(((Number)o).intValue());
+                sb.append("</" + name + ">\r\n");
+            } else {
+                sb.append("                <" + name + " xsi:type=\"xsd:double\">");
+                sb.append(o);
+                sb.append("</" + name + ">\r\n");
+            }
+
+        } else if (o instanceof Boolean) {
+            sb.append("                <" + name + " xsi:type=\"xsd:boolean\">");
+            sb.append(((Boolean)o).booleanValue() ? "true" : "false");
+            sb.append("</" + name + ">\r\n");
+
+        } else if (o instanceof Fountain) {
+            try {
+                sb.append("                <" + name + " xsi:type=\"SOAP-ENC:base64\">\r\n");
+                InputStream is = ((Fountain)o).getInputStream();
+                byte[] buf = new byte[54];
+                while(true) {
+                    int numread = is.read(buf, 0, 54);
+                    if (numread == -1) break;
+                    byte[] writebuf = buf;
+                    if (numread < buf.length) {
+                        writebuf = new byte[numread];
+                        System.arraycopy(buf, 0, writebuf, 0, numread);
+                    }
+                    sb.append("              ");
+                    sb.append(new String(Base64.encode(writebuf)));
+                    sb.append("\r\n");
+                }
+                sb.append(((Boolean)o).booleanValue() ? "1" : "0");
+                sb.append("</" + name + ">\r\n");
+            } catch (IOException e) {
+                if (Log.on) Log.info(this, "caught IOException while attempting to send a Fountain via SOAP");
+                if (Log.on) Log.info(this, e);
+                throw new JSExn("caught IOException while attempting to send a Fountain via SOAP");
+            }
+
+        } else if (o instanceof String) {
+            sb.append("                <" + name + " xsi:type=\"xsd:string\">");
+            String s = (String)o;
+            if (s.indexOf('<') == -1 && s.indexOf('&') == -1) {
+                sb.append(s);
+            } else {
+                char[] cbuf = s.toCharArray();
+                while(true) {
+                    int oldi = 0, i=0;
+                    while(i < cbuf.length && cbuf[i] != '<' && cbuf[i] != '&') i++;
+                    sb.append(cbuf, oldi, i);
+                    if (i == cbuf.length) break;
+                    if (cbuf[i] == '<') sb.append("&lt;");
+                    else if (cbuf[i] == '&') sb.append("&amp;");
+                    i = oldi = i + 1;
+                }
+            }
+            sb.append("</" + name + ">\r\n");
+
+        } else if (o instanceof JSArray) {
+            JSArray a = (JSArray)o;
+            sb.append("                <" + name + " SOAP-ENC:arrayType=\"xsd:ur-type[" + a.length() + "]\">");
+            for(int i=0; i<a.length(); i++) appendObject("item", a.elementAt(i), sb);
+            sb.append("</" + name + ">\r\n");
+
+        } else if (o instanceof JS) {
+            JS j = (JS)o;
+            sb.append("                <" + name + ">");
+            Enumeration e = j.keys();
+            while(e.hasMoreElements()) {
+                Object key = e.nextElement();
+                appendObject((String)key, j.get(key), sb);
+            }
+            sb.append("</" + name + ">\r\n");
+
+        }
+    }
+
+    protected String buildRequest(JSArray args) throws JSExn, IOException {
+        // build up the request
+        StringBuffer content = new StringBuffer();
+        content.append("SOAPAction: " + action + "\r\n\r\n");
+        content.append("<?xml version=\"1.0\"?>\r\n");
+        content.append("<SOAP-ENV:Envelope SOAP-ENV:encodingStyle=\"http://schemas.xmlsoap.org/soap/encoding/\"\r\n");
+        content.append("                   xmlns:SOAP-ENC=\"http://schemas.xmlsoap.org/soap/encoding/\"\r\n");
+        content.append("                   xmlns:SOAP-ENV=\"http://schemas.xmlsoap.org/soap/envelope/\"\r\n");
+        content.append("                   xmlns:xsd=\"http://www.w3.org/1999/XMLSchema\"\r\n");
+        content.append("                   xmlns:xsi=\"http://www.w3.org/1999/XMLSchema-instance\">\r\n");
+        content.append("<SOAP-ENV:Body>\r\n");
+        content.append("    <");
+        content.append(method);
+        content.append(nameSpace != null ? " xmlns=\"" + nameSpace + "\"" : "");
+        content.append(">\r\n");
+        if (args.length() > 0) {
+            Enumeration e = ((JS)args.elementAt(0)).keys();
+            while(e.hasMoreElements()) {
+                Object key = e.nextElement();
+                appendObject((String)key, ((JS)args.elementAt(0)).get(key), content);
+            }
+        }
+        content.append("    </" + method + "></SOAP-ENV:Body></SOAP-ENV:Envelope>\r\n");
+        return content.toString();
+    }
+
+    public SOAP(String url, String methodname, String action, String nameSpace) {
+        super(url, methodname);
+        this.action = action;
+        this.nameSpace = nameSpace;
+    }
+    public SOAP(String url, String methodname, SOAP httpSource, String action, String nameSpace) {
+        super(url, methodname, httpSource);
+        this.action = action;
+        this.nameSpace = nameSpace;
+    }
+
+}
diff --git a/src/org/ibex/js/XMLRPC.java b/src/org/ibex/js/XMLRPC.java
new file mode 100644 (file)
index 0000000..6f50328
--- /dev/null
@@ -0,0 +1,351 @@
+// Copyright 2004 Adam Megacz, see the COPYING file for licensing [GPL]
+package org.ibex.js;
+
+import java.io.*;
+import java.util.*;
+import org.ibex.net.*;
+import org.ibex.util.*;
+import org.ibex.crypto.*;
+
+/**
+ *  An XML-RPC client implemented as a JavaScript Host Object. See the
+ *  Ibex spec for information on its behavior.
+ *
+ *  NOTE: this client is EXTREMELY lenient in the responses it will
+ *  accept; there are many, many invalid responses that it will
+ *  successfully parse and return. Do NOT use this to determine the
+ *  validity of your server.
+ *
+ *  This client conforms to <a href="http://www.xmlrpc.com/spec">The
+ *  XML-RPC Spec</a>, subject to these limitations:
+ *  <ol>
+ *    <li> XMLRPC cannot invoke methods that require a <base64/> argument
+ *    <li> if a return value contains a <base64/>, it will be returned as a string
+ *    <li> The decision to pass a number as <i4/> or <double/> is based
+ *         entirely on whether or not the argument is fractional. Thus, it
+ *         is impossible to pass a non-fractional number to an xmlrpc
+ *         method that insists on being called with a <double/> element. We
+ *         hope that most xml-rpc servers will be able to automatically
+ *         convert.
+ *  </ol>
+ */
+public class XMLRPC extends JS {
+
+    public XMLRPC(String url, String method) {
+        this.http = url.startsWith("stdio:") ? HTTP.stdio : new HTTP(url);
+        this.url = url;
+        this.method = method;
+    }
+    public XMLRPC(String url, String method, XMLRPC httpSource) {
+        this.http = httpSource.http; this.url = url; this.method = method; }
+    public Object get(Object name) {
+        return new XMLRPC(url, (method.equals("") ? "" : method + ".") + name.toString(), this); }
+
+
+    /** this holds character content as we read it in -- since there is only one per instance, we don't support mixed content */
+    protected AccessibleCharArrayWriter content = new AccessibleCharArrayWriter(100);
+    protected String url = null;         ///< the url to connect to
+    protected String method = null;      ///< the method name to invoke on the remove server
+    protected HTTP http = null;          ///< the HTTP connection to use
+    private Hash tracker;                ///< used to detect multi-ref data
+    protected boolean fault = false;     ///< True iff the return value is a fault (and should be thrown as an exception)
+
+
+    /** The object stack. As we process xml elements, pieces of the
+     *  return value are pushed onto and popped off of this stack.
+     *
+     *  The general protocol is that any time a &lt;value&gt; tag is
+     *  encountered, an empty String ("") is pushed onto the stack. If
+     *  the &lt;value/&gt; node has content (either an anonymous
+     *  string or some other XML node), that content replaces the
+     *  empty string.
+     *
+     *  If an &lt;array&gt; tag is encountered, a null is pushed onto the
+     *  stack. When a &lt;/data&gt; is encountered, we search back on the
+     *  stack to the last null, replace it with a NativeJSArray, and
+     *  insert into it all elements above it on the stack.
+     *
+     *  If a &lt;struct&gt; tag is encountered, a JSect is pushed
+     *  onto the stack. If a &lt;name&gt; tag is encountered, its CDATA is
+     *  pushed onto the stack. When a &lt;/member&gt; is encountered, the
+     *  name (second element on stack) and value (top of stack) are
+     *  popped off the stack and inserted into the struct (third
+     *  element on stack).
+     */
+    protected Vec objects = null;
+
+
+    // Recieve ////////////////////////////////////////////////////////////////
+
+    private class Helper extends XML {
+        public Helper() { super(BUFFER_SIZE); }
+
+        public void startElement(XML.Element c) {
+            content.reset();
+            //#switch(c.getLocalName())
+            case "fault": fault = true;
+            case "struct": objects.setElementAt(new JS(), objects.size() - 1);
+            case "array": objects.setElementAt(null, objects.size() - 1);
+            case "value": objects.addElement("");
+            //#end
+        }
+        
+        public void endElement(XML.Element c) {
+            //#switch(c.getLocalName())
+            case "int": objects.setElementAt(new Integer(new String(content.getBuf(), 0, content.size())), objects.size() - 1);
+            case "i4": objects.setElementAt(new Integer(new String(content.getBuf(), 0, content.size())), objects.size() - 1);
+            case "boolean": objects.setElementAt(content.getBuf()[0] == '1' ? Boolean.TRUE : Boolean.FALSE, objects.size() - 1);
+            case "string": objects.setElementAt(new String(content.getBuf(), 0, content.size()), objects.size() - 1);
+            case "double": objects.setElementAt(new Double(new String(content.getBuf(), 0, content.size())), objects.size() - 1);
+            case "base64":
+                objects.setElementAt(new Fountain.ByteArray(Base64.decode(new String(content.getBuf(), 0, content.size())),
+                                                          null), objects.size() - 1);
+            case "name": objects.addElement(new String(content.getBuf(), 0, content.size()));
+            case "value": if ("".equals(objects.lastElement()))
+                objects.setElementAt(new String(content.getBuf(), 0, content.size()), objects.size() - 1);
+            case "dateTime.iso8601":
+                String s = new String(content.getBuf(), 0, content.size());
+                
+                // strip whitespace
+                int i=0;
+                while(Character.isWhitespace(s.charAt(i))) i++;
+                if (i > 0) s = s.substring(i);
+                
+                try {
+                    JSDate nd = new JSDate();
+                    double date = JSDate.date_msecFromDate(Double.valueOf(s.substring(0, 4)).doubleValue(),
+                                                           Double.valueOf(s.substring(4, 6)).doubleValue() - 1,
+                                                           Double.valueOf(s.substring(6, 8)).doubleValue(),
+                                                           Double.valueOf(s.substring(9, 11)).doubleValue(),
+                                                           Double.valueOf(s.substring(12, 14)).doubleValue(),
+                                                           Double.valueOf(s.substring(15, 17)).doubleValue(),
+                                                           (double)0
+                                                           );
+                    nd.setTime(JSDate.internalUTC(date));
+                    objects.setElementAt(nd, objects.size() - 1);
+                    
+                } catch (Exception e) {
+                    throw new RuntimeException("ibex.net.rpc.xml.recieve.malformedDateTag" +
+                                    "the server sent a <dateTime.iso8601> tag which was malformed: " + s);
+                }
+            case "member":
+                Object memberValue = objects.elementAt(objects.size() - 1);
+                String memberName = (String)objects.elementAt(objects.size() - 2);
+                JS struct = (JS)objects.elementAt(objects.size() - 3);
+                try {
+                    struct.put(memberName, memberValue);
+                } catch (JSExn e) {
+                    throw new Error("this should never happen");
+                }
+                objects.setSize(objects.size() - 2);
+            case "data":
+                int i;
+                for(i=objects.size() - 1; objects.elementAt(i) != null; i--);
+                JSArray arr = new JSArray();
+                try {
+                    for(int j = i + 1; j<objects.size(); j++) arr.put(new Integer(j - i - 1), objects.elementAt(j));
+                } catch (JSExn e) {
+                    throw new Error("this should never happen");
+                }
+                objects.setElementAt(arr, i);
+                objects.setSize(i + 1);
+            //#end            
+            content.reset();
+        }
+        
+        public void characters(char[] ch, int start, int length) {
+            try { content.write(ch, start, length); }
+            catch (Exception e) { 
+                if (Log.on) Log.info(this, "Exception in XMLRPC.content() -- this should never happen");
+                if (Log.on) Log.info(this, e);
+            }
+        }
+        
+        public void whitespace(char[] ch, int start, int length) {}
+    }
+
+    // Send ///////////////////////////////////////////////////////////////////////////
+
+    protected String buildRequest(JSArray args) throws JSExn, IOException {
+        StringBuffer content = new StringBuffer();
+        content.append("\r\n");
+        content.append("<?xml version=\"1.0\"?>\n");
+        content.append("    <methodCall>\n");
+        content.append("        <methodName>");
+        content.append(method);
+        content.append("</methodName>\n");
+        content.append("        <params>\n");
+        for(int i=0; i<args.length(); i++) {
+            content.append("            <param>\n");
+            appendObject(args.elementAt(i), content);
+            content.append("            </param>\n");
+        }
+        content.append("        </params>\n");
+        content.append("    </methodCall>");
+        return content.toString();
+    }
+
+    /** Appends the XML-RPC representation of <code>o</code> to <code>sb</code> */
+    void appendObject(Object o, StringBuffer sb) throws JSExn {
+
+        if (o == null) {
+            throw new JSExn("attempted to send a null value via XML-RPC");
+
+        } else if (o instanceof Number) {
+            if ((double)((Number)o).intValue() == ((Number)o).doubleValue()) {
+                sb.append("                <value><i4>");
+                sb.append(((Number)o).intValue());
+                sb.append("</i4></value>\n");
+            } else {
+                sb.append("                <value><double>");
+                sb.append(o);
+                sb.append("</double></value>\n");
+            }
+
+        } else if (o instanceof Boolean) {
+            sb.append("                <value><boolean>");
+            sb.append(((Boolean)o).booleanValue() ? "1" : "0");
+            sb.append("</boolean></value>\n");
+
+        } else if (o instanceof Fountain) {
+            try {
+                sb.append("                <value><base64>\n");
+                InputStream is = ((Fountain)o).getInputStream();
+                byte[] buf = new byte[54];
+                while(true) {
+                    int numread = is.read(buf, 0, 54);
+                    if (numread == -1) break;
+                    byte[] writebuf = buf;
+                    if (numread < buf.length) {
+                        writebuf = new byte[numread];
+                        System.arraycopy(buf, 0, writebuf, 0, numread);
+                    }
+                    sb.append("              ");
+                    sb.append(new String(Base64.encode(writebuf)));
+                    sb.append("\n");
+                }
+                sb.append("\n              </base64></value>\n");
+            } catch (IOException e) {
+                if (Log.on) Log.info(this, "caught IOException while attempting to send a Fountain via XML-RPC");
+                if (Log.on) Log.info(this, e);
+                throw new JSExn("caught IOException while attempting to send a Fountain via XML-RPC");
+            }
+
+        } else if (o instanceof String) {
+            sb.append("                <value><string>");
+            String s = (String)o;
+            if (s.indexOf('<') == -1 && s.indexOf('&') == -1) {
+                sb.append(s);
+            } else {
+                char[] cbuf = s.toCharArray();
+                int oldi = 0, i=0;
+                while(true) {
+                    while(i < cbuf.length && cbuf[i] != '<' && cbuf[i] != '&') i++;
+                    sb.append(cbuf, oldi, i - oldi);
+                    if (i >= cbuf.length) break;
+                    if (cbuf[i] == '<') sb.append("&lt;");
+                    else if (cbuf[i] == '&') sb.append("&amp;");
+                    i = oldi = i + 1;
+                    if (i >= cbuf.length) break;
+                }
+            }
+            sb.append("</string></value>\n");
+
+        } else if (o instanceof JSDate) {
+            sb.append("                <value><dateTime.iso8601>");
+            java.util.Date d = new java.util.Date(((JSDate)o).getRawTime());
+            sb.append(d.getYear() + 1900);
+            if (d.getMonth() + 1 < 10) sb.append('0');
+            sb.append(d.getMonth() + 1);
+            if (d.getDate() < 10) sb.append('0');
+            sb.append(d.getDate());
+            sb.append('T');
+            if (d.getHours() < 10) sb.append('0');
+            sb.append(d.getHours());
+            sb.append(':');
+            if (d.getMinutes() < 10) sb.append('0');
+            sb.append(d.getMinutes());
+            sb.append(':');
+            if (d.getSeconds() < 10) sb.append('0');
+            sb.append(d.getSeconds());
+            sb.append("</dateTime.iso8601></value>\n");
+
+        } else if (o instanceof JSArray) {
+            if (tracker.get(o) != null) throw new JSExn("attempted to send multi-ref data structure via XML-RPC");
+            tracker.put(o, Boolean.TRUE);
+            sb.append("                <value><array><data>\n");
+            JSArray a = (JSArray)o;
+            for(int i=0; i<a.length(); i++) appendObject(a.elementAt(i), sb);
+            sb.append("                </data></array></value>\n");
+
+        } else if (o instanceof JS) {
+            if (tracker.get(o) != null) throw new JSExn("attempted to send multi-ref data structure via XML-RPC");
+            tracker.put(o, Boolean.TRUE);
+            JS j = (JS)o;
+            sb.append("                <value><struct>\n");
+            Enumeration e = j.keys();
+            while(e.hasMoreElements()) {
+                Object key = e.nextElement();
+                sb.append("                <member><name>" + key + "</name>\n");
+                appendObject(j.get(key), sb);
+                sb.append("                </member>\n");
+            }
+            sb.append("                </struct></value>\n");
+
+        } else {
+            throw new JSExn("attempt to send object of type " + o.getClass().getName() + " via XML-RPC");
+
+        }
+    }
+
+
+    // Call Sequence //////////////////////////////////////////////////////////////////////////
+
+    /* FIXME this has been disabled to make XMLRPC usable without Scheduler
+    public final Object call(Object a0, Object a1, Object a2, Object[] rest, int nargs) throws JSExn {
+        JSArray args = new JSArray();
+        for(int i=0; i<nargs; i++) args.addElement(i==0?a0:i==1?a1:i==2?a2:rest[i-3]);
+        return call(args);
+    }
+
+    public final Object call(final JSArray args) throws JSExn {
+        try {
+            final JS.UnpauseCallback callback = JS.pause();
+            new java.lang.Thread() { public void run() { call(callback, args); }  }.start();
+            return null; // doesn't matter since we paused
+        } catch (NotPauseableException npe) {
+            throw new JSExn("cannot invoke an XML-RPC call in the foreground thread");
+        }
+    }
+    */
+
+    // FIXME need to reenable backgrounding logic
+    final Object call(final JS.UnpauseCallback callback, final JSArray args) {
+        try {
+            if (Log.rpc) Log.info(this, "call to " + url + " : " + method);
+            if (tracker == null) tracker = new Hash();
+            if (objects == null) objects = new Vec();
+            String request = buildRequest(args);
+            if (Log.rpc) Log.info(this, "send:\n" + request);
+            InputStream is = http.POST("text/xml", request, null, null);
+            BufferedReader br = new BufferedReader(new InputStreamReader(is));
+            try {
+                new Helper().parse(br);
+                final Object result = fault ? new JSExn(objects.elementAt(0)) : objects.size() == 0 ? null : objects.elementAt(0);
+                return (new Task() { public void perform() throws JSExn { callback.unpause(result); }});
+            } finally {
+                tracker.clear();
+                objects.setSize(0);
+            }
+        } catch (final JSExn e) {
+            final Exception e2 = e;
+            return (new Task() { public void perform() throws JSExn { callback.unpause(e2); }});
+        } catch (final IOException e) {
+            final Exception e2 = e;
+            return (new Task() { public void perform() throws JSExn { callback.unpause(new JSExn(e2)); }});
+        } catch (final XML.Exn e) {
+            final Exception e2 = e;
+            return (new Task() { public void perform() throws JSExn { callback.unpause(new JSExn(e2)); }});
+        }
+    }
+}