/* $Id$ */
/* Copyright (c) 2013-2017 Pierre Pronchery <khorben@defora.org> */
/* This file is part of DeforaOS Desktop Coder */
/* This program 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, version 3 of the License.
 *
 * This program 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 this program.  If not, see <http://www.gnu.org/licenses/>. */



#include <dirent.h>
#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <locale.h>
#include <libintl.h>
#include <gtk/gtk.h>
#include <System.h>
#include "simulator.h"
#include "../config.h"
#define _(string) gettext(string)

/* constants */
#ifndef PROGNAME_SIMULATOR
# define PROGNAME_SIMULATOR	"simulator"
#endif
#ifndef PREFIX
# define PREFIX		"/usr/local"
#endif
#ifndef DATADIR
# define DATADIR	PREFIX "/share"
#endif
#ifndef MODELDIR
# define MODELDIR	DATADIR "/" PACKAGE "/Simulator/models"
#endif
#ifndef LOCALEDIR
# define LOCALEDIR	DATADIR "/locale"
#endif


/* private */
/* prototypes */
static int _simulator(SimulatorPrefs * prefs);
static int _simulator_list(void);

static int _error(char const * message, int ret);
static int _usage(void);


/* functions */
/* simulator */
static int _simulator(SimulatorPrefs * prefs)
{
	Simulator * simulator;

	if((simulator = simulator_new(prefs)) == NULL)
		return error_print(PROGNAME_SIMULATOR);
	gtk_main();
	simulator_delete(simulator);
	return 0;
}


/* simulator_list */
static int _simulator_list(void)
{
	int ret = 0;
	char const models[] = MODELDIR;
	char const ext[] = ".conf";
	DIR * dir;
	struct dirent * de;
	size_t len;
	char const * sep = "";

	if((dir = opendir(models)) == NULL)
		ret = -_error(models, 1);
	else
	{
		puts(_("Available models:"));
		while((de = readdir(dir)) != NULL)
		{
			if(de->d_name[0] == '.')
				continue;
			if((len = strlen(de->d_name)) <= sizeof(ext))
				continue;
			if(strcmp(&de->d_name[len - sizeof(ext) + 1], ext) != 0)
				continue;
			de->d_name[len - sizeof(ext) + 1] = '\0';
			printf("%s%s", sep, de->d_name);
			sep = ", ";
		}
		if(sep[0] != '\0')
			puts("");
		closedir(dir);
	}
	return ret;
}


/* error */
static int _error(char const * message, int ret)
{
	fputs(PROGNAME_SIMULATOR ": ", stderr);
	perror(message);
	return ret;
}


/* usage */
static int _usage(void)
{
	fprintf(stderr, _("Usage: %s [-n][-m model][-t title] [command]\n"
"       %s -l\n"), PROGNAME_SIMULATOR, PROGNAME_SIMULATOR);
	return 1;
}


/* public */
/* functions */
/* main */
int main(int argc, char * argv[])
{
	int o;
	int list = 0;
	SimulatorPrefs prefs;

	if(setlocale(LC_ALL, "") == NULL)
		_error("setlocale", 1);
	bindtextdomain(PACKAGE, LOCALEDIR);
	textdomain(PACKAGE);
	gtk_init(&argc, &argv);
	prefs.chooser = 0;
	prefs.model = NULL;
	prefs.title = NULL;
	prefs.command = NULL;
	while((o = getopt(argc, argv, "lm:nt:")) != -1)
		switch(o)
		{
			case 'l':
				list = 1;
				break;
			case 'm':
				prefs.model = optarg;
				break;
			case 'n':
				prefs.chooser = 1;
				break;
			case 't':
				prefs.title = optarg;
				break;
			default:
				return _usage();
		}
	if(optind + 1 == argc)
		prefs.command = argv[optind];
	else if(optind != argc)
		return _usage();
	if(list != 0)
		return (_simulator_list() == 0) ? 0 : 2;
	return (_simulator(&prefs) == 0) ? 0 : 2;
}