78 lines
2.0 KiB
Plaintext
78 lines
2.0 KiB
Plaintext
/*
|
|
* Copyright (c) 2023-2024 Vera Visions LLC.
|
|
*
|
|
* Permission to use, copy, modify, and distribute this software for any
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
* copyright notice and this permission notice appear in all copies.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
* WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
|
|
* IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
|
|
* OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*/
|
|
|
|
#ifndef MAX_CONSTANTS_ID
|
|
#define MAX_CONSTANTS_ID 128
|
|
#endif
|
|
|
|
string g_constIndex[MAX_CONSTANTS_ID];
|
|
|
|
void
|
|
Constants_Init(void)
|
|
{
|
|
filestream constFile;
|
|
string tempString;
|
|
int arguments = 0i;
|
|
int indexCount = 0i;
|
|
|
|
InitStart();
|
|
|
|
if (!g_hashConstants) {
|
|
g_hashConstants = hash_createtab(2, HASH_ADD);
|
|
}
|
|
|
|
constFile = fopen("scripts/constants.txt", FILE_READ);
|
|
|
|
if (constFile < 0) {
|
|
NSError("Missing file scripts/constants.txt");
|
|
InitEnd();
|
|
return;
|
|
}
|
|
|
|
while ((tempString = fgets(constFile))) {
|
|
arguments = (int)tokenize_console(tempString);
|
|
|
|
if (arguments != 2) {
|
|
continue;
|
|
}
|
|
|
|
/* sanity bounds check */
|
|
if (indexCount == MAX_CONSTANTS_ID) {
|
|
NSError("Hit maximum number of %d constants.", MAX_CONSTANTS_ID);
|
|
InitEnd();
|
|
return;
|
|
}
|
|
|
|
g_constIndex[indexCount] = argv(1);
|
|
hash_add(g_hashConstants, argv(0), indexCount);
|
|
indexCount++;
|
|
}
|
|
|
|
InitEnd();
|
|
}
|
|
|
|
string
|
|
Constants_LookUp(string constName, string returnValue)
|
|
{
|
|
int constIndex = -1i;
|
|
|
|
/* only if we're prefixed */
|
|
if (substring(constName, 0, 1) == "$")
|
|
constIndex = hash_get(g_hashConstants, substring(constName, 1, -1), -1i);
|
|
|
|
return (constIndex == -1i) ? returnValue : g_constIndex[constIndex];
|
|
}
|