src/org/ibex/mail/target/Script.java

   1 // Copyright 2000-2005 the Contributors, as shown in the revision logs.
   2 // Licensed under the Apache Public Source License 2.0 ("the License").
   3 // You may not use this file except in compliance with the License.
   4
   5 package org.ibex.mail.target;
   6 import org.ibex.js.*;
   7 import org.ibex.util.*;
   8 import org.ibex.mail.*;
   9 import org.ibex.mail.filter.*;
  10 import org.ibex.mail.target.*;
  11 import java.io.*;
  12 import java.util.*;
  13
  14 public class Script extends Target {
  15
  16     private static final JS.Method METHOD = new JS.Method();
  17
  18     private static Script root = null;
  19     private static final String DEFAULT_CONF = File.separatorChar + "etc" + File.separatorChar + "org.ibex.mail.conf";
  20     public static Script root() {
  21         try {
  22             if (root == null) root = new Script(System.getProperty("ibex.mail.conf", DEFAULT_CONF));
  23             return root;
  24         } catch (Exception e) {
  25             Log.error(Script.class, e);
  26             return null;
  27         }
  28     }
  29
  30     final JS js;
  31     private Message m = null;
  32     private String filePath = null;
  33     public Script(String filePath) throws JSExn, IOException {
  34         this.filePath = filePath;
  35         js = JSU.cloneWithNewGlobalScope(JSU.fromReader(filePath, 1, new InputStreamReader(new FileInputStream(filePath))),
  36                                          new ScriptScope()); }
  37
  38     private class ScriptScope extends JS.Immutable {
  39         ScriptEnv env = new ScriptEnv();
  40         public JS get(JS name) throws JSExn {
  41             //#jsswitch(name)
  42             case "m": return m;
  43             case "ibex": return env;
  44             default: return null;
  45             //#end
  46             return null;
  47         }
  48     }
  49
  50     public void accept(Message m) throws IOException, MailException {
  51         try {
  52             new Script(filePath).reallyAccept(m);
  53         } catch (JSExn e) {
  54             Log.error(this, e);
  55             throw new MailException(e.toString());
  56         }
  57     }
  58
  59     private synchronized void reallyAccept(Message m) throws IOException, MailException, JSExn {
  60         this.m = m;
  61         try {
  62             Object ret = js.call(null, new JS[] { m });
  63             Log.debug(this, "configuration script returned " + ret);
  64             if (ret == null) throw new IOException("configuration script returned null");
  65             if (ret instanceof Target)      ((Target)ret).accept(m);
  66             //else if (ret instanceof Filter) ((Filter)ret).process(m);
  67             else throw new IOException("configuration script returned a " + ret.getClass().getName());
  68         } catch (JSExn e) {
  69             Log.warn(this, e);
  70             throw new IOException("configuration script threw an exception");
  71         }
  72     }
  73
  74     // FIXME: this should extend org.ibex.core.Ibex
  75     public class ScriptEnv extends JS.Obj {
  76
  77         private PropertyFile prefs = null;
  78             /*
  79         static {
  80             try {
  81                 // FIXME
  82                 prefs = new PropertyFile(new File("/etc/org.ibex.mail.properties"));
  83             } catch (IOException e) {
  84                 Log.error(ScriptEnv.class, e);
  85             }
  86         }
  87             */
  88
  89         /** lets us put multi-level get/put/call keys all in the same method */
  90         private class Sub extends JS.Immutable {
  91             String key;
  92             Sub(String key) { this.key = key; }
  93             public void put(JS key, JS val) throws JSExn {
  94                 ScriptEnv.this.put(JSU.S(this.key + "." + JSU.toString(key)), val); }
  95             public JS get(JS key) throws JSExn { return ScriptEnv.this.get(JSU.S(this.key + "." + JSU.toString(key))); }
  96             public JS call(JS method, JS[] args) throws JSExn {
  97                 return ScriptEnv.this.call(JSU.S(this.key + "." + JSU.toString(method)), args);
  98             }
  99         }
 100         private Sub getSub(String s) { return new Sub(s); }
 101
 102         public JS get(JS name) throws JSExn {
 103             //#jsswitch(name)
 104             case "math": return ibexMath;
 105             case "string": return ibexString;
 106             case "date": return METHOD;
 107             case "regexp": return METHOD;
 108             case "log": return getSub("log");
 109             case "log.debug": return METHOD;
 110             case "log.info": return METHOD;
 111             case "log.warn": return METHOD;
 112             case "log.error": return METHOD;
 113             case "list": return getSub("list");
 114             case "mail": return getSub("mail");
 115             case "mail.forward": return METHOD;
 116             case "mail.forward2": return METHOD;
 117             case "mail.send": return METHOD;
 118             case "mail.my": return getSub("mail.my");
 119             case "mail.my.prefs": try {
 120                     return new org.ibex.js.Directory(new File("/etc/org.ibex.mail.prefs"));
 121             } catch (IOException e) { throw new JSExn(e.toString()); }
 122             case "mail.my.mailbox":
 123                 FileBasedMailbox root = FileBasedMailbox.getFileBasedMailbox(Mailbox.STORAGE_ROOT, true);
 124                 return root.slash("user", true).slash("megacz", true).slash("newmail", true);
 125             //#end
 126             if (JSU.toString(name).startsWith("list.")) { return MailingList.getList(JSU.toString(name).substring(5)); }
 127             return super.get(name);
 128         }
 129
 130         public JS call(JS name0, JS[] args) throws JSExn {
 131             final JS a = args.length >= 1 ? args[0] : null;
 132             final JS b = args.length >= 2 ? args[1] : null;
 133             final JS c = args.length >= 3 ? args[2] : null;
 134             final int nargs = args.length;
 135             String name = JSU.toString(name0);
 136             try {
 137                 if (name.equals("date")) { return new JSDate(args); }
 138                 if (name.equals("mail.send") || name.equals("send")) {
 139                     JS m = (JS)a;
 140                     StringBuffer headers = new StringBuffer();
 141                     String body = "";
 142                     Address from = null, to = null, envelopeFrom = null, envelopeTo = null;
 143                     JS.Enumeration e = m.keys();
 144                     for(; e.hasNext();) {
 145                         JS key = (JS)e.next();
 146                         JS val = m.get(key) == null ? null : m.get(key);
 147                         if ("body".equalsIgnoreCase(JSU.toString(key))) body = JSU.toString(val);
 148                         else headers.append(JSU.toString(key) + ": " + JSU.toString(val) + "\r\n");
 149                         if ("from".equalsIgnoreCase(JSU.toString(key))) from = Address.parse(JSU.toString(val));
 150                         if ("to".equalsIgnoreCase(JSU.toString(key))) to = Address.parse(JSU.toString(val));
 151                         if ("envelopeFrom".equalsIgnoreCase(JSU.toString(key))) envelopeFrom = Address.parse(JSU.toString(val));
 152                         if ("envelopeTo".equalsIgnoreCase(JSU.toString(key))) envelopeTo = Address.parse(JSU.toString(val));
 153                     }
 154                     if (envelopeTo == null) envelopeTo = to;
 155                     if (envelopeFrom == null) envelopeFrom = from;
 156                     Message message = Message.newMessage(new org.ibex.io.Stream(headers.toString() + "\r\n" + body),
 157                                                          envelopeFrom,
 158                                                          envelopeTo);
 159                     //org.ibex.mail.protocol.SMTP.Outgoing.accept(message);
 160                     boolean ok = org.ibex.mail.protocol.SMTP.Outgoing.attempt(message);
 161                     if (!ok) throw new JSExn("SMTP server rejected message");
 162                     return JSU.T;
 163                 }
 164                 if (name.equals("mail.forward2") || name.equals("forward2")) {
 165                     try {
 166                         Message m2 = Message.newMessage(new org.ibex.io.Stream(m.toString()),
 167                                                         m.envelopeFrom,
 168                                                         new Address(JSU.toString(a)));
 169                         org.ibex.mail.protocol.SMTP.Outgoing.accept(m2);
 170                     } catch (Exception e) {
 171                         Log.warn(this, e);
 172                         throw new JSExn(e.toString());
 173                     }
 174                     return null;
 175                 }
 176                 if (name.equals("mail.forward") || name.equals("forward")) { return new Target() {
 177                         public void accept(Message m) throws MailException {
 178                             try {
 179                                 Message m2 = Message.newMessage(new org.ibex.io.Stream(m.toString()),
 180                                                          m.envelopeFrom,
 181                                                          new Address(a.toString()));
 182                                 org.ibex.mail.protocol.SMTP.Outgoing.accept(m2);
 183                             } catch (Exception e) {
 184                                 throw new MailException(e.toString());
 185                             }
 186                         }
 187                     }; }
 188                 if (name.equals("log.debug") || name.equals("debug")) {    JSU.debug(a== null ? "**null**" : JSU.toString(a)); return null; }
 189                 if (name.equals("log.info") || name.equals("info")) {     JSU.info(a== null ? "**null**" : JSU.toString(a)); return null; }
 190                 if (name.equals("log.warn") || name.equals("warn")) {     JSU.warn(a== null ? "**null**" : JSU.toString(a)); return null; }
 191                 if (name.equals("log.error") || name.equals("error")) {    JSU.error(a== null ? "**null**" : JSU.toString(a)); return null; }
 192                 switch (nargs) {
 193                 case 1:
 194                     if (name.equals("regexp")) {return new JSRegexp(a, null); }
 195                     break;
 196                 case 2:
 197                     if (name.equals("regexp")) {return new JSRegexp(a, b); }
 198                 }
 199             } catch (Exception e) {
 200                 Log.warn(this, "ibex."+name+"() threw: " + e);
 201                 Log.warn(this, e);
 202                 if (e instanceof JSExn) throw ((JSExn)e);
 203                 throw new JSExn("invalid argument for ibex object method "+JSU.toString(name0)+"()");
 204             }
 205             throw new JSExn("invalid number of arguments ("+nargs+") for ibex object method "+JSU.toString(name0)+"()");
 206         }
 207
 208         public final JSMath ibexMath = new JSMath() {
 209                 public JS get(JS name) throws JSExn {
 210                     // FIXME!!!
 211                     /*
 212                     case "isNaN": return gs.get(name);
 213                     case "isFinite": return gs.get(name);
 214                     case "NaN": return gs.get(name);
 215                     case "Infinity": return gs.get(name);
 216                     */
 217                     return null;
 218                 }
 219             };
 220
 221         public final JS ibexString = new JS.Immutable() {
 222                 public JS get(JS name) throws JSExn {
 223                     // FIXME!!!
 224                     /*
 225                     case "parseInt": return gs.get(JSU.S("parseInt"));
 226                     case "parseFloat": return gs.get(JSU.S("parseFloat"));
 227                     case "decodeURI": return gs.get(JSU.S("decodeURI"));
 228                     case "decodeURIComponent": return gs.get(JSU.S("decodeURIComponent"));
 229                     case "encodeURI": return gs.get(JSU.S("encodeURI"));
 230                     case "encodeURIComponent": return gs.get(JSU.S("encodeURIComponent"));
 231                     case "escape": return gs.get(JSU.S("escape"));
 232                     case "unescape": return gs.get(JSU.S("unescape"));
 233                     case "fromCharCode": return gs.get(JSU.S("stringFromCharCode"));
 234                     */
 235                     return null;
 236                 }
 237             };
 238     }
 239 }