citadel/serv_upgrade.c

   1 /* $Id$ */
   2 #include "sysdep.h"
   3 #include <stdlib.h>
   4 #include <unistd.h>
   5 #include <stdio.h>
   6 #include <fcntl.h>
   7 #include <signal.h>
   8 #include <pwd.h>
   9 #include <errno.h>
  10 #include <sys/types.h>
  11 #include <sys/time.h>
  12 #include <sys/wait.h>
  13 #include <string.h>
  14 #include <limits.h>
  15 #ifdef HAVE_PTHREAD_H
  16 #include <pthread.h>
  17 #endif
  18 #include "citadel.h"
  19 #include "server.h"
  20 #include <syslog.h>
  21 #include <time.h>
  22 #include "sysdep_decls.h"
  23 #include "citserver.h"
  24 #include "support.h"
  25 #include "config.h"
  26 #include "control.h"
  27 #include "dynloader.h"
  28 #include "database.h"
  29 #include "user_ops.h"
  30 #include "msgbase.h"
  31 #include "serv_upgrade.h"
  32
  33 void do_pre555_usersupp_upgrade(void) {
  34         struct pre555usersupp usbuf;
  35         struct usersupp newus;
  36         struct cdbdata *cdbus;
  37         char tempfilename[PATH_MAX];
  38         FILE *fp, *tp;
  39         static char vcard[1024];
  40
  41         lprintf(5, "Upgrading user file\n");
  42         fp = tmpfile();
  43         if (fp == NULL) {
  44                 lprintf(1, "%s\n", strerror(errno));
  45                 exit(errno);
  46         }
  47         strcpy(tempfilename, tmpnam(NULL));
  48
  49         /* First, back out all old version records to a flat file */
  50         cdb_rewind(CDB_USERSUPP);
  51         while(cdbus = cdb_next_item(CDB_USERSUPP), cdbus != NULL) {
  52                 memset(&usbuf, 0, sizeof(struct pre555usersupp));
  53                 memcpy(&usbuf, cdbus->ptr,
  54                         ( (cdbus->len > sizeof(struct pre555usersupp)) ?
  55                         sizeof(struct pre555usersupp) : cdbus->len) );
  56                 cdb_free(cdbus);
  57                 fwrite(&usbuf, sizeof(struct pre555usersupp), 1, fp);
  58         }
  59
  60         /* ...and overwrite the records with new format records */
  61         rewind(fp);
  62         while (fread(&usbuf, sizeof(struct pre555usersupp), 1, fp) > 0) {
  63             if (strlen(usbuf.fullname) > 0) {
  64                 lprintf(9, "Upgrading <%s>\n", usbuf.fullname);
  65                 memset(&newus, 0, sizeof(struct usersupp));
  66
  67                 newus.uid = usbuf.USuid;
  68                 strcpy(newus.password, usbuf.password);
  69                 newus.flags = usbuf.flags;
  70                 newus.timescalled = (long) usbuf.timescalled;
  71                 newus.posted = (long) usbuf.posted;
  72                 newus.axlevel = (CIT_UBYTE) usbuf.axlevel;
  73                 newus.usernum = (long) usbuf.usernum;
  74                 newus.lastcall = (long) usbuf.lastcall;
  75                 newus.USuserpurge = (int) usbuf.USuserpurge;
  76                 strcpy(newus.fullname, usbuf.fullname);
  77                 newus.USscreenwidth = (CIT_UBYTE) usbuf.USscreenwidth;
  78                 newus.USscreenheight = (CIT_UBYTE) usbuf.USscreenheight;
  79
  80                 putuser(&newus);
  81
  82                 /* write the vcard */
  83                 sprintf(vcard,
  84                         "Content-type: text/x-vcard\n\n"
  85                         "begin:vcard\n"
  86                         "n:%s\n"
  87                         "tel;home:%s\n"
  88                         "email;internet:%s\n"
  89                         "adr:;;%s;%s;%s;%s;USA\n"
  90                         "end:vcard\n",
  91                         usbuf.USname,
  92                         usbuf.USphone,
  93                         usbuf.USemail,
  94                         usbuf.USaddr,
  95                         usbuf.UScity,
  96                         usbuf.USstate,
  97                         usbuf.USzip);
  98
  99                 tp = fopen(tempfilename, "w");
 100                 fwrite(vcard, strlen(vcard)+1, 1, tp);
 101                 fclose(tp);
 102
 103                 CtdlWriteObject(CONFIGROOM, "text/x-vcard",
 104                         tempfilename, &newus, 0, 1, CM_SKIP_HOOKS);
 105                 unlink(tempfilename);
 106             }
 107         }
 108
 109         fclose(fp);     /* this file deletes automatically */
 110 }
 111
 112
 113
 114
 115
 116
 117
 118
 119 void check_server_upgrades(void) {
 120
 121         get_control();
 122         lprintf(5, "Server-hosted upgrade level is %d.%02d\n",
 123                 (CitControl.version / 100),
 124                 (CitControl.version % 100) );
 125
 126         if (CitControl.version < config.c_setup_level) {
 127                 lprintf(5, "Server hosted updates need to be processed at "
 128                                 "this time.  Please wait...\n");
 129         }
 130         else {
 131                 return;
 132         }
 133
 134
 135         if (CitControl.version < 555) do_pre555_usersupp_upgrade();
 136
 137
 138         CitControl.version = config.c_setup_level;
 139         put_control();
 140 }
 141
 142
 143
 144
 145 char *Dynamic_Module_Init(void)
 146 {
 147         check_server_upgrades();
 148         return "$Id$";
 149 }