[apple/xnu.git] / bsd / netiso / clnp_debug.c

/*
 * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * The contents of this file constitute Original Code as defined in and
 * are subject to the Apple Public Source License Version 1.1 (the
 * "License").  You may not use this file except in compliance with the
 * License.  Please obtain a copy of the License at
 * http://www.apple.com/publicsource and read it before using this file.
 * 
 * This Original Code and all software distributed under the License are
 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
 * License for the specific language governing rights and limitations
 * under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */
/*-
 * Copyright (c) 1991, 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 *	@(#)clnp_debug.c	8.1 (Berkeley) 6/10/93
 */

/***********************************************************
		Copyright IBM Corporation 1987

                      All Rights Reserved

Permission to use, copy, modify, and distribute this software and its 
documentation for any purpose and without fee is hereby granted, 
provided that the above copyright notice appear in all copies and that
both that copyright notice and this permission notice appear in 
supporting documentation, and that the name of IBM not be
used in advertising or publicity pertaining to distribution of the
software without specific, written prior permission.  

IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
SOFTWARE.

******************************************************************/

/*
 * ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison
 */

#include <sys/param.h>
#include <sys/mbuf.h>
#include <sys/domain.h>
#include <sys/protosw.h>
#include <sys/socket.h>
#include <sys/socketvar.h>
#include <sys/errno.h>

#include <net/if.h>
#include <net/route.h>

#include <netiso/iso.h>
#include <netiso/clnp.h>
#include <netiso/clnp_stat.h>
#include <netiso/argo_debug.h>

#ifdef	ARGO_DEBUG

#ifdef	TESTDEBUG
#ifdef notdef
struct addr_37 u_37 = {
	{0x00, 0x02, 0x00, 0x10, 0x20, 0x30, 0x35}, 
	{0x01, 0x02, 0x03, 0x04, 0x50, 0x60, 0x70, 0x80, 0x90}
};
struct addr_osinet u_osinet = {
	{0x00, 0x04},
	{0x00, 0x02, 0x00, 0x01, 0x23, 0x42, 0x78, 0x20, 0x01, 0x05, 0x00}
};
#endif /* notdef */
struct addr_rfc986 u_rfc986 = {
	{0x00, 0x06},
	{0x01, 0xc0, 0x0c, 0x0c, 0xab, 0x11}
};
struct addr_rfc986 u_bad = {
	{0x00, 0x01},
	{0x01, 0xc0, 0x0c, 0x0c, 0xab, 0x11}
};
#include <stdio.h>
main()
{
	struct iso_addr	a;

	a.isoa_afi = AFI_37;
	a.isoa_u.addr_37 = u_37;
	a.isoa_len = 17;
	printf("type 37: %s\n", clnp_iso_addrp(&a));

	a.isoa_afi = AFI_OSINET;
	a.isoa_u.addr_osinet = u_osinet;
	a.isoa_len = 14;
	printf("type osinet: %s\n", clnp_iso_addrp(&a));

	a.isoa_afi = AFI_RFC986;
	a.isoa_u.addr_rfc986 = u_rfc986;
	a.isoa_len = 9;
	printf("type rfc986: %s\n", clnp_iso_addrp(&a));

	a.isoa_afi = 12;
	a.isoa_u.addr_rfc986 = u_rfc986;
	a.isoa_len = 9;
	printf("type bad afi: %s\n", clnp_iso_addrp(&a));

	a.isoa_afi = AFI_RFC986;
	a.isoa_u.addr_rfc986 = u_bad;
	a.isoa_len = 9;
	printf("type bad idi: %s\n", clnp_iso_addrp(&a));
}
#endif	/* TESTDEBUG */

unsigned int	clnp_debug;
static char letters[] = "0123456789abcdef";

/*
 *	Print buffer in hex, return addr of where we left off.
 *	Do not null terminate.
 */
char *
clnp_hexp(src, len, where)
char	*src;		/* src of data to print */
int		len;				/* lengthof src */
char	*where;		/* where to put data */
{
	int i;

	for (i=0; i<len; i++) {
		register int j = ((u_char *)src)[i];
		*where++ = letters[j >> 4];
		*where++ = letters[j & 0x0f];
	}
	return where;
}

/*
 *	Return a ptr to a human readable form of an iso addr 
 */
static char iso_addr_b[50];
#define	DELIM	'.';

char *
clnp_iso_addrp(isoa)
struct iso_addr *isoa;
{
	char	*cp;

	/* print length */
	sprintf(iso_addr_b, "[%d] ", isoa->isoa_len);

	/* set cp to end of what we have */
	cp = iso_addr_b;
	while (*cp)
		cp++;

	/* print afi */
	cp = clnp_hexp(isoa->isoa_genaddr, (int)isoa->isoa_len, cp);
#ifdef notdef
	*cp++ = DELIM;

	/* print type specific part */
	switch(isoa->isoa_afi) {
		case AFI_37:
			cp = clnp_hexp(isoa->t37_idi, ADDR37_IDI_LEN, cp);
			*cp++ = DELIM;
			cp = clnp_hexp(isoa->t37_dsp, ADDR37_DSP_LEN, cp);
			break;
		
/* 		case AFI_OSINET:*/
		case AFI_RFC986: {
			u_short	idi;

			/* osinet and rfc986 have idi in the same place */
			/* print idi */
			cp = clnp_hexp(isoa->rfc986_idi, ADDROSINET_IDI_LEN, cp);
			*cp++ = DELIM;
			CTOH(isoa->rfc986_idi[0], isoa->rfc986_idi[1], idi);

			if (idi == IDI_OSINET) {
				struct ovl_osinet *oosi = (struct ovl_osinet *)isoa;
				cp = clnp_hexp(oosi->oosi_orgid, OVLOSINET_ORGID_LEN, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(oosi->oosi_snetid, OVLOSINET_SNETID_LEN, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(oosi->oosi_snpa, OVLOSINET_SNPA_LEN, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(oosi->oosi_nsap, OVLOSINET_NSAP_LEN, cp);
			} else if (idi == IDI_RFC986) {
				struct ovl_rfc986 *o986 = (struct ovl_rfc986 *)isoa;
				cp = clnp_hexp(&o986->o986_vers, 1, cp);
				*cp++ = DELIM;
#ifdef  vax
				sprintf(cp, "%d.%d.%d.%d.%d", 
				o986->o986_inetaddr[0] & 0xff,
				o986->o986_inetaddr[1] & 0xff,
				o986->o986_inetaddr[2] & 0xff,
				o986->o986_inetaddr[3] & 0xff,
				o986->o986_upid & 0xff);
				return(iso_addr_b);
#else
				cp = clnp_hexp(&o986->o986_inetaddr[0], 1, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(&o986->o986_inetaddr[1], 1, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(&o986->o986_inetaddr[2], 1, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(&o986->o986_inetaddr[3], 1, cp);
				*cp++ = DELIM;
				cp = clnp_hexp(&o986->o986_upid, 1, cp);
#endif /* vax */
			}
			
		} break;

		default:
			*cp++ = '?';
			break;
	}
#endif /* notdef */
	*cp = (char)0;
	
	return(iso_addr_b);
}

char *
clnp_saddr_isop(s)
register struct sockaddr_iso *s;
{
	register char	*cp = clnp_iso_addrp(&s->siso_addr);

	while (*cp) cp++;
	*cp++ = '(';
	cp = clnp_hexp(TSEL(s), (int)s->siso_tlen, cp);
	*cp++ = ')';
	*cp++ = 0;
	return (iso_addr_b);
}

#endif	/* ARGO_DEBUG */
Commit	Line	Data
1c79356b A	1	/*
	2	* Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
	3	*
	4	* @APPLE_LICENSE_HEADER_START@
	5	*
	6	* The contents of this file constitute Original Code as defined in and
	7	* are subject to the Apple Public Source License Version 1.1 (the
	8	* "License"). You may not use this file except in compliance with the
	9	* License. Please obtain a copy of the License at
	10	* http://www.apple.com/publicsource and read it before using this file.
	11	*
	12	* This Original Code and all software distributed under the License are
	13	* distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
	14	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
	15	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
	16	* FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
	17	* License for the specific language governing rights and limitations
	18	* under the License.
	19	*
	20	* @APPLE_LICENSE_HEADER_END@
	21	*/
	22	/*-
	23	* Copyright (c) 1991, 1993
	24	* The Regents of the University of California. All rights reserved.
	25	*
	26	* Redistribution and use in source and binary forms, with or without
	27	* modification, are permitted provided that the following conditions
	28	* are met:
	29	* 1. Redistributions of source code must retain the above copyright
	30	* notice, this list of conditions and the following disclaimer.
	31	* 2. Redistributions in binary form must reproduce the above copyright
	32	* notice, this list of conditions and the following disclaimer in the
	33	* documentation and/or other materials provided with the distribution.
	34	* 3. All advertising materials mentioning features or use of this software
	35	* must display the following acknowledgement:
	36	* This product includes software developed by the University of
	37	* California, Berkeley and its contributors.
	38	* 4. Neither the name of the University nor the names of its contributors
	39	* may be used to endorse or promote products derived from this software
	40	* without specific prior written permission.
	41	*
	42	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	43	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	44	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	45	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	46	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	47	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	48	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	49	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	50	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	51	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	52	* SUCH DAMAGE.
	53	*
	54	* @(#)clnp_debug.c 8.1 (Berkeley) 6/10/93
	55	*/
	56
	57	/***********************************************************
	58	Copyright IBM Corporation 1987
	59
	60	All Rights Reserved
	61
	62	Permission to use, copy, modify, and distribute this software and its
	63	documentation for any purpose and without fee is hereby granted,
	64	provided that the above copyright notice appear in all copies and that
65	both that copyright notice and this permission notice appear in
66	supporting documentation, and that the name of IBM not be
67	used in advertising or publicity pertaining to distribution of the
68	software without specific, written prior permission.
69
70	IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
71	ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
72	IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
73	ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
74	WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
75	ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
76	SOFTWARE.
77
78	******************************************************************/
79
80	/*
81	* ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison
82	*/
83
84	#include <sys/param.h>
85	#include <sys/mbuf.h>
86	#include <sys/domain.h>
87	#include <sys/protosw.h>
88	#include <sys/socket.h>
89	#include <sys/socketvar.h>
90	#include <sys/errno.h>
91
92	#include <net/if.h>
93	#include <net/route.h>
94
95	#include <netiso/iso.h>
96	#include <netiso/clnp.h>
97	#include <netiso/clnp_stat.h>
98	#include <netiso/argo_debug.h>
99
100	#ifdef ARGO_DEBUG
101
102	#ifdef TESTDEBUG
103	#ifdef notdef
104	struct addr_37 u_37 = {
105	{0x00, 0x02, 0x00, 0x10, 0x20, 0x30, 0x35},
106	{0x01, 0x02, 0x03, 0x04, 0x50, 0x60, 0x70, 0x80, 0x90}
107	};
108	struct addr_osinet u_osinet = {
109	{0x00, 0x04},
110	{0x00, 0x02, 0x00, 0x01, 0x23, 0x42, 0x78, 0x20, 0x01, 0x05, 0x00}
111	};
112	#endif /* notdef */
113	struct addr_rfc986 u_rfc986 = {
114	{0x00, 0x06},
115	{0x01, 0xc0, 0x0c, 0x0c, 0xab, 0x11}
116	};
117	struct addr_rfc986 u_bad = {
118	{0x00, 0x01},
119	{0x01, 0xc0, 0x0c, 0x0c, 0xab, 0x11}
120	};
121	#include <stdio.h>
122	main()
123	{
124	struct iso_addr a;
125
126	a.isoa_afi = AFI_37;
127	a.isoa_u.addr_37 = u_37;
128	a.isoa_len = 17;
129	printf("type 37: %s\n", clnp_iso_addrp(&a));
130
131	a.isoa_afi = AFI_OSINET;
132	a.isoa_u.addr_osinet = u_osinet;
133	a.isoa_len = 14;
134	printf("type osinet: %s\n", clnp_iso_addrp(&a));
135
136	a.isoa_afi = AFI_RFC986;
137	a.isoa_u.addr_rfc986 = u_rfc986;
138	a.isoa_len = 9;
139	printf("type rfc986: %s\n", clnp_iso_addrp(&a));
140
141	a.isoa_afi = 12;
142	a.isoa_u.addr_rfc986 = u_rfc986;
143	a.isoa_len = 9;
144	printf("type bad afi: %s\n", clnp_iso_addrp(&a));
145
146	a.isoa_afi = AFI_RFC986;
147	a.isoa_u.addr_rfc986 = u_bad;
148	a.isoa_len = 9;
149	printf("type bad idi: %s\n", clnp_iso_addrp(&a));
150	}
151	#endif /* TESTDEBUG */
152
153	unsigned int clnp_debug;
154	static char letters[] = "0123456789abcdef";
155
156	/*
157	* Print buffer in hex, return addr of where we left off.
158	* Do not null terminate.
159	*/
160	char *
161	clnp_hexp(src, len, where)
162	char src; / src of data to print */
163	int len; /* lengthof src */
164	char where; / where to put data */
165	{
166	int i;
167
168	for (i=0; i<len; i++) {
169	register int j = ((u_char *)src)[i];
170	*where++ = letters[j >> 4];
171	*where++ = letters[j & 0x0f];
172	}
173	return where;
174	}
175
176	/*
177	* Return a ptr to a human readable form of an iso addr
178	*/
179	static char iso_addr_b[50];
180	#define DELIM '.';
181
182	char *
183	clnp_iso_addrp(isoa)
184	struct iso_addr *isoa;
185	{
186	char *cp;
187
188	/* print length */
189	sprintf(iso_addr_b, "[%d] ", isoa->isoa_len);
190
191	/* set cp to end of what we have */
192	cp = iso_addr_b;
193	while (*cp)
194	cp++;
195
196	/* print afi */
197	cp = clnp_hexp(isoa->isoa_genaddr, (int)isoa->isoa_len, cp);
198	#ifdef notdef
199	*cp++ = DELIM;
200
201	/* print type specific part */
202	switch(isoa->isoa_afi) {
203	case AFI_37:
204	cp = clnp_hexp(isoa->t37_idi, ADDR37_IDI_LEN, cp);
205	*cp++ = DELIM;
206	cp = clnp_hexp(isoa->t37_dsp, ADDR37_DSP_LEN, cp);
207	break;
208
209	/* case AFI_OSINET:*/
210	case AFI_RFC986: {
211	u_short idi;
212
213	/* osinet and rfc986 have idi in the same place */
214	/* print idi */
215	cp = clnp_hexp(isoa->rfc986_idi, ADDROSINET_IDI_LEN, cp);
216	*cp++ = DELIM;
217	CTOH(isoa->rfc986_idi[0], isoa->rfc986_idi[1], idi);
218
219	if (idi == IDI_OSINET) {
220	struct ovl_osinet oosi = (struct ovl_osinet )isoa;
221	cp = clnp_hexp(oosi->oosi_orgid, OVLOSINET_ORGID_LEN, cp);
222	*cp++ = DELIM;
223	cp = clnp_hexp(oosi->oosi_snetid, OVLOSINET_SNETID_LEN, cp);
224	*cp++ = DELIM;
225	cp = clnp_hexp(oosi->oosi_snpa, OVLOSINET_SNPA_LEN, cp);
226	*cp++ = DELIM;
227	cp = clnp_hexp(oosi->oosi_nsap, OVLOSINET_NSAP_LEN, cp);
228	} else if (idi == IDI_RFC986) {
229	struct ovl_rfc986 o986 = (struct ovl_rfc986 )isoa;
230	cp = clnp_hexp(&o986->o986_vers, 1, cp);
231	*cp++ = DELIM;
232	#ifdef vax
233	sprintf(cp, "%d.%d.%d.%d.%d",
234	o986->o986_inetaddr[0] & 0xff,
235	o986->o986_inetaddr[1] & 0xff,
236	o986->o986_inetaddr[2] & 0xff,
237	o986->o986_inetaddr[3] & 0xff,
238	o986->o986_upid & 0xff);
239	return(iso_addr_b);
240	#else
241	cp = clnp_hexp(&o986->o986_inetaddr[0], 1, cp);
242	*cp++ = DELIM;
243	cp = clnp_hexp(&o986->o986_inetaddr[1], 1, cp);
244	*cp++ = DELIM;
245	cp = clnp_hexp(&o986->o986_inetaddr[2], 1, cp);
246	*cp++ = DELIM;
247	cp = clnp_hexp(&o986->o986_inetaddr[3], 1, cp);
248	*cp++ = DELIM;
249	cp = clnp_hexp(&o986->o986_upid, 1, cp);
250	#endif /* vax */
251	}
252
253	} break;
254
255	default:
256	*cp++ = '?';
257	break;
258	}
259	#endif /* notdef */
260	*cp = (char)0;
261
262	return(iso_addr_b);
263	}
264
265	char *
266	clnp_saddr_isop(s)
267	register struct sockaddr_iso *s;
268	{
269	register char *cp = clnp_iso_addrp(&s->siso_addr);
270
271	while (*cp) cp++;
272	*cp++ = '(';
273	cp = clnp_hexp(TSEL(s), (int)s->siso_tlen, cp);
274	*cp++ = ')';
275	*cp++ = 0;
276	return (iso_addr_b);
277	}
278
279	#endif /* ARGO_DEBUG */