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
149static 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 */
160static char *progstr(uint32_t);
161
162void
163sunrpc_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
226static char *
227progstr(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