450e7e
diff -up /dev/null cyrus-imapd-2.3.15/imap/autosieve.c
450e7e
--- /dev/null	2009-09-11 15:21:01.808252010 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/autosieve.c	2009-09-18 11:11:39.778115814 +0200
450e7e
@@ -0,0 +1,590 @@
450e7e
+#include <stdio.h>
450e7e
+#include <stdlib.h>
450e7e
+#include <string.h>
450e7e
+
450e7e
+#ifdef HAVE_UNISTD_H
450e7e
+#include <unistd.h>
a6d65f
+#endif
d0d307
+
450e7e
+#include <errno.h>
450e7e
+#include <sys/types.h>
450e7e
+#include <sys/stat.h>
450e7e
+#include <sys/uio.h>
450e7e
+#include <fcntl.h>
450e7e
+#include <ctype.h>
450e7e
+#include <time.h>
450e7e
+#include <syslog.h>
450e7e
+#include <com_err.h>
450e7e
+#include <config.h>
d0d307
+
450e7e
+#include "global.h"
450e7e
+#include "util.h"
450e7e
+#include "xmalloc.h"
450e7e
+#include "xstrlcpy.h"
450e7e
+#include "xstrlcat.h"
450e7e
+#include "mailbox.h"
450e7e
+#include "imap_err.h"
450e7e
+#include "sieve_interface.h"
450e7e
+#include "script.h"
cf58a5
+
450e7e
+#define TIMSIEVE_FAIL 	-1
450e7e
+#define TIMSIEVE_OK 	0
450e7e
+#define MAX_FILENAME	1024
d0d307
+
450e7e
+static int get_script_name(char *sievename, size_t buflen, const char *filename);
450e7e
+static int get_script_dir(char *sieve_script_dir, size_t buflen, char *userid, const char *sieve_dir);
450e7e
+int autoadd_sieve(char *userid, const char *source_script);
d0d307
+
450e7e
+//static void fatal(const char *s, int code);
450e7e
+static void foo(void);
450e7e
+static int sieve_notify(void *ac __attribute__((unused)),
450e7e
+                        void *interp_context __attribute__((unused)),
450e7e
+                        void *script_context __attribute__((unused)),
450e7e
+                        void *message_context __attribute__((unused)),
450e7e
+                        const char **errmsg __attribute__((unused)));
450e7e
+static int mysieve_error(int lineno, const char *msg,
450e7e
+                  void *i __attribute__((unused)), void *s);
450e7e
+static int is_script_parsable(FILE *stream, char **errstr, sieve_script_t **ret);
450e7e
+
450e7e
+
450e7e
+sieve_vacation_t vacation2 = {
450e7e
+    0,                          /* min response */
450e7e
+    0,                          /* max response */
450e7e
+    (sieve_callback *) &foo,    /* autorespond() */
450e7e
+    (sieve_callback *) &foo     /* send_response() */
450e7e
+};
d0d307
+
d0d307
+
a6d65f
+/*
450e7e
+ * Find the name of the sieve script
450e7e
+ * given the source script and compiled script names
a6d65f
+ */
450e7e
+static int get_script_name(char *sievename, size_t buflen, const char *filename)
450e7e
+{
450e7e
+  char *p;
a6d65f
+  int r;
d0d307
+
450e7e
+  p = strrchr(filename, '/');
450e7e
+  if (p == NULL)
450e7e
+      p = (char *) filename;
450e7e
+  else
450e7e
+      p++;
d0d307
+
450e7e
+  r = strlcpy(sievename, p, buflen) - buflen;
450e7e
+  return (r >= 0 || r == -buflen ? 1 : 0);
a6d65f
+}
d0d307
+
d0d307
+
a6d65f
+/*
450e7e
+ * Find the directory where the sieve scripts of the user
450e7e
+ * reside
a6d65f
+ */
450e7e
+static int get_script_dir(char *sieve_script_dir, size_t buflen, char *userid, const char *sieve_dir)
450e7e
+{
450e7e
+    char *user = NULL, *domain = NULL;
d0d307
+
450e7e
+    /* Setup the user and the domain */
450e7e
+    if(config_virtdomains && (domain = strchr(userid, '@'))) {
450e7e
+        user = (char *) xmalloc((domain - userid +1) * sizeof(char));
450e7e
+        strlcpy(user, userid, domain - userid + 1);
450e7e
+        domain++;
450e7e
+    } else
450e7e
+        user = userid;
d0d307
+
450e7e
+    /*  Find the dir path where the sieve scripts of the user will reside */   
450e7e
+    if (config_virtdomains && domain) {
450e7e
+         if(snprintf(sieve_script_dir, buflen, "%s%s%c/%s/%c/%s/",
450e7e
+              sieve_dir, FNAME_DOMAINDIR, dir_hash_c(domain, config_fulldirhash), domain, dir_hash_c(user,config_fulldirhash), user) >= buflen) {
450e7e
+                 free(user);
450e7e
+                 return 1;
450e7e
+ 	 }
450e7e
+    } else {
450e7e
+         if(snprintf(sieve_script_dir, buflen, "%s/%c/%s/", 
450e7e
+     	      sieve_dir, dir_hash_c(user,config_fulldirhash), user) >= buflen) 
450e7e
+                 return 1;
450e7e
+    }
d0d307
+
450e7e
+    /* Free the xmalloced user memory, reserved above */
450e7e
+    if(user != userid)
450e7e
+        free(user);
d0d307
+
450e7e
+    return 0;
450e7e
+}
d0d307
+
450e7e
+int autoadd_sieve(char *userid, const char *source_script)
450e7e
+{   
450e7e
+    sieve_script_t *s = NULL;
450e7e
+    bytecode_info_t *bc = NULL;
450e7e
+    char *err = NULL;
450e7e
+    FILE *in_stream, *out_fp;
450e7e
+    int out_fd, in_fd, r, k;
450e7e
+    int do_compile = 0;
450e7e
+    const char *sieve_dir = NULL;
450e7e
+    const char *compiled_source_script = NULL;
450e7e
+    char sievename[MAX_FILENAME];
450e7e
+    char sieve_script_name[MAX_FILENAME];
450e7e
+    char sieve_script_dir[MAX_FILENAME];
450e7e
+    char sieve_bcscript_name[MAX_FILENAME];
450e7e
+    char sieve_default[MAX_FILENAME];
450e7e
+    char sieve_tmpname[MAX_FILENAME];
450e7e
+    char sieve_bctmpname[MAX_FILENAME];
450e7e
+    char sieve_bclink_name[MAX_FILENAME];
450e7e
+    char buf[4096];
450e7e
+    mode_t oldmask;
450e7e
+    struct stat statbuf;
450e7e
+
450e7e
+    /* We don't support using the homedirectory, like timsieved */
450e7e
+    if (config_getswitch(IMAPOPT_SIEVEUSEHOMEDIR)) {
450e7e
+        syslog(LOG_WARNING,"autocreate_sieve: autocreate_sieve does not work with sieveusehomedir option in imapd.conf");
450e7e
+        return 1;
a6d65f
+    }
d0d307
+
450e7e
+    /* Check if sievedir is defined in imapd.conf */
450e7e
+    if(!(sieve_dir = config_getstring(IMAPOPT_SIEVEDIR))) { 
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: sievedir option is not defined. Check imapd.conf");
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    /* Check if autocreate_sieve_compiledscript is defined in imapd.conf */
450e7e
+    if(!(compiled_source_script  = config_getstring(IMAPOPT_AUTOCREATE_SIEVE_COMPILEDSCRIPT))) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: autocreate_sieve_compiledscript option is not defined. Compiling it");
450e7e
+        do_compile = 1;
450e7e
+    }
d0d307
+
450e7e
+    if(get_script_dir(sieve_script_dir, sizeof(sieve_script_dir), userid, sieve_dir)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Cannot find sieve scripts directory");
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    if (get_script_name(sievename, sizeof(sievename), source_script)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve script %s", source_script);
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    if(snprintf(sieve_tmpname, sizeof(sieve_tmpname), "%s%s.script.NEW",sieve_script_dir, sievename) >= sizeof(sieve_tmpname)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    if(snprintf(sieve_bctmpname, sizeof(sieve_bctmpname), "%s%s.bc.NEW",sieve_script_dir, sievename) >= sizeof(sieve_bctmpname)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }    
450e7e
+    if(snprintf(sieve_script_name, sizeof(sieve_script_name), "%s%s.script",sieve_script_dir, sievename) >= sizeof(sieve_script_name)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    if(snprintf(sieve_bcscript_name, sizeof(sieve_bcscript_name), "%s%s.bc",sieve_script_dir, sievename) >= sizeof(sieve_bcscript_name)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    if(snprintf(sieve_default, sizeof(sieve_default), "%s%s",sieve_script_dir,"defaultbc") >= sizeof(sieve_default)) {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    if(snprintf(sieve_bclink_name, sizeof(sieve_bclink_name), "%s.bc", sievename) >= sizeof(sieve_bclink_name))  {
450e7e
+        syslog(LOG_WARNING, "autocreate_sieve: Invalid sieve path %s, %s, %s", sieve_dir, sievename, userid);
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    /* Check if a default sieve filter alrady exists */
450e7e
+    if(!stat(sieve_default,&statbuf)) {
450e7e
+        syslog(LOG_WARNING,"autocreate_sieve: Default sieve script already exists");
450e7e
+        fclose(in_stream);
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    /* Open the source script. if there is a problem with that exit */
450e7e
+    in_stream = fopen(source_script, "r");
450e7e
+    if(!in_stream) {
450e7e
+        syslog(LOG_WARNING,"autocreate_sieve: Unable to open sieve script %s. Check permissions",source_script);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    
450e7e
+    
450e7e
+    /* 
450e7e
+     * At this point we start the modifications of the filesystem 
450e7e
+     */
450e7e
+
450e7e
+    /* Create the directory where the sieve scripts will reside */
450e7e
+    r = cyrus_mkdir(sieve_script_dir, 0755);
450e7e
+    if(r == -1) {
450e7e
+        /* If this fails we just leave */
450e7e
+        syslog(LOG_WARNING,"autocreate_sieve: Unable to create directory %s. Check permissions",sieve_script_name);
450e7e
+        return 1;
450e7e
+    }
450e7e
+
450e7e
+    /*
450e7e
+     * We open the file that will be used as the bc file. If this file exists, overwrite it 
450e7e
+     * since something bad has happened. We open the file here so that this error checking is
450e7e
+     * done before we try to open the rest of the files to start copying etc. 
450e7e
+     */
450e7e
+    out_fd = open(sieve_bctmpname, O_CREAT|O_TRUNC|O_WRONLY, S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH);
450e7e
+    if(out_fd < 0) {
450e7e
+        if(errno == EEXIST) {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: File %s already exists. Probaly left over. Ignoring",sieve_bctmpname);
450e7e
+        } else if (errno == EACCES) {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: No access to create file %s. Check permissions",sieve_bctmpname);
450e7e
+            fclose(in_stream);
450e7e
+            return 1;
a6d65f
+        } else {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: Unable to create %s. Unknown error",sieve_bctmpname);
450e7e
+            fclose(in_stream);
450e7e
+            return 1;
a6d65f
+        }
a6d65f
+    }
d0d307
+
450e7e
+    if(!do_compile && compiled_source_script && (in_fd = open(compiled_source_script, O_RDONLY)) != -1) {
450e7e
+        while((r = read(in_fd, buf, sizeof(buf))) > 0) {
450e7e
+            if((k=write(out_fd, buf,r)) < 0) {
450e7e
+                syslog(LOG_WARNING, "autocreate_sieve: Error writing to file: %s, error: %d", sieve_bctmpname, errno);
450e7e
+                close(out_fd);
450e7e
+                close(in_fd);
450e7e
+                fclose(in_stream);
450e7e
+                unlink(sieve_bctmpname);
450e7e
+                return 1;
450e7e
+           }
450e7e
+        } 
d0d307
+
450e7e
+        if(r == 0) { /* EOF */
450e7e
+            close(out_fd);
450e7e
+            close(in_fd);
450e7e
+        } else if (r < 0) {
450e7e
+            syslog(LOG_WARNING, "autocreate_sieve: Error reading compiled script file: %s. Will try to compile it", 
450e7e
+                           compiled_source_script);
450e7e
+            close(in_fd);
450e7e
+            do_compile = 1;
450e7e
+            if(lseek(out_fd, 0, SEEK_SET)) {
450e7e
+                syslog(LOG_WARNING, "autocreate_sieve: Major IO problem. Aborting");
450e7e
+                return 1;
450e7e
+            }
450e7e
+        }
450e7e
+        close(in_fd);
450e7e
+    } else {
450e7e
+        if(compiled_source_script)
450e7e
+              syslog(LOG_WARNING,"autocreate_sieve: Problem opening compiled script file: %s. Compiling it", compiled_source_script);
450e7e
+        do_compile = 1;
450e7e
+    }
d0d307
+
d0d307
+
450e7e
+    /* Because we failed to open a precompiled bc sieve script, we compile one */
450e7e
+    if(do_compile) {
450e7e
+       if(is_script_parsable(in_stream,&err, &s) == TIMSIEVE_FAIL) {
450e7e
+            if(err && *err) {
450e7e
+               syslog(LOG_WARNING,"autocreate_sieve: Error while parsing script %s.",err);
450e7e
+               free(err);
450e7e
+            } else
450e7e
+                syslog(LOG_WARNING,"autocreate_sieve: Error while parsing script");
450e7e
+    
450e7e
+            unlink(sieve_bctmpname);
450e7e
+            fclose(in_stream);
450e7e
+            close(out_fd);
450e7e
+            return 1;
450e7e
+        }
d0d307
+
450e7e
+        /* generate the bytecode */
450e7e
+        if(sieve_generate_bytecode(&bc, s) == TIMSIEVE_FAIL) {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: problem compiling sieve script");
450e7e
+            /* removing the copied script and cleaning up memory */
450e7e
+            unlink(sieve_bctmpname);
450e7e
+            sieve_script_free(&s);
450e7e
+            fclose(in_stream);
450e7e
+            close(out_fd);
450e7e
+            return 1;
450e7e
+        }
d0d307
+
450e7e
+        if(sieve_emit_bytecode(out_fd, bc) == TIMSIEVE_FAIL) {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: problem emiting sieve script");
450e7e
+            /* removing the copied script and cleaning up memory */
450e7e
+            unlink(sieve_bctmpname);
450e7e
+            sieve_free_bytecode(&bc);
450e7e
+            sieve_script_free(&s);
450e7e
+            fclose(in_stream);
450e7e
+            close(out_fd);
450e7e
+            return 1;
450e7e
+        }
d0d307
+
450e7e
+        /* clean up the memory */
450e7e
+        sieve_free_bytecode(&bc);
450e7e
+        sieve_script_free(&s);
a6d65f
+    }
d0d307
+
450e7e
+    close(out_fd);
450e7e
+    rewind(in_stream);
d0d307
+
450e7e
+    /* Copy the initial script */
450e7e
+    oldmask = umask(077);
450e7e
+    if((out_fp = fopen(sieve_tmpname, "w")) == NULL) {
450e7e
+        syslog(LOG_WARNING,"autocreate_sieve: Unable to open %s destination sieve script", sieve_tmpname);
450e7e
+        unlink(sieve_bctmpname);
450e7e
+        umask(oldmask);
450e7e
+        fclose(in_stream);
450e7e
+        return 1;
450e7e
+    }
450e7e
+    umask(oldmask);
d0d307
+
450e7e
+    while((r = fread(buf,sizeof(char), sizeof(buf), in_stream))) {
450e7e
+        if( fwrite(buf,sizeof(char), r, out_fp) != r) {
450e7e
+            syslog(LOG_WARNING,"autocreate_sieve: Problem writing to sieve script file: %s",sieve_tmpname);
450e7e
+            fclose(out_fp);
450e7e
+            unlink(sieve_tmpname);
450e7e
+            unlink(sieve_bctmpname);
450e7e
+            fclose(in_stream);
450e7e
+            return 1;
450e7e
+        }
450e7e
+    }
450e7e
+    
450e7e
+    if(feof(in_stream)) {
450e7e
+        fclose(out_fp);
450e7e
+    } else { /* ferror */
450e7e
+        fclose(out_fp);
450e7e
+        unlink(sieve_tmpname);
450e7e
+        unlink(sieve_bctmpname);
450e7e
+        fclose(in_stream);
450e7e
+        return 1;
450e7e
+    }
d0d307
+
450e7e
+    /* Renaming the necessary stuff */
450e7e
+    if(rename(sieve_tmpname, sieve_script_name)) {
450e7e
+        unlink(sieve_tmpname);
450e7e
+        unlink(sieve_bctmpname);
450e7e
+        return 1;
450e7e
+    }
cf58a5
+
450e7e
+    if(rename(sieve_bctmpname, sieve_bcscript_name)) {
450e7e
+        unlink(sieve_bctmpname);
450e7e
+        unlink(sieve_bcscript_name);
450e7e
+        return 1;
450e7e
+    }
450e7e
+
450e7e
+    /* end now with the symlink */
450e7e
+    if(symlink(sieve_bclink_name, sieve_default)) {
450e7e
+        if(errno != EEXIST) {
450e7e
+            syslog(LOG_WARNING, "autocreate_sieve: problem making the default link.");
450e7e
+            /* Lets delete the files */
450e7e
+            unlink(sieve_script_name);
450e7e
+            unlink(sieve_bcscript_name);
450e7e
+        }
450e7e
+    }
d0d307
+
a6d65f
+    /* 
450e7e
+     * If everything has succeeded AND we have compiled the script AND we have requested
450e7e
+     * to generate the global script so that it is not compiled each time then we create it.
a6d65f
+     */
450e7e
+    if(do_compile && 
450e7e
+          config_getswitch(IMAPOPT_GENERATE_COMPILED_SIEVE_SCRIPT)) {
450e7e
+
450e7e
+        if(!compiled_source_script) {
450e7e
+            syslog(LOG_WARNING, "autocreate_sieve: To save a compiled sieve script, autocreate_sieve_compiledscript must have been defined in imapd.conf");
450e7e
+            return 0;
450e7e
+        }
450e7e
+
450e7e
+        if(snprintf(sieve_tmpname, sizeof(sieve_tmpname), "%s.NEW", compiled_source_script) >= sizeof(sieve_tmpname))
450e7e
+            return 0;
d0d307
+
a6d65f
+        /*
450e7e
+         * Copy everything from the newly created bc sieve sieve script.
a6d65f
+         */
450e7e
+        if((in_fd = open(sieve_bcscript_name, O_RDONLY))<0) {
450e7e
+            return 0;
450e7e
+        }
d0d307
+
450e7e
+        if((out_fd = open(sieve_tmpname, O_CREAT|O_EXCL|O_WRONLY, S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH)) < 0) {
450e7e
+            if(errno == EEXIST) {
450e7e
+               /* Someone is already doing this so just bail out. */
450e7e
+               syslog(LOG_WARNING, "autocreate_sieve: %s already exists. Some other instance processing it, or it is left over", sieve_tmpname);
450e7e
+                close(in_fd);
450e7e
+                return 0; 
450e7e
+            } else if (errno == EACCES) {
450e7e
+                syslog(LOG_WARNING,"autocreate_sieve: No access to create file %s. Check permissions",sieve_tmpname);
450e7e
+                close(in_fd);
450e7e
+                return 0;
450e7e
+            } else {
450e7e
+                syslog(LOG_WARNING,"autocreate_sieve: Unable to create %s",sieve_tmpname);
450e7e
+                close(in_fd);
450e7e
+                return 0;
450e7e
+            }
a6d65f
+        }
cf58a5
+
450e7e
+        while((r = read(in_fd, buf, sizeof(buf))) > 0) {
450e7e
+            if((k = write(out_fd,buf,r)) < 0) {
450e7e
+                syslog(LOG_WARNING, "autocreate_sieve: Error writing to file: %s, error: %d", sieve_tmpname, errno);
450e7e
+                close(out_fd);
450e7e
+                close(in_fd);
450e7e
+                unlink(sieve_tmpname);
450e7e
+                return 0;
450e7e
+           }
450e7e
+        }
a6d65f
+
450e7e
+        if(r == 0 ) { /*EOF */
450e7e
+            close(out_fd);
450e7e
+            close(in_fd);
450e7e
+        } else if (r < 0) {
450e7e
+                syslog(LOG_WARNING, "autocreate_sieve: Error writing to file: %s, error: %d", sieve_tmpname, errno);
450e7e
+                close(out_fd);
450e7e
+                close(in_fd);
450e7e
+                unlink(sieve_tmpname);
450e7e
+                return 0;
450e7e
+        }
a6d65f
+
450e7e
+        /* Rename the temporary created sieve script to its final name. */
450e7e
+        if(rename(sieve_tmpname, compiled_source_script)) {
450e7e
+            if(errno != EEXIST) {
450e7e
+               unlink(sieve_tmpname);
450e7e
+               unlink(compiled_source_script);
450e7e
+        }
450e7e
+            return 0;
450e7e
+        }
a6d65f
+
450e7e
+        syslog(LOG_NOTICE, "autocreate_sieve: Compiled sieve script was successfully saved in %s", compiled_source_script);
a6d65f
+    }
a6d65f
+
450e7e
+    return 0;
450e7e
+}
a6d65f
+
450e7e
+/*static void fatal(const char *s, int code)
450e7e
+{   
450e7e
+    printf("Fatal error: %s (%d)\r\n", s, code);
450e7e
+    exit(1);
450e7e
+}*/
a6d65f
+
450e7e
+/* to make larry's stupid functions happy :) */
450e7e
+static void foo(void)
450e7e
+{
450e7e
+    fatal("stub function called", 0);
450e7e
+}
a6d65f
+
450e7e
+static int sieve_notify(void *ac __attribute__((unused)),
450e7e
+                        void *interp_context __attribute__((unused)),
450e7e
+                        void *script_context __attribute__((unused)),
450e7e
+                        void *message_context __attribute__((unused)),
450e7e
+                        const char **errmsg __attribute__((unused)))
450e7e
+{
450e7e
+    fatal("stub function called", 0);
450e7e
+    return SIEVE_FAIL;
450e7e
+}
a6d65f
+
450e7e
+static int mysieve_error(int lineno, const char *msg,
450e7e
+                  void *i __attribute__((unused)), void *s)
450e7e
+{
450e7e
+    char buf[1024];
450e7e
+    char **errstr = (char **) s;
a6d65f
+
450e7e
+    snprintf(buf, 80, "line %d: %s\r\n", lineno, msg);
450e7e
+    *errstr = (char *) xrealloc(*errstr, strlen(*errstr) + strlen(buf) + 30);
450e7e
+    syslog(LOG_DEBUG, "%s", buf);
450e7e
+    strcat(*errstr, buf);
a6d65f
+
450e7e
+    return SIEVE_OK;
450e7e
+}
a6d65f
+
450e7e
+/* end the boilerplate */
a6d65f
+
450e7e
+/* returns TRUE or FALSE */
450e7e
+int is_script_parsable(FILE *stream, char **errstr, sieve_script_t **ret)
450e7e
+{
450e7e
+    sieve_interp_t *i;
450e7e
+    sieve_script_t *s;
450e7e
+    int res;
a6d65f
+
450e7e
+    res = sieve_interp_alloc(&i, NULL);
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_interp_alloc() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_redirect(i, (sieve_callback *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_redirect() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
450e7e
+    res = sieve_register_discard(i, (sieve_callback *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_discard() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
450e7e
+    res = sieve_register_reject(i, (sieve_callback *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_reject() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
450e7e
+    res = sieve_register_fileinto(i, (sieve_callback *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_fileinto() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
450e7e
+    res = sieve_register_keep(i, (sieve_callback *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_keep() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_imapflags(i, NULL);
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_imapflags() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_size(i, (sieve_get_size *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_size() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_header(i, (sieve_get_header *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_header() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_envelope(i, (sieve_get_envelope *) &foo;;
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_envelope() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_vacation(i, &vacation2);
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_vacation() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    res = sieve_register_notify(i, &sieve_notify);
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_notify() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
a6d65f
+    }
a6d65f
+
450e7e
+    res = sieve_register_parse_error(i, &mysieve_error);
450e7e
+    if (res != SIEVE_OK) {
450e7e
+        syslog(LOG_WARNING, "sieve_register_parse_error() returns %d\n", res);
450e7e
+        return TIMSIEVE_FAIL;
450e7e
+    }
a6d65f
+
450e7e
+    rewind(stream);
a6d65f
+
450e7e
+    *errstr = (char *) xmalloc(20 * sizeof(char));
450e7e
+    strcpy(*errstr, "script errors:\r\n");
450e7e
+
450e7e
+    res = sieve_script_parse(i, stream, errstr, &s);
450e7e
+
450e7e
+    if (res == SIEVE_OK) {
450e7e
+        if(ret) {
450e7e
+            *ret = s;
450e7e
+        } else {
450e7e
+            sieve_script_free(&s);
450e7e
+        }
450e7e
+        free(*errstr);
450e7e
+        *errstr = NULL;
a6d65f
+    }
a6d65f
+
450e7e
+    /* free interpreter */
450e7e
+    sieve_interp_free(&i);
450e7e
+
450e7e
+    return (res == SIEVE_OK) ? TIMSIEVE_OK : TIMSIEVE_FAIL;
a6d65f
+}
a6d65f
+
450e7e
+/*
450e7e
+ * Btw the initial date of this patch is Sep, 02 2004 which is the birthday of
450e7e
+ * Pavlos. Author of cyrusmaster. So consider this patch as his birthday present
450e7e
+ */
450e7e
+
450e7e
diff -up /dev/null cyrus-imapd-2.3.15/imap/compile_sieve.c
450e7e
--- /dev/null	2009-09-11 15:21:01.808252010 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/compile_sieve.c	2009-09-18 11:11:39.779115788 +0200
450e7e
@@ -0,0 +1,365 @@
450e7e
+/* This tool compiles the sieve script from a command
450e7e
+line so that it can be used wby the autoadd patch */
d0d307
+#include <stdio.h>
d0d307
+#include <stdlib.h>
d0d307
+
450e7e
+#include <config.h>
450e7e
+#include <string.h>
d0d307
+#ifdef HAVE_UNISTD_H
d0d307
+#include <unistd.h>
d0d307
+#endif
d0d307
+#include <errno.h>
d0d307
+#include <sys/types.h>
d0d307
+#include <sys/stat.h>
d0d307
+#include <sys/uio.h>
d0d307
+#include <fcntl.h>
d0d307
+#include <ctype.h>
d0d307
+#include <time.h>
d0d307
+#include <com_err.h>
d0d307
+
d0d307
+#include "global.h"
450e7e
+
d0d307
+#include "util.h"
Tomas Janousek 686149
+#include "xmalloc.h"
Tomas Janousek 686149
+#include "xstrlcpy.h"
Tomas Janousek 686149
+#include "xstrlcat.h"
d0d307
+#include "mailbox.h"
d0d307
+#include "imap_err.h"
d0d307
+#include "sieve_interface.h"
d0d307
+#include "script.h"
d0d307
+
450e7e
+#include <pwd.h>
d0d307
+
450e7e
+#define TIMSIEVE_FAIL 		-1
450e7e
+#define TIMSIEVE_OK 		0
450e7e
+#define MAX_FILENAME_SIZE	100
d0d307
+
450e7e
+/* Needed by libconfig */
450e7e
+const int config_need_data = 0;
d0d307
+
450e7e
+static int is_script_parsable(FILE *stream, char **errstr, sieve_script_t **ret);
d0d307
+
450e7e
+/*static void fatal(const char *s, int code)
450e7e
+{   
450e7e
+    printf("Fatal error: %s (%d)\r\n", s, code);
d0d307
+
450e7e
+    exit(1);
450e7e
+}*/
d0d307
+
450e7e
+void usage(void)
d0d307
+{
450e7e
+    fprintf(stderr,
450e7e
+            "Usage:\n\tcompile_sieve [-C <altconfig>] [-i <infile> -o <outfile>]\n");
450e7e
+    exit(-1);
d0d307
+}
d0d307
+
d0d307
+
450e7e
+int main (int argc, char **argv)
d0d307
+{   
450e7e
+
d0d307
+    sieve_script_t *s = NULL;
d0d307
+    bytecode_info_t *bc = NULL;
d0d307
+    char *err = NULL;
450e7e
+    FILE *in_stream;
450e7e
+    int  out_fd, opt;
450e7e
+    char *source_script = NULL;
450e7e
+    char *compiled_source_script = NULL;
450e7e
+    char *alt_config = NULL;
450e7e
+    extern char *optarg;
450e7e
+    char sieve_tmpname[MAX_MAILBOX_NAME+1];
d0d307
+
450e7e
+    if (geteuid() == 0) fatal("must run as the Cyrus user", EC_USAGE);
d0d307
+
450e7e
+    while((opt = getopt(argc, argv, "C:i:o:")) != EOF) {
450e7e
+        switch (opt) {
450e7e
+            case 'C': /* alt config file */
450e7e
+	        alt_config =  optarg;
450e7e
+	        break;
450e7e
+	    case 'i': /* input script file */
450e7e
+		source_script = optarg;
450e7e
+		break;
450e7e
+	    case 'o': /* output script file */
450e7e
+		compiled_source_script = optarg;
450e7e
+		break;
450e7e
+	    default:
450e7e
+	        usage();
450e7e
+		break;
450e7e
+	}
d0d307
+    }
d0d307
+
450e7e
+    if(source_script && !compiled_source_script) {
450e7e
+	    fprintf(stderr, "No output file was defined\n");
450e7e
+	    usage();
450e7e
+    } else if (!source_script && compiled_source_script) {
450e7e
+	    fprintf(stderr, "No input file was defined\n");
450e7e
+	    usage();
450e7e
+    }	
d0d307
+
450e7e
+    /*
450e7e
+     * If no <infile> has been defined, then read them from
450e7e
+     * the configuration file.
450e7e
+     */
450e7e
+    if (!source_script && !compiled_source_script) { 
450e7e
+	    cyrus_init(alt_config, "compile_sieve", 0);
d0d307
+
450e7e
+	    /* Initially check if we want to have the sieve script created */
450e7e
+	    if(!(source_script = (char *) config_getstring(IMAPOPT_AUTOCREATE_SIEVE_SCRIPT))) {
450e7e
+        	fprintf(stderr,"autocreate_sieve_script option not defined. Check imapd.conf\n");
450e7e
+	        return 1;
450e7e
+	    }
d0d307
+
450e7e
+	    /* Check if we have an already compiled sieve script*/
450e7e
+	    if(!(compiled_source_script = (char *) config_getstring(IMAPOPT_AUTOCREATE_SIEVE_COMPILEDSCRIPT))) {
450e7e
+	        fprintf(stderr, "autocreate_sieve_compiledscript option not defined. Check imapd.conf\n");
450e7e
+		return 1;
450e7e
+	    }
d0d307
+
450e7e
+	    if(!strrchr(source_script,'/') || !strrchr(compiled_source_script,'/')) {
450e7e
+       		/* 
450e7e
+		 * At this point the only think that is inconsistent is the directory 
450e7e
+		 * that was created. But if the user will have any sieve scripts then 
450e7e
+		 * they will eventually go there, so no big deal 
450e7e
+		 */
450e7e
+	        fprintf(stderr, 
450e7e
+			"In imapd.conf the full path of the filenames must be defined\n");
450e7e
+	       	return 1;
450e7e
+	    }
d0d307
+    }
d0d307
+
450e7e
+    printf("input file : %s, output file : %s\n", source_script, compiled_source_script);
450e7e
+
450e7e
+
450e7e
+    if(strlen(compiled_source_script) + sizeof(".NEW") + 1 > sizeof(sieve_tmpname)) {
450e7e
+	    fprintf(stderr, "Filename %s is too big\n", compiled_source_script);
450e7e
+	    return 1;
d0d307
+    }
450e7e
+    	
450e7e
+    snprintf(sieve_tmpname, sizeof(sieve_tmpname), "%s.NEW", compiled_source_script);
d0d307
+
450e7e
+    in_stream = fopen(source_script,"r");
450e7e
+
450e7e
+    if(!in_stream) {
450e7e
+        fprintf(stderr,"Unable to open %s source sieve script\n",source_script);
450e7e
+        return 1; 
d0d307
+    }
d0d307
+
450e7e
+    /* 
d0d307
+     * We open the file that will be used as the bc file. If this file exists, overwrite it 
d0d307
+     * since something bad has happened. We open the file here so that this error checking is
d0d307
+     * done before we try to open the rest of the files to start copying etc. 
d0d307
+     */
450e7e
+    out_fd = open(sieve_tmpname, O_CREAT|O_EXCL|O_WRONLY, S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH);
d0d307
+    if(out_fd < 0) {
d0d307
+        if(errno == EEXIST) {
450e7e
+            fprintf(stderr, "File %s already exists\n", sieve_tmpname);
d0d307
+        } else if (errno == EACCES) {
450e7e
+            fprintf(stderr,"No access to create file %s. Please check that you have the correct permissions\n",
450e7e
+			    sieve_tmpname);
d0d307
+        } else {
450e7e
+            fprintf(stderr,"Unable to create %s. Please check that you have the correct permissions\n", 
450e7e
+			    sieve_tmpname);
d0d307
+        }
450e7e
+	
450e7e
+	fclose(in_stream);
450e7e
+	return 1;
d0d307
+    }
d0d307
+
450e7e
+    if(is_script_parsable(in_stream,&err, &s) == TIMSIEVE_FAIL) {
450e7e
+        if(err && *err) {
450e7e
+           fprintf(stderr, "Error while parsing script %s\n",err);
450e7e
+           free(err);
d0d307
+        }
450e7e
+        else
450e7e
+            fprintf(stderr,"Error while parsing script\n");
450e7e
+            unlink(sieve_tmpname);
450e7e
+	    fclose(in_stream);
450e7e
+	    close(out_fd);
450e7e
+        return 1;
450e7e
+   }
d0d307
+
d0d307
+
450e7e
+    /* generate the bytecode */
450e7e
+    if(sieve_generate_bytecode(&bc,s) == TIMSIEVE_FAIL) {
450e7e
+        fprintf(stderr,"Error occured while compiling sieve script\n");
450e7e
+        /* removing the copied script and cleaning up memory */
450e7e
+        unlink(sieve_tmpname);
d0d307
+        sieve_script_free(&s);
d0d307
+        fclose(in_stream);
450e7e
+        close(out_fd);
d0d307
+        return 1;
d0d307
+    }
450e7e
+    if(sieve_emit_bytecode(out_fd,bc) == TIMSIEVE_FAIL) {
450e7e
+        fprintf(stderr, "Error occured while emitting sieve script\n");
d0d307
+        unlink(sieve_tmpname);
450e7e
+        sieve_free_bytecode(&bc);
450e7e
+        sieve_script_free(&s);
d0d307
+        fclose(in_stream);
450e7e
+        close(out_fd);
d0d307
+        return 1;
d0d307
+    }
d0d307
+
450e7e
+    /* clean up the memory */
450e7e
+    sieve_free_bytecode(&bc);
450e7e
+    sieve_script_free(&s);
d0d307
+
450e7e
+    close(out_fd);
d0d307
+
450e7e
+    if(rename(sieve_tmpname, compiled_source_script)) {
d0d307
+        if(errno != EEXIST) {
450e7e
+            unlink(sieve_tmpname);
450e7e
+            unlink(compiled_source_script);
450e7e
+            return 1;
d0d307
+        }
d0d307
+    }
450e7e
+    return 0;
450e7e
+}
d0d307
+
d0d307
+
450e7e
+/* to make larry's stupid functions happy :) */
450e7e
+static void foo(void)
450e7e
+{
450e7e
+    fatal("stub function called", 0);
450e7e
+}
d0d307
+
450e7e
+extern sieve_vacation_t vacation2;/* = {
450e7e
+    0,                          / min response /
450e7e
+    0,                          / max response /
450e7e
+    (sieve_callback *) &foo,    / autorespond() /
450e7e
+    (sieve_callback *) &foo     / send_response() /
450e7e
+}; */
d0d307
+
d0d307
+static int sieve_notify(void *ac __attribute__((unused)),
d0d307
+                        void *interp_context __attribute__((unused)),
d0d307
+                        void *script_context __attribute__((unused)),
d0d307
+                        void *message_context __attribute__((unused)),
d0d307
+                        const char **errmsg __attribute__((unused)))
d0d307
+{
d0d307
+    fatal("stub function called", 0);
d0d307
+    return SIEVE_FAIL;
d0d307
+}
d0d307
+
d0d307
+static int mysieve_error(int lineno, const char *msg,
d0d307
+                  void *i __attribute__((unused)), void *s)
d0d307
+{
d0d307
+    char buf[1024];
d0d307
+    char **errstr = (char **) s;
d0d307
+
d0d307
+    snprintf(buf, 80, "line %d: %s\r\n", lineno, msg);
d0d307
+    *errstr = (char *) xrealloc(*errstr, strlen(*errstr) + strlen(buf) + 30);
450e7e
+    fprintf(stderr, "%s\n", buf);
d0d307
+    strcat(*errstr, buf);
d0d307
+
d0d307
+    return SIEVE_OK;
d0d307
+}
d0d307
+
d0d307
+/* end the boilerplate */
d0d307
+
d0d307
+/* returns TRUE or FALSE */
d0d307
+int is_script_parsable(FILE *stream, char **errstr, sieve_script_t **ret)
d0d307
+{
d0d307
+    sieve_interp_t *i;
d0d307
+    sieve_script_t *s;
d0d307
+    int res;
d0d307
+
d0d307
+    res = sieve_interp_alloc(&i, NULL);
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_interp_alloc() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_redirect(i, (sieve_callback *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_redirect() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+    res = sieve_register_discard(i, (sieve_callback *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_discard() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+    res = sieve_register_reject(i, (sieve_callback *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_reject() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+    res = sieve_register_fileinto(i, (sieve_callback *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_fileinto() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+    res = sieve_register_keep(i, (sieve_callback *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_keep() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_imapflags(i, NULL);
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_imapflags() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_size(i, (sieve_get_size *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_size() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_header(i, (sieve_get_header *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_header() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_envelope(i, (sieve_get_envelope *) &foo;;
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_envelope() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_vacation(i, &vacation2);
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_vacation() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_notify(i, &sieve_notify);
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_notify() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    res = sieve_register_parse_error(i, &mysieve_error);
d0d307
+    if (res != SIEVE_OK) {
450e7e
+        fprintf(stderr, "sieve_register_parse_error() returns %d\n", res);
d0d307
+        return TIMSIEVE_FAIL;
d0d307
+    }
d0d307
+
d0d307
+    rewind(stream);
d0d307
+
d0d307
+    *errstr = (char *) xmalloc(20 * sizeof(char));
d0d307
+    strcpy(*errstr, "script errors:\r\n");
d0d307
+
d0d307
+    res = sieve_script_parse(i, stream, errstr, &s);
d0d307
+
d0d307
+    if (res == SIEVE_OK) {
d0d307
+        if(ret) {
d0d307
+            *ret = s;
d0d307
+        } else {
d0d307
+            sieve_script_free(&s);
d0d307
+        }
d0d307
+        free(*errstr);
d0d307
+        *errstr = NULL;
d0d307
+    }
d0d307
+
d0d307
+    /* free interpreter */
d0d307
+    sieve_interp_free(&i);
d0d307
+
d0d307
+    return (res == SIEVE_OK) ? TIMSIEVE_OK : TIMSIEVE_FAIL;
d0d307
+}
d0d307
+
d0d307
+
a6d65f
+
d0d307
+
d0d307
+
d0d307
+
450e7e
diff -up cyrus-imapd-2.3.15/imap/imapd.c.autocreate cyrus-imapd-2.3.15/imap/imapd.c
450e7e
--- cyrus-imapd-2.3.15/imap/imapd.c.autocreate	2009-07-29 17:51:21.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/imapd.c	2009-09-18 11:11:39.783115781 +0200
450e7e
@@ -211,6 +211,7 @@ static const int max_monthdays[] = {
450e7e
 void motd_file(int fd);
450e7e
 void shut_down(int code);
450e7e
 void fatal(const char *s, int code);
450e7e
+void autocreate_inbox(void);
450e7e
 
450e7e
 void cmdloop(void);
450e7e
 void cmd_login(char *tag, char *user);
450e7e
@@ -2003,6 +2004,43 @@ void cmdloop()
450e7e
 }
450e7e
 
450e7e
 /*
450e7e
+ * Autocreate Inbox and subfolders upon login
450e7e
+ */
450e7e
+void autocreate_inbox()
450e7e
+{
450e7e
+    char inboxname[MAX_MAILBOX_NAME+1];
450e7e
+    int autocreatequota;
450e7e
+    int r;
450e7e
+ 
450e7e
+    /*
450e7e
+     * Exlude admin's accounts
450e7e
+     */
450e7e
+    if (imapd_userisadmin || imapd_userisproxyadmin)
450e7e
+        return;
450e7e
+ 
450e7e
+    /*
450e7e
+     * Exclude anonymous
450e7e
+     */
450e7e
+    if (!strcmp(imapd_userid, "anonymous"))
450e7e
+        return;
450e7e
+ 
450e7e
+    if ((autocreatequota = config_getint(IMAPOPT_AUTOCREATEQUOTA))) {
450e7e
+        /* This is actyally not required
450e7e
+           as long as the lenght of userid is ok */
450e7e
+           r = (*imapd_namespace.mboxname_tointernal) (&imapd_namespace,
450e7e
+                                      "INBOX", imapd_userid, inboxname);
450e7e
+           if (!r)
450e7e
+               r = mboxlist_lookup(inboxname, NULL, NULL);
450e7e
+ 
450e7e
+           if (r == IMAP_MAILBOX_NONEXISTENT) {
450e7e
+                mboxlist_autocreateinbox(&imapd_namespace, imapd_userid,
450e7e
+                         imapd_authstate, inboxname, autocreatequota);
450e7e
+	   }
450e7e
+     }
450e7e
+}
d0d307
+
d0d307
+
450e7e
+/*
450e7e
  * Perform a LOGIN command
450e7e
  */
450e7e
 void cmd_login(char *tag, char *user)
450e7e
@@ -2179,6 +2217,9 @@ void cmd_login(char *tag, char *user)
450e7e
 				strcspn(imapd_userid, "@") : 0);
450e7e
 
450e7e
     freebuf(&passwdbuf);
d0d307
+
450e7e
+    autocreate_inbox();
d0d307
+
450e7e
     return;
450e7e
 }
450e7e
 
450e7e
@@ -2336,6 +2377,8 @@ cmd_authenticate(char *tag, char *authty
450e7e
 				config_virtdomains ?
450e7e
 				strcspn(imapd_userid, "@") : 0);
450e7e
 
450e7e
+    autocreate_inbox();
d0d307
+
450e7e
     return;
450e7e
 }
450e7e
 
450e7e
diff -up cyrus-imapd-2.3.15/imap/lmtpd.c.autocreate cyrus-imapd-2.3.15/imap/lmtpd.c
450e7e
--- cyrus-imapd-2.3.15/imap/lmtpd.c.autocreate	2009-04-23 19:10:06.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/lmtpd.c	2009-09-18 11:11:39.780115773 +0200
450e7e
@@ -117,6 +117,8 @@ void shut_down(int code);
450e7e
 static FILE *spoolfile(message_data_t *msgdata);
450e7e
 static void removespool(message_data_t *msgdata);
450e7e
 
450e7e
+static int autocreate_inbox(const char *user, const char *domain);
d0d307
+
450e7e
 /* current namespace */
450e7e
 static struct namespace lmtpd_namespace;
450e7e
 
450e7e
@@ -977,6 +979,86 @@ void shut_down(int code)
450e7e
     exit(code);
450e7e
 }
450e7e
 
d0d307
+
450e7e
+/*
450e7e
+ * Autocreate Inbox and subfolders upon login
450e7e
+ */
450e7e
+int autocreate_inbox(const char *user, const char *domain)
d0d307
+{
450e7e
+    struct auth_state *auth_state;
450e7e
+    char inboxname[MAX_MAILBOX_NAME+1];
450e7e
+    char *rcpt_userid = NULL;
450e7e
+    int autocreatequota;
450e7e
+    int r = 0;
d0d307
+
450e7e
+    if (user == NULL)
450e7e
+          return IMAP_MAILBOX_NONEXISTENT;
d0d307
+
450e7e
+    if (domain != NULL) {
450e7e
+	int k;
450e7e
+	
450e7e
+	rcpt_userid = (char *) xmalloc((strlen(user) + strlen(domain) + 2) * sizeof(char));
450e7e
+	k = strlcpy(rcpt_userid, user, strlen(user) + 1);
450e7e
+  	*(rcpt_userid + k) = '@';
450e7e
+       strlcpy(rcpt_userid + k + 1, domain, strlen(domain) + 1);
450e7e
+    } else {
450e7e
+	rcpt_userid = (char *) user;
450e7e
+    }
d0d307
+
d0d307
+
d0d307
+    /*
450e7e
+     * Exclude anonymous
d0d307
+     */
450e7e
+    if (!strcmp(rcpt_userid, "anonymous")) {
450e7e
+	if (rcpt_userid != user) {
450e7e
+	    free(rcpt_userid);
450e7e
+	}
d0d307
+
450e7e
+        return IMAP_MAILBOX_NONEXISTENT;
d0d307
+    }
450e7e
+    
450e7e
+    /*
450e7e
+     * Check for autocreatequota and createonpost
d0d307
+     */
450e7e
+    if (!(autocreatequota = config_getint(IMAPOPT_AUTOCREATEQUOTA)) ||
450e7e
+        !(config_getswitch(IMAPOPT_CREATEONPOST))) {
450e7e
+	    
450e7e
+	if (rcpt_userid != user) {
450e7e
+	    free(rcpt_userid);
450e7e
+	}
d0d307
+	
450e7e
+        return IMAP_MAILBOX_NONEXISTENT;
450e7e
+     }
d0d307
+
d0d307
+
450e7e
+    /*
450e7e
+     * Exclude admin's accounts
450e7e
+     */
450e7e
+     auth_state = auth_newstate(rcpt_userid);
450e7e
+     
450e7e
+     if (global_authisa(auth_state, IMAPOPT_ADMINS)) {
450e7e
+	if (rcpt_userid != user) {
450e7e
+	    free(rcpt_userid);
450e7e
+	}
d0d307
+
450e7e
+        return IMAP_MAILBOX_NONEXISTENT;
450e7e
+     }
450e7e
+     
450e7e
+     r = (*lmtpd_namespace.mboxname_tointernal) (&lmtpd_namespace,
450e7e
+                                "INBOX", rcpt_userid, inboxname);
450e7e
+     
450e7e
+     if (!r)
450e7e
+ 	r = mboxlist_autocreateinbox(&lmtpd_namespace, rcpt_userid,
450e7e
+                         auth_state, inboxname, autocreatequota);
450e7e
+     
450e7e
+     if (rcpt_userid != user) {
450e7e
+	free(rcpt_userid);
450e7e
+     }
450e7e
+       
450e7e
+     return r;
d0d307
+}
d0d307
+
d0d307
+
450e7e
 static int verify_user(const char *user, const char *domain, char *mailbox,
450e7e
 		       quota_t quotacheck, struct auth_state *authstate)
450e7e
 {
450e7e
@@ -1020,6 +1102,15 @@ static int verify_user(const char *user,
450e7e
 	 */
450e7e
 	r = mlookup(namebuf, &server, &acl, NULL);
450e7e
 
450e7e
+	/* If user mailbox does not exist, then invoke autocreate inbox function */
450e7e
+	if (r == IMAP_MAILBOX_NONEXISTENT) {
450e7e
+	    r = autocreate_inbox(user, domain);
d0d307
+
450e7e
+	    /* Try to locate the mailbox again */
450e7e
+	    if (!r)
450e7e
+		r = mlookup(namebuf, &server, &acl, NULL);
450e7e
+	}
d0d307
+
450e7e
 	if (r == IMAP_MAILBOX_NONEXISTENT && !user &&
450e7e
 	    config_getswitch(IMAPOPT_LMTP_FUZZY_MAILBOX_MATCH) &&
450e7e
 	    /* see if we have a mailbox whose name is close */
450e7e
@@ -1046,6 +1137,7 @@ static int verify_user(const char *user,
450e7e
 			     aclcheck, (quotacheck < 0)
450e7e
 			     || config_getswitch(IMAPOPT_LMTP_STRICT_QUOTA) ?
450e7e
 			     quotacheck : 0);
d0d307
+
450e7e
 	}
450e7e
     }
450e7e
 
450e7e
diff -up cyrus-imapd-2.3.15/imap/Makefile.in.autocreate cyrus-imapd-2.3.15/imap/Makefile.in
450e7e
--- cyrus-imapd-2.3.15/imap/Makefile.in.autocreate	2009-03-30 18:04:56.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/Makefile.in	2009-09-18 11:44:04.105116069 +0200
450e7e
@@ -101,7 +101,7 @@ LOBJS= append.o mailbox.o mboxlist.o mup
a6d65f
 	convert_code.o duplicate.o saslclient.o saslserver.o signals.o \
a6d65f
 	annotate.o search_engines.o squat.o squat_internal.o mbdump.o \
a6d65f
 	imapparse.o telemetry.o user.o notify.o idle.o quota_db.o \
a6d65f
-	sync_log.o $(SEEN) mboxkey.o backend.o tls.o message_guid.o \
a6d65f
+	sync_log.o autosieve.o $(SEEN) mboxkey.o backend.o tls.o message_guid.o \
a6d65f
 	statuscache_db.o
a6d65f
 
a6d65f
 IMAPDOBJS=pushstats.o imapd.o proxy.o imap_proxy.o index.o version.o
450e7e
@@ -118,7 +118,7 @@ PROGS = imapd lmtpd pop3d \
a6d65f
 	fud smmapd reconstruct quota mbpath ipurge cyr_dbtool cyr_synclog \
a6d65f
 	cyrdump chk_cyrus cvt_cyrusdb deliver ctl_mboxlist \
a6d65f
 	ctl_deliver ctl_cyrusdb squatter mbexamine cyr_expire arbitron \
450e7e
-	unexpunge cyr_df @IMAP_PROGS@
450e7e
+	unexpunge cyr_df compile_sieve @IMAP_PROGS@
a6d65f
 
a6d65f
 BUILTSOURCES = imap_err.c imap_err.h pushstats.c pushstats.h \
a6d65f
 	lmtpstats.c lmtpstats.h xversion.h mupdate_err.c mupdate_err.h \
450e7e
@@ -183,9 +183,9 @@ mupdate_err.c: mupdate_err.et
a6d65f
 mupdate_err.h: mupdate_err.c
a6d65f
 
a6d65f
 ### Services
a6d65f
-idled: idled.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+idled: idled.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o idled \
a6d65f
-	 idled.o mutex_fake.o libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 idled.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
 lmtpd: lmtpd.o proxy.o $(LMTPOBJS) $(SIEVE_OBJS) mutex_fake.o \
a6d65f
 	 libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
450e7e
@@ -199,167 +199,170 @@ lmtpd.pure: lmtpd.o proxy.o $(LMTPOBJS) 
a6d65f
 	 $(SERVICE) lmtpd.o proxy.o $(LMTPOBJS) $(SIEVE_OBJS) \
a6d65f
 	 mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
-imapd: $(IMAPDOBJS) mutex_fake.o libimap.a $(DEPLIBS) $(SERVICE)
a6d65f
+imapd: $(IMAPDOBJS) mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o imapd \
a6d65f
 	 $(SERVICE) $(IMAPDOBJS) mutex_fake.o \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
-imapd.pure: $(IMAPDOBJS) mutex_fake.o libimap.a $(DEPLIBS) $(SERVICE)
a6d65f
+imapd.pure: $(IMAPDOBJS) mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(PURIFY) $(PUREOPT) $(CC) $(LDFLAGS) -o imapd.pure \
a6d65f
 	 $(SERVICE) $(IMAPDOBJS) mutex_fake.o libimap.a \
a6d65f
-	$(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
-imapd.quant: $(IMAPDOBJS) mutex_fake.o libimap.a $(DEPLIBS) $(SERVICE)
a6d65f
+imapd.quant: $(IMAPDOBJS) mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(QUANTIFY) $(QUANTOPT) $(CC) $(LDFLAGS) -o imapd.quant \
a6d65f
 	 $(SERVICE) $(IMAPDOBJS) mutex_fake.o libimap.a \
a6d65f
-	$(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
 mupdate: mupdate.o mupdate-slave.o mupdate-client.o mutex_pthread.o tls.o \
a6d65f
-	libimap.a $(DEPLIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o mupdate \
a6d65f
 	 $(SERVICETHREAD) mupdate.o mupdate-slave.o mupdate-client.o \
a6d65f
 	 mutex_pthread.o tls.o libimap.a \
a6d65f
-	 $(DEPLIBS) $(LIBS) $(LIB_WRAP) -lpthread
a6d65f
+	 $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP) -lpthread
a6d65f
 
a6d65f
 mupdate.pure: mupdate.o mupdate-slave.o mupdate-client.o mutex_pthread.o \
a6d65f
-	libimap.a $(DEPLIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(PURIFY) $(PUREOPT) $(CC) $(LDFLAGS) -o mupdate.pure \
a6d65f
 	 $(SERVICETHREAD) mupdate.o mupdate-slave.o mupdate-client.o \
a6d65f
-	 mutex_pthread.o libimap.a $(DEPLIBS) $(LIBS) $(LIB_WRAP) -lpthread
a6d65f
+	 mutex_pthread.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP) -lpthread
a6d65f
 
a6d65f
 pop3d: pop3d.o proxy.o backend.o tls.o mutex_fake.o libimap.a \
a6d65f
-	$(DEPLIBS) $(SERVICE)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o pop3d pop3d.o proxy.o backend.o tls.o $(SERVICE) \
a6d65f
-	 mutex_fake.o libimap.a $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	 mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
 nntpd: nntpd.o proxy.o backend.o index.o smtpclient.o spool.o tls.o \
a6d65f
-	 mutex_fake.o nntp_err.o libimap.a $(DEPLIBS) $(SERVICE)
a6d65f
+	 mutex_fake.o nntp_err.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o nntpd nntpd.o proxy.o backend.o index.o spool.o \
a6d65f
 	 smtpclient.o tls.o $(SERVICE) mutex_fake.o nntp_err.o \
a6d65f
-	 libimap.a $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	 libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
-fud: fud.o libimap.a mutex_fake.o $(DEPLIBS) $(SERVICE)
a6d65f
+fud: fud.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o fud $(SERVICE) fud.o mutex_fake.o libimap.a \
a6d65f
-	$(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
-smmapd: smmapd.o libimap.a mutex_fake.o $(DEPLIBS) $(SERVICE)
a6d65f
+smmapd: smmapd.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o smmapd $(SERVICE) smmapd.o mutex_fake.o libimap.a \
a6d65f
-	$(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
 
a6d65f
 sync_server: sync_server.o sync_support.o sync_commit.o \
a6d65f
-	imapparse.o tls.o libimap.a mutex_fake.o $(DEPLIBS) $(SERVICE)
a6d65f
+	imapparse.o tls.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(SERVICE)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
 	sync_server sync_server.o sync_support.o sync_commit.o \
a6d65f
 	imapparse.o tls.o $(SERVICE) libimap.a mutex_fake.o \
a6d65f
-	$(DEPLIBS) $(LIBS) $(LIB_WRAP)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS) $(LIB_WRAP)
d0d307
 
a6d65f
 ### Command Line Utilities
a6d65f
-arbitron: arbitron.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+arbitron: arbitron.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o arbitron arbitron.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
d0d307
 
a6d65f
-cyr_dbtool: cyr_dbtool.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+cyr_dbtool: cyr_dbtool.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o cyr_dbtool cyr_dbtool.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
d0d307
 
a6d65f
-cyr_synclog: cyr_synclog.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+cyr_synclog: cyr_synclog.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o cyr_synclog cyr_synclog.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
d0d307
 
a6d65f
-cvt_cyrusdb: cvt_cyrusdb.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+cvt_cyrusdb: cvt_cyrusdb.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o cvt_cyrusdb cvt_cyrusdb.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
d0d307
 
a6d65f
-chk_cyrus: chk_cyrus.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+chk_cyrus: chk_cyrus.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o chk_cyrus chk_cyrus.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-deliver: deliver.o $(LMTPOBJS) proxy.o mutex_fake.o libimap.a $(DEPLIBS)
a6d65f
+deliver: deliver.o $(LMTPOBJS) proxy.o mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o deliver deliver.o $(LMTPOBJS) proxy.o \
a6d65f
-	mutex_fake.o libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	mutex_fake.o libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-ctl_deliver: ctl_deliver.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+ctl_deliver: ctl_deliver.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 $@ ctl_deliver.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 $@ ctl_deliver.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-ctl_mboxlist: ctl_mboxlist.o mupdate-client.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+ctl_mboxlist: ctl_mboxlist.o mupdate-client.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o $@ ctl_mboxlist.o mupdate-client.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-ctl_cyrusdb: ctl_cyrusdb.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+ctl_cyrusdb: ctl_cyrusdb.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 $@ ctl_cyrusdb.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 $@ ctl_cyrusdb.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-cyr_expire: cyr_expire.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+cyr_expire: cyr_expire.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o $@ cyr_expire.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-fetchnews: fetchnews.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+fetchnews: fetchnews.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 $@ fetchnews.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 $@ fetchnews.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-squatter: squatter.o index.o squat_build.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+squatter: squatter.o index.o squat_build.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o squatter squatter.o index.o squat_build.o \
a6d65f
-	$(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	$(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-mbpath: mbpath.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+mbpath: mbpath.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o mbpath mbpath.o $(CLIOBJS) libimap.a \
a6d65f
-	$(DEPLIBS) $(LIBS)
a6d65f
+	$(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-ipurge: ipurge.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+ipurge: ipurge.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o ipurge ipurge.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-cyr_virusscan: cyr_virusscan.o index.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+cyr_virusscan: cyr_virusscan.o index.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o cyr_virusscan cyr_virusscan.o index.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS) -lclamav
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS) -lclamav
a6d65f
 
a6d65f
-cyrdump: cyrdump.o index.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+cyrdump: cyrdump.o index.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o cyrdump cyrdump.o index.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
450e7e
-cyr_df: cyr_df.o $(CLIOBJS) libimap.a $(DEPLIBS)
450e7e
+cyr_df: cyr_df.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
450e7e
 	$(CC) $(LDFLAGS) -o \
450e7e
-	 cyr_df cyr_df.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
450e7e
+	 cyr_df cyr_df.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
450e7e
 
a6d65f
-mbexamine: mbexamine.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+mbexamine: mbexamine.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 mbexamine mbexamine.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 mbexamine mbexamine.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-reconstruct: reconstruct.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+reconstruct: reconstruct.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 reconstruct reconstruct.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 reconstruct reconstruct.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-quota: quota.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+quota: quota.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o quota quota.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-tls_prune: tls_prune.o tls.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+tls_prune: tls_prune.o tls.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
-	 $@ tls_prune.o tls.o $(CLIOBJS) libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	 $@ tls_prune.o tls.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-unexpunge: unexpunge.o $(CLIOBJS) libimap.a $(DEPLIBS)
a6d65f
+unexpunge: unexpunge.o $(CLIOBJS) libimap.a $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o $@ unexpunge.o $(CLIOBJS) \
a6d65f
-	libimap.a $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-make_md5: make_md5.o libimap.a mutex_fake.o $(DEPLIBS)
a6d65f
-	$(CC) $(LDFLAGS) -o make_md5 make_md5.o libimap.a mutex_fake.o $(DEPLIBS) $(LIBS)
a6d65f
+make_md5: make_md5.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
+	$(CC) $(LDFLAGS) -o make_md5 make_md5.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
-make_sha1: make_sha1.o libimap.a mutex_fake.o $(DEPLIBS)
a6d65f
-	$(CC) $(LDFLAGS) -o make_sha1 make_sha1.o libimap.a mutex_fake.o $(DEPLIBS) $(LIBS)
a6d65f
+make_sha1: make_sha1.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
+	$(CC) $(LDFLAGS) -o make_sha1 make_sha1.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
 sync_client: sync_client.o sync_support.o \
a6d65f
-	backend.o tls.o imapparse.o libimap.a mutex_fake.o $(DEPLIBS)
a6d65f
+	backend.o tls.o imapparse.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
 	sync_client sync_client.o sync_support.o \
a6d65f
-	backend.o tls.o imapparse.o libimap.a mutex_fake.o $(DEPLIBS) $(LIBS)
a6d65f
+	backend.o tls.o imapparse.o libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
 sync_reset: sync_reset.o sync_support.o sync_commit.o \
a6d65f
-	libimap.a mutex_fake.o $(DEPLIBS)
a6d65f
+	libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS)
a6d65f
 	$(CC) $(LDFLAGS) -o \
a6d65f
 	sync_reset sync_reset.o sync_support.o sync_commit.o \
a6d65f
-	libimap.a mutex_fake.o $(DEPLIBS) $(LIBS)
a6d65f
+	libimap.a mutex_fake.o $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 
a6d65f
+compile_sieve: compile_sieve.o libimap.a $(DEPLIBS) $(SIEVE_LIBS)
a6d65f
+	$(CC) $(LDFLAGS) -o compile_sieve compile_sieve.o $(CLIOBJS) \
a6d65f
+	libimap.a $(SIEVE_LIBS) $(DEPLIBS) $(LIBS)
a6d65f
 ### Other Misc Targets
d0d307
 
a6d65f
 clean:
450e7e
diff -up cyrus-imapd-2.3.15/imap/mboxlist.c.autocreate cyrus-imapd-2.3.15/imap/mboxlist.c
450e7e
--- cyrus-imapd-2.3.15/imap/mboxlist.c.autocreate	2009-07-28 04:46:23.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/mboxlist.c	2009-09-18 11:11:39.777115766 +0200
450e7e
@@ -83,6 +83,12 @@
450e7e
 #include "quota.h"
450e7e
 #include "sync_log.h"
d0d307
 
450e7e
+#ifdef USE_SIEVE
450e7e
+extern int autoadd_sieve(char *userid, 
450e7e
+		const char *source_script);
450e7e
+#endif
d0d307
+
450e7e
+
450e7e
 #define DB config_mboxlist_db
450e7e
 #define SUBDB config_subscription_db
d0d307
 
450e7e
@@ -100,11 +106,29 @@ static int mboxlist_rmquota(const char *
450e7e
 static int mboxlist_changequota(const char *name, int matchlen, int maycreate,
450e7e
 				void *rock);
d0d307
 
450e7e
+static int mboxlist_autochangesub(char *name, int matchlen, int maycreate,
450e7e
+			      void *rock);
450e7e
+
450e7e
+static int mboxlist_autosubscribe_sharedfolders(struct namespace *namespace,
450e7e
+                        char *userid, char *auth_userid,
450e7e
+                        struct auth_state *auth_state);
cf58a5
+
450e7e
 struct change_rock {
450e7e
     struct quota *quota;
450e7e
     struct txn **tid;
450e7e
 };
450e7e
 
d0d307
+/*
450e7e
+ * Struct needed to be passed as void *rock to
450e7e
+ * mboxlist_autochangesub();
d0d307
+ */
450e7e
+struct changesub_rock_st {
450e7e
+        char *userid;
450e7e
+        char *auth_userid;
450e7e
+        struct auth_state *auth_state;
450e7e
+};
cf58a5
+
cf58a5
+
450e7e
 #define FNAME_SUBSSUFFIX ".sub"
450e7e
 
450e7e
 /*
450e7e
@@ -3413,3 +3437,349 @@ int mboxlist_delayed_delete_isenabled(vo
450e7e
 
450e7e
     return(config_delete_mode == IMAP_ENUM_DELETE_MODE_DELAYED);
450e7e
 }
450e7e
+
450e7e
+/*
450e7e
+ * Automatically subscribe user to *ALL* shared folders,
450e7e
+ * one has permissions to be subscribed to.
450e7e
+ * INBOX subfolders are excluded.
450e7e
+ */
450e7e
+static int mboxlist_autochangesub(char *name, int matchlen, int maycreate,
450e7e
+                        void *rock) {
450e7e
+
450e7e
+  struct changesub_rock_st *changesub_rock = (struct changesub_rock_st *) rock;
450e7e
+  char *userid = changesub_rock->userid;
450e7e
+  char *auth_userid = changesub_rock->auth_userid;
450e7e
+  struct auth_state *auth_state = changesub_rock->auth_state;
450e7e
+  int r;
450e7e
+
450e7e
+
450e7e
+  if((strlen(name) == 5 && !strncmp(name, "INBOX", 5)) || /* Exclude INBOX */
450e7e
+     (strlen(name) > 5  && !strncmp(name, "INBOX.",6)) || /* Exclude INBOX subfolders */
450e7e
+     (strlen(name) > 4  && !strncmp(name, "user.", 5)))   /* Exclude other users' folders */
450e7e
+	  return 0;
450e7e
+
450e7e
+     
450e7e
+  r = mboxlist_changesub(name, userid, auth_state, 1, 0);
450e7e
+
450e7e
+  if (r) {
450e7e
+      syslog(LOG_WARNING,
450e7e
+             "autosubscribe: User %s to folder %s, subscription failed: %s",
450e7e
+             auth_userid, name, error_message(r));
450e7e
+  } else {
450e7e
+      syslog(LOG_NOTICE,
450e7e
+             "autosubscribe: User %s to folder %s, subscription succeeded",
450e7e
+             auth_userid, name);
450e7e
+  }
450e7e
+
450e7e
+  return 0;
450e7e
+}
cf58a5
+
450e7e
+#define SEP '|'
450e7e
+
450e7e
+/*
450e7e
+ * Automatically subscribe user to a shared folder.
450e7e
+ * Subscription is done successfully, if the shared
450e7e
+ * folder exists and the user has the necessary 
450e7e
+ * permissions.
450e7e
+ */
450e7e
+static int mboxlist_autosubscribe_sharedfolders(struct namespace *namespace,
450e7e
+                        char *userid, char *auth_userid,
450e7e
+                        struct auth_state *auth_state) {
450e7e
+        
450e7e
+    const char *sub ;
450e7e
+    char *p, *q, *next_sub;
450e7e
+    char folder[MAX_MAILBOX_NAME+1], name[MAX_MAILBOX_NAME+1], mailboxname[MAX_MAILBOX_NAME+1];
450e7e
+    int len;
450e7e
+    int r = 0;
450e7e
+    int subscribe_all_sharedfolders = 0;
450e7e
+
450e7e
+    subscribe_all_sharedfolders = config_getswitch(IMAPOPT_AUTOSUBSCRIBE_ALL_SHAREDFOLDERS);
d0d307
+
d0d307
+    /*
450e7e
+     * If subscribeallsharedfolders is set to yes in imapd.conf, then
450e7e
+     * subscribe user to every shared folder one has the apropriate 
450e7e
+     * permissions.
d0d307
+     */
450e7e
+    if(subscribe_all_sharedfolders) {
450e7e
+       char pattern[MAX_MAILBOX_PATH+1];
450e7e
+       struct changesub_rock_st changesub_rock;
d0d307
+
450e7e
+       strcpy(pattern, "*");
450e7e
+       changesub_rock.userid = userid;
450e7e
+       changesub_rock.auth_userid = auth_userid;
450e7e
+       changesub_rock.auth_state = auth_state;
450e7e
+
450e7e
+       r = mboxlist_findall(namespace, pattern, 0, userid,
450e7e
+                            auth_state, mboxlist_autochangesub, &changesub_rock);
450e7e
+
450e7e
+       return r;
cf58a5
+    }
cf58a5
+
450e7e
+    if ((sub=config_getstring(IMAPOPT_AUTOSUBSCRIBESHAREDFOLDERS)) == NULL)
450e7e
+       return r;
450e7e
+
450e7e
+    next_sub = (char *) sub;
450e7e
+    while (*next_sub) {
450e7e
+        for (p = next_sub ; isspace((int) *p) || *p == SEP ; p++);
450e7e
+        for (next_sub = p ; *next_sub && *next_sub != SEP ; next_sub++);
450e7e
+        for (q = next_sub ; q > p && (isspace((int) *q) || *q == SEP || !*q) ; q--);
450e7e
+        if (!*p ) continue;
d0d307
+
450e7e
+        len = q - p + 1;
450e7e
+        /* Check for folder length */
450e7e
+        if (len  > sizeof(folder)-1)
450e7e
+                continue;
d0d307
+
450e7e
+        if (!r) {
450e7e
+                strncpy(folder, p, len);
450e7e
+                folder[len] = '\0';
450e7e
+
450e7e
+               strlcpy(name, namespace->prefix[NAMESPACE_SHARED], sizeof(name));
450e7e
+               len = strlcat(name, folder, sizeof(name));
450e7e
+
450e7e
+               r = (namespace->mboxname_tointernal) (namespace, name, userid,
450e7e
+                                                                  mailboxname);
450e7e
+       }
450e7e
+                                                                  
450e7e
+        if (!r)
450e7e
+               r = mboxlist_changesub(mailboxname, userid, auth_state, 1, 0);
450e7e
+
450e7e
+        if (!r) {
450e7e
+                syslog(LOG_NOTICE, "autosubscribe: User %s to %s succeeded", 
450e7e
+                       userid, folder);
450e7e
+        } else {
450e7e
+                syslog(LOG_WARNING, "autosubscribe: User %s to %s failed: %s", 
450e7e
+                       userid, folder, error_message(r));
450e7e
+                r = 0;
450e7e
+        }
450e7e
+    }
450e7e
+
450e7e
+    return r;
d0d307
+}
d0d307
+
d0d307
+
cf58a5
+
450e7e
+int mboxlist_autocreateinbox(struct namespace *namespace,
450e7e
+                        char *userid,
450e7e
+                        struct auth_state *auth_state,
450e7e
+                        char *mailboxname, int autocreatequota) {
450e7e
+    char name [MAX_MAILBOX_NAME+1];
450e7e
+    char folder [MAX_MAILBOX_NAME+1];
450e7e
+    char *auth_userid = NULL;
450e7e
+    char *partition = NULL;
450e7e
+    const char *crt;
450e7e
+    const char *sub;
450e7e
+    char *p, *q, *next_crt, *next_sub;
450e7e
+    int len;
450e7e
+    int r = 0;
450e7e
+    int numcrt = 0;
450e7e
+    int numsub = 0;
450e7e
+#ifdef USE_SIEVE
450e7e
+    const char *source_script;
450e7e
+#endif
450e7e
+
450e7e
+
450e7e
+
450e7e
+    auth_userid = auth_canonuser(auth_state);
450e7e
+    if (auth_userid == NULL) {
450e7e
+         /*
450e7e
+          * Couldn't get cannon userid
450e7e
+          */
450e7e
+          syslog(LOG_ERR,
450e7e
+                 "autocreateinbox: Could not get canonified userid for user %s", userid);
450e7e
+          return IMAP_PARTITION_UNKNOWN;
450e7e
+    }
450e7e
+
450e7e
+    /* Added this for debug information. */
450e7e
+    syslog(LOG_DEBUG, "autocreateinbox: autocreate inbox for user %s was called", auth_userid);
450e7e
+
450e7e
+   /*
450e7e
+    * While this is not needed for admins
450e7e
+    * and imap_admins accounts, it would be
450e7e
+    * better to separate *all* admins and
450e7e
+    * proxyservers from normal accounts
450e7e
+    * (accounts that have mailboxes).
450e7e
+    * UOA Specific note(1): Even if we do not
450e7e
+    * exclude these servers-classes here,
450e7e
+    * UOA specific code, will neither return
450e7e
+    * role, nor create INBOX, because none of these
450e7e
+    * administrative accounts belong to  the
450e7e
+    * mailRecipient objectclass, or have imapPartition.
450e7e
+    * UOA Specific note(2): Another good reason for doing
450e7e
+    * this, is to prevent the code, from getting into
450e7e
+    * cyrus_ldap.c because of the continues MSA logins to LMTPd.
450e7e
+    */
450e7e
+
450e7e
+   /*
450e7e
+    * admins and the coresponding imap
450e7e
+    * service, had already been excluded.
450e7e
+    */
450e7e
+
450e7e
+   /*
450e7e
+    * Do we really need group membership
450e7e
+    * for admins or service_admins?
450e7e
+    */
450e7e
+    if (global_authisa(auth_state, IMAPOPT_ADMINS)) return 0;
450e7e
+
450e7e
+   /*
450e7e
+    * Do we really need group membership
450e7e
+    * for proxyservers?
450e7e
+    */
450e7e
+    if (global_authisa(auth_state, IMAPOPT_PROXYSERVERS)) return 0;
450e7e
+
450e7e
+    /* 
450e7e
+     * Check if user belongs to the autocreate_users group. This option
450e7e
+     * controls for whom the mailbox may be automatically created. Default
450e7e
+     * value for this option is 'anyone'. So, if not declared, all mailboxes
450e7e
+     * will be created.
450e7e
+     */
450e7e
+    if (!global_authisa(auth_state, IMAPOPT_AUTOCREATE_USERS)) {
450e7e
+	    syslog(LOG_DEBUG, "autocreateinbox: User %s does not belong to the autocreate_users. No mailbox is created",
450e7e
+			    auth_userid);
450e7e
+	    return IMAP_MAILBOX_NONEXISTENT;
450e7e
+    }
450e7e
+
450e7e
+#if 0
450e7e
+        /*
450e7e
+         * Get Partition info or return.
450e7e
+         * (Here you should propably use
450e7e
+         * you own "get_partition(char *userid)"
450e7e
+         * function. Otherwise all new INBOXes will be
450e7e
+         * created into whatever partition has been declared
450e7e
+         * as default in your imapd.conf)
450e7e
+         */
450e7e
+
450e7e
+        partition = get_partition(userid);
450e7e
+        if (partition == NULL) {
450e7e
+            /*
450e7e
+             * Couldn't get partition info
450e7e
+             */
450e7e
+            syslog(LOG_ERR,
450e7e
+                   "Could not get imapPartition info for user %s", userid);
450e7e
+            return IMAP_PARTITION_UNKNOWN;
450e7e
+        }
450e7e
+#endif
450e7e
+
450e7e
+    r = mboxlist_createmailbox(mailboxname, MAILBOX_FORMAT_NORMAL, NULL,
450e7e
+                                      1, userid, auth_state, 0, 0, 0);
450e7e
+
450e7e
+    if (!r && autocreatequota > 0)
450e7e
+        r = mboxlist_setquota(mailboxname, autocreatequota, 0);
450e7e
+
450e7e
+    if (!r)
450e7e
+        r = mboxlist_changesub(mailboxname, userid,
450e7e
+                              auth_state, 1, 1);
450e7e
+
450e7e
+    if (!r) {
450e7e
+       syslog(LOG_NOTICE, "autocreateinbox: User %s, INBOX was successfully created in partition %s", 
450e7e
+               auth_userid, partition == NULL ? "default" : partition);
450e7e
+    } else {
450e7e
+       syslog(LOG_ERR, "autocreateinbox: User %s, INBOX failed. %s", 
450e7e
+               auth_userid, error_message(r));
450e7e
+    }
450e7e
+
450e7e
+#if 0
450e7e
+    /* Allocated from get_partition, and not needed any more */
450e7e
+    free_partition(partition);
450e7e
+#endif
450e7e
+
450e7e
+    if (r) return r;
450e7e
+
450e7e
+    /* INBOX's subfolders */
450e7e
+    if ((crt=config_getstring(IMAPOPT_AUTOCREATEINBOXFOLDERS)))
450e7e
+        sub=config_getstring(IMAPOPT_AUTOSUBSCRIBEINBOXFOLDERS);
450e7e
+
450e7e
+    /* Roll through crt */
450e7e
+    next_crt = (char *) crt;
450e7e
+    while (next_crt!=NULL && *next_crt) {
450e7e
+          for (p = next_crt ; isspace((int) *p) || *p == SEP ; p++);
450e7e
+          for (next_crt = p ; *next_crt && *next_crt != SEP ; next_crt++);
450e7e
+          for (q = next_crt ; q > p && (isspace((int) *q) || *q == SEP || !*q); q--);
450e7e
+
450e7e
+          if (!*p) continue;
450e7e
+
450e7e
+          len = q - p + 1;
450e7e
+
450e7e
+          /* First time we check for length */
450e7e
+          if (len > sizeof(folder) - 5)
450e7e
+              r = IMAP_MAILBOX_BADNAME;
450e7e
+
450e7e
+          if (!r) {
450e7e
+                  strncpy(folder, p, len);
450e7e
+                  folder[len] = '\0';
450e7e
+
450e7e
+                  strlcpy(name, namespace->prefix[NAMESPACE_INBOX], sizeof(name));
450e7e
+                  len = strlcat(name, folder, sizeof(name));
450e7e
+          }
450e7e
+
450e7e
+          if (!r)
450e7e
+            r = (namespace->mboxname_tointernal) (namespace, name, userid,
450e7e
+                                                 mailboxname);
450e7e
+          if (!r)
450e7e
+             r = mboxlist_createmailbox(mailboxname, MAILBOX_FORMAT_NORMAL, NULL,
450e7e
+                                            1, userid, auth_state, 0, 0, 0);
450e7e
+
450e7e
+          if (!r) {
450e7e
+            numcrt++;
450e7e
+            syslog(LOG_NOTICE, "autocreateinbox: User %s, subfolder %s creation succeeded.", 
450e7e
+               auth_userid, name);
450e7e
+         } else {
450e7e
+             syslog(LOG_WARNING, "autocreateinbox: User %s, subfolder %s creation failed. %s", 
450e7e
+               auth_userid, name, error_message(r));
450e7e
+             r=0;
450e7e
+             continue;
450e7e
+          }
450e7e
+
450e7e
+          /* Roll through sub */
450e7e
+          next_sub = (char *) sub;
450e7e
+          while (next_sub!=NULL && *next_sub) {
450e7e
+                for (p = next_sub ; isspace((int) *p) || *p == SEP ; p++);
450e7e
+                for (next_sub = p ; *next_sub && *next_sub != SEP ; next_sub++);
450e7e
+                for (q = next_sub ; q > p && (isspace((int) *q) || *q == SEP || !*q) ; q--);
450e7e
+                if (!*p ) continue;
450e7e
+
450e7e
+                len = q - p + 1;
450e7e
+
450e7e
+                if (len != strlen(folder) || strncmp(folder, p, len))
450e7e
+                    continue;
450e7e
+
450e7e
+                r = mboxlist_changesub(mailboxname, userid, auth_state, 1, 1);
450e7e
+
450e7e
+               if (!r) {
450e7e
+                   numsub++;
450e7e
+                   syslog(LOG_NOTICE,"autocreateinbox: User %s, subscription to %s succeeded",
450e7e
+                       auth_userid, name);
450e7e
+               } else
450e7e
+                    syslog(LOG_WARNING, "autocreateinbox: User %s, subscription to  %s failed. %s",
450e7e
+                       auth_userid, name, error_message(r));
cf58a5
+
450e7e
+                break;
450e7e
+         }
450e7e
+    }
450e7e
+
450e7e
+    if (crt!=NULL && *crt)
450e7e
+       syslog(LOG_INFO, "User %s, Inbox subfolders, created %d, subscribed %d", 
450e7e
+               auth_userid, numcrt, numsub);
d0d307
+
a6d65f
+    /*
450e7e
+     * Check if shared folders are available for subscription.
a6d65f
+     */
450e7e
+    mboxlist_autosubscribe_sharedfolders(namespace, userid, auth_userid, auth_state);
450e7e
+
450e7e
+#ifdef USE_SIEVE
a6d65f
+    /*
450e7e
+     * Here the autocreate sieve script feature is iniated from.
a6d65f
+     */
450e7e
+    source_script = config_getstring(IMAPOPT_AUTOCREATE_SIEVE_SCRIPT);
a6d65f
+ 
450e7e
+    if (source_script) {
450e7e
+        if (!autoadd_sieve(userid, source_script))
450e7e
+            syslog(LOG_NOTICE, "autocreate_sieve: User %s, default sieve script creation succeeded", auth_userid);
450e7e
+        else
450e7e
+            syslog(LOG_WARNING, "autocreate_sieve: User %s, default sieve script creation failed", auth_userid);
450e7e
+    }
450e7e
+#endif
d0d307
+
450e7e
+    return r;
450e7e
+}
d0d307
+
450e7e
diff -up cyrus-imapd-2.3.15/imap/mboxlist.h.autocreate cyrus-imapd-2.3.15/imap/mboxlist.h
450e7e
--- cyrus-imapd-2.3.15/imap/mboxlist.h.autocreate	2009-05-05 03:20:03.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/mboxlist.h	2009-09-18 11:11:39.778115814 +0200
450e7e
@@ -216,4 +216,8 @@ int mboxlist_commit(struct txn *tid);
450e7e
 int mboxlist_abort(struct txn *tid);
d0d307
 
450e7e
 int mboxlist_delayed_delete_isenabled(void);
450e7e
+int mboxlist_autocreateinbox(struct namespace *namespace,char *userid,
450e7e
+                       struct auth_state *auth_state, char *mailboxname, 
450e7e
+                       int autocreatequota);
d0d307
+
450e7e
 #endif
450e7e
diff -up cyrus-imapd-2.3.15/imap/pop3d.c.autocreate cyrus-imapd-2.3.15/imap/pop3d.c
450e7e
--- cyrus-imapd-2.3.15/imap/pop3d.c.autocreate	2009-04-23 19:10:07.000000000 +0200
450e7e
+++ cyrus-imapd-2.3.15/imap/pop3d.c	2009-09-18 11:11:39.784115791 +0200
450e7e
@@ -173,6 +173,8 @@ static void bitpipe(void);
a6d65f
 static char popd_apop_chal[45 + MAXHOSTNAMELEN + 1]; /* <rand.time@hostname> */
a6d65f
 static void cmd_apop(char *response);
a6d65f
 
a6d65f
+static int autocreate_inbox(char *inboxname, char *userid);
d0d307
+
a6d65f
 static void cmd_auth(char *arg);
a6d65f
 static void cmd_capa(void);
a6d65f
 static void cmd_pass(char *pass);
450e7e
@@ -1246,6 +1248,7 @@ void cmd_user(char *user)
a6d65f
 	popd_userid = xstrdup(userbuf);
a6d65f
 	prot_printf(popd_out, "+OK Name is a valid mailbox\r\n");
a6d65f
     }
d0d307
+
a6d65f
 }
d0d307
 
a6d65f
 void cmd_pass(char *pass)
450e7e
@@ -1549,6 +1552,43 @@ void cmd_auth(char *arg)
d0d307
 }
a6d65f
 
a6d65f
 /*
a6d65f
+ * Autocreate Inbox and subfolders upon login
d0d307
+ */
a6d65f
+int autocreate_inbox(char *inboxname, char *auth_userid)
a6d65f
+{
a6d65f
+    struct auth_state *auth_state;
a6d65f
+    int autocreatequota;
a6d65f
+    int r;
d0d307
+
a6d65f
+    if (inboxname == NULL || auth_userid == NULL)
a6d65f
+	    return IMAP_MAILBOX_NONEXISTENT;
a6d65f
+    
a6d65f
+    /*
a6d65f
+     * Exclude anonymous
a6d65f
+     */
a6d65f
+    if (!strcmp(popd_userid, "anonymous"))
a6d65f
+        return IMAP_MAILBOX_NONEXISTENT;
d0d307
+
a6d65f
+    /*
a6d65f
+     * Check for autocreatequota
a6d65f
+     */
a6d65f
+    if (!(autocreatequota = config_getint(IMAPOPT_AUTOCREATEQUOTA)))
a6d65f
+        return IMAP_MAILBOX_NONEXISTENT;
d0d307
+
a6d65f
+    /*
a6d65f
+     * Exclude admin's accounts
a6d65f
+     */
a6d65f
+     auth_state = auth_newstate(popd_userid);
a6d65f
+     if (global_authisa(auth_state, IMAPOPT_ADMINS))
a6d65f
+          return IMAP_MAILBOX_NONEXISTENT;
d0d307
+
a6d65f
+     r = mboxlist_autocreateinbox(&popd_namespace, auth_userid,
a6d65f
+                         auth_state, inboxname, autocreatequota);
a6d65f
+     return r;
d0d307
+}
d0d307
+
d0d307
+
d0d307
+/*
a6d65f
  * Complete the login process by opening and locking the user's inbox
a6d65f
  */
a6d65f
 int openinbox(void)
450e7e
@@ -1577,6 +1617,12 @@ int openinbox(void)
a6d65f
 
a6d65f
     if (!r) r = mboxlist_detail(inboxname, &type, NULL, NULL,
a6d65f
 				&server, &acl, NULL);
d0d307
+
a6d65f
+    /* Try once again after autocreate_inbox */
a6d65f
+    if (r == IMAP_MAILBOX_NONEXISTENT && !(r = autocreate_inbox(inboxname, userid)))
a6d65f
+	r = mboxlist_detail(inboxname, &type, NULL, NULL,
a6d65f
+				&server, &acl, NULL);
d0d307
+
a6d65f
     if (!r && (config_popuseacl = config_getswitch(IMAPOPT_POPUSEACL)) &&
a6d65f
 	(!acl ||
a6d65f
 	 !((myrights = cyrus_acl_myrights(popd_authstate, acl)) & ACL_READ))) {
a6d65f
--- cyrus-imapd-2.3.13/README.autocreate.autocreate	2009-01-13 11:14:09.000000000 +0100
a6d65f
+++ cyrus-imapd-2.3.13/README.autocreate	2009-01-13 11:14:09.000000000 +0100
a6d65f
@@ -0,0 +1,211 @@
a6d65f
+Cyrus IMAP autocreate Inbox patch
a6d65f
+----------------------------------
d0d307
+
a6d65f
+NOTE : This patch has been created at the University of Athens. For more info, as well 
a6d65f
+as more patches on Cyrus IMAPD server, please visit http://email.uoa.gr/ 
d0d307
+
a6d65f
+The design of Cyrus IMAP server does not predict the automatic creation of users'
a6d65f
+INBOX folders. The creation of a user's INBOX is considered to be an external task,
a6d65f
+that has to be completed as part of the user email account creation procedure. 
a6d65f
+Hence, to create a new email account the site administrator has to:
d0d307
+
a6d65f
+  a) Include the new account in the user database for the authentication procedure
a6d65f
+     (e.g. sasldb, shadow, mysql, ldap).
a6d65f
+  b) Create the corresponding INBOX folder. 
d0d307
+
a6d65f
+Alternatively, the user, if succesfully authenticated, may create his own INBOX folder,
a6d65f
+as long as the configuration of the site allows it (see "autocreatequota" in imapd.conf).
a6d65f
+Unlike what not careful readers may think, enabling the "autocreatequota" option, doesn't 
a6d65f
+lead to the automatic INBOX folder creation by Cyrus IMAP server.
a6d65f
+In fact, "autocreate" means that the IMAP clients are allowed to automatically create 
a6d65f
+the user INBOX. 
d0d307
+
a6d65f
+This patch adds the functionality of automatic creation of the users' INBOX folders into
a6d65f
+the Cyrus IMAP server. It is implemented as two features, namely the  "create on login"
a6d65f
+and "create on post".
a6d65f
+ 
d0d307
+
d0d307
+
a6d65f
+Create on login
a6d65f
+===============
a6d65f
+This feauture provides automatic creation of a user's INBOX folder when all of the 
a6d65f
+following requirements are met:
d0d307
+
a6d65f
+i)  The user has succesfully passed the authentication procedure.
d0d307
+
a6d65f
+ii) The user's authorisation ID (typically the same as the user's
a6d65f
+authentication ID)  doesn't belong to the imap_admins or admins
a6d65f
+accounts (see imapd.conf).
d0d307
+
a6d65f
+iii) The "autocreatequota" option in the imap configuration file 
a6d65f
+has been set to a non zero value. 
d0d307
+
a6d65f
+iv) The corresponding to the user's authorisation ID INBOX folder
a6d65f
+does not exist.
d0d307
+
a6d65f
+The user's first login is the most typical case when all four requirements are met. 
a6d65f
+Note that if the authenticated ID is allowed to proxy to another account for which 
a6d65f
+all of the above requirements are met, the corresponding INBOX folder for that account 
a6d65f
+will be created.
d0d307
+
d0d307
+
cf58a5
+
a6d65f
+Create on post
a6d65f
+==============
a6d65f
+This feauture provides automatic creation of a user's INBOX folder when all of the 
a6d65f
+following requirements are met. 
cf58a5
+
a6d65f
+i) An email message addressed to the user has been received.  
cf58a5
+
a6d65f
+ii) The recipient is not any of the imap_admins or admins accounts. 
a6d65f
+Note that passing emails to admins or imap_admins accounts from 
a6d65f
+the MTA to LMTP should be avoided in any case.
cf58a5
+
a6d65f
+iii) The recipient's INBOX does not exist.
d0d307
+
a6d65f
+iv) The "autocreatequota" option in the imap configuration file 
a6d65f
+has been set to a non zero value. 
d0d307
+
a6d65f
+v) The "createonpost" option in the imap configuration file 
a6d65f
+has been switched on. 
d0d307
+
d0d307
+
a6d65f
+Besides the automatic creation of INBOX folder, additional functionalities are
a6d65f
+provided:
d0d307
+
a6d65f
+  (A) Automatic creation of INBOX subfolders controlled by "autocreateinboxfolders"
a6d65f
+configuration option. eg 
d0d307
+
a6d65f
+autocreateinboxfolders: sent|drafts|spam|templates
d0d307
+
a6d65f
+  (B) Automatic subscription of INBOX subfolders controlled by "autosubscribeinboxfolders"
a6d65f
+configuration option. eg
d0d307
+
a6d65f
+autosubscribeinboxfolders: sent|spam
d0d307
+
a6d65f
+Obviously, only subscription to subfolders included in the "autocreateinboxfolder"
a6d65f
+list is meaningful. 
d0d307
+
a6d65f
+  (C) Automatic subscription to shared folders (bulletin boards). The user gets
a6d65f
+automatically subscribed to the shared folders declared in the "autosubscribesharedfolders"
a6d65f
+configuration option in imapd.conf.
a6d65f
+eg autosubscribesharedfolders: public_folder | public_folder.subfolder
d0d307
+
a6d65f
+In order the above action to succeed, the shared folder has to pre-exist the INBOX creation
a6d65f
+and the user must have the appropriate permissions in order to be able to subscribe to the
a6d65f
+shared folder.
d0d307
+
a6d65f
+* A new config option has been added. 'autosubscribe_all_sharedfolders' is a yes/no
a6d65f
+option. When set to yes, the user is automatically subscribed to all shared folders one 
a6d65f
+has permission to subscribe to. Please, note that when this option is set to yes, then
a6d65f
+'autosubscribesharedfolders' option is overriden.
d0d307
+
a6d65f
+  (D) Automatic creation of a predefined default sieve script.
d0d307
+
a6d65f
+This is very useful when a default sieve script is used for every user. Usually, a
a6d65f
+default anti-spam script may me be written in a file and copied to each user
a6d65f
+sieve scripts upon the INBOX creation. The imapd.conf options that have been added
a6d65f
+are 'autocreate_sieve_script', 'autocreate_sieve_compiledscript' and 
a6d65f
+'generate_compiled_sieve_script'.