xref: /netbsd-src/external/bsd/tcpdump/dist/print-sunrpc.c (revision ccd9df534e375a4366c5b55f23782053c7a98d82)
1 /*
2  * Copyright (c) 1992, 1993, 1994, 1995, 1996
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that: (1) source code distributions
7  * retain the above copyright notice and this paragraph in its entirety, (2)
8  * distributions including binary code include the above copyright notice and
9  * this paragraph in its entirety in the documentation or other materials
10  * provided with the distribution, and (3) all advertising materials mentioning
11  * features or use of this software display the following acknowledgement:
12  * ``This product includes software developed by the University of California,
13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14  * the University nor the names of its contributors may be used to endorse
15  * or promote products derived from this software without specific prior
16  * written permission.
17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20  */
21 
22 #include <sys/cdefs.h>
23 #ifndef lint
24 __RCSID("$NetBSD: print-sunrpc.c,v 1.8 2023/08/17 20:19:40 christos Exp $");
25 #endif
26 
27 /* \summary: Sun Remote Procedure Call printer */
28 
29 #ifdef HAVE_CONFIG_H
30 #include <config.h>
31 #endif
32 
33 /*
34  * At least on HP-UX:
35  *
36  *	1) getrpcbynumber() is declared in <netdb.h>, not any of the RPC
37  *	   header files
38  *
39  * and
40  *
41  *	2) if _XOPEN_SOURCE_EXTENDED is defined, <netdb.h> doesn't declare
42  *	   it
43  *
44  * so we undefine it.
45  */
46 #undef _XOPEN_SOURCE_EXTENDED
47 
48 #include "netdissect-stdinc.h"
49 
50 #if defined(HAVE_GETRPCBYNUMBER) && defined(HAVE_RPC_RPC_H)
51 #include <rpc/rpc.h>
52 #ifdef HAVE_RPC_RPCENT_H
53 #include <rpc/rpcent.h>
54 #endif /* HAVE_RPC_RPCENT_H */
55 #endif /* defined(HAVE_GETRPCBYNUMBER) && defined(HAVE_RPC_RPC_H) */
56 
57 #include <stdio.h>
58 #include <string.h>
59 
60 #define ND_LONGJMP_FROM_TCHECK
61 #include "netdissect.h"
62 #include "addrtoname.h"
63 #include "extract.h"
64 
65 #include "ip.h"
66 #include "ip6.h"
67 
68 #include "rpc_auth.h"
69 #include "rpc_msg.h"
70 
71 /*
72  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
73  * unrestricted use provided that this legend is included on all tape
74  * media and as a part of the software program in whole or part.  Users
75  * may copy or modify Sun RPC without charge, but are not authorized
76  * to license or distribute it to anyone else except as part of a product or
77  * program developed by the user.
78  *
79  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
80  * WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
81  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
82  *
83  * Sun RPC is provided with no support and without any obligation on the
84  * part of Sun Microsystems, Inc. to assist in its use, correction,
85  * modification or enhancement.
86  *
87  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
88  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
89  * OR ANY PART THEREOF.
90  *
91  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
92  * or profits or other special, indirect and consequential damages, even if
93  * Sun has been advised of the possibility of such damages.
94  *
95  * Sun Microsystems, Inc.
96  * 2550 Garcia Avenue
97  * Mountain View, California  94043
98  *
99  *	from: @(#)pmap_prot.h 1.14 88/02/08 SMI
100  *	from: @(#)pmap_prot.h	2.1 88/07/29 4.0 RPCSRC
101  * $FreeBSD: src/include/rpc/pmap_prot.h,v 1.9.2.1 1999/08/29 14:39:05 peter Exp $
102  */
103 
104 /*
105  * pmap_prot.h
106  * Protocol for the local binder service, or pmap.
107  *
108  * Copyright (C) 1984, Sun Microsystems, Inc.
109  *
110  * The following procedures are supported by the protocol:
111  *
112  * PMAPPROC_NULL() returns ()
113  *	takes nothing, returns nothing
114  *
115  * PMAPPROC_SET(struct pmap) returns (bool_t)
116  *	TRUE is success, FALSE is failure.  Registers the tuple
117  *	[prog, vers, prot, port].
118  *
119  * PMAPPROC_UNSET(struct pmap) returns (bool_t)
120  *	TRUE is success, FALSE is failure.  Un-registers pair
121  *	[prog, vers].  prot and port are ignored.
122  *
123  * PMAPPROC_GETPORT(struct pmap) returns (long unsigned).
124  *	0 is failure.  Otherwise returns the port number where the pair
125  *	[prog, vers] is registered.  It may lie!
126  *
127  * PMAPPROC_DUMP() RETURNS (struct pmaplist *)
128  *
129  * PMAPPROC_CALLIT(unsigned, unsigned, unsigned, string<>)
130  *	RETURNS (port, string<>);
131  * usage: encapsulatedresults = PMAPPROC_CALLIT(prog, vers, proc, encapsulatedargs);
132  *	Calls the procedure on the local machine.  If it is not registered,
133  *	this procedure is quite; ie it does not return error information!!!
134  *	This procedure only is supported on rpc/udp and calls via
135  *	rpc/udp.  This routine only passes null authentication parameters.
136  *	This file has no interface to xdr routines for PMAPPROC_CALLIT.
137  *
138  * The service supports remote procedure calls on udp/ip or tcp/ip socket 111.
139  */
140 
141 #define SUNRPC_PMAPPORT		((uint16_t)111)
142 #define SUNRPC_PMAPPROC_NULL	((uint32_t)0)
143 #define SUNRPC_PMAPPROC_SET	((uint32_t)1)
144 #define SUNRPC_PMAPPROC_UNSET	((uint32_t)2)
145 #define SUNRPC_PMAPPROC_GETPORT	((uint32_t)3)
146 #define SUNRPC_PMAPPROC_DUMP	((uint32_t)4)
147 #define SUNRPC_PMAPPROC_CALLIT	((uint32_t)5)
148 
149 static const struct tok proc2str[] = {
150 	{ SUNRPC_PMAPPROC_NULL,		"null" },
151 	{ SUNRPC_PMAPPROC_SET,		"set" },
152 	{ SUNRPC_PMAPPROC_UNSET,	"unset" },
153 	{ SUNRPC_PMAPPROC_GETPORT,	"getport" },
154 	{ SUNRPC_PMAPPROC_DUMP,		"dump" },
155 	{ SUNRPC_PMAPPROC_CALLIT,	"call" },
156 	{ 0,				NULL }
157 };
158 
159 /* Forwards */
160 static char *progstr(uint32_t);
161 
162 void
163 sunrpc_print(netdissect_options *ndo, const u_char *bp,
164                     u_int length, const u_char *bp2)
165 {
166 	const struct sunrpc_msg *rp;
167 	const struct ip *ip;
168 	const struct ip6_hdr *ip6;
169 	uint32_t x;
170 	char srcid[20], dstid[20];	/*fits 32bit*/
171 
172 	ndo->ndo_protocol = "sunrpc";
173 	rp = (const struct sunrpc_msg *)bp;
174 	ND_TCHECK_SIZE(rp);
175 
176 	if (!ndo->ndo_nflag) {
177 		snprintf(srcid, sizeof(srcid), "0x%x",
178 		    GET_BE_U_4(rp->rm_xid));
179 		strlcpy(dstid, "sunrpc", sizeof(dstid));
180 	} else {
181 		snprintf(srcid, sizeof(srcid), "0x%x",
182 		    GET_BE_U_4(rp->rm_xid));
183 		snprintf(dstid, sizeof(dstid), "0x%x", SUNRPC_PMAPPORT);
184 	}
185 
186 	switch (IP_V((const struct ip *)bp2)) {
187 	case 4:
188 		ip = (const struct ip *)bp2;
189 		ND_PRINT("%s.%s > %s.%s: %u",
190 		    GET_IPADDR_STRING(ip->ip_src), srcid,
191 		    GET_IPADDR_STRING(ip->ip_dst), dstid, length);
192 		break;
193 	case 6:
194 		ip6 = (const struct ip6_hdr *)bp2;
195 		ND_PRINT("%s.%s > %s.%s: %u",
196 		    GET_IP6ADDR_STRING(ip6->ip6_src), srcid,
197 		    GET_IP6ADDR_STRING(ip6->ip6_dst), dstid, length);
198 		break;
199 	default:
200 		ND_PRINT("%s.%s > %s.%s: %u", "?", srcid, "?", dstid, length);
201 		break;
202 	}
203 
204 	ND_PRINT(" %s", tok2str(proc2str, " proc #%u",
205 	    GET_BE_U_4(rp->rm_call.cb_proc)));
206 	x = GET_BE_U_4(rp->rm_call.cb_rpcvers);
207 	if (x != SUNRPC_MSG_VERSION)
208 		ND_PRINT(" [rpcver %u]", x);
209 
210 	switch (GET_BE_U_4(rp->rm_call.cb_proc)) {
211 
212 	case SUNRPC_PMAPPROC_SET:
213 	case SUNRPC_PMAPPROC_UNSET:
214 	case SUNRPC_PMAPPROC_GETPORT:
215 	case SUNRPC_PMAPPROC_CALLIT:
216 		x = GET_BE_U_4(rp->rm_call.cb_prog);
217 		if (!ndo->ndo_nflag)
218 			ND_PRINT(" %s", progstr(x));
219 		else
220 			ND_PRINT(" %u", x);
221 		ND_PRINT(".%u", GET_BE_U_4(rp->rm_call.cb_vers));
222 		break;
223 	}
224 }
225 
226 static char *
227 progstr(uint32_t prog)
228 {
229 #if defined(HAVE_GETRPCBYNUMBER) && defined(HAVE_RPC_RPC_H)
230 	struct rpcent *rp;
231 #endif
232 	static char buf[32];
233 	static uint32_t lastprog = 0;
234 
235 	if (lastprog != 0 && prog == lastprog)
236 		return (buf);
237 #if defined(HAVE_GETRPCBYNUMBER) && defined(HAVE_RPC_RPC_H)
238 	rp = getrpcbynumber(prog);
239 	if (rp != NULL)
240 		strlcpy(buf, rp->r_name, sizeof(buf));
241 	else
242 #endif
243 		(void) snprintf(buf, sizeof(buf), "#%u", prog);
244 	lastprog = prog;
245 	return (buf);
246 }
247