Core commit. Compile and run on the OpenPandora

[mupen64plus-pandora.git] / source / mupen64plus-core / src / r4300 / x86 / assemble.c

diff --git a/source/mupen64plus-core/src/r4300/x86/assemble.c b/source/mupen64plus-core/src/r4300/x86/assemble.c
new file mode 100644 (file)
index 0000000..75cd54e
--- /dev/null
+++ b/source/mupen64plus-core/src/r4300/x86/assemble.c
@@ -0,0 +1,140 @@
+/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
+ *   Mupen64plus - assemble.c                                              *
+ *   Mupen64Plus homepage: http://code.google.com/p/mupen64plus/           *
+ *   Copyright (C) 2002 Hacktarux                                          *
+ *                                                                         *
+ *   This program is free software; you can redistribute it and/or modify  *
+ *   it under the terms of the GNU General Public License as published by  *
+ *   the Free Software Foundation; either version 2 of the License, or     *
+ *   (at your option) any later version.                                   *
+ *                                                                         *
+ *   This program is distributed in the hope that it will be useful,       *
+ *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
+ *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
+ *   GNU General Public License for more details.                          *
+ *                                                                         *
+ *   You should have received a copy of the GNU General Public License     *
+ *   along with this program; if not, write to the                         *
+ *   Free Software Foundation, Inc.,                                       *
+ *   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.          *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "assemble.h"
+
+#include "api/m64p_types.h"
+#include "api/callbacks.h"
+#include "osal/preproc.h"
+#include "r4300/recomph.h"
+#include "r4300/recomp.h"
+#include "r4300/r4300.h"
+
+typedef struct _jump_table
+{
+   unsigned int mi_addr;
+   unsigned int pc_addr;
+} jump_table;
+
+static jump_table *jumps_table = NULL;
+static int jumps_number, max_jumps_number;
+
+void init_assembler(void *block_jumps_table, int block_jumps_number, void *block_riprel_table, int block_riprel_number)
+{
+   if (block_jumps_table)
+   {
+     jumps_table = (jump_table *) block_jumps_table;
+     jumps_number = block_jumps_number;
+     max_jumps_number = jumps_number;
+   }
+   else
+   {
+     jumps_table = (jump_table *) malloc(1000*sizeof(jump_table));
+     jumps_number = 0;
+     max_jumps_number = 1000;
+   }
+}
+
+void free_assembler(void **block_jumps_table, int *block_jumps_number, void **block_riprel_table, int *block_riprel_number)
+{
+   *block_jumps_table = jumps_table;
+   *block_jumps_number = jumps_number;
+   *block_riprel_table = NULL;  /* RIP-relative addressing is only for x86-64 */
+   *block_riprel_number = 0;
+}
+
+void add_jump(unsigned int pc_addr, unsigned int mi_addr)
+{
+   if (jumps_number == max_jumps_number)
+   {
+     max_jumps_number += 1000;
+     jumps_table = (jump_table *) realloc(jumps_table, max_jumps_number*sizeof(jump_table));
+   }
+   jumps_table[jumps_number].pc_addr = pc_addr;
+   jumps_table[jumps_number].mi_addr = mi_addr;
+   jumps_number++;
+}
+
+void passe2(precomp_instr *dest, int start, int end, precomp_block *block)
+{
+   unsigned int real_code_length, addr_dest;
+   int i;
+   build_wrappers(dest, start, end, block);
+   real_code_length = code_length;
+   
+   for (i=0; i < jumps_number; i++)
+   {
+     code_length = jumps_table[i].pc_addr;
+     if (dest[(jumps_table[i].mi_addr - dest[0].addr)/4].reg_cache_infos.need_map)
+     {
+       addr_dest = (unsigned int)dest[(jumps_table[i].mi_addr - dest[0].addr)/4].reg_cache_infos.jump_wrapper;
+       put32(addr_dest-((unsigned int)block->code+code_length)-4);
+     }
+     else
+     {
+       addr_dest = dest[(jumps_table[i].mi_addr - dest[0].addr)/4].local_addr;
+       put32(addr_dest-code_length-4);
+     }
+   }
+   code_length = real_code_length;
+}
+
+static unsigned int g_jump_start8 = 0;
+static unsigned int g_jump_start32 = 0;
+
+void jump_start_rel8(void)
+{
+  g_jump_start8 = code_length;
+}
+
+void jump_start_rel32(void)
+{
+  g_jump_start32 = code_length;
+}
+
+void jump_end_rel8(void)
+{
+  unsigned int jump_end = code_length;
+  int jump_vec = jump_end - g_jump_start8;
+
+  if (jump_vec > 127 || jump_vec < -128)
+  {
+    DebugMessage(M64MSG_ERROR, "8-bit relative jump too long! From %x to %x", g_jump_start8, jump_end);
+    OSAL_BREAKPOINT_INTERRUPT;
+  }
+
+  code_length = g_jump_start8 - 1;
+  put8(jump_vec);
+  code_length = jump_end;
+}
+
+void jump_end_rel32(void)
+{
+  unsigned int jump_end = code_length;
+  int jump_vec = jump_end - g_jump_start32;
+
+  code_length = g_jump_start32 - 4;
+  put32(jump_vec);
+  code_length = jump_end;
+}