From 262faa5417cda51e88583546bb1f1d22eec6ec77 Mon Sep 17 00:00:00 2001 From: Michael Meissner Date: Thu, 22 Feb 1996 20:11:41 +0000 Subject: [PATCH] Add input support; at end of user writes, call fflush --- sim/ppc/ChangeLog | 14 ++++++++++ sim/ppc/emul_bugapi.c | 71 ++++++++++++++++++++++++++++++++++++++++++++++----- sim/ppc/emul_netbsd.c | 2 ++ sim/ppc/main.c | 69 +++++++++++++++---------------------------------- 4 files changed, 101 insertions(+), 55 deletions(-) diff --git a/sim/ppc/ChangeLog b/sim/ppc/ChangeLog index 3583f82..c0e9b33 100644 --- a/sim/ppc/ChangeLog +++ b/sim/ppc/ChangeLog @@ -1,3 +1,17 @@ +Thu Feb 22 14:01:56 1996 Michael Meissner + + * emul_bugapi.c (emul_bugapi_do_read): New function to handle + reads. + (emul_bugapi_instruction_call): Add support for .INCHR/.INLN + system calls. + + * emul_bugapi.c (emul_bugapi_do_write): Call flush_stdoutput. + * emul_netbsd.c (do_write): Call flush_stdoutput. + + * main.c (flush_stdoutput): Do fflush (stdout). + * sim_calls.c (flush_stdoutput): Do gdb_flush (gdb_stdout); + * sim_callbacks.h (flush_stdoutput): Declare. + Wed Feb 21 10:39:35 1996 Michael Meissner * emul_bugapi.c (bug_mapping): New structure to map bug system diff --git a/sim/ppc/emul_bugapi.c b/sim/ppc/emul_bugapi.c index 2b1a308..35357dd 100644 --- a/sim/ppc/emul_bugapi.c +++ b/sim/ppc/emul_bugapi.c @@ -22,6 +22,20 @@ #ifndef _EMUL_BUGAPI_C_ #define _EMUL_BUGAPI_C_ +/* Note: this module is called via a table. There is no benefit in + making it inline */ + +#include "emul_generic.h" +#include "emul_bugapi.h" + +#ifdef HAVE_UNISTD_H +#include +#endif + +#ifdef HAVE_STDLIB_H +#include +#endif + /* from PowerPCBug Debugging Package User's Manual, part 2 of 2 and also bug.S - Dale Rahn */ #define _INCHR 0x000 /* Input character */ @@ -137,13 +151,6 @@ static const struct bug_map bug_mapping[] = { { _SYMBOLDA, ".SYMBOLDA -- Detach symbol table" }, }; -/* Note: this module is called via a table. There is no benefit in - making it inline */ - -#include "emul_generic.h" -#include "emul_bugapi.h" - - #ifndef OEA_START_ADDRESS #define OEA_START_ADDRESS 0x100000 #endif @@ -285,6 +292,40 @@ emul_bugapi_instruction_name(int call_id) return buffer; } +static int +emul_bugapi_do_read(cpu *processor, + unsigned_word cia, + unsigned_word buf, + int nbytes) +{ + unsigned char *scratch_buffer; + int status; + + /* get a tempoary bufer */ + scratch_buffer = (unsigned char *) zalloc(nbytes); + + /* check if buffer exists by reading it */ + emul_read_buffer((void *)scratch_buffer, buf, nbytes, processor, cia); + + /* read */ + status = read (0, (void *)scratch_buffer, nbytes); + + if (status == -1) { + status = 0; + } + + if (status > 0) { + emul_write_buffer((void *)scratch_buffer, buf, status, processor, cia); + + /* Bugapi chops off the trailing n, but leaves it in the buffer */ + if (scratch_buffer[status-1] == '\n' || scratch_buffer[status-1] == '\r') + status--; + } + + zfree(scratch_buffer); + return status; +} + static void emul_bugapi_do_write(cpu *processor, unsigned_word cia, @@ -321,6 +362,8 @@ emul_bugapi_do_write(cpu *processor, if (suffix) printf_filtered("%s", suffix); + + flush_stdoutput (); } static int @@ -331,6 +374,7 @@ emul_bugapi_instruction_call(cpu *processor, { const int call_id = cpu_registers(processor)->gpr[10]; const char *my_prefix = "bugapi"; + unsigned char uc; ITRACE (trace_os_emul,(" 0x%x %s, r3 = 0x%lx, r4 = 0x%lx\n", call_id, emul_bugapi_instruction_name (call_id), @@ -345,6 +389,19 @@ emul_bugapi_instruction_call(cpu *processor, error("emul-bugapi: unimplemented bugapi %s from address 0x%lx\n", emul_bugapi_instruction_name (call_id), SRR0); break; + /* read a single character, output r3 = byte */ + /* FIXME: Add support to unbuffer input */ + case _INCHR: + if (read (0, &uc, 1) < 0) + uc = 0; + cpu_registers(processor)->gpr[3] = uc; + break; + /* read a line of at most 256 bytes, r3 = ptr to 1st byte, output r3 = ptr to last byte+1 */ + case _INLN: + cpu_registers(processor)->gpr[3] += emul_bugapi_do_read(processor, cia, + cpu_registers(processor)->gpr[3], + 256); + break; /* output a character, r3 = character */ case _OUTCHR: printf_filtered("%c", (char)cpu_registers(processor)->gpr[3]); diff --git a/sim/ppc/emul_netbsd.c b/sim/ppc/emul_netbsd.c index 27de365..3fc64bc 100644 --- a/sim/ppc/emul_netbsd.c +++ b/sim/ppc/emul_netbsd.c @@ -360,6 +360,8 @@ do_write(os_emul_data *emul, status = write(d, scratch_buffer, nbytes); emul_write_status(processor, status, errno); zfree(scratch_buffer); + + flush_stdoutput(); } diff --git a/sim/ppc/main.c b/sim/ppc/main.c index 41791a1..7837782 100644 --- a/sim/ppc/main.c +++ b/sim/ppc/main.c @@ -1,6 +1,6 @@ /* This file is part of the program psim. - Copyright (C) 1994-1995, Andrew Cagney + Copyright (C) 1994-1996, Andrew Cagney 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 @@ -23,8 +23,8 @@ #include #include "psim.h" -#include "cpu.h" #include "options.h" +#include "device.h" /* FIXME: psim should provide the interface */ #ifdef HAVE_STDLIB_H #include @@ -43,10 +43,6 @@ #endif extern char **environ; -extern char *optarg; -extern int optind; -extern int optopt; -extern int opterr; void printf_filtered(const char *msg, ...) @@ -58,6 +54,12 @@ printf_filtered(const char *msg, ...) } void +flush_stdoutput(void) +{ + fflush (stdout); +} + +void error (char *msg, ...) { va_list ap; @@ -83,14 +85,6 @@ zfree(void *chunk) free(chunk); } -static void -usage(void) -{ - printf_filtered("Usage:\n\tpsim [ -t ] [-m model] [-i] [-I] [ ... ]\n"); - trace_usage(); - error(""); -} - int main(int argc, char **argv) { @@ -98,56 +92,35 @@ main(int argc, char **argv) const char *name_of_file; char *arg_; psim_status status; - int letter; - int print_info = 0; - - /* check for arguments -- note sim_calls.c also contains argument processing - code for the simulator linked within gdb. */ - while ((letter = getopt (argc, argv, "Iim:t:")) != EOF) - { - switch (letter) { - case 't': - trace_option(optarg); - break; - case 'm': - model_set(optarg); - break; - case 'i': - print_info = 1; - break; - case 'I': - current_model_issue = MODEL_ISSUE_PROCESS; - print_info = 2; - break; - default: - usage(); - } - } - if (optind >= argc) - usage(); - name_of_file = argv[optind]; + device *root = psim_tree(); + + /* parse the arguments */ + argv = psim_options(root, argv + 1); + if (argv[0] == NULL) + psim_usage(0); + name_of_file = argv[0]; if (ppc_trace[trace_opts]) print_options (); /* create the simulator */ - system = psim_create(name_of_file); + system = psim_create(name_of_file, root); /* fudge the environment so that _=prog-name */ - arg_ = (char*)zalloc(strlen(argv[optind]) + strlen("_=") + 1); + arg_ = (char*)zalloc(strlen(argv[0]) + strlen("_=") + 1); strcpy(arg_, "_="); - strcat(arg_, argv[optind]); + strcat(arg_, argv[0]); putenv(arg_); /* initialize it */ psim_init(system); - psim_stack(system, &argv[optind], environ); + psim_stack(system, argv, environ); psim_run(system); /* any final clean up */ - if (print_info) - psim_print_info (system, print_info); + if (ppc_trace[trace_print_info]) + psim_print_info (system, ppc_trace[trace_print_info]); /* why did we stop */ status = psim_get_status(system); -- 2.7.4