to preserve cips, pre-compression of code is removed
--HG-- extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%4043
This commit is contained in:
David Anderson
parent
83ae061c6e
commit
dec86a9b2b
@ -127,15 +127,11 @@ int main(int argc, char *argv[])
|
||||
if (sections[FS_Code])
|
||||
{
|
||||
sp_file_code_t cod;
|
||||
cell cip;
|
||||
unsigned char *cbase;
|
||||
uint8_t *tbase, *tptr;
|
||||
cell real_codesize;
|
||||
uint8_t op;
|
||||
|
||||
cod.cellsize = sizeof(cell);
|
||||
|
||||
cod.codesize = 0;
|
||||
cod.codesize = hdr->dat - hdr->cod;
|
||||
cod.codeversion = hdr->amx_version;
|
||||
cod.flags = 0;
|
||||
if (hdr->flags & AMX_FLAG_DEBUG)
|
||||
@ -145,223 +141,10 @@ int main(int argc, char *argv[])
|
||||
cod.code = sizeof(cod);
|
||||
cod.main = hdr->cip;
|
||||
|
||||
/* write the code in our newer format */
|
||||
/* write the code */
|
||||
cbase = (unsigned char *)hdr + hdr->cod;
|
||||
real_codesize = hdr->dat - hdr->cod;
|
||||
tbase = (uint8_t *)malloc(real_codesize);
|
||||
tptr = tbase;
|
||||
for (cip = 0; cip < real_codesize;)
|
||||
{
|
||||
#define DBGPARAM(v) ( (v)=*(cell *)(cbase+(int)cip), cip+=sizeof(cell) )
|
||||
op=(uint8_t) *(ucell *)(cbase+(int)cip);
|
||||
cip += sizeof(cell);
|
||||
*tptr++ = op;
|
||||
switch (op)
|
||||
{
|
||||
case OP_PUSH5_C: /* instructions with 5 parameters */
|
||||
case OP_PUSH5:
|
||||
case OP_PUSH5_S:
|
||||
case OP_PUSH5_ADR:
|
||||
{
|
||||
memcpy(tptr, cbase+(int)cip, sizeof(cell)*5);
|
||||
cip += sizeof(cell)*5;
|
||||
tptr += sizeof(cell)*5;
|
||||
break;
|
||||
}
|
||||
case OP_PUSH4_C: /* instructions with 4 parameters */
|
||||
case OP_PUSH4:
|
||||
case OP_PUSH4_S:
|
||||
case OP_PUSH4_ADR:
|
||||
{
|
||||
memcpy(tptr, cbase+(int)cip, sizeof(cell)*4);
|
||||
cip += sizeof(cell)*4;
|
||||
tptr += sizeof(cell)*4;
|
||||
break;
|
||||
}
|
||||
case OP_PUSH3_C: /* instructions with 3 parameters */
|
||||
case OP_PUSH3:
|
||||
case OP_PUSH3_S:
|
||||
case OP_PUSH3_ADR:
|
||||
{
|
||||
memcpy(tptr, cbase+(int)cip, sizeof(cell)*3);
|
||||
cip += sizeof(cell)*3;
|
||||
tptr += sizeof(cell)*3;
|
||||
break;
|
||||
}
|
||||
case OP_PUSH2_C: /* instructions with 2 parameters */
|
||||
case OP_PUSH2:
|
||||
case OP_PUSH2_S:
|
||||
case OP_PUSH2_ADR:
|
||||
case OP_LOAD_BOTH:
|
||||
case OP_LOAD_S_BOTH:
|
||||
case OP_CONST:
|
||||
case OP_CONST_S:
|
||||
case OP_SYSREQ_N:
|
||||
{
|
||||
memcpy(tptr, cbase+(int)cip, sizeof(cell)*2);
|
||||
cip += sizeof(cell)*2;
|
||||
tptr += sizeof(cell)*2;
|
||||
break;
|
||||
}
|
||||
case OP_LOAD_PRI: /* instructions with 1 parameter */
|
||||
case OP_LOAD_ALT:
|
||||
case OP_LOAD_S_PRI:
|
||||
case OP_LOAD_S_ALT:
|
||||
case OP_LREF_PRI:
|
||||
case OP_LREF_ALT:
|
||||
case OP_LREF_S_PRI:
|
||||
case OP_LREF_S_ALT:
|
||||
case OP_LODB_I:
|
||||
case OP_CONST_PRI:
|
||||
case OP_CONST_ALT:
|
||||
case OP_ADDR_PRI:
|
||||
case OP_ADDR_ALT:
|
||||
case OP_STOR_PRI:
|
||||
case OP_STOR_ALT:
|
||||
case OP_STOR_S_PRI:
|
||||
case OP_STOR_S_ALT:
|
||||
case OP_SREF_PRI:
|
||||
case OP_SREF_ALT:
|
||||
case OP_SREF_S_PRI:
|
||||
case OP_SREF_S_ALT:
|
||||
case OP_STRB_I:
|
||||
case OP_LIDX_B:
|
||||
case OP_IDXADDR_B:
|
||||
case OP_ALIGN_PRI:
|
||||
case OP_ALIGN_ALT:
|
||||
case OP_LCTRL:
|
||||
case OP_SCTRL:
|
||||
case OP_PUSH_R:
|
||||
case OP_PUSH_C:
|
||||
case OP_PUSH:
|
||||
case OP_PUSH_S:
|
||||
case OP_STACK:
|
||||
case OP_HEAP:
|
||||
case OP_JREL:
|
||||
case OP_SHL_C_PRI:
|
||||
case OP_SHL_C_ALT:
|
||||
case OP_SHR_C_PRI:
|
||||
case OP_SHR_C_ALT:
|
||||
case OP_ADD_C:
|
||||
case OP_SMUL_C:
|
||||
case OP_ZERO:
|
||||
case OP_ZERO_S:
|
||||
case OP_EQ_C_PRI:
|
||||
case OP_EQ_C_ALT:
|
||||
case OP_INC:
|
||||
case OP_INC_S:
|
||||
case OP_DEC:
|
||||
case OP_DEC_S:
|
||||
case OP_MOVS:
|
||||
case OP_CMPS:
|
||||
case OP_FILL:
|
||||
case OP_HALT:
|
||||
case OP_BOUNDS:
|
||||
case OP_PUSH_ADR:
|
||||
case OP_CALL: /* opcodes that need relocation */
|
||||
case OP_JUMP:
|
||||
case OP_JZER:
|
||||
case OP_JNZ:
|
||||
case OP_JEQ:
|
||||
case OP_JNEQ:
|
||||
case OP_JLESS:
|
||||
case OP_JLEQ:
|
||||
case OP_JGRTR:
|
||||
case OP_JGEQ:
|
||||
case OP_JSLESS:
|
||||
case OP_JSLEQ:
|
||||
case OP_JSGRTR:
|
||||
case OP_JSGEQ:
|
||||
case OP_SWITCH:
|
||||
case OP_SYSREQ_C:
|
||||
{
|
||||
*(cell *)tptr = *(cell *)(cbase + (int)cip);
|
||||
cip += sizeof(cell);
|
||||
tptr += sizeof(cell);
|
||||
break;
|
||||
}
|
||||
case OP_LOAD_I: /* instructions without parameters */
|
||||
case OP_STOR_I:
|
||||
case OP_LIDX:
|
||||
case OP_IDXADDR:
|
||||
case OP_MOVE_PRI:
|
||||
case OP_MOVE_ALT:
|
||||
case OP_XCHG:
|
||||
case OP_PUSH_PRI:
|
||||
case OP_PUSH_ALT:
|
||||
case OP_POP_PRI:
|
||||
case OP_POP_ALT:
|
||||
case OP_PROC:
|
||||
case OP_RET:
|
||||
case OP_RETN:
|
||||
case OP_CALL_PRI:
|
||||
case OP_SHL:
|
||||
case OP_SHR:
|
||||
case OP_SSHR:
|
||||
case OP_SMUL:
|
||||
case OP_SDIV:
|
||||
case OP_SDIV_ALT:
|
||||
case OP_UMUL:
|
||||
case OP_UDIV:
|
||||
case OP_UDIV_ALT:
|
||||
case OP_ADD:
|
||||
case OP_SUB:
|
||||
case OP_SUB_ALT:
|
||||
case OP_AND:
|
||||
case OP_OR:
|
||||
case OP_XOR:
|
||||
case OP_NOT:
|
||||
case OP_NEG:
|
||||
case OP_INVERT:
|
||||
case OP_ZERO_PRI:
|
||||
case OP_ZERO_ALT:
|
||||
case OP_SIGN_PRI:
|
||||
case OP_SIGN_ALT:
|
||||
case OP_EQ:
|
||||
case OP_NEQ:
|
||||
case OP_LESS:
|
||||
case OP_LEQ:
|
||||
case OP_GRTR:
|
||||
case OP_GEQ:
|
||||
case OP_SLESS:
|
||||
case OP_SLEQ:
|
||||
case OP_SGRTR:
|
||||
case OP_SGEQ:
|
||||
case OP_INC_PRI:
|
||||
case OP_INC_ALT:
|
||||
case OP_INC_I:
|
||||
case OP_DEC_PRI:
|
||||
case OP_DEC_ALT:
|
||||
case OP_DEC_I:
|
||||
case OP_SYSREQ_PRI:
|
||||
case OP_JUMP_PRI:
|
||||
case OP_SWAP_PRI:
|
||||
case OP_SWAP_ALT:
|
||||
case OP_NOP:
|
||||
case OP_BREAK:
|
||||
break;
|
||||
case OP_CASETBL:
|
||||
{
|
||||
cell num;
|
||||
DBGPARAM(*(cell *)tptr);
|
||||
num = *(cell *)tptr;
|
||||
tptr += sizeof(cell);
|
||||
memcpy(tptr, cbase+(int)cip, (2*num+1)*sizeof(cell));
|
||||
tptr += (2*num+1) * sizeof(cell);
|
||||
cip += (2*num+1) * sizeof(cell);
|
||||
break;
|
||||
}
|
||||
default:
|
||||
{
|
||||
assert(0);
|
||||
}
|
||||
#undef DBGPARAM
|
||||
}
|
||||
}
|
||||
cod.codesize = (uint32_t)(tptr - tbase);
|
||||
sfwrite(&cod, sizeof(cod), 1, spf);
|
||||
sfwrite(tbase, cod.codesize, 1, spf);
|
||||
free(tbase);
|
||||
sfwrite(cbase, cod.codesize, 1, spf);
|
||||
|
||||
spfw_next_section(spf);
|
||||
}
|
||||
|
||||
Loading…
Reference in New Issue
Block a user