/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
 * Copyright 2013 Nexenta Systems, Inc.  All rights reserved.
 */

#include <sys/list.h>
#include <assert.h>
#include <alloca.h>
#include <door.h>
#include <errno.h>
#include <syslog.h>
#include <unistd.h>
#include <stdio.h>
#include <synch.h>
#include <string.h>
#include <stdlib.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <pthread.h>
#include <strings.h>
#include <umem.h>

#include <smbsrv/smb_door.h>
#include <smbsrv/smb_xdr.h>
#include <smbsrv/smb_token.h>
#include <smbsrv/libmlsvc.h>
#include <smbsrv/libsmbns.h>
#include "smbd.h"


/*
 * Special version of smb_door_dispatch() for the
 * "fake" smbsrv (running in user space).
 *
 * This is called via function pointer from
 * smbsrv: smb_kdoor_upcall()
 *
 * The args and response go RPC encoded, just so we can
 * borrow some of the common doorsvc code, even though
 * there's no need for RPC encoding in this scenario.
 */
int
fksmbd_door_dispatch(smb_doorarg_t *da)
{

	smbd_arg_t	dop_arg;
	smb_doorhdr_t	*hdr;
	char		*rbuf = NULL;
	char		*argp = da->da_arg.data_ptr;
	size_t		arg_size = da->da_arg.data_size;
	size_t		hdr_size, rsize;

	/*
	 * Decode
	 *
	 * da->da_arg.data_ptr  = (arg data, xdr encoded)
	 * da->da_arg.data_size = (arg data len)
	 */

	bzero(&dop_arg, sizeof (smbd_arg_t));
	hdr = &dop_arg.hdr;
	hdr_size = xdr_sizeof(smb_doorhdr_xdr, hdr);

	if ((argp == NULL) || (arg_size < hdr_size)) {
		syslog(LOG_DEBUG, "fksmbd_door_dispatch: bad args");
		return (-1);
	}

	if (smb_doorhdr_decode(hdr, (uint8_t *)argp, hdr_size) == -1) {
		syslog(LOG_DEBUG, "smbd_door_dispatch: header decode failed");
		return (-1);
	}

	if ((hdr->dh_magic != SMB_DOOR_HDR_MAGIC) ||
	    (hdr->dh_flags != SMB_DF_FAKE_KERNEL)) {
		syslog(LOG_DEBUG, "fksmbd_door_dispatch: invalid header");
		return (-1);
	}

	dop_arg.opname = smb_doorhdr_opname(hdr->dh_op);
	dop_arg.data = argp + hdr_size;
	dop_arg.datalen = hdr->dh_datalen;

	if (hdr->dh_op == SMB_DR_ASYNC_RESPONSE) {
		/*
		 * ASYNC_RESPONSE is not used here.
		 */
		syslog(LOG_DEBUG, "fksmbd_door_dispatch: ASYNC?");
		return (-1);
	}

	/*
	 * Dispatch
	 *
	 * Call the common smbd_doorsvc.c code.
	 */
	(void) smbd_door_dispatch_op(&dop_arg);

	/*
	 * Encode
	 *
	 * da->da_arg.rbuf  = (return data buf)
	 * da->da_arg.rsize = (return data size)
	 *
	 * Note that the return data buffer initially
	 * points to the same buffer as the args.
	 * If that's not large enough, umem_alloc.
	 */

	rsize = dop_arg.rsize + hdr_size;
	rbuf = umem_alloc(rsize, UMEM_DEFAULT);
	if (rbuf == NULL) {
		syslog(LOG_DEBUG, "fksmbd_door_dispatch[%s]: alloc %m",
		    dop_arg.opname);
		return (-1);
	}

	/* Copy caller's return data after the header. */
	if (dop_arg.rbuf != NULL) {
		(void) memcpy(rbuf + hdr_size, dop_arg.rbuf, dop_arg.rsize);
		free(dop_arg.rbuf);
	}

	hdr->dh_datalen = dop_arg.rsize;
	(void) smb_doorhdr_encode(hdr, (uint8_t *)rbuf, hdr_size);

	/* Let's update da->da_hdr too. */
	da->da_hdr = *hdr;

	/*
	 * Was door_return()
	 * NB: The "fake kernel" smbsrv code will umem_free rbuf.
	 */
	da->da_arg.rbuf = rbuf;
	da->da_arg.rsize = rsize;

	return (0);
}