103 lines
2.0 KiB
C
103 lines
2.0 KiB
C
/* SPDX-License-Identifier: GPL-2.0+ */
|
|
/* utils.h
|
|
* originally written by: Kirk Reiser.
|
|
*
|
|
** Copyright (C) 2002 Kirk Reiser.
|
|
* Copyright (C) 2003 David Borowski.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
|
|
#define MAXKEYS 512
|
|
#define MAXKEYVAL 160
|
|
#define HASHSIZE 101
|
|
#define is_shift -3
|
|
#define is_spk -2
|
|
#define is_input -1
|
|
|
|
struct st_key {
|
|
char *name;
|
|
struct st_key *next;
|
|
int value, shift;
|
|
};
|
|
|
|
struct st_key key_table[MAXKEYS];
|
|
struct st_key *extra_keys = key_table+HASHSIZE;
|
|
char *def_name, *def_val;
|
|
FILE *infile;
|
|
int lc;
|
|
|
|
char filename[256];
|
|
|
|
static inline void open_input(const char *dir_name, const char *name)
|
|
{
|
|
if (dir_name)
|
|
snprintf(filename, sizeof(filename), "%s/%s", dir_name, name);
|
|
else
|
|
snprintf(filename, sizeof(filename), "%s", name);
|
|
infile = fopen(filename, "r");
|
|
if (infile == 0) {
|
|
fprintf(stderr, "can't open %s\n", filename);
|
|
exit(1);
|
|
}
|
|
lc = 0;
|
|
}
|
|
|
|
static inline int oops(const char *msg, const char *info)
|
|
{
|
|
if (info == NULL)
|
|
info = "";
|
|
fprintf(stderr, "error: file %s line %d\n", filename, lc);
|
|
fprintf(stderr, "%s %s\n", msg, info);
|
|
exit(1);
|
|
}
|
|
|
|
static inline struct st_key *hash_name(char *name)
|
|
{
|
|
unsigned char *pn = (unsigned char *)name;
|
|
int hash = 0;
|
|
|
|
while (*pn) {
|
|
hash = (hash * 17) & 0xfffffff;
|
|
if (isupper(*pn))
|
|
*pn = tolower(*pn);
|
|
hash += (int)*pn;
|
|
pn++;
|
|
}
|
|
hash %= HASHSIZE;
|
|
return &key_table[hash];
|
|
}
|
|
|
|
static inline struct st_key *find_key(char *name)
|
|
{
|
|
struct st_key *this = hash_name(name);
|
|
|
|
while (this) {
|
|
if (this->name && !strcmp(name, this->name))
|
|
return this;
|
|
this = this->next;
|
|
}
|
|
return this;
|
|
}
|
|
|
|
static inline struct st_key *add_key(char *name, int value, int shift)
|
|
{
|
|
struct st_key *this = hash_name(name);
|
|
|
|
if (extra_keys-key_table >= MAXKEYS)
|
|
oops("out of key table space, enlarge MAXKEYS", NULL);
|
|
if (this->name != NULL) {
|
|
while (this->next) {
|
|
if (!strcmp(name, this->name))
|
|
oops("attempt to add duplicate key", name);
|
|
this = this->next;
|
|
}
|
|
this->next = extra_keys++;
|
|
this = this->next;
|
|
}
|
|
this->name = strdup(name);
|
|
this->value = value;
|
|
this->shift = shift;
|
|
return this;
|
|
}
|