5 * (C) 2003 Ximian, Inc.
12 #include <mono/metadata/opcodes.h>
20 #ifndef DISABLE_LOGGING
29 #ifdef HAVE_ARRAY_ELEM_INIT
30 #define MSGSTRFIELD(line) MSGSTRFIELD1(line)
31 #define MSGSTRFIELD1(line) str##line
32 static const struct msgstr_t {
33 #define MINI_OP(a,b,dest,src1,src2) char MSGSTRFIELD(__LINE__) [sizeof (b)];
34 #define MINI_OP3(a,b,dest,src1,src2,src3) char MSGSTRFIELD(__LINE__) [sizeof (b)];
39 #define MINI_OP(a,b,dest,src1,src2) b,
40 #define MINI_OP3(a,b,dest,src1,src2,src3) b,
45 static const gint16 opidx [] = {
46 #define MINI_OP(a,b,dest,src1,src2) [a - OP_LOAD] = offsetof (struct msgstr_t, MSGSTRFIELD(__LINE__)),
47 #define MINI_OP3(a,b,dest,src1,src2,src3) [a - OP_LOAD] = offsetof (struct msgstr_t, MSGSTRFIELD(__LINE__)),
55 #define MINI_OP(a,b,dest,src1,src2) b,
56 #define MINI_OP3(a,b,dest,src1,src2,src3) b,
57 /* keep in sync with the enum in mini.h */
58 static const char* const
67 #endif /* DISABLE_LOGGING */
69 #if defined(__i386__) || defined(__x86_64__)
70 #if !defined(TARGET_ARM64) && !defined(__APPLE__)
71 #define emit_debug_info TRUE
73 #define emit_debug_info FALSE
76 #define emit_debug_info FALSE
79 /*This enables us to use the right tooling when building the cross compiler for iOS.*/
80 #if defined (__APPLE__) && defined (TARGET_ARM) && (defined(__i386__) || defined(__x86_64__))
82 #define ARCH_PREFIX "/Developer/Platforms/iPhoneOS.platform/Developer/usr/bin/"
86 #define ARCH_PREFIX ""
87 //#define ARCH_PREFIX "powerpc64-linux-gnu-"
90 mono_inst_name (int op) {
91 #ifndef DISABLE_LOGGING
92 if (op >= OP_LOAD && op <= OP_LAST)
93 #ifdef HAVE_ARRAY_ELEM_INIT
94 return (const char*)&opstr + opidx [op - OP_LOAD];
96 return opnames [op - OP_LOAD];
99 return mono_opcode_name (op);
100 g_error ("unknown opcode name for %d", op);
103 g_error ("unknown opcode name for %d", op);
104 g_assert_not_reached ();
109 mono_blockset_print (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom)
111 #ifndef DISABLE_LOGGING
115 g_print ("%s:", name);
117 mono_bitset_foreach_bit (set, i, cfg->num_bblocks) {
119 g_print (" [BB%d]", cfg->bblocks [i]->block_num);
121 g_print (" BB%d", cfg->bblocks [i]->block_num);
129 * \param cfg compilation context
130 * \param code a pointer to the code
131 * \param size the code size in bytes
133 * Disassemble to code to stdout.
136 mono_disassemble_code (MonoCompile *cfg, guint8 *code, int size, char *id)
138 #if defined(__native_client__)
141 #ifndef DISABLE_LOGGING
142 GHashTable *offset_to_bb_hash = NULL;
143 int i, cindex, bb_num;
146 const char *tmp = g_get_tmp_dir ();
148 char *objdump_args = g_getenv ("MONO_OBJDUMP_ARGS");
152 int unused G_GNUC_UNUSED;
155 as_file = g_strdup_printf ("%s/test.s", tmp);
157 if (!(ofd = fopen (as_file, "w")))
158 g_assert_not_reached ();
160 i = g_file_open_tmp (NULL, &as_file, NULL);
161 ofd = fdopen (i, "w");
165 for (i = 0; id [i]; ++i) {
166 if (i == 0 && isdigit (id [i]))
168 else if (!isalnum (id [i]))
171 fprintf (ofd, "%c", id [i]);
173 fprintf (ofd, ":\n");
175 if (emit_debug_info && cfg != NULL) {
178 fprintf (ofd, ".stabs \"\",100,0,0,.Ltext0\n");
179 fprintf (ofd, ".stabs \"<BB>\",100,0,0,.Ltext0\n");
180 fprintf (ofd, ".Ltext0:\n");
182 offset_to_bb_hash = g_hash_table_new (NULL, NULL);
183 for (bb = cfg->bb_entry; bb; bb = bb->next_bb) {
184 g_hash_table_insert (offset_to_bb_hash, GINT_TO_POINTER (bb->native_offset), GINT_TO_POINTER (bb->block_num + 1));
189 for (i = 0; i < size; ++i) {
190 if (emit_debug_info && cfg != NULL) {
191 bb_num = GPOINTER_TO_INT (g_hash_table_lookup (offset_to_bb_hash, GINT_TO_POINTER (i)));
193 fprintf (ofd, "\n.stabd 68,0,%d\n", bb_num - 1);
198 fprintf (ofd, "\n.byte %d", (unsigned int) code [i]);
200 fprintf (ofd, ",%d", (unsigned int) code [i]);
211 #define DIS_CMD "otool64 -v -t"
213 #define DIS_CMD "otool -v -t"
216 #if defined(sparc) && !defined(__GNUC__)
217 #define DIS_CMD "dis"
218 #elif defined(TARGET_X86)
219 #define DIS_CMD "objdump -l -d"
220 #elif defined(TARGET_AMD64)
221 #if defined(HOST_WIN32)
222 #define DIS_CMD "x86_64-w64-mingw32-objdump.exe -M x86-64 -d"
224 #define DIS_CMD "objdump -l -d"
227 #define DIS_CMD "objdump -d"
232 #define AS_CMD "as -xarch=v9"
233 #elif defined (TARGET_X86)
234 # if defined(__APPLE__)
235 # define AS_CMD "as -arch i386"
237 # define AS_CMD "as -gstabs"
239 #elif defined (TARGET_AMD64)
240 # if defined (__APPLE__)
241 # define AS_CMD "as -arch x86_64"
243 # define AS_CMD "as -gstabs"
245 #elif defined (TARGET_ARM)
246 # if defined (__APPLE__)
247 # define AS_CMD "as -arch arm"
249 # define AS_CMD "as -gstabs"
251 #elif defined (TARGET_ARM64)
252 # if defined (__APPLE__)
253 # define AS_CMD "clang -c -arch arm64 -g -x assembler"
255 # define AS_CMD "as -gstabs"
257 #elif defined(__mips__) && (_MIPS_SIM == _ABIO32)
258 #define AS_CMD "as -mips32"
259 #elif defined(__ppc64__)
260 #define AS_CMD "as -arch ppc64"
261 #elif defined(__powerpc64__)
262 #define AS_CMD "as -mppc64"
268 o_file = g_strdup_printf ("%s/test.o", tmp);
270 i = g_file_open_tmp (NULL, &o_file, NULL);
275 cmd = g_strdup_printf (ARCH_PREFIX AS_CMD " %s -o %s", as_file, o_file);
276 unused = system (cmd);
279 objdump_args = g_strdup ("");
285 * The arm assembler inserts ELF directives instructing objdump to display
286 * everything as data.
288 cmd = g_strdup_printf (ARCH_PREFIX "strip -x %s", o_file);
289 unused = system (cmd);
293 cmd = g_strdup_printf (ARCH_PREFIX DIS_CMD " %s %s", objdump_args, o_file);
294 unused = system (cmd);
296 g_free (objdump_args);
298 g_assert_not_reached ();
299 #endif /* HAVE_SYSTEM */
310 #else /* DISABLE_JIT */
313 mono_blockset_print (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom)
317 #endif /* DISABLE_JIT */