![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to scfglib1.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs2|
Return to scfglib1.c CVS log | Up to [Synchronet] / sbbs / sbbs2 |
1.1 root 1: #line 1 "SCFGLIB1.C"
2:
3: /* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
4:
5: #include "sbbs.h"
6: #include "scfglib.h"
7:
8: void prep_path(char *path)
9: {
10: char str[LEN_DIR*2];
11: int i;
12:
13: if(!path[0])
14: return;
15: if(path[0]!='\\' && path[1]!=':') /* Relative to NODE directory */
16: sprintf(str,"%s%s",node_dir,path);
17: else
18: strcpy(str,path);
19: i=strlen(str);
20: if(str[i-1]!=':' && str[i-1]!='\\')
21: strcat(str,"\\");
22: strcat(str,"."); // Change C: to C:. and C:\SBBS\ to C:\SBBS\.
23: _fullpath(path,str,LEN_DIR+1); // Change C:\SBBS\NODE1\..\EXEC to C:\SBBS\EXEC
24: i=strlen(path);
25: if(i && path[i-1]!='\\')
26: strcat(path,"\\");
27: }
28:
29: char *get_alloc(long *offset, char *outstr, int maxlen, FILE *instream)
30: {
31:
32: #ifdef SCFG
33: fread(outstr,1,maxlen+1,instream);
34: (*offset)+=maxlen+1;
35: #else
36: char str[257];
37:
38: fread(str,1,maxlen+1,instream);
39: // lprintf("%s %d %p\r\n",__FILE__,__LINE__,offset);
40: (*offset)+=maxlen+1; // this line was commented out (04/12/97) why?
41: if(!str[0]) /* Save memory */
42: return(scfgnulstr);
43: if((outstr=(char *)MALLOC(strlen(str)+1))==NULL)
44: return(NULL);
45: strcpy(outstr,str);
46: #endif
47:
48: return(outstr);
49: }
50:
51: #ifdef SCFG /* SCFG allocate max length */
52: #define readline_alloc(l,s,m,i) readline(l,s,m,i)
53: #else
54: char *readline_alloc(long *offset, char *outstr, int maxline
55: , FILE *instream);
56: #define readline_alloc(l,s,m,i) s=readline_alloc(l,s,m,i)
57: #define get_alloc(o,s,l,i) s=get_alloc(o,s,l,i)
58: #endif
59:
60: /***********************************************************/
61: /* These functions are called from here and must be linked */
62: /***********************************************************/
63: /***
64: nopen()
65: truncsp()
66: ***/
67:
68: void allocerr(read_cfg_text_t txt, long offset, char *fname, uint size)
69: {
70: lprintf(txt.error,offset,fname);
71: lprintf(txt.allocerr,size);
72: bail(1);
73: }
74:
75: #ifndef NO_NODE_CFG
76:
77: /****************************************************************************/
78: /* Reads in NODE.CNF and initializes the associated variables */
79: /****************************************************************************/
80: void read_node_cfg(read_cfg_text_t txt)
81: {
82: char c,str[256],cmd[64],fname[13],*p;
83: int i;
84: short n;
85: long offset=0;
86: FILE *instream;
87:
88: strcpy(fname,"NODE.CNF");
89: sprintf(str,"%s%s",node_dir,fname);
90: if((instream=fnopen(&i,str,O_RDONLY))==NULL) {
91: lprintf(txt.openerr,str);
92: #ifdef SBBS
93: lprintf("\r\nSBBS must be run from a NODE directory (e.g. ");
94: lclatr(WHITE);
95: lprintf("C:\\SBBS\\NODE1");
96: lclatr(LIGHTGRAY);
97: lprintf(").\r\n");
98: #endif
99: bail(1); }
100:
101: lprintf(txt.reading,fname);
102: get_int(node_num,instream);
103: if(!node_num) {
104: lprintf(txt.error,offset,fname);
105: lprintf("Node number must be non-zero\r\n");
106: bail(1); }
107: get_str(node_name,instream);
108: get_str(node_phone,instream);
109: get_str(node_comspec,instream);
110: if(!node_comspec[0])
111: strcpy(node_comspec,"C:\\OS2\\MDOS\\COMMAND.COM");
112: get_int(node_misc,instream);
113: get_int(node_ivt,instream);
114: get_int(node_swap,instream);
115: get_str(node_swapdir,instream);
116: #ifndef SCFG
117: if(!node_swapdir[0])
118: strcpy(node_swapdir,node_dir);
119: else
120: prep_path(node_swapdir);
121: #endif
122: get_int(node_valuser,instream);
123: get_int(node_minbps,instream);
124: #ifdef SCFG
125: get_str(node_ar,instream);
126: #else
127: fread(str,1,LEN_ARSTR+1,instream);
128: offset+=LEN_ARSTR+1;
129: node_ar=arstr(0,str);
130: #endif
131: get_int(node_dollars_per_call,instream);
132: get_str(node_editor,instream);
133: get_str(node_viewer,instream);
134: get_str(node_daily,instream);
135: get_int(c,instream);
136: if(c) node_scrnlen=c;
137: get_int(node_scrnblank,instream);
138: get_str(ctrl_dir,instream); /* ctrl directory */
139: get_str(text_dir,instream); /* text directory */
140: get_str(temp_dir,instream); /* temp directory */
141: if(!temp_dir[0])
142: strcpy(temp_dir,"TEMP");
143:
144: #ifndef SCFG
145: prep_path(ctrl_dir);
146: prep_path(text_dir);
147: prep_path(temp_dir);
148: #endif
149:
150: for(i=0;i<10;i++) { /* WFC 0-9 DOS commands */
151: get_alloc(&offset,wfc_cmd[i],LEN_CMD,instream); }
152: for(i=0;i<12;i++) { /* WFC F1-F12 shrinking DOS cmds */
153: get_alloc(&offset,wfc_scmd[i],LEN_CMD,instream); }
154: get_str(mdm_hang,instream);
155: get_int(node_sem_check,instream);
156: if(!node_sem_check) node_sem_check=60;
157: get_int(node_stat_check,instream);
158: if(!node_stat_check) node_stat_check=10;
159: get_str(scfg_cmd,instream);
160: if(!scfg_cmd[0])
161: strcpy(scfg_cmd,"%!scfg %k");
162: get_int(sec_warn,instream);
163: if(!sec_warn)
164: sec_warn=180;
165: get_int(sec_hangup,instream);
166: if(!sec_hangup)
167: sec_hangup=300;
168: for(i=0;i<188;i++) { /* Unused - initialized to NULL */
169: fread(&n,1,2,instream);
170: offset+=2; }
171: for(i=0;i<256;i++) { /* Unused - initialized to 0xff */
172: fread(&n,1,2,instream);
173: offset+=2; }
174:
175: /***************/
176: /* Modem Stuff */
177: /***************/
178:
179: get_int(com_port,instream);
180: get_int(com_irq,instream);
181: get_int(com_base,instream);
182: get_int(com_rate,instream);
183: get_int(mdm_misc,instream);
184: get_str(mdm_init,instream);
185: get_str(mdm_spec,instream);
186: get_str(mdm_term,instream);
187: get_str(mdm_dial,instream);
188: get_str(mdm_offh,instream);
189: get_str(mdm_answ,instream);
190: get_int(mdm_reinit,instream);
191: get_int(mdm_ansdelay,instream);
192: get_int(mdm_rings,instream);
193:
194: get_int(mdm_results,instream);
195:
196: if(mdm_results) {
197: if((mdm_result=(mdm_result_t *)MALLOC(sizeof(mdm_result_t)*mdm_results))
198: ==NULL)
199: allocerr(txt,offset,fname,sizeof(mdm_result_t *)*mdm_results); }
200: else
201: mdm_result=NULL;
202:
203: for(i=0;i<mdm_results;i++) {
204: if(feof(instream)) break;
205: get_int(mdm_result[i].code,instream);
206: get_int(mdm_result[i].rate,instream);
207: get_int(mdm_result[i].cps,instream);
208: get_alloc(&offset,mdm_result[i].str,LEN_MODEM,instream); }
209: mdm_results=i;
210: fclose(instream);
211: lprintf(txt.readit,fname);
212: }
213:
214: #endif
215:
216: #ifndef NO_MAIN_CFG
217:
218: /****************************************************************************/
219: /* Reads in MAIN.CNF and initializes the associated variables */
220: /****************************************************************************/
221: void read_main_cfg(read_cfg_text_t txt)
222: {
223: char str[256],fname[13],*p,c;
224: int file;
225: short i,j,n;
226: long offset=0;
227: FILE *instream;
228:
229: strcpy(fname,"MAIN.CNF");
230: sprintf(str,"%s%s",ctrl_dir,fname);
231: if((instream=fnopen(&file,str,O_RDONLY))==NULL) {
232: lprintf(txt.openerr,str);
233: bail(1); }
234:
235: lprintf(txt.reading,fname);
236: get_str(sys_name,instream);
237: get_str(sys_id,instream);
238: get_str(sys_location,instream);
239: get_str(sys_phonefmt,instream);
240: get_str(sys_op,instream);
241: get_str(sys_guru,instream);
242: get_str(sys_pass,instream);
243: get_int(sys_nodes,instream);
244:
245: if(!sys_nodes || sys_nodes<node_num || sys_nodes>MAX_NODES) {
246: lprintf(txt.error,offset,fname);
247: if(!sys_nodes)
248: lprintf("Total nodes on system must be non-zero.\r\n");
249: else if(sys_nodes>MAX_NODES)
250: lprintf("Total nodes exceeds %u.\r\n",MAX_NODES);
251: else
252: lprintf("Total nodes (%u) < node number in NODE.CNF (%u)\r\n"
253: ,sys_nodes,node_num);
254: bail(1); }
255:
256: if((node_path=(char **)MALLOC(sizeof(char *)*sys_nodes))==NULL)
257: allocerr(txt,offset,fname,sizeof(char *)*sys_nodes);
258:
259: for(i=0;i<sys_nodes;i++) {
260: if(feof(instream)) break;
261: fread(str,LEN_DIR+1,1,instream);
262: offset+=LEN_DIR+1;
263: if((node_path[i]=(char *)MALLOC(strlen(str)+1))==NULL)
264: allocerr(txt,offset,fname,strlen(str)+1);
265: strcpy(node_path[i],str); }
266:
267: get_str(data_dir,instream); /* data directory */
268: get_str(exec_dir,instream); /* exec directory */
269:
270: #ifndef SCFG
271: prep_path(data_dir);
272: prep_path(exec_dir);
273: #endif
274:
275: get_str(sys_logon,instream);
276: get_str(sys_logout,instream);
277: get_str(sys_daily,instream);
278: get_int(sys_timezone,instream);
279: get_int(sys_misc,instream);
280: get_int(sys_lastnode,instream);
281: get_int(sys_autonode,instream);
282: get_int(uq,instream);
283: get_int(sys_pwdays,instream);
284: get_int(sys_deldays,instream);
285: get_int(sys_exp_warn,instream); /* Days left till expiration warning */
286: get_int(sys_autodel,instream);
287: get_int(sys_def_stat,instream); /* default status line */
288:
289: #ifdef SCFG
290: get_str(sys_chat_ar,instream);
291: #else
292: fread(str,1,LEN_ARSTR+1,instream);
293: offset+=LEN_ARSTR+1;
294: sys_chat_ar=arstr(0,str);
295: #endif
296:
297: get_int(cdt_min_value,instream);
298: get_int(max_minutes,instream);
299: get_int(cdt_per_dollar,instream);
300: get_str(new_pass,instream);
301: get_str(new_magic,instream);
302: get_str(new_sif,instream);
303: get_str(new_sof,instream);
304: if(!new_sof[0]) /* if output not specified, use input file */
305: strcpy(new_sof,new_sif);
306:
307: /*********************/
308: /* New User Settings */
309: /*********************/
310:
311: get_int(new_level,instream);
312: get_int(new_flags1,instream);
313: get_int(new_flags2,instream);
314: get_int(new_flags3,instream);
315: get_int(new_flags4,instream);
316: get_int(new_exempt,instream);
317: get_int(new_rest,instream);
318: get_int(new_cdt,instream);
319: get_int(new_min,instream);
320: get_str(new_xedit,instream);
321: get_int(new_expire,instream);
322: get_int(new_shell,instream);
323: get_int(new_misc,instream);
324: get_int(new_prot,instream);
325: if(new_prot<SP)
326: new_prot=SP;
327: get_int(c,instream);
328: for(i=0;i<7;i++)
329: get_int(n,instream);
330:
331: /*************************/
332: /* Expired User Settings */
333: /*************************/
334:
335: get_int(expired_level,instream);
336: get_int(expired_flags1,instream);
337: get_int(expired_flags2,instream);
338: get_int(expired_flags3,instream);
339: get_int(expired_flags4,instream);
340: get_int(expired_exempt,instream);
341: get_int(expired_rest,instream);
342:
343: get_str(logon_mod,instream);
344: get_str(logoff_mod,instream);
345: get_str(newuser_mod,instream);
346: get_str(login_mod,instream);
347: if(!login_mod[0]) strcpy(login_mod,"LOGIN");
348: get_str(logout_mod,instream);
349: get_str(sync_mod,instream);
350: get_str(expire_mod,instream);
351: get_int(c,instream);
352:
353: for(i=0;i<224;i++) /* unused - initialized to NULL */
354: get_int(n,instream);
355: for(i=0;i<256;i++) /* unused - initialized to 0xff */
356: get_int(n,instream);
357:
358: /*******************/
359: /* Validation Sets */
360: /*******************/
361:
362: for(i=0;i<10 && !feof(instream);i++) {
363: get_int(val_level[i],instream);
364: get_int(val_expire[i],instream);
365: get_int(val_flags1[i],instream);
366: get_int(val_flags2[i],instream);
367: get_int(val_flags3[i],instream);
368: get_int(val_flags4[i],instream);
369: get_int(val_cdt[i],instream);
370: get_int(val_exempt[i],instream);
371: get_int(val_rest[i],instream);
372: for(j=0;j<8;j++)
373: get_int(n,instream); }
374:
375: /***************************/
376: /* Security Level Settings */
377: /***************************/
378:
379: for(i=0;i<100 && !feof(instream);i++) {
380: get_int(level_timeperday[i],instream);
381: if(level_timeperday[i]>500)
382: level_timeperday[i]=500;
383: get_int(level_timepercall[i],instream);
384: if(level_timepercall[i]>500)
385: level_timepercall[i]=500;
386: get_int(level_callsperday[i],instream);
387: get_int(level_freecdtperday[i],instream);
388: get_int(level_linespermsg[i],instream);
389: get_int(level_postsperday[i],instream);
390: get_int(level_emailperday[i],instream);
391: get_int(level_misc[i],instream);
392: get_int(level_expireto[i],instream);
393: get_int(c,instream);
394: for(j=0;j<5;j++)
395: get_int(n,instream); }
396: if(i!=100) {
397: lprintf(txt.error,offset,fname);
398: lprintf("Insufficient User Level Information\r\n"
399: "%d user levels read, 100 needed.\r\n",i);
400: bail(1); }
401:
402: get_int(total_shells,instream);
403: #ifdef SBBS
404: if(!total_shells) {
405: lprintf(txt.error,offset,fname);
406: lprintf("At least one command shell must be configured.\r\n");
407: bail(1); }
408: #endif
409:
410: if(total_shells) {
411: if((shell=(shell_t **)MALLOC(sizeof(shell_t *)*total_shells))==NULL)
412: allocerr(txt,offset,fname,sizeof(shell_t *)*total_shells); }
413: else
414: shell=NULL;
415:
416: for(i=0;i<total_shells;i++) {
417: if(feof(instream)) break;
418: if((shell[i]=(shell_t *)MALLOC(sizeof(shell_t)))==NULL)
419: allocerr(txt,offset,fname,sizeof(shell_t));
420: memset(shell[i],0,sizeof(shell_t));
421:
422: get_alloc(&offset,shell[i]->name,40,instream);
423: get_str(shell[i]->code,instream);
424: #ifdef SCFG
425: get_str(shell[i]->ar,instream);
426: #else
427: fread(str,1,LEN_ARSTR+1,instream);
428: offset+=LEN_ARSTR+1;
429: shell[i]->ar=arstr(0,str);
430: #endif
431: get_int(shell[i]->misc,instream);
432: for(j=0;j<8;j++)
433: get_int(n,instream);
434: }
435: total_shells=i;
436:
437:
438: fclose(instream);
439: lprintf(txt.readit,fname);
440: }
441:
442: #endif
443:
444: #ifndef NO_MSGS_CFG
445:
446:
447: /****************************************************************************/
448: /* Reads in MSGS.CNF and initializes the associated variables */
449: /****************************************************************************/
450: void read_msgs_cfg(read_cfg_text_t txt)
451: {
452: char str[256],fname[13],tmp[128],c;
453: int file;
454: short i,j,k,l,n;
455: long offset=0;
456: FILE *instream;
457:
458: #ifndef SCFG
459:
460: sprintf(data_dir_subs,"%sSUBS\\",data_dir);
461: prep_path(data_dir_subs);
462:
463: #endif
464:
465: strcpy(fname,"MSGS.CNF");
466: sprintf(str,"%s%s",ctrl_dir,fname);
467: if((instream=fnopen(&file,str,O_RDONLY))==NULL) {
468: lprintf(txt.openerr,str);
469: bail(1); }
470:
471: lprintf(txt.reading,fname);
472:
473: /*************************/
474: /* General Message Stuff */
475: /*************************/
476:
477: get_int(max_qwkmsgs,instream);
478: get_int(mail_maxcrcs,instream);
479: get_int(mail_maxage,instream);
480: #ifdef SCFG
481: get_str(preqwk_ar,instream);
482: #else
483: fread(str,1,LEN_ARSTR+1,instream);
484: offset+=LEN_ARSTR+1;
485: preqwk_ar=arstr(0,str);
486: #endif
487: get_int(smb_retry_time,instream); /* odd byte */
488: if(!smb_retry_time)
489: smb_retry_time=30;
490: for(i=0;i<235;i++) /* NULL */
491: get_int(n,instream);
492: for(i=0;i<256;i++) /* 0xff */
493: get_int(n,instream);
494:
495:
496: /******************/
497: /* Message Groups */
498: /******************/
499:
500: get_int(total_grps,instream);
501:
502:
503: if(total_grps) {
504: if((grp=(grp_t **)MALLOC(sizeof(grp_t *)*total_grps))==NULL)
505: allocerr(txt,offset,fname,sizeof(grp_t *)*total_grps); }
506: else
507: grp=NULL;
508:
509:
510: #ifdef SBBS
511:
512: if(total_grps) {
513:
514: if((cursub=(uint *)MALLOC(sizeof(uint)*total_grps))==NULL)
515: allocerr(txt,offset,fname,sizeof(uint)*total_grps);
516:
517: if((usrgrp=(uint *)MALLOC(sizeof(uint)*total_grps))==NULL)
518: allocerr(txt,offset,fname,sizeof(uint)*total_grps);
519:
520: if((usrsubs=(uint *)MALLOC(sizeof(uint)*total_grps))==NULL)
521: allocerr(txt,offset,fname,sizeof(uint)*total_grps);
522:
523: if((usrsub=(uint **)MALLOC(sizeof(uint *)*total_grps))==NULL)
524: allocerr(txt,offset,fname,sizeof(uint *)*total_grps); }
525:
526: #endif
527:
528: for(i=0;i<total_grps;i++) {
529:
530: if(feof(instream)) break;
531: if((grp[i]=(grp_t *)MALLOC(sizeof(grp_t)))==NULL)
532: allocerr(txt,offset,fname,sizeof(grp_t));
533: memset(grp[i],0,sizeof(grp_t));
534:
535: get_alloc(&offset,grp[i]->lname,LEN_GLNAME,instream);
536: get_alloc(&offset,grp[i]->sname,LEN_GSNAME,instream);
537:
538: #if !defined(SCFG) && defined(SAVE_MEMORY) /* Save memory */
539: if(!strcmp(grp[i]->lname,grp[i]->sname) && grp[i]->sname!=scfgnulstr) {
540: FREE(grp[i]->sname);
541: grp[i]->sname=grp[i]->lname; }
542: #endif
543:
544: #ifdef SCFG
545: get_str(grp[i]->ar,instream);
546: #else
547: fread(str,1,LEN_ARSTR+1,instream);
548: offset+=LEN_ARSTR+1;
549: grp[i]->ar=arstr(0,str);
550: #endif
551: for(j=0;j<48;j++)
552: get_int(n,instream);
553: }
554: total_grps=i;
555:
556: /**********************/
557: /* Message Sub-boards */
558: /**********************/
559:
560: get_int(total_subs,instream);
561:
562: if(total_subs) {
563: if((sub=(sub_t **)MALLOC(sizeof(sub_t *)*total_subs))==NULL)
564: allocerr(txt,offset,fname,sizeof(sub_t *)*total_subs); }
565: else
566: sub=NULL;
567:
568: #ifdef SBBS
569:
570: if(total_subs) {
571:
572: if((sub_misc=(char *)MALLOC(sizeof(char)*total_subs))==NULL)
573: allocerr(txt,offset,fname,sizeof(char)*total_subs);
574:
575: if((sub_ptr=(ulong *)MALLOC(sizeof(ulong)*total_subs))==NULL)
576: allocerr(txt,offset,fname,sizeof(ulong)*total_subs);
577:
578: if((sub_last=(ulong *)MALLOC(sizeof(ulong)*total_subs))==NULL)
579: allocerr(txt,offset,fname,sizeof(ulong)*total_subs); }
580:
581: #endif
582:
583: for(i=0;i<total_subs;i++) {
584: if(feof(instream)) break;
585: if((sub[i]=(sub_t *)MALLOC(sizeof(sub_t)))==NULL)
586: allocerr(txt,offset,fname,sizeof(sub_t));
587: memset(sub[i],0,sizeof(sub_t));
588:
589: get_int(sub[i]->grp,instream);
590: get_alloc(&offset,sub[i]->lname,LEN_SLNAME,instream);
591: get_alloc(&offset,sub[i]->sname,LEN_SSNAME,instream);
592:
593: #if !defined(SCFG) && defined(SAVE_MEMORY) /* Save memory */
594: if(!strcmp(sub[i]->lname,sub[i]->sname) && sub[i]->sname!=scfgnulstr) {
595: FREE(sub[i]->sname);
596: sub[i]->sname=sub[i]->lname; }
597: #endif
598:
599: get_alloc(&offset,sub[i]->qwkname,10,instream);
600:
601: #if !defined(SCFG) && defined(SAVE_MEMORY) /* Save memory */
602: if(!strcmp(sub[i]->qwkname,sub[i]->sname) && sub[i]->qwkname!=scfgnulstr) {
603: FREE(sub[i]->qwkname);
604: sub[i]->qwkname=sub[i]->sname; }
605: #endif
606:
607: get_str(sub[i]->code,instream);
608:
609: #ifdef SCFG
610: get_str(sub[i]->data_dir,instream);
611: #else
612: fread(str,LEN_DIR+1,1,instream); /* substitute data dir */
613: offset+=LEN_DIR+1;
614: if(str[0]) {
615: prep_path(str);
616: if((sub[i]->data_dir=(char *)MALLOC(strlen(str)+1))==NULL)
617: allocerr(txt,offset,fname,strlen(str)+1);
618: strcpy(sub[i]->data_dir,str); }
619: else
620: sub[i]->data_dir=data_dir_subs;
621: #endif
622:
623:
624: #ifdef SCFG
625: get_str(sub[i]->ar,instream);
626: get_str(sub[i]->read_ar,instream);
627: get_str(sub[i]->post_ar,instream);
628: get_str(sub[i]->op_ar,instream);
629: #else
630: fread(str,1,LEN_ARSTR+1,instream);
631: offset+=LEN_ARSTR+1;
632: sub[i]->ar=arstr(0,str);
633: fread(str,1,LEN_ARSTR+1,instream);
634: offset+=LEN_ARSTR+1;
635: sub[i]->read_ar=arstr(0,str);
636: fread(str,1,LEN_ARSTR+1,instream);
637: offset+=LEN_ARSTR+1;
638: sub[i]->post_ar=arstr(0,str);
639: fread(str,1,LEN_ARSTR+1,instream);
640: offset+=LEN_ARSTR+1;
641: sub[i]->op_ar=arstr(0,str);
642: #endif
643: get_int(sub[i]->misc,instream);
644:
645:
646: #ifdef SCFG
647: get_str(sub[i]->tagline,instream);
648: #else
649: fread(str,81,1,instream); /* substitute tagline */
650: offset+=81;
651: if(str[0]) {
652: if((sub[i]->tagline=(char *)MALLOC(strlen(str)+1))==NULL)
653: allocerr(txt,offset,fname,strlen(str)+1);
654: strcpy(sub[i]->tagline,str); }
655: else
656: sub[i]->tagline=qnet_tagline;
657: #endif
658:
659: #ifdef SCFG
660: get_str(sub[i]->origline,instream);
661: #else
662: fread(str,1,51,instream); /* substitute origin line */
663: offset+=51;
664: if(str[0]) {
665: if((sub[i]->origline=(char *)MALLOC(strlen(str)+1))==NULL)
666: allocerr(txt,offset,fname,strlen(str)+1);
667: strcpy(sub[i]->origline,str); }
668: else
669: sub[i]->origline=origline;
670: #endif
671:
672: #ifdef SCFG
673: get_str(sub[i]->echomail_sem,instream);
674: #else
675: fread(str,1,LEN_DIR+1,instream); /* substitute echomail semaphore */
676: offset+=LEN_DIR+1;
677: if(str[0]) {
678: if((sub[i]->echomail_sem=(char *)MALLOC(strlen(str)+1))==NULL)
679: allocerr(txt,offset,fname,strlen(str)+1);
680: strcpy(sub[i]->echomail_sem,str); }
681: else
682: sub[i]->echomail_sem=echomail_sem;
683: #endif
684: fread(str,1,LEN_DIR+1,instream); /* substitute EchoMail path */
685: offset+=LEN_DIR+1;
686: #ifndef SBBS
687: backslash(str);
688: strcpy(sub[i]->echopath,str);
689: #endif
690: get_int(sub[i]->faddr,instream); /* FidoNet address */
691:
692: get_int(sub[i]->maxmsgs,instream);
693: get_int(sub[i]->maxcrcs,instream);
694: get_int(sub[i]->maxage,instream);
695: get_int(sub[i]->ptridx,instream);
696: #ifdef SBBS
697: for(j=0;j<i;j++)
698: if(sub[i]->ptridx==sub[j]->ptridx) {
699: lprintf(txt.error,offset,fname);
700: lprintf("Duplicate pointer index for subs #%d and #%d\r\n"
701: ,i+1,j+1);
702: bail(1); }
703: #endif
704:
705: #ifdef SCFG
706: get_str(sub[i]->mod_ar,instream);
707: #else
708: fread(str,1,LEN_ARSTR+1,instream);
709: offset+=LEN_ARSTR+1;
710: sub[i]->mod_ar=arstr(0,str);
711: #endif
712: get_int(sub[i]->qwkconf,instream);
713: get_int(c,instream);
714: for(j=0;j<26;j++)
715: get_int(n,instream);
716: }
717: total_subs=i;
718:
719: #ifdef SBBS
720: for(i=l=0;i<total_grps;i++) {
721: for(j=k=0;j<total_subs;j++)
722: if(sub[j]->grp==i)
723: k++; /* k = number of subs per grp[i] */
724: if(k>l) l=k; } /* l = the largest number of subs per grp */
725: if(l)
726: for(i=0;i<total_grps;i++)
727: if((usrsub[i]=(uint *)MALLOC(sizeof(uint)*l))==NULL)
728: allocerr(txt,offset,fname,sizeof(uint)*l);
729:
730: if(sys_status&SS_INITIAL) {
731: fclose(instream);
732: lprintf(txt.readit,fname);
733: return; }
734: #endif
735:
736: /***********/
737: /* FidoNet */
738: /***********/
739:
740: get_int(total_faddrs,instream);
741:
742: if(total_faddrs) {
743: if((faddr=(faddr_t *)MALLOC(sizeof(faddr_t)*total_faddrs))==NULL)
744: allocerr(txt,offset,fname,sizeof(faddr_t)*total_faddrs); }
745: else
746: faddr=NULL;
747:
748: for(i=0;i<total_faddrs;i++)
749: get_int(faddr[i],instream);
750:
751: get_str(origline,instream);
752: get_str(netmail_sem,instream);
753: get_str(echomail_sem,instream);
754: get_str(netmail_dir,instream);
755: get_str(echomail_dir,instream);
756: get_str(fidofile_dir,instream);
757: get_int(netmail_misc,instream);
758: get_int(netmail_cost,instream);
759: get_int(dflt_faddr,instream);
760: for(i=0;i<28;i++)
761: get_int(n,instream);
762:
763:
764: /**********/
765: /* QWKnet */
766: /**********/
767:
768: get_str(qnet_tagline,instream);
769:
770: get_int(total_qhubs,instream);
771:
772: if(total_qhubs) {
773: if((qhub=(qhub_t **)MALLOC(sizeof(qhub_t *)*total_qhubs))==NULL)
774: allocerr(txt,offset,fname,sizeof(qhub_t*)*total_qhubs); }
775: else
776: qhub=NULL;
777:
778: for(i=0;i<total_qhubs;i++) {
779: if(feof(instream)) break;
780: if((qhub[i]=(qhub_t *)MALLOC(sizeof(qhub_t)))==NULL)
781: allocerr(txt,offset,fname,sizeof(qhub_t));
782: memset(qhub[i],0,sizeof(qhub_t));
783:
784: get_str(qhub[i]->id,instream);
785: get_int(qhub[i]->time,instream);
786: get_int(qhub[i]->freq,instream);
787: get_int(qhub[i]->days,instream);
788: get_int(qhub[i]->node,instream);
789: get_alloc(&offset,qhub[i]->call,LEN_CMD,instream);
790: get_alloc(&offset,qhub[i]->pack,LEN_CMD,instream);
791: get_alloc(&offset,qhub[i]->unpack,LEN_CMD,instream);
792: get_int(k,instream);
793:
794: if(k) {
795: if((qhub[i]->sub=(ushort *)MALLOC(sizeof(ushort)*k))==NULL)
796: allocerr(txt,offset,fname,sizeof(uint)*k);
797: if((qhub[i]->conf=(ushort *)MALLOC(sizeof(ushort)*k))==NULL)
798: allocerr(txt,offset,fname,sizeof(ushort)*k);
799: if((qhub[i]->mode=(uchar *)MALLOC(sizeof(uchar)*k))==NULL)
800: allocerr(txt,offset,fname,sizeof(uchar)*k); }
801:
802: for(j=0;j<k;j++) {
803: if(feof(instream)) break;
804: get_int(qhub[i]->conf[qhub[i]->subs],instream);
805: get_int(qhub[i]->sub[qhub[i]->subs],instream);
806: get_int(qhub[i]->mode[qhub[i]->subs],instream);
807: if(qhub[i]->sub[qhub[i]->subs]<total_subs)
808: sub[qhub[i]->sub[qhub[i]->subs]]->misc|=SUB_QNET;
809: else
810: continue;
811: if(qhub[i]->sub[qhub[i]->subs]!=INVALID_SUB)
812: qhub[i]->subs++; }
813: for(j=0;j<32;j++)
814: get_int(n,instream); }
815:
816: total_qhubs=i;
817:
818: for(j=0;j<32;j++)
819: get_int(n,instream);
820:
821: /************/
822: /* PostLink */
823: /************/
824:
825: fread(str,11,1,instream); /* Unused - used to be Site Name */
826: offset+=11;
827: get_int(sys_psnum,instream); /* Site Number */
828: get_int(total_phubs,instream);
829:
830: if(total_phubs) {
831: if((phub=(phub_t **)MALLOC(sizeof(phub_t *)*total_phubs))==NULL)
832: allocerr(txt,offset,fname,sizeof(phub_t*)*total_phubs); }
833: else
834: phub=NULL;
835:
836: for(i=0;i<total_phubs;i++) {
837: if(feof(instream)) break;
838: if((phub[i]=(phub_t *)MALLOC(sizeof(phub_t)))==NULL)
839: allocerr(txt,offset,fname,sizeof(phub_t));
840: memset(phub[i],0,sizeof(phub_t));
841: #ifdef SCFG
842: get_str(phub[i]->name,instream);
843: #else
844: fread(str,11,1,instream);
845: offset+=11;
846: #endif
847: get_int(phub[i]->time,instream);
848: get_int(phub[i]->freq,instream);
849: get_int(phub[i]->days,instream);
850: get_int(phub[i]->node,instream);
851: get_alloc(&offset,phub[i]->call,LEN_CMD,instream);
852: for(j=0;j<32;j++)
853: get_int(n,instream); }
854:
855: total_phubs=i;
856:
857: get_str(sys_psname,instream); /* Site Name */
858:
859: for(j=0;j<32;j++)
860: get_int(n,instream);
861:
862: /* Internet */
863:
864: get_str(sys_inetaddr,instream); /* Internet address */
865: get_str(inetmail_sem,instream);
866: get_int(inetmail_misc,instream);
867: get_int(inetmail_cost,instream);
868:
869: fclose(instream);
870: lprintf(txt.readit,fname);
871: }
872:
873: #endif
874:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.