#include <stdio.h>
#include <string.h>
+#include <stdlib.h>
#include "chelper.h"
#include "tree.h"
-#if 0
+#if 1
#define DDCHELP
#endif
+#define REGLEN 9
+static char *regs64[] = {"rax", "r10", "r11", "r9", "r8", "rcx", "rdx", "rsi", "rdi"};
+static char *regs8l[] = {"al", "r10b", "r11b", "r9b", "r8b", "cl", "dl", "sil", "dil"};
+
void func_header(char *s)
{
printf("\t.globl %1$s\n\t.type %1$s, @function\n%1$s:\n", s);
void move(char *src, char *dst)
{
+ if(src == NULL) {
+ printf("//wtf, src ist null\n");
+ }
+ if(dst == NULL) {
+ printf("//wtf, dst ist null\n");
+ }
if(strcmp(src,dst) != 0) {
printf("\tmovq %%%s, %%%s\n", src, dst);
}
void moveimm(long imm, char *dst)
{
char buf[100];
- sprintf(buf, "$%li", imm);
+ sprintf(buf, "$%d", imm);
printf("\tmovq %s, %%%s\n", buf, dst);
}
printf("\tret\n");
}
-char *next_reg(char *s, short skip)
+char *next_reg(char *s, short skip, int params)
{
- /* TODO: bessere registerwahl. das is gerade a wengal suboptimal... */
-#if 1
- char *regs[] = {"rax", "r10", "r11", "rax"};
-#else
- char *regs[] = {"rax", "r10", "r11", "r9", "r8", "rcx", "rdx", "rsi", "rdi"};
-#endif
- int i=0;
+ int i = 0;
if (s != (char*) NULL) {
- while(i < 9) {
- if(!strcmp(s, regs[i++])) {
+ while(i < REGLEN) {
+ if(!strcmp(s, regs64[i++])) {
break;
}
}
i++;
}
#ifdef DDCHELP
- fprintf(stderr, "next_reg(): %s\n", regs[i]);
+ fprintf(stderr, "next_reg(): %s (bei %i parameter)\n", regs64[i], params);
+#endif
+ /* TODO: <= passt? */
+ if(REGLEN - params <= i) {
+ fprintf(stderr, "next_reg(): register \"%s\" in dem sich ein parameter befindet wird als temporaeres register verwendet(params: %i, i: %i)\n", regs64[i], params, i);
+ /* TODO: exit hier? */
+#if 0
+ exit(4);
#endif
+ }
+ return regs64[i];
+}
- return regs[i];
+char *reg_64to8l(char *s)
+{
+ int i = 0;
+ if (s != (char*) NULL) {
+ while(i < REGLEN) {
+ if(!strcmp(s, regs64[i])) {
+ return regs8l[i];
+ } else {
+ i++;
+ }
+ }
+ }
+ fprintf(stderr, "reg_64to8l(): sollte nicht passieren\n");
+ exit(4);
}
+
char *param_reg(int num)
{
char *regs[] = {"rdi", "rsi", "rdx", "rcx", "r8", "r9"};