nfs_subs.c revision 1.1.1.3
1 /* 2 * Copyright (c) 1989, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Rick Macklem at The University of Guelph. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed by the University of 19 * California, Berkeley and its contributors. 20 * 4. Neither the name of the University nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 * 36 * @(#)nfs_subs.c 8.8 (Berkeley) 5/22/95 37 */ 38 39 40 /* 41 * These functions support the macros and help fiddle mbuf chains for 42 * the nfs op functions. They do things like create the rpc header and 43 * copy data between mbuf chains and uio lists. 44 */ 45 #include <sys/param.h> 46 #include <sys/proc.h> 47 #include <sys/systm.h> 48 #include <sys/kernel.h> 49 #include <sys/mount.h> 50 #include <sys/vnode.h> 51 #include <sys/namei.h> 52 #include <sys/mbuf.h> 53 #include <sys/socket.h> 54 #include <sys/stat.h> 55 #include <sys/malloc.h> 56 #ifdef VFS_LKM 57 #include <sys/sysent.h> 58 #include <sys/syscall.h> 59 #endif 60 61 #include <vm/vm.h> 62 63 #include <nfs/rpcv2.h> 64 #include <nfs/nfsproto.h> 65 #include <nfs/nfsnode.h> 66 #include <nfs/nfs.h> 67 #include <nfs/xdr_subs.h> 68 #include <nfs/nfsm_subs.h> 69 #include <nfs/nfsmount.h> 70 #include <nfs/nqnfs.h> 71 #include <nfs/nfsrtt.h> 72 73 #include <miscfs/specfs/specdev.h> 74 75 #include <netinet/in.h> 76 #ifdef ISO 77 #include <netiso/iso.h> 78 #endif 79 80 /* 81 * Data items converted to xdr at startup, since they are constant 82 * This is kinda hokey, but may save a little time doing byte swaps 83 */ 84 u_long nfs_xdrneg1; 85 u_long rpc_call, rpc_vers, rpc_reply, rpc_msgdenied, rpc_autherr, 86 rpc_mismatch, rpc_auth_unix, rpc_msgaccepted, 87 rpc_auth_kerb; 88 u_long nfs_prog, nqnfs_prog, nfs_true, nfs_false; 89 90 /* And other global data */ 91 static u_long nfs_xid = 0; 92 enum vtype nv2tov_type[8] = { VNON, VREG, VDIR, VBLK, VCHR, VLNK, VNON, VNON }; 93 enum vtype nv3tov_type[8]={ VNON, VREG, VDIR, VBLK, VCHR, VLNK, VSOCK, VFIFO }; 94 int nfs_mount_type; 95 int nfs_ticks; 96 97 /* 98 * Mapping of old NFS Version 2 RPC numbers to generic numbers. 99 */ 100 int nfsv3_procid[NFS_NPROCS] = { 101 NFSPROC_NULL, 102 NFSPROC_GETATTR, 103 NFSPROC_SETATTR, 104 NFSPROC_NOOP, 105 NFSPROC_LOOKUP, 106 NFSPROC_READLINK, 107 NFSPROC_READ, 108 NFSPROC_NOOP, 109 NFSPROC_WRITE, 110 NFSPROC_CREATE, 111 NFSPROC_REMOVE, 112 NFSPROC_RENAME, 113 NFSPROC_LINK, 114 NFSPROC_SYMLINK, 115 NFSPROC_MKDIR, 116 NFSPROC_RMDIR, 117 NFSPROC_READDIR, 118 NFSPROC_FSSTAT, 119 NFSPROC_NOOP, 120 NFSPROC_NOOP, 121 NFSPROC_NOOP, 122 NFSPROC_NOOP, 123 NFSPROC_NOOP, 124 NFSPROC_NOOP, 125 NFSPROC_NOOP, 126 NFSPROC_NOOP 127 }; 128 129 /* 130 * and the reverse mapping from generic to Version 2 procedure numbers 131 */ 132 int nfsv2_procid[NFS_NPROCS] = { 133 NFSV2PROC_NULL, 134 NFSV2PROC_GETATTR, 135 NFSV2PROC_SETATTR, 136 NFSV2PROC_LOOKUP, 137 NFSV2PROC_NOOP, 138 NFSV2PROC_READLINK, 139 NFSV2PROC_READ, 140 NFSV2PROC_WRITE, 141 NFSV2PROC_CREATE, 142 NFSV2PROC_MKDIR, 143 NFSV2PROC_SYMLINK, 144 NFSV2PROC_CREATE, 145 NFSV2PROC_REMOVE, 146 NFSV2PROC_RMDIR, 147 NFSV2PROC_RENAME, 148 NFSV2PROC_LINK, 149 NFSV2PROC_READDIR, 150 NFSV2PROC_NOOP, 151 NFSV2PROC_STATFS, 152 NFSV2PROC_NOOP, 153 NFSV2PROC_NOOP, 154 NFSV2PROC_NOOP, 155 NFSV2PROC_NOOP, 156 NFSV2PROC_NOOP, 157 NFSV2PROC_NOOP, 158 NFSV2PROC_NOOP, 159 }; 160 161 /* 162 * Maps errno values to nfs error numbers. 163 * Use NFSERR_IO as the catch all for ones not specifically defined in 164 * RFC 1094. 165 */ 166 static u_char nfsrv_v2errmap[ELAST] = { 167 NFSERR_PERM, NFSERR_NOENT, NFSERR_IO, NFSERR_IO, NFSERR_IO, 168 NFSERR_NXIO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 169 NFSERR_IO, NFSERR_IO, NFSERR_ACCES, NFSERR_IO, NFSERR_IO, 170 NFSERR_IO, NFSERR_EXIST, NFSERR_IO, NFSERR_NODEV, NFSERR_NOTDIR, 171 NFSERR_ISDIR, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 172 NFSERR_IO, NFSERR_FBIG, NFSERR_NOSPC, NFSERR_IO, NFSERR_ROFS, 173 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 174 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 175 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 176 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 177 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 178 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 179 NFSERR_IO, NFSERR_IO, NFSERR_NAMETOL, NFSERR_IO, NFSERR_IO, 180 NFSERR_NOTEMPTY, NFSERR_IO, NFSERR_IO, NFSERR_DQUOT, NFSERR_STALE, 181 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 182 NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, NFSERR_IO, 183 NFSERR_IO, 184 }; 185 186 /* 187 * Maps errno values to nfs error numbers. 188 * Although it is not obvious whether or not NFS clients really care if 189 * a returned error value is in the specified list for the procedure, the 190 * safest thing to do is filter them appropriately. For Version 2, the 191 * X/Open XNFS document is the only specification that defines error values 192 * for each RPC (The RFC simply lists all possible error values for all RPCs), 193 * so I have decided to not do this for Version 2. 194 * The first entry is the default error return and the rest are the valid 195 * errors for that RPC in increasing numeric order. 196 */ 197 static short nfsv3err_null[] = { 198 0, 199 0, 200 }; 201 202 static short nfsv3err_getattr[] = { 203 NFSERR_IO, 204 NFSERR_IO, 205 NFSERR_STALE, 206 NFSERR_BADHANDLE, 207 NFSERR_SERVERFAULT, 208 0, 209 }; 210 211 static short nfsv3err_setattr[] = { 212 NFSERR_IO, 213 NFSERR_PERM, 214 NFSERR_IO, 215 NFSERR_ACCES, 216 NFSERR_INVAL, 217 NFSERR_NOSPC, 218 NFSERR_ROFS, 219 NFSERR_DQUOT, 220 NFSERR_STALE, 221 NFSERR_BADHANDLE, 222 NFSERR_NOT_SYNC, 223 NFSERR_SERVERFAULT, 224 0, 225 }; 226 227 static short nfsv3err_lookup[] = { 228 NFSERR_IO, 229 NFSERR_NOENT, 230 NFSERR_IO, 231 NFSERR_ACCES, 232 NFSERR_NOTDIR, 233 NFSERR_NAMETOL, 234 NFSERR_STALE, 235 NFSERR_BADHANDLE, 236 NFSERR_SERVERFAULT, 237 0, 238 }; 239 240 static short nfsv3err_access[] = { 241 NFSERR_IO, 242 NFSERR_IO, 243 NFSERR_STALE, 244 NFSERR_BADHANDLE, 245 NFSERR_SERVERFAULT, 246 0, 247 }; 248 249 static short nfsv3err_readlink[] = { 250 NFSERR_IO, 251 NFSERR_IO, 252 NFSERR_ACCES, 253 NFSERR_INVAL, 254 NFSERR_STALE, 255 NFSERR_BADHANDLE, 256 NFSERR_NOTSUPP, 257 NFSERR_SERVERFAULT, 258 0, 259 }; 260 261 static short nfsv3err_read[] = { 262 NFSERR_IO, 263 NFSERR_IO, 264 NFSERR_NXIO, 265 NFSERR_ACCES, 266 NFSERR_INVAL, 267 NFSERR_STALE, 268 NFSERR_BADHANDLE, 269 NFSERR_SERVERFAULT, 270 0, 271 }; 272 273 static short nfsv3err_write[] = { 274 NFSERR_IO, 275 NFSERR_IO, 276 NFSERR_ACCES, 277 NFSERR_INVAL, 278 NFSERR_FBIG, 279 NFSERR_NOSPC, 280 NFSERR_ROFS, 281 NFSERR_DQUOT, 282 NFSERR_STALE, 283 NFSERR_BADHANDLE, 284 NFSERR_SERVERFAULT, 285 0, 286 }; 287 288 static short nfsv3err_create[] = { 289 NFSERR_IO, 290 NFSERR_IO, 291 NFSERR_ACCES, 292 NFSERR_EXIST, 293 NFSERR_NOTDIR, 294 NFSERR_NOSPC, 295 NFSERR_ROFS, 296 NFSERR_NAMETOL, 297 NFSERR_DQUOT, 298 NFSERR_STALE, 299 NFSERR_BADHANDLE, 300 NFSERR_NOTSUPP, 301 NFSERR_SERVERFAULT, 302 0, 303 }; 304 305 static short nfsv3err_mkdir[] = { 306 NFSERR_IO, 307 NFSERR_IO, 308 NFSERR_ACCES, 309 NFSERR_EXIST, 310 NFSERR_NOTDIR, 311 NFSERR_NOSPC, 312 NFSERR_ROFS, 313 NFSERR_NAMETOL, 314 NFSERR_DQUOT, 315 NFSERR_STALE, 316 NFSERR_BADHANDLE, 317 NFSERR_NOTSUPP, 318 NFSERR_SERVERFAULT, 319 0, 320 }; 321 322 static short nfsv3err_symlink[] = { 323 NFSERR_IO, 324 NFSERR_IO, 325 NFSERR_ACCES, 326 NFSERR_EXIST, 327 NFSERR_NOTDIR, 328 NFSERR_NOSPC, 329 NFSERR_ROFS, 330 NFSERR_NAMETOL, 331 NFSERR_DQUOT, 332 NFSERR_STALE, 333 NFSERR_BADHANDLE, 334 NFSERR_NOTSUPP, 335 NFSERR_SERVERFAULT, 336 0, 337 }; 338 339 static short nfsv3err_mknod[] = { 340 NFSERR_IO, 341 NFSERR_IO, 342 NFSERR_ACCES, 343 NFSERR_EXIST, 344 NFSERR_NOTDIR, 345 NFSERR_NOSPC, 346 NFSERR_ROFS, 347 NFSERR_NAMETOL, 348 NFSERR_DQUOT, 349 NFSERR_STALE, 350 NFSERR_BADHANDLE, 351 NFSERR_NOTSUPP, 352 NFSERR_SERVERFAULT, 353 NFSERR_BADTYPE, 354 0, 355 }; 356 357 static short nfsv3err_remove[] = { 358 NFSERR_IO, 359 NFSERR_NOENT, 360 NFSERR_IO, 361 NFSERR_ACCES, 362 NFSERR_NOTDIR, 363 NFSERR_ROFS, 364 NFSERR_NAMETOL, 365 NFSERR_STALE, 366 NFSERR_BADHANDLE, 367 NFSERR_SERVERFAULT, 368 0, 369 }; 370 371 static short nfsv3err_rmdir[] = { 372 NFSERR_IO, 373 NFSERR_NOENT, 374 NFSERR_IO, 375 NFSERR_ACCES, 376 NFSERR_EXIST, 377 NFSERR_NOTDIR, 378 NFSERR_INVAL, 379 NFSERR_ROFS, 380 NFSERR_NAMETOL, 381 NFSERR_NOTEMPTY, 382 NFSERR_STALE, 383 NFSERR_BADHANDLE, 384 NFSERR_NOTSUPP, 385 NFSERR_SERVERFAULT, 386 0, 387 }; 388 389 static short nfsv3err_rename[] = { 390 NFSERR_IO, 391 NFSERR_NOENT, 392 NFSERR_IO, 393 NFSERR_ACCES, 394 NFSERR_EXIST, 395 NFSERR_XDEV, 396 NFSERR_NOTDIR, 397 NFSERR_ISDIR, 398 NFSERR_INVAL, 399 NFSERR_NOSPC, 400 NFSERR_ROFS, 401 NFSERR_MLINK, 402 NFSERR_NAMETOL, 403 NFSERR_NOTEMPTY, 404 NFSERR_DQUOT, 405 NFSERR_STALE, 406 NFSERR_BADHANDLE, 407 NFSERR_NOTSUPP, 408 NFSERR_SERVERFAULT, 409 0, 410 }; 411 412 static short nfsv3err_link[] = { 413 NFSERR_IO, 414 NFSERR_IO, 415 NFSERR_ACCES, 416 NFSERR_EXIST, 417 NFSERR_XDEV, 418 NFSERR_NOTDIR, 419 NFSERR_INVAL, 420 NFSERR_NOSPC, 421 NFSERR_ROFS, 422 NFSERR_MLINK, 423 NFSERR_NAMETOL, 424 NFSERR_DQUOT, 425 NFSERR_STALE, 426 NFSERR_BADHANDLE, 427 NFSERR_NOTSUPP, 428 NFSERR_SERVERFAULT, 429 0, 430 }; 431 432 static short nfsv3err_readdir[] = { 433 NFSERR_IO, 434 NFSERR_IO, 435 NFSERR_ACCES, 436 NFSERR_NOTDIR, 437 NFSERR_STALE, 438 NFSERR_BADHANDLE, 439 NFSERR_BAD_COOKIE, 440 NFSERR_TOOSMALL, 441 NFSERR_SERVERFAULT, 442 0, 443 }; 444 445 static short nfsv3err_readdirplus[] = { 446 NFSERR_IO, 447 NFSERR_IO, 448 NFSERR_ACCES, 449 NFSERR_NOTDIR, 450 NFSERR_STALE, 451 NFSERR_BADHANDLE, 452 NFSERR_BAD_COOKIE, 453 NFSERR_NOTSUPP, 454 NFSERR_TOOSMALL, 455 NFSERR_SERVERFAULT, 456 0, 457 }; 458 459 static short nfsv3err_fsstat[] = { 460 NFSERR_IO, 461 NFSERR_IO, 462 NFSERR_STALE, 463 NFSERR_BADHANDLE, 464 NFSERR_SERVERFAULT, 465 0, 466 }; 467 468 static short nfsv3err_fsinfo[] = { 469 NFSERR_STALE, 470 NFSERR_STALE, 471 NFSERR_BADHANDLE, 472 NFSERR_SERVERFAULT, 473 0, 474 }; 475 476 static short nfsv3err_pathconf[] = { 477 NFSERR_STALE, 478 NFSERR_STALE, 479 NFSERR_BADHANDLE, 480 NFSERR_SERVERFAULT, 481 0, 482 }; 483 484 static short nfsv3err_commit[] = { 485 NFSERR_IO, 486 NFSERR_IO, 487 NFSERR_STALE, 488 NFSERR_BADHANDLE, 489 NFSERR_SERVERFAULT, 490 0, 491 }; 492 493 static short *nfsrv_v3errmap[] = { 494 nfsv3err_null, 495 nfsv3err_getattr, 496 nfsv3err_setattr, 497 nfsv3err_lookup, 498 nfsv3err_access, 499 nfsv3err_readlink, 500 nfsv3err_read, 501 nfsv3err_write, 502 nfsv3err_create, 503 nfsv3err_mkdir, 504 nfsv3err_symlink, 505 nfsv3err_mknod, 506 nfsv3err_remove, 507 nfsv3err_rmdir, 508 nfsv3err_rename, 509 nfsv3err_link, 510 nfsv3err_readdir, 511 nfsv3err_readdirplus, 512 nfsv3err_fsstat, 513 nfsv3err_fsinfo, 514 nfsv3err_pathconf, 515 nfsv3err_commit, 516 }; 517 518 extern struct proc *nfs_iodwant[NFS_MAXASYNCDAEMON]; 519 extern struct nfsrtt nfsrtt; 520 extern time_t nqnfsstarttime; 521 extern int nqsrv_clockskew; 522 extern int nqsrv_writeslack; 523 extern int nqsrv_maxlease; 524 extern struct nfsstats nfsstats; 525 extern int nqnfs_piggy[NFS_NPROCS]; 526 extern nfstype nfsv2_type[9]; 527 extern nfstype nfsv3_type[9]; 528 extern struct nfsnodehashhead *nfsnodehashtbl; 529 extern u_long nfsnodehash; 530 531 #ifdef VFS_LKM 532 struct getfh_args; 533 extern int getfh(struct proc *, struct getfh_args *, int *); 534 struct nfssvc_args; 535 extern int nfssvc(struct proc *, struct nfssvc_args *, int *); 536 #endif 537 538 LIST_HEAD(nfsnodehashhead, nfsnode); 539 540 /* 541 * Create the header for an rpc request packet 542 * The hsiz is the size of the rest of the nfs request header. 543 * (just used to decide if a cluster is a good idea) 544 */ 545 struct mbuf * 546 nfsm_reqh(vp, procid, hsiz, bposp) 547 struct vnode *vp; 548 u_long procid; 549 int hsiz; 550 caddr_t *bposp; 551 { 552 register struct mbuf *mb; 553 register u_long *tl; 554 register caddr_t bpos; 555 struct mbuf *mb2; 556 struct nfsmount *nmp; 557 int nqflag; 558 559 MGET(mb, M_WAIT, MT_DATA); 560 if (hsiz >= MINCLSIZE) 561 MCLGET(mb, M_WAIT); 562 mb->m_len = 0; 563 bpos = mtod(mb, caddr_t); 564 565 /* 566 * For NQNFS, add lease request. 567 */ 568 if (vp) { 569 nmp = VFSTONFS(vp->v_mount); 570 if (nmp->nm_flag & NFSMNT_NQNFS) { 571 nqflag = NQNFS_NEEDLEASE(vp, procid); 572 if (nqflag) { 573 nfsm_build(tl, u_long *, 2*NFSX_UNSIGNED); 574 *tl++ = txdr_unsigned(nqflag); 575 *tl = txdr_unsigned(nmp->nm_leaseterm); 576 } else { 577 nfsm_build(tl, u_long *, NFSX_UNSIGNED); 578 *tl = 0; 579 } 580 } 581 } 582 /* Finally, return values */ 583 *bposp = bpos; 584 return (mb); 585 } 586 587 /* 588 * Build the RPC header and fill in the authorization info. 589 * The authorization string argument is only used when the credentials 590 * come from outside of the kernel. 591 * Returns the head of the mbuf list. 592 */ 593 struct mbuf * 594 nfsm_rpchead(cr, nmflag, procid, auth_type, auth_len, auth_str, verf_len, 595 verf_str, mrest, mrest_len, mbp, xidp) 596 register struct ucred *cr; 597 int nmflag; 598 int procid; 599 int auth_type; 600 int auth_len; 601 char *auth_str; 602 int verf_len; 603 char *verf_str; 604 struct mbuf *mrest; 605 int mrest_len; 606 struct mbuf **mbp; 607 u_long *xidp; 608 { 609 register struct mbuf *mb; 610 register u_long *tl; 611 register caddr_t bpos; 612 register int i; 613 struct mbuf *mreq, *mb2; 614 int siz, grpsiz, authsiz; 615 616 authsiz = nfsm_rndup(auth_len); 617 MGETHDR(mb, M_WAIT, MT_DATA); 618 if ((authsiz + 10 * NFSX_UNSIGNED) >= MINCLSIZE) { 619 MCLGET(mb, M_WAIT); 620 } else if ((authsiz + 10 * NFSX_UNSIGNED) < MHLEN) { 621 MH_ALIGN(mb, authsiz + 10 * NFSX_UNSIGNED); 622 } else { 623 MH_ALIGN(mb, 8 * NFSX_UNSIGNED); 624 } 625 mb->m_len = 0; 626 mreq = mb; 627 bpos = mtod(mb, caddr_t); 628 629 /* 630 * First the RPC header. 631 */ 632 nfsm_build(tl, u_long *, 8 * NFSX_UNSIGNED); 633 if (++nfs_xid == 0) 634 nfs_xid++; 635 *tl++ = *xidp = txdr_unsigned(nfs_xid); 636 *tl++ = rpc_call; 637 *tl++ = rpc_vers; 638 if (nmflag & NFSMNT_NQNFS) { 639 *tl++ = txdr_unsigned(NQNFS_PROG); 640 *tl++ = txdr_unsigned(NQNFS_VER3); 641 } else { 642 *tl++ = txdr_unsigned(NFS_PROG); 643 if (nmflag & NFSMNT_NFSV3) 644 *tl++ = txdr_unsigned(NFS_VER3); 645 else 646 *tl++ = txdr_unsigned(NFS_VER2); 647 } 648 if (nmflag & NFSMNT_NFSV3) 649 *tl++ = txdr_unsigned(procid); 650 else 651 *tl++ = txdr_unsigned(nfsv2_procid[procid]); 652 653 /* 654 * And then the authorization cred. 655 */ 656 *tl++ = txdr_unsigned(auth_type); 657 *tl = txdr_unsigned(authsiz); 658 switch (auth_type) { 659 case RPCAUTH_UNIX: 660 nfsm_build(tl, u_long *, auth_len); 661 *tl++ = 0; /* stamp ?? */ 662 *tl++ = 0; /* NULL hostname */ 663 *tl++ = txdr_unsigned(cr->cr_uid); 664 *tl++ = txdr_unsigned(cr->cr_groups[0]); 665 grpsiz = (auth_len >> 2) - 5; 666 *tl++ = txdr_unsigned(grpsiz); 667 for (i = 1; i <= grpsiz; i++) 668 *tl++ = txdr_unsigned(cr->cr_groups[i]); 669 break; 670 case RPCAUTH_KERB4: 671 siz = auth_len; 672 while (siz > 0) { 673 if (M_TRAILINGSPACE(mb) == 0) { 674 MGET(mb2, M_WAIT, MT_DATA); 675 if (siz >= MINCLSIZE) 676 MCLGET(mb2, M_WAIT); 677 mb->m_next = mb2; 678 mb = mb2; 679 mb->m_len = 0; 680 bpos = mtod(mb, caddr_t); 681 } 682 i = min(siz, M_TRAILINGSPACE(mb)); 683 bcopy(auth_str, bpos, i); 684 mb->m_len += i; 685 auth_str += i; 686 bpos += i; 687 siz -= i; 688 } 689 if ((siz = (nfsm_rndup(auth_len) - auth_len)) > 0) { 690 for (i = 0; i < siz; i++) 691 *bpos++ = '\0'; 692 mb->m_len += siz; 693 } 694 break; 695 }; 696 697 /* 698 * And the verifier... 699 */ 700 nfsm_build(tl, u_long *, 2 * NFSX_UNSIGNED); 701 if (verf_str) { 702 *tl++ = txdr_unsigned(RPCAUTH_KERB4); 703 *tl = txdr_unsigned(verf_len); 704 siz = verf_len; 705 while (siz > 0) { 706 if (M_TRAILINGSPACE(mb) == 0) { 707 MGET(mb2, M_WAIT, MT_DATA); 708 if (siz >= MINCLSIZE) 709 MCLGET(mb2, M_WAIT); 710 mb->m_next = mb2; 711 mb = mb2; 712 mb->m_len = 0; 713 bpos = mtod(mb, caddr_t); 714 } 715 i = min(siz, M_TRAILINGSPACE(mb)); 716 bcopy(verf_str, bpos, i); 717 mb->m_len += i; 718 verf_str += i; 719 bpos += i; 720 siz -= i; 721 } 722 if ((siz = (nfsm_rndup(verf_len) - verf_len)) > 0) { 723 for (i = 0; i < siz; i++) 724 *bpos++ = '\0'; 725 mb->m_len += siz; 726 } 727 } else { 728 *tl++ = txdr_unsigned(RPCAUTH_NULL); 729 *tl = 0; 730 } 731 mb->m_next = mrest; 732 mreq->m_pkthdr.len = authsiz + 10 * NFSX_UNSIGNED + mrest_len; 733 mreq->m_pkthdr.rcvif = (struct ifnet *)0; 734 *mbp = mb; 735 return (mreq); 736 } 737 738 /* 739 * copies mbuf chain to the uio scatter/gather list 740 */ 741 int 742 nfsm_mbuftouio(mrep, uiop, siz, dpos) 743 struct mbuf **mrep; 744 register struct uio *uiop; 745 int siz; 746 caddr_t *dpos; 747 { 748 register char *mbufcp, *uiocp; 749 register int xfer, left, len; 750 register struct mbuf *mp; 751 long uiosiz, rem; 752 int error = 0; 753 754 mp = *mrep; 755 mbufcp = *dpos; 756 len = mtod(mp, caddr_t)+mp->m_len-mbufcp; 757 rem = nfsm_rndup(siz)-siz; 758 while (siz > 0) { 759 if (uiop->uio_iovcnt <= 0 || uiop->uio_iov == NULL) 760 return (EFBIG); 761 left = uiop->uio_iov->iov_len; 762 uiocp = uiop->uio_iov->iov_base; 763 if (left > siz) 764 left = siz; 765 uiosiz = left; 766 while (left > 0) { 767 while (len == 0) { 768 mp = mp->m_next; 769 if (mp == NULL) 770 return (EBADRPC); 771 mbufcp = mtod(mp, caddr_t); 772 len = mp->m_len; 773 } 774 xfer = (left > len) ? len : left; 775 #ifdef notdef 776 /* Not Yet.. */ 777 if (uiop->uio_iov->iov_op != NULL) 778 (*(uiop->uio_iov->iov_op)) 779 (mbufcp, uiocp, xfer); 780 else 781 #endif 782 if (uiop->uio_segflg == UIO_SYSSPACE) 783 bcopy(mbufcp, uiocp, xfer); 784 else 785 copyout(mbufcp, uiocp, xfer); 786 left -= xfer; 787 len -= xfer; 788 mbufcp += xfer; 789 uiocp += xfer; 790 uiop->uio_offset += xfer; 791 uiop->uio_resid -= xfer; 792 } 793 if (uiop->uio_iov->iov_len <= siz) { 794 uiop->uio_iovcnt--; 795 uiop->uio_iov++; 796 } else { 797 uiop->uio_iov->iov_base += uiosiz; 798 uiop->uio_iov->iov_len -= uiosiz; 799 } 800 siz -= uiosiz; 801 } 802 *dpos = mbufcp; 803 *mrep = mp; 804 if (rem > 0) { 805 if (len < rem) 806 error = nfs_adv(mrep, dpos, rem, len); 807 else 808 *dpos += rem; 809 } 810 return (error); 811 } 812 813 /* 814 * copies a uio scatter/gather list to an mbuf chain... 815 */ 816 int 817 nfsm_uiotombuf(uiop, mq, siz, bpos) 818 register struct uio *uiop; 819 struct mbuf **mq; 820 int siz; 821 caddr_t *bpos; 822 { 823 register char *uiocp; 824 register struct mbuf *mp, *mp2; 825 register int xfer, left, mlen; 826 int uiosiz, clflg, rem; 827 char *cp; 828 829 if (siz > MLEN) /* or should it >= MCLBYTES ?? */ 830 clflg = 1; 831 else 832 clflg = 0; 833 rem = nfsm_rndup(siz)-siz; 834 mp = mp2 = *mq; 835 while (siz > 0) { 836 if (uiop->uio_iovcnt <= 0 || uiop->uio_iov == NULL) 837 return (EINVAL); 838 left = uiop->uio_iov->iov_len; 839 uiocp = uiop->uio_iov->iov_base; 840 if (left > siz) 841 left = siz; 842 uiosiz = left; 843 while (left > 0) { 844 mlen = M_TRAILINGSPACE(mp); 845 if (mlen == 0) { 846 MGET(mp, M_WAIT, MT_DATA); 847 if (clflg) 848 MCLGET(mp, M_WAIT); 849 mp->m_len = 0; 850 mp2->m_next = mp; 851 mp2 = mp; 852 mlen = M_TRAILINGSPACE(mp); 853 } 854 xfer = (left > mlen) ? mlen : left; 855 #ifdef notdef 856 /* Not Yet.. */ 857 if (uiop->uio_iov->iov_op != NULL) 858 (*(uiop->uio_iov->iov_op)) 859 (uiocp, mtod(mp, caddr_t)+mp->m_len, xfer); 860 else 861 #endif 862 if (uiop->uio_segflg == UIO_SYSSPACE) 863 bcopy(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer); 864 else 865 copyin(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer); 866 mp->m_len += xfer; 867 left -= xfer; 868 uiocp += xfer; 869 uiop->uio_offset += xfer; 870 uiop->uio_resid -= xfer; 871 } 872 if (uiop->uio_iov->iov_len <= siz) { 873 uiop->uio_iovcnt--; 874 uiop->uio_iov++; 875 } else { 876 uiop->uio_iov->iov_base += uiosiz; 877 uiop->uio_iov->iov_len -= uiosiz; 878 } 879 siz -= uiosiz; 880 } 881 if (rem > 0) { 882 if (rem > M_TRAILINGSPACE(mp)) { 883 MGET(mp, M_WAIT, MT_DATA); 884 mp->m_len = 0; 885 mp2->m_next = mp; 886 } 887 cp = mtod(mp, caddr_t)+mp->m_len; 888 for (left = 0; left < rem; left++) 889 *cp++ = '\0'; 890 mp->m_len += rem; 891 *bpos = cp; 892 } else 893 *bpos = mtod(mp, caddr_t)+mp->m_len; 894 *mq = mp; 895 return (0); 896 } 897 898 /* 899 * Help break down an mbuf chain by setting the first siz bytes contiguous 900 * pointed to by returned val. 901 * This is used by the macros nfsm_dissect and nfsm_dissecton for tough 902 * cases. (The macros use the vars. dpos and dpos2) 903 */ 904 int 905 nfsm_disct(mdp, dposp, siz, left, cp2) 906 struct mbuf **mdp; 907 caddr_t *dposp; 908 int siz; 909 int left; 910 caddr_t *cp2; 911 { 912 register struct mbuf *mp, *mp2; 913 register int siz2, xfer; 914 register caddr_t p; 915 916 mp = *mdp; 917 while (left == 0) { 918 *mdp = mp = mp->m_next; 919 if (mp == NULL) 920 return (EBADRPC); 921 left = mp->m_len; 922 *dposp = mtod(mp, caddr_t); 923 } 924 if (left >= siz) { 925 *cp2 = *dposp; 926 *dposp += siz; 927 } else if (mp->m_next == NULL) { 928 return (EBADRPC); 929 } else if (siz > MHLEN) { 930 panic("nfs S too big"); 931 } else { 932 MGET(mp2, M_WAIT, MT_DATA); 933 mp2->m_next = mp->m_next; 934 mp->m_next = mp2; 935 mp->m_len -= left; 936 mp = mp2; 937 *cp2 = p = mtod(mp, caddr_t); 938 bcopy(*dposp, p, left); /* Copy what was left */ 939 siz2 = siz-left; 940 p += left; 941 mp2 = mp->m_next; 942 /* Loop around copying up the siz2 bytes */ 943 while (siz2 > 0) { 944 if (mp2 == NULL) 945 return (EBADRPC); 946 xfer = (siz2 > mp2->m_len) ? mp2->m_len : siz2; 947 if (xfer > 0) { 948 bcopy(mtod(mp2, caddr_t), p, xfer); 949 NFSMADV(mp2, xfer); 950 mp2->m_len -= xfer; 951 p += xfer; 952 siz2 -= xfer; 953 } 954 if (siz2 > 0) 955 mp2 = mp2->m_next; 956 } 957 mp->m_len = siz; 958 *mdp = mp2; 959 *dposp = mtod(mp2, caddr_t); 960 } 961 return (0); 962 } 963 964 /* 965 * Advance the position in the mbuf chain. 966 */ 967 int 968 nfs_adv(mdp, dposp, offs, left) 969 struct mbuf **mdp; 970 caddr_t *dposp; 971 int offs; 972 int left; 973 { 974 register struct mbuf *m; 975 register int s; 976 977 m = *mdp; 978 s = left; 979 while (s < offs) { 980 offs -= s; 981 m = m->m_next; 982 if (m == NULL) 983 return (EBADRPC); 984 s = m->m_len; 985 } 986 *mdp = m; 987 *dposp = mtod(m, caddr_t)+offs; 988 return (0); 989 } 990 991 /* 992 * Copy a string into mbufs for the hard cases... 993 */ 994 int 995 nfsm_strtmbuf(mb, bpos, cp, siz) 996 struct mbuf **mb; 997 char **bpos; 998 char *cp; 999 long siz; 1000 { 1001 register struct mbuf *m1 = 0, *m2; 1002 long left, xfer, len, tlen; 1003 u_long *tl; 1004 int putsize; 1005 1006 putsize = 1; 1007 m2 = *mb; 1008 left = M_TRAILINGSPACE(m2); 1009 if (left > 0) { 1010 tl = ((u_long *)(*bpos)); 1011 *tl++ = txdr_unsigned(siz); 1012 putsize = 0; 1013 left -= NFSX_UNSIGNED; 1014 m2->m_len += NFSX_UNSIGNED; 1015 if (left > 0) { 1016 bcopy(cp, (caddr_t) tl, left); 1017 siz -= left; 1018 cp += left; 1019 m2->m_len += left; 1020 left = 0; 1021 } 1022 } 1023 /* Loop around adding mbufs */ 1024 while (siz > 0) { 1025 MGET(m1, M_WAIT, MT_DATA); 1026 if (siz > MLEN) 1027 MCLGET(m1, M_WAIT); 1028 m1->m_len = NFSMSIZ(m1); 1029 m2->m_next = m1; 1030 m2 = m1; 1031 tl = mtod(m1, u_long *); 1032 tlen = 0; 1033 if (putsize) { 1034 *tl++ = txdr_unsigned(siz); 1035 m1->m_len -= NFSX_UNSIGNED; 1036 tlen = NFSX_UNSIGNED; 1037 putsize = 0; 1038 } 1039 if (siz < m1->m_len) { 1040 len = nfsm_rndup(siz); 1041 xfer = siz; 1042 if (xfer < len) 1043 *(tl+(xfer>>2)) = 0; 1044 } else { 1045 xfer = len = m1->m_len; 1046 } 1047 bcopy(cp, (caddr_t) tl, xfer); 1048 m1->m_len = len+tlen; 1049 siz -= xfer; 1050 cp += xfer; 1051 } 1052 *mb = m1; 1053 *bpos = mtod(m1, caddr_t)+m1->m_len; 1054 return (0); 1055 } 1056 1057 /* 1058 * Called once to initialize data structures... 1059 */ 1060 int 1061 nfs_init(vfsp) 1062 struct vfsconf *vfsp; 1063 { 1064 register int i; 1065 1066 /* 1067 * Check to see if major data structures haven't bloated. 1068 */ 1069 if (sizeof (struct nfsnode) > NFS_NODEALLOC) { 1070 printf("struct nfsnode bloated (> %dbytes)\n", NFS_NODEALLOC); 1071 printf("Try reducing NFS_SMALLFH\n"); 1072 } 1073 if (sizeof (struct nfsmount) > NFS_MNTALLOC) { 1074 printf("struct nfsmount bloated (> %dbytes)\n", NFS_MNTALLOC); 1075 printf("Try reducing NFS_MUIDHASHSIZ\n"); 1076 } 1077 if (sizeof (struct nfssvc_sock) > NFS_SVCALLOC) { 1078 printf("struct nfssvc_sock bloated (> %dbytes)\n",NFS_SVCALLOC); 1079 printf("Try reducing NFS_UIDHASHSIZ\n"); 1080 } 1081 if (sizeof (struct nfsuid) > NFS_UIDALLOC) { 1082 printf("struct nfsuid bloated (> %dbytes)\n",NFS_UIDALLOC); 1083 printf("Try unionizing the nu_nickname and nu_flag fields\n"); 1084 } 1085 nfs_mount_type = vfsp->vfc_typenum; 1086 nfsrtt.pos = 0; 1087 rpc_vers = txdr_unsigned(RPC_VER2); 1088 rpc_call = txdr_unsigned(RPC_CALL); 1089 rpc_reply = txdr_unsigned(RPC_REPLY); 1090 rpc_msgdenied = txdr_unsigned(RPC_MSGDENIED); 1091 rpc_msgaccepted = txdr_unsigned(RPC_MSGACCEPTED); 1092 rpc_mismatch = txdr_unsigned(RPC_MISMATCH); 1093 rpc_autherr = txdr_unsigned(RPC_AUTHERR); 1094 rpc_auth_unix = txdr_unsigned(RPCAUTH_UNIX); 1095 rpc_auth_kerb = txdr_unsigned(RPCAUTH_KERB4); 1096 nfs_prog = txdr_unsigned(NFS_PROG); 1097 nqnfs_prog = txdr_unsigned(NQNFS_PROG); 1098 nfs_true = txdr_unsigned(TRUE); 1099 nfs_false = txdr_unsigned(FALSE); 1100 nfs_xdrneg1 = txdr_unsigned(-1); 1101 nfs_ticks = (hz * NFS_TICKINTVL + 500) / 1000; 1102 if (nfs_ticks < 1) 1103 nfs_ticks = 1; 1104 /* Ensure async daemons disabled */ 1105 for (i = 0; i < NFS_MAXASYNCDAEMON; i++) 1106 nfs_iodwant[i] = (struct proc *)0; 1107 TAILQ_INIT(&nfs_bufq); 1108 nfs_nhinit(); /* Init the nfsnode table */ 1109 nfsrv_init(0); /* Init server data structures */ 1110 nfsrv_initcache(); /* Init the server request cache */ 1111 1112 /* 1113 * Initialize the nqnfs server stuff. 1114 */ 1115 if (nqnfsstarttime == 0) { 1116 nqnfsstarttime = boottime.tv_sec + nqsrv_maxlease 1117 + nqsrv_clockskew + nqsrv_writeslack; 1118 NQLOADNOVRAM(nqnfsstarttime); 1119 CIRCLEQ_INIT(&nqtimerhead); 1120 nqfhhashtbl = hashinit(NQLCHSZ, M_NQLEASE, &nqfhhash); 1121 } 1122 1123 /* 1124 * Initialize reply list and start timer 1125 */ 1126 TAILQ_INIT(&nfs_reqq); 1127 nfs_timer(0); 1128 return (0); 1129 } 1130 1131 /* 1132 * Attribute cache routines. 1133 * nfs_loadattrcache() - loads or updates the cache contents from attributes 1134 * that are on the mbuf list 1135 * nfs_getattrcache() - returns valid attributes if found in cache, returns 1136 * error otherwise 1137 */ 1138 1139 /* 1140 * Load the attribute cache (that lives in the nfsnode entry) with 1141 * the values on the mbuf list and 1142 * Iff vap not NULL 1143 * copy the attributes to *vaper 1144 */ 1145 int 1146 nfs_loadattrcache(vpp, mdp, dposp, vaper) 1147 struct vnode **vpp; 1148 struct mbuf **mdp; 1149 caddr_t *dposp; 1150 struct vattr *vaper; 1151 { 1152 register struct vnode *vp = *vpp; 1153 register struct vattr *vap; 1154 register struct nfs_fattr *fp; 1155 extern int (**spec_nfsv2nodeop_p)(); 1156 register struct nfsnode *np; 1157 register struct nfsnodehashhead *nhpp; 1158 register long t1; 1159 caddr_t cp2; 1160 int error = 0, rdev; 1161 struct mbuf *md; 1162 enum vtype vtyp; 1163 u_short vmode; 1164 struct timespec mtime; 1165 struct vnode *nvp; 1166 quad_t tval; 1167 int v3 = NFS_ISV3(vp); 1168 1169 md = *mdp; 1170 t1 = (mtod(md, caddr_t) + md->m_len) - *dposp; 1171 if (error = nfsm_disct(mdp, dposp, NFSX_FATTR(v3), t1, &cp2)) 1172 return (error); 1173 fp = (struct nfs_fattr *)cp2; 1174 if (v3) { 1175 vtyp = nfsv3tov_type(fp->fa_type); 1176 vmode = fxdr_unsigned(u_short, fp->fa_mode); 1177 rdev = makedev(fxdr_unsigned(u_char, fp->fa3_rdev.specdata1), 1178 fxdr_unsigned(u_char, fp->fa3_rdev.specdata2)); 1179 fxdr_nfsv3time(&fp->fa3_mtime, &mtime); 1180 } else { 1181 vtyp = nfsv2tov_type(fp->fa_type); 1182 vmode = fxdr_unsigned(u_short, fp->fa_mode); 1183 if (vtyp == VNON || vtyp == VREG) 1184 vtyp = IFTOVT(vmode); 1185 rdev = fxdr_unsigned(long, fp->fa2_rdev); 1186 fxdr_nfsv2time(&fp->fa2_mtime, &mtime); 1187 1188 /* 1189 * Really ugly NFSv2 kludge. 1190 */ 1191 if (vtyp == VCHR && rdev == 0xffffffff) 1192 vtyp = VFIFO; 1193 } 1194 1195 /* 1196 * If v_type == VNON it is a new node, so fill in the v_type, 1197 * n_mtime fields. Check to see if it represents a special 1198 * device, and if so, check for a possible alias. Once the 1199 * correct vnode has been obtained, fill in the rest of the 1200 * information. 1201 */ 1202 np = VTONFS(vp); 1203 if (vp->v_type == VNON) { 1204 vp->v_type = vtyp; 1205 if (vp->v_type == VFIFO) { 1206 extern int (**fifo_nfsv2nodeop_p)(); 1207 vp->v_op = fifo_nfsv2nodeop_p; 1208 } 1209 if (vp->v_type == VCHR || vp->v_type == VBLK) { 1210 vp->v_op = spec_nfsv2nodeop_p; 1211 nvp = checkalias(vp, (dev_t)rdev, vp->v_mount); 1212 if (nvp) { 1213 /* 1214 * Discard unneeded vnode, but save its nfsnode. 1215 * Since the nfsnode does not have a lock, its 1216 * vnode lock has to be carried over. 1217 */ 1218 nvp->v_vnlock = vp->v_vnlock; 1219 vp->v_vnlock = NULL; 1220 nvp->v_data = vp->v_data; 1221 vp->v_data = NULL; 1222 vp->v_op = spec_vnodeop_p; 1223 vrele(vp); 1224 vgone(vp); 1225 /* 1226 * Reinitialize aliased node. 1227 */ 1228 np->n_vnode = nvp; 1229 *vpp = vp = nvp; 1230 } 1231 } 1232 np->n_mtime = mtime.ts_sec; 1233 } 1234 vap = &np->n_vattr; 1235 vap->va_type = vtyp; 1236 vap->va_mode = (vmode & 07777); 1237 vap->va_rdev = (dev_t)rdev; 1238 vap->va_mtime = mtime; 1239 vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0]; 1240 if (v3) { 1241 vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink); 1242 vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid); 1243 vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid); 1244 fxdr_hyper(&fp->fa3_size, &vap->va_size); 1245 vap->va_blocksize = NFS_FABLKSIZE; 1246 fxdr_hyper(&fp->fa3_used, &vap->va_bytes); 1247 vap->va_fileid = fxdr_unsigned(int, fp->fa3_fileid.nfsuquad[1]); 1248 fxdr_nfsv3time(&fp->fa3_atime, &vap->va_atime); 1249 fxdr_nfsv3time(&fp->fa3_ctime, &vap->va_ctime); 1250 vap->va_flags = 0; 1251 vap->va_filerev = 0; 1252 } else { 1253 vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink); 1254 vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid); 1255 vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid); 1256 vap->va_size = fxdr_unsigned(u_long, fp->fa2_size); 1257 vap->va_blocksize = fxdr_unsigned(long, fp->fa2_blocksize); 1258 vap->va_bytes = fxdr_unsigned(long, fp->fa2_blocks) * NFS_FABLKSIZE; 1259 vap->va_fileid = fxdr_unsigned(long, fp->fa2_fileid); 1260 fxdr_nfsv2time(&fp->fa2_atime, &vap->va_atime); 1261 vap->va_flags = 0; 1262 vap->va_ctime.ts_sec = fxdr_unsigned(long, fp->fa2_ctime.nfsv2_sec); 1263 vap->va_ctime.ts_nsec = 0; 1264 vap->va_gen = fxdr_unsigned(u_long, fp->fa2_ctime.nfsv2_usec); 1265 vap->va_filerev = 0; 1266 } 1267 if (vap->va_size != np->n_size) { 1268 if (vap->va_type == VREG) { 1269 if (np->n_flag & NMODIFIED) { 1270 if (vap->va_size < np->n_size) 1271 vap->va_size = np->n_size; 1272 else 1273 np->n_size = vap->va_size; 1274 } else 1275 np->n_size = vap->va_size; 1276 vnode_pager_setsize(vp, (u_long)np->n_size); 1277 } else 1278 np->n_size = vap->va_size; 1279 } 1280 np->n_attrstamp = time.tv_sec; 1281 if (vaper != NULL) { 1282 bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(*vap)); 1283 if (np->n_flag & NCHG) { 1284 if (np->n_flag & NACC) 1285 vaper->va_atime = np->n_atim; 1286 if (np->n_flag & NUPD) 1287 vaper->va_mtime = np->n_mtim; 1288 } 1289 } 1290 return (0); 1291 } 1292 1293 /* 1294 * Check the time stamp 1295 * If the cache is valid, copy contents to *vap and return 0 1296 * otherwise return an error 1297 */ 1298 int 1299 nfs_getattrcache(vp, vaper) 1300 register struct vnode *vp; 1301 struct vattr *vaper; 1302 { 1303 register struct nfsnode *np = VTONFS(vp); 1304 register struct vattr *vap; 1305 1306 if ((time.tv_sec - np->n_attrstamp) >= NFS_ATTRTIMEO(np)) { 1307 nfsstats.attrcache_misses++; 1308 return (ENOENT); 1309 } 1310 nfsstats.attrcache_hits++; 1311 vap = &np->n_vattr; 1312 if (vap->va_size != np->n_size) { 1313 if (vap->va_type == VREG) { 1314 if (np->n_flag & NMODIFIED) { 1315 if (vap->va_size < np->n_size) 1316 vap->va_size = np->n_size; 1317 else 1318 np->n_size = vap->va_size; 1319 } else 1320 np->n_size = vap->va_size; 1321 vnode_pager_setsize(vp, (u_long)np->n_size); 1322 } else 1323 np->n_size = vap->va_size; 1324 } 1325 bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(struct vattr)); 1326 if (np->n_flag & NCHG) { 1327 if (np->n_flag & NACC) 1328 vaper->va_atime = np->n_atim; 1329 if (np->n_flag & NUPD) 1330 vaper->va_mtime = np->n_mtim; 1331 } 1332 return (0); 1333 } 1334 1335 /* 1336 * Set up nameidata for a lookup() call and do it 1337 */ 1338 int 1339 nfs_namei(ndp, fhp, len, slp, nam, mdp, dposp, retdirp, p, kerbflag) 1340 register struct nameidata *ndp; 1341 fhandle_t *fhp; 1342 int len; 1343 struct nfssvc_sock *slp; 1344 struct mbuf *nam; 1345 struct mbuf **mdp; 1346 caddr_t *dposp; 1347 struct vnode **retdirp; 1348 struct proc *p; 1349 int kerbflag; 1350 { 1351 register int i, rem; 1352 register struct mbuf *md; 1353 register char *fromcp, *tocp; 1354 struct vnode *dp; 1355 int error, rdonly; 1356 struct componentname *cnp = &ndp->ni_cnd; 1357 1358 *retdirp = (struct vnode *)0; 1359 MALLOC(cnp->cn_pnbuf, char *, len + 1, M_NAMEI, M_WAITOK); 1360 /* 1361 * Copy the name from the mbuf list to ndp->ni_pnbuf 1362 * and set the various ndp fields appropriately. 1363 */ 1364 fromcp = *dposp; 1365 tocp = cnp->cn_pnbuf; 1366 md = *mdp; 1367 rem = mtod(md, caddr_t) + md->m_len - fromcp; 1368 cnp->cn_hash = 0; 1369 for (i = 0; i < len; i++) { 1370 while (rem == 0) { 1371 md = md->m_next; 1372 if (md == NULL) { 1373 error = EBADRPC; 1374 goto out; 1375 } 1376 fromcp = mtod(md, caddr_t); 1377 rem = md->m_len; 1378 } 1379 if (*fromcp == '\0' || *fromcp == '/') { 1380 error = EACCES; 1381 goto out; 1382 } 1383 cnp->cn_hash += (unsigned char)*fromcp; 1384 *tocp++ = *fromcp++; 1385 rem--; 1386 } 1387 *tocp = '\0'; 1388 *mdp = md; 1389 *dposp = fromcp; 1390 len = nfsm_rndup(len)-len; 1391 if (len > 0) { 1392 if (rem >= len) 1393 *dposp += len; 1394 else if (error = nfs_adv(mdp, dposp, len, rem)) 1395 goto out; 1396 } 1397 ndp->ni_pathlen = tocp - cnp->cn_pnbuf; 1398 cnp->cn_nameptr = cnp->cn_pnbuf; 1399 /* 1400 * Extract and set starting directory. 1401 */ 1402 if (error = nfsrv_fhtovp(fhp, FALSE, &dp, ndp->ni_cnd.cn_cred, slp, 1403 nam, &rdonly, kerbflag)) 1404 goto out; 1405 if (dp->v_type != VDIR) { 1406 vrele(dp); 1407 error = ENOTDIR; 1408 goto out; 1409 } 1410 VREF(dp); 1411 *retdirp = dp; 1412 ndp->ni_startdir = dp; 1413 if (rdonly) 1414 cnp->cn_flags |= (NOCROSSMOUNT | RDONLY); 1415 else 1416 cnp->cn_flags |= NOCROSSMOUNT; 1417 /* 1418 * And call lookup() to do the real work 1419 */ 1420 cnp->cn_proc = p; 1421 if (error = lookup(ndp)) 1422 goto out; 1423 /* 1424 * Check for encountering a symbolic link 1425 */ 1426 if (cnp->cn_flags & ISSYMLINK) { 1427 if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1) 1428 vput(ndp->ni_dvp); 1429 else 1430 vrele(ndp->ni_dvp); 1431 vput(ndp->ni_vp); 1432 ndp->ni_vp = NULL; 1433 error = EINVAL; 1434 goto out; 1435 } 1436 /* 1437 * Check for saved name request 1438 */ 1439 if (cnp->cn_flags & (SAVENAME | SAVESTART)) { 1440 cnp->cn_flags |= HASBUF; 1441 return (0); 1442 } 1443 out: 1444 FREE(cnp->cn_pnbuf, M_NAMEI); 1445 return (error); 1446 } 1447 1448 /* 1449 * A fiddled version of m_adj() that ensures null fill to a long 1450 * boundary and only trims off the back end 1451 */ 1452 void 1453 nfsm_adj(mp, len, nul) 1454 struct mbuf *mp; 1455 register int len; 1456 int nul; 1457 { 1458 register struct mbuf *m; 1459 register int count, i; 1460 register char *cp; 1461 1462 /* 1463 * Trim from tail. Scan the mbuf chain, 1464 * calculating its length and finding the last mbuf. 1465 * If the adjustment only affects this mbuf, then just 1466 * adjust and return. Otherwise, rescan and truncate 1467 * after the remaining size. 1468 */ 1469 count = 0; 1470 m = mp; 1471 for (;;) { 1472 count += m->m_len; 1473 if (m->m_next == (struct mbuf *)0) 1474 break; 1475 m = m->m_next; 1476 } 1477 if (m->m_len > len) { 1478 m->m_len -= len; 1479 if (nul > 0) { 1480 cp = mtod(m, caddr_t)+m->m_len-nul; 1481 for (i = 0; i < nul; i++) 1482 *cp++ = '\0'; 1483 } 1484 return; 1485 } 1486 count -= len; 1487 if (count < 0) 1488 count = 0; 1489 /* 1490 * Correct length for chain is "count". 1491 * Find the mbuf with last data, adjust its length, 1492 * and toss data from remaining mbufs on chain. 1493 */ 1494 for (m = mp; m; m = m->m_next) { 1495 if (m->m_len >= count) { 1496 m->m_len = count; 1497 if (nul > 0) { 1498 cp = mtod(m, caddr_t)+m->m_len-nul; 1499 for (i = 0; i < nul; i++) 1500 *cp++ = '\0'; 1501 } 1502 break; 1503 } 1504 count -= m->m_len; 1505 } 1506 for (m = m->m_next;m;m = m->m_next) 1507 m->m_len = 0; 1508 } 1509 1510 /* 1511 * Make these functions instead of macros, so that the kernel text size 1512 * doesn't get too big... 1513 */ 1514 void 1515 nfsm_srvwcc(nfsd, before_ret, before_vap, after_ret, after_vap, mbp, bposp) 1516 struct nfsrv_descript *nfsd; 1517 int before_ret; 1518 register struct vattr *before_vap; 1519 int after_ret; 1520 struct vattr *after_vap; 1521 struct mbuf **mbp; 1522 char **bposp; 1523 { 1524 register struct mbuf *mb = *mbp, *mb2; 1525 register char *bpos = *bposp; 1526 register u_long *tl; 1527 1528 if (before_ret) { 1529 nfsm_build(tl, u_long *, NFSX_UNSIGNED); 1530 *tl = nfs_false; 1531 } else { 1532 nfsm_build(tl, u_long *, 7 * NFSX_UNSIGNED); 1533 *tl++ = nfs_true; 1534 txdr_hyper(&(before_vap->va_size), tl); 1535 tl += 2; 1536 txdr_nfsv3time(&(before_vap->va_mtime), tl); 1537 tl += 2; 1538 txdr_nfsv3time(&(before_vap->va_ctime), tl); 1539 } 1540 *bposp = bpos; 1541 *mbp = mb; 1542 nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp); 1543 } 1544 1545 void 1546 nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp) 1547 struct nfsrv_descript *nfsd; 1548 int after_ret; 1549 struct vattr *after_vap; 1550 struct mbuf **mbp; 1551 char **bposp; 1552 { 1553 register struct mbuf *mb = *mbp, *mb2; 1554 register char *bpos = *bposp; 1555 register u_long *tl; 1556 register struct nfs_fattr *fp; 1557 1558 if (after_ret) { 1559 nfsm_build(tl, u_long *, NFSX_UNSIGNED); 1560 *tl = nfs_false; 1561 } else { 1562 nfsm_build(tl, u_long *, NFSX_UNSIGNED + NFSX_V3FATTR); 1563 *tl++ = nfs_true; 1564 fp = (struct nfs_fattr *)tl; 1565 nfsm_srvfattr(nfsd, after_vap, fp); 1566 } 1567 *mbp = mb; 1568 *bposp = bpos; 1569 } 1570 1571 void 1572 nfsm_srvfattr(nfsd, vap, fp) 1573 register struct nfsrv_descript *nfsd; 1574 register struct vattr *vap; 1575 register struct nfs_fattr *fp; 1576 { 1577 1578 fp->fa_nlink = txdr_unsigned(vap->va_nlink); 1579 fp->fa_uid = txdr_unsigned(vap->va_uid); 1580 fp->fa_gid = txdr_unsigned(vap->va_gid); 1581 if (nfsd->nd_flag & ND_NFSV3) { 1582 fp->fa_type = vtonfsv3_type(vap->va_type); 1583 fp->fa_mode = vtonfsv3_mode(vap->va_mode); 1584 txdr_hyper(&vap->va_size, &fp->fa3_size); 1585 txdr_hyper(&vap->va_bytes, &fp->fa3_used); 1586 fp->fa3_rdev.specdata1 = txdr_unsigned(major(vap->va_rdev)); 1587 fp->fa3_rdev.specdata2 = txdr_unsigned(minor(vap->va_rdev)); 1588 fp->fa3_fsid.nfsuquad[0] = 0; 1589 fp->fa3_fsid.nfsuquad[1] = txdr_unsigned(vap->va_fsid); 1590 fp->fa3_fileid.nfsuquad[0] = 0; 1591 fp->fa3_fileid.nfsuquad[1] = txdr_unsigned(vap->va_fileid); 1592 txdr_nfsv3time(&vap->va_atime, &fp->fa3_atime); 1593 txdr_nfsv3time(&vap->va_mtime, &fp->fa3_mtime); 1594 txdr_nfsv3time(&vap->va_ctime, &fp->fa3_ctime); 1595 } else { 1596 fp->fa_type = vtonfsv2_type(vap->va_type); 1597 fp->fa_mode = vtonfsv2_mode(vap->va_type, vap->va_mode); 1598 fp->fa2_size = txdr_unsigned(vap->va_size); 1599 fp->fa2_blocksize = txdr_unsigned(vap->va_blocksize); 1600 if (vap->va_type == VFIFO) 1601 fp->fa2_rdev = 0xffffffff; 1602 else 1603 fp->fa2_rdev = txdr_unsigned(vap->va_rdev); 1604 fp->fa2_blocks = txdr_unsigned(vap->va_bytes / NFS_FABLKSIZE); 1605 fp->fa2_fsid = txdr_unsigned(vap->va_fsid); 1606 fp->fa2_fileid = txdr_unsigned(vap->va_fileid); 1607 txdr_nfsv2time(&vap->va_atime, &fp->fa2_atime); 1608 txdr_nfsv2time(&vap->va_mtime, &fp->fa2_mtime); 1609 txdr_nfsv2time(&vap->va_ctime, &fp->fa2_ctime); 1610 } 1611 } 1612 1613 /* 1614 * nfsrv_fhtovp() - convert a fh to a vnode ptr (optionally locked) 1615 * - look up fsid in mount list (if not found ret error) 1616 * - get vp and export rights by calling VFS_FHTOVP() 1617 * - if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon 1618 * - if not lockflag unlock it with VOP_UNLOCK() 1619 */ 1620 int 1621 nfsrv_fhtovp(fhp, lockflag, vpp, cred, slp, nam, rdonlyp, kerbflag) 1622 fhandle_t *fhp; 1623 int lockflag; 1624 struct vnode **vpp; 1625 struct ucred *cred; 1626 struct nfssvc_sock *slp; 1627 struct mbuf *nam; 1628 int *rdonlyp; 1629 int kerbflag; 1630 { 1631 struct proc *p = curproc; /* XXX */ 1632 register struct mount *mp; 1633 register struct nfsuid *uidp; 1634 register int i; 1635 struct ucred *credanon; 1636 int error, exflags; 1637 1638 *vpp = (struct vnode *)0; 1639 mp = vfs_getvfs(&fhp->fh_fsid); 1640 if (!mp) 1641 return (ESTALE); 1642 error = VFS_FHTOVP(mp, &fhp->fh_fid, nam, vpp, &exflags, &credanon); 1643 if (error) 1644 return (error); 1645 /* 1646 * Check/setup credentials. 1647 */ 1648 if (exflags & MNT_EXKERB) { 1649 if (!kerbflag) { 1650 vput(*vpp); 1651 return (NFSERR_AUTHERR | AUTH_TOOWEAK); 1652 } 1653 } else if (kerbflag) { 1654 vput(*vpp); 1655 return (NFSERR_AUTHERR | AUTH_TOOWEAK); 1656 } else if (cred->cr_uid == 0 || (exflags & MNT_EXPORTANON)) { 1657 cred->cr_uid = credanon->cr_uid; 1658 for (i = 0; i < credanon->cr_ngroups && i < NGROUPS; i++) 1659 cred->cr_groups[i] = credanon->cr_groups[i]; 1660 cred->cr_ngroups = i; 1661 } 1662 if (exflags & MNT_EXRDONLY) 1663 *rdonlyp = 1; 1664 else 1665 *rdonlyp = 0; 1666 if (!lockflag) 1667 VOP_UNLOCK(*vpp, 0, p); 1668 return (0); 1669 } 1670 1671 /* 1672 * This function compares two net addresses by family and returns TRUE 1673 * if they are the same host. 1674 * If there is any doubt, return FALSE. 1675 * The AF_INET family is handled as a special case so that address mbufs 1676 * don't need to be saved to store "struct in_addr", which is only 4 bytes. 1677 */ 1678 int 1679 netaddr_match(family, haddr, nam) 1680 int family; 1681 union nethostaddr *haddr; 1682 struct mbuf *nam; 1683 { 1684 register struct sockaddr_in *inetaddr; 1685 1686 switch (family) { 1687 case AF_INET: 1688 inetaddr = mtod(nam, struct sockaddr_in *); 1689 if (inetaddr->sin_family == AF_INET && 1690 inetaddr->sin_addr.s_addr == haddr->had_inetaddr) 1691 return (1); 1692 break; 1693 #ifdef ISO 1694 case AF_ISO: 1695 { 1696 register struct sockaddr_iso *isoaddr1, *isoaddr2; 1697 1698 isoaddr1 = mtod(nam, struct sockaddr_iso *); 1699 isoaddr2 = mtod(haddr->had_nam, struct sockaddr_iso *); 1700 if (isoaddr1->siso_family == AF_ISO && 1701 isoaddr1->siso_nlen > 0 && 1702 isoaddr1->siso_nlen == isoaddr2->siso_nlen && 1703 SAME_ISOADDR(isoaddr1, isoaddr2)) 1704 return (1); 1705 break; 1706 } 1707 #endif /* ISO */ 1708 default: 1709 break; 1710 }; 1711 return (0); 1712 } 1713 1714 static nfsuint64 nfs_nullcookie = { 0, 0 }; 1715 /* 1716 * This function finds the directory cookie that corresponds to the 1717 * logical byte offset given. 1718 */ 1719 nfsuint64 * 1720 nfs_getcookie(np, off, add) 1721 register struct nfsnode *np; 1722 off_t off; 1723 int add; 1724 { 1725 register struct nfsdmap *dp, *dp2; 1726 register int pos; 1727 1728 pos = off / NFS_DIRBLKSIZ; 1729 if (pos == 0) { 1730 #ifdef DIAGNOSTIC 1731 if (add) 1732 panic("nfs getcookie add at 0"); 1733 #endif 1734 return (&nfs_nullcookie); 1735 } 1736 pos--; 1737 dp = np->n_cookies.lh_first; 1738 if (!dp) { 1739 if (add) { 1740 MALLOC(dp, struct nfsdmap *, sizeof (struct nfsdmap), 1741 M_NFSDIROFF, M_WAITOK); 1742 dp->ndm_eocookie = 0; 1743 LIST_INSERT_HEAD(&np->n_cookies, dp, ndm_list); 1744 } else 1745 return ((nfsuint64 *)0); 1746 } 1747 while (pos >= NFSNUMCOOKIES) { 1748 pos -= NFSNUMCOOKIES; 1749 if (dp->ndm_list.le_next) { 1750 if (!add && dp->ndm_eocookie < NFSNUMCOOKIES && 1751 pos >= dp->ndm_eocookie) 1752 return ((nfsuint64 *)0); 1753 dp = dp->ndm_list.le_next; 1754 } else if (add) { 1755 MALLOC(dp2, struct nfsdmap *, sizeof (struct nfsdmap), 1756 M_NFSDIROFF, M_WAITOK); 1757 dp2->ndm_eocookie = 0; 1758 LIST_INSERT_AFTER(dp, dp2, ndm_list); 1759 dp = dp2; 1760 } else 1761 return ((nfsuint64 *)0); 1762 } 1763 if (pos >= dp->ndm_eocookie) { 1764 if (add) 1765 dp->ndm_eocookie = pos + 1; 1766 else 1767 return ((nfsuint64 *)0); 1768 } 1769 return (&dp->ndm_cookies[pos]); 1770 } 1771 1772 /* 1773 * Invalidate cached directory information, except for the actual directory 1774 * blocks (which are invalidated separately). 1775 * Done mainly to avoid the use of stale offset cookies. 1776 */ 1777 void 1778 nfs_invaldir(vp) 1779 register struct vnode *vp; 1780 { 1781 register struct nfsnode *np = VTONFS(vp); 1782 1783 #ifdef DIAGNOSTIC 1784 if (vp->v_type != VDIR) 1785 panic("nfs: invaldir not dir"); 1786 #endif 1787 np->n_direofoffset = 0; 1788 np->n_cookieverf.nfsuquad[0] = 0; 1789 np->n_cookieverf.nfsuquad[1] = 0; 1790 if (np->n_cookies.lh_first) 1791 np->n_cookies.lh_first->ndm_eocookie = 0; 1792 } 1793 1794 /* 1795 * The write verifier has changed (probably due to a server reboot), so all 1796 * B_NEEDCOMMIT blocks will have to be written again. Since they are on the 1797 * dirty block list as B_DELWRI, all this takes is clearing the B_NEEDCOMMIT 1798 * flag. Once done the new write verifier can be set for the mount point. 1799 */ 1800 void 1801 nfs_clearcommit(mp) 1802 struct mount *mp; 1803 { 1804 register struct vnode *vp, *nvp; 1805 register struct buf *bp, *nbp; 1806 int s; 1807 1808 s = splbio(); 1809 loop: 1810 for (vp = mp->mnt_vnodelist.lh_first; vp; vp = nvp) { 1811 if (vp->v_mount != mp) /* Paranoia */ 1812 goto loop; 1813 nvp = vp->v_mntvnodes.le_next; 1814 for (bp = vp->v_dirtyblkhd.lh_first; bp; bp = nbp) { 1815 nbp = bp->b_vnbufs.le_next; 1816 if ((bp->b_flags & (B_BUSY | B_DELWRI | B_NEEDCOMMIT)) 1817 == (B_DELWRI | B_NEEDCOMMIT)) 1818 bp->b_flags &= ~B_NEEDCOMMIT; 1819 } 1820 } 1821 splx(s); 1822 } 1823 1824 /* 1825 * Map errnos to NFS error numbers. For Version 3 also filter out error 1826 * numbers not specified for the associated procedure. 1827 */ 1828 int 1829 nfsrv_errmap(nd, err) 1830 struct nfsrv_descript *nd; 1831 register int err; 1832 { 1833 register short *defaulterrp, *errp; 1834 1835 if (nd->nd_flag & ND_NFSV3) { 1836 if (nd->nd_procnum <= NFSPROC_COMMIT) { 1837 errp = defaulterrp = nfsrv_v3errmap[nd->nd_procnum]; 1838 while (*++errp) { 1839 if (*errp == err) 1840 return (err); 1841 else if (*errp > err) 1842 break; 1843 } 1844 return ((int)*defaulterrp); 1845 } else 1846 return (err & 0xffff); 1847 } 1848 if (err <= ELAST) 1849 return ((int)nfsrv_v2errmap[err - 1]); 1850 return (NFSERR_IO); 1851 } 1852
Indexes created Fri Oct 03 02:09:57 GMT 2025