1/*
2 * ipxcp.c - PPP IPX Control Protocol.
3 *
4 * Copyright (c) 1989 Carnegie Mellon University.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms are permitted
8 * provided that the above copyright notice and this paragraph are
9 * duplicated in all such forms and that any documentation,
10 * advertising materials, and other materials related to such
11 * distribution and use acknowledge that the software was developed
12 * by Carnegie Mellon University.  The name of the
13 * University may not be used to endorse or promote products derived
14 * from this software without specific prior written permission.
15 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18 */
19
20#ifdef IPX_CHANGE
21
22#define RCSID	"$Id: ipxcp.c,v 1.1.1.1 2008/10/15 03:30:13 james26_jang Exp $"
23
24/*
25 * TODO:
26 */
27
28#include <stdio.h>
29#include <string.h>
30#include <unistd.h>
31#include <ctype.h>
32#include <sys/types.h>
33#include <sys/socket.h>
34#include <netinet/in.h>
35
36#include "pppd.h"
37#include "fsm.h"
38#include "ipxcp.h"
39#include "pathnames.h"
40#include "magic.h"
41
42static const char rcsid[] = RCSID;
43
44/* global vars */
45ipxcp_options ipxcp_wantoptions[NUM_PPP];	/* Options that we want to request */
46ipxcp_options ipxcp_gotoptions[NUM_PPP];	/* Options that peer ack'd */
47ipxcp_options ipxcp_allowoptions[NUM_PPP];	/* Options we allow peer to request */
48ipxcp_options ipxcp_hisoptions[NUM_PPP];	/* Options that we ack'd */
49
50#define wo (&ipxcp_wantoptions[0])
51#define ao (&ipxcp_allowoptions[0])
52#define go (&ipxcp_gotoptions[0])
53#define ho (&ipxcp_hisoptions[0])
54
55/*
56 * Callbacks for fsm code.  (CI = Configuration Information)
57 */
58static void ipxcp_resetci __P((fsm *));	/* Reset our CI */
59static int  ipxcp_cilen __P((fsm *));		/* Return length of our CI */
60static void ipxcp_addci __P((fsm *, u_char *, int *)); /* Add our CI */
61static int  ipxcp_ackci __P((fsm *, u_char *, int));	/* Peer ack'd our CI */
62static int  ipxcp_nakci __P((fsm *, u_char *, int));	/* Peer nak'd our CI */
63static int  ipxcp_rejci __P((fsm *, u_char *, int));	/* Peer rej'd our CI */
64static int  ipxcp_reqci __P((fsm *, u_char *, int *, int)); /* Rcv CI */
65static void ipxcp_up __P((fsm *));		/* We're UP */
66static void ipxcp_down __P((fsm *));		/* We're DOWN */
67static void ipxcp_finished __P((fsm *));	/* Don't need lower layer */
68static void ipxcp_script __P((fsm *, char *)); /* Run an up/down script */
69
70fsm ipxcp_fsm[NUM_PPP];		/* IPXCP fsm structure */
71
72static fsm_callbacks ipxcp_callbacks = { /* IPXCP callback routines */
73    ipxcp_resetci,		/* Reset our Configuration Information */
74    ipxcp_cilen,		/* Length of our Configuration Information */
75    ipxcp_addci,		/* Add our Configuration Information */
76    ipxcp_ackci,		/* ACK our Configuration Information */
77    ipxcp_nakci,		/* NAK our Configuration Information */
78    ipxcp_rejci,		/* Reject our Configuration Information */
79    ipxcp_reqci,		/* Request peer's Configuration Information */
80    ipxcp_up,			/* Called when fsm reaches OPENED state */
81    ipxcp_down,			/* Called when fsm leaves OPENED state */
82    NULL,			/* Called when we want the lower layer up */
83    ipxcp_finished,		/* Called when we want the lower layer down */
84    NULL,			/* Called when Protocol-Reject received */
85    NULL,			/* Retransmission is necessary */
86    NULL,			/* Called to handle protocol-specific codes */
87    "IPXCP"			/* String name of protocol */
88};
89
90/*
91 * Command-line options.
92 */
93static int setipxnode __P((char **));
94static void printipxnode __P((option_t *,
95			      void (*)(void *, char *, ...), void *));
96static int setipxname __P((char **));
97
98static option_t ipxcp_option_list[] = {
99    { "ipx", o_bool, &ipxcp_protent.enabled_flag,
100      "Enable IPXCP (and IPX)", OPT_PRIO | 1 },
101    { "+ipx", o_bool, &ipxcp_protent.enabled_flag,
102      "Enable IPXCP (and IPX)", OPT_PRIOSUB | OPT_ALIAS | 1 },
103    { "noipx", o_bool, &ipxcp_protent.enabled_flag,
104      "Disable IPXCP (and IPX)", OPT_PRIOSUB },
105    { "-ipx", o_bool, &ipxcp_protent.enabled_flag,
106      "Disable IPXCP (and IPX)", OPT_PRIOSUB | OPT_ALIAS },
107
108    { "ipx-network", o_uint32, &ipxcp_wantoptions[0].our_network,
109      "Set our IPX network number", OPT_PRIO, &ipxcp_wantoptions[0].neg_nn },
110
111    { "ipxcp-accept-network", o_bool, &ipxcp_wantoptions[0].accept_network,
112      "Accept peer IPX network number", 1,
113      &ipxcp_allowoptions[0].accept_network },
114
115    { "ipx-node", o_special, (void *)setipxnode,
116      "Set IPX node number", OPT_A2PRINTER, (void *)printipxnode },
117
118    { "ipxcp-accept-local", o_bool, &ipxcp_wantoptions[0].accept_local,
119      "Accept our IPX address", 1,
120      &ipxcp_allowoptions[0].accept_local },
121
122    { "ipxcp-accept-remote", o_bool, &ipxcp_wantoptions[0].accept_remote,
123      "Accept peer's IPX address", 1,
124      &ipxcp_allowoptions[0].accept_remote },
125
126    { "ipx-routing", o_int, &ipxcp_wantoptions[0].router,
127      "Set IPX routing proto number", OPT_PRIO,
128      &ipxcp_wantoptions[0].neg_router },
129
130    { "ipx-router-name", o_special, setipxname,
131      "Set IPX router name", OPT_PRIO | OPT_A2STRVAL | OPT_STATIC,
132       &ipxcp_wantoptions[0].name },
133
134    { "ipxcp-restart", o_int, &ipxcp_fsm[0].timeouttime,
135      "Set timeout for IPXCP", OPT_PRIO },
136    { "ipxcp-max-terminate", o_int, &ipxcp_fsm[0].maxtermtransmits,
137      "Set max #xmits for IPXCP term-reqs", OPT_PRIO },
138    { "ipxcp-max-configure", o_int, &ipxcp_fsm[0].maxconfreqtransmits,
139      "Set max #xmits for IPXCP conf-reqs", OPT_PRIO },
140    { "ipxcp-max-failure", o_int, &ipxcp_fsm[0].maxnakloops,
141      "Set max #conf-naks for IPXCP", OPT_PRIO },
142
143    { NULL }
144};
145
146/*
147 * Protocol entry points.
148 */
149
150static void ipxcp_init __P((int));
151static void ipxcp_open __P((int));
152static void ipxcp_close __P((int, char *));
153static void ipxcp_lowerup __P((int));
154static void ipxcp_lowerdown __P((int));
155static void ipxcp_input __P((int, u_char *, int));
156static void ipxcp_protrej __P((int));
157static int  ipxcp_printpkt __P((u_char *, int,
158				void (*) __P((void *, char *, ...)), void *));
159
160struct protent ipxcp_protent = {
161    PPP_IPXCP,
162    ipxcp_init,
163    ipxcp_input,
164    ipxcp_protrej,
165    ipxcp_lowerup,
166    ipxcp_lowerdown,
167    ipxcp_open,
168    ipxcp_close,
169    ipxcp_printpkt,
170    NULL,
171    0,
172    "IPXCP",
173    "IPX",
174    ipxcp_option_list,
175    NULL,
176    NULL,
177    NULL
178};
179
180/*
181 * Lengths of configuration options.
182 */
183
184#define CILEN_VOID	2
185#define CILEN_COMPLETE	2	/* length of complete option */
186#define CILEN_NETN	6	/* network number length option */
187#define CILEN_NODEN	8	/* node number length option */
188#define CILEN_PROTOCOL	4	/* Minimum length of routing protocol */
189#define CILEN_NAME	3	/* Minimum length of router name */
190#define CILEN_COMPRESS	4	/* Minimum length of compression protocol */
191
192#define CODENAME(x)	((x) == CONFACK ? "ACK" : \
193			 (x) == CONFNAK ? "NAK" : "REJ")
194
195static int ipxcp_is_up;
196
197static char *ipx_ntoa __P((u_int32_t));
198
199/* Used in printing the node number */
200#define NODE(base) base[0], base[1], base[2], base[3], base[4], base[5]
201
202/* Used to generate the proper bit mask */
203#define BIT(num)   (1 << (num))
204
205/*
206 * Convert from internal to external notation
207 */
208
209static short int
210to_external(internal)
211short int internal;
212{
213    short int  external;
214
215    if (internal & BIT(IPX_NONE) )
216        external = IPX_NONE;
217    else
218        external = RIP_SAP;
219
220    return external;
221}
222
223/*
224 * Make a string representation of a network IP address.
225 */
226
227static char *
228ipx_ntoa(ipxaddr)
229u_int32_t ipxaddr;
230{
231    static char b[64];
232    slprintf(b, sizeof(b), "%x", ipxaddr);
233    return b;
234}
235
236
237static u_char *
238setipxnodevalue(src,dst)
239u_char *src, *dst;
240{
241    int indx;
242    int item;
243
244    for (;;) {
245        if (!isxdigit (*src))
246	    break;
247
248	for (indx = 0; indx < 5; ++indx) {
249	    dst[indx] <<= 4;
250	    dst[indx] |= (dst[indx + 1] >> 4) & 0x0F;
251	}
252
253	item = toupper (*src) - '0';
254	if (item > 9)
255	    item -= 7;
256
257	dst[5] = (dst[5] << 4) | item;
258	++src;
259    }
260    return src;
261}
262
263static int ipx_prio_our, ipx_prio_his;
264
265static int
266setipxnode(argv)
267    char **argv;
268{
269    char *end;
270    int have_his = 0;
271    u_char our_node[6];
272    u_char his_node[6];
273
274    memset (our_node, 0, 6);
275    memset (his_node, 0, 6);
276
277    end = setipxnodevalue (*argv, our_node);
278    if (*end == ':') {
279	have_his = 1;
280	end = setipxnodevalue (++end, his_node);
281    }
282
283    if (*end == '\0') {
284        ipxcp_wantoptions[0].neg_node = 1;
285	if (option_priority >= ipx_prio_our) {
286	    memcpy(&ipxcp_wantoptions[0].our_node[0], our_node, 6);
287	    ipx_prio_our = option_priority;
288	}
289	if (have_his && option_priority >= ipx_prio_his) {
290	    memcpy(&ipxcp_wantoptions[0].his_node[0], his_node, 6);
291	    ipx_prio_his = option_priority;
292	}
293        return 1;
294    }
295
296    option_error("invalid parameter '%s' for ipx-node option", *argv);
297    return 0;
298}
299
300static void
301printipxnode(opt, printer, arg)
302    option_t *opt;
303    void (*printer) __P((void *, char *, ...));
304    void *arg;
305{
306	unsigned char *p;
307
308	p = ipxcp_wantoptions[0].our_node;
309	if (ipx_prio_our)
310		printer(arg, "%.2x%.2x%.2x%.2x%.2x%.2x",
311			p[0], p[1], p[2], p[3], p[4], p[5]);
312	printer(arg, ":");
313	p = ipxcp_wantoptions[0].his_node;
314	if (ipx_prio_his)
315		printer(arg, "%.2x%.2x%.2x%.2x%.2x%.2x",
316			p[0], p[1], p[2], p[3], p[4], p[5]);
317}
318
319static int
320setipxname (argv)
321    char **argv;
322{
323    char *dest = ipxcp_wantoptions[0].name;
324    char *src  = *argv;
325    int  count;
326    char ch;
327
328    ipxcp_wantoptions[0].neg_name  = 1;
329    ipxcp_allowoptions[0].neg_name = 1;
330    memset (dest, '\0', sizeof (ipxcp_wantoptions[0].name));
331
332    count = 0;
333    while (*src) {
334        ch = *src++;
335	if (! isalnum (ch) && ch != '_') {
336	    option_error("IPX router name must be alphanumeric or _");
337	    return 0;
338	}
339
340	if (count >= sizeof (ipxcp_wantoptions[0].name) - 1) {
341	    option_error("IPX router name is limited to %d characters",
342			 sizeof (ipxcp_wantoptions[0].name) - 1);
343	    return 0;
344	}
345
346	dest[count++] = toupper (ch);
347    }
348    dest[count] = 0;
349
350    return 1;
351}
352
353/*
354 * ipxcp_init - Initialize IPXCP.
355 */
356static void
357ipxcp_init(unit)
358    int unit;
359{
360    fsm *f = &ipxcp_fsm[unit];
361
362    f->unit	 = unit;
363    f->protocol	 = PPP_IPXCP;
364    f->callbacks = &ipxcp_callbacks;
365    fsm_init(&ipxcp_fsm[unit]);
366
367    memset (wo->name,	  0, sizeof (wo->name));
368    memset (wo->our_node, 0, sizeof (wo->our_node));
369    memset (wo->his_node, 0, sizeof (wo->his_node));
370
371    wo->neg_nn	       = 1;
372    wo->neg_complete   = 1;
373    wo->network	       = 0;
374
375    ao->neg_node       = 1;
376    ao->neg_nn	       = 1;
377    ao->neg_name       = 1;
378    ao->neg_complete   = 1;
379    ao->neg_router     = 1;
380
381    ao->accept_local   = 0;
382    ao->accept_remote  = 0;
383    ao->accept_network = 0;
384
385    wo->tried_rip      = 0;
386    wo->tried_nlsp     = 0;
387}
388
389/*
390 * Copy the node number
391 */
392
393static void
394copy_node (src, dst)
395u_char *src, *dst;
396{
397    memcpy (dst, src, sizeof (ipxcp_wantoptions[0].our_node));
398}
399
400/*
401 * Compare node numbers
402 */
403
404static int
405compare_node (src, dst)
406u_char *src, *dst;
407{
408    return memcmp (dst, src, sizeof (ipxcp_wantoptions[0].our_node)) == 0;
409}
410
411/*
412 * Is the node number zero?
413 */
414
415static int
416zero_node (node)
417u_char *node;
418{
419    int indx;
420    for (indx = 0; indx < sizeof (ipxcp_wantoptions[0].our_node); ++indx)
421	if (node [indx] != 0)
422	    return 0;
423    return 1;
424}
425
426/*
427 * Increment the node number
428 */
429
430static void
431inc_node (node)
432u_char *node;
433{
434    u_char   *outp;
435    u_int32_t magic_num;
436
437    outp      = node;
438    magic_num = magic();
439    *outp++   = '\0';
440    *outp++   = '\0';
441    PUTLONG (magic_num, outp);
442}
443
444/*
445 * ipxcp_open - IPXCP is allowed to come up.
446 */
447static void
448ipxcp_open(unit)
449    int unit;
450{
451    fsm_open(&ipxcp_fsm[unit]);
452}
453
454/*
455 * ipxcp_close - Take IPXCP down.
456 */
457static void
458ipxcp_close(unit, reason)
459    int unit;
460    char *reason;
461{
462    fsm_close(&ipxcp_fsm[unit], reason);
463}
464
465
466/*
467 * ipxcp_lowerup - The lower layer is up.
468 */
469static void
470ipxcp_lowerup(unit)
471    int unit;
472{
473    fsm_lowerup(&ipxcp_fsm[unit]);
474}
475
476
477/*
478 * ipxcp_lowerdown - The lower layer is down.
479 */
480static void
481ipxcp_lowerdown(unit)
482    int unit;
483{
484    fsm_lowerdown(&ipxcp_fsm[unit]);
485}
486
487
488/*
489 * ipxcp_input - Input IPXCP packet.
490 */
491static void
492ipxcp_input(unit, p, len)
493    int unit;
494    u_char *p;
495    int len;
496{
497    fsm_input(&ipxcp_fsm[unit], p, len);
498}
499
500
501/*
502 * ipxcp_protrej - A Protocol-Reject was received for IPXCP.
503 *
504 * Pretend the lower layer went down, so we shut up.
505 */
506static void
507ipxcp_protrej(unit)
508    int unit;
509{
510    fsm_lowerdown(&ipxcp_fsm[unit]);
511}
512
513
514/*
515 * ipxcp_resetci - Reset our CI.
516 */
517static void
518ipxcp_resetci(f)
519    fsm *f;
520{
521    wo->req_node = wo->neg_node && ao->neg_node;
522    wo->req_nn	 = wo->neg_nn	&& ao->neg_nn;
523
524    if (wo->our_network == 0) {
525	wo->neg_node	   = 1;
526	ao->accept_network = 1;
527    }
528/*
529 * If our node number is zero then change it.
530 */
531    if (zero_node (wo->our_node)) {
532	inc_node (wo->our_node);
533	ao->accept_local = 1;
534	wo->neg_node	 = 1;
535    }
536/*
537 * If his node number is zero then change it.
538 */
539    if (zero_node (wo->his_node)) {
540	inc_node (wo->his_node);
541	ao->accept_remote = 1;
542    }
543/*
544 * If no routing agent was specified then we do RIP/SAP according to the
545 * RFC documents. If you have specified something then OK. Otherwise, we
546 * do RIP/SAP.
547 */
548    if (ao->router == 0) {
549	ao->router |= BIT(RIP_SAP);
550	wo->router |= BIT(RIP_SAP);
551    }
552
553    /* Always specify a routing protocol unless it was REJected. */
554    wo->neg_router = 1;
555/*
556 * Start with these default values
557 */
558    *go = *wo;
559}
560
561/*
562 * ipxcp_cilen - Return length of our CI.
563 */
564
565static int
566ipxcp_cilen(f)
567    fsm *f;
568{
569    int len;
570
571    len	 = go->neg_nn	    ? CILEN_NETN     : 0;
572    len += go->neg_node	    ? CILEN_NODEN    : 0;
573    len += go->neg_name	    ? CILEN_NAME + strlen (go->name) - 1 : 0;
574
575    /* RFC says that defaults should not be included. */
576    if (go->neg_router && to_external(go->router) != RIP_SAP)
577        len += CILEN_PROTOCOL;
578
579    return (len);
580}
581
582
583/*
584 * ipxcp_addci - Add our desired CIs to a packet.
585 */
586static void
587ipxcp_addci(f, ucp, lenp)
588    fsm *f;
589    u_char *ucp;
590    int *lenp;
591{
592/*
593 * Add the options to the record.
594 */
595    if (go->neg_nn) {
596	PUTCHAR (IPX_NETWORK_NUMBER, ucp);
597	PUTCHAR (CILEN_NETN, ucp);
598	PUTLONG (go->our_network, ucp);
599    }
600
601    if (go->neg_node) {
602	int indx;
603	PUTCHAR (IPX_NODE_NUMBER, ucp);
604	PUTCHAR (CILEN_NODEN, ucp);
605	for (indx = 0; indx < sizeof (go->our_node); ++indx)
606	    PUTCHAR (go->our_node[indx], ucp);
607    }
608
609    if (go->neg_name) {
610	int cilen = strlen (go->name);
611	int indx;
612	PUTCHAR (IPX_ROUTER_NAME, ucp);
613	PUTCHAR (CILEN_NAME + cilen - 1, ucp);
614	for (indx = 0; indx < cilen; ++indx)
615	    PUTCHAR (go->name [indx], ucp);
616    }
617
618    if (go->neg_router) {
619        short external = to_external (go->router);
620	if (external != RIP_SAP) {
621	    PUTCHAR  (IPX_ROUTER_PROTOCOL, ucp);
622	    PUTCHAR  (CILEN_PROTOCOL,      ucp);
623	    PUTSHORT (external,            ucp);
624	}
625    }
626}
627
628/*
629 * ipxcp_ackci - Ack our CIs.
630 *
631 * Returns:
632 *	0 - Ack was bad.
633 *	1 - Ack was good.
634 */
635static int
636ipxcp_ackci(f, p, len)
637    fsm *f;
638    u_char *p;
639    int len;
640{
641    u_short cilen, citype, cishort;
642    u_char cichar;
643    u_int32_t cilong;
644
645#define ACKCIVOID(opt, neg) \
646    if (neg) { \
647	if ((len -= CILEN_VOID) < 0) \
648	    break; \
649	GETCHAR(citype, p); \
650	GETCHAR(cilen, p); \
651	if (cilen != CILEN_VOID || \
652	    citype != opt) \
653	    break; \
654    }
655
656#define ACKCICOMPLETE(opt,neg)	ACKCIVOID(opt, neg)
657
658#define ACKCICHARS(opt, neg, val, cnt) \
659    if (neg) { \
660	int indx, count = cnt; \
661	len -= (count + 2); \
662	if (len < 0) \
663	    break; \
664	GETCHAR(citype, p); \
665	GETCHAR(cilen, p); \
666	if (cilen != (count + 2) || \
667	    citype != opt) \
668	    break; \
669	for (indx = 0; indx < count; ++indx) {\
670	    GETCHAR(cichar, p); \
671	    if (cichar != ((u_char *) &val)[indx]) \
672	       break; \
673	}\
674	if (indx != count) \
675	    break; \
676    }
677
678#define ACKCINODE(opt,neg,val) ACKCICHARS(opt,neg,val,sizeof(val))
679#define ACKCINAME(opt,neg,val) ACKCICHARS(opt,neg,val,strlen(val))
680
681#define ACKCINETWORK(opt, neg, val) \
682    if (neg) { \
683	if ((len -= CILEN_NETN) < 0) \
684	    break; \
685	GETCHAR(citype, p); \
686	GETCHAR(cilen, p); \
687	if (cilen != CILEN_NETN || \
688	    citype != opt) \
689	    break; \
690	GETLONG(cilong, p); \
691	if (cilong != val) \
692	    break; \
693    }
694
695#define ACKCIPROTO(opt, neg, val) \
696    if (neg) { \
697	if (len < 2) \
698	    break; \
699	GETCHAR(citype, p); \
700	GETCHAR(cilen, p); \
701	if (cilen != CILEN_PROTOCOL || citype != opt) \
702	    break; \
703	len -= cilen; \
704	if (len < 0) \
705	    break; \
706	GETSHORT(cishort, p); \
707	if (cishort != to_external (val) || cishort == RIP_SAP) \
708	    break; \
709      }
710/*
711 * Process the ACK frame in the order in which the frame was assembled
712 */
713    do {
714	ACKCINETWORK  (IPX_NETWORK_NUMBER,  go->neg_nn,	    go->our_network);
715	ACKCINODE     (IPX_NODE_NUMBER,	    go->neg_node,   go->our_node);
716	ACKCINAME     (IPX_ROUTER_NAME,	    go->neg_name,   go->name);
717	if (len > 0)
718		ACKCIPROTO    (IPX_ROUTER_PROTOCOL, go->neg_router, go->router);
719/*
720 * This is the end of the record.
721 */
722	if (len == 0)
723	    return (1);
724    } while (0);
725/*
726 * The frame is invalid
727 */
728    IPXCPDEBUG(("ipxcp_ackci: received bad Ack!"));
729    return (0);
730}
731
732/*
733 * ipxcp_nakci - Peer has sent a NAK for some of our CIs.
734 * This should not modify any state if the Nak is bad
735 * or if IPXCP is in the OPENED state.
736 *
737 * Returns:
738 *	0 - Nak was bad.
739 *	1 - Nak was good.
740 */
741
742static int
743ipxcp_nakci(f, p, len)
744    fsm *f;
745    u_char *p;
746    int len;
747{
748    u_char citype, cilen, *next;
749    u_short s;
750    u_int32_t l;
751    ipxcp_options no;		/* options we've seen Naks for */
752    ipxcp_options try;		/* options to request next time */
753
754    BZERO(&no, sizeof(no));
755    try = *go;
756
757    while (len > CILEN_VOID) {
758	GETCHAR (citype, p);
759	GETCHAR (cilen,	 p);
760	len -= cilen;
761	if (len < 0)
762	    goto bad;
763	next = &p [cilen - CILEN_VOID];
764
765	switch (citype) {
766	case IPX_NETWORK_NUMBER:
767	    if (!go->neg_nn || no.neg_nn || (cilen != CILEN_NETN))
768		goto bad;
769	    no.neg_nn = 1;
770
771	    GETLONG(l, p);
772	    if (l && ao->accept_network)
773		try.our_network = l;
774	    break;
775
776	case IPX_NODE_NUMBER:
777	    if (!go->neg_node || no.neg_node || (cilen != CILEN_NODEN))
778		goto bad;
779	    no.neg_node = 1;
780
781	    if (!zero_node (p) && ao->accept_local &&
782		! compare_node (p, ho->his_node))
783		copy_node (p, try.our_node);
784	    break;
785
786	    /* This has never been sent. Ignore the NAK frame */
787	case IPX_COMPRESSION_PROTOCOL:
788	    goto bad;
789
790	case IPX_ROUTER_PROTOCOL:
791	    if (!go->neg_router || (cilen < CILEN_PROTOCOL))
792		goto bad;
793
794	    GETSHORT (s, p);
795	    if (s > 15)         /* This is just bad, but ignore for now. */
796	        break;
797
798	    s = BIT(s);
799	    if (no.router & s)  /* duplicate NAKs are always bad */
800		goto bad;
801
802	    if (no.router == 0) /* Reset on first NAK only */
803		try.router = 0;
804
805	    no.router      |= s;
806	    try.router     |= s;
807	    try.neg_router  = 1;
808	    break;
809
810	    /* These, according to the RFC, must never be NAKed. */
811	case IPX_ROUTER_NAME:
812	case IPX_COMPLETE:
813	    goto bad;
814
815	    /* These are for options which we have not seen. */
816	default:
817	    break;
818	}
819	p = next;
820    }
821
822    /*
823     * Do not permit the peer to force a router protocol which we do not
824     * support. However, default to the condition that will accept "NONE".
825     */
826    try.router &= (ao->router | BIT(IPX_NONE));
827    if (try.router == 0 && ao->router != 0)
828	try.router = BIT(IPX_NONE);
829
830    if (try.router != 0)
831        try.neg_router = 1;
832
833    /*
834     * OK, the Nak is good.  Now we can update state.
835     * If there are any options left, we ignore them.
836     */
837    if (f->state != OPENED)
838	*go = try;
839
840    return 1;
841
842bad:
843    IPXCPDEBUG(("ipxcp_nakci: received bad Nak!"));
844    return 0;
845}
846
847/*
848 * ipxcp_rejci - Reject some of our CIs.
849 */
850static int
851ipxcp_rejci(f, p, len)
852    fsm *f;
853    u_char *p;
854    int len;
855{
856    u_short cilen, citype, cishort;
857    u_char cichar;
858    u_int32_t cilong;
859    ipxcp_options try;		/* options to request next time */
860
861#define REJCINETWORK(opt, neg, val) \
862    if (neg && p[0] == opt) { \
863	if ((len -= CILEN_NETN) < 0) \
864	    break; \
865	GETCHAR(citype, p); \
866	GETCHAR(cilen, p); \
867	if (cilen != CILEN_NETN || \
868	    citype != opt) \
869	    break; \
870	GETLONG(cilong, p); \
871	if (cilong != val) \
872	    break; \
873	neg = 0; \
874    }
875
876#define REJCICHARS(opt, neg, val, cnt) \
877    if (neg && p[0] == opt) { \
878	int indx, count = cnt; \
879	len -= (count + 2); \
880	if (len < 0) \
881	    break; \
882	GETCHAR(citype, p); \
883	GETCHAR(cilen, p); \
884	if (cilen != (count + 2) || \
885	    citype != opt) \
886	    break; \
887	for (indx = 0; indx < count; ++indx) {\
888	    GETCHAR(cichar, p); \
889	    if (cichar != ((u_char *) &val)[indx]) \
890	       break; \
891	}\
892	if (indx != count) \
893	    break; \
894	neg = 0; \
895    }
896
897#define REJCINODE(opt,neg,val) REJCICHARS(opt,neg,val,sizeof(val))
898#define REJCINAME(opt,neg,val) REJCICHARS(opt,neg,val,strlen(val))
899
900#define REJCIVOID(opt, neg) \
901    if (neg && p[0] == opt) { \
902	if ((len -= CILEN_VOID) < 0) \
903	    break; \
904	GETCHAR(citype, p); \
905	GETCHAR(cilen, p); \
906	if (cilen != CILEN_VOID || citype != opt) \
907	    break; \
908	neg = 0; \
909    }
910
911/* a reject for RIP/SAP is invalid since we don't send it and you can't
912   reject something which is not sent. (You can NAK, but you can't REJ.) */
913#define REJCIPROTO(opt, neg, val, bit) \
914    if (neg && p[0] == opt) { \
915	if ((len -= CILEN_PROTOCOL) < 0) \
916	    break; \
917	GETCHAR(citype, p); \
918	GETCHAR(cilen, p); \
919	if (cilen != CILEN_PROTOCOL) \
920	    break; \
921	GETSHORT(cishort, p); \
922	if (cishort != to_external (val) || cishort == RIP_SAP) \
923	    break; \
924	neg = 0; \
925    }
926/*
927 * Any Rejected CIs must be in exactly the same order that we sent.
928 * Check packet length and CI length at each step.
929 * If we find any deviations, then this packet is bad.
930 */
931    try = *go;
932
933    do {
934	REJCINETWORK (IPX_NETWORK_NUMBER,  try.neg_nn,	   try.our_network);
935	REJCINODE    (IPX_NODE_NUMBER,	   try.neg_node,   try.our_node);
936	REJCINAME    (IPX_ROUTER_NAME,	   try.neg_name,   try.name);
937	REJCIPROTO   (IPX_ROUTER_PROTOCOL, try.neg_router, try.router, 0);
938/*
939 * This is the end of the record.
940 */
941	if (len == 0) {
942	    if (f->state != OPENED)
943		*go = try;
944	    return (1);
945	}
946    } while (0);
947/*
948 * The frame is invalid at this point.
949 */
950    IPXCPDEBUG(("ipxcp_rejci: received bad Reject!"));
951    return 0;
952}
953
954/*
955 * ipxcp_reqci - Check the peer's requested CIs and send appropriate response.
956 *
957 * Returns: CONFACK, CONFNAK or CONFREJ and input packet modified
958 * appropriately.  If reject_if_disagree is non-zero, doesn't return
959 * CONFNAK; returns CONFREJ if it can't return CONFACK.
960 */
961static int
962ipxcp_reqci(f, inp, len, reject_if_disagree)
963    fsm *f;
964    u_char *inp;		/* Requested CIs */
965    int *len;			/* Length of requested CIs */
966    int reject_if_disagree;
967{
968    u_char *cip, *next;		/* Pointer to current and next CIs */
969    u_short cilen, citype;	/* Parsed len, type */
970    u_short cishort;		/* Parsed short value */
971    u_int32_t cinetwork;	/* Parsed address values */
972    int rc = CONFACK;		/* Final packet return code */
973    int orc;			/* Individual option return code */
974    u_char *p;			/* Pointer to next char to parse */
975    u_char *ucp = inp;		/* Pointer to current output char */
976    int l = *len;		/* Length left */
977
978    /*
979     * Reset all his options.
980     */
981    BZERO(ho, sizeof(*ho));
982
983    /*
984     * Process all his options.
985     */
986    next = inp;
987    while (l) {
988	orc = CONFACK;			/* Assume success */
989	cip = p = next;			/* Remember begining of CI */
990	if (l < 2 ||			/* Not enough data for CI header or */
991	    p[1] < 2 ||			/*  CI length too small or */
992	    p[1] > l) {			/*  CI length too big? */
993	    IPXCPDEBUG(("ipxcp_reqci: bad CI length!"));
994	    orc = CONFREJ;		/* Reject bad CI */
995	    cilen = l;			/* Reject till end of packet */
996	    l = 0;			/* Don't loop again */
997	    goto endswitch;
998	}
999	GETCHAR(citype, p);		/* Parse CI type */
1000	GETCHAR(cilen, p);		/* Parse CI length */
1001	l -= cilen;			/* Adjust remaining length */
1002	next += cilen;			/* Step to next CI */
1003
1004	switch (citype) {		/* Check CI type */
1005/*
1006 * The network number must match. Choose the larger of the two.
1007 */
1008	case IPX_NETWORK_NUMBER:
1009	    /* if we wont negotiate the network number or the length is wrong
1010	       then reject the option */
1011	    if ( !ao->neg_nn || cilen != CILEN_NETN ) {
1012		orc = CONFREJ;
1013		break;
1014	    }
1015	    GETLONG(cinetwork, p);
1016
1017	    /* If the network numbers match then acknowledge them. */
1018	    if (cinetwork != 0) {
1019		ho->his_network = cinetwork;
1020		ho->neg_nn	= 1;
1021		if (wo->our_network == cinetwork)
1022		    break;
1023/*
1024 * If the network number is not given or we don't accept their change or
1025 * the network number is too small then NAK it.
1026 */
1027		if (! ao->accept_network || cinetwork < wo->our_network) {
1028		    DECPTR (sizeof (u_int32_t), p);
1029		    PUTLONG (wo->our_network, p);
1030		    orc = CONFNAK;
1031		}
1032		break;
1033	    }
1034/*
1035 * The peer sent '0' for the network. Give it ours if we have one.
1036 */
1037	    if (go->our_network != 0) {
1038		DECPTR (sizeof (u_int32_t), p);
1039		PUTLONG (wo->our_network, p);
1040		orc = CONFNAK;
1041/*
1042 * We don't have one. Reject the value.
1043 */
1044	    } else
1045		orc = CONFREJ;
1046
1047	    break;
1048/*
1049 * The node number is required
1050 */
1051	case IPX_NODE_NUMBER:
1052	    /* if we wont negotiate the node number or the length is wrong
1053	       then reject the option */
1054	    if ( cilen != CILEN_NODEN ) {
1055		orc = CONFREJ;
1056		break;
1057	    }
1058
1059	    copy_node (p, ho->his_node);
1060	    ho->neg_node = 1;
1061/*
1062 * If the remote does not have a number and we do then NAK it with the value
1063 * which we have for it. (We never have a default value of zero.)
1064 */
1065	    if (zero_node (ho->his_node)) {
1066		orc = CONFNAK;
1067		copy_node (wo->his_node, p);
1068		INCPTR (sizeof (wo->his_node), p);
1069		break;
1070	    }
1071/*
1072 * If you have given me the expected network node number then I'll accept
1073 * it now.
1074 */
1075	    if (compare_node (wo->his_node, ho->his_node)) {
1076		orc = CONFACK;
1077		ho->neg_node = 1;
1078		INCPTR (sizeof (wo->his_node), p);
1079		break;
1080	    }
1081/*
1082 * If his node number is the same as ours then ask him to try the next
1083 * value.
1084 */
1085	    if (compare_node (ho->his_node, go->our_node)) {
1086		inc_node (ho->his_node);
1087		orc = CONFNAK;
1088		copy_node (ho->his_node, p);
1089		INCPTR (sizeof (wo->his_node), p);
1090		break;
1091	    }
1092/*
1093 * If we don't accept a new value then NAK it.
1094 */
1095	    if (! ao->accept_remote) {
1096		copy_node (wo->his_node, p);
1097		INCPTR (sizeof (wo->his_node), p);
1098		orc = CONFNAK;
1099		break;
1100	    }
1101	    orc = CONFACK;
1102	    ho->neg_node = 1;
1103	    INCPTR (sizeof (wo->his_node), p);
1104	    break;
1105/*
1106 * Compression is not desired at this time. It is always rejected.
1107 */
1108	case IPX_COMPRESSION_PROTOCOL:
1109	    orc = CONFREJ;
1110	    break;
1111/*
1112 * The routing protocol is a bitmask of various types. Any combination
1113 * of the values RIP_SAP and NLSP are permissible. 'IPX_NONE' for no
1114 * routing protocol must be specified only once.
1115 */
1116	case IPX_ROUTER_PROTOCOL:
1117	    if ( !ao->neg_router || cilen < CILEN_PROTOCOL ) {
1118		orc = CONFREJ;
1119		break;
1120	    }
1121
1122	    GETSHORT (cishort, p);
1123
1124	    if (wo->neg_router == 0) {
1125	        wo->neg_router = 1;
1126		wo->router     = BIT(IPX_NONE);
1127	    }
1128
1129	    if ((cishort == IPX_NONE && ho->router != 0) ||
1130		(ho->router & BIT(IPX_NONE))) {
1131		orc = CONFREJ;
1132		break;
1133	    }
1134
1135	    cishort = BIT(cishort);
1136	    if (ho->router & cishort) {
1137		orc = CONFREJ;
1138		break;
1139	    }
1140
1141	    ho->router	  |= cishort;
1142	    ho->neg_router = 1;
1143
1144	    /* Finally do not allow a router protocol which we do not
1145	       support. */
1146
1147	    if ((cishort & (ao->router | BIT(IPX_NONE))) == 0) {
1148	        int protocol;
1149
1150		if (cishort == BIT(NLSP) &&
1151		    (ao->router & BIT(RIP_SAP)) &&
1152		    !wo->tried_rip) {
1153		    protocol      = RIP_SAP;
1154		    wo->tried_rip = 1;
1155		} else
1156		    protocol = IPX_NONE;
1157
1158		DECPTR (sizeof (u_int16_t), p);
1159		PUTSHORT (protocol, p);
1160		orc = CONFNAK;
1161	    }
1162	    break;
1163/*
1164 * The router name is advisorary. Just accept it if it is not too large.
1165 */
1166	case IPX_ROUTER_NAME:
1167	    if (cilen >= CILEN_NAME) {
1168		int name_size = cilen - CILEN_NAME;
1169		if (name_size > sizeof (ho->name))
1170		    name_size = sizeof (ho->name) - 1;
1171		memset (ho->name, 0, sizeof (ho->name));
1172		memcpy (ho->name, p, name_size);
1173		ho->name [name_size] = '\0';
1174		ho->neg_name = 1;
1175		orc = CONFACK;
1176		break;
1177	    }
1178	    orc = CONFREJ;
1179	    break;
1180/*
1181 * This is advisorary.
1182 */
1183	case IPX_COMPLETE:
1184	    if (cilen != CILEN_COMPLETE)
1185		orc = CONFREJ;
1186	    else {
1187		ho->neg_complete = 1;
1188		orc = CONFACK;
1189	    }
1190	    break;
1191/*
1192 * All other entries are not known at this time.
1193 */
1194	default:
1195	    orc = CONFREJ;
1196	    break;
1197	}
1198endswitch:
1199	if (orc == CONFACK &&		/* Good CI */
1200	    rc != CONFACK)		/*  but prior CI wasnt? */
1201	    continue;			/* Don't send this one */
1202
1203	if (orc == CONFNAK) {		/* Nak this CI? */
1204	    if (reject_if_disagree)	/* Getting fed up with sending NAKs? */
1205		orc = CONFREJ;		/* Get tough if so */
1206	    if (rc == CONFREJ)		/* Rejecting prior CI? */
1207		continue;		/* Don't send this one */
1208	    if (rc == CONFACK) {	/* Ack'd all prior CIs? */
1209		rc  = CONFNAK;		/* Not anymore... */
1210		ucp = inp;		/* Backup */
1211	    }
1212	}
1213
1214	if (orc == CONFREJ &&		/* Reject this CI */
1215	    rc != CONFREJ) {		/*  but no prior ones? */
1216	    rc = CONFREJ;
1217	    ucp = inp;			/* Backup */
1218	}
1219
1220	/* Need to move CI? */
1221	if (ucp != cip)
1222	    BCOPY(cip, ucp, cilen);	/* Move it */
1223
1224	/* Update output pointer */
1225	INCPTR(cilen, ucp);
1226    }
1227
1228    /*
1229     * If we aren't rejecting this packet, and we want to negotiate
1230     * their address, and they didn't send their address, then we
1231     * send a NAK with a IPX_NODE_NUMBER option appended. We assume the
1232     * input buffer is long enough that we can append the extra
1233     * option safely.
1234     */
1235
1236    if (rc != CONFREJ && !ho->neg_node &&
1237	wo->req_nn && !reject_if_disagree) {
1238	if (rc == CONFACK) {
1239	    rc = CONFNAK;
1240	    wo->req_nn = 0;		/* don't ask again */
1241	    ucp = inp;			/* reset pointer */
1242	}
1243
1244	if (zero_node (wo->his_node))
1245	    inc_node (wo->his_node);
1246
1247	PUTCHAR (IPX_NODE_NUMBER, ucp);
1248	PUTCHAR (CILEN_NODEN, ucp);
1249	copy_node (wo->his_node, ucp);
1250	INCPTR (sizeof (wo->his_node), ucp);
1251    }
1252
1253    *len = ucp - inp;			/* Compute output length */
1254    IPXCPDEBUG(("ipxcp: returning Configure-%s", CODENAME(rc)));
1255    return (rc);			/* Return final code */
1256}
1257
1258/*
1259 * ipxcp_up - IPXCP has come UP.
1260 *
1261 * Configure the IP network interface appropriately and bring it up.
1262 */
1263
1264static void
1265ipxcp_up(f)
1266    fsm *f;
1267{
1268    int unit = f->unit;
1269
1270    IPXCPDEBUG(("ipxcp: up"));
1271
1272    /* The default router protocol is RIP/SAP. */
1273    if (ho->router == 0)
1274        ho->router = BIT(RIP_SAP);
1275
1276    if (go->router == 0)
1277        go->router = BIT(RIP_SAP);
1278
1279    /* Fetch the network number */
1280    if (!ho->neg_nn)
1281	ho->his_network = wo->his_network;
1282
1283    if (!ho->neg_node)
1284	copy_node (wo->his_node, ho->his_node);
1285
1286    if (!wo->neg_node && !go->neg_node)
1287	copy_node (wo->our_node, go->our_node);
1288
1289    if (zero_node (go->our_node)) {
1290        static char errmsg[] = "Could not determine local IPX node address";
1291	if (debug)
1292	    error(errmsg);
1293	ipxcp_close(f->unit, errmsg);
1294	return;
1295    }
1296
1297    go->network = go->our_network;
1298    if (ho->his_network != 0 && ho->his_network > go->network)
1299	go->network = ho->his_network;
1300
1301    if (go->network == 0) {
1302        static char errmsg[] = "Can not determine network number";
1303	if (debug)
1304	    error(errmsg);
1305	ipxcp_close (unit, errmsg);
1306	return;
1307    }
1308
1309    /* bring the interface up */
1310    if (!sifup(unit)) {
1311	if (debug)
1312	    warn("sifup failed (IPX)");
1313	ipxcp_close(unit, "Interface configuration failed");
1314	return;
1315    }
1316    ipxcp_is_up = 1;
1317
1318    /* set the network number for IPX */
1319    if (!sipxfaddr(unit, go->network, go->our_node)) {
1320	if (debug)
1321	    warn("sipxfaddr failed");
1322	ipxcp_close(unit, "Interface configuration failed");
1323	return;
1324    }
1325
1326    np_up(f->unit, PPP_IPX);
1327
1328    /*
1329     * Execute the ipx-up script, like this:
1330     *	/etc/ppp/ipx-up interface tty speed local-IPX remote-IPX
1331     */
1332
1333    ipxcp_script (f, _PATH_IPXUP);
1334}
1335
1336/*
1337 * ipxcp_down - IPXCP has gone DOWN.
1338 *
1339 * Take the IP network interface down, clear its addresses
1340 * and delete routes through it.
1341 */
1342
1343static void
1344ipxcp_down(f)
1345    fsm *f;
1346{
1347    IPXCPDEBUG(("ipxcp: down"));
1348
1349    if (!ipxcp_is_up)
1350	return;
1351    ipxcp_is_up = 0;
1352    np_down(f->unit, PPP_IPX);
1353    cipxfaddr(f->unit);
1354    sifnpmode(f->unit, PPP_IPX, NPMODE_DROP);
1355    sifdown(f->unit);
1356    ipxcp_script (f, _PATH_IPXDOWN);
1357}
1358
1359
1360/*
1361 * ipxcp_finished - possibly shut down the lower layers.
1362 */
1363static void
1364ipxcp_finished(f)
1365    fsm *f;
1366{
1367    np_finished(f->unit, PPP_IPX);
1368}
1369
1370
1371/*
1372 * ipxcp_script - Execute a script with arguments
1373 * interface-name tty-name speed local-IPX remote-IPX networks.
1374 */
1375static void
1376ipxcp_script(f, script)
1377    fsm *f;
1378    char *script;
1379{
1380    char strspeed[32],	 strlocal[32],	   strremote[32];
1381    char strnetwork[32], strpid[32];
1382    char *argv[14],	 strproto_lcl[32], strproto_rmt[32];
1383
1384    slprintf(strpid, sizeof(strpid), "%d", getpid());
1385    slprintf(strspeed, sizeof(strspeed),"%d", baud_rate);
1386
1387    strproto_lcl[0] = '\0';
1388    if (go->neg_router && ((go->router & BIT(IPX_NONE)) == 0)) {
1389	if (go->router & BIT(RIP_SAP))
1390	    strlcpy (strproto_lcl, "RIP ", sizeof(strproto_lcl));
1391	if (go->router & BIT(NLSP))
1392	    strlcat (strproto_lcl, "NLSP ", sizeof(strproto_lcl));
1393    }
1394
1395    if (strproto_lcl[0] == '\0')
1396	strlcpy (strproto_lcl, "NONE ", sizeof(strproto_lcl));
1397
1398    strproto_lcl[strlen (strproto_lcl)-1] = '\0';
1399
1400    strproto_rmt[0] = '\0';
1401    if (ho->neg_router && ((ho->router & BIT(IPX_NONE)) == 0)) {
1402	if (ho->router & BIT(RIP_SAP))
1403	    strlcpy (strproto_rmt, "RIP ", sizeof(strproto_rmt));
1404	if (ho->router & BIT(NLSP))
1405	    strlcat (strproto_rmt, "NLSP ", sizeof(strproto_rmt));
1406    }
1407
1408    if (strproto_rmt[0] == '\0')
1409	strlcpy (strproto_rmt, "NONE ", sizeof(strproto_rmt));
1410
1411    strproto_rmt[strlen (strproto_rmt)-1] = '\0';
1412
1413    strlcpy (strnetwork, ipx_ntoa (go->network), sizeof(strnetwork));
1414
1415    slprintf (strlocal, sizeof(strlocal), "%0.6B", go->our_node);
1416
1417    slprintf (strremote, sizeof(strremote), "%0.6B", ho->his_node);
1418
1419    argv[0]  = script;
1420    argv[1]  = ifname;
1421    argv[2]  = devnam;
1422    argv[3]  = strspeed;
1423    argv[4]  = strnetwork;
1424    argv[5]  = strlocal;
1425    argv[6]  = strremote;
1426    argv[7]  = strproto_lcl;
1427    argv[8]  = strproto_rmt;
1428    argv[9]  = go->name;
1429    argv[10] = ho->name;
1430    argv[11] = ipparam;
1431    argv[12] = strpid;
1432    argv[13] = NULL;
1433    run_program(script, argv, 0, NULL, NULL);
1434}
1435
1436/*
1437 * ipxcp_printpkt - print the contents of an IPXCP packet.
1438 */
1439static char *ipxcp_codenames[] = {
1440    "ConfReq", "ConfAck", "ConfNak", "ConfRej",
1441    "TermReq", "TermAck", "CodeRej"
1442};
1443
1444static int
1445ipxcp_printpkt(p, plen, printer, arg)
1446    u_char *p;
1447    int plen;
1448    void (*printer) __P((void *, char *, ...));
1449    void *arg;
1450{
1451    int code, id, len, olen;
1452    u_char *pstart, *optend;
1453    u_short cishort;
1454    u_int32_t cilong;
1455
1456    if (plen < HEADERLEN)
1457	return 0;
1458    pstart = p;
1459    GETCHAR(code, p);
1460    GETCHAR(id, p);
1461    GETSHORT(len, p);
1462    if (len < HEADERLEN || len > plen)
1463	return 0;
1464
1465    if (code >= 1 && code <= sizeof(ipxcp_codenames) / sizeof(char *))
1466	printer(arg, " %s", ipxcp_codenames[code-1]);
1467    else
1468	printer(arg, " code=0x%x", code);
1469    printer(arg, " id=0x%x", id);
1470    len -= HEADERLEN;
1471    switch (code) {
1472    case CONFREQ:
1473    case CONFACK:
1474    case CONFNAK:
1475    case CONFREJ:
1476	/* print option list */
1477	while (len >= 2) {
1478	    GETCHAR(code, p);
1479	    GETCHAR(olen, p);
1480	    p -= 2;
1481	    if (olen < CILEN_VOID || olen > len) {
1482		break;
1483	    }
1484	    printer(arg, " <");
1485	    len -= olen;
1486	    optend = p + olen;
1487	    switch (code) {
1488	    case IPX_NETWORK_NUMBER:
1489		if (olen == CILEN_NETN) {
1490		    p += 2;
1491		    GETLONG(cilong, p);
1492		    printer (arg, "network %s", ipx_ntoa (cilong));
1493		}
1494		break;
1495	    case IPX_NODE_NUMBER:
1496		if (olen == CILEN_NODEN) {
1497		    p += 2;
1498		    printer (arg, "node ");
1499		    while (p < optend) {
1500			GETCHAR(code, p);
1501			printer(arg, "%.2x", (int) (unsigned int) (unsigned char) code);
1502		    }
1503		}
1504		break;
1505	    case IPX_COMPRESSION_PROTOCOL:
1506		if (olen == CILEN_COMPRESS) {
1507		    p += 2;
1508		    GETSHORT (cishort, p);
1509		    printer (arg, "compression %d", (int) cishort);
1510		}
1511		break;
1512	    case IPX_ROUTER_PROTOCOL:
1513		if (olen == CILEN_PROTOCOL) {
1514		    p += 2;
1515		    GETSHORT (cishort, p);
1516		    printer (arg, "router proto %d", (int) cishort);
1517		}
1518		break;
1519	    case IPX_ROUTER_NAME:
1520		if (olen >= CILEN_NAME) {
1521		    p += 2;
1522		    printer (arg, "router name \"");
1523		    while (p < optend) {
1524			GETCHAR(code, p);
1525			if (code >= 0x20 && code <= 0x7E)
1526			    printer (arg, "%c", (int) (unsigned int) (unsigned char) code);
1527			else
1528			    printer (arg, " \\%.2x", (int) (unsigned int) (unsigned char) code);
1529		    }
1530		    printer (arg, "\"");
1531		}
1532		break;
1533	    case IPX_COMPLETE:
1534		if (olen == CILEN_COMPLETE) {
1535		    p += 2;
1536		    printer (arg, "complete");
1537		}
1538		break;
1539	    default:
1540		break;
1541	    }
1542
1543	    while (p < optend) {
1544		GETCHAR(code, p);
1545		printer(arg, " %.2x", (int) (unsigned int) (unsigned char) code);
1546	    }
1547	    printer(arg, ">");
1548	}
1549	break;
1550
1551    case TERMACK:
1552    case TERMREQ:
1553	if (len > 0 && *p >= ' ' && *p < 0x7f) {
1554	    printer(arg, " ");
1555	    print_string(p, len, printer, arg);
1556	    p += len;
1557	    len = 0;
1558	}
1559	break;
1560    }
1561
1562    /* print the rest of the bytes in the packet */
1563    for (; len > 0; --len) {
1564	GETCHAR(code, p);
1565	printer(arg, " %.2x", (int) (unsigned int) (unsigned char) code);
1566    }
1567
1568    return p - pstart;
1569}
1570#endif /* ifdef IPX_CHANGE */
1571