experimental optimizer for float ops
This commit is contained in:
100
amxmodx/optimizer.cpp
Normal file
100
amxmodx/optimizer.cpp
Normal file
@@ -0,0 +1,100 @@
|
||||
#include <string.h>
|
||||
#include "optimizer.h"
|
||||
|
||||
#define OP_SYSREQ_C 123
|
||||
#define OP_NOP 134
|
||||
#define OP_FLOAT_MUL 138
|
||||
#define OP_FLOAT_DIV 139
|
||||
#define OP_FLOAT_ADD 140
|
||||
#define OP_FLOAT_SUB 141
|
||||
#define OP_FLOAT_TO 142
|
||||
#define OP_FLOAT_ROUND 143
|
||||
|
||||
cell op_trans_table[N_Total_FloatOps] =
|
||||
{
|
||||
OP_FLOAT_MUL,
|
||||
OP_FLOAT_DIV,
|
||||
OP_FLOAT_ADD,
|
||||
OP_FLOAT_SUB,
|
||||
OP_FLOAT_TO,
|
||||
OP_FLOAT_ROUND
|
||||
};
|
||||
|
||||
void OnBrowseRelocate(AMX *amx, cell *oplist, cell *cip)
|
||||
{
|
||||
char *codeptr = (char *)amx->base + (long)(((AMX_HEADER *)amx->base)->cod);
|
||||
|
||||
//jump to the parameter;
|
||||
codeptr += *cip;
|
||||
|
||||
int native = -1;
|
||||
cell n_offs = *(cell *)codeptr;
|
||||
optimizer_s *opt = (optimizer_s *)amx->usertags[UT_OPTIMIZER];
|
||||
for (int i=0; i<N_Total_FloatOps; i++)
|
||||
{
|
||||
if (opt->natives[i] == n_offs)
|
||||
{
|
||||
native = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if (native != -1)
|
||||
{
|
||||
//we're patching this:
|
||||
// 0x7B 0x?? SYSREQ.C float???
|
||||
//with:
|
||||
// 0x8A FLOAT.MUL
|
||||
// 0x86 NOP
|
||||
cell new_opcodes[2];
|
||||
new_opcodes[0] = op_trans_table[native];
|
||||
new_opcodes[1] = OP_NOP;
|
||||
codeptr -= sizeof(cell);
|
||||
#if defined __GNUC__ || defined ASM32 || defined JIT
|
||||
*(cell *)codeptr = oplist[new_opcodes[0]];
|
||||
*(cell *)(codeptr + sizeof(cell)) = oplist[new_opcodes[1]];
|
||||
#else
|
||||
*(cell *)codeptr = new_opcodes[0];
|
||||
*(cell *)(codeptr + sizeof(cell)) = new_opcodes[1];
|
||||
#endif
|
||||
}
|
||||
|
||||
*cip += sizeof(cell);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
#define FIND_NATIVE(name, bind) \
|
||||
if (amx_FindNative(amx, name, &index) != AMX_ERR_NOTFOUND) \
|
||||
opt->natives[bind] = index;
|
||||
|
||||
void _Setup_Optimizer_Stage2(AMX *amx, cell *oplist, cell *cip)
|
||||
{
|
||||
int index;
|
||||
|
||||
amx->usertags[UT_BROWSEHOOK] = (void *)OnBrowseRelocate;
|
||||
|
||||
optimizer_s *opt = new optimizer_s;
|
||||
|
||||
for (int i=0; i<N_Total_FloatOps; i++)
|
||||
opt->natives[i] = -1;
|
||||
|
||||
amx->usertags[UT_OPTIMIZER] = (void *)opt;
|
||||
|
||||
FIND_NATIVE("floatmul", N_Float_Mul);
|
||||
FIND_NATIVE("floatdiv", N_Float_Div);
|
||||
FIND_NATIVE("floatadd", N_Float_Add);
|
||||
FIND_NATIVE("floatsub", N_Float_Sub);
|
||||
FIND_NATIVE("float", N_Float_To);
|
||||
FIND_NATIVE("floatround", N_Float_Round);
|
||||
//we don't do these yet because of radix stuff >:\
|
||||
//FIND_NATIVE("floatsin", N_Float_Sin);
|
||||
//FIND_NATIVE("floatcos", N_Float_Cos);
|
||||
//FIND_NATIVE("floattan", N_Float_Tan);
|
||||
}
|
||||
|
||||
void SetupOptimizer(AMX *amx)
|
||||
{
|
||||
amx->usertags[UT_BROWSEHOOK] = (void *)_Setup_Optimizer_Stage2;
|
||||
}
|
||||
|
Reference in New Issue
Block a user