/*
 * 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 2009 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 *
 * Copyright 2013 Nexenta Systems, Inc.  All rights reserved.
 */

/*
 * Show information about the remote server, as offered by
 * NetServerGetInfo with SERVER_INFO_101
 */

#include <sys/types.h>

#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <libintl.h>

#include <libmlrpc/libmlrpc.h>
#include <netsmb/smb_lib.h>
#include "srvsvc1_clnt.h"
#include "common.h"


static int get_info(smb_ctx_t *);

void
info_usage(void)
{
	printf(gettext("usage: smbutil info [connection options] //"
	    "[workgroup;][user[:password]@]server\n"));
	exit(1);
}

int
cmd_info(int argc, char *argv[])
{
	struct smb_ctx *ctx;
	int error, err2, opt;

	if (argc < 2)
		info_usage();

	error = smb_ctx_alloc(&ctx);
	if (error)
		return (error);

	error = smb_ctx_scan_argv(ctx, argc, argv,
	    SMBL_SERVER, SMBL_SERVER, USE_WILDCARD);
	if (error)
		goto out;

	error = smb_ctx_readrc(ctx);
	if (error)
		goto out;

	while ((opt = getopt(argc, argv, STDPARAM_OPT)) != EOF) {
		if (opt == '?')
			info_usage();
		error = smb_ctx_opt(ctx, opt, optarg);
		if (error)
			goto out;
	}

	smb_ctx_setshare(ctx, "IPC$", USE_IPC);

	/*
	 * Resolve the server address,
	 * setup derived defaults.
	 */
	error = smb_ctx_resolve(ctx);
	if (error)
		goto out;

	/*
	 * Have server, share, etc. from above:
	 * smb_ctx_scan_argv, option settings.
	 * Get the session and tree.
	 */
again:
	error = smb_ctx_get_ssn(ctx);
	if (error == EAUTH) {
		err2 = smb_get_authentication(ctx);
		if (err2 == 0)
			goto again;
	}
	if (error) {
		smb_error(gettext("//%s: login failed"),
		    error, ctx->ct_fullserver);
		goto out;
	}

	error = smb_ctx_get_tree(ctx);
	if (error) {
		smb_error(gettext("//%s/%s: tree connect failed"),
		    error, ctx->ct_fullserver, ctx->ct_origshare);
		goto out;
	}

	/*
	 * Have IPC$ tcon.  Get the server info.
	 */
	error = get_info(ctx);
	if (error)
		smb_error("cannot get server info.", error);

out:
	smb_ctx_free(ctx);
	return (error);
}

int
get_info(smb_ctx_t *ctx)
{
	char pf_unk[32];
	mlrpc_handle_t handle;
	ndr_service_t *svc;
	union mslm_NetServerGetInfo_ru res;
	struct mslm_SERVER_INFO_101 *sv101;
	char *platform_name;
	int err;

	/*
	 * Create an RPC handle using the smb_ctx we already have.
	 * Just local allocation and initialization.
	 */
	srvsvc1_initialize();
	svc = ndr_svc_lookup_name("srvsvc");
	if (svc == NULL)
		return (ENOENT);

	err = mlrpc_clh_create(&handle, ctx);
	if (err)
		return (err);

	/*
	 * Try to bind to the RPC service.  If it fails,
	 * just return the error and the caller will
	 * fall back to RAP.
	 */
	err = mlrpc_clh_bind(&handle, svc);
	if (err)
		goto out;

	err = srvsvc_net_server_getinfo(&handle,
	    ctx->ct_fullserver, 101, &res);
	if (err)
		goto out;

	sv101 = res.info101;

	switch (sv101->sv101_platform_id) {
	case SV_PLATFORM_ID_DOS:
		platform_name = "DOS";
		break;
	case SV_PLATFORM_ID_OS2:
		platform_name = "OS2";
		break;
	case SV_PLATFORM_ID_NT:
		platform_name = "NT";
		break;
	case SV_PLATFORM_ID_OSF:
		platform_name = "OSF";
		break;
	case SV_PLATFORM_ID_VMS:
		platform_name = "VMS";
		break;
	default:
		platform_name = pf_unk;
		snprintf(pf_unk, sizeof (pf_unk), "(%d)",
		    sv101->sv101_platform_id);
		break;
	}

	printf("server info:\n");
	printf(" platform_id %s\n", platform_name);
	printf(" vers.major  %d\n", sv101->sv101_version_major);
	printf(" vers.minor  %d\n", sv101->sv101_version_minor);

	if (smb_verbose)
		printf(" type_flags  0x%x\n", sv101->sv101_type);

	printf(" name    \"%s\"\n", sv101->sv101_name);
	printf(" comment \"%s\"\n", sv101->sv101_comment);

out:
	(void) mlrpc_clh_free(&handle);
	return (err);
}