aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sim/common/ChangeLog37
-rw-r--r--sim/common/callback.c422
2 files changed, 459 insertions, 0 deletions
diff --git a/sim/common/ChangeLog b/sim/common/ChangeLog
index de13851..7cfaf1e 100644
--- a/sim/common/ChangeLog
+++ b/sim/common/ChangeLog
@@ -1,3 +1,40 @@
+Sun Dec 8 18:22:06 1996 Doug Evans <dje@canuck.cygnus.com>
+
+ * callback.c: #include <stdlib.h>
+ (os_error): New function.
+ (default_callback): Add os_error.
+
+Mon Nov 25 19:44:35 1996 Doug Evans <dje@canuck.cygnus.com>
+
+ * Make-common.in (Makefile): Set CONFIG_HEADERS="".
+ * aclocal.m4: Mark the fact that --enable-sim-bswap isn't host
+ specific.
+ (SIM_AC_OUTPUT): Don't build Makefile if CONFIG_FILES="".
+
+Wed Nov 20 01:11:04 1996 Doug Evans <dje@canuck.cygnus.com>
+
+ * run.c: #include ../common/config.h, tconfig.h.
+ (myname): New static global.
+ (main): Recognize new options -a, -c. Also recognize -h if h8/300.
+ Only process -c ifdef SIM_HAVE_SIMCACHE.
+ Only process -p/-s ifdef SIM_HAVE_PROFILE.
+ Parse program name from argv[0] and use in error messages.
+ Pass sim_args to sim_open. Pass prog_args to sim_create_inferior.
+ Add support for incomplete h8/300 termination indicators.
+ (usage): Make more verbose.
+ * aclocal.m4,config.in,tconfig.in,configure.in,configure: New files.
+ * Makefile.in,Make-common.in,callback.c: New files.
+ * nltvals.def,gentmap.c,gentvals.sh: New files.
+
+Tue Nov 12 13:34:00 1996 Dawn Perchik <dawn@cygnus.com>
+
+ * run.c: Include stdarg.h if __STDC__.
+
+Tue Oct 15 11:16:31 1996 Jeffrey A Law (law@cygnus.com)
+
+ * run.c (main): Don't print out anything if the signal
+ number is zero (ie no signal).
+
Tue Oct 15 11:20:44 1996 Michael Meissner <meissner@tiktok.cygnus.com>
* run.c (main): Print out if the program raised a signal.
diff --git a/sim/common/callback.c b/sim/common/callback.c
new file mode 100644
index 0000000..764d4b6
--- /dev/null
+++ b/sim/common/callback.c
@@ -0,0 +1,422 @@
+/* Host callback routines for GDB.
+ Copyright 1995, 1996 Free Software Foundation, Inc.
+ Contributed by Cygnus Support.
+
+ This file is part of GDB.
+
+ 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. */
+
+/* This file provides a standard way for targets to talk to the host OS
+ level. */
+
+#include "ansidecl.h"
+#ifdef ANSI_PROTOTYPES
+#include <stdarg.h>
+#else
+#include <varargs.h>
+#endif
+#include <stdio.h>
+#ifdef HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
+#include <errno.h>
+#include <fcntl.h>
+#include <time.h>
+#include "callback.h"
+#include "targ-vals.h"
+
+static int os_init PARAMS ((host_callback *));
+static int os_shutdown PARAMS ((host_callback *));
+static int os_unlink PARAMS ((host_callback *, const char *));
+static long os_time PARAMS ((host_callback *, long *));
+static int os_system PARAMS ((host_callback *, const char *));
+static int os_rename PARAMS ((host_callback *, const char *, const char *));
+static int os_write_stdout PARAMS ((host_callback *, const char *, int));
+static int os_write PARAMS ((host_callback *, int, const char *, int));
+static int os_read_stdin PARAMS ((host_callback *, char *, int));
+static int os_read PARAMS ((host_callback *, int, char *, int));
+static int os_open PARAMS ((host_callback *, const char *, int));
+static int os_lseek PARAMS ((host_callback *, int, long, int));
+static int os_isatty PARAMS ((host_callback *, int));
+static int os_get_errno PARAMS ((host_callback *));
+static int os_close PARAMS ((host_callback *, int));
+static int fdmap PARAMS ((host_callback *, int));
+static int fdbad PARAMS ((host_callback *, int));
+static int wrap PARAMS ((host_callback *, int));
+
+/* Set the callback copy of errno from what we see now. */
+
+static int
+wrap (p, val)
+ host_callback *p;
+ int val;
+{
+ p->last_errno = errno;
+ return val;
+}
+
+/* Make sure the FD provided is ok. If not, return non-zero
+ and set errno. */
+
+static int
+fdbad (p, fd)
+ host_callback *p;
+ int fd;
+{
+ if (fd < 0 || fd > MAX_CALLBACK_FDS || !p->fdopen[fd])
+ {
+ p->last_errno = EINVAL;
+ return -1;
+ }
+ return 0;
+}
+
+static int
+fdmap (p, fd)
+ host_callback *p;
+ int fd;
+{
+ return p->fdmap[fd];
+}
+
+static int
+os_close (p, fd)
+ host_callback *p;
+ int fd;
+{
+ int result;
+
+ result = fdbad (p, fd);
+ if (result)
+ return result;
+ result = wrap (p, close (fdmap (p, fd)));
+ return result;
+}
+
+static int
+os_get_errno (p)
+ host_callback *p;
+{
+ return host_to_target_errno (p->last_errno);
+}
+
+
+static int
+os_isatty (p, fd)
+ host_callback *p;
+ int fd;
+{
+ int result;
+
+ result = fdbad (p, fd);
+ if (result)
+ return result;
+ result = wrap (p, isatty (fdmap (p, fd)));
+ return result;
+}
+
+static int
+os_lseek (p, fd, off, way)
+ host_callback *p;
+ int fd;
+ long off;
+ int way;
+{
+ int result;
+
+ result = fdbad (p, fd);
+ if (result)
+ return result;
+ result = lseek (fdmap (p, fd), off, way);
+ return result;
+}
+
+static int
+os_open (p, name, flags)
+ host_callback *p;
+ const char *name;
+ int flags;
+{
+ int i;
+ for (i = 0; i < MAX_CALLBACK_FDS; i++)
+ {
+ if (!p->fdopen[i])
+ {
+ int f = open (name, target_to_host_open (flags));
+ if (f < 0)
+ {
+ p->last_errno = errno;
+ return f;
+ }
+ p->fdopen[i] = 1;
+ p->fdmap[i] = f;
+ return i;
+ }
+ }
+ p->last_errno = EMFILE;
+ return -1;
+}
+
+static int
+os_read (p, fd, buf, len)
+ host_callback *p;
+ int fd;
+ char *buf;
+ int len;
+{
+ int result;
+
+ result = fdbad (p, fd);
+ if (result)
+ return result;
+ result = wrap (p, read (fdmap (p, fd), buf, len));
+ return result;
+}
+
+static int
+os_read_stdin (p, buf, len)
+ host_callback *p;
+ char *buf;
+ int len;
+{
+ return wrap (p, read (0, buf, len));
+}
+
+static int
+os_write (p, fd, buf, len)
+ host_callback *p;
+ int fd;
+ const char *buf;
+ int len;
+{
+ int result;
+
+ result = fdbad (p, fd);
+ if (result)
+ return result;
+ result = wrap (p, write (fdmap (p, fd), buf, len));
+ return result;
+}
+
+static int
+os_write_stdout (p, buf, len)
+ host_callback *p;
+ const char *buf;
+ int len;
+{
+ return os_write (p, 1, buf, len);
+}
+
+static int
+os_rename (p, f1, f2)
+ host_callback *p;
+ const char *f1;
+ const char *f2;
+{
+ return wrap (p, rename (f1, f2));
+}
+
+
+static int
+os_system (p, s)
+ host_callback *p;
+ const char *s;
+{
+ return wrap (p, system (s));
+}
+
+static long
+os_time (p, t)
+ host_callback *p;
+ long *t;
+{
+ return wrap (p, time (t));
+}
+
+
+static int
+os_unlink (p, f1)
+ host_callback *p;
+ const char *f1;
+{
+ return wrap (p, unlink (f1));
+}
+
+
+static int
+os_shutdown (p)
+ host_callback *p;
+{
+ int i;
+ for (i = 0; i < MAX_CALLBACK_FDS; i++)
+ {
+ if (p->fdopen[i] && !p->alwaysopen[i]) {
+ close (p->fdmap[i]);
+ p->fdopen[i] = 0;
+ }
+ }
+ return 1;
+}
+
+static int
+os_init(p)
+ host_callback *p;
+{
+ int i;
+ os_shutdown (p);
+ for (i= 0; i < 3; i++)
+ {
+ p->fdmap[i] = i;
+ p->fdopen[i] = 1;
+ p->alwaysopen[i] = 1;
+ }
+ return 1;
+}
+
+/* VARARGS */
+static void
+#ifdef ANSI_PROTOTYPES
+os_printf_filtered (host_callback *p, const char *format, ...)
+#else
+os_printf_filtered (p, va_alist)
+ host_callback *p;
+ va_dcl
+#endif
+{
+ va_list args;
+#ifdef ANSI_PROTOTYPES
+ va_start (args, format);
+#else
+ char *format;
+
+ va_start (args);
+ format = va_arg (args, char *);
+#endif
+
+ vprintf (format, args);
+
+ va_end (args);
+}
+
+/* VARARGS */
+static void
+#ifdef ANSI_PROTOTYPES
+os_error (host_callback *p, const char *format, ...)
+#else
+os_error (p, va_alist)
+ host_callback *p;
+ va_dcl
+#endif
+{
+ va_list args;
+#ifdef ANSI_PROTOTYPES
+ va_start (args, format);
+#else
+ char *format;
+
+ va_start (args);
+ format = va_arg (args, char *);
+#endif
+
+ vfprintf (stderr, format, args);
+ fprintf (stderr, "\n");
+
+ va_end (args);
+ exit (EXIT_FAILURE);
+}
+
+host_callback default_callback =
+{
+ os_close,
+ os_get_errno,
+ os_isatty,
+ os_lseek,
+ os_open,
+ os_read,
+ os_read_stdin,
+ os_rename,
+ os_system,
+ os_time,
+ os_unlink,
+ os_write,
+ os_write_stdout,
+
+ os_shutdown,
+ os_init,
+
+ os_printf_filtered,
+ os_error,
+
+ 0, /* last errno */
+};
+
+/* FIXME: Need to add hooks so target can tweak as necessary. */
+
+/* FIXME: struct stat conversion is missing. */
+
+/* FIXME: sort tables if large.
+ Alternatively, an obvious improvement for errno conversion is
+ to machine generate a function with a large switch(). */
+
+int
+host_to_target_errno (host_val)
+ int host_val;
+{
+ target_defs_map *m;
+
+ for (m = &errno_map[0]; m->host_val; ++m)
+ if (m->host_val == host_val)
+ return m->target_val;
+
+ /* ??? Which error to return in this case is up for grabs.
+ Note that some missing values may have standard alternatives.
+ For now return 0 and require caller to deal with it. */
+ return 0;
+}
+
+/* Given a set of target bitmasks for the open system call,
+ return the host equivalent.
+ Mapping open flag values is best done by looping so there's no need
+ to machine generate this function. */
+
+int
+target_to_host_open (target_val)
+ int target_val;
+{
+ int host_val = 0;
+ target_defs_map *m;
+
+ for (m = &open_map[0]; m->host_val != -1; ++m)
+ {
+ switch (m->target_val)
+ {
+ /* O_RDONLY can be (and usually is) 0 which needs to be treated
+ specially. */
+ case TARGET_O_RDONLY :
+ case TARGET_O_WRONLY :
+ case TARGET_O_RDWR :
+ if ((target_val & (TARGET_O_RDONLY | TARGET_O_WRONLY | TARGET_O_RDWR))
+ == m->target_val)
+ host_val |= m->host_val;
+ break;
+ default :
+ if ((m->target_val & target_val) == m->target_val)
+ host_val |= m->host_val;
+ break;
+ }
+ }
+
+ return host_val;
+}