pyrite-dev/assaultfish
13
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update pak format

Browse source
This commit is contained in:
Nishi 2026-01-12 11:48:26 +09:00
commit 32919ca13d
Signed by: nishi
GPG key ID: 27EF69B208EB9343
9 changed files with 324 additions and 73 deletions
Download patch file Download diff file Expand all files Collapse all files

25
engine/src/crc.c Normal file
View file

@ -0,0 +1,25 @@
/* crc32.c -- compute the CRC-32 of a data stream
* Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h
*/
#include <GearSrc/CRC.h>
GSU32 GSCRC32(void* input, unsigned int len) {
int i, j;
GSU32 byte, crc, mask;
unsigned char* message = input;
i = 0;
crc = 0xFFFFFFFF;
while(i < len) {
byte = message[i]; // Get next byte.
crc = crc ^ byte;
for(j = 7; j >= 0; j--) { // Do eight times.
mask = -(crc & 1);
crc = (crc >> 1) ^ (0xEDB88320 & mask);
}
i = i + 1;
}
return ~crc;
}

8
engine/src/file.c
View file

@ -30,8 +30,7 @@ GSFile GSFileOpen(GSEngine engine, const char* path) {
int i;
nam[0] = 0;
nam[1] = 0;
nam += 2;
nam += 1;
for(i = 0; i < shlen(engine->resource); i++) {
if(strcmp(engine->resource[i].key, s) == 0) {
@ -78,6 +77,11 @@ void GSFileSeek(GSFile file, int pos) {
file->seek = pos;
}
void GSFileSeekFromCurrent(GSFile file, int pos) {
if(file->fp != NULL) fseek(file->fp, pos, SEEK_CUR);
file->seek += pos;
}
unsigned int GSFileSize(GSFile file) {
return file->size;
}

4
engine/src/log.c
View file

@ -13,6 +13,8 @@ void GSLog(int level, const char* fmt, ...) {
fprintf(out, "WARN ");
} else if(level == GSLogError) {
fprintf(out, "ERROR");
} else if(level == GSLogDebug) {
fprintf(out, "DEBUG");
}
#else
fprintf(out, "[\x1b[mGearSrc\x1b[m|");
@ -23,6 +25,8 @@ void GSLog(int level, const char* fmt, ...) {
fprintf(out, "\x1b[1m\x1b[33mWARN\x1b[m ");
} else if(level == GSLogError) {
fprintf(out, "\x1b[1m\x1b[31mERROR\x1b[m");
} else if(level == GSLogDebug) {
fprintf(out, "\x1b[1m\x1b[34mDEBUG\x1b[m");
}
#endif

162
engine/src/resource.c
View file

@ -3,9 +3,28 @@
#include <GearSrc/File.h>
#include <GearSrc/Log.h>
#include <GearSrc/Endian.h>
#include <GearSrc/CRC.h>
#include <GearSrc/String.h>
#include <lz4.h>
/**
* signature: 0x7F PAK
*
* entry:
* 1 byte: type
* 4 bytes: name crc32
* 1 byte: name len
* n bytes: name
* if file {
* 4 bytes: actual size
* 4 bytes: compressed size
* 4 bytes: seek pos
* } else {
* 2 bytes: number of entries
* }
*/
static unsigned char res_sig[4] = {
0x7f,
'P',
@ -37,45 +56,134 @@ GSResource GSResourceOpen(GSEngine engine, const char* path) {
return resource;
}
void* GSResourceGet(GSResource resource, const char* name, unsigned int* size) {
char fn[129];
int find_entry(GSFile f, const char* name, int max, GSU32* totsz, GSU32* actsz, GSU32* cmpsz, GSU32* seekpos) {
GSU32 crc = GSEndianSwapU32BE(GSCRC32((void*)name, strlen(name)));
int i;
fn[128] = 0;
for(i = 0; i < max; i++) {
unsigned char dir;
unsigned char len;
char* fn;
GSU32 t;
if(GSFileRead(f, &dir, 1) < 1) return -1;
if(GSFileRead(f, &t, 4) < 4) return -1;
if(GSFileRead(f, &len, 1) < 1) return -1;
fn = malloc(len + 1);
if(len > 0) {
if(GSFileRead(f, fn, len) < len) {
free(fn);
return -1;
}
}
fn[len] = 0;
if(dir) {
GSU16 n;
GSU32 tsz;
if(GSFileRead(f, &n, 2) < 2) {
free(fn);
return -1;
}
if(GSFileRead(f, &tsz, 4) < 4) {
free(fn);
return -1;
}
n = GSEndianSwapU16BE(n);
tsz = GSEndianSwapU32BE(tsz);
if(totsz != NULL) *totsz = tsz;
if(crc == t && strcmp(fn, name) == 0) {
GSLog(GSLogDebug, "Directory %s/ found", fn);
free(fn);
return n;
}
GSFileSeekFromCurrent(f, tsz);
} else {
if(GSFileRead(f, actsz, 4) < 4) {
free(fn);
return -1;
}
if(GSFileRead(f, cmpsz, 4) < 4) {
free(fn);
return -1;
}
if(GSFileRead(f, seekpos, 4) < 4) {
free(fn);
return -1;
}
*actsz = GSEndianSwapU32BE(*actsz);
*cmpsz = GSEndianSwapU32BE(*cmpsz);
*seekpos = GSEndianSwapU32BE(*seekpos);
if(crc == t && strcmp(fn, name) == 0) {
GSLog(GSLogDebug, "File %s found", fn);
free(fn);
return -2;
}
}
free(fn);
}
return -1;
}
void* GSResourceGet(GSResource resource, const char* name, unsigned int* size) {
char* p = GSStringDuplicate(name);
char* s = p;
char* f = s;
int m = 1;
GSU32 totsz;
GSU32 actsz;
GSU32 cmpsz;
GSU32 seekpos;
unsigned char* d = NULL;
GSFileSeek(resource->file, 4);
while(!(GSFileRead(resource->file, fn, 128) < 128 || fn[0] == 0)) {
GSU32 actsz = 0;
GSU32 cmpsz = 0;
int i;
void* d;
while(1) {
s = strchr(s, '/');
if(GSFileRead(resource->file, &actsz, 4) < 4) return NULL;
if(GSFileRead(resource->file, &cmpsz, 4) < 4) return NULL;
if(s != NULL) s[0] = 0;
actsz = GSEndianSwapU32BE(actsz);
cmpsz = GSEndianSwapU32BE(cmpsz);
m = find_entry(resource->file, f, m, strlen(f) == 0 ? &totsz : NULL, &actsz, &cmpsz, &seekpos);
if(m == -1) break;
if(m == -2) {
unsigned char* cmp = malloc(cmpsz);
*size = actsz;
if(actsz > cmpsz * 255) actsz = cmpsz * 255;
d = malloc(cmpsz);
if(GSFileRead(resource->file, d, cmpsz) < cmpsz) {
free(d);
return NULL;
d = malloc(actsz);
GSFileSeek(resource->file, 4 + 1 + 4 + 1 + 2 + 4 + totsz + seekpos);
GSFileRead(resource->file, cmp, cmpsz);
LZ4_decompress_safe(cmp, d, cmpsz, actsz);
free(cmp);
*size = actsz;
break;
}
if(strcmp(fn, name) == 0) {
unsigned char* r = malloc(actsz);
LZ4_decompress_safe(d, r, cmpsz, actsz);
free(d);
return r;
} else {
free(d);
}
if(s == NULL) break;
s++;
f = s;
}
return NULL;
free(p);
return d;
}
void GSResourceClose(GSResource resource) {