Fixed a bug in username key usage that was causing email aliases to disappear
[citadel.git] / citadel / modules / upgrade / serv_upgrade.c
index 94c1406f49c5f08fdcf046ba04db7b385f5ad255..86e2947f440bf5e072a19756abc7a1569de49f2c 100644 (file)
@@ -4,7 +4,7 @@
  * guesses about what kind of data format changes need to be applied, and
  * we apply them transparently.
  *
- * Copyright (c) 1987-2017 by the citadel.org team
+ * Copyright (c) 1987-2020 by the citadel.org team
  *
  * This program is open source software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public License version 3.
 int oldver = 0;
 
 /*
- * Fix up the name for Citadel user 0 and try to remove any extra users with number 0
+ * Try to remove any extra users with number 0
  */
 void fix_sys_user_name(void)
 {
        struct ctdluser usbuf;
        char usernamekey[USERNAME_SIZE];
 
-       /** If we have a user called Citadel rename them to SYS_Citadel */
-       if (CtdlGetUser(&usbuf, "Citadel") == 0)
-       {
-               rename_user("Citadel", "SYS_Citadel");
-       }
-
-       while (CtdlGetUserByNumber(&usbuf, 0) == 0)
-       {
+       while (CtdlGetUserByNumber(&usbuf, 0) == 0) {
                /* delete user with number 0 and no name */
                if (IsEmptyStr(usbuf.fullname)) {
                        cdb_delete(CDB_USERS, "", 0);
@@ -89,69 +82,33 @@ void fix_sys_user_name(void)
                }
        }
 
-       /* Make sure user SYS_* is user 0 */
-       while (CtdlGetUserByNumber(&usbuf, -1) == 0)
-       {
-               if (strncmp(usbuf.fullname, "SYS_", 4))
-               {       /* Delete any user 0 that doesn't start with SYS_ */
-                       makeuserkey(usernamekey, usbuf.fullname, cutuserkey(usbuf.fullname));
-                       cdb_delete(CDB_USERS, usernamekey, strlen(usernamekey));
-               }
-               else {
-                       usbuf.usernum = 0;
-                       CtdlPutUser(&usbuf);
-               }
+       /* Delete any "user 0" accounts */
+       while (CtdlGetUserByNumber(&usbuf, -1) == 0) {
+               makeuserkey(usernamekey, usbuf.fullname);
+               cdb_delete(CDB_USERS, usernamekey, strlen(usernamekey));
        }
 }
 
 
 /* 
  * Back end processing function for reindex_uids()
- * Call this function as a ForEachUser backend in order to queue up
- * user names, or call it with a null user to make it do the processing.
- * This allows us to maintain the list as a static instead of passing
- * pointers around.
  */
-void reindex_uids_backend(struct ctdluser *usbuf, void *data) {
-       static struct UserProcList *uplist = NULL;
-       struct UserProcList *ptr;
-       struct ctdluser us;
+void reindex_uids_backend(char *username, void *data) {
 
-       /* this is the calling mode where we add a user */
+       struct ctdluser us;
 
-       if (usbuf != NULL) {
-               ptr = (struct UserProcList *) malloc(sizeof (struct UserProcList));
-               if (ptr == NULL) {
-                       return;
+       if (CtdlGetUserLock(&us, username) == 0) {
+               syslog(LOG_DEBUG, "Processing <%s> (%d)", us.fullname, us.uid);
+               if (us.uid == CTDLUID) {
+                       us.uid = NATIVE_AUTH_UID;
                }
-
-               safestrncpy(ptr->user, usbuf->fullname, sizeof ptr->user);
-               ptr->next = uplist;
-               uplist = ptr;
-               return;
-       }
-
-       /* this is the calling mode where we do the processing */
-
-       while (uplist != NULL) {
-
-               if (CtdlGetUserLock(&us, uplist->user) == 0) {
-                       syslog(LOG_DEBUG, "Processing <%s> (%d)", uplist->user, us.uid);
-                       if (us.uid == CTDLUID) {
-                               us.uid = NATIVE_AUTH_UID;
-                       }
-                       CtdlPutUserLock(&us);
-                       if ((us.uid > 0) && (us.uid != NATIVE_AUTH_UID)) {              // if non-native auth , index by uid
-                               StrBuf *claimed_id = NewStrBuf();
-                               StrBufPrintf(claimed_id, "uid:%d", us.uid);
-                               attach_extauth(&us, claimed_id);
-                               FreeStrBuf(&claimed_id);
-                       }
+               CtdlPutUserLock(&us);
+               if ((us.uid > 0) && (us.uid != NATIVE_AUTH_UID)) {              // if non-native auth , index by uid
+                       StrBuf *claimed_id = NewStrBuf();
+                       StrBufPrintf(claimed_id, "uid:%d", us.uid);
+                       attach_extauth(&us, claimed_id);
+                       FreeStrBuf(&claimed_id);
                }
-
-               ptr = uplist;
-               uplist = uplist->next;
-               free(ptr);
        }
 }
 
@@ -163,7 +120,6 @@ void reindex_uids_backend(struct ctdluser *usbuf, void *data) {
 void reindex_uids(void) {
        syslog(LOG_WARNING, "upgrade: reindexing and applying uid changes");
        ForEachUser(reindex_uids_backend, NULL);
-       reindex_uids_backend(NULL, NULL);
        return;
 }
 
@@ -443,61 +399,64 @@ void update_config(void) {
  * This allows us to maintain the list as a static instead of passing
  * pointers around.
  */
-void miafvtur_backend(struct ctdluser *usbuf, void *data) {
+void miafvtur_backend(char *username, void *data) {
+       struct ctdluser usbuf;
+       char primary_inet_email[512] = { 0 };
+       char other_inet_emails[512] = { 0 };
+       char combined_inet_emails[512] = { 0 };
 
-       struct miafvtur {
-               char name[64];
-               char emails[512];
-       };
+       if (CtdlGetUser(&usbuf, username) != 0) {
+               return;
+       }
 
-       static struct miafvtur *m = NULL;
-       static int num_m = 0;
-       static int alloc_m = 0;
+       struct vCard *v = vcard_get_user(&usbuf);
+       if (!v) return;
+       extract_inet_email_addrs(primary_inet_email, sizeof primary_inet_email, other_inet_emails, sizeof other_inet_emails, v, 1);
+       vcard_free(v);
+       
+       if ( (IsEmptyStr(primary_inet_email)) && (IsEmptyStr(other_inet_emails)) ) {
+               return;
+       }
 
-       /* this is the calling mode where we add a user */
+       snprintf(combined_inet_emails, 512, "%s%s%s",
+               (!IsEmptyStr(primary_inet_email) ? primary_inet_email : ""),
+               ((!IsEmptyStr(primary_inet_email)&&(!IsEmptyStr(other_inet_emails))) ? "|" : ""),
+               (!IsEmptyStr(other_inet_emails) ? other_inet_emails : "")
+       );
 
-       if (usbuf != NULL) {
-               char primary_inet_email[512] = { 0 };
-               char other_inet_emails[512] = { 0 };
-               struct vCard *v = vcard_get_user(usbuf);
-               if (!v) return;
-               extract_inet_email_addrs(primary_inet_email, sizeof primary_inet_email, other_inet_emails, sizeof other_inet_emails, v, 1);
-               vcard_free(v);
-       
-               if ( (IsEmptyStr(primary_inet_email)) && (IsEmptyStr(other_inet_emails)) ) {
-                       return;
-               }
+       CtdlSetEmailAddressesForUser(usbuf.fullname, combined_inet_emails);
+}
 
-               if (num_m >= alloc_m) {
-                       if (alloc_m == 0) {
-                               alloc_m = 100;
-                               m = malloc(sizeof(struct miafvtur) * alloc_m);
-                       }
-                       else {
-                               alloc_m *= 2;
-                               m = realloc(m, (sizeof(struct miafvtur) * alloc_m));
-                       }
-               }
 
-               strcpy(m[num_m].name, usbuf->fullname);
-               snprintf(m[num_m].emails, 512, "%s%s%s",
-                       (!IsEmptyStr(primary_inet_email) ? primary_inet_email : ""),
-                       ((!IsEmptyStr(primary_inet_email)&&(!IsEmptyStr(other_inet_emails))) ? "|" : ""),
-                       (!IsEmptyStr(other_inet_emails) ? other_inet_emails : "")
-               );
-               ++num_m;
-               return;
+/*
+ * If our system still has a "refcount_adjustments.dat" sitting around from an old version, ingest it now.
+ */
+int ProcessOldStyleAdjRefCountQueue(void)
+{
+       int r;
+       FILE *fp;
+       struct arcq arcq_rec;
+       int num_records_processed = 0;
+
+       fp = fopen(file_arcq, "rb");
+       if (fp == NULL) {
+               return(num_records_processed);
        }
 
-       /* this is the calling mode where we do the processing */
-       int i;
-       for (i=0; i<num_m; ++i) {
-               CtdlSetEmailAddressesForUser(m[i].name, m[i].emails);
+       syslog(LOG_INFO, "msgbase: ingesting %s", file_arcq);
+
+       while (fread(&arcq_rec, sizeof(struct arcq), 1, fp) == 1) {
+               AdjRefCount(arcq_rec.arcq_msgnum, arcq_rec.arcq_delta);
+               ++num_records_processed;
        }
-       free(m);
-       num_m = 0;
-       alloc_m = 0;
-       return;
+
+       fclose(fp);
+       r = unlink(file_arcq);
+       if (r != 0) {
+               syslog(LOG_ERR, "%s: %m", file_arcq);
+       }
+
+       return(num_records_processed);
 }
 
 
@@ -508,11 +467,25 @@ void miafvtur_backend(struct ctdluser *usbuf, void *data) {
 void move_inet_addrs_from_vcards_to_user_records(void)
 {
        ForEachUser(miafvtur_backend, NULL);
-       miafvtur_backend(NULL, NULL);
        CtdlRebuildDirectoryIndex();
 }
 
 
+/*
+ * Create a default administrator account so we can log in to a new installation
+ */
+void create_default_admin_account(void) {
+       struct ctdluser usbuf;
+
+       create_user(DEFAULT_ADMIN_USERNAME, CREATE_USER_DO_NOT_BECOME_USER, (-1));
+       CtdlGetUser(&usbuf, DEFAULT_ADMIN_USERNAME);
+       safestrncpy(usbuf.password, DEFAULT_ADMIN_PASSWORD, sizeof(usbuf.password));
+       usbuf.axlevel = AxAideU;
+       CtdlPutUser(&usbuf);
+       CtdlSetConfigStr("c_sysadm", DEFAULT_ADMIN_USERNAME);
+}
+
+
 /*
  * Based on the server version number reported by the existing database,
  * run in-place data format upgrades until everything is up to date.
@@ -578,6 +551,13 @@ void pre_startup_upgrades(void) {
                CtdlSetConfigInt("c_ep_mode", EXPIRE_MANUAL);
                CtdlSetConfigInt("c_ep_value", 0);
        }
+
+       /*
+        * If this is the first run on an empty database, create a default administrator
+        */
+       if (oldver == 0) {
+               create_default_admin_account();
+       }
 }
 
 
@@ -599,6 +579,10 @@ void post_startup_upgrades(void) {
        if ((oldver > 000) && (oldver < 912)) {
                move_inet_addrs_from_vcards_to_user_records();
        }
+
+       if ((oldver > 000) && (oldver < 922)) {
+               ProcessOldStyleAdjRefCountQueue();
+       }
 }
 
 
@@ -610,13 +594,13 @@ CTDL_MODULE_UPGRADE(upgrade)
        return "upgrade";
 }
 
+
 CTDL_MODULE_INIT(upgrade)
 {
-       if(!threading)
-       {
+       if (!threading) {
                post_startup_upgrades();
        }
-       
+
        /* return our module name for the log */
         return "upgrade";
 }