nfs_prot_svc.c revision 302408
1/* 2 * Copyright (c) 1997-2006 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 * 40 * File: am-utils/amd/nfs_prot_svc.c 41 * 42 */ 43 44#ifdef HAVE_CONFIG_H 45# include <config.h> 46#endif /* HAVE_CONFIG_H */ 47#include <am_defs.h> 48#include <amd.h> 49 50/* external definitions */ 51extern voidp nfsproc_null_2_svc(voidp, struct svc_req *); 52extern nfsattrstat *nfsproc_getattr_2_svc(am_nfs_fh *, struct svc_req *); 53extern nfsattrstat *nfsproc_setattr_2_svc(nfssattrargs *, struct svc_req *); 54extern voidp nfsproc_root_2_svc(voidp, struct svc_req *); 55extern nfsdiropres *nfsproc_lookup_2_svc(nfsdiropargs *, struct svc_req *); 56extern nfsreadlinkres *nfsproc_readlink_2_svc(am_nfs_fh *, struct svc_req *); 57extern nfsreadres *nfsproc_read_2_svc(nfsreadargs *, struct svc_req *); 58extern voidp nfsproc_writecache_2_svc(voidp, struct svc_req *); 59extern nfsattrstat *nfsproc_write_2_svc(nfswriteargs *, struct svc_req *); 60extern nfsdiropres *nfsproc_create_2_svc(nfscreateargs *, struct svc_req *); 61extern nfsstat *nfsproc_remove_2_svc(nfsdiropargs *, struct svc_req *); 62extern nfsstat *nfsproc_rename_2_svc(nfsrenameargs *, struct svc_req *); 63extern nfsstat *nfsproc_link_2_svc(nfslinkargs *, struct svc_req *); 64extern nfsstat *nfsproc_symlink_2_svc(nfssymlinkargs *, struct svc_req *); 65extern nfsdiropres *nfsproc_mkdir_2_svc(nfscreateargs *, struct svc_req *); 66extern nfsstat *nfsproc_rmdir_2_svc(nfsdiropargs *, struct svc_req *); 67extern nfsreaddirres *nfsproc_readdir_2_svc(nfsreaddirargs *, struct svc_req *); 68extern nfsstatfsres *nfsproc_statfs_2_svc(am_nfs_fh *, struct svc_req *); 69 70/* global variables */ 71SVCXPRT *current_transp; 72 73/* typedefs */ 74typedef char *(*nfssvcproc_t)(voidp, struct svc_req *); 75 76 77void 78nfs_program_2(struct svc_req *rqstp, SVCXPRT *transp) 79{ 80 union { 81 am_nfs_fh nfsproc_getattr_2_arg; 82 nfssattrargs nfsproc_setattr_2_arg; 83 nfsdiropargs nfsproc_lookup_2_arg; 84 am_nfs_fh nfsproc_readlink_2_arg; 85 nfsreadargs nfsproc_read_2_arg; 86 nfswriteargs nfsproc_write_2_arg; 87 nfscreateargs nfsproc_create_2_arg; 88 nfsdiropargs nfsproc_remove_2_arg; 89 nfsrenameargs nfsproc_rename_2_arg; 90 nfslinkargs nfsproc_link_2_arg; 91 nfssymlinkargs nfsproc_symlink_2_arg; 92 nfscreateargs nfsproc_mkdir_2_arg; 93 nfsdiropargs fsproc_rmdir_2_arg; 94 nfsreaddirargs nfsproc_readdir_2_arg; 95 am_nfs_fh nfsproc_statfs_2_arg; 96 } argument; 97 char *result; 98 xdrproc_t xdr_argument, xdr_result; 99 nfssvcproc_t local; 100 101#ifdef HAVE_TRANSPORT_TYPE_TLI 102 /* 103 * On TLI systems we don't use an INET network type, but a "ticlts" (see 104 * /etc/netconfig and conf/transp_tli.c:create_nfs_service). This means 105 * that packets could only come from the loopback interface, and we don't 106 * need to check them and filter possibly spoofed packets. Therefore we 107 * only need to check if the UID caller is correct. 108 */ 109# ifdef HAVE___RPC_GET_LOCAL_UID 110 uid_t u; 111 /* extern definition for an internal libnsl function */ 112 extern int __rpc_get_local_uid(SVCXPRT *transp, uid_t *uid); 113 if (__rpc_get_local_uid(transp, &u) >= 0 && u != 0) { 114 plog(XLOG_WARNING, "ignoring request from UID %ld, must be 0", (long) u); 115 return; 116 } 117# else /* not HAVE___RPC_GET_LOCAL_UID */ 118 dlog("cannot verify local uid for rpc request"); 119# endif /* HAVE___RPC_GET_LOCAL_UID */ 120#else /* not HAVE_TRANPORT_TYPE_TLI */ 121 struct sockaddr_in *sinp; 122 char dq[20], dq2[28]; 123 sinp = amu_svc_getcaller(rqstp->rq_xprt); 124# ifdef MNT2_NFS_OPT_RESVPORT 125 /* Verify that the request comes from a reserved port */ 126 if (sinp && 127 ntohs(sinp->sin_port) >= IPPORT_RESERVED && 128 !(gopt.flags & CFM_NFS_INSECURE_PORT)) { 129 plog(XLOG_WARNING, "ignoring request from %s:%u, port not reserved", 130 inet_dquad(dq, sizeof(dq), sinp->sin_addr.s_addr), 131 ntohs(sinp->sin_port)); 132 return; 133 } 134# endif /* MNT2_NFS_OPT_RESVPORT */ 135 /* if the address does not match, ignore the request */ 136 if (sinp && (sinp->sin_addr.s_addr != myipaddr.s_addr)) { 137 if (gopt.flags & CFM_NFS_ANY_INTERFACE) { 138 if (!is_interface_local(sinp->sin_addr.s_addr)) { 139 plog(XLOG_WARNING, "ignoring request from %s:%u, not a local interface", 140 inet_dquad(dq, sizeof(dq), sinp->sin_addr.s_addr), 141 ntohs(sinp->sin_port)); 142 } 143 } else { 144 plog(XLOG_WARNING, "ignoring request from %s:%u, expected %s", 145 inet_dquad(dq, sizeof(dq), sinp->sin_addr.s_addr), 146 ntohs(sinp->sin_port), 147 inet_dquad(dq2, sizeof(dq2), myipaddr.s_addr)); 148 return; 149 } 150 } 151#endif /* not HAVE_TRANPORT_TYPE_TLI */ 152 153 current_transp = NULL; 154 155 switch (rqstp->rq_proc) { 156 157 case NFSPROC_NULL: 158 xdr_argument = (xdrproc_t) xdr_void; 159 xdr_result = (xdrproc_t) xdr_void; 160 local = (nfssvcproc_t) nfsproc_null_2_svc; 161 break; 162 163 case NFSPROC_GETATTR: 164 xdr_argument = (xdrproc_t) xdr_nfs_fh; 165 xdr_result = (xdrproc_t) xdr_attrstat; 166 local = (nfssvcproc_t) nfsproc_getattr_2_svc; 167 break; 168 169 case NFSPROC_SETATTR: 170 xdr_argument = (xdrproc_t) xdr_sattrargs; 171 xdr_result = (xdrproc_t) xdr_attrstat; 172 local = (nfssvcproc_t) nfsproc_setattr_2_svc; 173 break; 174 175 case NFSPROC_ROOT: 176 xdr_argument = (xdrproc_t) xdr_void; 177 xdr_result = (xdrproc_t) xdr_void; 178 local = (nfssvcproc_t) nfsproc_root_2_svc; 179 break; 180 181 case NFSPROC_LOOKUP: 182 xdr_argument = (xdrproc_t) xdr_diropargs; 183 xdr_result = (xdrproc_t) xdr_diropres; 184 local = (nfssvcproc_t) nfsproc_lookup_2_svc; 185 /* 186 * Cheap way to pass transp down to amfs_auto_lookuppn so it can 187 * be stored in the am_node structure and later used for 188 * quick_reply(). 189 */ 190 current_transp = transp; 191 break; 192 193 case NFSPROC_READLINK: 194 xdr_argument = (xdrproc_t) xdr_nfs_fh; 195 xdr_result = (xdrproc_t) xdr_readlinkres; 196 local = (nfssvcproc_t) nfsproc_readlink_2_svc; 197 break; 198 199 case NFSPROC_READ: 200 xdr_argument = (xdrproc_t) xdr_readargs; 201 xdr_result = (xdrproc_t) xdr_readres; 202 local = (nfssvcproc_t) nfsproc_read_2_svc; 203 break; 204 205 case NFSPROC_WRITECACHE: 206 xdr_argument = (xdrproc_t) xdr_void; 207 xdr_result = (xdrproc_t) xdr_void; 208 local = (nfssvcproc_t) nfsproc_writecache_2_svc; 209 break; 210 211 case NFSPROC_WRITE: 212 xdr_argument = (xdrproc_t) xdr_writeargs; 213 xdr_result = (xdrproc_t) xdr_attrstat; 214 local = (nfssvcproc_t) nfsproc_write_2_svc; 215 break; 216 217 case NFSPROC_CREATE: 218 xdr_argument = (xdrproc_t) xdr_createargs; 219 xdr_result = (xdrproc_t) xdr_diropres; 220 local = (nfssvcproc_t) nfsproc_create_2_svc; 221 break; 222 223 case NFSPROC_REMOVE: 224 xdr_argument = (xdrproc_t) xdr_diropargs; 225 xdr_result = (xdrproc_t) xdr_nfsstat; 226 local = (nfssvcproc_t) nfsproc_remove_2_svc; 227 break; 228 229 case NFSPROC_RENAME: 230 xdr_argument = (xdrproc_t) xdr_renameargs; 231 xdr_result = (xdrproc_t) xdr_nfsstat; 232 local = (nfssvcproc_t) nfsproc_rename_2_svc; 233 break; 234 235 case NFSPROC_LINK: 236 xdr_argument = (xdrproc_t) xdr_linkargs; 237 xdr_result = (xdrproc_t) xdr_nfsstat; 238 local = (nfssvcproc_t) nfsproc_link_2_svc; 239 break; 240 241 case NFSPROC_SYMLINK: 242 xdr_argument = (xdrproc_t) xdr_symlinkargs; 243 xdr_result = (xdrproc_t) xdr_nfsstat; 244 local = (nfssvcproc_t) nfsproc_symlink_2_svc; 245 break; 246 247 case NFSPROC_MKDIR: 248 xdr_argument = (xdrproc_t) xdr_createargs; 249 xdr_result = (xdrproc_t) xdr_diropres; 250 local = (nfssvcproc_t) nfsproc_mkdir_2_svc; 251 break; 252 253 case NFSPROC_RMDIR: 254 xdr_argument = (xdrproc_t) xdr_diropargs; 255 xdr_result = (xdrproc_t) xdr_nfsstat; 256 local = (nfssvcproc_t) nfsproc_rmdir_2_svc; 257 break; 258 259 case NFSPROC_READDIR: 260 xdr_argument = (xdrproc_t) xdr_readdirargs; 261 xdr_result = (xdrproc_t) xdr_readdirres; 262 local = (nfssvcproc_t) nfsproc_readdir_2_svc; 263 break; 264 265 case NFSPROC_STATFS: 266 xdr_argument = (xdrproc_t) xdr_nfs_fh; 267 xdr_result = (xdrproc_t) xdr_statfsres; 268 local = (nfssvcproc_t) nfsproc_statfs_2_svc; 269 break; 270 271 default: 272 svcerr_noproc(transp); 273 return; 274 } 275 276 memset((char *) &argument, 0, sizeof(argument)); 277 if (!svc_getargs(transp, 278 (XDRPROC_T_TYPE) xdr_argument, 279 (SVC_IN_ARG_TYPE) &argument)) { 280 plog(XLOG_ERROR, 281 "NFS xdr decode failed for %d %d %d", 282 (int) rqstp->rq_prog, (int) rqstp->rq_vers, (int) rqstp->rq_proc); 283 svcerr_decode(transp); 284 return; 285 } 286 result = (*local) (&argument, rqstp); 287 288 current_transp = NULL; 289 290 if (result != NULL && !svc_sendreply(transp, 291 (XDRPROC_T_TYPE) xdr_result, 292 result)) { 293 svcerr_systemerr(transp); 294 } 295 if (!svc_freeargs(transp, 296 (XDRPROC_T_TYPE) xdr_argument, 297 (SVC_IN_ARG_TYPE) & argument)) { 298 plog(XLOG_FATAL, "unable to free rpc arguments in nfs_program_2"); 299 going_down(1); 300 } 301} 302