#include "test.h"

#include <stdlib.h>
#include <string.h>

void test_location(void) {
	char **listing = list_dir("location", ".locations.pom");
	for (size_t i = 0; listing[i]; i++) {
		const char *loc_path = listing[i];
		printf("Testing %s...\n",loc_path);
		char *conf_path = malloc(strlen(loc_path));
		sprintf(conf_path, "%.*s.pom",
			(int)(strlen(loc_path) - strlen(".locations.pom")), loc_path);
		pom_error *error;
		pom_conf *conf = pom_load_path(NULL, conf_path, &error);
		if (error) {
			test_fail("Failed to parse %s\n%s", conf_path,
				pom_error_to_string(error));
			continue;
		}
		pom_conf *loc = pom_load_path(NULL, loc_path, &error);
		if (error) {
			test_fail("Failed to parse %s\n%s", loc_path,
				pom_error_to_string(error));
			continue;
		}
		const pom_item *item;
		pom_item_iter *iter = NULL;
		while ((item = pom_conf_next_item(conf, &iter))) {
			if (!pom_conf_has(loc, item->key)) {
				test_fail("%s has key '%s' but %s doesn't",
					conf_path, item->key, loc_path);
			}
		}
		while ((item = pom_conf_next_item(loc, &iter))) {
			const char *file;
			uint64_t line;
			if (!pom_conf_location(conf, item->key, &file, &line)) {
				test_fail("%s has key '%s' but %s doesn't",
					loc_path, item->key, conf_path);
				continue;
			}
			if (strcmp(file, conf_path) != 0) {
				test_fail("Incorrect file name in location of '%s' (expected %s, got %s)",
					item->key, conf_path, file);
			}
			if ((uint64_t)atol(item->value) != line) {
				test_fail("Incorrect line number in location of '%s' (expected %ld, got %ld)",
					item->key, atol(item->value), (long)line);
			}
		}
		pom_conf_free(conf);
		pom_conf_free(loc);
		free(conf_path);
	}
	free_listing(listing);
}