* gdb.fortran/types.exp: Escape brackets in expect patterns

[binutils.git] / gdb / standalone.c

diff --git a/gdb/standalone.c b/gdb/standalone.c
index 94adf64cf28907d3089d136ec2e48482bba5b7b1..13fc4768b4ede0779879df4fe9fb3a7c48521a91 100644 (file)
--- a/gdb/standalone.c
+++ b/gdb/standalone.c
@@ -1,29 +1,27 @@
 /* Interface to bare machine for GDB running as kernel debugger.
-   Copyright (C) 1986 Free Software Foundation, Inc.
+   Copyright (C) 1986, 1989, 1991 Free Software Foundation, Inc.
 
-GDB is distributed in the hope that it will be useful, but WITHOUT ANY
-WARRANTY.  No author or distributor accepts responsibility to anyone
-for the consequences of using it or for whether it serves any
-particular purpose or works at all, unless he says so in writing.
-Refer to the GDB General Public License for full details.
+This file is part of GDB.
 
-Everyone is granted permission to copy, modify and redistribute GDB,
-but only under the conditions described in the GDB General Public
-License.  A copy of this license is supposed to have been given to you
-along with GDB so you can know your rights and responsibilities.  It
-should be in a file named COPYING.  Among other things, the copyright
-notice and this notice must be preserved on all copies.
+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.
 
-In other words, go ahead and share GDB, but don't try to stop
-anyone else from sharing it farther.  Help stamp out software hoarding!
-*/
+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.  */
 
 #include <stdio.h>
 #include <sys/ioctl.h>
-#include <signal.h>
 #include <errno.h>
 #include <sys/types.h>
-#include <sys/stat.h>
+#include "gdb_stat.h"
 
 #if defined (SIGTSTP) && defined (SIGIO)
 #include <sys/time.h>
@@ -31,14 +29,12 @@ anyone else from sharing it farther.  Help stamp out software hoarding!
 #endif /* SIGTSTP and SIGIO defined (must be 4.2) */
 
 #include "defs.h"
-#include "initialize.h"
-#include "param.h"
+#include "signals.h"
 #include "symtab.h"
 #include "frame.h"
 #include "inferior.h"
 #include "wait.h"
 
-START_FILE
 \f
 /* Random system calls, mostly no-ops to prevent link problems  */
 
@@ -63,8 +59,9 @@ chdir ()
 {}
 
 char *
-getwd (buf)
+getcwd (buf, len)
      char *buf;
+     unsigned int len;
 {
   buf[0] = '/';
   buf[1] = 0;
@@ -131,7 +128,6 @@ open (filename, modes)
      int modes;
 {
   register char *next;
-  extern int errno;
 
   if (modes)
     {
@@ -145,10 +141,9 @@ open (filename, modes)
       return -1;
     }
 
-  for (next - files_start; * (int *) next;
-       next += * (int *) next)
+  for (next = files_start; * (int *) next; next += * (int *) next)
     {
-      if (!strcmp (next + 4, filename))
+      if (!STRCMP (next + 4, filename))
        {
          sourcebeg = next + 4 + strlen (next + 4) + 1;
          sourcebeg = (char *) (((int) sourcebeg + 3) & (-4));
@@ -195,8 +190,6 @@ fclose (desc)
 fstat (desc, statbuf)
      struct stat *statbuf;
 {
-  extern int errno;
-
   if (desc != sourcedesc)
     {
       errno = EBADF;
@@ -212,7 +205,6 @@ myread (desc, destptr, size, filename)
      char *filename;
 {
   int len = min (sourceleft, size);
-  extern int errno;
 
   if (desc != sourcedesc)
     {
@@ -220,7 +212,7 @@ myread (desc, destptr, size, filename)
       return -1;
     }
 
-  bcopy (sourceptr, destptr, len);
+  memcpy (destptr, sourceptr, len);
   sourceleft -= len;
   return len;
 }
@@ -230,7 +222,6 @@ fread (bufp, numelts, eltsize, stream)
 {
   register int elts = min (numelts, sourceleft / eltsize);
   register int len = elts * eltsize;
-  extern int errno;
 
   if (stream != sourcedesc)
     {
@@ -238,7 +229,7 @@ fread (bufp, numelts, eltsize, stream)
       return -1;
     }
 
-  bcopy (sourceptr, bufp, len);
+  memcpy (bufp, sourceptr, len);
   sourceleft -= len;
   return elts;
 }
@@ -247,7 +238,6 @@ int
 fgetc (desc)
      int desc;
 {
-  extern int errno;
 
   if (desc == (int) stdin)
     return tty_input ();
@@ -267,7 +257,6 @@ lseek (desc, pos)
      int desc;
      int pos;
 {
-  extern int errno;
 
   if (desc != sourcedesc)
     {
@@ -341,12 +330,15 @@ core_file_command ()
 {}
 
 char *
-get_exec_file ()
+get_exec_file (err)
+     int err;
 {
   /* Makes one printout look reasonable; value does not matter otherwise.  */
   return "run";
 }
 
+/* Nonzero if there is a core file.  */
+
 have_core_file_p ()
 {
   return 0;
@@ -377,7 +369,7 @@ read_memory (memaddr, myaddr, len)
      char *myaddr;
      int len;
 {
-  bcopy (memaddr, myaddr, len);
+  memcpy (myaddr, memaddr, len);
 }
 
 /* Always return 0 indicating success.  */
@@ -387,7 +379,7 @@ write_memory (memaddr, myaddr, len)
      char *myaddr;
      int len;
 {
-  bcopy (myaddr, memaddr, len);
+  memcpy (memaddr, myaddr, len);
   return 0;
 }
 
@@ -494,7 +486,7 @@ resume ()
   PUSH_FRAME_PTR;
   save_frame_pointer ();
 
-  bcopy (saved_regs, restore, sizeof restore);
+  memcpy (restore, saved_regs, sizeof restore);
   POP_REGISTERS;
   /* Control does not drop through here!  */
 }
@@ -540,7 +532,7 @@ restore_gdb ()
 save_registers (firstreg)
      int firstreg;
 {
-  bcopy (&firstreg, saved_regs, sizeof saved_regs);
+  memcpy (saved_regs, &firstreg, sizeof saved_regs);
   fault_code = (&firstreg)[NUM_REGS];
 }
 
@@ -581,8 +573,7 @@ char heap[HEAP_SIZE] = {0};
 int kdb_stack_beg[STACK_SIZE / sizeof (int)];
 int kdb_stack_end;
 
-static
-initialize ()
+_initialize_standalone ()
 {
   register char *next;
 
@@ -592,9 +583,7 @@ initialize ()
 
   /* Find the end of the data on files.  */
 
-  for (next - files_start; * (int *) next;
-       next += * (int *) next)
-    {}
+  for (next = files_start; * (int *) next; next += * (int *) next) {}
 
   /* That is where free storage starts for sbrk to give out.  */
   next_free = next;
@@ -602,4 +591,3 @@ initialize ()
   memory_limit = heap + sizeof heap;
 }
 
-END_FILE