xref: /netbsd-src/lib/libc/rpc/svc_raw.c (revision e4d7c2e329d54c97e0c0bd3016bbe74f550c3d5e)
1 /*	$NetBSD: svc_raw.c,v 1.12 2000/01/22 22:19:18 mycroft Exp $	*/
2 
3 /*
4  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
5  * unrestricted use provided that this legend is included on all tape
6  * media and as a part of the software program in whole or part.  Users
7  * may copy or modify Sun RPC without charge, but are not authorized
8  * to license or distribute it to anyone else except as part of a product or
9  * program developed by the user.
10  *
11  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
12  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
13  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
14  *
15  * Sun RPC is provided with no support and without any obligation on the
16  * part of Sun Microsystems, Inc. to assist in its use, correction,
17  * modification or enhancement.
18  *
19  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
20  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
21  * OR ANY PART THEREOF.
22  *
23  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
24  * or profits or other special, indirect and consequential damages, even if
25  * Sun has been advised of the possibility of such damages.
26  *
27  * Sun Microsystems, Inc.
28  * 2550 Garcia Avenue
29  * Mountain View, California  94043
30  */
31 
32 #include <sys/cdefs.h>
33 #if defined(LIBC_SCCS) && !defined(lint)
34 #if 0
35 static char *sccsid = "@(#)svc_raw.c 1.15 87/08/11 Copyr 1984 Sun Micro";
36 static char *sccsid = "@(#)svc_raw.c	2.1 88/07/29 4.0 RPCSRC";
37 #else
38 __RCSID("$NetBSD: svc_raw.c,v 1.12 2000/01/22 22:19:18 mycroft Exp $");
39 #endif
40 #endif
41 
42 /*
43  * svc_raw.c,   This a toy for simple testing and timing.
44  * Interface to create an rpc client and server in the same UNIX process.
45  * This lets us similate rpc and get rpc (round trip) overhead, without
46  * any interference from the kernal.
47  *
48  * Copyright (C) 1984, Sun Microsystems, Inc.
49  */
50 
51 #include "namespace.h"
52 
53 #include <assert.h>
54 #include <stdlib.h>
55 
56 #include <rpc/rpc.h>
57 
58 #ifdef __weak_alias
59 __weak_alias(svcraw_create,_svcraw_create)
60 #endif
61 
62 /*
63  * This is the "network" that we will be moving data over
64  */
65 static struct svcraw_private {
66 	char	_raw_buf[UDPMSGSIZE];
67 	SVCXPRT	server;
68 	XDR	xdr_stream;
69 	char	verf_body[MAX_AUTH_BYTES];
70 } *svcraw_private;
71 
72 static enum xprt_stat svcraw_stat __P((SVCXPRT *));
73 static bool_t svcraw_recv __P((SVCXPRT *, struct rpc_msg *));
74 static bool_t svcraw_reply __P((SVCXPRT *, struct rpc_msg *));
75 static bool_t svcraw_getargs __P((SVCXPRT *, xdrproc_t, caddr_t));
76 static bool_t svcraw_freeargs __P((SVCXPRT *, xdrproc_t, caddr_t));
77 static void svcraw_destroy __P((SVCXPRT *));
78 
79 static const struct xp_ops server_ops = {
80 	svcraw_recv,
81 	svcraw_stat,
82 	svcraw_getargs,
83 	svcraw_reply,
84 	svcraw_freeargs,
85 	svcraw_destroy
86 };
87 
88 SVCXPRT *
89 svcraw_create()
90 {
91 	struct svcraw_private *srp = svcraw_private;
92 
93 	if (srp == 0) {
94 		srp = (struct svcraw_private *)calloc(1, sizeof (*srp));
95 		if (srp == 0)
96 			return (0);
97 	}
98 	srp->server.xp_sock = 0;
99 	srp->server.xp_port = 0;
100 	srp->server.xp_ops = &server_ops;
101 	srp->server.xp_verf.oa_base = srp->verf_body;
102 	xdrmem_create(&srp->xdr_stream, srp->_raw_buf, UDPMSGSIZE, XDR_FREE);
103 	return (&srp->server);
104 }
105 
106 /*ARGSUSED*/
107 static enum xprt_stat
108 svcraw_stat(xprt)
109 	SVCXPRT *xprt;
110 {
111 
112 	return (XPRT_IDLE);
113 }
114 
115 /* ARGSUSED */
116 static bool_t
117 svcraw_recv(xprt, msg)
118 	SVCXPRT *xprt;
119 	struct rpc_msg *msg;
120 {
121 	struct svcraw_private *srp = svcraw_private;
122 	XDR *xdrs;
123 
124 	_DIAGASSERT(xprt != NULL);
125 	_DIAGASSERT(msg != NULL);
126 
127 	if (srp == 0)
128 		return (0);
129 	xdrs = &srp->xdr_stream;
130 	xdrs->x_op = XDR_DECODE;
131 	XDR_SETPOS(xdrs, 0);
132 	if (! xdr_callmsg(xdrs, msg))
133 	       return (FALSE);
134 	return (TRUE);
135 }
136 
137 /* ARGSUSED */
138 static bool_t
139 svcraw_reply(xprt, msg)
140 	SVCXPRT *xprt;
141 	struct rpc_msg *msg;
142 {
143 	struct svcraw_private *srp = svcraw_private;
144 	XDR *xdrs;
145 
146 	_DIAGASSERT(xprt != NULL);
147 	_DIAGASSERT(msg != NULL);
148 
149 	if (srp == 0)
150 		return (FALSE);
151 	xdrs = &srp->xdr_stream;
152 	xdrs->x_op = XDR_ENCODE;
153 	XDR_SETPOS(xdrs, 0);
154 	if (! xdr_replymsg(xdrs, msg))
155 	       return (FALSE);
156 	(void)XDR_GETPOS(xdrs);  /* called just for overhead */
157 	return (TRUE);
158 }
159 
160 /* ARGSUSED */
161 static bool_t
162 svcraw_getargs(xprt, xdr_args, args_ptr)
163 	SVCXPRT *xprt;
164 	xdrproc_t xdr_args;
165 	caddr_t args_ptr;
166 {
167 	struct svcraw_private *srp = svcraw_private;
168 
169 	_DIAGASSERT(xprt != NULL);
170 	/* args_ptr may be NULL */
171 
172 	if (srp == 0)
173 		return (FALSE);
174 	return ((*xdr_args)(&srp->xdr_stream, args_ptr));
175 }
176 
177 /* ARGSUSED */
178 static bool_t
179 svcraw_freeargs(xprt, xdr_args, args_ptr)
180 	SVCXPRT *xprt;
181 	xdrproc_t xdr_args;
182 	caddr_t args_ptr;
183 {
184 	struct svcraw_private *srp = svcraw_private;
185 	XDR *xdrs;
186 
187 	_DIAGASSERT(xprt != NULL);
188 	/* args_ptr may be NULL */
189 
190 	if (srp == 0)
191 		return (FALSE);
192 	xdrs = &srp->xdr_stream;
193 	xdrs->x_op = XDR_FREE;
194 	return ((*xdr_args)(xdrs, args_ptr));
195 }
196 
197 /*ARGSUSED*/
198 static void
199 svcraw_destroy(xprt)
200 	SVCXPRT *xprt;
201 {
202 }
203