#include "ipcprotocol.h"

#include "../util/util.h"

#include "../util/logging.h"

#include <stdio.h>

#include <stdbool.h>

#include <string.h>

#include <inttypes.h>

#include <stdlib.h>

int flib_ipc_append_message(flib_vector *vec, const char *fmt, ...) {

	int result = -1;

		// 1 byte size prefix, 255 bytes max message length, 1 0-byte for vsnprintf

		char msgbuffer[257];

		// Format the message, leaving one byte at the start for the length

		va_list argp;

		va_start(argp, fmt);

		int msgSize = vsnprintf(msgbuffer+1, 256, fmt, argp);

		va_end(argp);

			// Add the length prefix

			((uint8_t*)msgbuffer)[0] = msgSize;

			// Append it to the vector

		}

	}

	return result;

}

int flib_ipc_append_mapconf(flib_vector *vec, const flib_map *map, bool mappreview) {

	int result = -1;

	flib_vector *tempvector = flib_vector_create();

		bool error = false;

		if(map->mapgen == MAPGEN_NAMED) {

		}

		}

		error |= flib_ipc_append_seed(tempvector, map->seed);

		error |= flib_ipc_append_message(tempvector, "e$template_filter %i", map->templateFilter);

		error |= flib_ipc_append_message(tempvector, "e$mapgen %i", map->mapgen);

		if(map->mapgen == MAPGEN_MAZE) {

			error |= flib_ipc_append_message(tempvector, "e$maze_size %i", map->mazeSize);

		}

		if(map->mapgen == MAPGEN_DRAWN) {

			/*

			 * We have to split the drawn map data into several edraw messages here because

			 * it can be longer than the maximum message size.

			 */

			const char *edraw = "edraw ";

			int edrawlen = strlen(edraw);

			for(int offset=0; offset<map->drawDataSize; offset+=200) {

				int bytesRemaining = map->drawDataSize-offset;

				int fragmentsize = bytesRemaining < 200 ? bytesRemaining : 200;

				uint8_t messagesize = edrawlen + fragmentsize;

			}

		}

			// Message created, now we can copy everything.

			flib_constbuffer constbuf = flib_vector_as_constbuffer(tempvector);

				result = 0;

			}

		}

	}

	flib_vector_destroy(tempvector);

	return result;

}

int flib_ipc_append_seed(flib_vector *vec, const char *seed) {

		return flib_ipc_append_message(vec, "eseed %s", seed);

	}

}

int flib_ipc_append_script(flib_vector *vec, const char *script) {

	}

}

int flib_ipc_append_gamescheme(flib_vector *vec, const flib_cfg *scheme) {

	int result = -1;

	flib_vector *tempvector = flib_vector_create();

		const flib_cfg_meta *meta = scheme->meta;

		bool error = false;

		for(int i=0; i<meta->settingCount; i++) {

			}

		}

		if(!error) {

			// Message created, now we can copy everything.

			flib_constbuffer constbuf = flib_vector_as_constbuffer(tempvector);

				result = 0;

			}

		}

	}

	flib_vector_destroy(tempvector);

	return result;

}

static int appendWeaponSet(flib_vector *vec, flib_weaponset *set) {

	return flib_ipc_append_message(vec, "eammloadt %s", set->loadout)

		|| flib_ipc_append_message(vec, "eammprob %s", set->crateprob)

		|| flib_ipc_append_message(vec, "eammdelay %s", set->delay)

		|| flib_ipc_append_message(vec, "eammreinf %s", set->crateammo);

}

int flib_ipc_append_addteam(flib_vector *vec, const flib_team *team, bool perHogAmmo, bool noAmmoStore) {

	int result = -1;

	flib_vector *tempvector = flib_vector_create();

		bool error = false;

		if(!perHogAmmo && !noAmmoStore) {

		}

		// TODO

		char *hash = team->ownerName ? team->ownerName : "00000000000000000000000000000000";

		if(team->remoteDriven) {

			error |= flib_ipc_append_message(tempvector, "erdriven");

		}

		error |= flib_ipc_append_message(tempvector, "egrave %s", team->grave);

		error |= flib_ipc_append_message(tempvector, "efort %s", team->fort);

		error |= flib_ipc_append_message(tempvector, "evoicepack %s", team->voicepack);

		error |= flib_ipc_append_message(tempvector, "eflag %s", team->flag);

		for(int i=0; i<team->bindingCount; i++) {

			error |= flib_ipc_append_message(tempvector, "ebind %s %s", team->bindings[i].binding, team->bindings[i].action);

		}

		for(int i=0; i<team->hogsInGame; i++) {

			if(perHogAmmo && !noAmmoStore) {

				error |= appendWeaponSet(tempvector, team->hogs[i].weaponset);

			}

			error |= flib_ipc_append_message(tempvector, "eaddhh %i %i %s", team->hogs[i].difficulty, team->hogs[i].initialHealth, team->hogs[i].name);

			error |= flib_ipc_append_message(tempvector, "ehat %s", team->hogs[i].hat);

		}

		if(!error) {

			// Message created, now we can copy everything.

			flib_constbuffer constbuf = flib_vector_as_constbuffer(tempvector);

				result = 0;

			}

		}

	}

	flib_vector_destroy(tempvector);

	return result;

}

	for(int i=0; i<conf->meta->modCount; i++) {

			return conf->mods[i];

		}

	}

	return false;

}

int flib_ipc_append_fullconfig(flib_vector *vec, const flib_gamesetup *setup, bool netgame) {

	int result = -1;

	flib_vector *tempvector = flib_vector_create();

		bool error = false;

		bool perHogAmmo = false;

		bool sharedAmmo = false;

		error |= flib_ipc_append_message(vec, netgame ? "TN" : "TL");

		if(setup->map) {

			error |= flib_ipc_append_mapconf(tempvector, setup->map, false);

		}

		if(setup->script) {

		}

		if(setup->gamescheme) {

			error |= flib_ipc_append_gamescheme(tempvector, setup->gamescheme);

			// Shared ammo has priority over per-hog ammo

		}

			if(!clanColors) {

				error = true;

			} else {

				int clanCount = 0;

					// Find the clan index of this team (clans are identified by color).

					int clan = 0;

						clan++;

					}

					if(clan==clanCount) {

						newClan = true;

						clanCount++;

					}

					// If shared ammo is active, only add an ammo store for the first team in each clan.

					bool noAmmoStore = sharedAmmo&&!newClan;

				}

			}

			free(clanColors);

		}

		error |= flib_ipc_append_message(tempvector, "!");

		if(!error) {

			// Message created, now we can copy everything.

			flib_constbuffer constbuf = flib_vector_as_constbuffer(tempvector);

				result = 0;

			}

		}

	}

	return result;

}