citadel/migratenet.c

   1 /*
   2  * $Id$
   3  *
   4  * 5.80 to 5.90 migration utility for network files
   5  *
   6  */
   7
   8 #include <stdlib.h>
   9 #include <unistd.h>
  10 #include <stdio.h>
  11 #include <string.h>
  12 #include <sys/types.h>
  13 #include <dirent.h>
  14 #include <errno.h>
  15 #include "citadel.h"
  16 #include "ipc.h"
  17 #include "tools.h"
  18 #include "config.h"
  19
  20 struct mn_roomlist {
  21         struct mn_roomlist *next;
  22         char roomname[SIZ];
  23 };
  24
  25 void logoff(int code)
  26 {
  27         exit(code);
  28 }
  29
  30 int main(int argc, char **argv)
  31 {
  32         char buf[SIZ];
  33         char hostbuf[SIZ];
  34         char portbuf[SIZ];
  35         DIR *dp;
  36         struct dirent *d;
  37         long highest = 0L;
  38         char node[SIZ];
  39         char room[SIZ];
  40         long thighest;
  41         FILE *fp;
  42         FILE *roomfp;
  43         char roomfilename[SIZ];
  44         FILE *nodefp;
  45         char nodefilename[SIZ];
  46         struct mn_roomlist *mn = NULL;
  47         struct mn_roomlist *mnptr = NULL;
  48
  49         printf("\n\n\n\n\n"
  50 "This utility migrates your network settings (room sharing with other\n"
  51 "Citadel systems) from 5.80 to 5.90.  You should only do this ONCE.  It\n"
  52 "will ERASE your 5.80 configuration files when it is finished, and it will\n"
  53 "ERASE any 5.90 configuration files that you have already set up.\n\n"
  54 "Are you sure you want to do this? ");
  55
  56         gets(buf);
  57         if (tolower(buf[0]) != 'y') exit(0);
  58
  59         get_config();
  60
  61         attach_to_server(argc, argv, hostbuf, portbuf);
  62         serv_gets(buf);
  63         printf("%s\n", &buf[4]);
  64         if ( (buf[0]!='2') && (strncmp(buf,"551",3)) ) {
  65                 fprintf(stderr, "%s: %s\n", argv[0], &buf[4]);
  66                 logoff(atoi(buf));
  67         }
  68
  69         sprintf(buf, "IPGM %d", config.c_ipgm_secret);
  70         serv_puts(buf);
  71         serv_gets(buf);
  72         fprintf(stderr, "%s\n", &buf[4]);
  73         if (buf[0] != '2') {
  74                 exit(2);
  75         }
  76
  77         if (chdir("network/systems") != 0) {
  78                 perror("cannot chdir network/systems");
  79                 exit(errno);
  80         }
  81
  82         strcpy(roomfilename, tmpnam(NULL));
  83         roomfp = fopen(roomfilename, "w");
  84         if (roomfp == NULL) {
  85                 perror("cannot open temp file");
  86                 exit(errno);
  87         }
  88
  89         strcpy(nodefilename, tmpnam(NULL));
  90         nodefp = fopen(nodefilename, "w");
  91         if (roomfp == NULL) {
  92                 perror("cannot open temp file");
  93                 exit(errno);
  94         }
  95
  96         dp = opendir(".");
  97         if (dp == NULL) {
  98                 perror("cannot open directory");
  99                 exit(errno);
 100         }
 101
 102         while (d = readdir(dp), d != NULL) {
 103                 fp = NULL;
 104                 if ( (d->d_name[0] != '.') && strcasecmp(d->d_name, "CVS")) {
 105                         fp = fopen(d->d_name, "r");
 106                 }
 107                 if (fp != NULL) {
 108                         printf("\n*** Processing '%s'\n", d->d_name);
 109
 110                         fprintf(nodefp, "%s|", d->d_name);
 111                         printf("Enter shared secret: ");
 112                         gets(buf);
 113                         if (buf[0] == 0) strcpy(buf, config.c_net_password);
 114                         fprintf(nodefp, "%s|", buf);
 115                         printf("Enter host name/IP : ");
 116                         gets(buf);
 117                         if (buf[0] == 0) sprintf(buf, "%s.citadel.org",
 118                                 d->d_name);
 119                         fprintf(nodefp, "%s|", buf);
 120                         printf("Enter port number  : ");
 121                         gets(buf);
 122                         if (buf[0] == 0) strcpy(buf, "504");
 123                         fprintf(nodefp, "%s\n", buf);
 124
 125                         fgets(buf, sizeof buf, fp);
 126                         printf("skipping: %s", buf);
 127                         while (fgets(room, sizeof room, fp),
 128                               (fgets(buf, sizeof buf, fp) != NULL) ) {
 129                                 thighest = atol(buf),
 130                                 room[strlen(room) - 1] = 0;
 131                                 fprintf(roomfp, "%s|%s\n",
 132                                         d->d_name, room);
 133                                 if (thighest > highest) {
 134                                         highest = thighest;
 135                                 }
 136                         }
 137                         fclose(fp);
 138                 }
 139         }
 140
 141         closedir(dp);
 142         fclose(roomfp);
 143         fclose(nodefp);
 144
 145         /* Point of no return */
 146
 147         /* Set up the node table */
 148         printf("Creating neighbor node table\n");
 149         sprintf(buf, "CONF putsys|%s", IGNETCFG);
 150         serv_puts(buf);
 151         serv_gets(buf);
 152         if (buf[0] == '4') {
 153                 nodefp = fopen(nodefilename, "r");
 154                 if (nodefp != NULL) {
 155                         while (fgets(buf, sizeof buf, nodefp) != NULL) {
 156                                 buf[strlen(buf)-1] = 0;
 157                                 serv_puts(buf);
 158                         }
 159                         fclose(nodefp);
 160                 }
 161                 serv_puts("000");
 162         }
 163         else {
 164                 printf("%s\n", &buf[4]);
 165         }
 166
 167
 168         /* Now go through the table looking for node names to enter */
 169
 170         sprintf(buf, "cat %s |awk '{ FS=\"|\"; print $2 }' |sort -f |uniq -i",
 171                 roomfilename);
 172         roomfp = popen(buf, "r");
 173         if (roomfp == NULL) {
 174                 perror("cannot open pipe");
 175                 unlink(roomfilename);
 176         }
 177
 178         while (fgets(room, sizeof room, roomfp) != NULL) {
 179                 room[strlen(room)-1] = 0;
 180                 if (strlen(room) > 0) {
 181                         mnptr = (struct mn_roomlist *)
 182                                 malloc(sizeof (struct mn_roomlist));
 183                         strcpy(mnptr->roomname, room);
 184                         mnptr->next = mn;
 185                         mn = mnptr;
 186                 }
 187         }
 188
 189         pclose(roomfp);
 190
 191         /* Enter configurations for each room... */
 192         while (mn != NULL) {
 193                 printf("Room <%s>\n", mn->roomname);
 194
 195                 sprintf(buf, "GOTO %s", mn->roomname);
 196                 serv_puts(buf);
 197                 serv_gets(buf);
 198                 if (buf[0] != '2') goto roomerror;
 199
 200                 serv_puts("SNET");
 201                 serv_gets(buf);
 202                 if (buf[0] != '4') goto roomerror;
 203
 204                 sprintf(buf, "lastsent|%ld", highest);
 205                 serv_puts(buf);
 206
 207                 roomfp = fopen(roomfilename, "r");
 208                 if (roomfp != NULL) {
 209                         while (fgets(buf, sizeof buf, roomfp) != NULL) {
 210                                 buf[strlen(buf)-1] = 0;
 211                                 extract(node, buf, 0);
 212                                 extract(room, buf, 1);
 213                                 if (!strcasecmp(room, mn->roomname)) {
 214                                         sprintf(buf,
 215                                                 "ignet_push_share|%s", node);
 216                                         serv_puts(buf);
 217                                 }
 218                         }
 219                         fclose(roomfp);
 220                 }
 221
 222                 serv_puts("000");
 223
 224 roomerror:      /* free this record */
 225                 mnptr = mn->next;
 226                 free(mn);
 227                 mn = mnptr;
 228         }
 229
 230         unlink(roomfilename);
 231         unlink(nodefilename);
 232         return(0);
 233 }