fileinfo.c

#include "fileinfo.h"

uint64_t readintobuf(char *filename, char **out) {
	FILE *file = fopen(filename, "r");
	if (file == NULL) {
		fprintf(stderr, "Error: unable to open file '%s'\n", filename);
		exit(2);
	}
	fseek(file, 0, SEEK_END);
	uint64_t length = ftell(file);
	fseek(file, 0, SEEK_SET);
	*out = (char *)malloc(length * sizeof(char));
	fread(*out, length, 1, file);
	fclose(file);
	return length;
}

filedata *loadfile(char *filename) {
	filedata *ret = (filedata *)calloc(1, sizeof(filedata));
	ret->length = readintobuf(filename, &(ret->contents));
	printf("[File] Name: %s | Size: %lX bytes\n", filename, ret->length);
	parse(ret);
	return ret;
}

void parse(filedata *fd) {
	if (strncmp(fd->contents, "<!--", 4) == 0) {
		fprintf(stderr, "Parsing as dmx...\n");
		fd->filetype = UNK_DMX;
	} else if (*((uint32_t *)fd->contents) == 0x55aa1234) {
		fprintf(stderr, "Parsing as vpk...\n");
		fd->filetype = VPK;
	} else if (*((uint32_t *)fd->contents) == 0xFADEBEAD) {
		fprintf(stderr, "Parsing as gnv...\n");
		fd->filetype = GNV;
	} else if (strncmp(fd->contents, "VBSP", 4) == 0) {
		fprintf(stderr, "Parsing as bsp. Currently not handled and out "
		                "of scope.\n");
		fd->filetype = BSP;
	} else if (strncmp(fd->contents, "vcs2", 4) == 0) {
		fprintf(stderr, "Parsing as vcs...\n");
		parse_vcs(fd);
	} else if (strncmp(fd->contents, "VBKV", 4) == 0) {
		fprintf(stderr,
		        "Parsing as vbkv. Currently not handled...and it's "
		        "_super_ uncommon.\n");
		fd->filetype = VBKV;
	} else if (strncmp(fd->contents, "// file", 7) == 0) {
		fprintf(stderr, "Parsing as cloth...\n");
		fd->filetype = KV_CLOTH;
	} else if (*((uint32_t *)fd->contents) == fd->length) {
		fprintf(stderr, "Parsing as SVF...\n");
		parse_svf(fd);
	} else if (*((uint16_t *)(fd->contents + 4)) == 0x0C) {
		fprintf(
		    stderr,
		    "File length wrong, but speculatively parsing as SVF...\n");
		parse_svf(fd);
	} else {
		fprintf(stderr, "Unknown file type.\n");
		fd->filetype = UNKNOWN;
	}
}

void fd_free(filedata *fd) {
	if (fd == NULL) {
		fprintf(stderr, "Error: Tried to fd_free null pointer!\n");
		return;
	}
}