From a07e3300406bb16a1586db6d75aa6c5bb9d0c2d7 Mon Sep 17 00:00:00 2001
From: Magnus Olsen <magnus@greatlord.com>
Date: Sat, 20 Jan 2007 13:30:04 +0000
Subject: [PATCH] forgot this file

svn path=/trunk/; revision=25541
---
 .../devutils/cputointel/ConvertToPPCProcess.c | 180 ++++++++++++++++++
 1 file changed, 180 insertions(+)
 create mode 100644 rosapps/devutils/cputointel/ConvertToPPCProcess.c

diff --git a/rosapps/devutils/cputointel/ConvertToPPCProcess.c b/rosapps/devutils/cputointel/ConvertToPPCProcess.c
new file mode 100644
index 00000000000..d8b3ad00dc0
--- /dev/null
+++ b/rosapps/devutils/cputointel/ConvertToPPCProcess.c
@@ -0,0 +1,180 @@
+
+#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;
+}