![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tailor.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / compat|
Return to tailor.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / compat |
1.1 root 1: /* tailor.c - ISODE tailoring */
2:
3: #ifndef lint
4: static char *rcsid = "$Header: /f/osi/compat/RCS/tailor.c,v 7.6 90/07/09 14:32:25 mrose Exp $";
5: #endif
6:
7: /*
8: * $Header: /f/osi/compat/RCS/tailor.c,v 7.6 90/07/09 14:32:25 mrose Exp $
9: *
10: *
11: * $Log: tailor.c,v $
12: * Revision 7.6 90/07/09 14:32:25 mrose
13: * sync
14: *
15: * Revision 7.5 90/03/08 08:01:12 mrose
16: * ending
17: *
18: * Revision 7.4 90/02/19 13:07:20 mrose
19: * update
20: *
21: * Revision 7.3 90/01/11 18:35:16 mrose
22: * real-sync
23: *
24: * Revision 7.2 89/12/12 16:14:57 mrose
25: * localHost
26: *
27: * Revision 7.1 89/11/30 23:53:32 mrose
28: * touch-up
29: *
30: * Revision 7.0 89/11/23 21:23:45 mrose
31: * Release 6.0
32: *
33: */
34:
35: /*
36: * NOTICE
37: *
38: * Acquisition, use, and distribution of this module and related
39: * materials are subject to the restrictions of a license agreement.
40: * Consult the Preface in the User's Manual for the full terms of
41: * this agreement.
42: *
43: */
44:
45:
46: /* LINTLIBRARY */
47:
48: #include <ctype.h>
49: #include <stdio.h>
50: #include "general.h"
51: #include "manifest.h"
52: #include "isoaddrs.h"
53: #include "tailor.h"
54:
55:
56: #define SUBNET_MAX (4 + 10) /* maximum number of subnet entries */
57:
58: /* DATA */
59:
60: struct pair {
61: char *p_name;
62: int p_value;
63: };
64:
65:
66: static char *isotailor = "isotailor";
67:
68:
69: char *isodename = "";
70:
71: char *isodebinpath = BINPATH;
72: char *isodesbinpath = SBINPATH;
73: char *isodetcpath = ETCPATH;
74: char *isodelogpath = LOGPATH;
75:
76:
77: static struct pair ll_pairs[] = {
78: "none", LLOG_NONE,
79: "fatal", LLOG_FATAL,
80: "exceptions", LLOG_EXCEPTIONS,
81: "notice", LLOG_NOTICE,
82: "pdus", LLOG_PDUS,
83: "trace", LLOG_TRACE,
84: "debug", LLOG_DEBUG,
85: "all", LLOG_ALL,
86:
87: NULL
88: };
89:
90: static char *compatdebug = "none";
91: LLog _compat_log = {
92: "%d.log", NULLCP, "compat", LLOG_NONE, LLOG_NONE, -1,
93: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
94: };
95: LLog *compat_log = &_compat_log;
96:
97: static char *addrdebug = "none";
98: LLog _addr_log = {
99: "%d.log", "addr", NULLCP, LLOG_NONE, LLOG_NONE, -1,
100: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
101: };
102: LLog *addr_log = &_addr_log;
103:
104: static char *tsapdebug = "none";
105: LLog _tsap_log = {
106: "%d.tpkt", "tsap", NULLCP, LLOG_NONE, LLOG_NONE, -1,
107: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
108: };
109: LLog *tsap_log = &_tsap_log;
110:
111: static char *ssapdebug = "none";
112: LLog _ssap_log = {
113: "%d.spkt", "ssap", NULLCP, LLOG_NONE, LLOG_NONE, -1,
114: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
115: };
116: LLog *ssap_log = &_ssap_log;
117:
118: static char *psapdebug = "none";
119: LLog _psap_log = {
120: "%d.pe", NULLCP, "psap", LLOG_NONE, LLOG_NONE, -1,
121: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
122: };
123: LLog *psap_log = &_psap_log;
124:
125: static char *psap2debug = "none";
126: LLog _psap2_log = {
127: "%d.ppkt", "psap2", NULLCP, LLOG_NONE, LLOG_NONE, -1,
128: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
129: };
130: LLog *psap2_log = &_psap2_log;
131:
132: static char *acsapdebug = "none";
133: LLog _acsap_log = {
134: "%d.acpkt", "acsap", NULLCP, LLOG_NONE, LLOG_NONE, -1,
135: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
136: };
137: LLog *acsap_log = &_acsap_log;
138:
139: static char *rtsapdebug = "none";
140: LLog _rtsap_log = {
141: "%d.rtpkt", "rtsap", NULLCP, LLOG_NONE, LLOG_NONE, -1,
142: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
143: };
144: LLog *rtsap_log = &_rtsap_log;
145:
146: static char *rosapdebug = "none";
147: LLog _rosap_log = {
148: "%d.ropkt", "rosap", NULLCP, LLOG_NONE, LLOG_NONE, -1,
149: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
150: };
151: LLog *rosap_log = &_rosap_log;
152:
153:
154: #define TS_MASK "\020\01TCP\02X25\03BRG\04TP4"
155:
156: static struct pair ts_pairs[] = {
157: "tcp", TS_TCP,
158: "x25", TS_X25,
159: "bridge", TS_BRG,
160: "tp4", TS_TP4,
161: "all", TS_ALL,
162:
163: NULL
164: };
165:
166: static char *_ts_stacks = "all";
167: int ts_stacks = TS_ALL;
168:
169: static char *_ts_interim = "";
170: struct ts_interim ts_interim[SUBNET_MAX + 1] = {
171: "realNS", NULL, SUBNET_REALNS, NA_NSAP, "", 0,
172: "Int-X25", NULL, SUBNET_INT_X25, NA_X25, "", 0,
173: "Janet", NULL, SUBNET_JANET, NA_X25, "", 0,
174: "Internet", NULL, SUBNET_INTERNET, NA_TCP, "", 0,
175: "localTCP", NULL, SUBNET_DYNAMIC - 1, NA_TCP, "", 0,
176:
177: NULL
178: };
179:
180: static char *_ts_communities = "all";
181: int ts_communities[SUBNET_MAX + 1];
182:
183: static char *_ts_comm_nsap_default = "realNS";
184: int ts_comm_nsap_default = SUBNET_REALNS;
185:
186: static char *_ts_comm_x25_default = "Int-X25";
187: int ts_comm_x25_default = SUBNET_INT_X25;
188:
189: static char *_ts_comm_tcp_default = "Internet";
190: int ts_comm_tcp_default = SUBNET_INTERNET;
191:
192: int tsb_communities[SUBNET_MAX + 1];
193: char *tsb_addresses[SUBNET_MAX + 1];
194: static char *_tsb_config = "";
195: char *tsb_default_address = "undefined";
196:
197:
198: #ifdef X25
199: char *x25_local_dte = "";
200: char *x25_local_pid = "";
201:
202: static char *x25_intl_zero_str = "off";
203: char x25_intl_zero = 0;
204:
205: static char *x25_strip_dnic_str = "off";
206: char x25_strip_dnic = 0;
207:
208: char *x25_dnic_prefix = "";
209:
210: /* 0 = don't request/allow reverse charging
211: * 1 = reverse charge request/allowed
212: */
213: static char *reverse_charge_default = "0";
214: u_char reverse_charge = 0;
215:
216: /* 0= default recv packet size.
217: * 16, 32, 64, 128,
218: * 256, 512, 1024
219: * ( octets in decimal )
220: */
221: static char *recvpktsize_default = "0";
222: u_short recvpktsize = 0;
223:
224: /* same as above, but for send packet size */
225: static char *sendpktsize_default = "0";
226: u_short sendpktsize = 0;
227:
228: /* 0= default recv window size.
229: * 7, 127 ( in decimal )
230: */
231: static char *recvwndsize_default = "0";
232: u_char recvwndsize = 0;
233:
234: /* same as above, but for send window size */
235: static char *sendwndsize_default = "0";
236: u_char sendwndsize = 0;
237:
238: /* 0= default recv throughtput.
239: * 3= 75 8= 2400
240: * 4= 150 9= 4800
241: * 5= 300 10= 9600
242: * 6= 600 11= 19200
243: * 7= 1200 12= 48000
244: * ( bps in decimal )
245: */
246: static char *recvthruput_default = "0";
247: u_char recvthruput = 0;
248:
249: /* same as above, but for send throughput */
250: /* 1 = use closed user group in cug_index */
251: static char *sendthruput_default = "0";
252: u_char sendthruput = 0;
253:
254: /* 0 = no closed user group. */
255: /* 1 = use closed user group in cug_index */
256: static char *cug_req_default = "0";
257: u_char cug_req = 0;
258:
259: /* valid when cug_req= 1.
260: * 0x00 ~ 0x99 ( closed user group in BCD)
261: */
262: static char *cug_index_default = "0";
263: u_char cug_index = 0;
264:
265: /* 0= don't use fast select
266: * 1= clear is fast select response
267: * 2= clear or call accepted
268: * is fast select response
269: */
270: static char *fast_select_type_default = "0";
271: u_char fast_select_type = 0;
272:
273: /* 0= no RPOA transit request
274: * 1= use RPOA transit request in rpoa
275: */
276: static char *rpoa_req_default = "0";
277: u_char rpoa_req = 0;
278:
279: /* valid when rpoa_req= 1 */
280: /* 0x0000 ~ 0x9999 (RPOA transit group in BCD) */
281: static char *rpoa_default = "0";
282: u_short rpoa = 0;
283:
284: static char *x25debug = "none";
285: static LLog _x25_log = {
286: "x25log", "x25", NULLCP, LLOG_NONE, LLOG_NONE, -1,
287: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
288: };
289: LLog *x25_log = &_x25_log;
290:
291: #ifdef CAMTEC_CCL
292: static char *x25_outgoing_port_str = "A";
293: char x25_outgoing_port = 'A';
294: #endif
295: #endif
296:
297:
298: #ifdef BRIDGE_X25
299: char *x25_bridge_host = "x25bridge";
300: char *x25_bridge_addr = "000021000018";
301: char *x25_bridge_listen = "";
302: char *x25_bridge_pid = "";
303: char *x25_bridge_discrim = "0000";
304: #endif
305:
306:
307: #if defined (BRIDGE_X25) || defined (X25)
308: static char *x25_bridge_port_default = "146";
309: u_short x25_bridge_port = 0;
310: #endif
311:
312:
313: char ns_enabled = 0;
314: static char *usens = "off";
315:
316: char *ns_address = "undefined";
317:
318: /* */
319:
320: static struct bind {
321: char *b_key;
322:
323: char **b_value;
324: int b_dynamic;
325: } binds[] = {
326: "localname", &isodename, 0,
327: "binpath", &isodebinpath, 0,
328: "sbinpath", &isodesbinpath, 0,
329: "etcpath", &isodetcpath, 0,
330: "logpath", &isodelogpath, 0,
331:
332: "compatlevel", &compatdebug, 0,
333: "compatfile", &_compat_log.ll_file, 0,
334:
335: "addrlevel", &addrdebug, 0,
336: "addrfile", &_addr_log.ll_file, 0,
337:
338: "tsaplevel", &tsapdebug, 0,
339: "tsapfile", &_tsap_log.ll_file, 0,
340:
341: "ssaplevel", &ssapdebug, 0,
342: "ssapfile", &_ssap_log.ll_file, 0,
343:
344: "psaplevel", &psapdebug, 0,
345: "psapfile", &_psap_log.ll_file, 0,
346:
347: "psap2level", &psap2debug, 0,
348: "psap2file", &_psap2_log.ll_file, 0,
349:
350: "acsaplevel", &acsapdebug, 0,
351: "acsapfile", &_acsap_log.ll_file, 0,
352:
353: "rtsaplevel", &rtsapdebug, 0,
354: "rtsapfile", &_rtsap_log.ll_file, 0,
355:
356: "rosaplevel", &rosapdebug, 0,
357: "rosapfile", &_rosap_log.ll_file, 0,
358:
359: "ts_stacks", &_ts_stacks, 0,
360: "ts_interim", &_ts_interim, 0,
361: "ts_communities", &_ts_communities, 0,
362:
363: "default_nsap_community", &_ts_comm_nsap_default, 0,
364: "default_x25_community", &_ts_comm_x25_default, 0,
365: "default_tcp_community", &_ts_comm_tcp_default, 0,
366:
367: "tsb_communities", &_tsb_config, 0,
368: "tsb_default_address", &tsb_default_address, 0,
369:
370: #ifdef X25
371: "x25_local_dte", &x25_local_dte, 0,
372: "x25_local_pid", &x25_local_pid, 0,
373: "x25_dnic_prefix", &x25_dnic_prefix, 0,
374: "x25_intl_zero", &x25_intl_zero_str, 0,
375: "x25_strip_dnic", &x25_strip_dnic_str, 0,
376:
377: "reverse_charge", &reverse_charge_default, 0,
378: "recvpktsize", &recvpktsize_default, 0,
379: "sendpktsize", &sendpktsize_default, 0,
380: "recvwndsize", &recvwndsize_default, 0,
381: "sendwndsize", &sendwndsize_default, 0,
382: "recvthruput", &recvthruput_default, 0,
383: "sendthruput", &sendthruput_default, 0,
384: "cug_req", &cug_req_default, 0,
385: "cug_index", &cug_index_default, 0,
386: "fast_select_type", &fast_select_type_default, 0,
387: "rpoa_req", &rpoa_req_default, 0,
388: "rpoa", &rpoa_default, 0,
389:
390: "x25level", &x25debug, 0,
391: "x25file", &_x25_log.ll_file, 0,
392:
393: #ifdef CAMTEC_CCL
394: "x25_outgoing_port", &x25_outgoing_port_str, 0,
395: #endif
396: #endif
397:
398: #ifdef BRIDGE_X25
399: "x25_bridge_host", &x25_bridge_host, 0,
400: "x25_bridge_addr", &x25_bridge_addr, 0,
401: "x25_bridge_listen", &x25_bridge_listen, 0,
402: "x25_bridge_pid", &x25_bridge_pid, 0,
403: "x25_bridge_discrim", &x25_bridge_discrim, 0,
404: #endif
405:
406: #if defined (BRIDGE_X25) || defined (X25)
407: "x25_bridge_port", &x25_bridge_port_default,0,
408: #endif
409:
410:
411: "ns_enable", &usens, 0,
412: "ns_address", &ns_address, 0,
413:
414: NULL
415: };
416:
417:
418: int tailor_read ();
419: char *tailor_value ();
420:
421: /* */
422:
423: char *isodesetailor (file)
424: char *file;
425: {
426: char *ofile = isotailor;
427:
428: if ((isotailor = file) == NULLCP)
429: isotailor = "isotailor";
430:
431: return ofile;
432: }
433:
434: /* */
435:
436: void isodetailor (myname, wantuser)
437: char *myname;
438: int wantuser;
439: {
440: register char *hp,
441: *mp;
442: char buffer[BUFSIZ];
443: static int inited = 0;
444:
445: if (inited)
446: return;
447: inited = 1;
448:
449: tsb_addresses[0] = NULL;
450:
451: tailor_read (isodefile (isotailor, 0));
452:
453: if (wantuser) {
454: if ((hp = getenv ("HOME")) == NULL)
455: hp = ".";
456: if (myname) {
457: if (mp = rindex (myname, '/'))
458: mp++;
459: if (mp == NULL || *mp == NULL)
460: mp = myname;
461: }
462: else
463: mp = "isode";
464: (void) sprintf (buffer, "%s/.%s_tailor", hp, mp);
465: tailor_read (buffer);
466: }
467:
468: isodexport (myname);
469: }
470:
471: /* */
472:
473: static int tailor_read (file)
474: char *file;
475: {
476: register char *bp,
477: *cp;
478: char buffer[BUFSIZ];
479: register FILE *fp;
480:
481: if (fp = fopen (file, "r")) {
482: while (fgets (buffer, sizeof buffer, fp)) {
483: if ((cp = index (buffer, '\n')) == NULL) {
484: fprintf (stderr, "%s: line too long\n", file);
485: break;
486: }
487: *cp = NULL;
488: if (*buffer == '#' || *buffer == NULL)
489: continue;
490: if ((bp = index (buffer, ':')) == NULL) {
491: fprintf (stderr, "%s: invalid syntax in \"%s\"\n",
492: file, buffer);
493: break;
494: }
495: for (cp = bp - 1; cp >= buffer; cp--)
496: if (isspace (*cp))
497: *cp = NULL;
498: else
499: break;
500:
501: *bp++ = NULL;
502: while (isspace (*bp))
503: *bp++ = NULL;
504:
505: for (cp = bp + strlen (bp) - 1; cp >= bp; cp--)
506: if (isspace (*cp))
507: *cp = NULL;
508: else
509: break;
510:
511: if ((cp = tailor_value (bp))
512: && isodesetvar (buffer, cp, 1) == NOTOK)
513: free (cp);
514: }
515:
516: (void) fclose (fp);
517: }
518: }
519:
520: /* */
521:
522: int isodesetvar (name, value, dynamic)
523: char *name,
524: *value;
525: int dynamic;
526: {
527: register struct bind *b;
528:
529: for (b = binds; b -> b_key; b++)
530: if (strcmp (b -> b_key, name) == 0) {
531: if (b -> b_dynamic && *b -> b_value)
532: free (*b -> b_value);
533: *b -> b_value = value, b -> b_dynamic = dynamic;
534: return OK;
535: }
536:
537: return NOTOK;
538: }
539:
540: /* */
541:
542: void isodexport (myname)
543: char *myname;
544: {
545: compat_log -> ll_events = events_value (ll_pairs, compatdebug, "compatlevel");
546: addr_log -> ll_events = events_value (ll_pairs, addrdebug, "addrlevel");
547: tsap_log -> ll_events = events_value (ll_pairs, tsapdebug, "tsaplevel");
548: ssap_log -> ll_events = events_value (ll_pairs, ssapdebug, "ssaplevel");
549: psap_log -> ll_events = events_value (ll_pairs, psapdebug, "psaplevel");
550: psap2_log -> ll_events = events_value (ll_pairs, psap2debug, "psap2level");
551: acsap_log -> ll_events = events_value (ll_pairs, acsapdebug, "acsaplevel");
552: rtsap_log -> ll_events = events_value (ll_pairs, rtsapdebug, "rtsaplevel");
553: rosap_log -> ll_events = events_value (ll_pairs, rosapdebug, "rosaplevel");
554: #ifdef X25
555: x25_log -> ll_events = events_value (ll_pairs, x25debug, "x25level");
556: #endif
557:
558: ll_hdinit (compat_log, myname);
559: ll_hdinit (addr_log, myname);
560: ll_hdinit (tsap_log, myname);
561: ll_hdinit (ssap_log, myname);
562: ll_hdinit (psap_log, myname);
563: ll_hdinit (psap2_log, myname);
564: ll_hdinit (acsap_log, myname);
565: ll_hdinit (rtsap_log, myname);
566: ll_hdinit (rosap_log, myname);
567: #ifdef X25
568: ll_hdinit (x25_log, myname);
569: #endif
570:
571: ts_stacks = events_value (ts_pairs, _ts_stacks, "ts_stacks");
572: #ifndef TCP
573: ts_stacks &= ~TS_TCP;
574: #endif
575: #ifndef X25
576: ts_stacks &= ~TS_X25;
577: #endif
578: #ifndef BRIDGE_X25
579: ts_stacks &= ~TS_BRG;
580: #endif
581: #ifndef TP4
582: ts_stacks &= ~TS_TP4;
583: #endif
584:
585: {
586: register int *ip,
587: *jp,
588: *kp;
589: int j;
590: register char *cp,
591: *adrp,
592: **ap,
593: **cpp;
594: register struct ts_interim *ts;
595: static struct ts_interim *te = NULL;
596: char buffer[BUFSIZ],
597: *vec[NVEC + NSLACK + 1];
598:
599: if (te)
600: te -> ts_name = NULL;
601: for (ts = ts_interim; ts -> ts_name; ts++)
602: if (macro2comm (ts -> ts_name, ts) == NOTOK)
603: fprintf (stderr, "internal error for community \"%s\"\n",
604: ts -> ts_name);
605: if (te == NULL)
606: te = ts;
607:
608: (void) strcpy (buffer, _ts_interim);
609: (void) str2vec (buffer, ap = vec);
610: j = SUBNET_DYNAMIC;
611: while (cp = *ap++) {
612: register struct ts_interim *tp;
613:
614: ts -> ts_subnet = 0;
615: if (macro2comm (cp, ts) == NOTOK) {
616: fprintf (stderr, "invalid community name \"%s\"\n", cp);
617: break;
618: }
619: for (tp = ts_interim; tp < ts; tp++)
620: if (tp -> ts_length == ts -> ts_length
621: && bcmp (tp -> ts_prefix, ts -> ts_prefix,
622: tp -> ts_length) == 0) {
623: fprintf (stderr,
624: "duplicate prefixes for communities \"%s\" and \"%s\"\n",
625: tp -> ts_name, cp);
626: break;
627: }
628: if (tp < ts)
629: continue;
630:
631: ts -> ts_name = strdup (cp);
632: if (ts -> ts_subnet == 0)
633: ts -> ts_subnet = j++;
634: ts++;
635: }
636: ts -> ts_name = NULL;
637:
638: (void) strcpy (buffer, _ts_communities);
639: (void) str2vec (buffer, ap = vec);
640: ip = ts_communities;
641: while (cp = *ap++) {
642: if (strcmp (cp, "all") == 0) {
643: for (ts = ts_interim; ts -> ts_name; ts++) {
644: for (jp = ts_communities; jp < ip; jp++)
645: if (*jp == ts -> ts_subnet)
646: break;
647: if (jp >= ip)
648: *ip++ = ts -> ts_subnet;
649: }
650: break;
651: }
652:
653: for (ts = ts_interim; ts -> ts_name; ts++)
654: if (lexequ (ts -> ts_name, cp) == 0)
655: break;
656: if (!ts -> ts_name) {
657: fprintf (stderr,
658: "unknown community name \"%s\" for variable ts_communities\n",
659: cp);
660: continue;
661: }
662:
663: for (jp = ts_communities; jp < ip; jp++)
664: if (*jp == ts -> ts_subnet)
665: break;
666: if (jp >= ip)
667: *ip++ = ts -> ts_subnet;
668: }
669: *ip = NULL;
670:
671: for (ap = tsb_addresses; *ap; ap++)
672: free (*ap);
673: (void) strcpy (buffer, _tsb_config);
674: (void) str2vec (buffer, ap = vec);
675: ip = tsb_communities, cpp = tsb_addresses;
676: while (cp = *ap++) {
677: if ((adrp = *ap++) == NULLCP) {
678: fprintf (stderr,
679: "missing address for tsb_community \"%s\"\n", cp);
680: break;
681: }
682:
683: for (ts = ts_interim; ts -> ts_name; ts++)
684: if (lexequ (ts -> ts_name, cp) == 0)
685: break;
686: if (!ts -> ts_name) {
687: fprintf (stderr,
688: "unknown community name \"%s\" for variable tsb_communities\n",
689: cp);
690: continue;
691: }
692:
693: for (jp = tsb_communities; jp < ip; jp++)
694: if (*jp == ts -> ts_subnet)
695: break;
696: if (jp >= ip) {
697: *ip++ = ts -> ts_subnet, *cpp++ = strdup (adrp);
698:
699: for (kp = ts_communities; *kp; kp++)
700: if (*kp == ts -> ts_subnet)
701: break;
702: if (!*kp)
703: *kp++ = ts -> ts_subnet, *kp = NULL;
704: }
705: }
706: *ip = NULL, *cpp = NULLCP;
707:
708: cp = _ts_comm_nsap_default;
709: for (ts = ts_interim; ts -> ts_name; ts++)
710: if (lexequ (ts -> ts_name, cp) == 0)
711: break;
712: if (ts -> ts_name && ts -> ts_syntax == NA_NSAP)
713: ts_comm_nsap_default = ts -> ts_subnet;
714: else
715: fprintf (stderr,
716: "bad community name \"%s\" for variable default_nsap_community\n",
717: cp);
718:
719: cp = _ts_comm_x25_default;
720: for (ts = ts_interim; ts -> ts_name; ts++)
721: if (lexequ (ts -> ts_name, cp) == 0)
722: break;
723: if (ts -> ts_name && ts -> ts_syntax == NA_X25)
724: ts_comm_x25_default = ts -> ts_subnet;
725: else
726: fprintf (stderr,
727: "bad community name \"%s\" for variable default_x25_community\n",
728: cp);
729:
730: cp = _ts_comm_tcp_default;
731: for (ts = ts_interim; ts -> ts_name; ts++)
732: if (lexequ (ts -> ts_name, cp) == 0)
733: break;
734: if (ts -> ts_name && ts -> ts_syntax == NA_TCP)
735: ts_comm_tcp_default = ts -> ts_subnet;
736: else
737: fprintf (stderr,
738: "bad community name \"%s\" for variable default_tcp_community\n",
739: cp);
740:
741: if (addr_log -> ll_events & LLOG_DEBUG) {
742: LLOG (addr_log, LLOG_DEBUG,
743: ("ts_stacks: %s", sprintb (ts_stacks, TS_MASK)));
744:
745: for (ts = ts_interim; ts -> ts_name; ts++) {
746: LLOG (addr_log, LLOG_DEBUG,
747: ("community %s value \"%s\" subnet %d syntax %d",
748: ts -> ts_name, ts -> ts_value ? ts -> ts_value : "",
749: ts -> ts_subnet, ts -> ts_syntax));
750: buffer[explode(buffer, (u_char *) ts -> ts_prefix,
751: ts -> ts_length)] = NULL;
752: LLOG (addr_log, LLOG_DEBUG,
753: (" prefix \"%s\" (%d octets)", buffer,
754: ts -> ts_length));
755: }
756:
757: for (ip = ts_communities; *ip; ip++)
758: LLOG (addr_log, LLOG_DEBUG, ("community %d enabled", *ip));
759:
760: LLOG (addr_log, LLOG_DEBUG,
761: ("default communities: nsap=%d x25=%d tcp=%d",
762: ts_comm_nsap_default, ts_comm_x25_default,
763: ts_comm_tcp_default));
764:
765: for (ip = tsb_communities, cpp = tsb_addresses; *ip; ip++, cpp++) {
766: LLOG (addr_log, LLOG_DEBUG,
767: ("TSB for community %d residing at %s", *ip, *cpp));
768: if (str2taddr (*cpp) == NULLTA)
769: LLOG (addr_log, LLOG_EXCEPTIONS,
770: ("invalid address for TSB to community %d: %s",
771: *ip, *cpp));
772: }
773: }
774: }
775:
776: #ifdef X25
777: reverse_charge = (u_char) atoi (reverse_charge_default);
778: recvpktsize = (u_short) atoi (recvpktsize_default);
779: sendpktsize = (u_short) atoi (sendpktsize_default);
780: recvwndsize = (u_char) atoi (recvwndsize_default);
781: sendwndsize = (u_char) atoi (sendwndsize_default);
782: recvthruput = (u_char) atoi (recvthruput_default);
783: sendthruput = (u_char) atoi (sendthruput_default);
784: cug_req = (u_char) atoi (cug_req_default);
785: cug_index = (u_char) atoi (cug_index_default);
786: fast_select_type = (u_char) atoi (fast_select_type_default);
787: rpoa_req = atoi (rpoa_req_default);
788: rpoa = (u_short) atoi (rpoa_default);
789:
790: #ifdef CAMTEC_CCL
791: x25_outgoing_port = *x25_outgoing_port_str;
792: #endif
793:
794: x25_intl_zero = !strcmp (x25_intl_zero_str, "on");
795: x25_strip_dnic = !strcmp (x25_strip_dnic_str, "on");
796: #endif
797:
798: #if defined (BRIDGE_X25) || defined (X25)
799: x25_bridge_port = htons ((u_short) atoi (x25_bridge_port_default));
800: #endif
801:
802: ns_enabled = !strcmp (usens, "on");
803: }
804:
805: /* */
806:
807: #define QUOTE '\\'
808:
809:
810: static char *tailor_value (s)
811: register char *s;
812: {
813: register int i,
814: r;
815: register char *bp;
816: char buffer[BUFSIZ];
817:
818: for (bp = buffer; *s; bp++, s++)
819: if (*s != QUOTE)
820: *bp = *s;
821: else
822: switch (*++s) {
823: case '0':
824: *bp = '\0';
825: break;
826: case 'b':
827: *bp = '\b';
828: break;
829: case 'f':
830: *bp = '\f';
831: break;
832: case 'n':
833: *bp = '\n';
834: break;
835: case 'r':
836: *bp = '\r';
837: break;
838: case 't':
839: *bp = '\t';
840: break;
841:
842: case NULL: s--;
843: case QUOTE:
844: *bp = QUOTE;
845: break;
846:
847: default:
848: if (!isdigit (*s)) {
849: *bp++ = QUOTE;
850: *bp = *s;
851: break;
852: }
853: r = *s != '0' ? 10 : 8;
854: for (i = 0; isdigit (*s); s++)
855: i = i * r + *s - '0';
856: s--;
857: *bp = toascii (i);
858: break;
859: }
860: *bp = NULL;
861:
862: if ((bp = malloc ((unsigned) (strlen (buffer) + 1))) != NULL)
863: (void) strcpy (bp, buffer);
864:
865: return bp;
866: }
867:
868: /* */
869:
870: static int events_value (pairs, s, var)
871: struct pair *pairs;
872: char *s,
873: *var;
874: {
875: int value;
876: register char *cp,
877: **ap;
878: register struct pair *pp;
879: char buffer[BUFSIZ],
880: *vec[NVEC + NSLACK + 1];
881:
882: value = 0;
883: (void) strcpy (buffer, s);
884: (void) str2vec (buffer, ap = vec);
885: while (cp = *ap++) {
886: for (pp = pairs; pp -> p_name; pp++)
887: if (strcmp (pp -> p_name, cp) == 0) {
888: value |= pp -> p_value;
889: break;
890: }
891: if (!pp -> p_name)
892: fprintf (stderr, "unknown value \"%s\" for variable %s\n",
893: cp, var);
894: }
895:
896: return value;
897: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.