gas: avoid spurious failures in non-ELF targets in the SPARC testsuite.
[deliverable/binutils-gdb.git] / sim / ppc / emul_generic.c
index f45df6c54b2d775f5c7040b88dc300427f58ff1e..dc0b2cf1e0930ffb33f694e01ebb4a1c06920584 100644 (file)
@@ -1,21 +1,20 @@
 /*  This file is part of the program psim.
 
-    Copyright (C) 1994-1996, Andrew Cagney <cagney@highland.com.au>
+    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
+    the Free Software Foundation; either version 3 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.
+    along with this program; if not, see <http://www.gnu.org/licenses/>.
+
     */
 
 
@@ -38,7 +37,7 @@ emul_syscall_enter(emul_syscall *emul,
 {
   printf_filtered("%d:0x%lx:%s(",
                  cpu_nr(processor) + 1,
-                 (long)cia, 
+                 (long)cia,
                  emul->syscall_descriptor[call].name);
 }
 
@@ -123,11 +122,32 @@ emul_write_status(cpu *processor,
                  int status,
                  int errno)
 {
-  cpu_registers(processor)->gpr[3] = status;
-  if (status < 0)
-    cpu_registers(processor)->gpr[0] = errno;
-  else
-    cpu_registers(processor)->gpr[0] = 0;
+  if (status == -1 && errno != 0) {
+    cpu_registers(processor)->gpr[3] = errno;
+    CR_SET(0, cr_i_summary_overflow);
+  }
+  else {
+    cpu_registers(processor)->gpr[3] = status;
+    CR_SET(0, 0);
+  }
+}
+
+
+INLINE_EMUL_GENERIC void
+emul_write2_status(cpu *processor,
+                  int status1,
+                  int status2,
+                  int errno)
+{
+  if (status1 == -1 && errno != 0) {
+    cpu_registers(processor)->gpr[3] = errno;
+    CR_SET(0, cr_i_summary_overflow);
+  }
+  else {
+    cpu_registers(processor)->gpr[3] = status1;
+    cpu_registers(processor)->gpr[4] = status2;
+    CR_SET(0, 0);
+  }
 }
 
 
@@ -201,8 +221,13 @@ emul_do_system_call(os_emul_data *emul_data,
     error("do_call() os_emul call %d out-of-range\n", call);
 
   handler = emul->syscall_descriptor[call].handler;
-  if (handler == NULL)
-    error("do_call() unimplemented call %d\n", call);
+  if (handler == NULL) {
+    if (emul->syscall_descriptor[call].name) {
+      error("do_call() unimplemented call %s\n", emul->syscall_descriptor[call].name);
+    } else {
+      error("do_call() unimplemented call %d\n", call);
+    }
+  }
 
   if (WITH_TRACE && ppc_trace[trace_os_emul])
     emul_syscall_enter(emul, call, arg0, processor, cia);
@@ -234,8 +259,8 @@ emul_add_tree_options(device *tree,
   int little_endian = 0;
 
   /* sort out little endian */
-  if (device_find_property(tree, "/options/little-endian?"))
-    little_endian = device_find_boolean_property(tree, "/options/little-endian?");
+  if (tree_find_property(tree, "/options/little-endian?"))
+    little_endian = tree_find_boolean_property(tree, "/options/little-endian?");
   else {
 #ifdef bfd_little_endian       /* new bfd */
     little_endian = (image != NULL && bfd_little_endian(image));
@@ -243,53 +268,75 @@ emul_add_tree_options(device *tree,
     little_endian = (image != NULL &&
                     !image->xvec->byteorder_big_p);
 #endif
-    device_tree_add_parsed(tree, "/options/little-endian? %s",
-                          little_endian ? "true" : "false");
+    tree_parse(tree, "/options/little-endian? %s",
+              little_endian ? "true" : "false");
   }
 
   /* misc other stuff */
-  device_tree_add_parsed(tree, "/openprom/options/oea-memory-size 0x%x",
-                        OEA_MEMORY_SIZE);
-  device_tree_add_parsed(tree, "/openprom/options/oea-interrupt-prefix %d",
-                        oea_interrupt_prefix);
-  device_tree_add_parsed(tree, "/openprom/options/smp 1");
-  device_tree_add_parsed(tree, "/openprom/options/env %s", env);
-  device_tree_add_parsed(tree, "/openprom/options/os-emul %s", emul);
-  device_tree_add_parsed(tree, "/openprom/options/strict-alignment? %s",
-                        (WITH_ALIGNMENT == STRICT_ALIGNMENT || little_endian)
-                        ? "true" : "false");
-  device_tree_add_parsed(tree, "/openprom/options/floating-point? %s",
-                        WITH_FLOATING_POINT ? "true" : "false");
-  device_tree_add_parsed(tree, "/openprom/options/model \"%s",
-                        model_name[WITH_DEFAULT_MODEL]);
-  device_tree_add_parsed(tree, "/openprom/options/model-issue %d",
-                        MODEL_ISSUE_IGNORE);
+  tree_parse(tree, "/openprom/options/oea-memory-size 0x%x",
+            OEA_MEMORY_SIZE);
+  tree_parse(tree, "/openprom/options/oea-interrupt-prefix %d",
+            oea_interrupt_prefix);
+  tree_parse(tree, "/openprom/options/smp 1");
+  tree_parse(tree, "/openprom/options/env %s", env);
+  tree_parse(tree, "/openprom/options/os-emul %s", emul);
+  tree_parse(tree, "/openprom/options/strict-alignment? %s",
+            (WITH_ALIGNMENT == STRICT_ALIGNMENT)
+            ? "true" : "false");
+  tree_parse(tree, "/openprom/options/floating-point? %s",
+            WITH_FLOATING_POINT ? "true" : "false");
+  tree_parse(tree, "/openprom/options/use-stdio? %s",
+            ((WITH_STDIO == DO_USE_STDIO
+              || WITH_STDIO == 0)
+             ? "true" : "false"));
+  tree_parse(tree, "/openprom/options/model \"%s",
+            model_name[WITH_DEFAULT_MODEL]);
+  tree_parse(tree, "/openprom/options/model-issue %d",
+            MODEL_ISSUE_IGNORE);
+
+  /* useful options */
 }
 
 INLINE_EMUL_GENERIC void
 emul_add_tree_hardware(device *root)
 {
+  int i;
+  int nr_cpus = tree_find_integer_property(root, "/openprom/options/smp");
+
+  /* sanity check the number of processors */
+  if (nr_cpus > MAX_NR_PROCESSORS)
+    error("Specified number of processors (%d) exceeds the number configured (%d).\n",
+         nr_cpus, MAX_NR_PROCESSORS);
+
+  /* set the number of address cells (1 or 2) */
+  tree_parse(root, "#address-cells %d", WITH_TARGET_WORD_BITSIZE / 32);
+
   /* add some memory */
-  if (device_tree_find_device(root, "/memory") == NULL) {
+  if (tree_find_device(root, "/memory") == NULL) {
     unsigned_word memory_size =
-      device_find_integer_property(root, "/openprom/options/oea-memory-size");
-    device_tree_add_parsed(root, "/memory@0/reg { 0x0 0x%lx",
-                          (unsigned long)memory_size);
-    /* what about allocated? */
+      tree_find_integer_property(root, "/openprom/options/oea-memory-size");
+    const unsigned_word avail_start = 0x3000;
+    tree_parse(root, "/memory@0/reg 0x0 0x%lx",
+              (unsigned long)memory_size);
+    /* reserve the first 0x3000 for the PowerPC interrupt table */
+    tree_parse(root, "/memory@0/available 0x%lx  0x%lx",
+              (unsigned long)avail_start,
+              (unsigned long)memory_size - avail_start);
+  }
+
+  /* our processors */
+  for (i = 0; i < nr_cpus; i++) {
+    tree_parse(root, "/cpus/cpu@%d/cpu-nr %d", i, i);
   }
-  /* an eeprom */
-  device_tree_add_parsed(root, "/openprom/eeprom@0xfff00000/reg { 0xfff00000 0x3000");
-  /* the IO bus */
-  device_tree_add_parsed(root, "/iobus@0x400000/reg { 0x400000 0x400000");
-  device_tree_add_parsed(root, "/iobus/console@0x000000/reg { 0x000000 16");
-  device_tree_add_parsed(root, "/iobus/halt@0x100000/reg    { 0x100000  4");
-  device_tree_add_parsed(root, "/iobus/icu@0x200000/reg     { 0x200000  8");
-  device_tree_add_parsed(root, "/iobus/icu > 0 0 /iobus/icu");
-  device_tree_add_parsed(root, "/iobus/icu > 1 1 /iobus/icu");
+
+  /* the debugging pal - hide it in the openprom and don't attach it
+     to any bus */
+  tree_parse(root, "/openprom/pal");
+
   /* chosen etc */
-  device_tree_add_parsed(root, "/chosen/stdin */iobus/console");
-  device_tree_add_parsed(root, "/chosen/stdout !/chosen/stdin");
-  device_tree_add_parsed(root, "/chosen/memory */memory");
+  tree_parse(root, "/chosen/stdin */openprom/pal");
+  tree_parse(root, "/chosen/stdout !/chosen/stdin");
+  tree_parse(root, "/chosen/memory */memory");
 }
 
-#endif /* _SYSTEM_C_ */
+#endif /* _EMUL_GENERIC_C_ */
This page took 0.026163 seconds and 4 git commands to generate.