openttd-ottdgrfs: newgrf_spritegroup.c@4fbeab45928c (annotated)

3595 20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	1	/* $Id$ */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	2
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	3	#include "stdafx.h"
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	4	#include "openttd.h"
3677 cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	5	#include "variables.h"
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	6	#include "macros.h"
3595 20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	7	#include "pool.h"
3677 cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	8	#include "newgrf_spritegroup.h"
3595 20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	9
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	10	enum {
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	11	SPRITEGROUP_POOL_BLOCK_SIZE_BITS = 4, /* (1 << 4) == 16 items */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	12	SPRITEGROUP_POOL_MAX_BLOCKS = 8000,
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	13	};
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	14
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	15	static uint _spritegroup_count = 0;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	16	static MemoryPool _spritegroup_pool;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	17
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	18
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	19	static void SpriteGroupPoolCleanBlock(uint start_item, uint end_item)
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	20	{
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	21	uint i;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	22
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	23	for (i = start_item; i <= end_item; i++) {
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	24	SpriteGroup group = (SpriteGroup)GetItemFromPool(&_spritegroup_pool, i);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	25
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	26	/* Free dynamically allocated memory */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	27	switch (group->type) {
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	28	case SGT_REAL:
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	29	free(group->g.real.loaded);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	30	free(group->g.real.loading);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	31	break;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	32
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	33	case SGT_DETERMINISTIC:
3668 d7ed0a867b49 (svn r4583) - NewGRF: Revamp sprite group loading to support advanced varadjusts and variable size. These are not yet processed, however. peter1138 parents: 3595 diff changeset	34	free(group->g.determ.adjusts);
3595 20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	35	free(group->g.determ.ranges);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	36	break;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	37
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	38	case SGT_RANDOMIZED:
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	39	free(group->g.random.groups);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	40	break;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	41
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	42	default:
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	43	break;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	44	}
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	45	}
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	46	}
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	47
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	48
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	49	/* Initialize the SpriteGroup pool */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	50	static MemoryPool _spritegroup_pool = { "SpriteGr", SPRITEGROUP_POOL_MAX_BLOCKS, SPRITEGROUP_POOL_BLOCK_SIZE_BITS, sizeof(SpriteGroup), NULL, &SpriteGroupPoolCleanBlock, 0, 0, NULL };
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	51
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	52
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	53	/* Allocate a new SpriteGroup */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	54	SpriteGroup *AllocateSpriteGroup(void)
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	55	{
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	56	/* This is totally different to the other pool allocators, as we never remove an item from the pool. */
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	57	if (_spritegroup_count == _spritegroup_pool.total_items) {
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	58	if (!AddBlockToPool(&_spritegroup_pool)) return NULL;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	59	}
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	60
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	61	return (SpriteGroup*)GetItemFromPool(&_spritegroup_pool, _spritegroup_count++);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	62	}
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	63
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	64
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	65	void InitializeSpriteGroupPool(void)
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	66	{
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	67	CleanPool(&_spritegroup_pool);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	68	AddBlockToPool(&_spritegroup_pool);
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	69
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	70	_spritegroup_count = 0;
20621831cd46 (svn r4486) - NewGRF: Create and use a memory pool to manage sprite groups. This peter1138 parents: diff changeset	71	}
3677 cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	72
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	73
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	74	static const SpriteGroup ResolveReal(const SpriteGroup group, ResolverObject *object)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	75	{
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	76	bool in_motion;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	77	uint set;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	78
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	79	set = object->ResolveReal(object, group->g.real.num_loaded, group->g.real.num_loading, &in_motion);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	80
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	81	assert((in_motion && set < group->g.real.num_loaded) \|\| (!in_motion && set < group->g.real.num_loading));
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	82
3681 4fbeab45928c (svn r4601) - NewGRF: after evalutaing a 'real' group, return the chosen group directly instead of resolving it as only callback and spriteid groups are returned. peter1138 parents: 3677 diff changeset	83	return in_motion ? group->g.real.loaded[set] : group->g.real.loading[set];
3677 cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	84	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	85
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	86
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	87	static uint32 GetVariable(const ResolverObject *object, byte variable, byte parameter)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	88	{
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	89	/* Return common variables */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	90	switch (variable) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	91	case 0x00: return _date;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	92	case 0x01: return _cur_year;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	93	case 0x02: return _cur_month;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	94	case 0x03: return _opt.landscape;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	95	case 0x09: return _date_fract;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	96	case 0x0A: return _tick_counter;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	97	case 0x0C: return object->callback;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	98	case 0x10: return object->callback_param1;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	99	case 0x11: return 0;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	100	case 0x18: return object->callback_param2;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	101	case 0x1A: return -1;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	102	case 0x1B: return GB(_display_opt, 0, 6);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	103	case 0x1C: return object->last_value;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	104	case 0x20: return _opt.landscape == LT_HILLY ? _opt.snow_line : 0xFF;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	105
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	106	/* Not a common variable, so evalute the feature specific variables */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	107	default: return object->GetVariable(object, variable, parameter);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	108	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	109	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	110
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	111
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	112	/* Evaluate an adjustment for a variable of the given size. This is a bit of
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	113	* an unwieldy macro, but it saves triplicating the code. */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	114	#define BUILD_EVAL_ADJUST(size, usize) \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	115	static size EvalAdjust_ ## size(const DeterministicSpriteGroupAdjust *adjust, size last_value, size value) \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	116	{ \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	117	value >>= adjust->shift_num; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	118	value &= adjust->and_mask; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	119	\
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	120	if (adjust->type != DSGA_TYPE_NONE) value += (size)adjust->add_val; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	121	\
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	122	switch (adjust->type) { \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	123	case DSGA_TYPE_DIV: value /= (size)adjust->divmod_val; break; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	124	case DSGA_TYPE_MOD: value %= (size)adjust->divmod_val; break; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	125	case DSGA_TYPE_NONE: break; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	126	} \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	127	\
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	128	switch (adjust->operation) { \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	129	case DSGA_OP_ADD: return last_value + value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	130	case DSGA_OP_SUB: return last_value - value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	131	case DSGA_OP_SMIN: return min(last_value, value); \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	132	case DSGA_OP_SMAX: return max(last_value, value); \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	133	case DSGA_OP_UMIN: return min((usize)last_value, (usize)value); \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	134	case DSGA_OP_UMAX: return max((usize)last_value, (usize)value); \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	135	case DSGA_OP_SDIV: return last_value / value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	136	case DSGA_OP_SMOD: return last_value % value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	137	case DSGA_OP_UDIV: return (usize)last_value / (usize)value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	138	case DSGA_OP_UMOD: return (usize)last_value % (usize)value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	139	case DSGA_OP_MUL: return last_value * value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	140	case DSGA_OP_AND: return last_value & value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	141	case DSGA_OP_OR: return last_value \| value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	142	case DSGA_OP_XOR: return last_value ^ value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	143	default: return value; \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	144	} \
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	145	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	146
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	147
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	148	BUILD_EVAL_ADJUST(int8, uint8)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	149	BUILD_EVAL_ADJUST(int16, uint16)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	150	BUILD_EVAL_ADJUST(int32, uint32)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	151
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	152
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	153	static const SpriteGroup ResolveVariable(const SpriteGroup group, ResolverObject *object)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	154	{
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	155	static SpriteGroup nvarzero;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	156	const SpriteGroup *target;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	157	int32 last_value = object->last_value;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	158	int32 value = -1;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	159	uint i;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	160
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	161	object->scope = group->g.determ.var_scope;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	162
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	163	for (i = 0; i < group->g.determ.num_adjusts; i++) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	164	DeterministicSpriteGroupAdjust *adjust = &group->g.determ.adjusts[i];
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	165	value = GetVariable(object, adjust->variable, adjust->parameter);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	166	switch (group->g.determ.size) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	167	case DSG_SIZE_BYTE: value = EvalAdjust_int8(adjust, last_value, value); break;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	168	case DSG_SIZE_WORD: value = EvalAdjust_int16(adjust, last_value, value); break;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	169	case DSG_SIZE_DWORD: value = EvalAdjust_int32(adjust, last_value, value); break;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	170	default: NOT_REACHED(); break;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	171	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	172	last_value = value;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	173	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	174
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	175	if (value == -1) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	176	/* Unsupported property */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	177	target = group->g.determ.num_ranges > 0 ? group->g.determ.ranges[0].group : group->g.determ.default_group;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	178	} else {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	179	if (group->g.determ.num_ranges == 0) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	180	/* nvar == 0 is a special case -- we turn our value into a callback result */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	181	nvarzero.type = SGT_CALLBACK;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	182	nvarzero.g.callback.result = GB(value, 0, 15) \| 0x8000;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	183	return &nvarzero;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	184	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	185
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	186	target = group->g.determ.default_group;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	187	for (i = 0; i < group->g.determ.num_ranges; i++) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	188	if (group->g.determ.ranges[i].low <= (uint32)value && (uint32)value <= group->g.determ.ranges[i].high) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	189	target = group->g.determ.ranges[i].group;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	190	break;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	191	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	192	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	193	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	194
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	195	return Resolve(target, object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	196	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	197
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	198
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	199	static const SpriteGroup ResolveRandom(const SpriteGroup group, ResolverObject *object)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	200	{
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	201	byte mask;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	202	byte index;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	203
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	204	object->scope = group->g.random.var_scope;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	205
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	206	if (object->trigger != 0) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	207	/* Handle triggers */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	208	/* Magic code that may or may not do the right things... */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	209	byte waiting_triggers = object->GetTriggers(object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	210	byte match = group->g.random.triggers & (waiting_triggers \| object->trigger);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	211	bool res;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	212
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	213	res = (group->g.random.cmp_mode == RSG_CMP_ANY) ?
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	214	(match != 0) : (match == group->g.random.triggers);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	215
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	216	if (res) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	217	waiting_triggers &= ~match;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	218	object->reseed \|= (group->g.random.num_groups - 1) << group->g.random.lowest_randbit;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	219	} else {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	220	waiting_triggers \|= object->trigger;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	221	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	222
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	223	object->SetTriggers(object, waiting_triggers);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	224	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	225
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	226	mask = (group->g.random.num_groups - 1) << group->g.random.lowest_randbit;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	227	index = (object->GetRandomBits(object) & mask) >> group->g.random.lowest_randbit;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	228
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	229	return Resolve(group->g.random.groups[index], object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	230	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	231
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	232
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	233	/* ResolverObject (re)entry point */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	234	const SpriteGroup Resolve(const SpriteGroup group, ResolverObject *object)
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	235	{
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	236	/* We're called even if there is no group, so quietly return nothing */
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	237	if (group == NULL) return NULL;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	238
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	239	switch (group->type) {
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	240	case SGT_REAL: return ResolveReal(group, object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	241	case SGT_DETERMINISTIC: return ResolveVariable(group, object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	242	case SGT_RANDOMIZED: return ResolveRandom(group, object);
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	243	default: return group;
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	244	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	245	}
cb6659a684b5 (svn r4594) - NewGRF: introduce the basic sprite group resolver. This code isn't used yet. peter1138 parents: 3668 diff changeset	246

author	peter1138
	Thu, 27 Apr 2006 23:33:38 +0000
changeset 3681	4fbeab45928c
parent 3677	cb6659a684b5
child 3686	55efe6da4dfb
permissions	-rw-r--r--