common/gssapi/gssd_handle.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2015 Nexenta Systems, Inc.  All rights reserved.
 */

/*
 * Copyright 2003 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 *  Kernel code to obtain client handle to gssd server
 */

#include <sys/types.h>
#include <gssapi/gssapi.h>
#include <gssapi/gssd_prot.h>
#include <gssapi/kgssapi_defs.h>

#include <sys/systm.h>
#include <sys/vnode.h>
#include <sys/uio.h>
#include <sys/pathname.h>

#define GSSD_RETRY 5

kmutex_t    gssrpcb_lock;
zone_key_t  gss_zone_key;

struct gss_globals {
    enum clnt_stat      gss_last_stat;
    struct netbuf       gss_netaddr;
    struct knetconfig   gss_config;
};

/* ARGSUSED */
void *
gss_zone_init(zoneid_t zoneid)
{
    struct gss_globals *gssg;

    gssg = kmem_zalloc(sizeof (*gssg), KM_SLEEP);
    return (gssg);
}

/* ARGSUSED */
void
gss_zone_fini(zoneid_t zoneid, void *data)
{
    struct gss_globals *gssg = data;
    struct netbuf *netaddrp = &gssg->gss_netaddr;

    if (netaddrp->len != 0)
        kmem_free(netaddrp->buf, netaddrp->maxlen);
    kmem_free(gssg, sizeof (*gssg));
}

void
killgssd_handle(CLIENT *client)
{
    struct rpc_err rpcerr;
    struct gss_globals *gssg;

    gssg = zone_getspecific(gss_zone_key, curproc->p_zone);
    CLNT_GETERR(client, &rpcerr);
    gssg->gss_last_stat = rpcerr.re_status;

    AUTH_DESTROY(client->cl_auth);
    CLNT_DESTROY(client);
}

CLIENT *
getgssd_handle(void)
{
    struct vnode *vp;
    int error;
    CLIENT *clnt;
    enum clnt_stat stat;
    struct netbuf tmpaddr;
    struct gss_globals *gssg;
    struct netbuf *netaddrp;

    gssg = zone_getspecific(gss_zone_key, curproc->p_zone);
    /*
     * Cribbed from kerb_krpc.c. Really should do the config set up
     * in the _init routine.
     */
    if (gssg->gss_config.knc_rdev == 0) {
        if ((error = lookupname("/dev/ticotsord", UIO_SYSSPACE,
            FOLLOW, NULLVPP, &vp)) != 0) {
            GSSLOG(1, "getgssd_handle: lookupname: %d\n", error);
            return (NULL);
        }
        gssg->gss_config.knc_rdev = vp->v_rdev;
        gssg->gss_config.knc_protofmly = loopback_name;
        VN_RELE(vp);
        gssg->gss_config.knc_semantics = NC_TPI_COTS_ORD;
    }

    /*
     * Contact rpcbind to get gssd's address only
     * once and re-use the address.
     */
    mutex_enter(&gssrpcb_lock);
    netaddrp = &gssg->gss_netaddr;

    if (netaddrp->len == 0 || gssg->gss_last_stat != RPC_SUCCESS) {
        if (netaddrp->buf != NULL)
            kmem_free(netaddrp->buf, netaddrp->maxlen);

        /* Set up netaddr to be "localhost." (strlen is 10) */
        netaddrp->len = netaddrp->maxlen = 10;
        netaddrp->buf = kmem_alloc(netaddrp->len, KM_SLEEP);
        (void) strncpy(netaddrp->buf, "localhost.", netaddrp->len);

        /* Get address of gssd from rpcbind */
        stat = rpcbind_getaddr(&gssg->gss_config, GSSPROG, GSSVERS,
            netaddrp);
        if (stat != RPC_SUCCESS) {
            kmem_free(netaddrp->buf, netaddrp->maxlen);
            netaddrp->buf = NULL;
            netaddrp->len = netaddrp->maxlen = 0;
            mutex_exit(&gssrpcb_lock);
            return (NULL);
        }
    }

    /*
     * Copy the netaddr information into a tmp location to
     * be used by clnt_tli_kcreate.  The purpose of this
     * is for MT race condition (ie. netaddr being modified
     * while it is being used.)
     */
    tmpaddr.buf = kmem_zalloc(netaddrp->maxlen, KM_SLEEP);
    bcopy(netaddrp->buf, tmpaddr.buf, netaddrp->maxlen);
    tmpaddr.maxlen = netaddrp->maxlen;
    tmpaddr.len = netaddrp->len;

    mutex_exit(&gssrpcb_lock);

    error = clnt_tli_kcreate(&gssg->gss_config, &tmpaddr, GSSPROG,
        GSSVERS, 0, GSSD_RETRY, kcred, &clnt);

    kmem_free(tmpaddr.buf, tmpaddr.maxlen);

    if (error != 0) {
        GSSLOG(1,
        "getgssd_handle: clnt_tli_kcreate: error %d\n", error);
        return (NULL);
    }

    return (clnt);
}