Subversion Repositories or1k

/*  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);