bibliotheca/src/file.cpp

110 lines
2.7 KiB
C++

#include <stddef.h>
#include <string.h>
#include <assert.h>
#include <stdio.h>
#include <errno.h>
#include <stdlib.h>
#include "file.h"
namespace file {
char const * source_path = NULL;
int source_path_length = 0;
#ifdef READ_PACK_FILE
#include "pack.h"
extern "C" {
extern uint8_t const _binary_test_pack_start[];
extern uint8_t const _binary_test_pack_end[];
extern int const _binary_test_pack_size;
};
void const * read_file(const char * r_filename, int * out_size)
{
pack::header const * header = (pack::header const *)&_binary_test_pack_start[0];
assert(header->magic == pack::magic_value);
ptrdiff_t data = (ptrdiff_t)&_binary_test_pack_start[header->header_size];
for (unsigned int i = 0; i < header->entry_count; i++) {
if (strcmp(header->entry[i].filename, r_filename) == 0) {
*out_size = header->entry[i].size;
return (void const *)(data + header->entry[i].offset);
}
}
fprintf(stderr, "filename not found in pack file %s\n", r_filename);
assert(false);
}
void free(void const * buf)
{
(void)buf;
}
#else
static char const * join_path(char * buf, const char * filename)
{
if (filename[0] == '/')
return filename;
int filename_length = strlen(filename);
assert(filename_length + source_path_length + 2 < 1024);
memcpy(buf, source_path, source_path_length);
buf[source_path_length] = '/';
memcpy(&buf[source_path_length + 1], filename, filename_length);
buf[source_path_length + 1 + filename_length] = 0;
return buf;
}
void const * read_file(const char * r_filename, int * out_size)
{
fprintf(stderr, "r_filename: %s\n", r_filename);
char tmp[1024];
char const * filename = join_path(tmp, r_filename);
FILE * f = fopen(filename, "rb");
if (f == NULL) {
fprintf(stderr, "fopen(%s): %s\n", filename, strerror(errno));
return NULL;
}
int fseek_end_ret = fseek(f, 0, SEEK_END);
if (fseek_end_ret < 0) {
fprintf(stderr, "fseek(%s, SEEK_END): %s\n", filename, strerror(errno));
return NULL;
}
size_t size = ftell(f);
if (size < 0) {
fprintf(stderr, "ftell(%s): %s\n", filename, strerror(errno));
return NULL;
}
int fseek_set_ret = fseek(f, 0, SEEK_SET);
if (fseek_set_ret < 0) {
fprintf(stderr, "lseek(%s, SEEK_SET): %s\n", filename, strerror(errno));
return NULL;
}
rewind(f);
void * buf = malloc(size);
size_t read_size = fread(buf, 1, size, f);
if (read_size != size) {
fprintf(stderr, "fread(%s): %s\n", filename, strerror(errno));
return NULL;
}
*out_size = size;
return buf;
}
void free(void const * buf)
{
::free((void *)buf);
}
#endif
}