#include "config.h"

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

#include "logerr.h"

#include "util.h"


const size_t
NULL_TERMINATOR = sizeof((char)'\0');

int
slurp(const char *const filename, char **out) {
	int rc = -1;

	FILE *file = NULL;
	char *str  = NULL;

	file = fopen(filename, "r");
	if (file == NULL) {
		logerr("fopen(): %s", strerror(errno));
		goto out;
	}

	if (fseek(file, 0L, SEEK_END)) {
		logerr("fseek(): %s", strerror(errno));
		goto out;
	}

	const long lsize = ftell(file);
	if (lsize == -1) {
		logerr("ftell(): %s", strerror(errno));
		goto out;
	}
	const size_t size = (size_t)lsize;

	errno = 0;
	rewind(file);
	if (errno) {
		logerr("rewind(): %s", strerror(errno));
		goto out;
	}

	str = malloc(size + NULL_TERMINATOR);
	if (str == NULL) {
		logerr("malloc(): %s", strerror(errno));
		goto out;
	}

	if (fread(str, sizeof(char), size, file) != size) {
		logerr("fread(): %s", strerror(errno));
		goto out;
	}
	str[size] = '\0';
	*out = str;

	rc = 0;
out:
	if (file != NULL) {
		if (fclose(file)) {
			logerr("fclose(): %s", strerror(errno));
			rc = -1;
		}
	}
	if (rc) {
		if (str != NULL) {
			free(str);
		}
	}
	return rc;
}

void
freeit(const void **const ptr) {
	free((void *)*ptr);
	*ptr = NULL;
}