2 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3 * unrestricted use provided that this legend is included on all tape
4 * media and as a part of the software program in whole or part. Users
5 * may copy or modify Sun RPC without charge, but are not authorized
6 * to license or distribute it to anyone else except as part of a product or
7 * program developed by the user.
9 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
10 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
11 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
13 * Sun RPC is provided with no support and without any obligation on the
14 * part of Sun Microsystems, Inc. to assist in its use, correction,
15 * modification or enhancement.
17 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
18 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
19 * OR ANY PART THEREOF.
21 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
22 * or profits or other special, indirect and consequential damages, even if
23 * Sun has been advised of the possibility of such damages.
25 * Sun Microsystems, Inc.
27 * Mountain View, California 94043
29 * @(#)svc_simple.c 1.18 87/08/11 Copyr 1984 Sun Micro
30 * @(#)svc_simple.c 2.2 88/08/01 4.0 RPCSRC
31 * $FreeBSD: src/lib/libc/rpc/svc_simple.c,v 1.9 1999/08/28 00:00:50 peter Exp $
32 * $DragonFly: src/lib/libc/rpc/svc_simple.c,v 1.3 2005/11/13 12:27:04 swildner Exp $
37 * Simplified front end to rpc.
39 * Copyright (C) 1984, Sun Microsystems, Inc.
46 #include <rpc/pmap_clnt.h>
47 #include <sys/socket.h>
50 static struct proglst
{
51 char *(*p_progname
)();
54 xdrproc_t p_inproc
, p_outproc
;
55 struct proglst
*p_nxt
;
57 static void universal();
58 static SVCXPRT
*transp
;
62 registerrpc(int prognum
, int versnum
, int procnum
, char *(*progname
)(),
63 xdrproc_t inproc
, xdrproc_t outproc
)
66 if (procnum
== NULLPROC
) {
68 "can't reassign procedure number %ld\n", NULLPROC
);
72 transp
= svcudp_create(RPC_ANYSOCK
);
74 fprintf(stderr
, "couldn't create an rpc server\n");
78 pmap_unset((u_long
)prognum
, (u_long
)versnum
);
79 if (!svc_register(transp
, (u_long
)prognum
, (u_long
)versnum
,
80 universal
, IPPROTO_UDP
)) {
81 fprintf(stderr
, "couldn't register prog %d vers %d\n",
85 pl
= (struct proglst
*)malloc(sizeof(struct proglst
));
87 fprintf(stderr
, "registerrpc: out of memory\n");
90 pl
->p_progname
= progname
;
91 pl
->p_prognum
= prognum
;
92 pl
->p_procnum
= procnum
;
93 pl
->p_inproc
= inproc
;
94 pl
->p_outproc
= outproc
;
101 universal(struct svc_req
*rqstp
, SVCXPRT
*transp
)
105 char xdrbuf
[UDPMSGSIZE
];
109 * enforce "procnum 0 is echo" convention
111 if (rqstp
->rq_proc
== NULLPROC
) {
112 if (svc_sendreply(transp
, xdr_void
, NULL
) == FALSE
) {
113 fprintf(stderr
, "xxx\n");
118 prog
= rqstp
->rq_prog
;
119 proc
= rqstp
->rq_proc
;
120 for (pl
= proglst
; pl
!= NULL
; pl
= pl
->p_nxt
)
121 if (pl
->p_prognum
== prog
&& pl
->p_procnum
== proc
) {
122 /* decode arguments into a CLEAN buffer */
123 memset(xdrbuf
, 0, sizeof(xdrbuf
)); /* required ! */
124 if (!svc_getargs(transp
, pl
->p_inproc
, xdrbuf
)) {
125 svcerr_decode(transp
);
128 outdata
= (*(pl
->p_progname
))(xdrbuf
);
129 if (outdata
== NULL
&& pl
->p_outproc
!= xdr_void
)
130 /* there was an error */
132 if (!svc_sendreply(transp
, pl
->p_outproc
, outdata
)) {
134 "trouble replying to prog %d\n",
138 /* free the decoded arguments */
139 svc_freeargs(transp
, pl
->p_inproc
, xdrbuf
);
142 fprintf(stderr
, "never registered prog %d\n", prog
);