/*	$OpenBSD: init.c,v 1.5 2013/12/03 01:29:00 deraadt Exp $	*/

/*-
 * Copyright (c) 1996 Berkeley Software Design, Inc. 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. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *      This product includes software developed by Berkeley Software Design,
 *      Inc.
 * 4. The name of Berkeley Software Design, Inc.  may not be used to endorse
 *    or promote products derived from this software without specific prior
 *    written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY BERKELEY SOFTWARE DESIGN, INC. ``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 BERKELEY SOFTWARE DESIGN, INC. 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.
 *
 *	BSDI $From: init.c,v 1.2 1996/09/05 23:17:06 prb Exp $
 */

#include <sys/types.h>
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "token.h"
#include "tokendb.h"

static struct token_types types[] = {
	{ "activ", "ActivCard", "/etc/activ.db", "012345",
	    TOKEN_HEXINIT,
	    TOKEN_DECMODE | TOKEN_HEXMODE,			/* avail */
	    TOKEN_HEXMODE },					/* default */
	{ "crypto", "CRYPTOCard", "/etc/crypto.db", "012345",
	    TOKEN_HEXINIT | TOKEN_PHONE,
	    TOKEN_DECMODE | TOKEN_HEXMODE | TOKEN_PHONEMODE | TOKEN_RIM,
	    TOKEN_HEXMODE },					/* default */
	{ "snk", "SNK 004", "/etc/snk.db", "222333",
	    0,
	    TOKEN_DECMODE | TOKEN_HEXMODE,			/* avail */
	    TOKEN_DECMODE },					/* default */
	{ "token", "X9.9 Token", "/etc/x99token.db", "012345",
	    TOKEN_HEXINIT,
	    TOKEN_DECMODE | TOKEN_HEXMODE | TOKEN_RIM,		/* avail */
	    TOKEN_HEXMODE },					/* default */
};

static struct {
	char	*name;
	u_int	value;
} modes[] = {
	{ "hexadecimal",	TOKEN_HEXMODE },
	{ "hex",		TOKEN_HEXMODE },
	{ "decimal",		TOKEN_DECMODE },
	{ "dec",		TOKEN_DECMODE },
	{ "phonebook",		TOKEN_PHONEMODE },
	{ "phone",		TOKEN_PHONEMODE },
	{ "reduced-input",	TOKEN_RIM },
	{ "rim",		TOKEN_RIM }
};

int
token_init(char *path)
{
	char *p;
	int i;

	if ((p = strrchr(path, '/')) && p[1] != '\0')
		path = p + 1;

	for (i = 0; i < sizeof(types)/sizeof(types[0]); ++i)
		if (strstr(path, types[i].name) != NULL) {
			tt = &types[i];
			return (0);
		}
	if ((p = strstr(path, "token")) != NULL) {
		fprintf(stderr, "Please invoke as one of:");
		for (i = 0; i < sizeof(types)/sizeof(types[0]); ++i)
			fprintf(stderr, " %.*s%s%s",
			    (int)(p - path), path, types[i].name, p + 5);
		fprintf(stderr, "\n");
		exit(1);

	}
	return (-1);
}

u_int
token_mode(char *mode)
{
	int i;

	for (i = 0; i < sizeof(modes)/sizeof(modes[0]); ++i)
		if (strstr(mode, modes[i].name) != NULL)
			return (tt->modes & modes[i].value);
	return (0);
}

char *
token_getmode(u_int mode)
{
	int i;
	static char buf[32];

	for (i = 0; i < sizeof(modes)/sizeof(modes[0]); ++i)
		if (mode == modes[i].value)
			return(modes[i].name);
	snprintf(buf, sizeof(buf), "0x%x", mode);
	return(buf);
}