New files:

sim-io - interface to external IO
	sim-events - event queue management
	sim-core - hardware memory model (device
		support optional but comming
		soon).

sim/common/sim-io.c

@@ -0,0 +1,290 @@
+/*  This file is part of the program psim.
+
+    Copyright (C) 1994-1997, 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.
+ 
+    */
+
+
+#ifndef _SIM_IO_C_
+#define _SIM_IO_C_
+
+#include "engine.h"
+
+/* See the file include/callbacks.h for a description */
+
+
+INLINE_SIM_IO(int)
+sim_io_init(engine *system)
+{
+  return system->callback->init (system->callback);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_shutdown(engine *system)
+{
+  return system->callback->shutdown (system->callback);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_unlink(engine *system,
+	      const char *f1)
+{
+  return system->callback->unlink (system->callback, f1);
+}
+
+
+INLINE_SIM_IO(long)
+sim_io_time(engine *system,
+	    long *t)
+{
+  return system->callback->time (system->callback, t);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_system(engine *system, const char *s)
+{
+  return system->callback->system (system->callback, s);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_rename(engine *system,
+	      const char *f1,
+	      const char *f2)
+{
+  return system->callback->rename (system->callback, f1, f2);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_write_stdout(engine *system,
+		    const char *buf,
+		    int len)
+{
+  switch (CURRENT_STDIO) {
+  case DO_USE_STDIO:
+    return system->callback->write_stdout (system->callback, buf, len);
+    break;
+  case DONT_USE_STDIO:
+    return system->callback->write (system->callback, 1, buf, len);
+    break;
+  default:
+    sim_io_error (system, "sim_io_write_stdout: unaccounted switch\n");
+    break;
+  }
+  return 0;
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_flush_stdout(engine *system)
+{
+  switch (CURRENT_STDIO) {
+  case DO_USE_STDIO:
+    return system->callback->flush_stdout (system->callback);
+    break;
+  case DONT_USE_STDIO:
+    break;
+  default:
+    sim_io_error (system, "sim_io_flush_stdout: unaccounted switch\n");
+    break;
+  }
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_write_stderr(engine *system,
+		    const char *buf,
+		    int len)
+{
+  switch (CURRENT_STDIO) {
+  case DO_USE_STDIO:
+    return system->callback->write_stderr (system->callback, buf, len);
+    break;
+  case DONT_USE_STDIO:
+    return system->callback->write (system->callback, 2, buf, len);
+    break;
+  default:
+    sim_io_error (system, "sim_io_write_stderr: unaccounted switch\n");
+    break;
+  }
+  return 0;
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_flush_stderr(engine *system)
+{
+  switch (CURRENT_STDIO) {
+  case DO_USE_STDIO:
+    return system->callback->flush_stderr (system->callback);
+    break;
+  case DONT_USE_STDIO:
+    break;
+  default:
+    sim_io_error (system, "sim_io_flush_stderr: unaccounted switch\n");
+    break;
+  }
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_write(engine *system,
+	     int fd,
+	     const char *buf,
+	     int len)
+{
+  return system->callback->write (system->callback, fd, buf, len);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_read_stdin(engine *system,
+		  char *buf,
+		  int len)
+{
+  switch (CURRENT_STDIO) {
+  case DO_USE_STDIO:
+    return system->callback->read_stdin (system->callback, buf, len);
+    break;
+  case DONT_USE_STDIO:
+    return system->callback->read (system->callback, 0, buf, len);
+    break;
+  default:
+    sim_io_error (system, "sim_io_read_stdin: unaccounted switch\n");
+    break;
+  }
+  return 0;
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_read(engine *system, int fd,
+	    char *buf,
+	    int len)
+{
+  return system->callback->read(system->callback, fd, buf, len);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_open(engine *system,
+	    const char *name,
+	    int flags)
+{
+  return system->callback->open (system->callback, name, flags);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_lseek(engine *system,
+	     int fd,
+	     long off,
+	     int way)
+{
+  return system->callback->lseek (system->callback, fd, off, way);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_isatty(engine *system,
+	      int fd)
+{
+  return system->callback->isatty (system->callback, fd);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_get_errno(engine *system)
+{
+  return system->callback->get_errno (system->callback);
+}
+
+
+INLINE_SIM_IO(int)
+sim_io_close(engine *system,
+	     int fd)
+{
+  return system->callback->close (system->callback, fd);
+}
+
+
+INLINE_SIM_IO(void)
+sim_io_printf(engine *system,
+	      const char *fmt,
+	      ...)
+{
+  va_list ap;
+  va_start(ap, fmt);
+  system->callback->vprintf_filtered (system->callback, fmt, ap);
+  va_end(ap);
+}
+
+
+INLINE_SIM_IO(void)
+sim_io_vprintf(engine *system,
+	       const char *fmt,
+	       va_list ap)
+{
+  system->callback->vprintf_filtered (system->callback, fmt, ap);
+}
+
+
+INLINE_SIM_IO(void)
+sim_io_eprintf(engine *system,
+	      const char *fmt,
+	      ...)
+{
+  va_list ap;
+  va_start(ap, fmt);
+  system->callback->evprintf_filtered (system->callback, fmt, ap);
+  va_end(ap);
+}
+
+
+INLINE_SIM_IO(void)
+sim_io_evprintf(engine *system,
+		const char *fmt,
+		va_list ap)
+{
+  system->callback->evprintf_filtered (system->callback, fmt, ap);
+}
+
+
+INLINE_SIM_IO(void)
+sim_io_error(engine *system,
+	     const char *fmt,
+	     ...)
+{
+  char buf[1000];
+  va_list ap;
+  va_start(ap, fmt);
+  vsprintf(buf, fmt, ap);
+  va_end(ap);
+
+  if (strlen(buf) >= sizeof(buf))
+    abort();
+
+  system->callback->error (system->callback, "%s", buf);
+}
+
+
+
+#endif