citadel/serv_vandelay.c

   1 /*
   2  * $Id$
   3  *
   4  * This is the "Art Vandelay" module.  It is an importer/exporter.
   5  *
   6  */
   7
   8 #include "sysdep.h"
   9 #include <stdlib.h>
  10 #include <unistd.h>
  11 #include <stdio.h>
  12 #include <fcntl.h>
  13 #include <signal.h>
  14 #include <pwd.h>
  15 #include <errno.h>
  16 #include <sys/types.h>
  17 #include <sys/time.h>
  18 #include <sys/wait.h>
  19 #include <string.h>
  20 #include <limits.h>
  21 #include "citadel.h"
  22 #include "server.h"
  23 #include <time.h>
  24 #include "sysdep_decls.h"
  25 #include "citserver.h"
  26 #include "support.h"
  27 #include "config.h"
  28 #include "dynloader.h"
  29 #include "database.h"
  30 #include "msgbase.h"
  31 #include "tools.h"
  32 #include "user_ops.h"
  33 #include "room_ops.h"
  34 #include "control.h"
  35
  36 #define END_OF_MESSAGE  "---eom---dbd---"
  37
  38 char artv_tempfilename1[256];
  39 char artv_tempfilename2[256];
  40 FILE *artv_global_message_list;
  41
  42 void artv_export_users_backend(struct usersupp *usbuf, void *data) {
  43         cprintf("user\n");
  44         cprintf("%d\n", usbuf->version);
  45         cprintf("%d\n", usbuf->uid);
  46         cprintf("%s\n", usbuf->password);
  47         cprintf("%u\n", usbuf->flags);
  48         cprintf("%ld\n", usbuf->timescalled);
  49         cprintf("%ld\n", usbuf->posted);
  50         cprintf("%d\n", usbuf->axlevel);
  51         cprintf("%ld\n", usbuf->usernum);
  52         cprintf("%ld\n", usbuf->lastcall);
  53         cprintf("%d\n", usbuf->USuserpurge);
  54         cprintf("%s\n", usbuf->fullname);
  55         cprintf("%d\n", usbuf->USscreenwidth);
  56         cprintf("%d\n", usbuf->USscreenheight);
  57         cprintf("%d\n", usbuf->moderation_filter);
  58 }
  59
  60
  61 void artv_export_users(void) {
  62         ForEachUser(artv_export_users_backend, NULL);
  63 }
  64
  65
  66 void artv_export_room_msg(long msgnum, void *userdata) {
  67         cprintf("%ld\n", msgnum);
  68         fprintf(artv_global_message_list, "%ld\n", msgnum);
  69 }
  70
  71
  72 void artv_export_rooms_backend(struct quickroom *qrbuf, void *data) {
  73         cprintf("room\n");
  74         cprintf("%s\n", qrbuf->QRname);
  75         cprintf("%s\n", qrbuf->QRpasswd);
  76         cprintf("%ld\n", qrbuf->QRroomaide);
  77         cprintf("%ld\n", qrbuf->QRhighest);
  78         cprintf("%ld\n", qrbuf->QRgen);
  79         cprintf("%u\n", qrbuf->QRflags);
  80         cprintf("%s\n", qrbuf->QRdirname);
  81         cprintf("%ld\n", qrbuf->QRinfo);
  82         cprintf("%d\n", qrbuf->QRfloor);
  83         cprintf("%ld\n", qrbuf->QRmtime);
  84         cprintf("%d\n", qrbuf->QRep.expire_mode);
  85         cprintf("%d\n", qrbuf->QRep.expire_value);
  86         cprintf("%ld\n", qrbuf->QRnumber);
  87         cprintf("%d\n", qrbuf->QRorder);
  88
  89         getroom(&CC->quickroom, qrbuf->QRname);
  90         /* format of message list export is all message numbers output
  91          * one per line terminated by a 0.
  92          */
  93         CtdlForEachMessage(MSGS_ALL, 0L, (-127), NULL, NULL,
  94                 artv_export_room_msg, NULL);
  95         cprintf("0\n");
  96
  97 }
  98
  99
 100
 101 void artv_export_rooms(void) {
 102         char cmd[256];
 103         artv_global_message_list = fopen(artv_tempfilename1, "w");
 104         ForEachRoom(artv_export_rooms_backend, NULL);
 105         fclose(artv_global_message_list);
 106
 107         /*
 108          * Process the 'global' message list.  (Sort it and remove dups.
 109          * Dups are ok because a message may be in more than one room, but
 110          * this will be handled by exporting the reference count, not by
 111          * exporting the message multiple times.)
 112          */
 113         sprintf(cmd, "sort <%s >%s", artv_tempfilename1, artv_tempfilename2);
 114         system(cmd);
 115         sprintf(cmd, "uniq <%s >%s", artv_tempfilename2, artv_tempfilename1);
 116         system(cmd);
 117 }
 118
 119
 120 void artv_export_floors(void) {
 121         struct floor flbuf;
 122         int i;
 123
 124         for (i=0; i < MAXFLOORS; ++i) {
 125                 cprintf("floor\n");
 126                 cprintf("%d\n", i);
 127                 getfloor(&flbuf, i);
 128                 cprintf("%u\n", flbuf.f_flags);
 129                 cprintf("%s\n", flbuf.f_name);
 130                 cprintf("%d\n", flbuf.f_ref_count);
 131                 cprintf("%d\n", flbuf.f_ep.expire_mode);
 132                 cprintf("%d\n", flbuf.f_ep.expire_value);
 133         }
 134 }
 135
 136
 137
 138
 139
 140 /*
 141  *  Traverse the visits file...
 142  */
 143 void artv_export_visits(void) {
 144         struct visit vbuf;
 145         struct cdbdata *cdbv;
 146
 147         cdb_rewind(CDB_VISIT);
 148
 149         while (cdbv = cdb_next_item(CDB_VISIT), cdbv != NULL) {
 150                 memset(&vbuf, 0, sizeof(struct visit));
 151                 memcpy(&vbuf, cdbv->ptr,
 152                        ((cdbv->len > sizeof(struct visit)) ?
 153                         sizeof(struct visit) : cdbv->len));
 154                 cdb_free(cdbv);
 155
 156                 cprintf("visit\n");
 157                 cprintf("%ld\n", vbuf.v_roomnum);
 158                 cprintf("%ld\n", vbuf.v_roomgen);
 159                 cprintf("%ld\n", vbuf.v_usernum);
 160                 cprintf("%ld\n", vbuf.v_lastseen);
 161                 cprintf("%u\n", vbuf.v_flags);
 162         }
 163 }
 164
 165
 166 void artv_export_message(long msgnum) {
 167         struct SuppMsgInfo smi;
 168         struct CtdlMessage *msg;
 169         struct ser_ret smr;
 170         FILE *fp;
 171         char buf[256];
 172         char tempfile[256];
 173
 174         msg = CtdlFetchMessage(msgnum);
 175         if (msg == NULL) return;        /* fail silently */
 176
 177         cprintf("message\n");
 178         GetSuppMsgInfo(&smi, msgnum);
 179         cprintf("%ld\n", msgnum);
 180         cprintf("%d\n", smi.smi_refcount);
 181         cprintf("%s\n", smi.smi_content_type);
 182         cprintf("%d\n", smi.smi_mod);
 183
 184         serialize_message(&smr, msg);
 185         CtdlFreeMessage(msg);
 186
 187         /* write it in base64 */
 188         strcpy(tempfile, tmpnam(NULL));
 189         sprintf(buf, "./base64 -e >%s", tempfile);
 190         fp = popen(buf, "w");
 191         fwrite(smr.ser, smr.len, 1, fp);
 192         fclose(fp);
 193
 194         phree(smr.ser);
 195
 196         fp = fopen(tempfile, "r");
 197         unlink(tempfile);
 198         while (fgets(buf, sizeof(buf), fp) != NULL) {
 199                 buf[strlen(buf)-1] = 0;
 200                 cprintf("%s\n", buf);
 201         }
 202         fclose(fp);
 203         cprintf("%s\n", END_OF_MESSAGE);
 204 }
 205
 206
 207
 208 void artv_export_messages(void) {
 209         char buf[256];
 210         long msgnum;
 211         int count = 0;
 212
 213         artv_global_message_list = fopen(artv_tempfilename1, "r");
 214         lprintf(7, "Opened %s\n", artv_tempfilename1);
 215         while (fgets(buf, sizeof(buf), artv_global_message_list) != NULL) {
 216                 msgnum = atol(buf);
 217                 if (msgnum > 0L) {
 218                         artv_export_message(msgnum);
 219                         ++count;
 220                 }
 221         }
 222         fclose(artv_global_message_list);
 223         lprintf(7, "Exported %ld messages.\n", count);
 224 }
 225
 226
 227
 228
 229 void artv_do_export(void) {
 230         cprintf("%d Exporting all Citadel databases.\n", LISTING_FOLLOWS);
 231
 232         cprintf("version\n%d\n", REV_LEVEL);
 233
 234         /* export the config file */
 235         cprintf("config\n");
 236         cprintf("%s\n", config.c_nodename);
 237         cprintf("%s\n", config.c_fqdn);
 238         cprintf("%s\n", config.c_humannode);
 239         cprintf("%s\n", config.c_phonenum);
 240         cprintf("%d\n", config.c_bbsuid);
 241         cprintf("%d\n", config.c_creataide);
 242         cprintf("%d\n", config.c_sleeping);
 243         cprintf("%d\n", config.c_initax);
 244         cprintf("%d\n", config.c_regiscall);
 245         cprintf("%d\n", config.c_twitdetect);
 246         cprintf("%s\n", config.c_twitroom);
 247         cprintf("%s\n", config.c_moreprompt);
 248         cprintf("%d\n", config.c_restrict);
 249         cprintf("%ld\n", config.c_msgbase);
 250         cprintf("%s\n", config.c_bbs_city);
 251         cprintf("%s\n", config.c_sysadm);
 252         cprintf("%s\n", config.c_bucket_dir);
 253         cprintf("%d\n", config.c_setup_level);
 254         cprintf("%d\n", config.c_maxsessions);
 255         cprintf("%s\n", config.c_net_password);
 256         cprintf("%d\n", config.c_port_number);
 257         cprintf("%d\n", config.c_ipgm_secret);
 258         cprintf("%d\n", config.c_ep.expire_mode);
 259         cprintf("%d\n", config.c_ep.expire_value);
 260         cprintf("%d\n", config.c_userpurge);
 261         cprintf("%d\n", config.c_roompurge);
 262         cprintf("%s\n", config.c_logpages);
 263         cprintf("%d\n", config.c_createax);
 264         cprintf("%ld\n", config.c_maxmsglen);
 265         cprintf("%d\n", config.c_min_workers);
 266         cprintf("%d\n", config.c_max_workers);
 267         cprintf("%d\n", config.c_pop3_port);
 268         cprintf("%d\n", config.c_smtp_port);
 269         cprintf("%d\n", config.c_default_filter);
 270
 271         /* Export the control file */
 272         get_control();
 273         cprintf("control\n");
 274         cprintf("%ld\n", CitControl.MMhighest);
 275         cprintf("%u\n", CitControl.MMflags);
 276         cprintf("%ld\n", CitControl.MMnextuser);
 277         cprintf("%ld\n", CitControl.MMnextroom);
 278         cprintf("%d\n", CitControl.version);
 279
 280         artv_export_users();
 281         artv_export_rooms();
 282         artv_export_floors();
 283         artv_export_visits();
 284         artv_export_messages();
 285
 286         cprintf("000\n");
 287 }
 288
 289
 290
 291 void artv_import_config(void) {
 292         char buf[256];
 293
 294         lprintf(9, "Importing config file\n");
 295         client_gets(config.c_nodename);
 296         lprintf(9, "c_nodename = %s\n", config.c_nodename);
 297         client_gets(config.c_fqdn);
 298         client_gets(config.c_humannode);
 299         client_gets(config.c_phonenum);
 300         client_gets(buf);       config.c_bbsuid = atoi(buf);
 301         client_gets(buf);       config.c_creataide = atoi(buf);
 302         client_gets(buf);       config.c_sleeping = atoi(buf);
 303         client_gets(buf);       config.c_initax = atoi(buf);
 304         client_gets(buf);       config.c_regiscall = atoi(buf);
 305         client_gets(buf);       config.c_twitdetect = atoi(buf);
 306         client_gets(config.c_twitroom);
 307         client_gets(config.c_moreprompt);
 308         client_gets(buf);       config.c_restrict = atoi(buf);
 309         client_gets(buf);       config.c_msgbase = atol(buf);
 310         client_gets(config.c_bbs_city);
 311         client_gets(config.c_sysadm);
 312         lprintf(9, "c_sysadm = %s\n", config.c_sysadm);
 313         client_gets(config.c_bucket_dir);
 314         client_gets(buf);       config.c_setup_level = atoi(buf);
 315         client_gets(buf);       config.c_maxsessions = atoi(buf);
 316         client_gets(config.c_net_password);
 317         client_gets(buf);       config.c_port_number = atoi(buf);
 318         client_gets(buf);       config.c_ipgm_secret = atoi(buf);
 319         client_gets(buf);       config.c_ep.expire_mode = atoi(buf);
 320         client_gets(buf);       config.c_ep.expire_value = atoi(buf);
 321         client_gets(buf);       config.c_userpurge = atoi(buf);
 322         client_gets(buf);       config.c_roompurge = atoi(buf);
 323         client_gets(config.c_logpages);
 324         client_gets(buf);       config.c_createax = atoi(buf);
 325         client_gets(buf);       config.c_maxmsglen = atol(buf);
 326         client_gets(buf);       config.c_min_workers = atoi(buf);
 327         client_gets(buf);       config.c_max_workers = atoi(buf);
 328         client_gets(buf);       config.c_pop3_port = atoi(buf);
 329         client_gets(buf);       config.c_smtp_port = atoi(buf);
 330         client_gets(buf);       config.c_default_filter = atoi(buf);
 331         put_config();
 332         lprintf(7, "Imported config file\n");
 333 }
 334
 335
 336
 337 void artv_import_control(void) {
 338         char buf[256];
 339
 340         lprintf(9, "Importing control file\n");
 341         client_gets(buf);       CitControl.MMhighest = atol(buf);
 342         client_gets(buf);       CitControl.MMflags = atoi(buf);
 343         client_gets(buf);       CitControl.MMnextuser = atol(buf);
 344         client_gets(buf);       CitControl.MMnextroom = atol(buf);
 345         client_gets(buf);       CitControl.version = atoi(buf);
 346         put_control();
 347         lprintf(7, "Imported control file\n");
 348 }
 349
 350
 351 void artv_import_user(void) {
 352         char buf[256];
 353         struct usersupp usbuf;
 354
 355         client_gets(buf);       usbuf.version = atoi(buf);
 356         client_gets(buf);       usbuf.uid = atoi(buf);
 357         client_gets(usbuf.password);
 358         client_gets(buf);       usbuf.flags = atoi(buf);
 359         client_gets(buf);       usbuf.timescalled = atol(buf);
 360         client_gets(buf);       usbuf.posted = atol(buf);
 361         client_gets(buf);       usbuf.axlevel = atoi(buf);
 362         client_gets(buf);       usbuf.usernum = atol(buf);
 363         client_gets(buf);       usbuf.lastcall = atol(buf);
 364         client_gets(buf);       usbuf.USuserpurge = atoi(buf);
 365         client_gets(usbuf.fullname);
 366         client_gets(buf);       usbuf.USscreenwidth = atoi(buf);
 367         client_gets(buf);       usbuf.USscreenheight = atoi(buf);
 368         client_gets(buf);       usbuf.moderation_filter = atoi(buf);
 369         putuser(&usbuf);
 370 }
 371
 372
 373 void artv_import_room(void) {
 374         char buf[256];
 375         struct quickroom qrbuf;
 376         long msgnum;
 377         int msgcount = 0;
 378
 379         client_gets(qrbuf.QRname);
 380         client_gets(qrbuf.QRpasswd);
 381         client_gets(buf);       qrbuf.QRroomaide = atol(buf);
 382         client_gets(buf);       qrbuf.QRhighest = atol(buf);
 383         client_gets(buf);       qrbuf.QRgen = atol(buf);
 384         client_gets(buf);       qrbuf.QRflags = atoi(buf);
 385         client_gets(qrbuf.QRdirname);
 386         client_gets(buf);       qrbuf.QRinfo = atol(buf);
 387         client_gets(buf);       qrbuf.QRfloor = atoi(buf);
 388         client_gets(buf);       qrbuf.QRmtime = atol(buf);
 389         client_gets(buf);       qrbuf.QRep.expire_mode = atoi(buf);
 390         client_gets(buf);       qrbuf.QRep.expire_value = atoi(buf);
 391         client_gets(buf);       qrbuf.QRnumber = atol(buf);
 392         client_gets(buf);       qrbuf.QRorder = atoi(buf);
 393         putroom(&qrbuf);
 394         lprintf(7, "Imported room <%s>\n", qrbuf.QRname);
 395         /* format of message list export is all message numbers output
 396          * one per line terminated by a 0.
 397          */
 398         while (client_gets(buf), msgnum = atol(buf), msgnum > 0) {
 399                 CtdlSaveMsgPointerInRoom(qrbuf.QRname, msgnum, 0);
 400                 ++msgcount;
 401         }
 402         lprintf(7, "(%d messages)\n", msgcount);
 403 }
 404
 405
 406 void artv_import_floor(void) {
 407         struct floor flbuf;
 408         int i;
 409         char buf[256];
 410
 411         client_gets(buf);               i = atoi(buf);
 412         client_gets(buf);               flbuf.f_flags = atoi(buf);
 413         client_gets(flbuf.f_name);
 414         client_gets(buf);               flbuf.f_ref_count = atoi(buf);
 415         client_gets(buf);               flbuf.f_ep.expire_mode = atoi(buf);
 416         client_gets(buf);               flbuf.f_ep.expire_value = atoi(buf);
 417         putfloor(&flbuf, i);
 418         lprintf(7, "Imported floor #%d (%s)\n", i, flbuf.f_name);
 419 }
 420
 421
 422 /*
 423  */
 424 void artv_import_visit(void) {
 425         struct visit vbuf;
 426         char buf[256];
 427
 428         client_gets(buf);       vbuf.v_roomnum = atol(buf);
 429         client_gets(buf);       vbuf.v_roomgen = atol(buf);
 430         client_gets(buf);       vbuf.v_usernum = atol(buf);
 431         client_gets(buf);       vbuf.v_lastseen = atol(buf);
 432         client_gets(buf);       vbuf.v_flags = atoi(buf);
 433         put_visit(&vbuf);
 434         lprintf(7, "Imported visit %ld/%ld/%ld\n",
 435                 vbuf.v_roomnum, vbuf.v_roomgen, vbuf.v_usernum);
 436 }
 437
 438
 439
 440 void artv_import_message(void) {
 441         struct SuppMsgInfo smi;
 442         long msgnum;
 443         int msglen;
 444         FILE *fp;
 445         char buf[256];
 446         char tempfile[256];
 447         char *mbuf;
 448
 449         memset(&smi, 0, sizeof(struct SuppMsgInfo));
 450         client_gets(buf);       msgnum = atol(buf);
 451                                 smi.smi_msgnum = msgnum;
 452         client_gets(buf);       smi.smi_refcount = atoi(buf);
 453         client_gets(smi.smi_content_type);
 454         client_gets(buf);       smi.smi_mod = atoi(buf);
 455
 456         lprintf(7, "message #%ld\n", msgnum);
 457
 458         /* decode base64 message text */
 459         strcpy(tempfile, tmpnam(NULL));
 460         sprintf(buf, "./base64 -d >%s", tempfile);
 461         fp = popen(buf, "w");
 462         while (client_gets(buf), strcasecmp(buf, END_OF_MESSAGE)) {
 463                 fprintf(fp, "%s\n", buf);
 464         }
 465         fclose(fp);
 466         fp = fopen(tempfile, "rb");
 467         fseek(fp, 0L, SEEK_END);
 468         msglen = ftell(fp);
 469         fclose(fp);
 470         lprintf(9, "msglen = %ld\n", msglen);
 471
 472         mbuf = mallok(msglen);
 473         fp = fopen(tempfile, "rb");
 474         fread(mbuf, msglen, 1, fp);
 475         fclose(fp);
 476
 477         begin_critical_section(S_MSGMAIN);
 478         cdb_store(CDB_MSGMAIN, &msgnum, sizeof(long), mbuf, msglen);
 479         end_critical_section(S_MSGMAIN);
 480
 481         phree(mbuf);
 482         unlink(tempfile);
 483
 484         PutSuppMsgInfo(&smi);
 485         lprintf(7, "Imported message %ld\n", msgnum);
 486 }
 487
 488
 489
 490
 491 void artv_do_import(void) {
 492         char buf[256];
 493         char s_version[256];
 494         int version;
 495
 496         cprintf("%d sock it to me\n", SEND_LISTING);
 497         while (client_gets(buf), strcmp(buf, "000")) {
 498
 499                 lprintf(9, "import keyword: <%s>\n", buf);
 500
 501                 if (!strcasecmp(buf, "version")) {
 502                         client_gets(s_version);
 503                         version = atoi(s_version);
 504                         if ((version < REV_MIN) || (version > REV_LEVEL)) {
 505                                 lprintf(7, "Version mismatch - aborting\n");
 506                                 break;
 507                         }
 508                 }
 509                 else if (!strcasecmp(buf, "config")) artv_import_config();
 510                 else if (!strcasecmp(buf, "control")) artv_import_control();
 511                 else if (!strcasecmp(buf, "user")) artv_import_user();
 512                 else if (!strcasecmp(buf, "room")) artv_import_room();
 513                 else if (!strcasecmp(buf, "floor")) artv_import_floor();
 514                 else if (!strcasecmp(buf, "visit")) artv_import_visit();
 515                 else if (!strcasecmp(buf, "message")) artv_import_message();
 516                 else break;
 517
 518         }
 519         lprintf(7, "Invalid keyword <%s>.  Flushing input.\n", buf);
 520         while (client_gets(buf), strcmp(buf, "000"))  ;;
 521 }
 522
 523
 524
 525 void cmd_artv(char *cmdbuf) {
 526         char cmd[256];
 527         static int is_running = 0;
 528
 529         if (CtdlAccessCheck(ac_aide)) return;   /* FIXME should be intpgm */
 530         if (is_running) {
 531                 cprintf("%d The importer/exporter is already running.\n",
 532                         ERROR);
 533                 return;
 534         }
 535         is_running = 1;
 536
 537         strcpy(artv_tempfilename1, tmpnam(NULL));
 538         strcpy(artv_tempfilename2, tmpnam(NULL));
 539
 540         extract(cmd, cmdbuf, 0);
 541         if (!strcasecmp(cmd, "export")) artv_do_export();
 542         else if (!strcasecmp(cmd, "import")) artv_do_import();
 543         else cprintf("%d illegal command\n", ERROR);
 544
 545         unlink(artv_tempfilename1);
 546         unlink(artv_tempfilename2);
 547
 548         is_running = 0;
 549 }
 550
 551
 552
 553
 554 char *Dynamic_Module_Init(void)
 555 {
 556         CtdlRegisterProtoHook(cmd_artv, "ARTV", "import/export data store");
 557         return "$Id$";
 558 }