libcasio/src/mcsfile/args.c

/* *****************************************************************************
 * mcsfile/args.c -- mcsfile command-line arguments parsing utility.
 * Copyright (C) 2017 Thomas "Cakeisalie5" Touhey <thomas@touhey.fr>
 *
 * This file is part of p7utils.
 * p7utils is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2.0 of the License,
 * or (at your option) any later version.
 *
 * p7utils is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with p7utils; if not, see <http://www.gnu.org/licenses/>.
 * ************************************************************************** */
#include "main.h"
#include <stdlib.h>
#include <string.h>
#include <getopt.h>

/* ---
 * Help and version messages.
 * --- */

/* Help message. */

static const char *help_start =
"Usage: mcsfile [--version|-v] [--help|-h] <mcs archives>...\n"
"\n"
"Reads mcs files in a g1m file.\n"
"\n"
"Options are:\n"
"  -h, --help        Display this help message.\n"
"  -v, --version     Display the version message.\n";

static const char *help_loglevel_init =
"  --log <level>     The library log level (default: %s).\n"
"                    One of: %s";

static const char *help_end =
"\n"
"Report bugs to " MAINTAINER ".\n";

/* Version message. */

static const char *version_message =
BIN " - from " NAME " v" VERSION " (licensed under GPLv2)\n"
"Maintained by " MAINTAINER ".\n"
"\n"
"This is free software; see the source for copying conditions.\n"
"There is NO warranty; not even for MERCHANTABILITY or\n"
"FITNESS FOR A PARTICULAR PURPOSE.\n";

/* ---
 * Main argument parsing functions.
 * --- */

/**
 *	put_help:
 *	Put the help message on standard output.
 */

static void put_help(void)
{
	/* First big part. */

	fputs(help_start, stdout);

	/* Loglevels. */

	{
		casio_iter_t *iter;
		char *first = NULL, *current;
		int pos = 0;

		if (!casio_iter_log(&iter)) {
			while (!casio_next_log(iter, &current)) {
				if (!first) {
					size_t len = strlen(current) + 1;

					first = malloc(len);
					if (!first)
						break ;
					memcpy(first, current, len);
					pos++;
					continue ;
				}

				if (pos == 1)
					printf(help_loglevel_init, casio_getlog(), first);

				printf(", %s", current);
				pos++;
			}

			if (pos > 1)
				fputc('\n', stdout);

			free(first);
			casio_end(iter);
		}
	}

	/* Second big part. */

	fputs(help_end, stdout);
}

/**
 *	put_version:
 *	Put the version message on standard output.
 */

static void put_version(void)
{
	fputs(version_message, stdout);
}

/**
 *	parse_args:
 *	Args parsing main function.
 *
 *	@arg	ac		the arguments count.
 *	@arg	av		the arguments values.
 *	@arg	files	pointer to the file paths tab to allocate.
 *	@return			if execution should stop.
 */

int parse_args(int ac, char **av, int *num, const char ***paths)
{
	int c, help = 0, version = 0, pc;
	char **pv;
	const char *optstring = "hv";
	const struct option longopts[] = {
		{"help", no_argument, NULL, 'h'},
		{"version", no_argument, NULL, 'v'},
		{"log", required_argument, NULL, 'L'},
		{NULL, 0, NULL, 0}
	};

	/* Get options. */

	opterr = 0;
	while ((c = getopt_long(ac, av, optstring, longopts, NULL)) != -1)
	  switch (c) {
		case 'h':
			help = 1;
			break;
		case 'v':
			version = 1;
			break;
		case 'L':
			casio_setlog(optarg);
			break;
		default: switch (optopt) {
			default:
				fprintf(stderr, "-%c: unknown option.\n", optopt);
		}
		return (1);
	}

	/* Check parameters. */

	pc = ac - optind;
	pv = &av[optind];

	if (!pc)
		help = 1;
	else {
		*num = pc;
		*paths = (const char **)pv;
	}

	/* Display version or help message. */

	if (version) {
		put_version();
		return (1);
	} else if (help) {
		put_help();
		return (1);
	}

	return (0);
}