| /* This file is part of the program psim. |
| |
| Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au> |
| |
| 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
| |
| */ |
| |
| |
| /* Frustrating header junk */ |
| |
| #include "config.h" |
| |
| |
| enum { |
| default_insn_bit_size = 32, |
| max_insn_bit_size = 64, |
| }; |
| |
| |
| /* Define a 64bit data type */ |
| |
| #if defined __GNUC__ || defined _WIN32 |
| #ifdef __GNUC__ |
| |
| typedef long long signed64; |
| typedef unsigned long long unsigned64; |
| |
| #else /* _WIN32 */ |
| |
| typedef __int64 signed64; |
| typedef unsigned __int64 unsigned64; |
| |
| #endif /* _WIN32 */ |
| #else /* Not GNUC or WIN32 */ |
| /* Not supported */ |
| #endif |
| |
| |
| #include <stdio.h> |
| #include <ctype.h> |
| |
| #ifdef HAVE_STRING_H |
| #include <string.h> |
| #else |
| #ifdef HAVE_STRINGS_H |
| #include <strings.h> |
| #endif |
| #endif |
| |
| #ifdef HAVE_STDLIB_H |
| #include <stdlib.h> |
| #endif |
| |
| #if !defined (__attribute__) && (!defined(__GNUC__) || __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 7)) |
| #define __attribute__(arg) |
| #endif |
| |
| |
| |
| #include "filter_host.h" |
| |
| typedef struct _line_ref line_ref; |
| struct _line_ref { |
| const char *file_name; |
| int line_nr; |
| }; |
| |
| /* Error appends a new line, warning and notify do not */ |
| typedef void error_func |
| (const line_ref *line, |
| char *msg, |
| ...); |
| |
| extern error_func error; |
| extern error_func warning; |
| extern error_func notify; |
| |
| |
| #define ERROR(EXPRESSION) \ |
| do { \ |
| line_ref line; \ |
| line.file_name = filter_filename (__FILE__); \ |
| line.line_nr = __LINE__; \ |
| error (&line, EXPRESSION); \ |
| } while (0) |
| |
| #define ASSERT(EXPRESSION) \ |
| do { \ |
| if (!(EXPRESSION)) { \ |
| line_ref line; \ |
| line.file_name = filter_filename (__FILE__); \ |
| line.line_nr = __LINE__; \ |
| error(&line, "assertion failed - %s\n", #EXPRESSION); \ |
| } \ |
| } while (0) |
| |
| #define ZALLOC(TYPE) ((TYPE*) zalloc (sizeof(TYPE))) |
| #define NZALLOC(TYPE,N) ((TYPE*) zalloc (sizeof(TYPE) * (N))) |
| #if 0 |
| #define STRDUP(STRING) (strcpy (zalloc (strlen (STRING) + 1), (STRING))) |
| #define STRNDUP(STRING,LEN) (strncpy (zalloc ((LEN) + 1), (STRING), (LEN))) |
| #endif |
| |
| extern void *zalloc |
| (long size); |
| |
| extern unsigned target_a2i |
| (int ms_bit_nr, |
| const char *a); |
| |
| extern unsigned i2target |
| (int ms_bit_nr, |
| unsigned bit); |
| |
| extern unsigned long long a2i |
| (const char *a); |
| |
| |
| /* Try looking for name in the map table (returning the corresponding |
| integer value). |
| |
| If the the sentinal (NAME == NULL) its value if >= zero is returned |
| as the default. */ |
| |
| typedef struct _name_map { |
| const char *name; |
| int i; |
| } name_map; |
| |
| extern int name2i |
| (const char *name, |
| const name_map *map); |
| |
| extern const char *i2name |
| (const int i, |
| const name_map *map); |