/*
 * Copyright (c) 2016-2022 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.
*/

/* our sound boogeyman */
static entity emitter;
static int g_sounds;

/* where we save our lists */
typedef struct
{
	string sentence;
	string sample;
} chatsentence_t;
static chatsentence_t *g_table;

void
ChatPlay(int id)
{
	int r, count, flags;

	count = tokenizebyseparator(g_table[id].sample, ";");
	r = random(0, count);
	flags = SOUNDFLAG_NOREVERB; /* this should be enough for now */
	sound(emitter, CHAN_BODY, argv(r), 1.0f, ATTN_NONE, 100, flags);
}

string
ChatLookUp(string cmd)
{
	int i;
	for (i = 0; i < g_sounds; i++) {
		int sc = tokenizebyseparator(g_table[i].sentence, ";");
		for (int c = 0; c < sc; c++) {
			if (cmd == argv(c)) {
				ChatPlay(i);
				return (__NULL__);
			}
		}
	}

	/* some joker might set it to non 0/1 */
	return (__NULL__);
}

void
ChatLoadFile(string filename)
{
	string temp;
	int c = 0;
	int i = g_sounds;
	filestream chatfile;
	chatfile = fopen(filename, FILE_READ);

	if (chatfile < 0) {
		print(sprintf("[CHATSOUNDS] %s not found.\n", filename));
		return;
	}

	/* count lines */
	while ((temp = fgets(chatfile))) {
		c = tokenize_console(temp);
		if (c != 2) {
			continue;
		}
		g_sounds++;
	}
	fseek(chatfile, 0);

	g_table = (chatsentence_t *)memrealloc(g_table, sizeof(chatsentence_t), i, g_sounds);

	while ((temp = fgets(chatfile))) {
		c = tokenize_console(temp);
		if (c != 2) {
			continue;
		}
		g_table[i].sentence = strtolower(argv(0));
		g_table[i].sample = strtolower(argv(1));
		c = tokenizebyseparator(g_table[i].sample, ";");
		for (int x = 0; x < c; x++) {
			precache_sound(argv(x));
			print(sprintf("[CHATSOUNDS] Caching: %s\n", argv(x)));
		}
		i++;
	}
	fclose(chatfile);
}

/* plugin hook */
string
FMX_ParseClientCommand(string cmd)
{
	tokenize(cmd);
	switch (argv(0)) {
	case "say":
		return ChatLookUp(strtolower(argv(1)));
		break;
	}
	return (cmd);
}

void
FMX_Init(void)
{
	int i = 0;
	searchhandle list;

	list = search_begin("chatsounds_*.txt", FALSE, TRUE);
	for (i = 0; i < search_getsize(list); i++) {
		print(sprintf("[CHATSOUNDS] Found %s\n", search_getfilename(list, i)));
		ChatLoadFile(search_getfilename(list, i));
	}
	search_end(list);
}

void
FMX_InitEnts(void)
{
	if (!emitter && g_sounds > 0) {
		emitter = spawn();
	}
}