#define DDCHELP
#endif
-#define REGLEN 4
-static char *regs64[] = {"rax", "r10", "r11", "r9"};
-static char *regs8l[] = {"al", "r10b", "r11b", "r9b"};
+#define REGLEN 5
+static char *regsppc[] = {"14", "15", "16", "17", "18"};
/* ja, dirty.. */
static char *akt_func_name = (char*) NULL;
void func_header(char *s, int vars, int parms, int call)
{
printf("\t.globl %1$s\n\t.type %1$s, @function\n%1$s:\n", s);
- printf("\t//vars: %i, parms: %i, call(bool): %i\n", vars, parms, call);
+ printf("\t#vars: %i, parms: %i, call(bool): %i\n", vars, parms, call);
akt_func_name = s;
need_stack = (vars || parms) && call;
if(need_stack) {
- printf("\tenter $%d, $0\n", 8*(vars + parms + 2 /* fuer rax und r10 */));
+ /* save the link register */
+ printf("\tmflr 0; stw 0,-8(1)\n");
+ /* create the stack */
+ printf("\tstwu 1, -80(1)\n");
}
}
void func_footer(void)
{
- if(need_stack)
- printf("\tleave\n");
- printf("\tret\n\n\n");
+ if(need_stack) {
+ /* remove stack frame */
+ printf("\taddi 1,1,80\n");
+ /* restore link register */
+ printf("\tlwz 0,-8(1); mtlr 0\n");
+ }
+ printf("\tblr\n\n\n");
}
void move(char *src, char *dst)
{
if(src == (char*) NULL) return;
if(strcmp(src,dst) != 0) {
- printf("\tmovq %%%s, %%%s\n", src, dst);
+ printf("\tmr %s,%s\n", dst, src);
}
}
void moveimm(long imm, char *dst)
{
- char buf[100];
- sprintf(buf, "$%d", imm);
- printf("\tmovq %s, %%%s\n", buf, dst);
+ /* TODO: 32 bits... */
+ printf("\tli %s,%d\n", dst, imm);
}
char *next_reg(char *s, int params)
{
int i = 0;
if (s != (char*) NULL) {
- while(strcmp(s, regs64[i]) != 0) {
+ while(strcmp(s, regsppc[i]) != 0) {
i = (i+1) % REGLEN;
}
i = (i+1) % REGLEN;
}
#ifdef DDCHELP
- fprintf(stderr, "next_reg(): %s (bei %i parameter)\n", regs64[i], params);
+ fprintf(stderr, "next_reg(): %s (bei %i parameter)\n", regsppc[i], params);
#endif
- return regs64[i];
+ return regsppc[i];
}
char *reg_64to8l(char *s)
{
- int i = 0;
- if (s != (char*) NULL) {
- while(strcmp(s, regs64[i]) != 0) {
- i = (i+1) % REGLEN;
- }
- return regs8l[i];
- }
fprintf(stderr, "reg_64to8l(): sollte nicht passieren\n");
exit(4);
+ return "";
}
char *param_reg(int num)
{
- char *regs[] = {"rdi", "rsi", "rdx", "rcx", "r8", "r9", "r11"};
+ char *regs[] = {"3", "4", "5", "6", "7", "8", "9", "10"};
return regs[num];
}