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

#pragma ident	"%Z%%M%	%I%	%E% SMI"

#include <assert.h>
#include <sys/zfs_context.h>
#include <sys/avl.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/spa.h>
#include <sys/fs/zfs.h>
#include <sys/refcount.h>

/*
 * Routines needed by more than one client of libzpool.
 */

void
nicenum(uint64_t num, char *buf)
{
	uint64_t n = num;
	int index = 0;
	char u;

	while (n >= 1024) {
		n = (n + (1024 / 2)) / 1024; /* Round up or down */
		index++;
	}

	u = " KMGTPE"[index];

	if (index == 0) {
		(void) sprintf(buf, "%llu", (u_longlong_t)n);
	} else if (n < 10 && (num & (num - 1)) != 0) {
		(void) sprintf(buf, "%.2f%c",
		    (double)num / (1ULL << 10 * index), u);
	} else if (n < 100 && (num & (num - 1)) != 0) {
		(void) sprintf(buf, "%.1f%c",
		    (double)num / (1ULL << 10 * index), u);
	} else {
		(void) sprintf(buf, "%llu%c", (u_longlong_t)n, u);
	}
}

static void
show_vdev_stats(const char *desc, nvlist_t *nv, int indent)
{
	nvlist_t **child;
	uint_t c, children;
	vdev_stat_t *vs;
	uint64_t sec;
	char used[6], avail[6];
	char rops[6], wops[6], rbytes[6], wbytes[6], rerr[6], werr[6], cerr[6];

	if (indent == 0) {
		(void) printf("                     "
		    " capacity   operations   bandwidth  ---- errors ----\n");
		(void) printf("description          "
		    "used avail  read write  read write  read write cksum\n");
	}

	VERIFY(nvlist_lookup_uint64_array(nv, ZPOOL_CONFIG_STATS,
	    (uint64_t **)&vs, &c) == 0);

	sec = MAX(1, vs->vs_timestamp / NANOSEC);

	nicenum(vs->vs_alloc, used);
	nicenum(vs->vs_space - vs->vs_alloc, avail);
	nicenum(vs->vs_ops[ZIO_TYPE_READ] / sec, rops);
	nicenum(vs->vs_ops[ZIO_TYPE_WRITE] / sec, wops);
	nicenum(vs->vs_bytes[ZIO_TYPE_READ] / sec, rbytes);
	nicenum(vs->vs_bytes[ZIO_TYPE_WRITE] / sec, wbytes);
	nicenum(vs->vs_read_errors, rerr);
	nicenum(vs->vs_write_errors, werr);
	nicenum(vs->vs_checksum_errors, cerr);

	(void) printf("%*s%*s%*s%*s %5s %5s %5s %5s %5s %5s %5s\n",
	    indent, "",
	    indent - 19 - (vs->vs_space ? 0 : 12), desc,
	    vs->vs_space ? 6 : 0, vs->vs_space ? used : "",
	    vs->vs_space ? 6 : 0, vs->vs_space ? avail : "",
	    rops, wops, rbytes, wbytes, rerr, werr, cerr);

	if (nvlist_lookup_nvlist_array(nv, ZPOOL_CONFIG_CHILDREN,
	    &child, &children) != 0)
		return;

	for (c = 0; c < children; c++) {
		nvlist_t *cnv = child[c];
		char *cname;
		if (nvlist_lookup_string(cnv, ZPOOL_CONFIG_PATH, &cname) &&
		    nvlist_lookup_string(cnv, ZPOOL_CONFIG_TYPE, &cname))
			cname = "<unknown>";
		show_vdev_stats(cname, cnv, indent + 2);
	}
}

void
show_pool_stats(spa_t *spa)
{
	nvlist_t *config, *nvroot;
	char *name;

	spa_config_enter(spa, RW_READER, FTAG);
	config = spa_config_generate(spa, NULL, -1ULL, B_TRUE);
	spa_config_exit(spa, FTAG);

	VERIFY(nvlist_lookup_nvlist(config, ZPOOL_CONFIG_VDEV_TREE,
	    &nvroot) == 0);
	VERIFY(nvlist_lookup_string(config, ZPOOL_CONFIG_POOL_NAME,
	    &name) == 0);

	show_vdev_stats(name, nvroot, 0);
}