1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 
  22 /*
  23  * Copyright (c) 1990, 2010, Oracle and/or its affiliates. All rights reserved.
  24  */
  25 
  26 /*
  27  *      Copyright 1983, 1984, 1985, 1986, 1987, 1988, 1989  AT&T.
  28  *              All rights reserved.
  29  */
  30 
  31 /*
  32  * Copyright 2018 Nexenta Systems, Inc.
  33  */
  34 
  35 #include <sys/types.h>
  36 #include <sys/param.h>
  37 #include <sys/time.h>
  38 #include <sys/vfs.h>
  39 #include <sys/vnode.h>
  40 #include <sys/socket.h>
  41 #include <sys/errno.h>
  42 #include <sys/uio.h>
  43 #include <sys/proc.h>
  44 #include <sys/user.h>
  45 #include <sys/file.h>
  46 #include <sys/tiuser.h>
  47 #include <sys/kmem.h>
  48 #include <sys/pathname.h>
  49 #include <sys/debug.h>
  50 #include <sys/vtrace.h>
  51 #include <sys/cmn_err.h>
  52 #include <sys/acl.h>
  53 #include <sys/utsname.h>
  54 #include <sys/sdt.h>
  55 #include <netinet/in.h>
  56 #include <sys/avl.h>
  57 
  58 #include <rpc/types.h>
  59 #include <rpc/auth.h>
  60 #include <rpc/svc.h>
  61 
  62 #include <nfs/nfs.h>
  63 #include <nfs/export.h>
  64 #include <nfs/nfssys.h>
  65 #include <nfs/nfs_clnt.h>
  66 #include <nfs/nfs_acl.h>
  67 #include <nfs/nfs_log.h>
  68 #include <nfs/lm.h>
  69 #include <sys/sunddi.h>
  70 
  71 /*
  72  * exi_id support
  73  *
  74  * exi_id_next          The next exi_id available.
  75  * exi_id_overflow      The exi_id_next already overflowed, so we should
  76  *                      thoroughly check for duplicates.
  77  * exi_id_tree          AVL tree indexed by exi_id.
  78  * nfs_exi_id_lock      Lock to protect the export ID list
  79  *
  80  * All exi_id_next, exi_id_overflow, and exi_id_tree are protected by
  81  * nfs_exi_id_lock.
  82  */
  83 static int exi_id_next;
  84 static bool_t exi_id_overflow;
  85 avl_tree_t exi_id_tree;
  86 kmutex_t nfs_exi_id_lock;
  87 
  88 static int      unexport(nfs_export_t *, exportinfo_t *);
  89 static void     exportfree(exportinfo_t *);
  90 static int      loadindex(exportdata_t *);
  91 
  92 extern void     nfsauth_cache_free(exportinfo_t *);
  93 extern int      sec_svc_loadrootnames(int, int, caddr_t **, model_t);
  94 extern void     sec_svc_freerootnames(int, int, caddr_t *);
  95 
  96 static int      build_seclist_nodups(exportdata_t *, secinfo_t *, int);
  97 static void     srv_secinfo_add(secinfo_t **, int *, secinfo_t *, int, int);
  98 static void     srv_secinfo_remove(secinfo_t **, int *, secinfo_t *, int);
  99 static void     srv_secinfo_treeclimb(nfs_export_t *, exportinfo_t *,
 100                     secinfo_t *, int, bool_t);
 101 
 102 #ifdef VOLATILE_FH_TEST
 103 static struct ex_vol_rename *find_volrnm_fh(exportinfo_t *, nfs_fh4 *);
 104 static uint32_t find_volrnm_fh_id(exportinfo_t *, nfs_fh4 *);
 105 static void     free_volrnm_list(exportinfo_t *);
 106 #endif /* VOLATILE_FH_TEST */
 107 
 108 fhandle_t nullfh2;      /* for comparing V2 filehandles */
 109 
 110 /*
 111  * macro for static dtrace probes to trace server namespace ref count mods.
 112  */
 113 #define SECREF_TRACE(seclist, tag, flav, aftcnt) \
 114         DTRACE_PROBE4(nfss__i__nmspc__secref, struct secinfo *, (seclist), \
 115                 char *, (tag), int, (int)(flav), int, (int)(aftcnt))
 116 
 117 
 118 #define exptablehash(fsid, fid) (nfs_fhhash((fsid), (fid)) & (EXPTABLESIZE - 1))
 119 
 120 extern nfs_export_t *
 121 nfs_get_export(void)
 122 {
 123         nfs_globals_t *ng = nfs_srv_getzg();
 124         nfs_export_t *ne = ng->nfs_export;
 125         ASSERT(ne != NULL);
 126         return (ne);
 127 }
 128 
 129 static uint8_t
 130 xor_hash(uint8_t *data, int len)
 131 {
 132         uint8_t h = 0;
 133 
 134         while (len--)
 135                 h ^= *data++;
 136 
 137         return (h);
 138 }
 139 
 140 /*
 141  * File handle hash function, XOR over all bytes in fsid and fid.
 142  */
 143 static unsigned
 144 nfs_fhhash(fsid_t *fsid, fid_t *fid)
 145 {
 146         int len;
 147         uint8_t h;
 148 
 149         h = xor_hash((uint8_t *)fsid, sizeof (fsid_t));
 150 
 151         /*
 152          * Sanity check the length before using it
 153          * blindly in case the client trashed it.
 154          */
 155         len = fid->fid_len > NFS_FH4MAXDATA ? 0 : fid->fid_len;
 156         h ^= xor_hash((uint8_t *)fid->fid_data, len);
 157 
 158         return ((unsigned)h);
 159 }
 160 
 161 /*
 162  * Free the memory allocated within a secinfo entry.
 163  */
 164 void
 165 srv_secinfo_entry_free(struct secinfo *secp)
 166 {
 167         if (secp->s_rootcnt > 0 && secp->s_rootnames != NULL) {
 168                 sec_svc_freerootnames(secp->s_secinfo.sc_rpcnum,
 169                     secp->s_rootcnt, secp->s_rootnames);
 170                 secp->s_rootcnt = 0;
 171         }
 172 
 173         if ((secp->s_secinfo.sc_rpcnum == RPCSEC_GSS) &&
 174             (secp->s_secinfo.sc_gss_mech_type)) {
 175                 kmem_free(secp->s_secinfo.sc_gss_mech_type->elements,
 176                     secp->s_secinfo.sc_gss_mech_type->length);
 177                 kmem_free(secp->s_secinfo.sc_gss_mech_type,
 178                     sizeof (rpc_gss_OID_desc));
 179                 secp->s_secinfo.sc_gss_mech_type = NULL;
 180         }
 181 }
 182 
 183 /*
 184  * Free a list of secinfo allocated in the exportdata structure.
 185  */
 186 void
 187 srv_secinfo_list_free(struct secinfo *secinfo, int cnt)
 188 {
 189         int i;
 190 
 191         if (cnt == 0)
 192                 return;
 193 
 194         for (i = 0; i < cnt; i++)
 195                 srv_secinfo_entry_free(&secinfo[i]);
 196 
 197         kmem_free(secinfo, cnt * sizeof (struct secinfo));
 198 }
 199 
 200 /*
 201  * Allocate and copy a secinfo data from "from" to "to".
 202  *
 203  * This routine is used by srv_secinfo_add() to add a new flavor to an
 204  * ancestor's export node. The rootnames are not copied because the
 205  * allowable rootname access only applies to the explicit exported node,
 206  * not its ancestor's.
 207  *
 208  * "to" should have already been allocated and zeroed before calling
 209  * this routine.
 210  *
 211  * This routine is used under the protection of exported_lock (RW_WRITER).
 212  */
 213 void
 214 srv_secinfo_copy(struct secinfo *from, struct secinfo *to)
 215 {
 216         to->s_secinfo.sc_nfsnum = from->s_secinfo.sc_nfsnum;
 217         to->s_secinfo.sc_rpcnum = from->s_secinfo.sc_rpcnum;
 218 
 219         if (from->s_secinfo.sc_rpcnum == RPCSEC_GSS) {
 220                 to->s_secinfo.sc_service = from->s_secinfo.sc_service;
 221                 bcopy(from->s_secinfo.sc_name, to->s_secinfo.sc_name,
 222                     strlen(from->s_secinfo.sc_name));
 223                 bcopy(from->s_secinfo.sc_gss_mech, to->s_secinfo.sc_gss_mech,
 224                     strlen(from->s_secinfo.sc_gss_mech));
 225 
 226                 /* copy mechanism oid */
 227                 to->s_secinfo.sc_gss_mech_type =
 228                     kmem_alloc(sizeof (rpc_gss_OID_desc), KM_SLEEP);
 229                 to->s_secinfo.sc_gss_mech_type->length =
 230                     from->s_secinfo.sc_gss_mech_type->length;
 231                 to->s_secinfo.sc_gss_mech_type->elements =
 232                     kmem_alloc(from->s_secinfo.sc_gss_mech_type->length,
 233                     KM_SLEEP);
 234                 bcopy(from->s_secinfo.sc_gss_mech_type->elements,
 235                     to->s_secinfo.sc_gss_mech_type->elements,
 236                     from->s_secinfo.sc_gss_mech_type->length);
 237         }
 238 
 239         to->s_refcnt = from->s_refcnt;
 240         to->s_window = from->s_window;
 241         /* no need to copy the mode bits - s_flags */
 242 }
 243 
 244 /*
 245  * Create a secinfo array without duplicates.  The condensed
 246  * flavor list is used to propagate flavor ref counts  to an
 247  * export's ancestor pseudonodes.
 248  */
 249 static int
 250 build_seclist_nodups(exportdata_t *exd, secinfo_t *nodups, int exponly)
 251 {
 252         int ccnt, c;
 253         int ncnt, n;
 254         struct secinfo *cursec;
 255 
 256         ncnt = 0;
 257         ccnt = exd->ex_seccnt;
 258         cursec = exd->ex_secinfo;
 259 
 260         for (c = 0; c < ccnt; c++) {
 261 
 262                 if (exponly && ! SEC_REF_EXPORTED(&cursec[c]))
 263                         continue;
 264 
 265                 for (n = 0; n < ncnt; n++) {
 266                         if (nodups[n].s_secinfo.sc_nfsnum ==
 267                             cursec[c].s_secinfo.sc_nfsnum)
 268                                 break;
 269                 }
 270 
 271                 /*
 272                  * The structure copy below also copys ptrs embedded
 273                  * within struct secinfo.  The ptrs are copied but
 274                  * they are never freed from the nodups array.  If
 275                  * an ancestor's secinfo array doesn't contain one
 276                  * of the nodups flavors, then the entry is properly
 277                  * copied into the ancestor's secinfo array.
 278                  * (see srv_secinfo_copy)
 279                  */
 280                 if (n == ncnt) {
 281                         nodups[n] = cursec[c];
 282                         ncnt++;
 283                 }
 284         }
 285         return (ncnt);
 286 }
 287 
 288 /*
 289  * Add the new security flavors from newdata to the current list, pcursec.
 290  * Upon return, *pcursec has the newly merged secinfo list.
 291  *
 292  * There should be at least 1 secinfo entry in newsec.
 293  *
 294  * This routine is used under the protection of exported_lock (RW_WRITER).
 295  */
 296 static void
 297 srv_secinfo_add(secinfo_t **pcursec, int *pcurcnt, secinfo_t *newsec,
 298     int newcnt, int is_pseudo)
 299 {
 300         int ccnt, c;            /* sec count in current data - curdata */
 301         int n;                  /* index for newsec  - newsecinfo */
 302         int tcnt;               /* total sec count after merge */
 303         int mcnt;               /* total sec count after merge */
 304         struct secinfo *msec;   /* merged secinfo list */
 305         struct secinfo *cursec;
 306 
 307         cursec = *pcursec;
 308         ccnt = *pcurcnt;
 309 
 310         ASSERT(newcnt > 0);
 311         tcnt = ccnt + newcnt;
 312 
 313         for (n = 0; n < newcnt; n++) {
 314                 for (c = 0; c < ccnt; c++) {
 315                         if (newsec[n].s_secinfo.sc_nfsnum ==
 316                             cursec[c].s_secinfo.sc_nfsnum) {
 317                                 cursec[c].s_refcnt += newsec[n].s_refcnt;
 318                                 SECREF_TRACE(cursec, "add_ref",
 319                                     cursec[c].s_secinfo.sc_nfsnum,
 320                                     cursec[c].s_refcnt);
 321                                 tcnt--;
 322                                 break;
 323                         }
 324                 }
 325         }
 326 
 327         if (tcnt == ccnt)
 328                 return; /* no change; no new flavors */
 329 
 330         msec = kmem_zalloc(tcnt * sizeof (struct secinfo), KM_SLEEP);
 331 
 332         /* move current secinfo list data to the new list */
 333         for (c = 0; c < ccnt; c++)
 334                 msec[c] = cursec[c];
 335 
 336         /* Add the flavor that's not in the current data */
 337         mcnt = ccnt;
 338         for (n = 0; n < newcnt; n++) {
 339                 for (c = 0; c < ccnt; c++) {
 340                         if (newsec[n].s_secinfo.sc_nfsnum ==
 341                             cursec[c].s_secinfo.sc_nfsnum)
 342                                 break;
 343                 }
 344 
 345                 /* This is the one. Add it. */
 346                 if (c == ccnt) {
 347                         srv_secinfo_copy(&newsec[n], &msec[mcnt]);
 348 
 349                         if (is_pseudo)
 350                                 msec[mcnt].s_flags = M_RO;
 351 
 352                         SECREF_TRACE(msec, "new_ref",
 353                             msec[mcnt].s_secinfo.sc_nfsnum,
 354                             msec[mcnt].s_refcnt);
 355                         mcnt++;
 356                 }
 357         }
 358 
 359         ASSERT(mcnt == tcnt);
 360 
 361         /*
 362          * Done. Update curdata. Free the old secinfo list in
 363          * curdata and return the new sec array info
 364          */
 365         if (ccnt > 0)
 366                 kmem_free(cursec, ccnt * sizeof (struct secinfo));
 367         *pcurcnt = tcnt;
 368         *pcursec = msec;
 369 }
 370 
 371 /*
 372  * For NFS V4.
 373  * Remove the security data of the unexported node from its ancestors.
 374  * Assume there is at least one flavor entry in the current sec list
 375  * (pcursec).
 376  *
 377  * This routine is used under the protection of exported_lock (RW_WRITER).
 378  *
 379  * Every element of remsec is an explicitly exported flavor.  If
 380  * srv_secinfo_remove() is called fom an exportfs error path, then
 381  * the flavor list was derived from the user's share cmdline,
 382  * and all flavors are explicit.  If it was called from the unshare path,
 383  * build_seclist_nodups() was called with the exponly flag.
 384  */
 385 static void
 386 srv_secinfo_remove(secinfo_t **pcursec, int *pcurcnt, secinfo_t *remsec,
 387     int remcnt)
 388 {
 389         int ccnt, c;            /* sec count in current data - cursec */
 390         int r;                  /* sec count in removal data - remsec */
 391         int tcnt, mcnt;         /* total sec count after removing */
 392         struct secinfo *msec;   /* final secinfo list after removing */
 393         struct secinfo *cursec;
 394 
 395         cursec = *pcursec;
 396         ccnt = *pcurcnt;
 397         tcnt = ccnt;
 398 
 399         for (r = 0; r < remcnt; r++) {
 400                 /*
 401                  * At unshare/reshare time, only explicitly shared flavor ref
 402                  * counts are decremented and propagated to ancestors.
 403                  * Implicit flavor refs came from shared descendants, and
 404                  * they must be kept.
 405                  */
 406                 if (! SEC_REF_EXPORTED(&remsec[r]))
 407                         continue;
 408 
 409                 for (c = 0; c < ccnt; c++) {
 410                         if (remsec[r].s_secinfo.sc_nfsnum ==
 411                             cursec[c].s_secinfo.sc_nfsnum) {
 412 
 413                                 /*
 414                                  * Decrement secinfo reference count by 1.
 415                                  * If this entry is invalid after decrementing
 416                                  * the count (i.e. count < 1), this entry will
 417                                  * be removed.
 418                                  */
 419                                 cursec[c].s_refcnt--;
 420 
 421                                 SECREF_TRACE(cursec, "del_ref",
 422                                     cursec[c].s_secinfo.sc_nfsnum,
 423                                     cursec[c].s_refcnt);
 424 
 425                                 ASSERT(cursec[c].s_refcnt >= 0);
 426 
 427                                 if (SEC_REF_INVALID(&cursec[c]))
 428                                         tcnt--;
 429                                 break;
 430                         }
 431                 }
 432         }
 433 
 434         ASSERT(tcnt >= 0);
 435         if (tcnt == ccnt)
 436                 return; /* no change; no flavors to remove */
 437 
 438         if (tcnt == 0) {
 439                 srv_secinfo_list_free(cursec, ccnt);
 440                 *pcurcnt = 0;
 441                 *pcursec = NULL;
 442                 return;
 443         }
 444 
 445         msec = kmem_zalloc(tcnt * sizeof (struct secinfo), KM_SLEEP);
 446 
 447         /* walk thru the given secinfo list to remove the flavors */
 448         mcnt = 0;
 449         for (c = 0; c < ccnt; c++) {
 450                 if (SEC_REF_INVALID(&cursec[c])) {
 451                         srv_secinfo_entry_free(&cursec[c]);
 452                 } else {
 453                         msec[mcnt] = cursec[c];
 454                         mcnt++;
 455                 }
 456         }
 457 
 458         ASSERT(mcnt == tcnt);
 459         /*
 460          * Done. Update curdata.
 461          * Free the existing secinfo list in curdata. All pointers
 462          * within the list have either been moved to msec or freed
 463          * if it's invalid.
 464          */
 465         kmem_free(*pcursec, ccnt * sizeof (struct secinfo));
 466         *pcursec = msec;
 467         *pcurcnt = tcnt;
 468 }
 469 
 470 
 471 /*
 472  * For the reshare case, sec flavor accounting happens in 3 steps:
 473  * 1) propagate addition of new flavor refs up the ancestor tree
 474  * 2) transfer flavor refs of descendants to new/reshared exportdata
 475  * 3) propagate removal of old flavor refs up the ancestor tree
 476  *
 477  * srv_secinfo_exp2exp() implements step 2 of a reshare.  At this point,
 478  * the new flavor list has already been propagated up through the
 479  * ancestor tree via srv_secinfo_treeclimb().
 480  *
 481  * If there is more than 1 export reference to an old flavor (i.e. some
 482  * of its children shared with this flavor), this flavor information
 483  * needs to be transferred to the new exportdata struct.  A flavor in
 484  * the old exportdata has descendant refs when its s_refcnt > 1 or it
 485  * is implicitly shared (M_SEC4_EXPORTED not set in s_flags).
 486  *
 487  * SEC_REF_EXPORTED() is only true when  M_SEC4_EXPORTED is set
 488  * SEC_REF_SELF() is only true when both M_SEC4_EXPORTED is set and s_refcnt==1
 489  *
 490  * Transferring descendant flavor refcnts happens in 2 passes:
 491  * a) flavors used before (oldsecinfo) and after (curdata->ex_secinfo) reshare
 492  * b) flavors used before but not after reshare
 493  *
 494  * This routine is used under the protection of exported_lock (RW_WRITER).
 495  */
 496 void
 497 srv_secinfo_exp2exp(exportdata_t *curdata, secinfo_t *oldsecinfo, int ocnt)
 498 {
 499         int ccnt, c;            /* sec count in current data - curdata */
 500         int o;                  /* sec count in old data - oldsecinfo */
 501         int tcnt, mcnt;         /* total sec count after the transfer */
 502         struct secinfo *msec;   /* merged secinfo list */
 503 
 504         ccnt = curdata->ex_seccnt;
 505 
 506         ASSERT(ocnt > 0);
 507         ASSERT(!(curdata->ex_flags & EX_PSEUDO));
 508 
 509         /*
 510          * If the oldsecinfo has flavors with more than 1 reference count
 511          * and the flavor is specified in the reshare, transfer the flavor
 512          * refs to the new seclist (curdata.ex_secinfo).
 513          */
 514         tcnt = ccnt + ocnt;
 515 
 516         for (o = 0; o < ocnt; o++) {
 517 
 518                 if (SEC_REF_SELF(&oldsecinfo[o])) {
 519                         tcnt--;
 520                         continue;
 521                 }
 522 
 523                 for (c = 0; c < ccnt; c++) {
 524                         if (oldsecinfo[o].s_secinfo.sc_nfsnum ==
 525                             curdata->ex_secinfo[c].s_secinfo.sc_nfsnum) {
 526 
 527                                 /*
 528                                  * add old reference to the current
 529                                  * secinfo count
 530                                  */
 531                                 curdata->ex_secinfo[c].s_refcnt +=
 532                                     oldsecinfo[o].s_refcnt;
 533 
 534                                 /*
 535                                  * Delete the old export flavor
 536                                  * reference.  The initial reference
 537                                  * was created during srv_secinfo_add,
 538                                  * and the count is decremented below
 539                                  * to account for the initial reference.
 540                                  */
 541                                 if (SEC_REF_EXPORTED(&oldsecinfo[o]))
 542                                         curdata->ex_secinfo[c].s_refcnt--;
 543 
 544                                 SECREF_TRACE(curdata->ex_path,
 545                                     "reshare_xfer_common_child_refs",
 546                                     curdata->ex_secinfo[c].s_secinfo.sc_nfsnum,
 547                                     curdata->ex_secinfo[c].s_refcnt);
 548 
 549                                 ASSERT(curdata->ex_secinfo[c].s_refcnt >= 0);
 550 
 551                                 tcnt--;
 552                                 break;
 553                         }
 554                 }
 555         }
 556 
 557         if (tcnt == ccnt)
 558                 return; /* no more transfer to do */
 559 
 560         /*
 561          * oldsecinfo has flavors referenced by its children that are not
 562          * in the current (new) export flavor list.  Add these flavors.
 563          */
 564         msec = kmem_zalloc(tcnt * sizeof (struct secinfo), KM_SLEEP);
 565 
 566         /* move current secinfo list data to the new list */
 567         for (c = 0; c < ccnt; c++)
 568                 msec[c] = curdata->ex_secinfo[c];
 569 
 570         /*
 571          * Add the flavor that's not in the new export, but still
 572          * referenced by its children.
 573          */
 574         mcnt = ccnt;
 575         for (o = 0; o < ocnt; o++) {
 576                 if (! SEC_REF_SELF(&oldsecinfo[o])) {
 577                         for (c = 0; c < ccnt; c++) {
 578                                 if (oldsecinfo[o].s_secinfo.sc_nfsnum ==
 579                                     curdata->ex_secinfo[c].s_secinfo.sc_nfsnum)
 580                                         break;
 581                         }
 582 
 583                         /*
 584                          * This is the one. Add it. Decrement the ref count
 585                          * by 1 if the flavor is an explicitly shared flavor
 586                          * for the oldsecinfo export node.
 587                          */
 588                         if (c == ccnt) {
 589                                 srv_secinfo_copy(&oldsecinfo[o], &msec[mcnt]);
 590                                 if (SEC_REF_EXPORTED(&oldsecinfo[o]))
 591                                         msec[mcnt].s_refcnt--;
 592 
 593                                 SECREF_TRACE(curdata,
 594                                     "reshare_xfer_implicit_child_refs",
 595                                     msec[mcnt].s_secinfo.sc_nfsnum,
 596                                     msec[mcnt].s_refcnt);
 597 
 598                                 ASSERT(msec[mcnt].s_refcnt >= 0);
 599                                 mcnt++;
 600                         }
 601                 }
 602         }
 603 
 604         ASSERT(mcnt == tcnt);
 605         /*
 606          * Done. Update curdata, free the existing secinfo list in
 607          * curdata and set the new value.
 608          */
 609         if (ccnt > 0)
 610                 kmem_free(curdata->ex_secinfo, ccnt * sizeof (struct secinfo));
 611         curdata->ex_seccnt = tcnt;
 612         curdata->ex_secinfo = msec;
 613 }
 614 
 615 /*
 616  * When unsharing an old export node and the old node becomes a pseudo node,
 617  * if there is more than 1 export reference to an old flavor (i.e. some of
 618  * its children shared with this flavor), this flavor information needs to
 619  * be transferred to the new shared node.
 620  *
 621  * This routine is used under the protection of exported_lock (RW_WRITER).
 622  */
 623 void
 624 srv_secinfo_exp2pseu(exportdata_t *curdata, exportdata_t *olddata)
 625 {
 626         int ocnt, o;            /* sec count in transfer data - trandata */
 627         int tcnt, mcnt;         /* total sec count after transfer */
 628         struct secinfo *msec;   /* merged secinfo list */
 629 
 630         ASSERT(curdata->ex_flags & EX_PSEUDO);
 631         ASSERT(curdata->ex_seccnt == 0);
 632 
 633         ocnt = olddata->ex_seccnt;
 634 
 635         /*
 636          * If the olddata has flavors with more than 1 reference count,
 637          * transfer the information to the curdata.
 638          */
 639         tcnt = ocnt;
 640 
 641         for (o = 0; o < ocnt; o++) {
 642                 if (SEC_REF_SELF(&olddata->ex_secinfo[o]))
 643                         tcnt--;
 644         }
 645 
 646         if (tcnt == 0)
 647                 return; /* no transfer to do */
 648 
 649         msec = kmem_zalloc(tcnt * sizeof (struct secinfo), KM_SLEEP);
 650 
 651         mcnt = 0;
 652         for (o = 0; o < ocnt; o++) {
 653                 if (! SEC_REF_SELF(&olddata->ex_secinfo[o])) {
 654 
 655                         /*
 656                          * Decrement the reference count by 1 if the flavor is
 657                          * an explicitly shared flavor for the olddata export
 658                          * node.
 659                          */
 660                         srv_secinfo_copy(&olddata->ex_secinfo[o], &msec[mcnt]);
 661                         msec[mcnt].s_flags = M_RO;
 662                         if (SEC_REF_EXPORTED(&olddata->ex_secinfo[o]))
 663                                 msec[mcnt].s_refcnt--;
 664 
 665                         SECREF_TRACE(curdata, "unshare_morph_pseudo",
 666                             msec[mcnt].s_secinfo.sc_nfsnum,
 667                             msec[mcnt].s_refcnt);
 668 
 669                         ASSERT(msec[mcnt].s_refcnt >= 0);
 670                         mcnt++;
 671                 }
 672         }
 673 
 674         ASSERT(mcnt == tcnt);
 675         /*
 676          * Done. Update curdata.
 677          * Free up the existing secinfo list in curdata and
 678          * set the new value.
 679          */
 680         curdata->ex_seccnt = tcnt;
 681         curdata->ex_secinfo = msec;
 682 }
 683 
 684 /*
 685  * Find for given treenode the exportinfo which has its
 686  * exp_visible linked on its exi_visible list.
 687  *
 688  * Note: We could add new pointer either to treenode or
 689  * to exp_visible, which will point there directly.
 690  * This would buy some speed for some memory.
 691  */
 692 exportinfo_t *
 693 vis2exi(treenode_t *tnode)
 694 {
 695         exportinfo_t *exi_ret = NULL;
 696 
 697         for (;;) {
 698                 tnode = tnode->tree_parent;
 699                 if (TREE_ROOT(tnode)) {
 700                         exi_ret = tnode->tree_exi;
 701                         break;
 702                 }
 703         }
 704 
 705         /* Every visible should have its home exportinfo */
 706         ASSERT(exi_ret != NULL);
 707         return (exi_ret);
 708 }
 709 
 710 /*
 711  * For NFS V4.
 712  * Add or remove the newly exported or unexported security flavors of the
 713  * given exportinfo from its ancestors upto the system root.
 714  */
 715 static void
 716 srv_secinfo_treeclimb(nfs_export_t *ne, exportinfo_t *exip, secinfo_t *sec,
 717     int seccnt, bool_t isadd)
 718 {
 719         treenode_t *tnode;
 720 
 721         ASSERT(RW_WRITE_HELD(&ne->exported_lock));
 722 
 723         /*
 724          * exi_tree can be null for the zone root
 725          * which means we're already at the "top"
 726          * and there's nothing more to "climb".
 727          */
 728         tnode = exip->exi_tree;
 729         if (tnode == NULL) {
 730                 /* Should only happen for... */
 731                 ASSERT(exip == ne->exi_root);
 732                 return;
 733         }
 734 
 735         if (seccnt == 0)
 736                 return;
 737 
 738         /*
 739          * If flavors are being added and the new export root isn't
 740          * also VROOT, its implicitly allowed flavors are inherited from
 741          * its pseudonode.
 742          * Note - for VROOT exports the implicitly allowed flavors were
 743          * transferred from the PSEUDO export in exportfs()
 744          */
 745         if (isadd && !(exip->exi_vp->v_flag & VROOT) &&
 746             !VN_CMP(exip->exi_vp, EXI_TO_ZONEROOTVP(exip)) &&
 747             tnode->tree_vis->vis_seccnt > 0) {
 748                 srv_secinfo_add(&exip->exi_export.ex_secinfo,
 749                     &exip->exi_export.ex_seccnt, tnode->tree_vis->vis_secinfo,
 750                     tnode->tree_vis->vis_seccnt, FALSE);
 751         }
 752 
 753         /*
 754          * Move to parent node and propagate sec flavor
 755          * to exportinfo and to visible structures.
 756          */
 757         tnode = tnode->tree_parent;
 758 
 759         while (tnode != NULL) {
 760 
 761                 /* If there is exportinfo, update it */
 762                 if (tnode->tree_exi != NULL) {
 763                         secinfo_t **pxsec =
 764                             &tnode->tree_exi->exi_export.ex_secinfo;
 765                         int *pxcnt = &tnode->tree_exi->exi_export.ex_seccnt;
 766                         int is_pseudo = PSEUDO(tnode->tree_exi);
 767                         if (isadd)
 768                                 srv_secinfo_add(pxsec, pxcnt, sec, seccnt,
 769                                     is_pseudo);
 770                         else
 771                                 srv_secinfo_remove(pxsec, pxcnt, sec, seccnt);
 772                 }
 773 
 774                 /* Update every visible - only root node has no visible */
 775                 if (tnode->tree_vis != NULL) {
 776                         secinfo_t **pxsec = &tnode->tree_vis->vis_secinfo;
 777                         int *pxcnt = &tnode->tree_vis->vis_seccnt;
 778                         if (isadd)
 779                                 srv_secinfo_add(pxsec, pxcnt, sec, seccnt,
 780                                     FALSE);
 781                         else
 782                                 srv_secinfo_remove(pxsec, pxcnt, sec, seccnt);
 783                 }
 784                 tnode = tnode->tree_parent;
 785         }
 786 }
 787 
 788 /* hash_name is a text substitution for either fid_hash or path_hash */
 789 #define exp_hash_unlink(exi, hash_name) \
 790         if (*(exi)->hash_name.bckt == (exi)) \
 791                 *(exi)->hash_name.bckt = (exi)->hash_name.next; \
 792         if ((exi)->hash_name.prev) \
 793                 (exi)->hash_name.prev->hash_name.next = (exi)->hash_name.next; \
 794         if ((exi)->hash_name.next) \
 795                 (exi)->hash_name.next->hash_name.prev = (exi)->hash_name.prev; \
 796         (exi)->hash_name.bckt = NULL;
 797 
 798 #define exp_hash_link(exi, hash_name, bucket) \
 799         (exi)->hash_name.bckt = (bucket); \
 800         (exi)->hash_name.prev = NULL; \
 801         (exi)->hash_name.next = *(bucket); \
 802         if ((exi)->hash_name.next) \
 803                 (exi)->hash_name.next->hash_name.prev = (exi); \
 804         *(bucket) = (exi);
 805 
 806 void
 807 export_link(nfs_export_t *ne, exportinfo_t *exi)
 808 {
 809         exportinfo_t **bckt;
 810 
 811         ASSERT(RW_WRITE_HELD(&ne->exported_lock));
 812 
 813         bckt = &ne->exptable[exptablehash(&exi->exi_fsid, &exi->exi_fid)];
 814         exp_hash_link(exi, fid_hash, bckt);
 815 
 816         bckt = &ne->exptable_path_hash[pkp_tab_hash(exi->exi_export.ex_path,
 817             strlen(exi->exi_export.ex_path))];
 818         exp_hash_link(exi, path_hash, bckt);
 819         exi->exi_ne = ne;
 820 }
 821 
 822 /*
 823  * Helper functions for exi_id handling
 824  */
 825 static int
 826 exi_id_compar(const void *v1, const void *v2)
 827 {
 828         const struct exportinfo *e1 = v1;
 829         const struct exportinfo *e2 = v2;
 830 
 831         if (e1->exi_id < e2->exi_id)
 832                 return (-1);
 833         if (e1->exi_id > e2->exi_id)
 834                 return (1);
 835 
 836         return (0);
 837 }
 838 
 839 int
 840 exi_id_get_next()
 841 {
 842         struct exportinfo e;
 843         int ret = exi_id_next;
 844 
 845         ASSERT(MUTEX_HELD(&nfs_exi_id_lock));
 846 
 847         do {
 848                 exi_id_next++;
 849                 if (exi_id_next == 0)
 850                         exi_id_overflow = TRUE;
 851 
 852                 if (!exi_id_overflow)
 853                         break;
 854 
 855                 if (exi_id_next == ret)
 856                         cmn_err(CE_PANIC, "exi_id exhausted");
 857 
 858                 e.exi_id = exi_id_next;
 859         } while (avl_find(&exi_id_tree, &e, NULL) != NULL);
 860 
 861         return (ret);
 862 }
 863 
 864 /*
 865  * Get the root file handle for this zone.
 866  * Called when nfs_svc() starts
 867  */
 868 int
 869 nfs_export_get_rootfh(nfs_globals_t *g)
 870 {
 871         nfs_export_t *ne = g->nfs_export;
 872         int err;
 873 
 874         ne->exi_rootfid.fid_len = MAXFIDSZ;
 875         err = vop_fid_pseudo(ne->exi_root->exi_vp, &ne->exi_rootfid);
 876         if (err != 0) {
 877                 ne->exi_rootfid.fid_len = 0;
 878                 return (err);
 879         }
 880 
 881         /* Setup the fhandle template exi_fh */
 882         ne->exi_root->exi_fh.fh_fsid = rootdir->v_vfsp->vfs_fsid;
 883         ne->exi_root->exi_fh.fh_xlen = ne->exi_rootfid.fid_len;
 884         bcopy(ne->exi_rootfid.fid_data, ne->exi_root->exi_fh.fh_xdata,
 885             ne->exi_rootfid.fid_len);
 886         ne->exi_root->exi_fh.fh_len = sizeof (ne->exi_root->exi_fh.fh_data);
 887 
 888         return (0);
 889 }
 890 
 891 void
 892 nfs_export_zone_init(nfs_globals_t *ng)
 893 {
 894         int i;
 895         nfs_export_t *ne;
 896         zone_t *zone;
 897 
 898         ne = kmem_zalloc(sizeof (*ne), KM_SLEEP);
 899 
 900         rw_init(&ne->exported_lock, NULL, RW_DEFAULT, NULL);
 901 
 902         ne->ne_globals = ng; /* "up" pointer */
 903 
 904         /*
 905          * Allocate the place holder for the public file handle, which
 906          * is all zeroes. It is initially set to the root filesystem.
 907          */
 908         ne->exi_root = kmem_zalloc(sizeof (*ne->exi_root), KM_SLEEP);
 909         ne->exi_public = ne->exi_root;
 910 
 911         ne->exi_root->exi_export.ex_flags = EX_PUBLIC;
 912         ne->exi_root->exi_export.ex_pathlen = 1;  /* length of "/" */
 913         ne->exi_root->exi_export.ex_path =
 914             kmem_alloc(ne->exi_root->exi_export.ex_pathlen + 1, KM_SLEEP);
 915         ne->exi_root->exi_export.ex_path[0] = '/';
 916         ne->exi_root->exi_export.ex_path[1] = '\0';
 917 
 918         ne->exi_root->exi_count = 1;
 919         mutex_init(&ne->exi_root->exi_lock, NULL, MUTEX_DEFAULT, NULL);
 920 
 921         /*
 922          * Because we cannot:
 923          *      ASSERT(curzone->zone_id == ng->nfs_zoneid);
 924          * We grab the zone pointer explicitly (like netstacks do) and
 925          * set the rootvp here.
 926          *
 927          * Subsequent exportinfo_t's that get export_link()ed to "ne" also
 928          * will backpoint to "ne" such that exi->exi_ne->exi_root->exi_vp
 929          * will get the zone's rootvp for a given exportinfo_t.
 930          */
 931         zone = zone_find_by_id_nolock(ng->nfs_zoneid);
 932         ne->exi_root->exi_vp = zone->zone_rootvp;
 933         ne->exi_root->exi_zoneid = ng->nfs_zoneid;
 934 
 935         /*
 936          * Fill in ne->exi_rootfid later, in nfs_export_get_rootfid
 937          * because we can't correctly return errors here.
 938          */
 939 
 940         /* Initialize auth cache and auth cache lock */
 941         for (i = 0; i < AUTH_TABLESIZE; i++) {
 942                 ne->exi_root->exi_cache[i] = kmem_alloc(sizeof (avl_tree_t),
 943                     KM_SLEEP);
 944                 avl_create(ne->exi_root->exi_cache[i],
 945                     nfsauth_cache_clnt_compar, sizeof (struct auth_cache_clnt),
 946                     offsetof(struct auth_cache_clnt, authc_link));
 947         }
 948         rw_init(&ne->exi_root->exi_cache_lock, NULL, RW_DEFAULT, NULL);
 949 
 950         /* setup exi_fh later, in nfs_export_get_rootfid */
 951 
 952         rw_enter(&ne->exported_lock, RW_WRITER);
 953 
 954         /* Publish the exportinfo in the hash table */
 955         export_link(ne, ne->exi_root);
 956 
 957         /* Initialize exi_id and exi_kstats */
 958         mutex_enter(&nfs_exi_id_lock);
 959         ne->exi_root->exi_id = exi_id_get_next();
 960         avl_add(&exi_id_tree, ne->exi_root);
 961         mutex_exit(&nfs_exi_id_lock);
 962 
 963         rw_exit(&ne->exported_lock);
 964         ne->ns_root = NULL;
 965 
 966         ng->nfs_export = ne;
 967 }
 968 
 969 /*
 970  * During zone shutdown, remove exports
 971  */
 972 void
 973 nfs_export_zone_shutdown(nfs_globals_t *ng)
 974 {
 975         nfs_export_t *ne = ng->nfs_export;
 976         struct exportinfo *exi, *nexi;
 977         int i, errors;
 978 
 979         rw_enter(&ne->exported_lock, RW_READER);
 980 
 981         errors = 0;
 982         for (i = 0; i < EXPTABLESIZE; i++) {
 983 
 984                 exi = ne->exptable[i];
 985                 if (exi != NULL)
 986                         exi_hold(exi);
 987 
 988                 while (exi != NULL) {
 989 
 990                         /*
 991                          * Get and hold next export before
 992                          * dropping the rwlock and unexport
 993                          */
 994                         nexi = exi->fid_hash.next;
 995                         if (nexi != NULL)
 996                                 exi_hold(nexi);
 997 
 998                         rw_exit(&ne->exported_lock);
 999 
1000                         /*
1001                          * Skip ne->exi_root which gets special
1002                          * create/destroy handling.
1003                          */
1004                         if (exi != ne->exi_root &&
1005                             unexport(ne, exi) != 0)
1006                                 errors++;
1007                         exi_rele(exi);
1008 
1009                         rw_enter(&ne->exported_lock, RW_READER);
1010                         exi = nexi;
1011                 }
1012         }
1013         if (errors > 0) {
1014                 cmn_err(CE_NOTE, "NFS: failed un-exports in zone %d",
1015                     (int)ng->nfs_zoneid);
1016         }
1017 
1018         rw_exit(&ne->exported_lock);
1019 }
1020 
1021 void
1022 nfs_export_zone_fini(nfs_globals_t *ng)
1023 {
1024         int i;
1025         nfs_export_t *ne = ng->nfs_export;
1026         struct exportinfo *exi;
1027 
1028         ng->nfs_export = NULL;
1029 
1030         rw_enter(&ne->exported_lock, RW_WRITER);
1031 
1032         mutex_enter(&nfs_exi_id_lock);
1033         avl_remove(&exi_id_tree, ne->exi_root);
1034         mutex_exit(&nfs_exi_id_lock);
1035 
1036         export_unlink(ne, ne->exi_root);
1037 
1038         rw_exit(&ne->exported_lock);
1039 
1040         /* Deallocate the place holder for the public file handle */
1041         srv_secinfo_list_free(ne->exi_root->exi_export.ex_secinfo,
1042             ne->exi_root->exi_export.ex_seccnt);
1043         mutex_destroy(&ne->exi_root->exi_lock);
1044 
1045         rw_destroy(&ne->exi_root->exi_cache_lock);
1046         for (i = 0; i < AUTH_TABLESIZE; i++) {
1047                 avl_destroy(ne->exi_root->exi_cache[i]);
1048                 kmem_free(ne->exi_root->exi_cache[i], sizeof (avl_tree_t));
1049         }
1050 
1051         kmem_free(ne->exi_root->exi_export.ex_path,
1052             ne->exi_root->exi_export.ex_pathlen + 1);
1053         kmem_free(ne->exi_root, sizeof (*ne->exi_root));
1054 
1055         /*
1056          * The shutdown hook should have left the exi_id_tree
1057          * with nothing belonging to this zone.
1058          */
1059         mutex_enter(&nfs_exi_id_lock);
1060         i = 0;
1061         exi = avl_first(&exi_id_tree);
1062         while (exi != NULL) {
1063                 if (exi->exi_zoneid == ng->nfs_zoneid)
1064                         i++;
1065                 exi = AVL_NEXT(&exi_id_tree, exi);
1066         }
1067         mutex_exit(&nfs_exi_id_lock);
1068         if (i > 0) {
1069                 cmn_err(CE_NOTE,
1070                     "NFS: zone %d has %d export IDs left after shutdown",
1071                     (int)ng->nfs_zoneid, i);
1072         }
1073         rw_destroy(&ne->exported_lock);
1074         kmem_free(ne, sizeof (*ne));
1075 }
1076 
1077 /*
1078  * Initialization routine for export routines.
1079  * Should only be called once.
1080  */
1081 void
1082 nfs_exportinit(void)
1083 {
1084         mutex_init(&nfs_exi_id_lock, NULL, MUTEX_DEFAULT, NULL);
1085 
1086         /* exi_id handling initialization */
1087         exi_id_next = 0;
1088         exi_id_overflow = FALSE;
1089         avl_create(&exi_id_tree, exi_id_compar, sizeof (struct exportinfo),
1090             offsetof(struct exportinfo, exi_id_link));
1091 
1092         nfslog_init();
1093 }
1094 
1095 /*
1096  * Finalization routine for export routines.
1097  */
1098 void
1099 nfs_exportfini(void)
1100 {
1101         avl_destroy(&exi_id_tree);
1102         mutex_destroy(&nfs_exi_id_lock);
1103 }
1104 
1105 /*
1106  *  Check if 2 gss mechanism identifiers are the same.
1107  *
1108  *  return FALSE if not the same.
1109  *  return TRUE if the same.
1110  */
1111 static bool_t
1112 nfs_mech_equal(rpc_gss_OID mech1, rpc_gss_OID mech2)
1113 {
1114         if ((mech1->length == 0) && (mech2->length == 0))
1115                 return (TRUE);
1116 
1117         if (mech1->length != mech2->length)
1118                 return (FALSE);
1119 
1120         return (bcmp(mech1->elements, mech2->elements, mech1->length) == 0);
1121 }
1122 
1123 /*
1124  *  This routine is used by rpc to map rpc security number
1125  *  to nfs specific security flavor number.
1126  *
1127  *  The gss callback prototype is
1128  *  callback(struct svc_req *, gss_cred_id_t *, gss_ctx_id_t *,
1129  *                              rpc_gss_lock_t *, void **),
1130  *  since nfs does not use the gss_cred_id_t/gss_ctx_id_t arguments
1131  *  we cast them to void.
1132  */
1133 /*ARGSUSED*/
1134 bool_t
1135 rfs_gsscallback(struct svc_req *req, gss_cred_id_t deleg, void *gss_context,
1136     rpc_gss_lock_t *lock, void **cookie)
1137 {
1138         int i, j;
1139         rpc_gss_rawcred_t *raw_cred;
1140         struct exportinfo *exi;
1141         nfs_export_t *ne = nfs_get_export();
1142 
1143         /*
1144          * We don't deal with delegated credentials.
1145          */
1146         if (deleg != GSS_C_NO_CREDENTIAL)
1147                 return (FALSE);
1148 
1149         raw_cred = lock->raw_cred;
1150         *cookie = NULL;
1151 
1152         rw_enter(&ne->exported_lock, RW_READER);
1153 
1154         for (i = 0; i < EXPTABLESIZE; i++) {
1155                 exi = ne->exptable[i];
1156                 while (exi) {
1157                         if (exi->exi_export.ex_seccnt > 0) {
1158                                 struct secinfo *secp;
1159                                 seconfig_t *se;
1160                                 int seccnt;
1161 
1162                                 secp = exi->exi_export.ex_secinfo;
1163                                 seccnt = exi->exi_export.ex_seccnt;
1164                                 for (j = 0; j < seccnt; j++) {
1165                                         /*
1166                                          *  If there is a map of the triplet
1167                                          *  (mechanism, service, qop) between
1168                                          *  raw_cred and the exported flavor,
1169                                          *  get the psudo flavor number.
1170                                          *  Also qop should not be NULL, it
1171                                          *  should be "default" or something
1172                                          *  else.
1173                                          */
1174                                         se = &secp[j].s_secinfo;
1175                                         if ((se->sc_rpcnum == RPCSEC_GSS) &&
1176 
1177                                             (nfs_mech_equal(
1178                                             se->sc_gss_mech_type,
1179                                             raw_cred->mechanism)) &&
1180 
1181                                             (se->sc_service ==
1182                                             raw_cred->service) &&
1183                                             (raw_cred->qop == se->sc_qop)) {
1184 
1185                                                 *cookie = (void *)(uintptr_t)
1186                                                     se->sc_nfsnum;
1187                                                 goto done;
1188                                         }
1189                                 }
1190                         }
1191                         exi = exi->fid_hash.next;
1192                 }
1193         }
1194 done:
1195         rw_exit(&ne->exported_lock);
1196 
1197         /*
1198          * If no nfs pseudo number mapping can be found in the export
1199          * table, assign the nfsflavor to NFS_FLAVOR_NOMAP. In V4, we may
1200          * recover the flavor mismatch from NFS layer (NFS4ERR_WRONGSEC).
1201          *
1202          * For example:
1203          *      server first shares with krb5i;
1204          *      client mounts with krb5i;
1205          *      server re-shares with krb5p;
1206          *      client tries with krb5i, but no mapping can be found;
1207          *      rpcsec_gss module calls this routine to do the mapping,
1208          *              if this routine fails, request is rejected from
1209          *              the rpc layer.
1210          *      What we need is to let the nfs layer rejects the request.
1211          *      For V4, we can reject with NFS4ERR_WRONGSEC and the client
1212          *      may recover from it by getting the new flavor via SECINFO.
1213          *
1214          * nfs pseudo number for RPCSEC_GSS mapping (see nfssec.conf)
1215          * is owned by IANA (see RFC 2623).
1216          *
1217          * XXX NFS_FLAVOR_NOMAP is defined in Solaris to work around
1218          * the implementation issue. This number should not overlap with
1219          * any new IANA defined pseudo flavor numbers.
1220          */
1221         if (*cookie == NULL)
1222                 *cookie = (void *)NFS_FLAVOR_NOMAP;
1223 
1224         lock->locked = TRUE;
1225 
1226         return (TRUE);
1227 }
1228 
1229 
1230 /*
1231  * Exportfs system call; credentials should be checked before
1232  * calling this function.
1233  */
1234 int
1235 exportfs(struct exportfs_args *args, model_t model, cred_t *cr)
1236 {
1237         vnode_t *vp;
1238         vnode_t *dvp;
1239         struct exportdata *kex;
1240         struct exportinfo *exi = NULL;
1241         struct exportinfo *ex, *ex1, *ex2;
1242         fid_t fid;
1243         fsid_t fsid;
1244         int error;
1245         size_t allocsize;
1246         struct secinfo *sp;
1247         struct secinfo *exs;
1248         rpc_gss_callback_t cb;
1249         char *pathbuf;
1250         char *log_buffer;
1251         char *tagbuf;
1252         int callback;
1253         int allocd_seccnt;
1254         STRUCT_HANDLE(exportfs_args, uap);
1255         STRUCT_DECL(exportdata, uexi);
1256         struct secinfo newsec[MAX_FLAVORS];
1257         int newcnt;
1258         struct secinfo oldsec[MAX_FLAVORS];
1259         int oldcnt;
1260         int i;
1261         struct pathname lookpn;
1262         nfs_export_t *ne = nfs_get_export();
1263 
1264         STRUCT_SET_HANDLE(uap, model, args);
1265 
1266         /* Read in pathname from userspace */
1267         if (error = pn_get(STRUCT_FGETP(uap, dname), UIO_USERSPACE, &lookpn))
1268                 return (error);
1269 
1270         /* Walk the export list looking for that pathname */
1271         rw_enter(&ne->exported_lock, RW_READER);
1272         DTRACE_PROBE(nfss__i__exported_lock1_start);
1273         for (ex1 = ne->exptable_path_hash[pkp_tab_hash(lookpn.pn_path,
1274             strlen(lookpn.pn_path))]; ex1; ex1 = ex1->path_hash.next) {
1275                 if (ex1 != ne->exi_root && 0 ==
1276                     strcmp(ex1->exi_export.ex_path, lookpn.pn_path)) {
1277                         exi_hold(ex1);
1278                         break;
1279                 }
1280         }
1281         DTRACE_PROBE(nfss__i__exported_lock1_stop);
1282         rw_exit(&ne->exported_lock);
1283 
1284         /* Is this an unshare? */
1285         if (STRUCT_FGETP(uap, uex) == NULL) {
1286                 pn_free(&lookpn);
1287                 if (ex1 == NULL)
1288                         return (EINVAL);
1289                 error = unexport(ne, ex1);
1290                 exi_rele(ex1);
1291                 return (error);
1292         }
1293 
1294         /* It is a share or a re-share */
1295         error = lookupname(STRUCT_FGETP(uap, dname), UIO_USERSPACE,
1296             FOLLOW, &dvp, &vp);
1297         if (error == EINVAL) {
1298                 /*
1299                  * if fname resolves to / we get EINVAL error
1300                  * since we wanted the parent vnode. Try again
1301                  * with NULL dvp.
1302                  */
1303                 error = lookupname(STRUCT_FGETP(uap, dname), UIO_USERSPACE,
1304                     FOLLOW, NULL, &vp);
1305                 dvp = NULL;
1306         }
1307         if (!error && vp == NULL) {
1308                 /* Last component of fname not found */
1309                 if (dvp != NULL)
1310                         VN_RELE(dvp);
1311                 error = ENOENT;
1312         }
1313         if (error) {
1314                 pn_free(&lookpn);
1315                 if (ex1)
1316                         exi_rele(ex1);
1317                 return (error);
1318         }
1319 
1320         /*
1321          * 'vp' may be an AUTOFS node, so we perform a
1322          * VOP_ACCESS() to trigger the mount of the
1323          * intended filesystem, so we can share the intended
1324          * filesystem instead of the AUTOFS filesystem.
1325          */
1326         (void) VOP_ACCESS(vp, 0, 0, cr, NULL);
1327 
1328         /*
1329          * We're interested in the top most filesystem.
1330          * This is specially important when uap->dname is a trigger
1331          * AUTOFS node, since we're really interested in sharing the
1332          * filesystem AUTOFS mounted as result of the VOP_ACCESS()
1333          * call not the AUTOFS node itself.
1334          */
1335         if (vn_mountedvfs(vp) != NULL) {
1336                 if (error = traverse(&vp)) {
1337                         VN_RELE(vp);
1338                         if (dvp != NULL)
1339                                 VN_RELE(dvp);
1340                         pn_free(&lookpn);
1341                         if (ex1)
1342                                 exi_rele(ex1);
1343                         return (error);
1344                 }
1345         }
1346 
1347         /* Do not allow sharing another vnode for already shared path */
1348         if (ex1 && !PSEUDO(ex1) && !VN_CMP(ex1->exi_vp, vp)) {
1349                 VN_RELE(vp);
1350                 if (dvp != NULL)
1351                         VN_RELE(dvp);
1352                 pn_free(&lookpn);
1353                 exi_rele(ex1);
1354                 return (EEXIST);
1355         }
1356         if (ex1)
1357                 exi_rele(ex1);
1358 
1359         /*
1360          * Get the vfs id
1361          */
1362         bzero(&fid, sizeof (fid));
1363         fid.fid_len = MAXFIDSZ;
1364         error = VOP_FID(vp, &fid, NULL);
1365         fsid = vp->v_vfsp->vfs_fsid;
1366 
1367         if (error) {
1368                 VN_RELE(vp);
1369                 if (dvp != NULL)
1370                         VN_RELE(dvp);
1371                 /*
1372                  * If VOP_FID returns ENOSPC then the fid supplied
1373                  * is too small.  For now we simply return EREMOTE.
1374                  */
1375                 if (error == ENOSPC)
1376                         error = EREMOTE;
1377                 pn_free(&lookpn);
1378                 return (error);
1379         }
1380 
1381         /*
1382          * Do not allow re-sharing a shared vnode under a different path
1383          * PSEUDO export has ex_path fabricated, e.g. "/tmp (pseudo)", skip it.
1384          */
1385         rw_enter(&ne->exported_lock, RW_READER);
1386         DTRACE_PROBE(nfss__i__exported_lock2_start);
1387         for (ex2 = ne->exptable[exptablehash(&fsid, &fid)]; ex2;
1388             ex2 = ex2->fid_hash.next) {
1389                 if (ex2 != ne->exi_root && !PSEUDO(ex2) &&
1390                     VN_CMP(ex2->exi_vp, vp) &&
1391                     strcmp(ex2->exi_export.ex_path, lookpn.pn_path) != 0) {
1392                         DTRACE_PROBE(nfss__i__exported_lock2_stop);
1393                         rw_exit(&ne->exported_lock);
1394                         VN_RELE(vp);
1395                         if (dvp != NULL)
1396                                 VN_RELE(dvp);
1397                         pn_free(&lookpn);
1398                         return (EEXIST);
1399                 }
1400         }
1401         DTRACE_PROBE(nfss__i__exported_lock2_stop);
1402         rw_exit(&ne->exported_lock);
1403         pn_free(&lookpn);
1404 
1405         exi = kmem_zalloc(sizeof (*exi), KM_SLEEP);
1406         exi->exi_fsid = fsid;
1407         exi->exi_fid = fid;
1408         exi->exi_vp = vp;
1409         exi->exi_count = 1;
1410         exi->exi_zoneid = crgetzoneid(cr);
1411         ASSERT3U(exi->exi_zoneid, ==, curzone->zone_id);
1412         exi->exi_volatile_dev = (vfssw[vp->v_vfsp->vfs_fstype].vsw_flag &
1413             VSW_VOLATILEDEV) ? 1 : 0;
1414         mutex_init(&exi->exi_lock, NULL, MUTEX_DEFAULT, NULL);
1415         exi->exi_dvp = dvp;
1416 
1417         /*
1418          * Initialize auth cache and auth cache lock
1419          */
1420         for (i = 0; i < AUTH_TABLESIZE; i++) {
1421                 exi->exi_cache[i] = kmem_alloc(sizeof (avl_tree_t), KM_SLEEP);
1422                 avl_create(exi->exi_cache[i], nfsauth_cache_clnt_compar,
1423                     sizeof (struct auth_cache_clnt),
1424                     offsetof(struct auth_cache_clnt, authc_link));
1425         }
1426         rw_init(&exi->exi_cache_lock, NULL, RW_DEFAULT, NULL);
1427 
1428         /*
1429          * Build up the template fhandle
1430          */
1431         exi->exi_fh.fh_fsid = fsid;
1432         if (exi->exi_fid.fid_len > sizeof (exi->exi_fh.fh_xdata)) {
1433                 error = EREMOTE;
1434                 goto out1;
1435         }
1436         exi->exi_fh.fh_xlen = exi->exi_fid.fid_len;
1437         bcopy(exi->exi_fid.fid_data, exi->exi_fh.fh_xdata,
1438             exi->exi_fid.fid_len);
1439 
1440         exi->exi_fh.fh_len = sizeof (exi->exi_fh.fh_data);
1441 
1442         kex = &exi->exi_export;
1443 
1444         /*
1445          * Load in everything, and do sanity checking
1446          */
1447         STRUCT_INIT(uexi, model);
1448         if (copyin(STRUCT_FGETP(uap, uex), STRUCT_BUF(uexi),
1449             STRUCT_SIZE(uexi))) {
1450                 error = EFAULT;
1451                 goto out1;
1452         }
1453 
1454         kex->ex_version = STRUCT_FGET(uexi, ex_version);
1455         if (kex->ex_version != EX_CURRENT_VERSION) {
1456                 error = EINVAL;
1457                 cmn_err(CE_WARN,
1458                     "NFS: exportfs requires export struct version 2 - got %d\n",
1459                     kex->ex_version);
1460                 goto out1;
1461         }
1462 
1463         /*
1464          * Must have at least one security entry
1465          */
1466         kex->ex_seccnt = STRUCT_FGET(uexi, ex_seccnt);
1467         if (kex->ex_seccnt < 1) {
1468                 error = EINVAL;
1469                 goto out1;
1470         }
1471 
1472         kex->ex_path = STRUCT_FGETP(uexi, ex_path);
1473         kex->ex_pathlen = STRUCT_FGET(uexi, ex_pathlen);
1474         kex->ex_flags = STRUCT_FGET(uexi, ex_flags);
1475         kex->ex_anon = STRUCT_FGET(uexi, ex_anon);
1476         kex->ex_secinfo = STRUCT_FGETP(uexi, ex_secinfo);
1477         kex->ex_index = STRUCT_FGETP(uexi, ex_index);
1478         kex->ex_log_buffer = STRUCT_FGETP(uexi, ex_log_buffer);
1479         kex->ex_log_bufferlen = STRUCT_FGET(uexi, ex_log_bufferlen);
1480         kex->ex_tag = STRUCT_FGETP(uexi, ex_tag);
1481         kex->ex_taglen = STRUCT_FGET(uexi, ex_taglen);
1482 
1483         /*
1484          * Copy the exported pathname into
1485          * an appropriately sized buffer.
1486          */
1487         pathbuf = kmem_alloc(MAXPATHLEN, KM_SLEEP);
1488         if (copyinstr(kex->ex_path, pathbuf, MAXPATHLEN, &kex->ex_pathlen)) {
1489                 kmem_free(pathbuf, MAXPATHLEN);
1490                 error = EFAULT;
1491                 goto out1;
1492         }
1493         kex->ex_path = kmem_alloc(kex->ex_pathlen + 1, KM_SLEEP);
1494         bcopy(pathbuf, kex->ex_path, kex->ex_pathlen);
1495         kex->ex_path[kex->ex_pathlen] = '\0';
1496         kmem_free(pathbuf, MAXPATHLEN);
1497 
1498         /*
1499          * Get the path to the logging buffer and the tag
1500          */
1501         if (kex->ex_flags & EX_LOG) {
1502                 log_buffer = kmem_alloc(MAXPATHLEN, KM_SLEEP);
1503                 if (copyinstr(kex->ex_log_buffer, log_buffer, MAXPATHLEN,
1504                     &kex->ex_log_bufferlen)) {
1505                         kmem_free(log_buffer, MAXPATHLEN);
1506                         error = EFAULT;
1507                         goto out2;
1508                 }
1509                 kex->ex_log_buffer =
1510                     kmem_alloc(kex->ex_log_bufferlen + 1, KM_SLEEP);
1511                 bcopy(log_buffer, kex->ex_log_buffer, kex->ex_log_bufferlen);
1512                 kex->ex_log_buffer[kex->ex_log_bufferlen] = '\0';
1513                 kmem_free(log_buffer, MAXPATHLEN);
1514 
1515                 tagbuf = kmem_alloc(MAXPATHLEN, KM_SLEEP);
1516                 if (copyinstr(kex->ex_tag, tagbuf, MAXPATHLEN,
1517                     &kex->ex_taglen)) {
1518                         kmem_free(tagbuf, MAXPATHLEN);
1519                         error = EFAULT;
1520                         goto out3;
1521                 }
1522                 kex->ex_tag = kmem_alloc(kex->ex_taglen + 1, KM_SLEEP);
1523                 bcopy(tagbuf, kex->ex_tag, kex->ex_taglen);
1524                 kex->ex_tag[kex->ex_taglen] = '\0';
1525                 kmem_free(tagbuf, MAXPATHLEN);
1526         }
1527 
1528         /*
1529          * Load the security information for each flavor
1530          */
1531         allocsize = kex->ex_seccnt * SIZEOF_STRUCT(secinfo, model);
1532         sp = kmem_zalloc(allocsize, KM_SLEEP);
1533         if (copyin(kex->ex_secinfo, sp, allocsize)) {
1534                 kmem_free(sp, allocsize);
1535                 error = EFAULT;
1536                 goto out4;
1537         }
1538 
1539         /*
1540          * All of these nested structures need to be converted to
1541          * the kernel native format.
1542          */
1543         if (model != DATAMODEL_NATIVE) {
1544                 size_t allocsize2;
1545                 struct secinfo *sp2;
1546 
1547                 allocsize2 = kex->ex_seccnt * sizeof (struct secinfo);
1548                 sp2 = kmem_zalloc(allocsize2, KM_SLEEP);
1549 
1550                 for (i = 0; i < kex->ex_seccnt; i++) {
1551                         STRUCT_HANDLE(secinfo, usi);
1552 
1553                         STRUCT_SET_HANDLE(usi, model,
1554                             (struct secinfo *)((caddr_t)sp +
1555                             (i * SIZEOF_STRUCT(secinfo, model))));
1556                         bcopy(STRUCT_FGET(usi, s_secinfo.sc_name),
1557                             sp2[i].s_secinfo.sc_name, MAX_NAME_LEN);
1558                         sp2[i].s_secinfo.sc_nfsnum =
1559                             STRUCT_FGET(usi, s_secinfo.sc_nfsnum);
1560                         sp2[i].s_secinfo.sc_rpcnum =
1561                             STRUCT_FGET(usi, s_secinfo.sc_rpcnum);
1562                         bcopy(STRUCT_FGET(usi, s_secinfo.sc_gss_mech),
1563                             sp2[i].s_secinfo.sc_gss_mech, MAX_NAME_LEN);
1564                         sp2[i].s_secinfo.sc_gss_mech_type =
1565                             STRUCT_FGETP(usi, s_secinfo.sc_gss_mech_type);
1566                         sp2[i].s_secinfo.sc_qop =
1567                             STRUCT_FGET(usi, s_secinfo.sc_qop);
1568                         sp2[i].s_secinfo.sc_service =
1569                             STRUCT_FGET(usi, s_secinfo.sc_service);
1570 
1571                         sp2[i].s_flags = STRUCT_FGET(usi, s_flags);
1572                         sp2[i].s_window = STRUCT_FGET(usi, s_window);
1573                         sp2[i].s_rootid = STRUCT_FGET(usi, s_rootid);
1574                         sp2[i].s_rootcnt = STRUCT_FGET(usi, s_rootcnt);
1575                         sp2[i].s_rootnames = STRUCT_FGETP(usi, s_rootnames);
1576                 }
1577                 kmem_free(sp, allocsize);
1578                 sp = sp2;
1579                 allocsize = allocsize2;
1580         }
1581 
1582         kex->ex_secinfo = sp;
1583 
1584         /*
1585          * And now copy rootnames for each individual secinfo.
1586          */
1587         callback = 0;
1588         allocd_seccnt = 0;
1589         while (allocd_seccnt < kex->ex_seccnt) {
1590 
1591                 exs = &sp[allocd_seccnt];
1592                 if (exs->s_rootcnt > 0) {
1593                         if (!sec_svc_loadrootnames(exs->s_secinfo.sc_rpcnum,
1594                             exs->s_rootcnt, &exs->s_rootnames, model)) {
1595                                 error = EFAULT;
1596                                 goto out5;
1597                         }
1598                 }
1599 
1600                 if (exs->s_secinfo.sc_rpcnum == RPCSEC_GSS) {
1601                         rpc_gss_OID mech_tmp;
1602                         STRUCT_DECL(rpc_gss_OID_s, umech_tmp);
1603                         caddr_t elements_tmp;
1604 
1605                         /* Copyin mechanism type */
1606                         STRUCT_INIT(umech_tmp, model);
1607                         mech_tmp = kmem_alloc(sizeof (*mech_tmp), KM_SLEEP);
1608                         if (copyin(exs->s_secinfo.sc_gss_mech_type,
1609                             STRUCT_BUF(umech_tmp), STRUCT_SIZE(umech_tmp))) {
1610                                 kmem_free(mech_tmp, sizeof (*mech_tmp));
1611                                 error = EFAULT;
1612                                 goto out5;
1613                         }
1614                         mech_tmp->length = STRUCT_FGET(umech_tmp, length);
1615                         mech_tmp->elements = STRUCT_FGETP(umech_tmp, elements);
1616 
1617                         elements_tmp = kmem_alloc(mech_tmp->length, KM_SLEEP);
1618                         if (copyin(mech_tmp->elements, elements_tmp,
1619                             mech_tmp->length)) {
1620                                 kmem_free(elements_tmp, mech_tmp->length);
1621                                 kmem_free(mech_tmp, sizeof (*mech_tmp));
1622                                 error = EFAULT;
1623                                 goto out5;
1624                         }
1625                         mech_tmp->elements = elements_tmp;
1626                         exs->s_secinfo.sc_gss_mech_type = mech_tmp;
1627                         allocd_seccnt++;
1628 
1629                         callback = 1;
1630                 } else
1631                         allocd_seccnt++;
1632         }
1633 
1634         /*
1635          * Init the secinfo reference count and mark these flavors
1636          * explicitly exported flavors.
1637          */
1638         for (i = 0; i < kex->ex_seccnt; i++) {
1639                 kex->ex_secinfo[i].s_flags |= M_4SEC_EXPORTED;
1640                 kex->ex_secinfo[i].s_refcnt = 1;
1641         }
1642 
1643         /*
1644          *  Set up rpcsec_gss callback routine entry if any.
1645          */
1646         if (callback) {
1647                 cb.callback = rfs_gsscallback;
1648                 cb.program = NFS_ACL_PROGRAM;
1649                 for (cb.version = NFS_ACL_VERSMIN;
1650                     cb.version <= NFS_ACL_VERSMAX; cb.version++) {
1651                         (void) sec_svc_control(RPC_SVC_SET_GSS_CALLBACK,
1652                             (void *)&cb);
1653                 }
1654 
1655                 cb.program = NFS_PROGRAM;
1656                 for (cb.version = NFS_VERSMIN;
1657                     cb.version <= NFS_VERSMAX; cb.version++) {
1658                         (void) sec_svc_control(RPC_SVC_SET_GSS_CALLBACK,
1659                             (void *)&cb);
1660                 }
1661         }
1662 
1663         /*
1664          * Check the index flag. Do this here to avoid holding the
1665          * lock while dealing with the index option (as we do with
1666          * the public option).
1667          */
1668         if (kex->ex_flags & EX_INDEX) {
1669                 if (!kex->ex_index) {        /* sanity check */
1670                         error = EINVAL;
1671                         goto out5;
1672                 }
1673                 if (error = loadindex(kex))
1674                         goto out5;
1675         }
1676 
1677         if (kex->ex_flags & EX_LOG) {
1678                 if (error = nfslog_setup(exi))
1679                         goto out6;
1680         }
1681 
1682         /*
1683          * Insert the new entry at the front of the export list
1684          */
1685         rw_enter(&ne->exported_lock, RW_WRITER);
1686         DTRACE_PROBE(nfss__i__exported_lock3_start);
1687 
1688         export_link(ne, exi);
1689 
1690         /*
1691          * Check the rest of the list for an old entry for the fs.
1692          * If one is found then unlink it, wait until this is the
1693          * only reference and then free it.
1694          */
1695         for (ex = exi->fid_hash.next; ex != NULL; ex = ex->fid_hash.next) {
1696                 if (ex != ne->exi_root && VN_CMP(ex->exi_vp, vp)) {
1697                         mutex_enter(&nfs_exi_id_lock);
1698                         avl_remove(&exi_id_tree, ex);
1699                         mutex_exit(&nfs_exi_id_lock);
1700                         export_unlink(ne, ex);
1701                         break;
1702                 }
1703         }
1704 
1705         /*
1706          * If the public filehandle is pointing at the
1707          * old entry, then point it back at the root.
1708          */
1709         if (ex != NULL && ex == ne->exi_public)
1710                 ne->exi_public = ne->exi_root;
1711 
1712         /*
1713          * If the public flag is on, make the global exi_public
1714          * point to this entry and turn off the public bit so that
1715          * we can distinguish it from the place holder export.
1716          */
1717         if (kex->ex_flags & EX_PUBLIC) {
1718                 ne->exi_public = exi;
1719                 kex->ex_flags &= ~EX_PUBLIC;
1720         }
1721 
1722 #ifdef VOLATILE_FH_TEST
1723         /*
1724          * Set up the volatile_id value if volatile on share.
1725          * The list of volatile renamed filehandles is always destroyed,
1726          * if the fs was reshared.
1727          */
1728         if (kex->ex_flags & EX_VOLFH)
1729                 exi->exi_volatile_id = gethrestime_sec();
1730 
1731         mutex_init(&exi->exi_vol_rename_lock, NULL, MUTEX_DEFAULT, NULL);
1732 #endif /* VOLATILE_FH_TEST */
1733 
1734         /*
1735          * If this is a new export, then climb up
1736          * the tree and check if any pseudo exports
1737          * need to be created to provide a path for
1738          * NFS v4 clients.
1739          */
1740         if (ex == NULL) {
1741                 error = treeclimb_export(exi);
1742                 if (error)
1743                         goto out7;
1744         } else {
1745                 /* If it's a re-export update namespace tree */
1746                 exi->exi_tree = ex->exi_tree;
1747                 exi->exi_tree->tree_exi = exi;
1748 
1749                 /* Update the change timestamp */
1750                 tree_update_change(ne, exi->exi_tree, NULL);
1751         }
1752 
1753         /*
1754          * build a unique flavor list from the flavors specified
1755          * in the share cmd.  unique means that each flavor only
1756          * appears once in the secinfo list -- no duplicates allowed.
1757          */
1758         newcnt = build_seclist_nodups(&exi->exi_export, newsec, FALSE);
1759 
1760         srv_secinfo_treeclimb(ne, exi, newsec, newcnt, TRUE);
1761 
1762         /*
1763          * If re-sharing an old export entry, update the secinfo data
1764          * depending on if the old entry is a pseudo node or not.
1765          */
1766         if (ex != NULL) {
1767                 oldcnt = build_seclist_nodups(&ex->exi_export, oldsec, FALSE);
1768                 if (PSEUDO(ex)) {
1769                         /*
1770                          * The dir being shared is a pseudo export root (which
1771                          * will be transformed into a real export root).  The
1772                          * flavor(s) of the new share were propagated to the
1773                          * ancestors by srv_secinfo_treeclimb() above.  Now
1774                          * transfer the implicit flavor refs from the old
1775                          * pseudo exprot root to the new (real) export root.
1776                          */
1777                         srv_secinfo_add(&exi->exi_export.ex_secinfo,
1778                             &exi->exi_export.ex_seccnt, oldsec, oldcnt, TRUE);
1779                 } else {
1780                         /*
1781                          * First transfer implicit flavor refs to new export.
1782                          * Remove old flavor refs last.
1783                          */
1784                         srv_secinfo_exp2exp(&exi->exi_export, oldsec, oldcnt);
1785                         srv_secinfo_treeclimb(ne, ex, oldsec, oldcnt, FALSE);
1786                 }
1787         }
1788 
1789         /*
1790          * If it's a re-export and the old entry has a pseudonode list,
1791          * transfer it to the new export.
1792          */
1793         if (ex != NULL && (ex->exi_visible != NULL)) {
1794                 exi->exi_visible = ex->exi_visible;
1795                 ex->exi_visible = NULL;
1796         }
1797 
1798         /*
1799          * Initialize exi_id and exi_kstats
1800          */
1801         if (ex != NULL) {
1802                 exi->exi_id = ex->exi_id;
1803         } else {
1804                 mutex_enter(&nfs_exi_id_lock);
1805                 exi->exi_id = exi_id_get_next();
1806                 mutex_exit(&nfs_exi_id_lock);
1807         }
1808         mutex_enter(&nfs_exi_id_lock);
1809         avl_add(&exi_id_tree, exi);
1810         mutex_exit(&nfs_exi_id_lock);
1811 
1812         DTRACE_PROBE(nfss__i__exported_lock3_stop);
1813         rw_exit(&ne->exported_lock);
1814 
1815         if (ne->exi_public == exi || kex->ex_flags & EX_LOG) {
1816                 /*
1817                  * Log share operation to this buffer only.
1818                  */
1819                 nfslog_share_record(exi, cr);
1820         }
1821 
1822         if (ex != NULL)
1823                 exi_rele(ex);
1824 
1825         return (0);
1826 
1827 out7:
1828         /* Unlink the new export in exptable. */
1829         export_unlink(ne, exi);
1830         DTRACE_PROBE(nfss__i__exported_lock3_stop);
1831         rw_exit(&ne->exported_lock);
1832 out6:
1833         if (kex->ex_flags & EX_INDEX)
1834                 kmem_free(kex->ex_index, strlen(kex->ex_index) + 1);
1835 out5:
1836         /* free partially completed allocation */
1837         while (--allocd_seccnt >= 0) {
1838                 exs = &kex->ex_secinfo[allocd_seccnt];
1839                 srv_secinfo_entry_free(exs);
1840         }
1841 
1842         if (kex->ex_secinfo) {
1843                 kmem_free(kex->ex_secinfo,
1844                     kex->ex_seccnt * sizeof (struct secinfo));
1845         }
1846 
1847 out4:
1848         if ((kex->ex_flags & EX_LOG) && kex->ex_tag != NULL)
1849                 kmem_free(kex->ex_tag, kex->ex_taglen + 1);
1850 out3:
1851         if ((kex->ex_flags & EX_LOG) && kex->ex_log_buffer != NULL)
1852                 kmem_free(kex->ex_log_buffer, kex->ex_log_bufferlen + 1);
1853 out2:
1854         kmem_free(kex->ex_path, kex->ex_pathlen + 1);
1855 out1:
1856         VN_RELE(vp);
1857         if (dvp != NULL)
1858                 VN_RELE(dvp);
1859         mutex_destroy(&exi->exi_lock);
1860         rw_destroy(&exi->exi_cache_lock);
1861         for (i = 0; i < AUTH_TABLESIZE; i++) {
1862                 avl_destroy(exi->exi_cache[i]);
1863                 kmem_free(exi->exi_cache[i], sizeof (avl_tree_t));
1864         }
1865 
1866         kmem_free(exi, sizeof (*exi));
1867 
1868         return (error);
1869 }
1870 
1871 /*
1872  * Remove the exportinfo from the export list
1873  */
1874 void
1875 export_unlink(nfs_export_t *ne, struct exportinfo *exi)
1876 {
1877         ASSERT(RW_WRITE_HELD(&ne->exported_lock));
1878 
1879         exp_hash_unlink(exi, fid_hash);
1880         exp_hash_unlink(exi, path_hash);
1881         ASSERT3P(exi->exi_ne, ==, ne);
1882         exi->exi_ne = NULL;
1883 }
1884 
1885 /*
1886  * Unexport an exported filesystem
1887  */
1888 static int
1889 unexport(nfs_export_t *ne, struct exportinfo *exi)
1890 {
1891         struct secinfo cursec[MAX_FLAVORS];
1892         int curcnt;
1893 
1894         rw_enter(&ne->exported_lock, RW_WRITER);
1895 
1896         /* Check if exi is still linked in the export table */
1897         if (!EXP_LINKED(exi) || PSEUDO(exi)) {
1898                 rw_exit(&ne->exported_lock);
1899                 return (EINVAL);
1900         }
1901 
1902         mutex_enter(&nfs_exi_id_lock);
1903         avl_remove(&exi_id_tree, exi);
1904         mutex_exit(&nfs_exi_id_lock);
1905         export_unlink(ne, exi);
1906 
1907         /*
1908          * Remove security flavors before treeclimb_unexport() is called
1909          * because srv_secinfo_treeclimb needs the namespace tree
1910          */
1911         curcnt = build_seclist_nodups(&exi->exi_export, cursec, TRUE);
1912         srv_secinfo_treeclimb(ne, exi, cursec, curcnt, FALSE);
1913 
1914         /*
1915          * If there's a visible list, then need to leave
1916          * a pseudo export here to retain the visible list
1917          * for paths to exports below.
1918          */
1919         if (exi->exi_visible != NULL) {
1920                 struct exportinfo *newexi;
1921 
1922                 newexi = pseudo_exportfs(ne, exi->exi_vp, &exi->exi_fid,
1923                     exi->exi_visible, &exi->exi_export);
1924                 exi->exi_visible = NULL;
1925 
1926                 /* interconnect the existing treenode with the new exportinfo */
1927                 newexi->exi_tree = exi->exi_tree;
1928                 newexi->exi_tree->tree_exi = newexi;
1929 
1930                 /* Update the change timestamp */
1931                 tree_update_change(ne, exi->exi_tree, NULL);
1932         } else {
1933                 treeclimb_unexport(ne, exi);
1934         }
1935 
1936         rw_exit(&ne->exported_lock);
1937 
1938         /*
1939          * Need to call into the NFSv4 server and release all data
1940          * held on this particular export.  This is important since
1941          * the v4 server may be holding file locks or vnodes under
1942          * this export.
1943          */
1944         rfs4_clean_state_exi(ne, exi);
1945 
1946         /*
1947          * Notify the lock manager that the filesystem is being
1948          * unexported.
1949          */
1950         lm_unexport(exi);
1951 
1952         /*
1953          * If this was a public export, restore
1954          * the public filehandle to the root.
1955          */
1956 
1957         /*
1958          * XXX KEBE ASKS --> Should CRED() instead be
1959          * exi->exi_zone->zone_kcred?
1960          */
1961         if (exi == ne->exi_public) {
1962                 ne->exi_public = ne->exi_root;
1963 
1964                 nfslog_share_record(ne->exi_public, CRED());
1965         }
1966 
1967         if (exi->exi_export.ex_flags & EX_LOG)
1968                 nfslog_unshare_record(exi, CRED());
1969 
1970         exi_rele(exi);
1971         return (0);
1972 }
1973 
1974 /*
1975  * Get file handle system call.
1976  * Takes file name and returns a file handle for it.
1977  * Credentials must be verified before calling.
1978  */
1979 int
1980 nfs_getfh(struct nfs_getfh_args *args, model_t model, cred_t *cr)
1981 {
1982         nfs_fh3 fh;
1983         char buf[NFS3_MAXFHSIZE];
1984         char *logptr, logbuf[NFS3_MAXFHSIZE];
1985         int l = NFS3_MAXFHSIZE;
1986         vnode_t *vp;
1987         vnode_t *dvp;
1988         struct exportinfo *exi;
1989         int error;
1990         int vers;
1991         STRUCT_HANDLE(nfs_getfh_args, uap);
1992 
1993 #ifdef lint
1994         model = model;          /* STRUCT macros don't always use it */
1995 #endif
1996 
1997         STRUCT_SET_HANDLE(uap, model, args);
1998 
1999         error = lookupname(STRUCT_FGETP(uap, fname), UIO_USERSPACE,
2000             FOLLOW, &dvp, &vp);
2001         if (error == EINVAL) {
2002                 /*
2003                  * if fname resolves to / we get EINVAL error
2004                  * since we wanted the parent vnode. Try again
2005                  * with NULL dvp.
2006                  */
2007                 error = lookupname(STRUCT_FGETP(uap, fname), UIO_USERSPACE,
2008                     FOLLOW, NULL, &vp);
2009                 dvp = NULL;
2010         }
2011         if (!error && vp == NULL) {
2012                 /*
2013                  * Last component of fname not found
2014                  */
2015                 if (dvp != NULL) {
2016                         VN_RELE(dvp);
2017                 }
2018                 error = ENOENT;
2019         }
2020         if (error)
2021                 return (error);
2022 
2023         /*
2024          * 'vp' may be an AUTOFS node, so we perform a
2025          * VOP_ACCESS() to trigger the mount of the
2026          * intended filesystem, so we can share the intended
2027          * filesystem instead of the AUTOFS filesystem.
2028          */
2029         (void) VOP_ACCESS(vp, 0, 0, cr, NULL);
2030 
2031         /*
2032          * We're interested in the top most filesystem.
2033          * This is specially important when uap->dname is a trigger
2034          * AUTOFS node, since we're really interested in sharing the
2035          * filesystem AUTOFS mounted as result of the VOP_ACCESS()
2036          * call not the AUTOFS node itself.
2037          */
2038         if (vn_mountedvfs(vp) != NULL) {
2039                 if (error = traverse(&vp)) {
2040                         VN_RELE(vp);
2041                         if (dvp != NULL)
2042                                 VN_RELE(dvp);
2043                         return (error);
2044                 }
2045         }
2046 
2047         vers = STRUCT_FGET(uap, vers);
2048         exi = nfs_vptoexi(dvp, vp, cr, NULL, &error, FALSE);
2049         if (!error) {
2050                 if (vers == NFS_VERSION) {
2051                         error = makefh((fhandle_t *)buf, vp, exi);
2052                         l = NFS_FHSIZE;
2053                         logptr = buf;
2054                 } else if (vers == NFS_V3) {
2055                         int i, sz, pad;
2056 
2057                         error = makefh3(&fh, vp, exi);
2058                         l = RNDUP(fh.fh3_length);
2059                         if (!error && (l > sizeof (fhandle3_t)))
2060                                 error = EREMOTE;
2061                         logptr = logbuf;
2062                         if (!error) {
2063                                 i = 0;
2064                                 sz = sizeof (fsid_t);
2065                                 bcopy(&fh.fh3_fsid, &buf[i], sz);
2066                                 i += sz;
2067 
2068                                 /*
2069                                  * For backwards compatibility, the
2070                                  * fid length may be less than
2071                                  * NFS_FHMAXDATA, but it was always
2072                                  * encoded as NFS_FHMAXDATA bytes.
2073                                  */
2074 
2075                                 sz = sizeof (ushort_t);
2076                                 bcopy(&fh.fh3_len, &buf[i], sz);
2077                                 i += sz;
2078                                 bcopy(fh.fh3_data, &buf[i], fh.fh3_len);
2079                                 i += fh.fh3_len;
2080                                 pad = (NFS_FHMAXDATA - fh.fh3_len);
2081                                 if (pad > 0) {
2082                                         bzero(&buf[i], pad);
2083                                         i += pad;
2084                                         l += pad;
2085                                 }
2086 
2087                                 sz = sizeof (ushort_t);
2088                                 bcopy(&fh.fh3_xlen, &buf[i], sz);
2089                                 i += sz;
2090                                 bcopy(fh.fh3_xdata, &buf[i], fh.fh3_xlen);
2091                                 i += fh.fh3_xlen;
2092                                 pad = (NFS_FHMAXDATA - fh.fh3_xlen);
2093                                 if (pad > 0) {
2094                                         bzero(&buf[i], pad);
2095                                         i += pad;
2096                                         l += pad;
2097                                 }
2098                         }
2099                         /*
2100                          * If we need to do NFS logging, the filehandle
2101                          * must be downsized to 32 bytes.
2102                          */
2103                         if (!error && exi->exi_export.ex_flags & EX_LOG) {
2104                                 i = 0;
2105                                 sz = sizeof (fsid_t);
2106                                 bcopy(&fh.fh3_fsid, &logbuf[i], sz);
2107                                 i += sz;
2108                                 sz = sizeof (ushort_t);
2109                                 bcopy(&fh.fh3_len, &logbuf[i], sz);
2110                                 i += sz;
2111                                 sz = NFS_FHMAXDATA;
2112                                 bcopy(fh.fh3_data, &logbuf[i], sz);
2113                                 i += sz;
2114                                 sz = sizeof (ushort_t);
2115                                 bcopy(&fh.fh3_xlen, &logbuf[i], sz);
2116                                 i += sz;
2117                                 sz = NFS_FHMAXDATA;
2118                                 bcopy(fh.fh3_xdata, &logbuf[i], sz);
2119                                 i += sz;
2120                         }
2121                 }
2122                 if (!error && exi->exi_export.ex_flags & EX_LOG) {
2123                         nfslog_getfh(exi, (fhandle_t *)logptr,
2124                             STRUCT_FGETP(uap, fname), UIO_USERSPACE, cr);
2125                 }
2126                 exi_rele(exi);
2127                 if (!error) {
2128                         if (copyout(&l, STRUCT_FGETP(uap, lenp), sizeof (int)))
2129                                 error = EFAULT;
2130                         if (copyout(buf, STRUCT_FGETP(uap, fhp), l))
2131                                 error = EFAULT;
2132                 }
2133         }
2134         VN_RELE(vp);
2135         if (dvp != NULL) {
2136                 VN_RELE(dvp);
2137         }
2138         return (error);
2139 }
2140 
2141 /*
2142  * Strategy: if vp is in the export list, then
2143  * return the associated file handle. Otherwise, ".."
2144  * once up the vp and try again, until the root of the
2145  * filesystem is reached.
2146  */
2147 struct   exportinfo *
2148 nfs_vptoexi(vnode_t *dvp, vnode_t *vp, cred_t *cr, int *walk,
2149     int *err, bool_t v4srv)
2150 {
2151         fid_t fid;
2152         int error;
2153         struct exportinfo *exi;
2154 
2155         ASSERT(vp);
2156         VN_HOLD(vp);
2157         if (dvp != NULL) {
2158                 VN_HOLD(dvp);
2159         }
2160         if (walk != NULL)
2161                 *walk = 0;
2162 
2163         for (;;) {
2164                 bzero(&fid, sizeof (fid));
2165                 fid.fid_len = MAXFIDSZ;
2166                 error = vop_fid_pseudo(vp, &fid);
2167                 if (error) {
2168                         /*
2169                          * If vop_fid_pseudo returns ENOSPC then the fid
2170                          * supplied is too small. For now we simply
2171                          * return EREMOTE.
2172                          */
2173                         if (error == ENOSPC)
2174                                 error = EREMOTE;
2175                         break;
2176                 }
2177 
2178                 if (v4srv)
2179                         exi = checkexport4(&vp->v_vfsp->vfs_fsid, &fid, vp);
2180                 else
2181                         exi = checkexport(&vp->v_vfsp->vfs_fsid, &fid);
2182 
2183                 if (exi != NULL) {
2184                         /*
2185                          * Found the export info
2186                          */
2187                         break;
2188                 }
2189 
2190                 /*
2191                  * We have just failed finding a matching export.
2192                  * If we're at the root of this filesystem, then
2193                  * it's time to stop (with failure).
2194                  */
2195                 ASSERT3P(vp->v_vfsp->vfs_zone, ==, curzone);
2196                 if ((vp->v_flag & VROOT) || VN_IS_CURZONEROOT(vp)) {
2197                         error = EINVAL;
2198                         break;
2199                 }
2200 
2201                 if (walk != NULL)
2202                         (*walk)++;
2203 
2204                 /*
2205                  * Now, do a ".." up vp. If dvp is supplied, use it,
2206                  * otherwise, look it up.
2207                  */
2208                 if (dvp == NULL) {
2209                         error = VOP_LOOKUP(vp, "..", &dvp, NULL, 0, NULL, cr,
2210                             NULL, NULL, NULL);
2211                         if (error)
2212                                 break;
2213                 }
2214                 VN_RELE(vp);
2215                 vp = dvp;
2216                 dvp = NULL;
2217         }
2218         VN_RELE(vp);
2219         if (dvp != NULL) {
2220                 VN_RELE(dvp);
2221         }
2222         if (error != 0) {
2223                 if (err != NULL)
2224                         *err = error;
2225                 return (NULL);
2226         }
2227         return (exi);
2228 }
2229 
2230 int
2231 chk_clnt_sec(exportinfo_t *exi, struct svc_req *req)
2232 {
2233         int i, nfsflavor;
2234         struct secinfo *sp;
2235 
2236         /*
2237          *  Get the nfs flavor number from xprt.
2238          */
2239         nfsflavor = (int)(uintptr_t)req->rq_xprt->xp_cookie;
2240 
2241         sp = exi->exi_export.ex_secinfo;
2242         for (i = 0; i < exi->exi_export.ex_seccnt; i++) {
2243                 if ((nfsflavor == sp[i].s_secinfo.sc_nfsnum) &&
2244                     SEC_REF_EXPORTED(sp + i))
2245                         return (TRUE);
2246         }
2247         return (FALSE);
2248 }
2249 
2250 /*
2251  * Make an fhandle from a vnode
2252  */
2253 int
2254 makefh(fhandle_t *fh, vnode_t *vp, exportinfo_t *exi)
2255 {
2256         int error;
2257 
2258         *fh = exi->exi_fh;   /* struct copy */
2259 
2260         error = VOP_FID(vp, (fid_t *)&fh->fh_len, NULL);
2261         if (error) {
2262                 /*
2263                  * Should be something other than EREMOTE
2264                  */
2265                 return (EREMOTE);
2266         }
2267         return (0);
2268 }
2269 
2270 /*
2271  * This routine makes an overloaded V2 fhandle which contains
2272  * sec modes.
2273  *
2274  * Note that the first four octets contain the length octet,
2275  * the status octet, and two padded octets to make them XDR
2276  * four-octet aligned.
2277  *
2278  *   1   2   3   4                                          32
2279  * +---+---+---+---+---+---+---+---+   +---+---+---+---+   +---+
2280  * | l | s |   |   |     sec_1     |...|     sec_n     |...|   |
2281  * +---+---+---+---+---+---+---+---+   +---+---+---+---+   +---+
2282  *
2283  * where
2284  *
2285  *   the status octet s indicates whether there are more security
2286  *   flavors (1 means yes, 0 means no) that require the client to
2287  *   perform another 0x81 LOOKUP to get them,
2288  *
2289  *   the length octet l is the length describing the number of
2290  *   valid octets that follow.  (l = 4 * n, where n is the number
2291  *   of security flavors sent in the current overloaded filehandle.)
2292  *
2293  *   sec_index should always be in the inclusive range: [1 - ex_seccnt],
2294  *   and it tells server where to start within the secinfo array.
2295  *   Usually it will always be 1; however, if more flavors are used
2296  *   for the public export than can be encoded in the overloaded FH
2297  *   (7 for NFS2), subsequent SNEGO MCLs will have a larger index
2298  *   so the server will pick up where it left off from the previous
2299  *   MCL reply.
2300  *
2301  *   With NFS4 support, implicitly allowed flavors are also in
2302  *   the secinfo array; however, they should not be returned in
2303  *   SNEGO MCL replies.
2304  */
2305 int
2306 makefh_ol(fhandle_t *fh, exportinfo_t *exi, uint_t sec_index)
2307 {
2308         secinfo_t sec[MAX_FLAVORS];
2309         int totalcnt, i, *ipt, cnt, seccnt, secidx, fh_max_cnt;
2310         char *c;
2311 
2312         if (fh == NULL || exi == NULL || sec_index < 1)
2313                 return (EREMOTE);
2314 
2315         /*
2316          * WebNFS clients need to know the unique set of explicitly
2317          * shared flavors in used for the public export. When
2318          * "TRUE" is passed to build_seclist_nodups(), only explicitly
2319          * shared flavors are included in the list.
2320          */
2321         seccnt = build_seclist_nodups(&exi->exi_export, sec, TRUE);
2322         if (sec_index > seccnt)
2323                 return (EREMOTE);
2324 
2325         fh_max_cnt = (NFS_FHSIZE / sizeof (int)) - 1;
2326         totalcnt = seccnt - sec_index + 1;
2327         cnt = totalcnt > fh_max_cnt ? fh_max_cnt : totalcnt;
2328 
2329         c = (char *)fh;
2330         /*
2331          * Encode the length octet representing the number of
2332          * security flavors (in bytes) in this overloaded fh.
2333          */
2334         *c = cnt * sizeof (int);
2335 
2336         /*
2337          * Encode the status octet that indicates whether there
2338          * are more security flavors the client needs to get.
2339          */
2340         *(c + 1) = totalcnt > fh_max_cnt;
2341 
2342         /*
2343          * put security flavors in the overloaded fh
2344          */
2345         ipt = (int *)(c + sizeof (int32_t));
2346         secidx = sec_index - 1;
2347         for (i = 0; i < cnt; i++) {
2348                 ipt[i] = htonl(sec[i + secidx].s_secinfo.sc_nfsnum);
2349         }
2350         return (0);
2351 }
2352 
2353 /*
2354  * Make an nfs_fh3 from a vnode
2355  */
2356 int
2357 makefh3(nfs_fh3 *fh, vnode_t *vp, struct exportinfo *exi)
2358 {
2359         int error;
2360         fid_t fid;
2361 
2362         bzero(&fid, sizeof (fid));
2363         fid.fid_len = sizeof (fh->fh3_data);
2364         error = VOP_FID(vp, &fid, NULL);
2365         if (error)
2366                 return (EREMOTE);
2367 
2368         bzero(fh, sizeof (nfs_fh3));
2369         fh->fh3_fsid = exi->exi_fsid;
2370         fh->fh3_len = fid.fid_len;
2371         bcopy(fid.fid_data, fh->fh3_data, fh->fh3_len);
2372 
2373         fh->fh3_xlen = exi->exi_fid.fid_len;
2374         ASSERT(fh->fh3_xlen <= sizeof (fh->fh3_xdata));
2375         bcopy(exi->exi_fid.fid_data, fh->fh3_xdata, fh->fh3_xlen);
2376 
2377         fh->fh3_length = sizeof (fh->fh3_fsid)
2378             + sizeof (fh->fh3_len) + fh->fh3_len
2379             + sizeof (fh->fh3_xlen) + fh->fh3_xlen;
2380         fh->fh3_flags = 0;
2381 
2382         return (0);
2383 }
2384 
2385 /*
2386  * This routine makes an overloaded V3 fhandle which contains
2387  * sec modes.
2388  *
2389  *  1        4
2390  * +--+--+--+--+
2391  * |    len    |
2392  * +--+--+--+--+
2393  *                                               up to 64
2394  * +--+--+--+--+--+--+--+--+--+--+--+--+     +--+--+--+--+
2395  * |s |  |  |  |   sec_1   |   sec_2   | ... |   sec_n   |
2396  * +--+--+--+--+--+--+--+--+--+--+--+--+     +--+--+--+--+
2397  *
2398  * len = 4 * (n+1), where n is the number of security flavors
2399  * sent in the current overloaded filehandle.
2400  *
2401  * the status octet s indicates whether there are more security
2402  * mechanisms (1 means yes, 0 means no) that require the client
2403  * to perform another 0x81 LOOKUP to get them.
2404  *
2405  * Three octets are padded after the status octet.
2406  */
2407 int
2408 makefh3_ol(nfs_fh3 *fh, struct exportinfo *exi, uint_t sec_index)
2409 {
2410         secinfo_t sec[MAX_FLAVORS];
2411         int totalcnt, cnt, *ipt, i, seccnt, fh_max_cnt, secidx;
2412         char *c;
2413 
2414         if (fh == NULL || exi == NULL || sec_index < 1)
2415                 return (EREMOTE);
2416 
2417         /*
2418          * WebNFS clients need to know the unique set of explicitly
2419          * shared flavors in used for the public export. When
2420          * "TRUE" is passed to build_seclist_nodups(), only explicitly
2421          * shared flavors are included in the list.
2422          */
2423         seccnt = build_seclist_nodups(&exi->exi_export, sec, TRUE);
2424 
2425         if (sec_index > seccnt)
2426                 return (EREMOTE);
2427 
2428         fh_max_cnt = (NFS3_FHSIZE / sizeof (int)) - 1;
2429         totalcnt = seccnt - sec_index + 1;
2430         cnt = totalcnt > fh_max_cnt ? fh_max_cnt : totalcnt;
2431 
2432         /*
2433          * Place the length in fh3_length representing the number
2434          * of security flavors (in bytes) in this overloaded fh.
2435          */
2436         fh->fh3_flags = FH_WEBNFS;
2437         fh->fh3_length = (cnt+1) * sizeof (int32_t);
2438 
2439         c = (char *)&fh->fh3_u.nfs_fh3_i.fh3_i;
2440         /*
2441          * Encode the status octet that indicates whether there
2442          * are more security flavors the client needs to get.
2443          */
2444         *c = totalcnt > fh_max_cnt;
2445 
2446         /*
2447          * put security flavors in the overloaded fh
2448          */
2449         secidx = sec_index - 1;
2450         ipt = (int *)(c + sizeof (int32_t));
2451         for (i = 0; i < cnt; i++) {
2452                 ipt[i] = htonl(sec[i + secidx].s_secinfo.sc_nfsnum);
2453         }
2454         return (0);
2455 }
2456 
2457 /*
2458  * Make an nfs_fh4 from a vnode
2459  */
2460 int
2461 makefh4(nfs_fh4 *fh, vnode_t *vp, struct exportinfo *exi)
2462 {
2463         int error;
2464         nfs_fh4_fmt_t *fh_fmtp = (nfs_fh4_fmt_t *)fh->nfs_fh4_val;
2465         fid_t fid;
2466 
2467         bzero(&fid, sizeof (fid));
2468         fid.fid_len = MAXFIDSZ;
2469         /*
2470          * vop_fid_pseudo() is used to set up NFSv4 namespace, so
2471          * use vop_fid_pseudo() here to get the fid instead of VOP_FID.
2472          */
2473         error = vop_fid_pseudo(vp, &fid);
2474         if (error)
2475                 return (error);
2476 
2477         fh->nfs_fh4_len = NFS_FH4_LEN;
2478 
2479         fh_fmtp->fh4_i.fhx_fsid = exi->exi_fh.fh_fsid;
2480         fh_fmtp->fh4_i.fhx_xlen = exi->exi_fh.fh_xlen;
2481 
2482         bzero(fh_fmtp->fh4_i.fhx_data, sizeof (fh_fmtp->fh4_i.fhx_data));
2483         bzero(fh_fmtp->fh4_i.fhx_xdata, sizeof (fh_fmtp->fh4_i.fhx_xdata));
2484         ASSERT(exi->exi_fh.fh_xlen <= sizeof (fh_fmtp->fh4_i.fhx_xdata));
2485         bcopy(exi->exi_fh.fh_xdata, fh_fmtp->fh4_i.fhx_xdata,
2486             exi->exi_fh.fh_xlen);
2487 
2488         fh_fmtp->fh4_len = fid.fid_len;
2489         ASSERT(fid.fid_len <= sizeof (fh_fmtp->fh4_data));
2490         bcopy(fid.fid_data, fh_fmtp->fh4_data, fid.fid_len);
2491         fh_fmtp->fh4_flag = 0;
2492 
2493 #ifdef VOLATILE_FH_TEST
2494         /*
2495          * XXX (temporary?)
2496          * Use the rnode volatile_id value to add volatility to the fh.
2497          *
2498          * For testing purposes there are currently two scenarios, based
2499          * on whether the filesystem was shared with "volatile_fh"
2500          * or "expire_on_rename". In the first case, use the value of
2501          * export struct share_time as the volatile_id. In the second
2502          * case use the vnode volatile_id value (which is set to the
2503          * time in which the file was renamed).
2504          *
2505          * Note that the above are temporary constructs for testing only
2506          * XXX
2507          */
2508         if (exi->exi_export.ex_flags & EX_VOLRNM) {
2509                 fh_fmtp->fh4_volatile_id = find_volrnm_fh_id(exi, fh);
2510         } else if (exi->exi_export.ex_flags & EX_VOLFH) {
2511                 fh_fmtp->fh4_volatile_id = exi->exi_volatile_id;
2512         } else {
2513                 fh_fmtp->fh4_volatile_id = 0;
2514         }
2515 #endif /* VOLATILE_FH_TEST */
2516 
2517         return (0);
2518 }
2519 
2520 /*
2521  * Convert an fhandle into a vnode.
2522  * Uses the file id (fh_len + fh_data) in the fhandle to get the vnode.
2523  * WARNING: users of this routine must do a VN_RELE on the vnode when they
2524  * are done with it.
2525  */
2526 vnode_t *
2527 nfs_fhtovp(fhandle_t *fh, struct exportinfo *exi)
2528 {
2529         vfs_t *vfsp;
2530         vnode_t *vp;
2531         int error;
2532         fid_t *fidp;
2533 
2534         TRACE_0(TR_FAC_NFS, TR_FHTOVP_START,
2535             "fhtovp_start");
2536 
2537         if (exi == NULL) {
2538                 TRACE_1(TR_FAC_NFS, TR_FHTOVP_END,
2539                     "fhtovp_end:(%S)", "exi NULL");
2540                 return (NULL);  /* not exported */
2541         }
2542 
2543         ASSERT(exi->exi_vp != NULL);
2544 
2545         if (PUBLIC_FH2(fh)) {
2546                 if (exi->exi_export.ex_flags & EX_PUBLIC) {
2547                         TRACE_1(TR_FAC_NFS, TR_FHTOVP_END,
2548                             "fhtovp_end:(%S)", "root not exported");
2549                         return (NULL);
2550                 }
2551                 vp = exi->exi_vp;
2552                 VN_HOLD(vp);
2553                 return (vp);
2554         }
2555 
2556         vfsp = exi->exi_vp->v_vfsp;
2557         ASSERT(vfsp != NULL);
2558         fidp = (fid_t *)&fh->fh_len;
2559 
2560         error = VFS_VGET(vfsp, &vp, fidp);
2561         if (error || vp == NULL) {
2562                 TRACE_1(TR_FAC_NFS, TR_FHTOVP_END,
2563                     "fhtovp_end:(%S)", "VFS_GET failed or vp NULL");
2564                 return (NULL);
2565         }
2566         TRACE_1(TR_FAC_NFS, TR_FHTOVP_END,
2567             "fhtovp_end:(%S)", "end");
2568         return (vp);
2569 }
2570 
2571 /*
2572  * Convert an nfs_fh3 into a vnode.
2573  * Uses the file id (fh_len + fh_data) in the file handle to get the vnode.
2574  * WARNING: users of this routine must do a VN_RELE on the vnode when they
2575  * are done with it.
2576  */
2577 vnode_t *
2578 nfs3_fhtovp(nfs_fh3 *fh, struct exportinfo *exi)
2579 {
2580         vfs_t *vfsp;
2581         vnode_t *vp;
2582         int error;
2583         fid_t *fidp;
2584 
2585         if (exi == NULL)
2586                 return (NULL);  /* not exported */
2587 
2588         ASSERT(exi->exi_vp != NULL);
2589 
2590         if (PUBLIC_FH3(fh)) {
2591                 if (exi->exi_export.ex_flags & EX_PUBLIC)
2592                         return (NULL);
2593                 vp = exi->exi_vp;
2594                 VN_HOLD(vp);
2595                 return (vp);
2596         }
2597 
2598         if (fh->fh3_length < NFS3_OLDFHSIZE ||
2599             fh->fh3_length > NFS3_MAXFHSIZE)
2600                 return (NULL);
2601 
2602         vfsp = exi->exi_vp->v_vfsp;
2603         ASSERT(vfsp != NULL);
2604         fidp = FH3TOFIDP(fh);
2605 
2606         error = VFS_VGET(vfsp, &vp, fidp);
2607         if (error || vp == NULL)
2608                 return (NULL);
2609 
2610         return (vp);
2611 }
2612 
2613 /*
2614  * Convert an nfs_fh4 into a vnode.
2615  * Uses the file id (fh_len + fh_data) in the file handle to get the vnode.
2616  * WARNING: users of this routine must do a VN_RELE on the vnode when they
2617  * are done with it.
2618  */
2619 vnode_t *
2620 nfs4_fhtovp(nfs_fh4 *fh, struct exportinfo *exi, nfsstat4 *statp)
2621 {
2622         vfs_t *vfsp;
2623         vnode_t *vp = NULL;
2624         int error;
2625         fid_t *fidp;
2626         nfs_fh4_fmt_t *fh_fmtp;
2627 #ifdef VOLATILE_FH_TEST
2628         uint32_t volatile_id = 0;
2629 #endif /* VOLATILE_FH_TEST */
2630 
2631         if (exi == NULL) {
2632                 *statp = NFS4ERR_STALE;
2633                 return (NULL);  /* not exported */
2634         }
2635         ASSERT(exi->exi_vp != NULL);
2636 
2637         /* caller should have checked this */
2638         ASSERT(fh->nfs_fh4_len >= NFS_FH4_LEN);
2639 
2640         fh_fmtp = (nfs_fh4_fmt_t *)fh->nfs_fh4_val;
2641         vfsp = exi->exi_vp->v_vfsp;
2642         ASSERT(vfsp != NULL);
2643         fidp = (fid_t *)&fh_fmtp->fh4_len;
2644 
2645 #ifdef VOLATILE_FH_TEST
2646         /* XXX check if volatile - should be changed later */
2647         if (exi->exi_export.ex_flags & (EX_VOLRNM | EX_VOLFH)) {
2648                 /*
2649                  * Filesystem is shared with volatile filehandles
2650                  */
2651                 if (exi->exi_export.ex_flags & EX_VOLRNM)
2652                         volatile_id = find_volrnm_fh_id(exi, fh);
2653                 else
2654                         volatile_id = exi->exi_volatile_id;
2655 
2656                 if (fh_fmtp->fh4_volatile_id != volatile_id) {
2657                         *statp = NFS4ERR_FHEXPIRED;
2658                         return (NULL);
2659                 }
2660         }
2661         /*
2662          * XXX even if test_volatile_fh false, the fh may contain a
2663          * volatile id if obtained when the test was set.
2664          */
2665         fh_fmtp->fh4_volatile_id = (uchar_t)0;
2666 #endif /* VOLATILE_FH_TEST */
2667 
2668         error = VFS_VGET(vfsp, &vp, fidp);
2669         /*
2670          * If we can not get vp from VFS_VGET, perhaps this is
2671          * an nfs v2/v3/v4 node in an nfsv4 pseudo filesystem.
2672          * Check it out.
2673          */
2674         if (error && PSEUDO(exi))
2675                 error = nfs4_vget_pseudo(exi, &vp, fidp);
2676 
2677         if (error || vp == NULL) {
2678                 *statp = NFS4ERR_STALE;
2679                 return (NULL);
2680         }
2681         /* XXX - disgusting hack */
2682         if (vp->v_type == VNON && vp->v_flag & V_XATTRDIR)
2683                 vp->v_type = VDIR;
2684         *statp = NFS4_OK;
2685         return (vp);
2686 }
2687 
2688 /*
2689  * Find the export structure associated with the given filesystem.
2690  * If found, then increment the ref count (exi_count).
2691  */
2692 struct exportinfo *
2693 checkexport(fsid_t *fsid, fid_t *fid)
2694 {
2695         struct exportinfo *exi;
2696         nfs_export_t *ne = nfs_get_export();
2697 
2698         rw_enter(&ne->exported_lock, RW_READER);
2699         for (exi = ne->exptable[exptablehash(fsid, fid)];
2700             exi != NULL;
2701             exi = exi->fid_hash.next) {
2702                 if (exportmatch(exi, fsid, fid)) {
2703                         /*
2704                          * If this is the place holder for the
2705                          * public file handle, then return the
2706                          * real export entry for the public file
2707                          * handle.
2708                          */
2709                         if (exi->exi_export.ex_flags & EX_PUBLIC) {
2710                                 exi = ne->exi_public;
2711                         }
2712 
2713                         exi_hold(exi);
2714                         rw_exit(&ne->exported_lock);
2715                         return (exi);
2716                 }
2717         }
2718         rw_exit(&ne->exported_lock);
2719         return (NULL);
2720 }
2721 
2722 
2723 /*
2724  * "old school" version of checkexport() for NFS4.  NFS4
2725  * rfs4_compound holds exported_lock for duration of compound
2726  * processing.  This version doesn't manipulate exi_count
2727  * since NFS4 breaks fundamental assumptions in the exi_count
2728  * design.
2729  */
2730 struct exportinfo *
2731 checkexport4(fsid_t *fsid, fid_t *fid, vnode_t *vp)
2732 {
2733         struct exportinfo *exi;
2734         nfs_export_t *ne = nfs_get_export();
2735 
2736         ASSERT(RW_LOCK_HELD(&ne->exported_lock));
2737 
2738         for (exi = ne->exptable[exptablehash(fsid, fid)];
2739             exi != NULL;
2740             exi = exi->fid_hash.next) {
2741                 if (exportmatch(exi, fsid, fid)) {
2742                         /*
2743                          * If this is the place holder for the
2744                          * public file handle, then return the
2745                          * real export entry for the public file
2746                          * handle.
2747                          */
2748                         if (exi->exi_export.ex_flags & EX_PUBLIC) {
2749                                 exi = ne->exi_public;
2750                         }
2751 
2752                         /*
2753                          * If vp is given, check if vp is the
2754                          * same vnode as the exported node.
2755                          *
2756                          * Since VOP_FID of a lofs node returns the
2757                          * fid of its real node (ufs), the exported
2758                          * node for lofs and (pseudo) ufs may have
2759                          * the same fsid and fid.
2760                          */
2761                         if (vp == NULL || vp == exi->exi_vp)
2762                                 return (exi);
2763                 }
2764         }
2765 
2766         return (NULL);
2767 }
2768 
2769 /*
2770  * Free an entire export list node
2771  */
2772 void
2773 exportfree(struct exportinfo *exi)
2774 {
2775         struct exportdata *ex;
2776         struct charset_cache *cache;
2777         int i;
2778 
2779         ex = &exi->exi_export;
2780 
2781         ASSERT(exi->exi_vp != NULL && !(exi->exi_export.ex_flags & EX_PUBLIC));
2782         VN_RELE(exi->exi_vp);
2783         if (exi->exi_dvp != NULL)
2784                 VN_RELE(exi->exi_dvp);
2785 
2786         if (ex->ex_flags & EX_INDEX)
2787                 kmem_free(ex->ex_index, strlen(ex->ex_index) + 1);
2788 
2789         kmem_free(ex->ex_path, ex->ex_pathlen + 1);
2790         nfsauth_cache_free(exi);
2791 
2792         /*
2793          * if there is a character set mapping cached, clean it up.
2794          */
2795         for (cache = exi->exi_charset; cache != NULL;
2796             cache = exi->exi_charset) {
2797                 if (cache->inbound != (kiconv_t)-1)
2798                         (void) kiconv_close(cache->inbound);
2799                 if (cache->outbound != (kiconv_t)-1)
2800                         (void) kiconv_close(cache->outbound);
2801                 exi->exi_charset = cache->next;
2802                 kmem_free(cache, sizeof (struct charset_cache));
2803         }
2804 
2805         if (exi->exi_logbuffer != NULL)
2806                 nfslog_disable(exi);
2807 
2808         if (ex->ex_flags & EX_LOG) {
2809                 kmem_free(ex->ex_log_buffer, ex->ex_log_bufferlen + 1);
2810                 kmem_free(ex->ex_tag, ex->ex_taglen + 1);
2811         }
2812 
2813         if (exi->exi_visible)
2814                 free_visible(exi->exi_visible);
2815 
2816         srv_secinfo_list_free(ex->ex_secinfo, ex->ex_seccnt);
2817 
2818 #ifdef VOLATILE_FH_TEST
2819         free_volrnm_list(exi);
2820         mutex_destroy(&exi->exi_vol_rename_lock);
2821 #endif /* VOLATILE_FH_TEST */
2822 
2823         mutex_destroy(&exi->exi_lock);
2824         rw_destroy(&exi->exi_cache_lock);
2825         /*
2826          * All nodes in the exi_cache AVL trees were removed and freed in the
2827          * nfsauth_cache_free() call above.  We will just destroy and free the
2828          * empty AVL trees here.
2829          */
2830         for (i = 0; i < AUTH_TABLESIZE; i++) {
2831                 avl_destroy(exi->exi_cache[i]);
2832                 kmem_free(exi->exi_cache[i], sizeof (avl_tree_t));
2833         }
2834 
2835         kmem_free(exi, sizeof (*exi));
2836 }
2837 
2838 /*
2839  * load the index file from user space into kernel space.
2840  */
2841 static int
2842 loadindex(struct exportdata *kex)
2843 {
2844         int error;
2845         char index[MAXNAMELEN+1];
2846         size_t len;
2847 
2848         /*
2849          * copyinstr copies the complete string including the NULL and
2850          * returns the len with the NULL byte included in the calculation
2851          * as long as the max length is not exceeded.
2852          */
2853         if (error = copyinstr(kex->ex_index, index, sizeof (index), &len))
2854                 return (error);
2855 
2856         kex->ex_index = kmem_alloc(len, KM_SLEEP);
2857         bcopy(index, kex->ex_index, len);
2858 
2859         return (0);
2860 }
2861 
2862 void
2863 exi_hold(struct exportinfo *exi)
2864 {
2865         mutex_enter(&exi->exi_lock);
2866         exi->exi_count++;
2867         mutex_exit(&exi->exi_lock);
2868 }
2869 
2870 /*
2871  * When a thread completes using exi, it should call exi_rele().
2872  * exi_rele() decrements exi_count. It releases exi if exi_count == 0, i.e.
2873  * if this is the last user of exi and exi is not on exportinfo list anymore
2874  */
2875 void
2876 exi_rele(struct exportinfo *exi)
2877 {
2878         mutex_enter(&exi->exi_lock);
2879         exi->exi_count--;
2880         if (exi->exi_count == 0) {
2881                 mutex_exit(&exi->exi_lock);
2882                 exportfree(exi);
2883         } else
2884                 mutex_exit(&exi->exi_lock);
2885 }
2886 
2887 #ifdef VOLATILE_FH_TEST
2888 /*
2889  * Test for volatile fh's - add file handle to list and set its volatile id
2890  * to time it was renamed. If EX_VOLFH is also on and the fs is reshared,
2891  * the vol_rename queue is purged.
2892  *
2893  * XXX This code is for unit testing purposes only... To correctly use it, it
2894  * needs to tie a rename list to the export struct and (more
2895  * important), protect access to the exi rename list using a write lock.
2896  */
2897 
2898 /*
2899  * get the fh vol record if it's in the volatile on rename list. Don't check
2900  * volatile_id in the file handle - compare only the file handles.
2901  */
2902 static struct ex_vol_rename *
2903 find_volrnm_fh(struct exportinfo *exi, nfs_fh4 *fh4p)
2904 {
2905         struct ex_vol_rename *p = NULL;
2906         fhandle4_t *fhp;
2907 
2908         /* XXX shouldn't we assert &exported_lock held? */
2909         ASSERT(MUTEX_HELD(&exi->exi_vol_rename_lock));
2910 
2911         if (fh4p->nfs_fh4_len != NFS_FH4_LEN) {
2912                 return (NULL);
2913         }
2914         fhp = &((nfs_fh4_fmt_t *)fh4p->nfs_fh4_val)->fh4_i;
2915         for (p = exi->exi_vol_rename; p != NULL; p = p->vrn_next) {
2916                 if (bcmp(fhp, &p->vrn_fh_fmt.fh4_i,
2917                     sizeof (fhandle4_t)) == 0)
2918                         break;
2919         }
2920         return (p);
2921 }
2922 
2923 /*
2924  * get the volatile id for the fh (if there is - else return 0). Ignore the
2925  * volatile_id in the file handle - compare only the file handles.
2926  */
2927 static uint32_t
2928 find_volrnm_fh_id(struct exportinfo *exi, nfs_fh4 *fh4p)
2929 {
2930         struct ex_vol_rename *p;
2931         uint32_t volatile_id;
2932 
2933         mutex_enter(&exi->exi_vol_rename_lock);
2934         p = find_volrnm_fh(exi, fh4p);
2935         volatile_id = (p ? p->vrn_fh_fmt.fh4_volatile_id :
2936             exi->exi_volatile_id);
2937         mutex_exit(&exi->exi_vol_rename_lock);
2938         return (volatile_id);
2939 }
2940 
2941 /*
2942  * Free the volatile on rename list - will be called if a filesystem is
2943  * unshared or reshared without EX_VOLRNM
2944  */
2945 static void
2946 free_volrnm_list(struct exportinfo *exi)
2947 {
2948         struct ex_vol_rename *p, *pnext;
2949 
2950         /* no need to hold mutex lock - this one is called from exportfree */
2951         for (p = exi->exi_vol_rename; p != NULL; p = pnext) {
2952                 pnext = p->vrn_next;
2953                 kmem_free(p, sizeof (*p));
2954         }
2955         exi->exi_vol_rename = NULL;
2956 }
2957 
2958 /*
2959  * Add a file handle to the volatile on rename list.
2960  */
2961 void
2962 add_volrnm_fh(struct exportinfo *exi, vnode_t *vp)
2963 {
2964         struct ex_vol_rename *p;
2965         char fhbuf[NFS4_FHSIZE];
2966         nfs_fh4 fh4;
2967         int error;
2968 
2969         fh4.nfs_fh4_val = fhbuf;
2970         error = makefh4(&fh4, vp, exi);
2971         if ((error) || (fh4.nfs_fh4_len != sizeof (p->vrn_fh_fmt))) {
2972                 return;
2973         }
2974 
2975         mutex_enter(&exi->exi_vol_rename_lock);
2976 
2977         p = find_volrnm_fh(exi, &fh4);
2978 
2979         if (p == NULL) {
2980                 p = kmem_alloc(sizeof (*p), KM_SLEEP);
2981                 bcopy(fh4.nfs_fh4_val, &p->vrn_fh_fmt, sizeof (p->vrn_fh_fmt));
2982                 p->vrn_next = exi->exi_vol_rename;
2983                 exi->exi_vol_rename = p;
2984         }
2985 
2986         p->vrn_fh_fmt.fh4_volatile_id = gethrestime_sec();
2987         mutex_exit(&exi->exi_vol_rename_lock);
2988 }
2989 
2990 #endif /* VOLATILE_FH_TEST */