nfs_prot_svc.c revision 119679
1/*
2 * Copyright (c) 1997-2003 Erez Zadok
3 * Copyright (c) 1989 Jan-Simon Pendry
4 * Copyright (c) 1989 Imperial College of Science, Technology & Medicine
5 * Copyright (c) 1989 The Regents of the University of California.
6 * All rights reserved.
7 *
8 * This code is derived from software contributed to Berkeley by
9 * Jan-Simon Pendry at Imperial College, London.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 *    notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 *    notice, this list of conditions and the following disclaimer in the
18 *    documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 *    must display the following acknowledgment:
21 *      This product includes software developed by the University of
22 *      California, Berkeley and its contributors.
23 * 4. Neither the name of the University nor the names of its contributors
24 *    may be used to endorse or promote products derived from this software
25 *    without specific prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 * SUCH DAMAGE.
38 *
39 *      %W% (Berkeley) %G%
40 *
41 * $Id: nfs_prot_svc.c,v 1.5.2.4 2002/12/27 22:44:39 ezk Exp $
42 *
43 */
44
45#ifdef HAVE_CONFIG_H
46# include <config.h>
47#endif /* HAVE_CONFIG_H */
48#include <am_defs.h>
49#include <amd.h>
50
51/* external definitions */
52extern voidp nfsproc_null_2_svc(voidp, struct svc_req *);
53extern nfsattrstat *nfsproc_getattr_2_svc(am_nfs_fh *, struct svc_req *);
54extern nfsattrstat *nfsproc_setattr_2_svc(nfssattrargs *, struct svc_req *);
55extern voidp nfsproc_root_2_svc(voidp, struct svc_req *);
56extern nfsdiropres *nfsproc_lookup_2_svc(nfsdiropargs *, struct svc_req *);
57extern nfsreadlinkres *nfsproc_readlink_2_svc(am_nfs_fh *, struct svc_req *);
58extern nfsreadres *nfsproc_read_2_svc(nfsreadargs *, struct svc_req *);
59extern voidp nfsproc_writecache_2_svc(voidp, struct svc_req *);
60extern nfsattrstat *nfsproc_write_2_svc(nfswriteargs *, struct svc_req *);
61extern nfsdiropres *nfsproc_create_2_svc(nfscreateargs *, struct svc_req *);
62extern nfsstat *nfsproc_remove_2_svc(nfsdiropargs *, struct svc_req *);
63extern nfsstat *nfsproc_rename_2_svc(nfsrenameargs *, struct svc_req *);
64extern nfsstat *nfsproc_link_2_svc(nfslinkargs *, struct svc_req *);
65extern nfsstat *nfsproc_symlink_2_svc(nfssymlinkargs *, struct svc_req *);
66extern nfsdiropres *nfsproc_mkdir_2_svc(nfscreateargs *, struct svc_req *);
67extern nfsstat *nfsproc_rmdir_2_svc(nfsdiropargs *, struct svc_req *);
68extern nfsreaddirres *nfsproc_readdir_2_svc(nfsreaddirargs *, struct svc_req *);
69extern nfsstatfsres *nfsproc_statfs_2_svc(am_nfs_fh *, struct svc_req *);
70
71/* global variables */
72SVCXPRT *nfs_program_2_transp;
73
74/* typedefs */
75typedef char *(*nfssvcproc_t)(voidp, struct svc_req *);
76
77
78void
79nfs_program_2(struct svc_req *rqstp, SVCXPRT *transp)
80{
81  union {
82    am_nfs_fh		nfsproc_getattr_2_arg;
83    nfssattrargs	nfsproc_setattr_2_arg;
84    nfsdiropargs	nfsproc_lookup_2_arg;
85    am_nfs_fh		nfsproc_readlink_2_arg;
86    nfsreadargs		nfsproc_read_2_arg;
87    nfswriteargs	nfsproc_write_2_arg;
88    nfscreateargs	nfsproc_create_2_arg;
89    nfsdiropargs	nfsproc_remove_2_arg;
90    nfsrenameargs	nfsproc_rename_2_arg;
91    nfslinkargs		nfsproc_link_2_arg;
92    nfssymlinkargs	nfsproc_symlink_2_arg;
93    nfscreateargs	nfsproc_mkdir_2_arg;
94    nfsdiropargs	fsproc_rmdir_2_arg;
95    nfsreaddirargs	nfsproc_readdir_2_arg;
96    am_nfs_fh		nfsproc_statfs_2_arg;
97  } argument;
98  char *result;
99  xdrproc_t xdr_argument, xdr_result;
100  nfssvcproc_t local;
101  struct sockaddr_in *sinp;
102  char dq[20], dq2[28];
103
104  sinp = amu_svc_getcaller(rqstp->rq_xprt);
105#ifdef MNT2_NFS_OPT_RESVPORT
106  /* Verify that the request comes from a reserved port */
107  if (ntohs(sinp->sin_port) >= IPPORT_RESERVED) {
108    plog(XLOG_WARNING, "ignoring request from %s:%u, port not reserved",
109	 inet_dquad(dq, sinp->sin_addr.s_addr),
110	 ntohs(sinp->sin_port));
111    return;
112  }
113#endif /* MNT2_NFS_OPT_RESVPORT */
114  /* if the address does not match, ignore the request */
115  if (sinp->sin_addr.s_addr && sinp->sin_addr.s_addr != myipaddr.s_addr) {
116    plog(XLOG_WARNING, "ignoring request from %s:%u, expected %s",
117	 inet_dquad(dq, sinp->sin_addr.s_addr),
118	 ntohs(sinp->sin_port),
119	 inet_dquad(dq2, myipaddr.s_addr));
120    return;
121  }
122
123  nfs_program_2_transp = NULL;
124
125  switch (rqstp->rq_proc) {
126
127  case NFSPROC_NULL:
128    xdr_argument = (xdrproc_t) xdr_void;
129    xdr_result = (xdrproc_t) xdr_void;
130    local = (nfssvcproc_t) nfsproc_null_2_svc;
131    break;
132
133  case NFSPROC_GETATTR:
134    xdr_argument = (xdrproc_t) xdr_nfs_fh;
135    xdr_result = (xdrproc_t) xdr_attrstat;
136    local = (nfssvcproc_t) nfsproc_getattr_2_svc;
137    break;
138
139  case NFSPROC_SETATTR:
140    xdr_argument = (xdrproc_t) xdr_sattrargs;
141    xdr_result = (xdrproc_t) xdr_attrstat;
142    local = (nfssvcproc_t) nfsproc_setattr_2_svc;
143    break;
144
145  case NFSPROC_ROOT:
146    xdr_argument = (xdrproc_t) xdr_void;
147    xdr_result = (xdrproc_t) xdr_void;
148    local = (nfssvcproc_t) nfsproc_root_2_svc;
149    break;
150
151  case NFSPROC_LOOKUP:
152    xdr_argument = (xdrproc_t) xdr_diropargs;
153    xdr_result = (xdrproc_t) xdr_diropres;
154    local = (nfssvcproc_t) nfsproc_lookup_2_svc;
155    /*
156     * Cheap way to pass transp down to amfs_auto_lookuppn so it can
157     * be stored in the am_node structure and later used for
158     * quick_reply().
159     */
160    nfs_program_2_transp = transp;
161    break;
162
163  case NFSPROC_READLINK:
164    xdr_argument = (xdrproc_t) xdr_nfs_fh;
165    xdr_result = (xdrproc_t) xdr_readlinkres;
166    local = (nfssvcproc_t) nfsproc_readlink_2_svc;
167    break;
168
169  case NFSPROC_READ:
170    xdr_argument = (xdrproc_t) xdr_readargs;
171    xdr_result = (xdrproc_t) xdr_readres;
172    local = (nfssvcproc_t) nfsproc_read_2_svc;
173    break;
174
175  case NFSPROC_WRITECACHE:
176    xdr_argument = (xdrproc_t) xdr_void;
177    xdr_result = (xdrproc_t) xdr_void;
178    local = (nfssvcproc_t) nfsproc_writecache_2_svc;
179    break;
180
181  case NFSPROC_WRITE:
182    xdr_argument = (xdrproc_t) xdr_writeargs;
183    xdr_result = (xdrproc_t) xdr_attrstat;
184    local = (nfssvcproc_t) nfsproc_write_2_svc;
185    break;
186
187  case NFSPROC_CREATE:
188    xdr_argument = (xdrproc_t) xdr_createargs;
189    xdr_result = (xdrproc_t) xdr_diropres;
190    local = (nfssvcproc_t) nfsproc_create_2_svc;
191    break;
192
193  case NFSPROC_REMOVE:
194    xdr_argument = (xdrproc_t) xdr_diropargs;
195    xdr_result = (xdrproc_t) xdr_nfsstat;
196    local = (nfssvcproc_t) nfsproc_remove_2_svc;
197    break;
198
199  case NFSPROC_RENAME:
200    xdr_argument = (xdrproc_t) xdr_renameargs;
201    xdr_result = (xdrproc_t) xdr_nfsstat;
202    local = (nfssvcproc_t) nfsproc_rename_2_svc;
203    break;
204
205  case NFSPROC_LINK:
206    xdr_argument = (xdrproc_t) xdr_linkargs;
207    xdr_result = (xdrproc_t) xdr_nfsstat;
208    local = (nfssvcproc_t) nfsproc_link_2_svc;
209    break;
210
211  case NFSPROC_SYMLINK:
212    xdr_argument = (xdrproc_t) xdr_symlinkargs;
213    xdr_result = (xdrproc_t) xdr_nfsstat;
214    local = (nfssvcproc_t) nfsproc_symlink_2_svc;
215    break;
216
217  case NFSPROC_MKDIR:
218    xdr_argument = (xdrproc_t) xdr_createargs;
219    xdr_result = (xdrproc_t) xdr_diropres;
220    local = (nfssvcproc_t) nfsproc_mkdir_2_svc;
221    break;
222
223  case NFSPROC_RMDIR:
224    xdr_argument = (xdrproc_t) xdr_diropargs;
225    xdr_result = (xdrproc_t) xdr_nfsstat;
226    local = (nfssvcproc_t) nfsproc_rmdir_2_svc;
227    break;
228
229  case NFSPROC_READDIR:
230    xdr_argument = (xdrproc_t) xdr_readdirargs;
231    xdr_result = (xdrproc_t) xdr_readdirres;
232    local = (nfssvcproc_t) nfsproc_readdir_2_svc;
233    break;
234
235  case NFSPROC_STATFS:
236    xdr_argument = (xdrproc_t) xdr_nfs_fh;
237    xdr_result = (xdrproc_t) xdr_statfsres;
238    local = (nfssvcproc_t) nfsproc_statfs_2_svc;
239    break;
240
241  default:
242    svcerr_noproc(transp);
243    return;
244  }
245
246  memset((char *) &argument, 0, sizeof(argument));
247  if (!svc_getargs(transp,
248		   (XDRPROC_T_TYPE) xdr_argument,
249		   (SVC_IN_ARG_TYPE) &argument)) {
250    plog(XLOG_ERROR,
251	 "NFS xdr decode failed for %d %d %d",
252	 (int) rqstp->rq_prog, (int) rqstp->rq_vers, (int) rqstp->rq_proc);
253    svcerr_decode(transp);
254    return;
255  }
256  result = (*local) (&argument, rqstp);
257
258  nfs_program_2_transp = NULL;
259
260  if (result != NULL && !svc_sendreply(transp,
261				       (XDRPROC_T_TYPE) xdr_result,
262				       result)) {
263    svcerr_systemerr(transp);
264  }
265  if (!svc_freeargs(transp,
266		    (XDRPROC_T_TYPE) xdr_argument,
267		    (SVC_IN_ARG_TYPE) & argument)) {
268    plog(XLOG_FATAL, "unable to free rpc arguments in nfs_program_2");
269    going_down(1);
270  }
271}
272