-/*
- * util.c: Assorted utilities for the disassembler
+/**
+ * \file
+ * Assorted utilities for the disassembler
*
* Author:
* Miguel de Icaza (miguel@ximian.com)
#include <glib.h>
#include <string.h>
#include <stdio.h>
+#include <math.h>
#include "util.h"
+#include "mono/utils/mono-compiler.h"
+
+#ifdef HAVE_IEEEFP_H
+#include <ieeefp.h>
+#endif
/**
- * map:
- * @code: code to lookup in table
- * @table: table to decode code
+ * \param code code to lookup in table
+ * \param table table to decode code
*
* Warning: returns static buffer.
*/
}
/**
- * flags:
- * @code: bitfield
- * @table: table to decode bitfield
+ * \param code bitfield
+ * \param table table to decode bitfield
*
* Warning: returns static buffer.
*/
buffer [0] = 0;
- for (i = 0; table [i].str != NULL; i++)
+ for (i = 0; code && table [i].str != NULL; i++)
if (table [i].code & code) {
- if (buffer [0])
- strcat (buffer, " ");
+ code &= ~table [i].code;
strcat (buffer, table [i].str);
}
+ if (code)
+ sprintf (buffer + strlen (buffer), "unknown-flag-%2x ", code);
+
return buffer;
}
str = g_string_new (" (");
for (i = 0; i + 15 < len; i += 16) {
if (i == 0)
- g_string_sprintfa (str, "\n");
- g_string_sprintfa (str, "%s", prefix);
+ g_string_append_printf (str, "\n");
+ g_string_append_printf (str, "%s", prefix);
for (j = 0; j < 16; ++j)
- g_string_sprintfa (str, "%02X ", (unsigned char) (data [i + j]));
- g_string_sprintfa (str, i == len - 16? ") // ": " // ");
+ g_string_append_printf (str, "%02X ", (unsigned char) (data [i + j]));
+ g_string_append_printf (str, i == len - 16? ") // ": " // ");
for (j = 0; j < 16; ++j)
- g_string_sprintfa (str, "%c", data [i + j] >= 32 && data [i + j] <= 126? data [i + j]: '.');
- g_string_sprintfa (str, "\n");
+ g_string_append_printf (str, "%c", data [i + j] >= 32 && data [i + j] <= 126? data [i + j]: '.');
+ g_string_append_printf (str, "\n");
}
if (i == len)
return g_string_free (str, FALSE);
if (len > 16)
- g_string_sprintfa (str, "%s", prefix);
+ g_string_append_printf (str, "%s", prefix);
j = i;
for (; i < len; ++i)
- g_string_sprintfa (str, "%02X ", (unsigned char) (data [i]));
+ g_string_append_printf (str, "%02X ", (unsigned char) (data [i]));
if (len > 16) {
/* align */
int count = 16 - (len % 16);
for (i = 0; i < count; ++i)
- g_string_sprintfa (str, " ");
+ g_string_append_printf (str, " ");
}
- g_string_sprintfa (str, ") // ");
+ g_string_append_printf (str, ") // ");
for (i = j; i < len; ++i)
- g_string_sprintfa (str, "%c", data [i] >= 32 && data [i] <= 126? data [i]: '.');
- g_string_sprintfa (str, "\n");
+ g_string_append_printf (str, "%c", data [i] >= 32 && data [i] <= 126? data [i]: '.');
+ g_string_append_printf (str, "\n");
return g_string_free (str, FALSE);
}
+int
+dis_isinf (double num)
+{
+#ifdef HAVE_ISINF
+ return isinf (num);
+#elif defined(HAVE_IEEEFP_H)
+ fpclass_t klass;
+
+ klass = fpclass (num);
+ if (klass == FP_NINF)
+ return -1;
+
+ if (klass == FP_PINF)
+ return 1;
+
+ return 0;
+#elif defined(HAVE__FINITE)
+ return _finite (num) ? 0 : 1;
+#else
+#error "Don't know how to implement isinf for this platform."
+#endif
+}
+
+int
+dis_isnan (double num)
+{
+#ifdef __MINGW32_VERSION
+return _isnan (num);
+#else
+return isnan (num);
+#endif
+}
+