Initial revision

1 files changed, 158 insertions, 0 deletions

diff --git a/bfd/cpu-i960.c b/bfd/cpu-i960.c
new file mode 100644
index 0000000..5efa726
--- /dev/null
+++ b/bfd/cpu-i960.c
@@ -0,0 +1,158 @@
+/* BFD library support routines for the i960 architecture.
+   Copyright (C) 1990-1991 Free Software Foundation, Inc.
+   Hacked by Steve Chamberlain of Cygnus Support.
+
+This file is part of BFD, the Binary File Descriptor library.
+
+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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
+
+
+#include <sysdep.h>
+#include "bfd.h"
+#include "libbfd.h"
+
+
+/* This routine is provided a string, and tries to work out if it
+   could possibly refer to the i960 machine pointed at in the
+   info_struct pointer */
+
+static boolean
+DEFUN(scan_960_mach, (ap, string),
+      CONST bfd_arch_info_struct_type *ap AND
+      CONST char *string)
+{
+  unsigned long machine;
+
+  /* Look for the string i960, or somesuch at the front of the string  */
+
+  if (strncmp("i960",string) == 0) {
+    string+=4;
+  }
+  else {
+    /* no match, can be us */
+    return false;
+  }
+  if (string[0] == 0) {
+    /* i960 on it's own means core to us*/
+    if (ap->mach == bfd_mach_i960_core) return true;
+    return false;
+  }
+
+  if (string[0] != ':') {
+    return false;
+  }
+  string++;
+  if (string[0] == '\0')
+    return false;
+  if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' &&
+      string[3] == 'e' && string[4] == '\0')
+    machine = bfd_mach_i960_core;
+  else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char */
+    return false;
+  else if (string[0] == 'k' && string[1] == 'b')
+    machine = bfd_mach_i960_kb_sb;
+  else if (string[0] == 's' && string[1] == 'b')
+    machine = bfd_mach_i960_kb_sb;
+  else if (string[0] == 'm' && string[1] == 'c')
+    machine = bfd_mach_i960_mc;
+  else if (string[0] == 'x' && string[1] == 'a')
+    machine = bfd_mach_i960_xa;
+  else if (string[0] == 'c' && string[1] == 'a')
+    machine = bfd_mach_i960_ca;
+  else if (string[0] == 'k' && string[1] == 'a')
+    machine = bfd_mach_i960_ka_sa;
+  else if (string[0] == 's' && string[1] == 'a')
+    machine = bfd_mach_i960_ka_sa;
+  else
+    return false;
+  if (machine == ap->mach)   return true;
+  return false;
+}
+
+
+
+/* This routine is provided two arch_infos and works out the i960
+   machine which would be compatible with both and returns a pointer
+   to its info structure */
+
+CONST bfd_arch_info_struct_type *
+DEFUN(compatible,(a,b),
+      CONST bfd_arch_info_struct_type *a AND
+      CONST bfd_arch_info_struct_type *b)
+{
+
+  /* The i960 has two distinct subspecies which may not interbreed:
+     CORE CA          
+     CORE KA KB MC XA
+     Any architecture on the same line is compatible, the one on
+     the right is the least restrictive.  
+     
+     We represent this information in an array, each machine to a side */
+
+#define ERROR	0
+#define CORE	bfd_mach_i960_core  /*1*/  
+#define KA 	bfd_mach_i960_ka_sa /*2*/ 
+#define KB 	bfd_mach_i960_kb_sb /*3*/
+#define MC 	bfd_mach_i960_mc    /*4*/
+#define XA 	bfd_mach_i960_xa    /*5*/
+#define CA 	bfd_mach_i960_ca    /*6*/
+
+
+  static CONST char matrix[7][7] = 
+      {
+	ERROR,CORE,	KA,	KB,	MC,	XA,	CA,
+	CORE,	CORE,	KA,	KB,	MC,	XA,	CA,
+	KA,	KA,	KA,	KB,	MC,	XA,	ERROR,
+	KB,	KB,	KB,	KB,	MC,	XA,	ERROR,
+	MC,	MC,	MC,	MC,	MC,	XA,	ERROR,
+	XA,	XA,	XA,	XA,	XA,	XA,	ERROR,
+	CA,	CA,	ERROR,	ERROR,	ERROR,	ERROR,	CA 
+	};
+
+
+  if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR) 
+    {
+    return (bfd_arch_info_struct_type *)NULL;
+    }
+  else 
+    {
+    return (a->mach  ==  matrix[a->mach][b->mach]) ?  a : b;
+    }
+}
+
+
+
+int bfd_default_scan_num_mach();
+#define N(a,b,d) \
+{ 32, 32, 8,bfd_arch_i960,a,"i960",b,d,compatible,scan_960_mach,0,}
+
+static bfd_arch_info_struct_type arch_info_struct[] = 
+{ 
+  N(bfd_mach_i960_core,"i960:core",true),
+  N(bfd_mach_i960_ka_sa,"i960:ka_sa",false),
+  N(bfd_mach_i960_kb_sb,"i960:kb_sb",false),
+  N(bfd_mach_i960_mc,"i960:mc",false),
+  N(bfd_mach_i960_xa,"i960:xa",false),
+  N(bfd_mach_i960_ca,"i960:ca",false)
+  };
+
+
+void DEFUN_VOID(bfd_i960_arch)
+{
+  unsigned int i;
+  for (i = 0; i < 6; i++)  {
+    bfd_arch_linkin(arch_info_struct + i);
+  }
+}