added Auto
[org.ibex.mail.git] / src / org / ibex / mail / MailingList.java
index f5fade4..ea0e248 100644 (file)
@@ -9,186 +9,192 @@ import org.ibex.mail.target.*;
 import org.ibex.mail.protocol.*;
 import java.util.*;
 import java.io.*;
+import java.net.*;
 import org.prevayler.*;
 import org.prevayler.Query;
-
-// FEATURE: umbrella structure to mailing lists
-public class MailingList extends Target implements Serializable {
-
-    public static enum UserType         { Administrator, Moderator, Member }
-    public static enum SubscriptionType { All, None, Digest, MimeDigest }
-    public static enum Visibility       { Members, Public, Nobody }
-    public static enum Action           { Accept, Hold, Reject }
-
-    public Address      address;
-    public Mailbox      archive;
-    private final long  secret;
-    private MailingList(Address a, Mailbox ar, long s) { this.address=a; this.archive=ar; this.secret=s; }
-
-    public Hashtable    subscribers = new Hashtable();
-    public Filter[]     filters  = new Filter[0];
-
-    public String       homepage             = "";
-    public String       one_line_description = "";
-    public String       long_description     = "";
-    public String       message_footer       = "";
-
-    public Visibility   listVisibility       = Visibility.Nobody;
-    public Visibility   membershipVisibility = Visibility.Nobody;
-    public Visibility   archiveVisibility    = Visibility.Members;
-    public Action       defaultPostingType   = Action.Hold;
-
-    public int          bounceThreshhold     = 10;
-
-    public static MailingList getList(Object all, String listName) { return (MailingList)((Hashtable)all).get(listName); }
-    public static MailingList getList(final String listName) {
-        try {
-            return (MailingList)p.execute(new Query() { public Object query(Object o, Date now) { return getList(o, listName); } });
-        } catch (Exception e) {
-            Log.error(MailingList.class, e);
-            return null;
-        }
+import javax.servlet.*;
+import javax.servlet.http.*;
+
+public class MailingList implements Target, Iterable<MailingList.Subscriber> {
+
+    // DO NOT move this below the stuff underneath it
+    private MailingList(File path) throws IOException {
+        this.path = path;
+        archive = FileBasedMailbox.getFileBasedMailbox(path.getCanonicalPath(), true);
+        properties = new PropertiesFile(new File(path.getCanonicalPath() + File.separatorChar + "properties"));
+        address = new Address(properties.get("address"));
+        homepage = properties.get("homepage");
+        one_line_description = properties.get("description");
+        message_footer = properties.get("footer");
     }
 
-    public synchronized Subscriber getSubscriber(Address subscriber) {
-        Subscriber s = (Subscriber)subscribers.get(subscriber.toString(false));
-        if (s == null) subscribers.put(subscriber, s = new Subscriber());
-        return s;
+    public void banner(HttpServletRequest request, HttpServletResponse response) throws IOException {
+        String basename = request.getServletPath();
+        PrintWriter pw = new PrintWriter(response.getWriter());
+        pw.println("<html>");
+        pw.println("  <body>");
+        String confirm = request.getParameter("confirm");
+        if (confirm != null) {
+            Subscribe sub = (Subscribe)Confirmation.decode(confirm, Long.parseLong(properties.get("secret")), new Date());
+            String email = sub.email;
+            synchronized(this) {
+                String path = this.path.getAbsolutePath() + File.separatorChar + "subscribers" + File.separatorChar + sub.email;
+                if (sub.un) new File(path).delete();
+                else {
+                    Log.warn(null, "creating " + path);
+                    new FileOutputStream(path).close();
+                }
+            }
+            pw.println("    <b>successfully "+sub.adj+"d " + email + " to " + properties.get("address"));
+        } else {
+            pw.println("    <b>"+properties.get("address")+"</b><br>");
+            pw.println("    <tt><a href="+properties.get("nntp")+">"+properties.get("nntp")+"</a></tt><br>");
+            String action = request.getParameter("action");
+            String email = request.getParameter("email");
+            if (action != null) {
+                Subscribe sub = new Subscribe(email, request.getRequestURL().toString(), action.equals("unsubscribe"));
+                sub.signAndSend(new Address(properties.get("owner")), Long.parseLong(properties.get("secret")), new Date());
+                pw.println("a confirmation email has been sent to " + email + "; click the enclosed link to confirm your request to " + action);
+            } else {
+                pw.println("    <form action='"+basename+"' method=post name=form1>");
+                pw.println("       <input type=text width=100 value='your@email.com' name=email>");
+                pw.println("       <input type=hidden name=frame value=banner>");
+                pw.println("       <select name=action onchange='form1.submit()'>");
+                pw.println("          <option>--choose action--</option>");
+                pw.println("          <option>subscribe</option>");
+                pw.println("          <option>unsubscribe</option>");
+                pw.println("       </select>");
+                pw.println("    </form>");
+            }
+        }
+        pw.println("  </body>");
+        pw.println("</html>");
+        pw.flush();
+        pw.close();
     }
 
-    public static class Subscriber implements Serializable {
-        public  Address          address;
-        public  Action           posting;
-        public  UserType         type;
-        public  SubscriptionType subscription;
-        public  boolean          send_copy_of_own_post;
-        public  boolean          filter_duplicates_when_ccd;
+    public class Subscribe extends Confirmation {
+        public String email;
+        public String basename;
+        public boolean un;
+        public String adj;
+        public Subscribe(String email, String basename, boolean un) {
+            super(new Address(email), new Date().getTime() + (1000 * 60 * 60 * 24));
+            this.email = email;
+            this.basename = basename;
+            this.un = un;
+            this.adj = un ? "unsubscribe" : "subscribe";
+        }
+        public String getDescription() { return adj + " " + email + " to " + properties.get("address"); }
+        public String getURL(String tail) { return basename + "?frame=banner&confirm="+URLEncoder.encode(tail); }
     }
-    
-    //public static class Filter {
-    //    public class EmergencyModerationFilter { }
-    //    public class MaximumLengthFilter { }
-    //    public class SpamFilter { }
-    //    public class MIMETypes { }
-    //    public class MungeReplyTo { }
-    //    public class AnonymizeSender { public boolean uncorrelated; }
-    //}
 
+    private final File             path;
+    private final FileBasedMailbox archive;
+    private final PropertiesFile   properties;
 
-    public void accept(Message m) throws IOException, MailException {
-        try {
-            m = Message.newMessage(new Fountain.StringFountain("List-Id: " + one_line_description + "<"+address+">\r\n" +
-                                       m.toString() +
-                                       "--\r\n" +
-                                       message_footer + "\r\n" +
-                                       "to unsubscribe, go to " + homepage + "\r\n"));
-        } catch (Exception e2) {
-            Log.error("[list]", e2);
-            throw new IOException(e2.toString());
-        }
-        Log.warn(MailingList.class, "got message " + m.subject);
-        archive.accept(m);
-        try {
-            String[] subscribers = (String[])p.execute(subscribers());
-            Log.warn("**", "length is " + subscribers.length);
-            for(int i=0; i<subscribers.length; i++) {
-                String s = subscribers[i];
-                try {
-                    Log.warn(MailingList.class, "  trying " + s);
-                    /* FIXME
-                    SMTP.Outgoing.accept(Message.newMessage(new Fountain.StringFountain(m.toString()),
-                                                            address, Address.parse(s)));
-                    */
-                    Log.warn("[list]", "successfully sent to " + s);
-                } catch (Exception e2) {
-                    Log.error("[list]", e2);
-                }
-            }
-        } catch (Exception e2) {
-            Log.error("[list]", e2);
-        }
-    }
+    private final long             secret               = new Random().nextLong();
+    public  final Address          address;
+    public        String           homepage;
 
+    public        String           one_line_description;
+    public        String           message_footer;
 
-    // Transactions ///////////////////////////////////////////////////////////////////////////
+    public        int              bounceThreshhold     = 10;
 
+    public static class Subscriber {
+        public Subscriber(Address a) { this.address = a; }
+        public  Address          address;
+    }
 
-    //////////////////////////////////////////////////////////////////////////////
 
-    public static final String ROOT   = System.getProperty("ibex.mail.list.root", Mailbox.STORAGE_ROOT+File.separatorChar+"lists");
-    public static Prevayler p;
-    static { try {
-        PrevaylerFactory pf = new PrevaylerFactory();
-        //pf.configureSnapshotManager(new org.prevayler.implementation.snapshot.XmlSnapshotManager(new Hashtable(), ROOT));
-        pf.configurePrevalenceBase(ROOT);
-        p = pf.create();
-    } catch (Exception e) { Log.error(MailingList.class, e); } }
+    // Pooling //////////////////////////////////////////////////////////////////////////////
 
-    public static Transaction subscribeNewUser(final Address user, final String list) {
-        return new Transaction() { public void executeOn(final Object o, final Date now) {        
-            try {
-                new AlterSubscription(user,
-                                      now.getTime() + 1000*60*60*24,
-                                      list,
-                                      SubscriptionType.All).signAndSend(getList(o, list).secret, now);
-            } catch (Exception e) {
-                Log.error(MailingList.class, e);
+    
+    public Iterator<Subscriber> iterator() {
+        final File subdir = new File(path.getAbsolutePath() + File.separatorChar + "subscribers");
+        if (!subdir.exists()) subdir.mkdirs();
+        final String[] subs = !subdir.isDirectory() ? new String[0] : subdir.list();
+        return new Iterator<Subscriber>() {
+            int i=0;
+            Subscriber prep = null;
+            public void remove() {
+                try {
+                    new File(subdir.getAbsolutePath() + File.separatorChar + subs[i++]).delete();
+                } catch (Exception e) {
+                    Log.error(MailingList.class, e);
+                }
             }
-        } }; }
-
-    /*
-    static {
-        try {
-            if (getList("test") == null) {
-                Mailbox archive = FileBasedMailbox.getFileBasedMailbox("/var/org.ibex.mail/lists/test@testing.megacz.com", true);
-                p.execute(create(Address.parse("test@testing.megacz.com"), archive));
-                p.execute(new Transaction() { public void executeOn(Object all, Date now) {
-                    getList(all, "test@testing.megacz.com").getSubscriber(Address.parse("megacz@gmail.com")).subscription = SubscriptionType.All;
-                }});
+            public boolean hasNext() { if (prep==null) prep = next(); return prep!=null; }
+            public Subscriber next() {
+                if (prep!=null) { Subscriber ret = prep; prep = null; return ret; }
+                while(i<subs.length) {
+                    if (subs[i].indexOf('@')==-1) i++;
+                    else try {
+                        return new Subscriber(new Address(subs[i++]));
+                    } catch (Exception e) {
+                        Log.warn(MailingList.class, e);
+                        continue;
+                    }
+                }
+                return null;
             }
-        } catch (Exception e) {
-            Log.error(List.class, e);
-        }
+        };
     }
-    */
 
-    public static Transaction create(final Address address, final Mailbox archive) {
-        final long random = new Random().nextLong();
-        return new Transaction() { public void executeOn(Object all, Date now) {
-            ((Hashtable)all).put(address.toString(false), new MailingList(address, archive, random)); } };
+    private static HashMap<String,MailingList> cache = new HashMap<String,MailingList>();
+    public static MailingList getMailingList(String path) throws IOException { return getMailingList(new File(path)); }
+    public static MailingList getMailingList(File path) throws IOException {
+        if (!path.exists()) path.mkdirs();
+        MailingList ret = cache.get(path.getCanonicalPath());
+        if (ret==null) cache.put(path.getCanonicalPath(), ret = new MailingList(path));
+        return ret;
     }
 
-    public static Transaction delete(final Address address) {
-        return new Transaction() { public void executeOn(Object o,Date now) {
-            ((Hashtable)o).remove(address.toString(false)); } }; }
+    // Methods //////////////////////////////////////////////////////////////////////////////
 
-    public static Query all() { return new Query() { public Object query(Object o, Date now) {
-        Hashtable all = (Hashtable)o;
-        MailingList[] ret = new MailingList[all.size()];
-        java.util.Enumeration e = all.elements();
-        for(int i=0; i<ret.length; i++) ret[i] = (MailingList)e.nextElement();
-        return ret;
-    } }; }
+    public Mailbox getArchive() throws IOException { return archive; }
 
-    public Query subscribers() { return new Query() { public Object query(Object o, Date now) {
-        Hashtable all = (Hashtable)o;
-        String[] ret = new String[subscribers.size()];
-        java.util.Enumeration e = subscribers.keys();
-        for(int i=0; i<ret.length; i++) ret[i] = e.nextElement().toString();
-        return ret;
-    } }; }
-
-    public static Query forAddress(final Address a) { return new Query() {
-            public Object query(Object o, Date now) {
-                return ((Hashtable)o).get(a.toString(false)); } }; }
-
-    public static class AlterSubscription extends Confirmation {
-        public transient SubscriptionType newType = SubscriptionType.All;
-        public String list;
-        protected AlterSubscription(Address who, long expiration, String list, SubscriptionType newType) {
-            super(who, expiration); this.newType = newType; this.list = list; }
-        public String getDescription() { return "change your subscription"; }
-        public void executeOn(Object all, Date now) { getList(all, list).getSubscriber(who).subscription = newType; }
+    public void accept(Message m) throws IOException, MailException {
+        StringBuffer buf = new StringBuffer();
+        m.getBody().getStream().transcribe(buf);
+        Headers head = new Headers(m.headers.getStream());
+        head.put("List-Id", one_line_description + "<"+address+">");
+        head.put("Subject", properties.get("prefix") + " " + head.get("Subject"));
+        
+        m = Message.newMessage(new Fountain.StringFountain(head.getString()+"\r\n"+buf.toString()));
+        Log.warn(MailingList.class, "archiving list message " + m.subject);
+        getArchive().accept(m);
+
+        for(Subscriber s : this) try {
+            Log.warn(MailingList.class, "  trying " + s.address);
+            SMTP.accept(Message.newMessage(m, m.envelopeFrom, s.address));
+            Log.warn("[list]", "successfully sent to " + s);
+        } catch (Exception e2) { Log.error("[list]", e2); }
     }
 
+    //public Filter[]     filters  = new Filter[0];
+    //public static class Filter {
+    //    public class EmergencyModerationFilter { }
+    //    public class MaximumLengthFilter { }
+    //    public class SpamFilter { }
+    //    public class MIMETypes { }
+    //    public class MungeReplyTo { }
+    //    public class AnonymizeSender { public boolean uncorrelated; }
+    //}
 }    
+
+    //public static enum UserType         { Administrator, Moderator, Member }
+    //public static enum SubscriptionType { All, None, Digest, MimeDigest }
+    //public static enum Visibility       { Members, Public, Nobody }
+    //public static enum Action           { Accept, Hold, Reject }
+    //public        Visibility       listVisibility       = Visibility.Nobody;
+    //public        Visibility       membershipVisibility = Visibility.Nobody;
+    //public        Visibility       archiveVisibility    = Visibility.Members;
+    //public        Action           defaultPostingType   = Action.Hold;
+
+        //public  Action           posting = Action.Accept;
+        //public  UserType         type = UserType.Member;
+        //public  SubscriptionType subscription = SubscriptionType.All;
+        //public  boolean          send_copy_of_own_post = false;
+        //public  boolean          filter_duplicates_when_ccd = true;