Initial revision
authorroland <roland>
Wed, 12 Jun 1991 18:29:22 +0000 (18:29 +0000)
committerroland <roland>
Wed, 12 Jun 1991 18:29:22 +0000 (18:29 +0000)
sysdeps/m68k/fpu/switch/switch.c [new file with mode: 0644]
sysdeps/m88k/ffs.c [new file with mode: 0644]

diff --git a/sysdeps/m68k/fpu/switch/switch.c b/sysdeps/m68k/fpu/switch/switch.c
new file mode 100644 (file)
index 0000000..bba52f2
--- /dev/null
@@ -0,0 +1,92 @@
+/* Copyright (C) 1991 Free Software Foundation, Inc.
+This file is part of the GNU C Library.
+
+The GNU C Library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Library General Public License as
+published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version.
+
+The GNU C Library 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
+Library General Public License for more details.
+
+You should have received a copy of the GNU Library General Public
+License along with the GNU C Library; see the file COPYING.LIB.  If
+not, write to the Free Software Foundation, Inc., 675 Mass Ave,
+Cambridge, MA 02139, USA.  */
+
+#include <ansidecl.h>
+#include <signal.h>
+#include <68881-switch.h>
+
+
+/* The signal that is sent when a 68881 instruction
+   is executed and there is no 68881.  */
+#ifndef        TRAPSIG
+#define        TRAPSIG SIGILL
+#endif
+
+/* Nonzero if we have determined whether or not there is a 68881.  */
+static int tested_fpu = 0;
+
+/* Nonzero if we have a 68881.  */
+static int have_fpu;
+
+
+/* Signal handler for the trap that happens if we don't have a 68881.  */
+static void
+DEFUN(trap, (sig), int sig)
+{
+  have_fpu = 0;
+}
+
+/* This function is called by functions that want to switch.
+   The calling function must be a `struct switch_caller' in data space.
+   It determines whether a 68881 is present, and modifies its caller
+   to be a static jump to either the 68881 version or the soft version.
+   It then returns into the function it has chosen to do the work.  */
+void
+DEFUN(__68881_switch, (dummy), int dummy)
+{
+  PTR *return_address_location = &((PTR *) &dummy)[-1];
+  struct switch_caller *CONST caller
+    = (struct switch_caller *) (((short int *) *return_address_location) - 1);
+
+  if (!tested_fpu)
+    {
+      /* Figure out whether or not we have a 68881.  */
+      __sighandler_t handler = signal(TRAPSIG, trap);
+      if (handler == SIG_ERR)
+       /* We can't figure it out, so assume we don't have a 68881.
+          This assumption will never cause us any problems other than
+          lost performance, while the reverse assumption could cause
+          the program to crash.  */
+       have_fpu = 0;
+      else
+       {
+         /* We set `have_fpu' to nonzero, and then execute a 68881
+            no-op instruction.  If we have a 68881, this will do nothing.
+            If we don't have one, this will trap and the signal handler
+            will clear `have_fpu'.  */
+         have_fpu = 1;
+         asm("fnop");
+
+         /* Restore the old signal handler.  */
+         (void) signal(TRAPSIG, handler);
+       }
+
+      /* Say that we've tested for a 68881, so we only do it once.  */
+      tested_fpu = 1;
+    }
+
+  /* Modify the caller to be a jump to the appropriate address.  */
+  caller->insn = JMP;
+  caller->target = have_fpu ? caller->fpu : caller->soft;
+
+  /* Make the address we will return to be the target we have chosen.
+     Our return will match the `jsr' done by the caller we have
+     just modified, and it will be just as if that had instead
+     been a `jmp' to the new target.  */
+  *return_address_location = caller->target;
+}
diff --git a/sysdeps/m88k/ffs.c b/sysdeps/m88k/ffs.c
new file mode 100644 (file)
index 0000000..85f4052
--- /dev/null
@@ -0,0 +1,36 @@
+/* ffs -- find first set bit in a word, counted from least significant end.
+   For Motorola 88000.
+   Copyright (C) 1991 Free Software Foundation, Inc.
+   Contributed by Torbjorn Granlund (tege@sics.se).
+
+The GNU C Library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Library General Public License as
+published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version.
+
+The GNU C Library 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
+Library General Public License for more details.
+
+You should have received a copy of the GNU Library General Public
+License along with the GNU C Library; see the file COPYING.LIB.  If
+not, write to the Free Software Foundation, Inc., 675 Mass Ave,
+Cambridge, MA 02139, USA.  */
+
+#include <ansidecl.h>
+#include <bstring.h>
+
+#undef ffs
+
+int
+DEFUN(ffs, (x), int x)
+{
+  int cnt;
+
+  if (x == 0)
+    return 0;
+
+  asm ("ff1 %0,%1" : "=r" (cnt) : "r" (x & -x));
+  return cnt + 1;
+}