/*
 * Copyright 2013, Ingo Weinhold, ingo_weinhold@gmx.de.
 * Distributed under the terms of the MIT License.
 */


#include <getopt.h>
#include <stdio.h>
#include <string.h>

#include <Entry.h>
#include <package/PackageInfo.h>

#include "package.h"


using namespace BPackageKit;


int
command_info(int argc, const char* const* argv)
{
	const char* format = "name: %name%  version: %version%\n";

	while (true) {
		static struct option sLongOptions[] = {
			{ "format", required_argument, 0, 'f' },
			{ "help", no_argument, 0, 'h' },
			{ 0, 0, 0, 0 }
		};

		opterr = 0; // don't print errors
		int c = getopt_long(argc, (char**)argv, "f:h", sLongOptions, NULL);
		if (c == -1)
			break;

		switch (c) {
			case 'f':
				format = optarg;
				break;

			default:
				print_usage_and_exit(true);
				break;
		}
	}

	// One argument should remain -- the package file name.
	if (optind + 1 != argc)
		print_usage_and_exit(true);

	const char* fileName = argv[optind++];

	// Read the package info from the package file. If it doesn't look like a
	// package file, assume it is a package info file.
	BPackageInfo info;
	if (BString(fileName).EndsWith(".hpkg")) {
		status_t error = info.ReadFromPackageFile(fileName);
		if (error != B_OK) {
			fprintf(stderr, "Error: Failed to read package file \"%s\": %s\n",
				fileName, strerror(error));
			return 1;
		}
	} else {
		status_t error = info.ReadFromConfigFile(BEntry(fileName));
		if (error != B_OK) {
			fprintf(stderr, "Error: Failed to read package info file \"%s\": "
				"%s\n", fileName, strerror(error));
			return 1;
		}
	}

	// parse format string and produce output
	BString output;
	while (*format != '\0') {
		char c = *format++;
		switch (c) {
			case '%':
			{
				const char* start = format;
				while (*format != '\0' && *format != '%')
					format++;
				if (*format != '%') {
					fprintf(stderr, "Error: Unexpected at end of the format "
						"string. Expected \"%%\".\n");
					return 1;
				}

				if (format == start) {
					output << '%';
				} else {
					BString variable(start, format - start);
					if (variable == "fileName") {
						output << info.CanonicalFileName();
					} else if (variable == "name") {
						output << info.Name();
					} else if (variable == "version") {
						output << info.Version().ToString();
					} else {
						fprintf(stderr, "Error: Unsupported placeholder \"%s\" "
							"in format string.\n", variable.String());
						return 1;
					}
				}

				format++;
				break;
			}

			case '\\':
				c = *format++;
				if (c == '\0') {
					fprintf(stderr, "Error: \"\\\" at the end of the format "
						"string.\n");
					return 1;
				}
				switch (c) {
					case 'n':
						c = '\n';
						break;
					case 't':
						c = '\t';
						break;
				}
				// fall through

			default:
				output << c;
				break;
		}
	}

	fputs(output.String(), stdout);

	return 0;
}