/*
 * Copyright (c) 2009 The DragonFly Project.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the
 *    distribution.
 * 3. Neither the name of The DragonFly Project nor the names of its
 *    contributors may be used to endorse or promote products derived
 *    from this software without specific, prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 */
#include "hammer.h"
#include <libutil.h>

void	show_info(char *path);
int	percent(int64_t value, int64_t total);

#define WS      " \t\r\n"

void
hammer_cmd_info(int ac)
{
	FILE *fp;
	char *fs, *ptr, *path;
	char buf[256];

	tzset();
	if (ac == 0) {
		fp = popen("/sbin/mount -t hammer", "r");
		if (fp == NULL)
			errx(1, "hammer info: 'mount' failed");
		while (fgets(buf, sizeof(buf), fp) != NULL) {
			fs = strtok(buf, WS);
			if (fs == NULL)
				continue;
			ptr = strtok(NULL, WS);
			if (ptr == NULL)
				continue;
			path = strtok(NULL, WS);
			if (path == NULL)
				continue;
			ptr = strtok(NULL, WS);
			if (ptr == NULL)
				continue;
			if ((strncmp(ptr, "(hammer,", 8) == 0))
				show_info(path);
		}
		fclose(fp);
	}
}

void show_info(char *path) {

	int64_t	usedbigblocks = 0, bytes = 0;
	struct	hammer_ioc_info info;
	char	buf[6];
	int 	fd;
	char 	*fsid, *fstype;

	fsid = fstype = NULL;

	bzero(&info, sizeof(struct hammer_ioc_info));

	/* Try to get a file descriptor based on the path given */
	fd = open(path, O_RDONLY);
	if (fd < 0) {
		perror("show_info");
		exit(EXIT_FAILURE);
	}

	if ((ioctl(fd, HAMMERIOC_GET_INFO, &info)) < 0) {
		perror("show_info");
		exit(EXIT_FAILURE);
	}

	/* Find out the UUID strings */
	uuid_to_string(&info.vol_fsid, &fsid, NULL);

	/* Volume information */
	fprintf(stdout, "Volume identification\n");
	fprintf(stdout, "\tLabel          %s\n", info.vol_name);
	fprintf(stdout, "\tNo. Volumes    %d\n", info.nvolumes);
	fprintf(stdout, "\tFSID           %s\n", fsid);

	/* Big blocks information */
	usedbigblocks = info.bigblocks - info.freebigblocks;

	fprintf(stdout, "Big block information\n");
	fprintf(stdout, "\tTotal\t       %lld\n", info.bigblocks);
	fprintf(stdout, "\tUsed\t       %lld (%d%%)\n\tReserved       %lld (%d%%)\n\tFree\t       %lld (%d%%)\n",
			usedbigblocks, percent(usedbigblocks, info.bigblocks),
			info.rsvbigblocks, percent(info.rsvbigblocks, info.bigblocks),
			(info.freebigblocks - info.rsvbigblocks),
			percent(info.freebigblocks - info.rsvbigblocks, info.bigblocks));
	fprintf(stdout, "Space information\n");

	/* Space information */
	bytes = (info.bigblocks << HAMMER_LARGEBLOCK_BITS);
	humanize_number(buf, sizeof(buf)  - (bytes < 0 ? 0 : 1), bytes, "", HN_AUTOSCALE, HN_DECIMAL | HN_NOSPACE | HN_B);
	fprintf(stdout, "\tTotal size     %6s (%lld bytes)\n", buf, bytes);

	bytes = (usedbigblocks << HAMMER_LARGEBLOCK_BITS);
	humanize_number(buf, sizeof(buf)  - (bytes < 0 ? 0 : 1), bytes, "", HN_AUTOSCALE, HN_DECIMAL | HN_NOSPACE | HN_B);
	fprintf(stdout, "\tUsed space     %6s\n", buf);

	bytes = (info.rsvbigblocks << HAMMER_LARGEBLOCK_BITS);
	humanize_number(buf, sizeof(buf)  - (bytes < 0 ? 0 : 1), bytes, "", HN_AUTOSCALE, HN_DECIMAL | HN_NOSPACE | HN_B);
	fprintf(stdout, "\tReserved space %6s\n", buf);

	bytes = ((info.freebigblocks - info.rsvbigblocks) << HAMMER_LARGEBLOCK_BITS);
	humanize_number(buf, sizeof(buf)  - (bytes < 0 ? 0 : 1), bytes, "", HN_AUTOSCALE, HN_DECIMAL | HN_NOSPACE | HN_B);
	fprintf(stdout, "\tFree space     %6s\n\n", buf);
}

int percent(int64_t value, int64_t total) {

	/* Avoid divide-by-zero */
	if (value == 0)
		value = 1;

	return ((value * 100) / total);
}