/* sim-cmd.c -- Simulator command parsing
|
/* sim-cmd.c -- Simulator command parsing
|
|
|
Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
|
Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
|
Copyright (C) 2005 György `nog' Jeney, nog@sdf.lonestar.org
|
Copyright (C) 2005 György `nog' Jeney, nog@sdf.lonestar.org
|
Copyright (C) 2008 Embecosm Limited
|
Copyright (C) 2008 Embecosm Limited
|
Copyright (C) 2011 Giuseppe Scrivano <gscrivano@gnu.org>
|
Copyright (C) 2011 Giuseppe Scrivano <gscrivano@gnu.org>
|
|
|
Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>
|
Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>
|
contributor Giuseppe Scrivano <gscrivano@gnu.org>
|
contributor Giuseppe Scrivano <gscrivano@gnu.org>
|
|
|
This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator.
|
This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator.
|
|
|
This program is free software; you can redistribute it and/or modify it
|
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
|
under the terms of the GNU General Public License as published by the Free
|
Software Foundation; either version 3 of the License, or (at your option)
|
Software Foundation; either version 3 of the License, or (at your option)
|
any later version.
|
any later version.
|
|
|
This program is distributed in the hope that it will be useful, but WITHOUT
|
This program is distributed in the hope that it will be useful, but WITHOUT
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
|
more details.
|
more details.
|
|
|
You should have received a copy of the GNU General Public License along
|
You should have received a copy of the GNU General Public License along
|
with this program. If not, see <http://www.gnu.org/licenses/>. */
|
with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
/* This program is commented throughout in a fashion suitable for processing
|
/* This program is commented throughout in a fashion suitable for processing
|
with Doxygen. */
|
with Doxygen. */
|
|
|
|
|
/* Autoconf and/or portability configuration */
|
/* Autoconf and/or portability configuration */
|
#include "config.h"
|
#include "config.h"
|
|
|
/* System includes */
|
/* System includes */
|
#include <stdlib.h>
|
#include <stdlib.h>
|
#include <unistd.h>
|
#include <unistd.h>
|
#include <stdio.h>
|
#include <stdio.h>
|
|
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
#include <readline/readline.h>
|
#include <readline/readline.h>
|
#include <readline/history.h>
|
#include <readline/history.h>
|
#endif /* HAVE_LIBREADLINE */
|
#endif /* HAVE_LIBREADLINE */
|
|
|
/* Package includes */
|
/* Package includes */
|
#include "sim-cmd.h"
|
#include "sim-cmd.h"
|
#include "sim-config.h"
|
#include "sim-config.h"
|
#include "execute.h"
|
#include "execute.h"
|
#include "labels.h"
|
#include "labels.h"
|
#include "sched.h"
|
#include "sched.h"
|
#include "toplevel-support.h"
|
#include "toplevel-support.h"
|
#include "dumpverilog.h"
|
#include "dumpverilog.h"
|
#include "profiler.h"
|
#include "profiler.h"
|
#include "mprofiler.h"
|
#include "mprofiler.h"
|
#include "trace.h"
|
#include "trace.h"
|
#include "debug-unit.h"
|
#include "debug-unit.h"
|
#include "stats.h"
|
#include "stats.h"
|
#include "sprs.h"
|
#include "sprs.h"
|
#include "dcache-model.h"
|
#include "dcache-model.h"
|
#include "branch-predict.h"
|
#include "branch-predict.h"
|
#include "debug.h"
|
#include "debug.h"
|
#include "cuc.h"
|
#include "cuc.h"
|
#include "rsp-server.h"
|
#include "rsp-server.h"
|
|
|
|
|
/* The number of instructions to execute before droping into interactive mode */
|
/* The number of instructions to execute before droping into interactive mode */
|
static long long to_insn_num;
|
static long long to_insn_num;
|
|
|
struct sim_stat
|
struct sim_stat
|
{
|
{
|
void (*stat_func) (void *dat);
|
void (*stat_func) (void *dat);
|
void *dat;
|
void *dat;
|
struct sim_stat *next;
|
struct sim_stat *next;
|
};
|
};
|
|
|
static struct sim_stat *sim_stats = NULL;
|
static struct sim_stat *sim_stats = NULL;
|
|
|
/* Registers a status printing callback */
|
/* Registers a status printing callback */
|
void
|
void
|
reg_sim_stat (void (*stat_func) (void *dat), void *dat)
|
reg_sim_stat (void (*stat_func) (void *dat), void *dat)
|
{
|
{
|
struct sim_stat *new = malloc (sizeof (struct sim_stat));
|
struct sim_stat *new = malloc (sizeof (struct sim_stat));
|
|
|
if (!new)
|
if (!new)
|
{
|
{
|
fprintf (stderr, "reg_sim_stat: Out-of-memory\n");
|
fprintf (stderr, "reg_sim_stat: Out-of-memory\n");
|
exit (1);
|
exit (1);
|
}
|
}
|
|
|
new->stat_func = stat_func;
|
new->stat_func = stat_func;
|
new->dat = dat;
|
new->dat = dat;
|
new->next = sim_stats;
|
new->next = sim_stats;
|
sim_stats = new;
|
sim_stats = new;
|
}
|
}
|
|
|
/* Scheduler job that drops us back into interactive mode after the next
|
/* Scheduler job that drops us back into interactive mode after the next
|
* instruction has executed */
|
* instruction has executed */
|
void
|
void
|
reenter_int (void *dat)
|
reenter_int (void *dat)
|
{
|
{
|
if (!runtime.sim.hush)
|
if (!runtime.sim.hush)
|
dumpreg ();
|
dumpreg ();
|
handle_sim_command ();
|
handle_sim_command ();
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_quit (int argc, char **argv) /* quit */
|
sim_cmd_quit (int argc, char **argv) /* quit */
|
{
|
{
|
PRINTF ("\n");
|
PRINTF ("\n");
|
sim_done ();
|
sim_done ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_help (int argc, char **argv) /* help */
|
sim_cmd_help (int argc, char **argv) /* help */
|
{
|
{
|
PRINTF ("q - quit simulator\n");
|
PRINTF ("q - quit simulator\n");
|
PRINTF ("r - display all registers\n");
|
PRINTF ("r - display all registers\n");
|
PRINTF ("t - execute next instruction\n");
|
PRINTF ("t - execute next instruction\n");
|
PRINTF
|
PRINTF
|
("run <instructions> [<hush>] - execute <instruction> instructions, no reg\n");
|
("run <instructions> [<hush>] - execute <instruction> instructions, no reg\n");
|
PRINTF (" dump if hush\n");
|
PRINTF (" dump if hush\n");
|
PRINTF
|
PRINTF
|
("pr <r> <value> - patch register <r> with <value>\n");
|
("pr <r> <value> - patch register <r> with <value>\n");
|
PRINTF
|
PRINTF
|
("dm <fromaddr> [<toaddr>] - display memory from <fromaddr> to <toaddr>\n");
|
("dm <fromaddr> [<toaddr>] - display memory from <fromaddr> to <toaddr>\n");
|
PRINTF ("de <fromaddr> [<toaddr>] - debug insn memory\n");
|
PRINTF ("de <fromaddr> [<toaddr>] - debug insn memory\n");
|
PRINTF
|
PRINTF
|
("pm <addr> <value> - patch memory location <addr> with <value>\n");
|
("pm <addr> <value> - patch memory location <addr> with <value>\n");
|
PRINTF
|
PRINTF
|
("pc <value> - patch PC register with <value>\n");
|
("pc <value> - patch PC register with <value>\n");
|
PRINTF ("cm <fromaddr> <toaddr> <size> - copy memory\n");
|
PRINTF ("cm <fromaddr> <toaddr> <size> - copy memory\n");
|
PRINTF
|
PRINTF
|
("break <addr> - toggle breakpoint at address <addr>\n");
|
("break <addr> - toggle breakpoint at address <addr>\n");
|
PRINTF ("breaks - print all set breakpoints\n");
|
PRINTF ("breaks - print all set breakpoints\n");
|
PRINTF ("reset - simulator reset\n");
|
PRINTF ("reset - simulator reset\n");
|
PRINTF ("hist - execution history\n");
|
PRINTF ("hist - execution history\n");
|
PRINTF
|
PRINTF
|
("stall - stalls the processor and gives control to\n");
|
("stall - stalls the processor and gives control to\n");
|
PRINTF (" the debugger\n");
|
PRINTF (" the debugger\n");
|
PRINTF ("unstall - unstalls the processor\n");
|
PRINTF ("unstall - unstalls the processor\n");
|
PRINTF
|
PRINTF
|
("stats <num|clear> - execution statistics num or clear it.\n");
|
("stats <num|clear> - execution statistics num or clear it.\n");
|
PRINTF
|
PRINTF
|
("info - configuration info (caches etc.)\n");
|
("info - configuration info (caches etc.)\n");
|
PRINTF
|
PRINTF
|
("dv <fromaddr> [<toaddr>] [<m>] - dumps memory as verilog module <m>\n");
|
("dv <fromaddr> [<toaddr>] [<m>] - dumps memory as verilog module <m>\n");
|
PRINTF (" (use redirect to capture)\n");
|
PRINTF (" (use redirect to capture)\n");
|
PRINTF
|
PRINTF
|
("dh <fromaddr> [<toaddr>] - dumps memory as hex code (use redirect)\n");
|
("dh <fromaddr> [<toaddr>] - dumps memory as hex code (use redirect)\n");
|
PRINTF ("setdbch - toggles debug channels on/off\n");
|
PRINTF ("setdbch - toggles debug channels on/off\n");
|
PRINTF
|
PRINTF
|
("set <section> <item> = <param> - set configuration. See sim.cfg for more\n");
|
("set <section> <item> = <param> - set configuration. See sim.cfg for more\n");
|
PRINTF (" information.\n");
|
PRINTF (" information.\n");
|
PRINTF ("debug - toggles simulator debug mode\n");
|
PRINTF ("debug - toggles simulator debug mode\n");
|
PRINTF
|
PRINTF
|
("cuc - enters Custom Unit Compiler command prompt\n");
|
("cuc - enters Custom Unit Compiler command prompt\n");
|
PRINTF
|
PRINTF
|
("help - available commands (this list)\n");
|
("help - available commands (this list)\n");
|
PRINTF
|
PRINTF
|
("<cmd> > <filename> - redirect simulator stdout to <filename>\n");
|
("<cmd> > <filename> - redirect simulator stdout to <filename>\n");
|
PRINTF (" (and not emulated PRINTF)\n\n");
|
PRINTF (" (and not emulated PRINTF)\n\n");
|
(void)main_mprofiler (0, NULL, 1);
|
(void)main_mprofiler (0, NULL, 1);
|
PRINTF ("\n");
|
PRINTF ("\n");
|
(void)main_profiler (0, NULL, 1);
|
(void)main_profiler (0, NULL, 1);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_trace (int argc, char **argv) /* trace */
|
sim_cmd_trace (int argc, char **argv) /* trace */
|
{
|
{
|
runtime.sim.hush = 0;
|
runtime.sim.hush = 0;
|
sched_next_insn (reenter_int, NULL);
|
sched_next_insn (reenter_int, NULL);
|
return 1;
|
return 1;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_dm (int argc, char **argv) /* dump memory */
|
sim_cmd_dm (int argc, char **argv) /* dump memory */
|
{
|
{
|
static oraddr_t from = 0, to = 0;
|
static oraddr_t from = 0, to = 0;
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
from = eval_label (argv[1]);
|
from = eval_label (argv[1]);
|
else
|
else
|
from = strtoul (argv[1], NULL, 0);
|
from = strtoul (argv[1], NULL, 0);
|
to = from + 0x40;
|
to = from + 0x40;
|
}
|
}
|
if (argc >= 3)
|
if (argc >= 3)
|
to = strtoul (argv[2], NULL, 0);
|
to = strtoul (argv[2], NULL, 0);
|
dump_memory (from, to);
|
dump_memory (from, to);
|
PRINTF ("\n");
|
PRINTF ("\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_dv (int argc, char **argv) /* dump memory as verilog */
|
sim_cmd_dv (int argc, char **argv) /* dump memory as verilog */
|
{
|
{
|
static oraddr_t from = 0, to = 0;
|
static oraddr_t from = 0, to = 0;
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
from = eval_label (argv[1]);
|
from = eval_label (argv[1]);
|
else
|
else
|
from = strtoul (argv[1], NULL, 0);
|
from = strtoul (argv[1], NULL, 0);
|
to = from + 0x40;
|
to = from + 0x40;
|
}
|
}
|
if (argc >= 3)
|
if (argc >= 3)
|
to = strtoul (argv[2], NULL, 0);
|
to = strtoul (argv[2], NULL, 0);
|
|
|
if (argc < 4)
|
if (argc < 4)
|
dumpverilog ("or1k_mem", from, to);
|
dumpverilog ("or1k_mem", from, to);
|
else
|
else
|
dumpverilog (argv[3], from, to);
|
dumpverilog (argv[3], from, to);
|
|
|
PRINTF ("\n");
|
PRINTF ("\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_dh (int argc, char **argv) /* dump memory as hex */
|
sim_cmd_dh (int argc, char **argv) /* dump memory as hex */
|
{
|
{
|
static oraddr_t from = 0, to = 0;
|
static oraddr_t from = 0, to = 0;
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
from = eval_label (argv[1]);
|
from = eval_label (argv[1]);
|
else
|
else
|
from = strtoul (argv[1], NULL, 0);
|
from = strtoul (argv[1], NULL, 0);
|
to = from + 0x40;
|
to = from + 0x40;
|
}
|
}
|
if (argc >= 3)
|
if (argc >= 3)
|
to = strtoul (argv[2], NULL, 0);
|
to = strtoul (argv[2], NULL, 0);
|
|
|
dumphex (from, to);
|
dumphex (from, to);
|
PRINTF ("\n");
|
PRINTF ("\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_pm (int argc, char **argv) /* patch memory */
|
sim_cmd_pm (int argc, char **argv) /* patch memory */
|
{
|
{
|
static oraddr_t addr = 0;
|
static oraddr_t addr = 0;
|
int breakpoint = 0;
|
int breakpoint = 0;
|
|
|
if (argc != 3)
|
if (argc != 3)
|
{
|
{
|
PRINTF ("pm <address> <value>\n");
|
PRINTF ("pm <address> <value>\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
addr = eval_label (argv[1]);
|
addr = eval_label (argv[1]);
|
else
|
else
|
addr = strtoul (argv[1], NULL, 0);
|
addr = strtoul (argv[1], NULL, 0);
|
}
|
}
|
set_mem32 (addr, strtoul (argv[2], NULL, 0), &breakpoint);
|
set_mem32 (addr, strtoul (argv[2], NULL, 0), &breakpoint);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_cm (int argc, char **argv) /* copy memory 2004-01-20 hpanther */
|
sim_cmd_cm (int argc, char **argv) /* copy memory 2004-01-20 hpanther */
|
{
|
{
|
static oraddr_t from = 0, to = 0;
|
static oraddr_t from = 0, to = 0;
|
static unsigned int size = 0;
|
static unsigned int size = 0;
|
int i;
|
int i;
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
from = eval_label (argv[1]);
|
from = eval_label (argv[1]);
|
else
|
else
|
from = strtoul (argv[1], NULL, 0);
|
from = strtoul (argv[1], NULL, 0);
|
}
|
}
|
|
|
if (argc >= 3)
|
if (argc >= 3)
|
{
|
{
|
if (argv[2][0] == '_')
|
if (argv[2][0] == '_')
|
to = eval_label (argv[2]);
|
to = eval_label (argv[2]);
|
else
|
else
|
to = strtoul (argv[2], NULL, 0);
|
to = strtoul (argv[2], NULL, 0);
|
}
|
}
|
|
|
if (argc >= 4)
|
if (argc >= 4)
|
{
|
{
|
if (argv[3][0] == '_')
|
if (argv[3][0] == '_')
|
size = eval_label (argv[3]);
|
size = eval_label (argv[3]);
|
else
|
else
|
size = strtoul (argv[3], NULL, 0);
|
size = strtoul (argv[3], NULL, 0);
|
}
|
}
|
|
|
for (i = 0; i < size; i += 4)
|
for (i = 0; i < size; i += 4)
|
set_direct32 (to + i, eval_direct32 (from + i, 0, 0), 0, 0);
|
set_direct32 (to + i, eval_direct32 (from + i, 0, 0), 0, 0);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_pr (int argc, char **argv) /* patch regs */
|
sim_cmd_pr (int argc, char **argv) /* patch regs */
|
{
|
{
|
if (argc != 3)
|
if (argc != 3)
|
{
|
{
|
PRINTF ("pr <register> <value>\n");
|
PRINTF ("pr <register> <value>\n");
|
return 0;
|
return 0;
|
}
|
}
|
setsim_reg (strtoul (argv[1], NULL, 0), strtoul (argv[2], NULL, 0));
|
setsim_reg (strtoul (argv[1], NULL, 0), strtoul (argv[2], NULL, 0));
|
#if DYNAMIC_EXECUTION
|
|
PRINTF
|
|
("WARNING: Patching registers may not work with the dynamic execution model\n");
|
|
#endif
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_pc (int argc, char **argv) /* patch PC */
|
sim_cmd_pc (int argc, char **argv) /* patch PC */
|
{
|
{
|
#if DYNAMIC_EXECUTION
|
|
PRINTF ("Patching the pc in the dynamic execution model doesn't work\n");
|
|
#else
|
|
if (argc != 2)
|
if (argc != 2)
|
{
|
{
|
PRINTF ("pc <value>\n");
|
PRINTF ("pc <value>\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
cpu_state.pc = strtoul (argv[1], NULL, 0);
|
cpu_state.pc = strtoul (argv[1], NULL, 0);
|
pcnext = cpu_state.pc + 4;
|
pcnext = cpu_state.pc + 4;
|
#endif
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_breaks (int argc, char **argv) /* print breakpoints */
|
sim_cmd_breaks (int argc, char **argv) /* print breakpoints */
|
{
|
{
|
print_breakpoints ();
|
print_breakpoints ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_break (int argc, char **argv) /* set/clear breakpoint */
|
sim_cmd_break (int argc, char **argv) /* set/clear breakpoint */
|
{
|
{
|
#if DYNAMIC_EXECUTION
|
|
PRINTF
|
|
("Setting simulator breakpoints is not support with the recompiler\n");
|
|
return 0;
|
|
#else
|
|
char *p;
|
char *p;
|
oraddr_t addr;
|
oraddr_t addr;
|
struct label_entry *l;
|
struct label_entry *l;
|
|
|
if (argc != 2)
|
if (argc != 2)
|
{
|
{
|
PRINTF ("break <label or address>\n");
|
PRINTF ("break <label or address>\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
addr = strtoul (argv[1], &p, 0);
|
addr = strtoul (argv[1], &p, 0);
|
if (*p)
|
if (*p)
|
{
|
{
|
l = find_label (argv[1]);
|
l = find_label (argv[1]);
|
if (l)
|
if (l)
|
set_insnbrkpoint (l->addr);
|
set_insnbrkpoint (l->addr);
|
else
|
else
|
PRINTF ("Label `%s' does not exist\n", argv[1]);
|
PRINTF ("Label `%s' does not exist\n", argv[1]);
|
}
|
}
|
else
|
else
|
set_insnbrkpoint (addr);
|
set_insnbrkpoint (addr);
|
return 0;
|
return 0;
|
#endif
|
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_r (int argc, char **argv) /* dump regs */
|
sim_cmd_r (int argc, char **argv) /* dump regs */
|
{
|
{
|
dumpreg ();
|
dumpreg ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_de (int argc, char **argv) /* disassemble */
|
sim_cmd_de (int argc, char **argv) /* disassemble */
|
{
|
{
|
static oraddr_t from = 0, to = 0;
|
static oraddr_t from = 0, to = 0;
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if (argv[1][0] == '_')
|
if (argv[1][0] == '_')
|
from = eval_label (argv[1]);
|
from = eval_label (argv[1]);
|
else
|
else
|
from = strtoul (argv[1], NULL, 0);
|
from = strtoul (argv[1], NULL, 0);
|
to = from + 0x40;
|
to = from + 0x40;
|
}
|
}
|
|
|
if (argc >= 3)
|
if (argc >= 3)
|
to = strtoul (argv[2], NULL, 0);
|
to = strtoul (argv[2], NULL, 0);
|
|
|
disassemble_memory (from, to, 1);
|
disassemble_memory (from, to, 1);
|
PRINTF ("\n");
|
PRINTF ("\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_reset (int argc, char **argv) /* reset simulator */
|
sim_cmd_reset (int argc, char **argv) /* reset simulator */
|
{
|
{
|
sim_reset ();
|
sim_reset ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_hist (int argc, char **argv) /* dump history */
|
sim_cmd_hist (int argc, char **argv) /* dump history */
|
{
|
{
|
int i;
|
int i;
|
struct hist_exec *cur;
|
struct hist_exec *cur;
|
if (!config.sim.history)
|
if (!config.sim.history)
|
{
|
{
|
PRINTF ("Simulation history disabled.\n");
|
PRINTF ("Simulation history disabled.\n");
|
return 0;
|
return 0;
|
}
|
}
|
for (i = HISTEXEC_LEN, cur = hist_exec_tail->next; i; i--, cur = cur->next)
|
for (i = HISTEXEC_LEN, cur = hist_exec_tail->next; i; i--, cur = cur->next)
|
disassemble_memory (cur->addr, cur->addr + 4, 1);
|
disassemble_memory (cur->addr, cur->addr + 4, 1);
|
PRINTF ("\n");
|
PRINTF ("\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* Called when it is suspisous that runtime.sim.instructions has reached
|
/* Called when it is suspisous that runtime.sim.instructions has reached
|
* to_insn_num */
|
* to_insn_num */
|
void
|
void
|
check_insn_exec (void *dat)
|
check_insn_exec (void *dat)
|
{
|
{
|
if (runtime.cpu.instructions < to_insn_num)
|
if (runtime.cpu.instructions < to_insn_num)
|
{
|
{
|
/* Instruction count has not yet been reached, reschedule */
|
/* Instruction count has not yet been reached, reschedule */
|
long long int delta = to_insn_num - runtime.cpu.instructions;
|
long long int delta = to_insn_num - runtime.cpu.instructions;
|
SCHED_ADD (check_insn_exec, NULL,
|
SCHED_ADD (check_insn_exec, NULL,
|
(delta > INT32_MAX) ? INT32_MAX : delta);
|
(delta > INT32_MAX) ? INT32_MAX : delta);
|
return;
|
return;
|
}
|
}
|
handle_sim_command ();
|
handle_sim_command ();
|
}
|
}
|
|
|
void
|
void
|
print_insn_exec (void *dat)
|
print_insn_exec (void *dat)
|
{
|
{
|
dumpreg ();
|
dumpreg ();
|
if (runtime.cpu.instructions < to_insn_num)
|
if (runtime.cpu.instructions < to_insn_num)
|
{
|
{
|
/* Instruction count has not yet been reached, reschedule */
|
/* Instruction count has not yet been reached, reschedule */
|
sched_next_insn (print_insn_exec, NULL);
|
sched_next_insn (print_insn_exec, NULL);
|
return;
|
return;
|
}
|
}
|
handle_sim_command ();
|
handle_sim_command ();
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_run (int argc, char **argv) /* run */
|
sim_cmd_run (int argc, char **argv) /* run */
|
{
|
{
|
runtime.sim.hush = 0;
|
runtime.sim.hush = 0;
|
if (argc >= 3)
|
if (argc >= 3)
|
{
|
{
|
if (!strcmp (argv[2], "hush"))
|
if (!strcmp (argv[2], "hush"))
|
runtime.sim.hush = 1;
|
runtime.sim.hush = 1;
|
}
|
}
|
|
|
if (argc >= 2)
|
if (argc >= 2)
|
{
|
{
|
if ((to_insn_num = strtoll (argv[1], NULL, 0)) != -1)
|
if ((to_insn_num = strtoll (argv[1], NULL, 0)) != -1)
|
{
|
{
|
if (runtime.sim.hush)
|
if (runtime.sim.hush)
|
{
|
{
|
/* Schedule a job to run in to_insn_num cycles time since an instruction
|
/* Schedule a job to run in to_insn_num cycles time since an instruction
|
* may execute in only 1 cycle. check_insn_exec will check if the right
|
* may execute in only 1 cycle. check_insn_exec will check if the right
|
* number of instructions have been executed. If not it will
|
* number of instructions have been executed. If not it will
|
* reschedule. */
|
* reschedule. */
|
SCHED_ADD (check_insn_exec, NULL,
|
SCHED_ADD (check_insn_exec, NULL,
|
(to_insn_num > INT32_MAX) ? INT32_MAX : to_insn_num);
|
(to_insn_num > INT32_MAX) ? INT32_MAX : to_insn_num);
|
}
|
}
|
else
|
else
|
{
|
{
|
/* The user wants to see the execution dumps. Schedule a task to show
|
/* The user wants to see the execution dumps. Schedule a task to show
|
* it to him after each cycle */
|
* it to him after each cycle */
|
sched_next_insn (print_insn_exec, NULL);
|
sched_next_insn (print_insn_exec, NULL);
|
}
|
}
|
to_insn_num += runtime.cpu.instructions;
|
to_insn_num += runtime.cpu.instructions;
|
}
|
}
|
else
|
else
|
{
|
{
|
if (!runtime.sim.hush)
|
if (!runtime.sim.hush)
|
sched_next_insn (print_insn_exec, NULL);
|
sched_next_insn (print_insn_exec, NULL);
|
}
|
}
|
}
|
}
|
else
|
else
|
/* Run 0 instructions */
|
/* Run 0 instructions */
|
return 0;
|
return 0;
|
|
|
return 1;
|
return 1;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_stall (int argc, char **argv) /* Added by CZ 210801 */
|
sim_cmd_stall (int argc, char **argv) /* Added by CZ 210801 */
|
{
|
{
|
#if DYNAMIC_EXECUTION
|
|
PRINTF ("Can't stall the cpu with the dynamic recompiler\n");
|
|
return 0;
|
|
#else
|
|
set_stall_state (1);
|
set_stall_state (1);
|
runtime.sim.iprompt = 0;
|
runtime.sim.iprompt = 0;
|
runtime.sim.hush = 1;
|
runtime.sim.hush = 1;
|
return 1;
|
return 1;
|
#endif
|
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_unstall (int argc, char **argv) /* Added by CZ 210801 */
|
sim_cmd_unstall (int argc, char **argv) /* Added by CZ 210801 */
|
{
|
{
|
#if DYNAMIC_EXECUTION
|
|
PRINTF ("Can't unstall the cpu with the dynamic recompiler\n");
|
|
return 0;
|
|
#else
|
|
set_stall_state (0);
|
set_stall_state (0);
|
return 0;
|
return 0;
|
#endif
|
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_stats (int argc, char **argv) /* stats */
|
sim_cmd_stats (int argc, char **argv) /* stats */
|
{
|
{
|
if (argc != 2)
|
if (argc != 2)
|
{
|
{
|
PRINTF ("stats <stat no. or `clear'>\n");
|
PRINTF ("stats <stat no. or `clear'>\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|
if (strcmp (argv[1], "clear") == 0)
|
if (strcmp (argv[1], "clear") == 0)
|
{
|
{
|
initstats ();
|
initstats ();
|
PRINTF ("Cleared.\n");
|
PRINTF ("Cleared.\n");
|
}
|
}
|
else
|
else
|
{
|
{
|
printstats (strtoul (argv[1], NULL, 0));
|
printstats (strtoul (argv[1], NULL, 0));
|
}
|
}
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_info (int argc, char **argv) /* configuration info */
|
sim_cmd_info (int argc, char **argv) /* configuration info */
|
{
|
{
|
struct sim_stat *cur_stat = sim_stats;
|
struct sim_stat *cur_stat = sim_stats;
|
|
|
/* Display info about various modules */
|
/* Display info about various modules */
|
sprs_status ();
|
sprs_status ();
|
PRINTF ("\n");
|
PRINTF ("\n");
|
memory_table_status ();
|
memory_table_status ();
|
if (config.dc.enabled)
|
if (config.dc.enabled)
|
dc_info ();
|
dc_info ();
|
|
|
if (config.bpb.enabled)
|
if (config.bpb.enabled)
|
bpb_info ();
|
bpb_info ();
|
if (config.bpb.btic)
|
if (config.bpb.btic)
|
btic_info ();
|
btic_info ();
|
|
|
while (cur_stat)
|
while (cur_stat)
|
{
|
{
|
cur_stat->stat_func (cur_stat->dat);
|
cur_stat->stat_func (cur_stat->dat);
|
cur_stat = cur_stat->next;
|
cur_stat = cur_stat->next;
|
}
|
}
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_setdbch (int argc, char **argv) /* Toggle debug channel on/off */
|
sim_cmd_setdbch (int argc, char **argv) /* Toggle debug channel on/off */
|
{
|
{
|
if (argc != 2)
|
if (argc != 2)
|
{
|
{
|
PRINTF ("setdbch <channel>\n");
|
PRINTF ("setdbch <channel>\n");
|
return 0;
|
return 0;
|
}
|
}
|
parse_dbchs (argv[1]);
|
parse_dbchs (argv[1]);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_debug (int argc, char **argv) /* debug mode */
|
sim_cmd_debug (int argc, char **argv) /* debug mode */
|
{
|
{
|
config.sim.debug ^= 1;
|
config.sim.debug ^= 1;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_profile (int argc, char **argv) /* run profiler utility */
|
sim_cmd_profile (int argc, char **argv) /* run profiler utility */
|
{
|
{
|
return main_profiler (argc, argv, 0);
|
return main_profiler (argc, argv, 0);
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_mprofile (int argc, char **argv) /* run mprofiler utility */
|
sim_cmd_mprofile (int argc, char **argv) /* run mprofiler utility */
|
{
|
{
|
return main_mprofiler (argc, argv, 0);
|
return main_mprofiler (argc, argv, 0);
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_cuc (int argc, char **argv) /* run Custom Unit Compiler */
|
sim_cmd_cuc (int argc, char **argv) /* run Custom Unit Compiler */
|
{
|
{
|
main_cuc (runtime.sim.filename);
|
main_cuc (runtime.sim.filename);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static int
|
static int
|
sim_cmd_set (int argc, char **argv) /* configuration info */
|
sim_cmd_set (int argc, char **argv) /* configuration info */
|
{
|
{
|
set_config_command (argc, argv);
|
set_config_command (argc, argv);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static char *
|
static char *
|
strip_space (char *str)
|
strip_space (char *str)
|
{
|
{
|
while (isblank ((int)*str) && *str)
|
while (isblank ((int)*str) && *str)
|
str++;
|
str++;
|
return str;
|
return str;
|
}
|
}
|
|
|
struct sim_command
|
struct sim_command
|
{
|
{
|
const char *name;
|
const char *name;
|
int (*cmd_handle) (int argc, char **argv);
|
int (*cmd_handle) (int argc, char **argv);
|
};
|
};
|
|
|
static const struct sim_command sim_commands[] = {
|
static const struct sim_command sim_commands[] = {
|
{"q", sim_cmd_quit},
|
{"q", sim_cmd_quit},
|
{"help", sim_cmd_help},
|
{"help", sim_cmd_help},
|
{"t", sim_cmd_trace},
|
{"t", sim_cmd_trace},
|
{"dm", sim_cmd_dm},
|
{"dm", sim_cmd_dm},
|
{"dv", sim_cmd_dv},
|
{"dv", sim_cmd_dv},
|
{"dh", sim_cmd_dh},
|
{"dh", sim_cmd_dh},
|
{"pm", sim_cmd_pm},
|
{"pm", sim_cmd_pm},
|
{"cm", sim_cmd_cm},
|
{"cm", sim_cmd_cm},
|
{"pr", sim_cmd_pr},
|
{"pr", sim_cmd_pr},
|
{"pc", sim_cmd_pc},
|
{"pc", sim_cmd_pc},
|
{"breaks", sim_cmd_breaks},
|
{"breaks", sim_cmd_breaks},
|
{"break", sim_cmd_break},
|
{"break", sim_cmd_break},
|
{"r", sim_cmd_r},
|
{"r", sim_cmd_r},
|
{"de", sim_cmd_de},
|
{"de", sim_cmd_de},
|
{"reset", sim_cmd_reset},
|
{"reset", sim_cmd_reset},
|
{"hist", sim_cmd_hist},
|
{"hist", sim_cmd_hist},
|
{"stall", sim_cmd_stall},
|
{"stall", sim_cmd_stall},
|
{"unstall", sim_cmd_unstall},
|
{"unstall", sim_cmd_unstall},
|
{"stats", sim_cmd_stats},
|
{"stats", sim_cmd_stats},
|
{"info", sim_cmd_info},
|
{"info", sim_cmd_info},
|
{"run", sim_cmd_run},
|
{"run", sim_cmd_run},
|
{"setdbch", sim_cmd_setdbch},
|
{"setdbch", sim_cmd_setdbch},
|
{"debug", sim_cmd_debug},
|
{"debug", sim_cmd_debug},
|
{"profile", sim_cmd_profile},
|
{"profile", sim_cmd_profile},
|
{"mprofile", sim_cmd_mprofile},
|
{"mprofile", sim_cmd_mprofile},
|
{"cuc", sim_cmd_cuc},
|
{"cuc", sim_cmd_cuc},
|
{"set", sim_cmd_set},
|
{"set", sim_cmd_set},
|
{NULL, NULL}
|
{NULL, NULL}
|
};
|
};
|
|
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
static void initialize_readline (void);
|
static void initialize_readline (void);
|
#endif
|
#endif
|
|
|
void
|
void
|
handle_sim_command (void)
|
handle_sim_command (void)
|
{
|
{
|
char *redirstr;
|
char *redirstr;
|
int argc;
|
int argc;
|
char *argv[5];
|
char *argv[5];
|
char *cur_arg;
|
char *cur_arg;
|
const struct sim_command *cur_cmd;
|
const struct sim_command *cur_cmd;
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
static char *prev_str = NULL;
|
static char *prev_str = NULL;
|
#else
|
#else
|
char b2[500];
|
char b2[500];
|
static char prev_str[500] = { 0 };
|
static char prev_str[500] = { 0 };
|
#endif
|
#endif
|
|
|
runtime.sim.iprompt_run = 1;
|
runtime.sim.iprompt_run = 1;
|
|
|
/* Make sure that check_insn_exec is not left hanging in the scheduler (and
|
/* Make sure that check_insn_exec is not left hanging in the scheduler (and
|
* breaking the sim when the user doesn't want it to break). */
|
* breaking the sim when the user doesn't want it to break). */
|
SCHED_FIND_REMOVE (check_insn_exec, NULL);
|
SCHED_FIND_REMOVE (check_insn_exec, NULL);
|
SCHED_FIND_REMOVE (print_insn_exec, NULL);
|
SCHED_FIND_REMOVE (print_insn_exec, NULL);
|
|
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
initialize_readline (); /* Bind our completer. */
|
initialize_readline (); /* Bind our completer. */
|
#endif
|
#endif
|
|
|
for (;;)
|
for (;;)
|
{
|
{
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
cur_arg = readline ("(sim) ");
|
cur_arg = readline ("(sim) ");
|
|
|
if (!cur_arg)
|
if (!cur_arg)
|
{
|
{
|
sim_done ();
|
sim_done ();
|
}
|
}
|
#else
|
#else
|
PRINTF ("(sim) ");
|
PRINTF ("(sim) ");
|
|
|
cur_arg = fgets (b2, sizeof (b2), stdin);
|
cur_arg = fgets (b2, sizeof (b2), stdin);
|
|
|
if (!cur_arg)
|
if (!cur_arg)
|
sim_done ();
|
sim_done ();
|
|
|
if (!*cur_arg)
|
if (!*cur_arg)
|
{
|
{
|
usleep (1000);
|
usleep (1000);
|
continue;
|
continue;
|
}
|
}
|
#endif
|
#endif
|
|
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
if (!*cur_arg)
|
if (!*cur_arg)
|
{
|
{
|
if (prev_str)
|
if (prev_str)
|
{
|
{
|
free (cur_arg);
|
free (cur_arg);
|
cur_arg = prev_str;
|
cur_arg = prev_str;
|
}
|
}
|
}
|
}
|
else
|
else
|
{
|
{
|
prev_str = cur_arg;
|
prev_str = cur_arg;
|
add_history (cur_arg);
|
add_history (cur_arg);
|
}
|
}
|
#else
|
#else
|
cur_arg = strip_space (cur_arg);
|
cur_arg = strip_space (cur_arg);
|
if (*cur_arg == '\n')
|
if (*cur_arg == '\n')
|
strcpy (cur_arg, prev_str);
|
strcpy (cur_arg, prev_str);
|
else
|
else
|
strcpy (prev_str, cur_arg);
|
strcpy (prev_str, cur_arg);
|
#endif
|
#endif
|
|
|
if ((redirstr = strchr (cur_arg, '>')))
|
if ((redirstr = strchr (cur_arg, '>')))
|
{
|
{
|
redirstr = strip_space (++redirstr);
|
redirstr = strip_space (++redirstr);
|
|
|
while (!isspace ((int)*redirstr) && *redirstr)
|
while (!isspace ((int)*redirstr) && *redirstr)
|
redirstr++;
|
redirstr++;
|
*redirstr = '\0';
|
*redirstr = '\0';
|
|
|
redirstr = strchr (cur_arg, '>');
|
redirstr = strchr (cur_arg, '>');
|
*redirstr = '\0';
|
*redirstr = '\0';
|
|
|
redirstr = strip_space (++redirstr);
|
redirstr = strip_space (++redirstr);
|
runtime.sim.fout = fopen (redirstr, "w+");
|
runtime.sim.fout = fopen (redirstr, "w+");
|
if (!runtime.sim.fout)
|
if (!runtime.sim.fout)
|
runtime.sim.fout = stdout;
|
runtime.sim.fout = stdout;
|
}
|
}
|
|
|
if (*cur_arg)
|
if (*cur_arg)
|
{
|
{
|
argc = 0;
|
argc = 0;
|
while (*cur_arg)
|
while (*cur_arg)
|
{
|
{
|
argv[argc] = cur_arg;
|
argv[argc] = cur_arg;
|
argc++;
|
argc++;
|
while (!isspace ((int)*cur_arg) && *cur_arg)
|
while (!isspace ((int)*cur_arg) && *cur_arg)
|
cur_arg++;
|
cur_arg++;
|
if (*cur_arg)
|
if (*cur_arg)
|
{
|
{
|
*cur_arg = '\0';
|
*cur_arg = '\0';
|
cur_arg = strip_space (cur_arg + 1);
|
cur_arg = strip_space (cur_arg + 1);
|
}
|
}
|
else
|
else
|
*cur_arg = '\0';
|
*cur_arg = '\0';
|
if (argc == 5)
|
if (argc == 5)
|
{
|
{
|
fprintf (stderr,
|
fprintf (stderr,
|
"Too many arguments given to command `%s'\n",
|
"Too many arguments given to command `%s'\n",
|
argv[0]);
|
argv[0]);
|
break;
|
break;
|
}
|
}
|
}
|
}
|
|
|
for (cur_cmd = sim_commands; cur_cmd->name; cur_cmd++)
|
for (cur_cmd = sim_commands; cur_cmd->name; cur_cmd++)
|
{
|
{
|
if (!strcmp (cur_cmd->name, argv[0]))
|
if (!strcmp (cur_cmd->name, argv[0]))
|
{
|
{
|
if (cur_cmd->cmd_handle (argc, argv))
|
if (cur_cmd->cmd_handle (argc, argv))
|
{
|
{
|
runtime.sim.iprompt = 0;
|
runtime.sim.iprompt = 0;
|
runtime.sim.iprompt_run = 0;
|
runtime.sim.iprompt_run = 0;
|
return;
|
return;
|
}
|
}
|
break;
|
break;
|
}
|
}
|
}
|
}
|
|
|
if (!cur_cmd->name)
|
if (!cur_cmd->name)
|
PRINTF ("%s: Unknown command.\n", argv[0]);
|
PRINTF ("%s: Unknown command.\n", argv[0]);
|
}
|
}
|
|
|
if (redirstr)
|
if (redirstr)
|
{
|
{
|
redirstr = NULL;
|
redirstr = NULL;
|
fclose (runtime.sim.fout);
|
fclose (runtime.sim.fout);
|
runtime.sim.fout = stdout;
|
runtime.sim.fout = stdout;
|
}
|
}
|
|
|
}
|
}
|
}
|
}
|
|
|
#ifdef HAVE_LIBREADLINE
|
#ifdef HAVE_LIBREADLINE
|
|
|
char *command_generator ();
|
char *command_generator ();
|
char **sim_completion ();
|
char **sim_completion ();
|
|
|
/* Tell the GNU readline library how to complete. We want to try to complete
|
/* Tell the GNU readline library how to complete. We want to try to complete
|
on command names if this is the first word in the line, or on filenames
|
on command names if this is the first word in the line, or on filenames
|
if not. */
|
if not. */
|
static void
|
static void
|
initialize_readline (void)
|
initialize_readline (void)
|
{
|
{
|
/* Allow conditional parsing of the ~/.inputrc file. */
|
/* Allow conditional parsing of the ~/.inputrc file. */
|
rl_readline_name = "or1ksim";
|
rl_readline_name = "or1ksim";
|
|
|
/* Tell the completer that we want a crack first. */
|
/* Tell the completer that we want a crack first. */
|
rl_attempted_completion_function = sim_completion;
|
rl_attempted_completion_function = sim_completion;
|
|
|
}
|
}
|
|
|
/* Attempt to complete on the contents of TEXT. START and END bound the
|
/* Attempt to complete on the contents of TEXT. START and END bound the
|
region of rl_line_buffer that contains the word to complete. TEXT is
|
region of rl_line_buffer that contains the word to complete. TEXT is
|
the word to complete. We can use the entire contents of rl_line_buffer
|
the word to complete. We can use the entire contents of rl_line_buffer
|
in case we want to do some simple parsing. Return the array of matches,
|
in case we want to do some simple parsing. Return the array of matches,
|
or NULL if there aren't any. */
|
or NULL if there aren't any. */
|
/* FIXME: Handle arguments to the `set' command */
|
/* FIXME: Handle arguments to the `set' command */
|
char **
|
char **
|
sim_completion (char *text, int start, int end)
|
sim_completion (char *text, int start, int end)
|
{
|
{
|
char **matches;
|
char **matches;
|
|
|
matches = NULL;
|
matches = NULL;
|
|
|
/* If this word is at the start of the line, then it is a command
|
/* If this word is at the start of the line, then it is a command
|
to complete. Otherwise it is the name of a file in the current
|
to complete. Otherwise it is the name of a file in the current
|
directory. */
|
directory. */
|
if (!start)
|
if (!start)
|
matches = rl_completion_matches (text, command_generator);
|
matches = rl_completion_matches (text, command_generator);
|
|
|
return matches;
|
return matches;
|
}
|
}
|
|
|
/* Generator function for command completion. STATE lets us know whether
|
/* Generator function for command completion. STATE lets us know whether
|
to start from scratch; without any state (i.e. STATE == 0), then we
|
to start from scratch; without any state (i.e. STATE == 0), then we
|
start at the top of the list. */
|
start at the top of the list. */
|
char *
|
char *
|
command_generator (char *text, int state)
|
command_generator (char *text, int state)
|
{
|
{
|
static int list_index, len;
|
static int list_index, len;
|
const char *name;
|
const char *name;
|
|
|
/* If this is a new word to complete, initialize now. This includes
|
/* If this is a new word to complete, initialize now. This includes
|
saving the length of TEXT for efficiency, and initializing the index
|
saving the length of TEXT for efficiency, and initializing the index
|
variable to 0. */
|
variable to 0. */
|
if (!state)
|
if (!state)
|
{
|
{
|
list_index = 0;
|
list_index = 0;
|
len = strlen (text);
|
len = strlen (text);
|
}
|
}
|
|
|
/* Return the next name which partially matches from the command list. */
|
/* Return the next name which partially matches from the command list. */
|
while ((name = sim_commands[list_index].name))
|
while ((name = sim_commands[list_index].name))
|
{
|
{
|
list_index++;
|
list_index++;
|
|
|
if (strncmp (name, text, len) == 0)
|
if (strncmp (name, text, len) == 0)
|
return strdup (name);
|
return strdup (name);
|
}
|
}
|
|
|
/* If no names matched, then return NULL. */
|
/* If no names matched, then return NULL. */
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
/* Repeats the last command. */
|
/* Repeats the last command. */
|
char *
|
char *
|
repeat_last_command ()
|
repeat_last_command ()
|
{
|
{
|
int offset = where_history ();
|
int offset = where_history ();
|
HIST_ENTRY *hist;
|
HIST_ENTRY *hist;
|
|
|
if ((hist = history_get (offset)))
|
if ((hist = history_get (offset)))
|
return strdup (hist->line);
|
return strdup (hist->line);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
#endif
|
#endif
|
|
|