bsd/nfs/nfsm_subs.h

   1 /*
   2  * Copyright (c) 2000-2002 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * The contents of this file constitute Original Code as defined in and
   7  * are subject to the Apple Public Source License Version 1.1 (the
   8  * "License").  You may not use this file except in compliance with the
   9  * License.  Please obtain a copy of the License at
  10  * http://www.apple.com/publicsource and read it before using this file.
  11  *
  12  * This Original Code and all software distributed under the License are
  13  * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  14  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  15  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  16  * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
  17  * License for the specific language governing rights and limitations
  18  * under the License.
  19  *
  20  * @APPLE_LICENSE_HEADER_END@
  21  */
  22 /* Copyright (c) 1995 NeXT Computer, Inc. All Rights Reserved */
  23 /*
  24  * Copyright (c) 1989, 1993
  25  *      The Regents of the University of California.  All rights reserved.
  26  *
  27  * This code is derived from software contributed to Berkeley by
  28  * Rick Macklem at The University of Guelph.
  29  *
  30  * Redistribution and use in source and binary forms, with or without
  31  * modification, are permitted provided that the following conditions
  32  * are met:
  33  * 1. Redistributions of source code must retain the above copyright
  34  *    notice, this list of conditions and the following disclaimer.
  35  * 2. Redistributions in binary form must reproduce the above copyright
  36  *    notice, this list of conditions and the following disclaimer in the
  37  *    documentation and/or other materials provided with the distribution.
  38  * 3. All advertising materials mentioning features or use of this software
  39  *    must display the following acknowledgement:
  40  *      This product includes software developed by the University of
  41  *      California, Berkeley and its contributors.
  42  * 4. Neither the name of the University nor the names of its contributors
  43  *    may be used to endorse or promote products derived from this software
  44  *    without specific prior written permission.
  45  *
  46  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  47  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  48  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  49  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  50  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  51  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  52  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  53  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  54  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  55  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  56  * SUCH DAMAGE.
  57  *
  58  *      @(#)nfsm_subs.h 8.2 (Berkeley) 3/30/95
  59  * FreeBSD-Id: nfsm_subs.h,v 1.13 1997/07/16 09:06:30 dfr Exp $
  60  */
  61
  62
  63 #ifndef _NFS_NFSM_SUBS_H_
  64 #define _NFS_NFSM_SUBS_H_
  65
  66 #include <sys/appleapiopts.h>
  67
  68 #ifdef __APPLE_API_PRIVATE
  69 /*
  70  * These macros do strange and peculiar things to mbuf chains for
  71  * the assistance of the nfs code. To attempt to use them for any
  72  * other purpose will be dangerous. (they make weird assumptions)
  73  */
  74
  75 /*
  76  * First define what the actual subs. return
  77  */
  78 struct mbuf *nfsm_reqh __P((struct vnode *vp, u_long procid, int hsiz,
  79                             caddr_t *bposp));
  80 struct mbuf *nfsm_rpchead __P((struct ucred *cr, int nmflag, int procid,
  81                                int auth_type, int auth_len, char *auth_str,
  82                                int verf_len, char *verf_str,
  83                                struct mbuf *mrest, int mrest_len,
  84                                struct mbuf **mbp, u_long *xidp));
  85
  86 #define M_HASCL(m)      ((m)->m_flags & M_EXT)
  87 #define NFSMINOFF(m) \
  88                 if (M_HASCL(m)) \
  89                         (m)->m_data = (m)->m_ext.ext_buf; \
  90                 else if ((m)->m_flags & M_PKTHDR) \
  91                         (m)->m_data = (m)->m_pktdat; \
  92                 else \
  93                         (m)->m_data = (m)->m_dat
  94 #define NFSMADV(m, s)   (m)->m_data += (s)
  95 #define NFSMSIZ(m)      ((M_HASCL(m))?MCLBYTES: \
  96                                 (((m)->m_flags & M_PKTHDR)?MHLEN:MLEN))
  97
  98 /*
  99  * Now for the macros that do the simple stuff and call the functions
 100  * for the hard stuff.
 101  * These macros use several vars. declared in nfsm_reqhead and these
 102  * vars. must not be used elsewhere unless you are careful not to corrupt
 103  * them. The vars. starting with pN and tN (N=1,2,3,..) are temporaries
 104  * that may be used so long as the value is not expected to retained
 105  * after a macro.
 106  * I know, this is kind of dorkey, but it makes the actual op functions
 107  * fairly clean and deals with the mess caused by the xdr discriminating
 108  * unions.
 109  */
 110
 111 #define nfsm_build(a,c,s) \
 112                 { if ((s) > M_TRAILINGSPACE(mb)) { \
 113                         MGET(mb2, M_WAIT, MT_DATA); \
 114                         if ((s) > MLEN) \
 115                                 panic("build > MLEN"); \
 116                         mb->m_next = mb2; \
 117                         mb = mb2; \
 118                         mb->m_len = 0; \
 119                         bpos = mtod(mb, caddr_t); \
 120                 } \
 121                 (a) = (c)(bpos); \
 122                 mb->m_len += (s); \
 123                 bpos += (s); }
 124
 125 #define nfsm_dissect(a, c, s) \
 126                 { t1 = mtod(md, caddr_t)+md->m_len-dpos; \
 127                 if (t1 >= (s)) { \
 128                         (a) = (c)(dpos); \
 129                         dpos += (s); \
 130                 } else if ((t1 = nfsm_disct(&md, &dpos, (s), t1, &cp2))) { \
 131                         error = t1; \
 132                         m_freem(mrep); \
 133                         goto nfsmout; \
 134                 } else { \
 135                         (a) = (c)cp2; \
 136                 } }
 137
 138 #define nfsm_fhtom(v, v3) \
 139               { if (v3) { \
 140                         t2 = nfsm_rndup(VTONFS(v)->n_fhsize) + NFSX_UNSIGNED; \
 141                         if (t2 <= M_TRAILINGSPACE(mb)) { \
 142                                 nfsm_build(tl, u_long *, t2); \
 143                                 *tl++ = txdr_unsigned(VTONFS(v)->n_fhsize); \
 144                                 *(tl + ((t2>>2) - 2)) = 0; \
 145                                 bcopy((caddr_t)VTONFS(v)->n_fhp,(caddr_t)tl, \
 146                                         VTONFS(v)->n_fhsize); \
 147                         } else if ((t2 = nfsm_strtmbuf(&mb, &bpos, \
 148                                 (caddr_t)VTONFS(v)->n_fhp, VTONFS(v)->n_fhsize))) { \
 149                                 error = t2; \
 150                                 m_freem(mreq); \
 151                                 goto nfsmout; \
 152                         } \
 153                 } else { \
 154                         nfsm_build(cp, caddr_t, NFSX_V2FH); \
 155                         bcopy((caddr_t)VTONFS(v)->n_fhp, cp, NFSX_V2FH); \
 156                 } }
 157
 158 #define nfsm_srvfhtom(f, v3) \
 159                 { if (v3) { \
 160                         nfsm_build(tl, u_long *, NFSX_UNSIGNED + NFSX_V3FH); \
 161                         *tl++ = txdr_unsigned(NFSX_V3FH); \
 162                         bcopy((caddr_t)(f), (caddr_t)tl, NFSX_V3FH); \
 163                 } else { \
 164                         nfsm_build(cp, caddr_t, NFSX_V2FH); \
 165                         bcopy((caddr_t)(f), cp, NFSX_V2FH); \
 166                 } }
 167
 168 #define nfsm_srvpostop_fh(f) \
 169                 { nfsm_build(tl, u_long *, 2 * NFSX_UNSIGNED + NFSX_V3FH); \
 170                 *tl++ = nfs_true; \
 171                 *tl++ = txdr_unsigned(NFSX_V3FH); \
 172                 bcopy((caddr_t)(f), (caddr_t)tl, NFSX_V3FH); \
 173                 }
 174
 175 #define nfsm_mtofh(d, v, v3, f, x) \
 176                 { struct nfsnode *ttnp; nfsfh_t *ttfhp; int ttfhsize; \
 177                 if (v3) { \
 178                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 179                         (f) = fxdr_unsigned(int, *tl); \
 180                 } else \
 181                         (f) = 1; \
 182                 if (f) { \
 183                         nfsm_getfh(ttfhp, ttfhsize, (v3)); \
 184                         if ((t1 = nfs_nget((d)->v_mount, ttfhp, ttfhsize, \
 185                                 &ttnp))) { \
 186                                 error = t1; \
 187                                 m_freem(mrep); \
 188                                 goto nfsmout; \
 189                         } \
 190                         (v) = NFSTOV(ttnp); \
 191                 } \
 192                 if (v3) { \
 193                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 194                         if (f) \
 195                                 (f) = fxdr_unsigned(int, *tl); \
 196                         else if (fxdr_unsigned(int, *tl)) \
 197                                 nfsm_adv(NFSX_V3FATTR); \
 198                 } \
 199                 if (f) \
 200                         nfsm_loadattr((v), (struct vattr *)0, (x)); \
 201                 }
 202
 203 #define nfsm_getfh(f, s, v3) \
 204                 { if (v3) { \
 205                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 206                         if (((s) = fxdr_unsigned(int, *tl)) <= 0 || \
 207                                 (s) > NFSX_V3FHMAX) { \
 208                                 m_freem(mrep); \
 209                                 error = EBADRPC; \
 210                                 goto nfsmout; \
 211                         } \
 212                 } else \
 213                         (s) = NFSX_V2FH; \
 214                 nfsm_dissect((f), nfsfh_t *, nfsm_rndup(s)); }
 215
 216 #define nfsm_loadattr(v, a, x) \
 217                 { struct vnode *ttvp = (v); \
 218                 if ((t1 = nfs_loadattrcache(&ttvp, &md, &dpos, (a), 0, \
 219                                             (x)))) { \
 220                         error = t1; \
 221                         m_freem(mrep); \
 222                         goto nfsmout; \
 223                 } \
 224                 (v) = ttvp; }
 225
 226 #define nfsm_postop_attr(v, f, x) \
 227                 { struct vnode *ttvp = (v); \
 228                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 229                 if (((f) = fxdr_unsigned(int, *tl))) { \
 230                         if ((t1 = nfs_loadattrcache(&ttvp, &md, &dpos, \
 231                                         (struct vattr *)0, 1, (x)))) { \
 232                                 error = t1; \
 233                                 (f) = 0; \
 234                                 m_freem(mrep); \
 235                                 goto nfsmout; \
 236                         } \
 237                         if (*(x) == 0) \
 238                                 (f) = 0; \
 239                         (v) = ttvp; \
 240                 } }
 241
 242 /* Used as (f) for nfsm_wcc_data() */
 243 #define NFSV3_WCCRATTR  0
 244 #define NFSV3_WCCCHK    1
 245
 246 #define nfsm_wcc_data(v, f, x) \
 247                 { int ttattrf, ttretf = 0; \
 248                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 249                 if (*tl == nfs_true) { \
 250                         nfsm_dissect(tl, u_long *, 6 * NFSX_UNSIGNED); \
 251                         if (f) \
 252                                 ttretf = (VTONFS(v)->n_mtime == \
 253                                         fxdr_unsigned(u_long, *(tl + 2))); \
 254                 } \
 255                 nfsm_postop_attr((v), ttattrf, (x)); \
 256                 if (f) { \
 257                         (f) = ttretf; \
 258                 } else { \
 259                         (f) = ttattrf; \
 260                 } }
 261
 262 #define nfsm_v3sattr(s, a, u, g) \
 263                 { (s)->sa_modetrue = nfs_true; \
 264                 (s)->sa_mode = vtonfsv3_mode((a)->va_mode); \
 265                 (s)->sa_uidtrue = nfs_true; \
 266                 (s)->sa_uid = txdr_unsigned(u); \
 267                 (s)->sa_gidtrue = nfs_true; \
 268                 (s)->sa_gid = txdr_unsigned(g); \
 269                 (s)->sa_sizefalse = nfs_false; \
 270                 (s)->sa_atimetype = txdr_unsigned(NFSV3SATTRTIME_TOSERVER); \
 271                 (s)->sa_mtimetype = txdr_unsigned(NFSV3SATTRTIME_TOSERVER); \
 272                 }
 273
 274 #define nfsm_strsiz(s,m) \
 275                 { nfsm_dissect(tl,u_long *,NFSX_UNSIGNED); \
 276                 if (((s) = fxdr_unsigned(long,*tl)) > (m)) { \
 277                         m_freem(mrep); \
 278                         error = EBADRPC; \
 279                         goto nfsmout; \
 280                 } }
 281
 282 #define nfsm_srvstrsiz(s,m) \
 283                 { nfsm_dissect(tl,u_long *,NFSX_UNSIGNED); \
 284                 if (((s) = fxdr_unsigned(long,*tl)) > (m) || (s) <= 0) { \
 285                         error = EBADRPC; \
 286                         nfsm_reply(0); \
 287                 } }
 288
 289 #define nfsm_srvnamesiz(s) \
 290                 { nfsm_dissect(tl,u_long *,NFSX_UNSIGNED); \
 291                 if (((s) = fxdr_unsigned(long,*tl)) > NFS_MAXNAMLEN) \
 292                         error = NFSERR_NAMETOL; \
 293                 if ((s) <= 0) \
 294                         error = EBADRPC; \
 295                 if (error) \
 296                         nfsm_reply(0); \
 297                 }
 298
 299 #define nfsm_mtouio(p,s) \
 300                 if ((s) > 0 && \
 301                    (t1 = nfsm_mbuftouio(&md,(p),(s),&dpos))) { \
 302                         error = t1; \
 303                         m_freem(mrep); \
 304                         goto nfsmout; \
 305                 }
 306
 307 #define nfsm_uiotom(p,s) \
 308                 if ((t1 = nfsm_uiotombuf((p),&mb,(s),&bpos))) { \
 309                         error = t1; \
 310                         m_freem(mreq); \
 311                         goto nfsmout; \
 312                 }
 313
 314 #define nfsm_reqhead(v,a,s) \
 315                 mb = mreq = nfsm_reqh((v),(a),(s),&bpos)
 316
 317 #define nfsm_reqdone    m_freem(mrep); \
 318                 nfsmout:
 319
 320 #define nfsm_rndup(a)   (((a)+3)&(~0x3))
 321
 322 /*
 323 * We seem to see cases mainly on shutdown where the vnode got recycled
 324 * on use while waiting on server. Maybe nfs vnode locking will help if
 325 * we implement that, but for now, check for bad vnodes and return an
 326 * error. This call spot should catch most of them. Note that NFSv2
 327 * just goes to nfsmout here, while nfsV3 goes back to caller's next
 328 * line for post-processing. It will do a nfsm_reqdone also making
 329 * m_freem(mrep). Wondering if some of our freeing problems could be
 330 * due to nfsv3 calling nfsm_reqdone unlike nfsv2. Separate problem.
 331 */
 332 #define nfsm_request(v, t, p, c, x)     \
 333                 { \
 334                 int nfsv3 = (VFSTONFS((v)->v_mount))->nm_flag & NFSMNT_NFSV3; \
 335                 if ((error = nfs_request((v), mreq, (t), (p), \
 336                    (c), &mrep, &md, &dpos, (x)))) { \
 337                         if (error & NFSERR_RETERR) \
 338                                 error &= ~NFSERR_RETERR; \
 339                         else \
 340                                 goto nfsmout; \
 341                 } \
 342                 else if ((v)->v_type==VBAD) { \
 343                     error = EINVAL; \
 344                     if (!nfsv3) \
 345                         goto nfsmout; \
 346                 } \
 347                 }
 348
 349 #define nfsm_strtom(a,s,m) \
 350                 if ((s) > (m)) { \
 351                         m_freem(mreq); \
 352                         error = ENAMETOOLONG; \
 353                         goto nfsmout; \
 354                 } \
 355                 t2 = nfsm_rndup(s)+NFSX_UNSIGNED; \
 356                 if (t2 <= M_TRAILINGSPACE(mb)) { \
 357                         nfsm_build(tl,u_long *,t2); \
 358                         *tl++ = txdr_unsigned(s); \
 359                         *(tl+((t2>>2)-2)) = 0; \
 360                         bcopy((caddr_t)(a), (caddr_t)tl, (s)); \
 361                 } else if ((t2 = nfsm_strtmbuf(&mb, &bpos, (a), (s)))) { \
 362                         error = t2; \
 363                         m_freem(mreq); \
 364                         goto nfsmout; \
 365                 }
 366
 367 #define nfsm_srvdone \
 368                 nfsmout: \
 369                 return(error)
 370
 371 #define nfsm_reply(s) \
 372                 { \
 373                 nfsd->nd_repstat = error; \
 374                 if (error && !(nfsd->nd_flag & ND_NFSV3)) \
 375                    (void) nfs_rephead(0, nfsd, slp, error, cache, &frev, \
 376                         mrq, &mb, &bpos); \
 377                 else \
 378                    (void) nfs_rephead((s), nfsd, slp, error, cache, &frev, \
 379                         mrq, &mb, &bpos); \
 380                 m_freem(mrep); \
 381                 mreq = *mrq; \
 382                 if (error && (!(nfsd->nd_flag & ND_NFSV3) || \
 383                         error == EBADRPC)) \
 384                         return(0); \
 385                 }
 386
 387 #define nfsm_writereply(s, v3) \
 388                 { \
 389                 nfsd->nd_repstat = error; \
 390                 if (error && !(v3)) \
 391                    (void) nfs_rephead(0, nfsd, slp, error, cache, &frev, \
 392                         &mreq, &mb, &bpos); \
 393                 else \
 394                    (void) nfs_rephead((s), nfsd, slp, error, cache, &frev, \
 395                         &mreq, &mb, &bpos); \
 396                 }
 397
 398 #define nfsm_adv(s) \
 399                 { t1 = mtod(md, caddr_t)+md->m_len-dpos; \
 400                 if (t1 >= (s)) { \
 401                         dpos += (s); \
 402                 } else if ((t1 = nfs_adv(&md, &dpos, (s), t1))) { \
 403                         error = t1; \
 404                         m_freem(mrep); \
 405                         goto nfsmout; \
 406                 } }
 407
 408 #define nfsm_srvmtofh(f) \
 409                 { if (nfsd->nd_flag & ND_NFSV3) { \
 410                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 411                         if (fxdr_unsigned(int, *tl) != NFSX_V3FH) { \
 412                                 error = EBADRPC; \
 413                                 nfsm_reply(0); \
 414                         } \
 415                 } \
 416                 nfsm_dissect(tl, u_long *, NFSX_V3FH); \
 417                 bcopy((caddr_t)tl, (caddr_t)(f), NFSX_V3FH); \
 418                 if ((nfsd->nd_flag & ND_NFSV3) == 0) \
 419                         nfsm_adv(NFSX_V2FH - NFSX_V3FH); \
 420                 }
 421
 422 #define nfsm_clget \
 423                 if (bp >= be) { \
 424                         if (mp == mb) \
 425                                 mp->m_len += bp-bpos; \
 426                         MGET(mp, M_WAIT, MT_DATA); \
 427                         MCLGET(mp, M_WAIT); \
 428                         mp->m_len = NFSMSIZ(mp); \
 429                         mp2->m_next = mp; \
 430                         mp2 = mp; \
 431                         bp = mtod(mp, caddr_t); \
 432                         be = bp+mp->m_len; \
 433                 } \
 434                 tl = (u_long *)bp
 435
 436 #define nfsm_srvfillattr(a, f) \
 437                 nfsm_srvfattr(nfsd, (a), (f))
 438
 439 #define nfsm_srvwcc_data(br, b, ar, a) \
 440                 nfsm_srvwcc(nfsd, (br), (b), (ar), (a), &mb, &bpos)
 441
 442 #define nfsm_srvpostop_attr(r, a) \
 443                 nfsm_srvpostopattr(nfsd, (r), (a), &mb, &bpos)
 444
 445 #define nfsm_srvsattr(a) \
 446                 { nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 447                 if (*tl == nfs_true) { \
 448                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 449                         (a)->va_mode = nfstov_mode(*tl); \
 450                 } \
 451                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 452                 if (*tl == nfs_true) { \
 453                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 454                         (a)->va_uid = fxdr_unsigned(uid_t, *tl); \
 455                 } \
 456                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 457                 if (*tl == nfs_true) { \
 458                         nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 459                         (a)->va_gid = fxdr_unsigned(gid_t, *tl); \
 460                 } \
 461                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 462                 if (*tl == nfs_true) { \
 463                         nfsm_dissect(tl, u_long *, 2 * NFSX_UNSIGNED); \
 464                         fxdr_hyper(tl, &(a)->va_size); \
 465                 } \
 466                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 467                 switch (fxdr_unsigned(int, *tl)) { \
 468                 case NFSV3SATTRTIME_TOCLIENT: \
 469                         nfsm_dissect(tl, u_long *, 2 * NFSX_UNSIGNED); \
 470                         fxdr_nfsv3time(tl, &(a)->va_atime); \
 471                         break; \
 472                 case NFSV3SATTRTIME_TOSERVER: \
 473                         (a)->va_atime.tv_sec = time.tv_sec; \
 474                         (a)->va_atime.tv_nsec = time.tv_usec * 1000; \
 475                         break; \
 476                 }; \
 477                 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); \
 478                 switch (fxdr_unsigned(int, *tl)) { \
 479                 case NFSV3SATTRTIME_TOCLIENT: \
 480                         nfsm_dissect(tl, u_long *, 2 * NFSX_UNSIGNED); \
 481                         fxdr_nfsv3time(tl, &(a)->va_mtime); \
 482                         break; \
 483                 case NFSV3SATTRTIME_TOSERVER: \
 484                         (a)->va_mtime.tv_sec = time.tv_sec; \
 485                         (a)->va_mtime.tv_nsec = time.tv_usec * 1000; \
 486                         break; \
 487                 }; }
 488
 489 #endif /* __APPLE_API_PRIVATE */
 490 #endif /* _NFS_NFSM_SUBS_H_ */