/*
 * This module implements the command dispatch for fc-simtool
 */

#include <sys/types.h>
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <strings.h>
#include <stdlib.h>
#include <pcsclite.h>
#include <winscard.h>
#include "globals.h"

extern int cmd_change_chv();
extern int cmd_disable_chv();
extern int cmd_enable_chv();
extern int cmd_iccid();
extern int cmd_imsi();
extern int cmd_pb_dump();
extern int cmd_pb_erase();
extern int cmd_pb_update();
extern int cmd_readbin();
extern int cmd_readef();
extern int cmd_readrec();
extern int cmd_restore_file();
extern int cmd_savebin();
extern int cmd_select();
extern int cmd_spn();
extern int cmd_telecom_sum();
extern int cmd_unblock_chv();
extern int cmd_update_bin();
extern int cmd_update_bin_imm();
extern int cmd_update_rec();
extern int cmd_verify_chv();

extern int display_sim_resp_in_hex();

cmd_exit()
{
	SCardDisconnect(hCard, SCARD_UNPOWER_CARD);
	SCardReleaseContext(hContext);
	exit(0);
}

static struct cmdtab {
	char *cmd;
	int minargs;
	int maxargs;
	int (*func)();
} cmdtab[] = {
	{"change-chv1", 2, 2, cmd_change_chv},
	{"change-chv2", 2, 2, cmd_change_chv},
	{"change-pin1", 2, 2, cmd_change_chv},
	{"change-pin2", 2, 2, cmd_change_chv},
	{"disable-chv", 1, 1, cmd_disable_chv},
	{"disable-pin", 1, 1, cmd_disable_chv},
	{"enable-chv", 1, 1, cmd_enable_chv},
	{"enable-pin", 1, 1, cmd_enable_chv},
	{"exit", 0, 0, cmd_exit},
	{"iccid", 0, 0, cmd_iccid},
	{"imsi", 0, 0, cmd_imsi},
	{"pb-dump", 1, 2, cmd_pb_dump},
	{"pb-erase", 1, 1, cmd_pb_erase},
	{"pb-update", 2, 2, cmd_pb_update},
	{"quit", 0, 0, cmd_exit},
	{"readbin", 2, 2, cmd_readbin},
	{"readef", 1, 1, cmd_readef},
	{"readrec", 1, 2, cmd_readrec},
	{"restore-file", 2, 2, cmd_restore_file},
	{"savebin", 2, 2, cmd_savebin},
	{"select", 1, 1, cmd_select},
	{"sim-resp", 0, 0, display_sim_resp_in_hex},
	{"spn", 0, 0, cmd_spn},
	{"telecom-sum", 0, 0, cmd_telecom_sum},
	{"unblock-chv1", 2, 2, cmd_unblock_chv},
	{"unblock-chv2", 2, 2, cmd_unblock_chv},
	{"unblock-pin1", 2, 2, cmd_unblock_chv},
	{"unblock-pin2", 2, 2, cmd_unblock_chv},
	{"update-bin", 2, 2, cmd_update_bin},
	{"update-bin-imm", 2, 2, cmd_update_bin_imm},
	{"update-rec", 2, 2, cmd_update_rec},
	{"verify-chv1", 1, 1, cmd_verify_chv},
	{"verify-chv2", 1, 1, cmd_verify_chv},
	{"verify-pin1", 1, 1, cmd_verify_chv},
	{"verify-pin2", 1, 1, cmd_verify_chv},
	{0, 0, 0, 0}
};

simtool_dispatch_cmd(cmd)
	char *cmd;
{
	char *argv[10];
	char *cp, **ap;
	struct cmdtab *tp;

	for (cp = cmd; isspace(*cp); cp++)
		;
	if (!*cp || *cp == '#')
		return(0);
	argv[0] = cp;
	while (*cp && !isspace(*cp))
		cp++;
	if (*cp)
		*cp++ = '\0';
	for (tp = cmdtab; tp->cmd; tp++)
		if (!strcmp(tp->cmd, argv[0]))
			break;
	if (!tp->func) {
		fprintf(stderr, "error: no such command\n");
		return(-1);
	}
	for (ap = argv + 1; ; ) {
		while (isspace(*cp))
			cp++;
		if (!*cp || *cp == '#')
			break;
		if (ap - argv - 1 >= tp->maxargs) {
			fprintf(stderr, "error: too many arguments\n");
			return(-1);
		}
		if (*cp == '"') {
			*ap++ = ++cp;
			while (*cp && *cp != '"')
				cp++;
			if (*cp != '"') {
				fprintf(stderr,
					"error: unterminated quoted string\n");
				return(-1);
			}
			*cp++ = '\0';
		} else {
			*ap++ = cp;
			while (*cp && !isspace(*cp))
				cp++;
			if (*cp)
				*cp++ = '\0';
		}
	}
	if (ap - argv - 1 < tp->minargs) {
		fprintf(stderr, "error: too few arguments\n");
		return(-1);
	}
	*ap = 0;
	return tp->func(ap - argv, argv);
}