mirror of
https://github.com/reactos/reactos.git
synced 2024-08-29 14:48:37 +00:00
181 lines
5 KiB
C
181 lines
5 KiB
C
|
|
#include <windows.h>
|
|
#include <winnt.h>
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include "misc.h"
|
|
#include "any_op.h"
|
|
|
|
static void standardreg(CPU_INT *RegTableCount, CPU_UNINT reg,
|
|
CPU_INT setup_ebp, FILE *outfp)
|
|
{
|
|
CPU_INT t, found = 0;
|
|
for (t=0;t<31;t++)
|
|
{
|
|
if (reg == RegTableCount[t])
|
|
{
|
|
fprintf(outfp,"r%d",t);
|
|
found++;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (found == 0)
|
|
{
|
|
fprintf(outfp,"r%d",reg);
|
|
}
|
|
}
|
|
|
|
CPU_INT ConvertToPPCProcess( FILE *outfp,
|
|
PMYBrainAnalys pMystart,
|
|
PMYBrainAnalys pMyend, CPU_INT regbits,
|
|
CPU_INT HowManyRegInUse,
|
|
CPU_INT *RegTableCount)
|
|
{
|
|
|
|
CPU_INT stack = 0;
|
|
//CPU_UNINT tmp;
|
|
CPU_INT setup_ebp = 0 ; /* 0 = no, 1 = yes */
|
|
CPU_INT t=0;
|
|
|
|
if (HowManyRegInUse > 31)
|
|
{
|
|
setup_ebp =1; /* we will use ebx as ebp */
|
|
stack = HowManyRegInUse * regbits;
|
|
}
|
|
|
|
if (RegTableCount[1]!=0)
|
|
t++;
|
|
if (RegTableCount[3]!=0)
|
|
t++;
|
|
if (RegTableCount[4]!=0)
|
|
t++;
|
|
if (RegTableCount[8]!=0)
|
|
t++;
|
|
if (RegTableCount[9]!=0)
|
|
t++;
|
|
if (RegTableCount[10]!=0)
|
|
t++;
|
|
if (RegTableCount[11]!=0)
|
|
t++;
|
|
if (RegTableCount[31]!=0)
|
|
t++;
|
|
|
|
if (HowManyRegInUse != t)
|
|
{
|
|
/* fixme optimze the table or active the frame pointer */
|
|
setup_ebp =1; /* we will use ebx as ebp */
|
|
stack = HowManyRegInUse * regbits;
|
|
}
|
|
|
|
|
|
/* fixme gas compatible
|
|
fprintf(outfp,"BITS 32\n");
|
|
fprintf(outfp,"GLOBAL _main\n");
|
|
fprintf(outfp,"SECTION .text\n\n");
|
|
fprintf(outfp,"; compile with nasm filename.asm -f win32, ld filename.obj -o filename.exe\n\n");
|
|
fprintf(outfp,"_main:\n");
|
|
*/
|
|
|
|
/* setup a frame pointer */
|
|
if (setup_ebp == 1)
|
|
{
|
|
/* fixme ppc frame pointer */
|
|
// fprintf(outfp,"\n; Setup frame pointer \n");
|
|
}
|
|
|
|
fprintf(outfp,"; Start the program \n");
|
|
while (pMystart!=NULL)
|
|
{
|
|
/* fixme the line lookup from anaylysing process */
|
|
|
|
/* mov not full implement */
|
|
if (pMystart->op == OP_ANY_mov)
|
|
{
|
|
printf("waring OP_ANY_mov are not full implement\n");
|
|
|
|
if ((pMystart->type & 8)== 8)
|
|
{
|
|
/* dst are register */
|
|
// FIXME frame pointer setup
|
|
// tmp = stack - (pMystart->dst*regbits);
|
|
|
|
if ((pMystart->type & 2)== 2)
|
|
{
|
|
fprintf(outfp,"mr ");
|
|
standardreg( RegTableCount,
|
|
pMystart->dst,
|
|
setup_ebp, outfp);
|
|
fprintf(outfp,",");
|
|
standardreg( RegTableCount,
|
|
pMystart->src,
|
|
setup_ebp, outfp);
|
|
fprintf(outfp,"\n");
|
|
}
|
|
|
|
if ((pMystart->type & 16)== 16)
|
|
{
|
|
/* source are imm */
|
|
if (setup_ebp == 1)
|
|
fprintf(outfp,"not supporet\n");
|
|
else
|
|
{
|
|
fprintf(outfp,"li ");
|
|
standardreg( RegTableCount,
|
|
pMystart->dst,
|
|
setup_ebp, outfp);
|
|
fprintf(outfp," , %llu\n",pMystart->src);
|
|
}
|
|
}
|
|
} /* end pMyBrainAnalys->type & 8 */
|
|
|
|
if ((pMystart->type & 64)== 64)
|
|
{
|
|
if ((pMystart->type & 2)== 2)
|
|
{
|
|
/* dest [eax - 0x20], source reg */
|
|
if ((pMystart->type & 128)== 128)
|
|
{
|
|
fprintf(outfp,"stwu ");
|
|
}
|
|
else
|
|
{
|
|
fprintf(outfp,"stw ");
|
|
}
|
|
|
|
standardreg( RegTableCount,
|
|
pMystart->src,
|
|
setup_ebp, outfp);
|
|
fprintf(outfp,", %d(",pMystart->dst_extra);
|
|
|
|
standardreg( RegTableCount,
|
|
pMystart->dst,
|
|
setup_ebp, outfp);
|
|
fprintf(outfp,")\n");
|
|
}
|
|
} /* end pMyBrainAnalys->type & 64 */
|
|
}
|
|
|
|
/* return */
|
|
if (pMystart->op == OP_ANY_ret)
|
|
{
|
|
if (pMyBrainAnalys->ptr_next == NULL)
|
|
{
|
|
if (setup_ebp == 1)
|
|
{
|
|
// FIXME end our own frame pointer
|
|
fprintf(outfp,"\n; clean up after the frame \n");
|
|
}
|
|
}
|
|
fprintf(outfp,"blr\n");
|
|
}
|
|
if (pMystart == pMyend)
|
|
pMystart=NULL;
|
|
else
|
|
pMystart = (PMYBrainAnalys) pMystart->ptr_next;
|
|
}
|
|
return 0;
|
|
}
|