OpenRCT2/src/object_list.c

#pragma region Copyright (c) 2014-2016 OpenRCT2 Developers
/*****************************************************************************
 * OpenRCT2, an open source clone of Roller Coaster Tycoon 2.
 *
 * OpenRCT2 is the work of many authors, a full list can be found in contributors.md
 * For more information, visit https://github.com/OpenRCT2/OpenRCT2
 *
 * OpenRCT2 is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * A full copy of the GNU General Public License can be found in licence.txt
 *****************************************************************************/
#pragma endregion

#include "addresses.h"
#include "game.h"
#include "object.h"
#include "object_list.h"
#include "object/ObjectRepository.h"
#include "util/sawyercoding.h"
#include "util/util.h"

// 98DA00
int object_entry_group_counts[] = {
	128,	// rides
	252,	// small scenery
	128,	// large scenery
	128,	// walls
	32,		// banners
	16,		// paths
	15,		// path bits
	19,		// scenery sets
	1,		// park entrance
	1,		// water
	1		// scenario text
};

// 98DA2C
int object_entry_group_encoding[] = {
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_RLE,
	CHUNK_ENCODING_ROTATE
};

#ifdef NO_RCT2
	rct_ride_entry				*gRideEntries[128];
	rct_small_scenery_entry		*gSmallSceneryEntries[252];
	rct_large_scenery_entry		*gLargeSceneryEntries[128];
	rct_wall_scenery_entry		*gWallSceneryEntries[128];
	rct_banner					*gBannerSceneryEntries[32];
	rct_footpath_entry			*gFootpathEntries[16];
	rct_path_bit_scenery_entry	*gFootpathAdditionEntries[15];
	rct_scenery_set_entry		*gSceneryGroupEntries[19];
	rct_entrance_type			*gParkEntranceEntries[1];
	rct_water_type				*gWaterEntries[1];
	rct_stex_entry				*gStexEntries[1];
#endif


// 0x98D97C chunk address', 0x98D980 object_entries
const rct_object_entry_group object_entry_groups[] = {
	(void**)(gRideEntries				), RCT2_ADDRESS(0x00F3F03C             ,rct_object_entry_extended),	// rides
	(void**)(gSmallSceneryEntries		), RCT2_ADDRESS(0x00F3F03C + (128 * 20),rct_object_entry_extended),	// small scenery	0x009AD1A4, 0xF2FA3C
	(void**)(gLargeSceneryEntries		), RCT2_ADDRESS(0x00F3F03C + (380 * 20),rct_object_entry_extended),	// large scenery	0x009AD594, 0xF40DEC
	(void**)(gWallSceneryEntries		), RCT2_ADDRESS(0x00F3F03C + (508 * 20),rct_object_entry_extended),	// walls			0x009AD794, 0xF417EC
	(void**)(gBannerSceneryEntries		), RCT2_ADDRESS(0x00F3F03C + (636 * 20),rct_object_entry_extended),	// banners			0x009AD994, 0xF421EC
	(void**)(gFootpathEntries			), RCT2_ADDRESS(0x00F3F03C + (668 * 20),rct_object_entry_extended),	// paths			0x009ADA14, 0xF4246C
	(void**)(gFootpathAdditionEntries	), RCT2_ADDRESS(0x00F3F03C + (684 * 20),rct_object_entry_extended),	// path bits		0x009ADA54, 0xF425AC
	(void**)(gSceneryGroupEntries		), RCT2_ADDRESS(0x00F3F03C + (699 * 20),rct_object_entry_extended),	// scenery sets		0x009ADA90, 0xF426D8
	(void**)(gParkEntranceEntries		), RCT2_ADDRESS(0x00F3F03C + (718 * 20),rct_object_entry_extended),	// park entrance	0x009ADADC, 0xF42854
	(void**)(gWaterEntries				), RCT2_ADDRESS(0x00F3F03C + (719 * 20),rct_object_entry_extended),	// water			0x009ADAE0, 0xF42868
	(void**)(gStexEntries				), RCT2_ADDRESS(0x00F3F03C + (720 * 20),rct_object_entry_extended),	// scenario text	0x009ADAE4, 0xF4287C
};

int check_object_entry(const rct_object_entry *entry)
{
	uint32 *dwords = (uint32*)entry;
	return (0xFFFFFFFF & dwords[0] & dwords[1] & dwords[2] & dwords[3]) + 1 != 0;
}

/**
 *
 *  rct2: 0x006AB344
 */
void object_create_identifier_name(char* string_buffer, const rct_object_entry* object)
{
	for (uint8 i = 0; i < 8; ++i){
		if (object->name[i] != ' '){
			*string_buffer++ = object->name[i];
		}
	}

	*string_buffer++ = '/';

	for (uint8 i = 0; i < 4; ++i){
		uint8 flag_part = (object->flags >> (i * 8)) & 0xFF;
		*string_buffer++ = RCT2_ADDRESS(0x0098DA64, char)[flag_part >> 4];
		*string_buffer++ = RCT2_ADDRESS(0x0098DA64, char)[flag_part & 0xF];
	}

	for (uint8 i = 0; i < 4; ++i){
		uint8 checksum_part = (object->checksum >> (i * 8)) & 0xFF;
		*string_buffer++ = RCT2_ADDRESS(0x0098DA64, char)[checksum_part >> 4];
		*string_buffer++ = RCT2_ADDRESS(0x0098DA64, char)[checksum_part & 0xF];
	}
	*string_buffer++ = '\0';
}

/**
 *
 *  rct2: 0x006AA0C6
 */
bool object_read_and_load_entries(SDL_RWops* rw)
{
	// Read all the object entries
	rct_object_entry *entries = malloc(OBJECT_ENTRY_COUNT * sizeof(rct_object_entry));
	sawyercoding_read_chunk(rw, (uint8*)entries);
	bool result = object_load_entries(entries);
	free(entries);
	return result;
}

/**
 *
 *  rct2: 0x006A9DA2
 * bl = entry_index
 * ecx = entry_type
 */
int find_object_in_entry_group(const rct_object_entry* entry, uint8* entry_type, uint8* entry_index){
	*entry_type = entry->flags & 0xF;

	rct_object_entry_group entry_group = object_entry_groups[*entry_type];
	for (*entry_index = 0;
		*entry_index < object_entry_group_counts[*entry_type];
		++(*entry_index),
		entry_group.chunks++,
		entry_group.entries++){

		if (*entry_group.chunks == (uint8*)-1) continue;

		if (object_entry_compare((rct_object_entry*)entry_group.entries, entry))break;
	}

	if (*entry_index == object_entry_group_counts[*entry_type])return 0;
	return 1;
}

void get_type_entry_index(size_t index, uint8 * outObjectType, uint8 * outEntryIndex)
{
	uint8 objectType = OBJECT_TYPE_RIDE;
	for (size_t i = 0; i < OBJECT_ENTRY_GROUP_COUNT; i++) {
		size_t groupCount = object_entry_group_counts[i];
		if (index >= groupCount) {
			index -= groupCount;
			objectType++;
		} else {
			break;
		}
	}

	if (outObjectType != NULL) *outObjectType = objectType;
	if (outEntryIndex != NULL) *outEntryIndex = (uint8)index;
}

const rct_object_entry * get_loaded_object_entry(size_t index)
{
	uint8 objectType, entryIndex;
	get_type_entry_index(index, &objectType, &entryIndex);

	rct_object_entry * entry = (rct_object_entry *)&(object_entry_groups[objectType].entries[entryIndex]);
	return entry;
}

void * get_loaded_object_chunk(size_t index)
{
	uint8 objectType, entryIndex;
	get_type_entry_index(index, &objectType, &entryIndex);

	void *entry = object_entry_groups[objectType].chunks[entryIndex];
	return entry;
}

void object_entry_get_name(utf8 * buffer, size_t bufferSize, const rct_object_entry * entry)
{
	size_t nameLength = 8;
	const char * end = memchr(entry->name, ' ', 8);
	if (end != NULL)
	{
		nameLength = (size_t)(end - entry->name);
	}

	bufferSize = min(nameLength + 1, bufferSize);
	memcpy(buffer, entry->name, bufferSize - 1);
	buffer[bufferSize - 1] = 0;
}

void object_entry_get_name_fixed(utf8 * buffer, size_t bufferSize, const rct_object_entry * entry)
{
	bufferSize = min(9, bufferSize);
	memcpy(buffer, entry->name, bufferSize - 1);
	buffer[bufferSize - 1] = 0;
}