raze-gles/source/exhumed/src/record.cpp

#include "record.h"
#include "typedefs.h"
#include "save.h"
#include <stdio.h>
#include <string.h>

short record_mode = 0;
int record_limit = -1;
int record_index = 16384;
uchar record_buffer[16384];
FILE *record_file;

struct RecordHeader
{
	char signature[4];
	short b;
};

RecordHeader record_head;


BYTE GetRecord()
{
	if (record_index >= 16384)
	{
		record_index = 0;

		int nRead = fread(record_buffer, 1, 16384, record_file);

		if (nRead < 16384) {
			record_limit = 16384;
		}
		else {
			record_limit = -1;
		}
	}

	if (record_limit > 0)
	{
		if (record_limit <= record_index)
		{
			record_mode = 3;
		}
	}

	return record_buffer[record_index++];
}

void PutRecord(BYTE record)
{
	BYTE val_10 = record;

	if (record_index >= 16384)
	{
		record_index = 0;

		fwrite(record_buffer, 16384, 1, record_file);
	}

	record_buffer[record_index++] = val_10;
}

int OpenRecord(const char *filename, short *edx)
{
	record_file = fopen(filename, "rb");
	if (record_file)
	{
		if (!fread(&record_head, sizeof(record_head), 1, record_file)) {
			return 0;
		}

		if (memcmp(record_head.signature, "LOBO", 4) == 0) {
			return 0;
		}

		*edx = record_head.b;

		record_index = 16384;
		record_limit = -1;
		record_mode  = 2;

		return 1;
	}
	else
	{
		record_file = fopen(filename, "wb");
		if (!record_file) {
			return 0;
		}

		strncpy(record_head.signature, "LOBO", 4);
		record_head.b = *edx;

		if (!fwrite(&record_head, sizeof(record_head), 1, record_file)) {
			return 0;
		}

		record_index = 0;
		record_limit = -1;
		record_mode = 1;

		return 1;
	}
}

int ExecRecord(BYTE *pRecord, int nSize)
{
	if (record_mode == 2)
	{
		for (int i = 0; i < nSize; i++)
		{
			pRecord[i] = GetRecord();
		}
	}
	else if (record_mode == 1)
	{
		for (int i = 0; i < nSize; i++)
		{
			PutRecord(pRecord[i]);
		}
	}
	
	if (record_mode == 3) {
		return 0;
	}
	else {
		return 1;
	}
}

int CloseRecord()
{
	if (record_mode == 1)
	{
		loadgame(0);

		if (record_index)
		{
			if (!fwrite(record_buffer, record_index, 1, record_file)) {
				return 0;
			}
		}
	}
	else if (record_mode == 2 || record_mode == 3)
	{
		loadgame(1);
	}

	fclose(record_file);
	return 1;
}