2 * This module imports an "unpacked" system. The unpacked data may come from
3 * an older version of Citadel, or a different hardware architecture, or
4 * whatever. You should only run an import when your installed system is
5 * brand new and _empty_ !!
17 #include <sys/types.h>
26 #include "sysdep_decls.h"
27 #include "citserver.h"
30 #include "dynloader.h"
36 extern struct CitContext *ContextList;
39 #define MODULE_NAME "Import an unpacked system"
40 #define MODULE_AUTHOR "Art Cancro"
41 #define MODULE_EMAIL "ajc@uncnsrd.mt-kisco.ny.us"
42 #define MAJOR_VERSION 0
43 #define MINOR_VERSION 3
45 static struct DLModule_Info info = {
55 void fpgetfield(FILE *fp, char *string)
72 void import_message(long msgnum, long msglen) {
75 msgtext = malloc(msglen);
76 if (msgtext == NULL) {
77 lprintf(3, "ERROR: cannot allocate memory\n");
78 lprintf(3, "Your data files are now corrupt.\n");
83 fread(msgtext, msglen, 1, imfp);
84 cdb_store(CDB_MSGMAIN, &msgnum, sizeof(long), msgtext, msglen);
88 void imp_floors(void) {
89 char key[256], tag[256], tval[256];
94 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
96 if (!strcasecmp(key, "floor")) {
97 bzero(&fl, sizeof(struct floor));
99 while(fpgetfield(imfp, tag),
100 strcasecmp(tag, "endfloor")) {
101 fpgetfield(imfp, tval);
103 if (!strcasecmp(tag, "f_flags"))
104 fl.f_flags = atoi(tval);
105 if (!strcasecmp(tag, "f_name")) {
106 lprintf(9, "Floor <%s>\n", tval);
107 strcpy(fl.f_name, tval);
109 if (!strcasecmp(tag, "f_ref_count"))
110 fl.f_ref_count = atoi(tval);
111 if (!strcasecmp(tag, "f_expire_mode"))
112 fl.f_ep.expire_mode = atoi(tval);
113 if (!strcasecmp(tag, "f_expire_value"))
114 fl.f_ep.expire_value = atoi(tval);
117 putfloor(&fl, floornum);
121 lprintf(3, "ERROR: invalid floor section.\n");
122 lprintf(3, "Your data files are now corrupt.\n");
131 void imp_rooms(void) {
133 char tag[256], tval[256];
140 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
141 if (!strcasecmp(key, "room")) {
142 bzero(&qr, sizeof(struct quickroom));
147 while(fpgetfield(imfp, tag),
148 strcasecmp(tag, "endroom")) {
149 if (strcasecmp(tag, "message")) {
150 fpgetfield(imfp, tval);
156 if (!strcasecmp(tag, "qrname")) {
157 strcpy(qr.QRname, tval);
158 lprintf(9, "<%s> ", qr.QRname);
160 if (!strcasecmp(tag, "qrpasswd"))
161 strcpy(qr.QRpasswd, tval);
162 if (!strcasecmp(tag, "qrroomaide"))
163 qr.QRroomaide = atol(tval);
164 if (!strcasecmp(tag, "qrhighest"))
165 qr.QRhighest = atol(tval);
166 if (!strcasecmp(tag, "qrgen"))
167 qr.QRgen = atol(tval);
168 if (!strcasecmp(tag, "qrflags"))
169 qr.QRflags = atoi(tval);
170 if (!strcasecmp(tag, "qrdirname"))
171 strcpy(qr.QRdirname, tval);
172 if (!strcasecmp(tag, "qrinfo"))
173 qr.QRinfo = atol(tval);
174 if (!strcasecmp(tag, "qrfloor"))
175 qr.QRfloor = atoi(tval);
176 if (!strcasecmp(tag, "qrmtime"))
177 qr.QRmtime = atol(tval);
178 if (!strcasecmp(tag, "qrepmode"))
179 qr.QRep.expire_mode = atoi(tval);
180 if (!strcasecmp(tag, "qrepvalue"))
181 qr.QRep.expire_value = atoi(tval);
182 if (!strcasecmp(tag, "message")) {
183 fpgetfield(imfp, tval);
185 fpgetfield(imfp, tval);
187 import_message(msgnum, msglen);
189 msglist = realloc(msglist,
190 (sizeof(long)*num_msgs) );
191 msglist[num_msgs - 1] = msgnum;
196 lprintf(9, "(%d messages)\n", num_msgs);
197 if ((roomnum!=1)&&(qr.QRflags&QR_INUSE)) {
198 putroom(&qr, qr.QRname);
202 if ((roomnum!=1)&&(qr.QRflags&QR_INUSE)) {
203 CC->msglist = msglist;
204 CC->num_msgs = num_msgs;
214 lprintf(3, "ERROR: invalid room section.\n");
215 lprintf(3, "Your data files are now corrupt.\n");
224 void import_a_user(void) {
225 char key[256], value[256];
226 char vkey[256], vvalue[256];
232 bzero(&us, sizeof(struct usersupp));
233 while(fpgetfield(imfp, key), strcasecmp(key, "enduser")) {
234 if ((strcasecmp(key, "mail"))
235 &&(strcasecmp(key, "visit")) ) {
236 fpgetfield(imfp, value);
242 if (!strcasecmp(key, "usuid"))
243 us.USuid = atoi(value);
244 if (!strcasecmp(key, "password")) {
245 strcpy(us.password, value);
248 if (!strcasecmp(key, "flags"))
249 us.flags = atoi(value);
250 if (!strcasecmp(key, "timescalled"))
251 us.timescalled = atoi(value);
252 if (!strcasecmp(key, "posted"))
253 us.posted = atoi(value);
254 if (!strcasecmp(key, "fullname")) {
255 strcpy(us.fullname, value);
256 lprintf(9, "User <%s> ", us.fullname);
258 if (!strcasecmp(key, "axlevel"))
259 us.axlevel = atoi(value);
260 if (!strcasecmp(key, "usscreenwidth"))
261 us.USscreenwidth = atoi(value);
262 if (!strcasecmp(key, "usscreenheight"))
263 us.USscreenheight = atoi(value);
264 if (!strcasecmp(key, "usernum")) {
265 us.usernum = atol(value);
266 lprintf(9, "<#%ld> ", us.usernum);
268 if (!strcasecmp(key, "lastcall"))
269 us.lastcall = atol(value);
270 if (!strcasecmp(key, "usname"))
271 strcpy(us.USname, value);
272 if (!strcasecmp(key, "usaddr"))
273 strcpy(us.USaddr, value);
274 if (!strcasecmp(key, "uscity"))
275 strcpy(us.UScity, value);
276 if (!strcasecmp(key, "usstate"))
277 strcpy(us.USstate, value);
278 if (!strcasecmp(key, "uszip"))
279 strcpy(us.USzip, value);
280 if (!strcasecmp(key, "usphone"))
281 strcpy(us.USphone, value);
282 if (!strcasecmp(key, "usemail"))
283 strcpy(us.USemail, value);
284 if (!strcasecmp(key, "ususerpurge"))
285 us.USuserpurge = atoi(value);
286 if (!strcasecmp(key, "visit")) {
288 bzero(&vbuf, sizeof(struct visit));
289 bzero(&qr, sizeof(struct quickroom));
290 while(fpgetfield(imfp, vkey),
291 strcasecmp(vkey, "endvisit")) {
292 fpgetfield(imfp, vvalue);
293 if (!strcasecmp(vkey, "vname"))
294 strcpy(qr.QRname, vvalue);
295 if (!strcasecmp(vkey, "vgen")) {
296 qr.QRgen = atol(vvalue);
297 CtdlGetRelationship(&vbuf, &us, &qr);
299 if (!strcasecmp(vkey, "lastseen"))
300 vbuf.v_lastseen = atol(vvalue);
301 if (!strcasecmp(vkey, "flags"))
302 vbuf.v_flags = atoi(vvalue);
304 CtdlSetRelationship(&vbuf, &us, &qr);
308 putuser(&us, us.fullname);
310 lprintf(9, "(%d rooms)\n", visits);
314 void imp_usersupp(void) {
315 char key[256], value[256];
317 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
318 if (strcasecmp(key, "user")) {
319 fpgetfield(imfp, value);
325 if (!strcasecmp(key, "user")) {
332 void imp_globals(void) {
333 char key[256], value[256];
336 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
337 fpgetfield(imfp, value);
338 lprintf(9, " %s = %s\n", key, value);
340 if (!strcasecmp(key, "mmhighest"))
341 CitControl.MMhighest = atol(value);
342 if (!strcasecmp(key, "mmnextuser"))
343 CitControl.MMnextuser = atol(value);
351 void imp_config(void) {
352 char key[256], value[256];
355 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
356 fpgetfield(imfp, value);
357 lprintf(9, " %s = %s\n", key, value);
359 if (!strcasecmp(key, "c_nodename"))
360 strcpy(config.c_nodename, value);
361 if (!strcasecmp(key, "c_fqdn"))
362 strcpy(config.c_fqdn, value);
363 if (!strcasecmp(key, "c_humannode"))
364 strcpy(config.c_humannode, value);
365 if (!strcasecmp(key, "c_phonenum"))
366 strcpy(config.c_phonenum, value);
367 if (!strcasecmp(key, "c_phonenum"))
368 strcpy(config.c_phonenum, value);
369 if (!strcasecmp(key, "c_bbsuid"))
370 config.c_bbsuid = atoi(value);
371 if (!strcasecmp(key, "c_creataide"))
372 config.c_creataide = atoi(value);
373 if (!strcasecmp(key, "c_sleeping"))
374 config.c_sleeping = atoi(value);
375 if (!strcasecmp(key, "c_initax"))
376 config.c_initax = atoi(value);
377 if (!strcasecmp(key, "c_regiscall"))
378 config.c_regiscall = atoi(value);
379 if (!strcasecmp(key, "c_twitdetect"))
380 config.c_twitdetect = atoi(value);
381 if (!strcasecmp(key, "c_twitroom"))
382 strcpy(config.c_twitroom, value);
383 if (!strcasecmp(key, "c_moreprompt"))
384 strcpy(config.c_moreprompt, value);
385 if (!strcasecmp(key, "c_restrict"))
386 config.c_restrict = atoi(value);
387 if (!strcasecmp(key, "c_bbs_city"))
388 strcpy(config.c_bbs_city, value);
389 if (!strcasecmp(key, "c_sysadm"))
390 strcpy(config.c_sysadm, value);
391 if (!strcasecmp(key, "c_bucket_dir"))
392 strcpy(config.c_bucket_dir, value);
393 if (!strcasecmp(key, "c_setup_level"))
394 config.c_setup_level = atoi(value);
395 if (!strcasecmp(key, "c_maxsessions"))
396 config.c_maxsessions = atoi(value);
397 if (!strcasecmp(key, "c_net_password"))
398 strcpy(config.c_net_password, value);
399 if (!strcasecmp(key, "c_port_number"))
400 config.c_port_number = atoi(value);
401 if (!strcasecmp(key, "c_expire_policy"))
402 config.c_ep.expire_mode = atoi(value);
403 if (!strcasecmp(key, "c_expire_value"))
404 config.c_ep.expire_value = atoi(value);
405 if (!strcasecmp(key, "c_userpurge"))
406 config.c_userpurge = atoi(value);
409 fp = fopen("citadel.config", "wb");
410 fwrite(&config, sizeof(struct config), 1, fp);
419 char key[256], value[256];
420 int ssv_maxfloors = MAXFLOORS;
422 while(fpgetfield(imfp, key), strcasecmp(key, "endsection")) {
423 fpgetfield(imfp, value);
424 lprintf(9, " %s = %s\n", key, value);
426 if (!strcasecmp(key, "maxfloors")) {
427 ssv_maxfloors = atol(value);
428 if (ssv_maxfloors > MAXFLOORS) {
429 lprintf(3, "ERROR: maxfloors is %d, need %d\n",
430 ssv_maxfloors, MAXFLOORS);
444 void import_databases(void) {
447 lprintf(9, " ** IMPORTING ** \n");
448 while (fpgetfield(imfp, section), strcasecmp(section, "endfile")) {
449 lprintf(9, "Section: <%s>\n", section);
451 if (!strcasecmp(section, "ssv")) imp_ssv();
452 else if (!strcasecmp(section, "config")) imp_config();
453 else if (!strcasecmp(section, "globals")) imp_globals();
454 else if (!strcasecmp(section, "usersupp")) imp_usersupp();
455 else if (!strcasecmp(section, "rooms")) imp_rooms();
456 else if (!strcasecmp(section, "floors")) imp_floors();
458 lprintf(3, "ERROR: invalid import section.\n");
459 lprintf(3, "Your data files are now corrupt.\n");
470 void do_import(char *argbuf) {
471 char import_filename[PATH_MAX];
473 extract(import_filename, argbuf, 0);
474 imfp = fopen(import_filename, "rb");
476 lprintf(9, "Cannot open %s: %s\n",
477 import_filename, strerror(errno));
478 cprintf("%d Cannot open file\n", ERROR);
483 lprintf(9, "Defragmenting databases (this may take a while)...\n");
485 lprintf(1, "Import is finished. Shutting down Citadel...\n");
486 cprintf("%d Import finished. Shutting down Citadel...\n", OK);
491 void dump_message(long msg_num) {
492 struct cdbdata *dmsgtext;
494 dmsgtext = cdb_fetch(CDB_MSGMAIN, &msg_num, sizeof(long));
496 if (dmsgtext == NULL) {
497 lprintf(9, "%d Can't find message %ld\n", msg_num);
501 fprintf(exfp, "message%c%ld%c", 0, msg_num, 0);
502 fprintf(exfp, "%ld%c", (long)dmsgtext->len, 0);
503 fwrite(dmsgtext->ptr, dmsgtext->len, 1, exfp);
509 void export_a_room(struct quickroom *qr) {
513 lprintf(9,"<%s>\n", qr->QRname);
514 fprintf(exfp, "room%c", 0);
515 fprintf(exfp, "qrname%c%s%c", 0, qr->QRname, 0);
516 fprintf(exfp, "qrpasswd%c%s%c", 0, qr->QRpasswd, 0);
517 fprintf(exfp, "qrroomaide%c%ld%c", 0, qr->QRroomaide, 0);
518 fprintf(exfp, "qrhighest%c%ld%c", 0, qr->QRhighest, 0);
519 fprintf(exfp, "qrgen%c%ld%c", 0, qr->QRgen, 0);
520 fprintf(exfp, "qrflags%c%d%c", 0, qr->QRflags, 0);
521 fprintf(exfp, "qrdirname%c%s%c", 0, qr->QRdirname, 0);
522 fprintf(exfp, "qrinfo%c%ld%c", 0, qr->QRinfo, 0);
523 fprintf(exfp, "qrfloor%c%d%c", 0, qr->QRfloor, 0);
524 fprintf(exfp, "qrmtime%c%ld%c", 0, qr->QRmtime, 0);
525 fprintf(exfp, "qrepmode%c%d%c", 0, qr->QRep.expire_mode, 0);
526 fprintf(exfp, "qrepvalue%c%d%c", 0, qr->QRep.expire_value, 0);
529 if (CC->num_msgs > 0) for (b=0; b<(CC->num_msgs); ++b) {
531 lprintf(9, "Message #%ld\n", MessageFromList(b));
532 dump_message(MessageFromList(b));
535 fprintf(exfp, "endroom%c", 0);
539 void export_rooms(void) {
540 lprintf(9,"Rooms\n");
541 fprintf(exfp, "rooms%c", 0);
542 ForEachRoom(export_a_room);
543 fprintf(exfp, "endsection%c", 0);
548 void export_floors(void) {
552 fprintf(exfp, "floors%c", 0);
553 for (floornum=0; floornum<MAXFLOORS; ++floornum) {
554 getfloor(&fl, floornum);
555 fprintf(exfp, "floor%c", 0);
556 fprintf(exfp, "f_flags%c%d%c", 0, fl.f_flags, 0);
557 fprintf(exfp, "f_name%c%s%c", 0, fl.f_name, 0);
558 fprintf(exfp, "f_ref_count%c%d%c", 0, fl.f_ref_count, 0);
559 fprintf(exfp, "f_expire_mode%c%d%c", 0, fl.f_ep.expire_mode, 0);
560 fprintf(exfp, "f_expire_value%c%d%c", 0,
561 fl.f_ep.expire_value, 0);
562 fprintf(exfp, "endfloor%c", 0);
564 fprintf(exfp, "endsection%c", 0);
570 void export_a_user(struct usersupp *us) {
571 struct cdbdata *cdbvisit;
572 struct visit *visits;
576 lprintf(9, "User <%s> ", us->fullname);
578 fprintf(exfp, "user%c", 0);
579 fprintf(exfp, "usuid%c%d%c", 0, us->USuid, 0);
580 fprintf(exfp, "password%c%s%c", 0, us->password, 0);
581 fprintf(exfp, "flags%c%d%c", 0, us->flags, 0);
582 fprintf(exfp, "timescalled%c%d%c", 0, us->timescalled, 0);
583 fprintf(exfp, "posted%c%d%c", 0, us->posted, 0);
584 fprintf(exfp, "fullname%c%s%c", 0, us->fullname, 0);
585 fprintf(exfp, "axlevel%c%d%c", 0, us->axlevel, 0);
586 fprintf(exfp, "usscreenwidth%c%d%c", 0, us->USscreenwidth, 0);
587 fprintf(exfp, "usscreenheight%c%d%c", 0, us->USscreenheight, 0);
588 fprintf(exfp, "usernum%c%ld%c", 0, us->usernum, 0);
589 fprintf(exfp, "lastcall%c%ld%c", 0, us->lastcall, 0);
590 fprintf(exfp, "usname%c%s%c", 0, us->USname, 0);
591 fprintf(exfp, "usaddr%c%s%c", 0, us->USaddr, 0);
592 fprintf(exfp, "uscity%c%s%c", 0, us->UScity, 0);
593 fprintf(exfp, "usstate%c%s%c", 0, us->USstate, 0);
594 fprintf(exfp, "uszip%c%s%c", 0, us->USzip, 0);
595 fprintf(exfp, "usphone%c%s%c", 0, us->USphone, 0);
596 fprintf(exfp, "usemail%c%s%c", 0, us->USemail, 0);
597 fprintf(exfp, "ususerpurge%c%d%c", 0, us->USuserpurge, 0);
600 cdbvisit = cdb_fetch(CDB_VISIT, &us->usernum, sizeof(long));
601 if (cdbvisit != NULL) {
602 num_visits = cdbvisit->len / sizeof(struct visit);
603 if (num_visits == 0) {
607 visits = (struct visit *)
608 malloc(num_visits * sizeof(struct visit));
609 memcpy(visits, cdbvisit->ptr,
610 (num_visits * sizeof(struct visit)));
613 if (num_visits > 0) for (a=0; a<num_visits; ++a) {
614 fprintf(exfp, "visit%c", 0);
615 fprintf(exfp, "vname%c%s%c", 0,
616 visits[a].v_roomname, 0);
617 fprintf(exfp, "vgen%c%ld%c", 0,
618 visits[a].v_generation, 0);
619 fprintf(exfp, "lastseen%c%ld%c", 0,
620 visits[a].v_lastseen, 0);
621 fprintf(exfp, "flags%c%d%c", 0,
622 visits[a].v_flags, 0);
623 fprintf(exfp, "endvisit%c", 0);
629 lprintf(9, "(%d rooms)\n", num_visits);
630 fprintf(exfp, "enduser%c", 0);
634 void export_usersupp(void) {
635 lprintf(9, "Users\n");
636 fprintf(exfp, "usersupp%c", 0);
638 ForEachUser(export_a_user);
640 fprintf(exfp, "endsection%c", 0);
644 void do_export(char *argbuf) {
645 char export_filename[PATH_MAX];
647 extract(export_filename, argbuf, 0);
648 exfp = fopen(export_filename, "wb");
650 lprintf(9, "Cannot open %s: %s\n",
651 export_filename, strerror(errno));
652 cprintf("%d Cannot open file\n", ERROR);
656 /* structure size variables */
657 lprintf(9, "Structure size variables\n");
658 fprintf(exfp, "ssv%c", 0);
659 fprintf(exfp, "maxfloors%c%d%c", 0, MAXFLOORS, 0);
660 fprintf(exfp, "endsection%c", 0);
662 /* Write out the server config */
663 lprintf(9,"Server config\n");
664 fprintf(exfp, "config%c", 0);
665 fprintf(exfp, "c_nodename%c%s%c", 0, config.c_nodename, 0);
666 fprintf(exfp, "c_fqdn%c%s%c", 0, config.c_fqdn, 0);
667 fprintf(exfp, "c_humannode%c%s%c", 0, config.c_humannode, 0);
668 fprintf(exfp, "c_phonenum%c%s%c", 0, config.c_phonenum, 0);
669 fprintf(exfp, "c_bbsuid%c%d%c", 0, config.c_bbsuid, 0);
670 fprintf(exfp, "c_creataide%c%d%c", 0, config.c_creataide, 0);
671 fprintf(exfp, "c_sleeping%c%d%c", 0, config.c_sleeping, 0);
672 fprintf(exfp, "c_initax%c%d%c", 0, config.c_initax, 0);
673 fprintf(exfp, "c_regiscall%c%d%c", 0, config.c_regiscall, 0);
674 fprintf(exfp, "c_twitdetect%c%d%c", 0, config.c_twitdetect, 0);
675 fprintf(exfp, "c_twitroom%c%s%c", 0, config.c_twitroom, 0);
676 fprintf(exfp, "c_moreprompt%c%s%c", 0, config.c_moreprompt, 0);
677 fprintf(exfp, "c_restrict%c%d%c", 0, config.c_restrict, 0);
678 fprintf(exfp, "c_bbs_city%c%s%c", 0, config.c_bbs_city, 0);
679 fprintf(exfp, "c_sysadm%c%s%c", 0, config.c_sysadm, 0);
680 fprintf(exfp, "c_bucket_dir%c%s%c", 0, config.c_bucket_dir, 0);
681 fprintf(exfp, "c_setup_level%c%d%c", 0, config.c_setup_level, 0);
682 fprintf(exfp, "c_maxsessions%c%d%c", 0, config.c_maxsessions, 0);
683 fprintf(exfp, "c_net_password%c%s%c", 0, config.c_net_password, 0);
684 fprintf(exfp, "c_port_number%c%d%c", 0, config.c_port_number, 0);
685 fprintf(exfp, "c_expire_policy%c%d%c", 0, config.c_ep.expire_mode, 0);
686 fprintf(exfp, "c_expire_value%c%d%c", 0, config.c_ep.expire_value, 0);
687 fprintf(exfp, "c_userpurge%c%d%c", 0, config.c_userpurge, 0);
688 fprintf(exfp, "endsection%c", 0);
690 /* Now some global stuff */
691 lprintf(9, "Globals\n");
693 fprintf(exfp, "globals%c", 0);
694 fprintf(exfp, "mmhighest%c%ld%c", 0, CitControl.MMhighest, 0);
695 fprintf(exfp, "mmnextuser%c%ld%c", 0, CitControl.MMnextuser, 0);
696 fprintf(exfp, "mmflags%c%d%c", 0, CitControl.MMflags, 0);
697 fprintf(exfp, "endsection%c", 0);
699 /* Export all of the databases */
704 fprintf(exfp, "endfile%c", 0);
706 lprintf(1, "Export is finished.\n");
707 cprintf("%d Export is finished.\n", OK);
712 struct DLModule_Info *Dynamic_Module_Init(void) {
713 CtdlRegisterProtoHook(do_import,
715 "Import an unpacked system");
716 CtdlRegisterProtoHook(do_export,
718 "Export the system");