/* This file is part of the program psim.
- Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au>
+ Copyright (C) 1994-1996, 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
#include "emul_generic.h"
#include "emul_netbsd.h"
+#include "emul_unix.h"
+#include "emul_chirp.h"
+#include "emul_bugapi.h"
-#ifndef STATIC_INLINE_OS_EMUL
-#define STATIC_INLINE_OS_EMUL STATIC_INLINE
-#endif
+static const os_emul *(os_emulations[]) = {
+ &emul_chirp,
+ &emul_bugapi,
+ &emul_netbsd,
+ &emul_solaris,
+ &emul_linux,
+ 0
+};
-INLINE_OS_EMUL void
-os_emul_call(cpu *processor,
- unsigned_word cia)
+INLINE_OS_EMUL\
+(os_emul *)
+os_emul_create(const char *file_name,
+ device *root)
{
- emulation *emul = &emul_netbsd;
- emul_do_call(emul,
- cpu_registers(processor)->gpr[0],
- 3, /*r3 contains arg0*/
- processor,
- cia);
+ const char *emulation_name = NULL;
+ bfd *image;
+ os_emul *chosen_emulation = NULL;
+
+ bfd_init(); /* would never hurt */
+
+ /* open the file */
+ image = bfd_openr(file_name, NULL);
+ if (image == NULL) {
+ bfd_perror(file_name);
+ error("nothing loaded\n");
+ }
+
+ /* check it is an executable */
+ if (!bfd_check_format(image, bfd_object)) {
+ TRACE(trace_tbd,
+ ("FIXME - should check more than just bfd_check_format\n"));
+ TRACE(trace_os_emul,
+ ("%s not an executable, assumeing a device file\n", file_name));
+ bfd_close(image);
+ image = NULL;
+ }
+
+ /* if a device file, load that before trying the emulations on */
+ if (image == NULL) {
+ psim_merge_device_file(root, file_name);
+ }
+
+ /* see if the device tree already specifies the required emulation */
+ if (tree_find_property(root, "/openprom/options/os-emul") != NULL)
+ emulation_name =
+ tree_find_string_property(root, "/openprom/options/os-emul");
+ else
+ emulation_name = NULL;
+
+ /* go through each emulation to see if they reconize it. FIXME -
+ should have some sort of imported table from a separate file */
+ {
+ os_emul_data *emul_data;
+ const os_emul **possible_emulation;
+ chosen_emulation = NULL;
+ for (possible_emulation = os_emulations, emul_data = NULL;
+ *possible_emulation != NULL && emul_data == NULL;
+ possible_emulation++) {
+ emul_data = (*possible_emulation)->create(root,
+ image,
+ emulation_name);
+ if (emul_data != NULL) {
+ chosen_emulation = ZALLOC(os_emul);
+ *chosen_emulation = **possible_emulation;
+ chosen_emulation->data = emul_data;
+ }
+ }
+ }
+
+ /* clean up */
+ if (image != NULL)
+ bfd_close(image);
+ return chosen_emulation;
}
+INLINE_OS_EMUL\
+(void)
+os_emul_init(os_emul *emulation,
+ int nr_cpus)
+{
+ if (emulation != (os_emul*)0)
+ emulation->init(emulation->data, nr_cpus);
+}
+
+INLINE_OS_EMUL\
+(void)
+os_emul_system_call(cpu *processor,
+ unsigned_word cia)
+{
+ os_emul *emulation = cpu_os_emulation(processor);
+ if (emulation != (os_emul*)0 && emulation->system_call != 0)
+ emulation->system_call(processor, cia, emulation->data);
+ else
+ error("System call emulation not available\n");
+}
+
+INLINE_OS_EMUL\
+(int)
+os_emul_instruction_call(cpu *processor,
+ unsigned_word cia,
+ unsigned_word ra)
+{
+ os_emul *emulation = cpu_os_emulation(processor);
+ if (emulation != (os_emul*)0 && emulation->instruction_call != 0)
+ return emulation->instruction_call(processor, cia, ra, emulation->data);
+ else
+ return 0;
+}
+
+
#endif /* _OS_EMUL_C_ */