1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
/* ScummVM - Graphic Adventure Engine
*
* ScummVM is the legal property of its developers, whose names
* are too numerous to list here. Please refer to the COPYRIGHT
* file distributed with this source distribution.
*
* This program 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.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
*/
#ifndef ULTIMA8_USECODE_INTRINSICS_H
#define ULTIMA8_USECODE_INTRINSICS_H
#include "common/scummsys.h"
namespace Ultima {
namespace Ultima8 {
typedef uint32(*Intrinsic)(const uint8 *args, unsigned int argsize);
#define INTRINSIC(x) static uint32 x (const uint8* args, unsigned int argsize)
// TODO: range checking on args
// UINT8s are pushed on the stack as words (see push byte opcodes),
// so we ignore the top byte when popping.
#define ARG_UINT8(x) uint8 x = (*args++); args++;
#define ARG_UINT16(x) uint16 x = (*args++); x += ((*args++) << 8);
#define ARG_UINT32(x) uint32 x = (*args++); x += ((*args++) << 8); \
x+= ((*args++) << 16); x += ((*args++) << 24);
#define ARG_SINT8(x) int8 x = (*args++);
#define ARG_SINT16(x) int16 x = (*args++); x += ((*args++) << 8);
#define ARG_SINT32(x) int32 x = (*args++); x += ((*args++) << 8); \
x+= ((*args++) << 16); x += ((*args++) << 24);
#define ARG_UC_PTR(x) uint32 x = (*args++); x += ((*args++) << 8); \
x+= ((*args++) << 16); x += ((*args++) << 24);
#define ARG_OBJID(x) ObjId x = (*args++); x += ((*args++) << 8);
#define ARG_PROCID(x) ProcId x = (*args++); x += ((*args++) << 8);
#define ARG_OBJECT_FROM_PTR(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Object* x = getObject(id_##x);
#define ARG_OBJECT_FROM_ID(x) ARG_OBJID(id_##x); \
Object* x = getObject(id_##x);
#define ARG_ITEM_FROM_PTR(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Item* x = getItem(id_##x);
#define ARG_ITEM_FROM_ID(x) ARG_OBJID(id_##x); \
Item* x = getItem(id_##x);
#define ARG_CONTAINER_FROM_PTR(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Container* x = getContainer(id_##x);
#define ARG_CONTAINER_FROM_ID(x) ARG_OBJID(id_##x); \
Container* x = getContainer(id_##x);
#define ARG_ACTOR_FROM_PTR(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Actor* x = getActor(id_##x);
#define ARG_ACTOR_FROM_ID(x) ARG_OBJID(id_##x); \
Actor* x = getActor(id_##x);
#define ARG_EGG_FROM_PTR(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Egg* x = dynamic_cast<Egg*>(getObject(id_##x));
#define ARG_EGG_FROM_ID(x) ARG_OBJID(id_##x); \
Egg* x = dynamic_cast<Egg*>(getObject(id_##x));
#define ARG_STRING(x) ARG_UC_PTR(ucptr_##x); \
uint16 id_##x = UCMachine::ptrToObject(ucptr_##x); \
Std::string x = UCMachine::get_instance()->getString(id_##x);
#define ARG_LIST(x) ARG_UINT16(id_##x); \
UCList* x = UCMachine::get_instance()->getList(id_##x);
#define ARG_WORLDPOINT(x) ARG_UC_PTR(ucptr_##x); \
WorldPoint x; \
UCMachine::get_instance()->dereferencePointer(ucptr_##x, x._buf, 5);
// See comment on ARG_UINT8 for why +2 on NULL8
#define ARG_NULL8() args+=2;
#define ARG_NULL16() args+=2;
#define ARG_NULL32() args+=4;
} // End of namespace Ultima8
} // End of namespace Ultima
#endif
|
