# HG changeset patch
# User Michael Pavone <pavone@retrodev.com>
# Date 1660458294 25200
# Node ID 3d2cc2af1da3fa5b26404097fa5daacc53a16d31
# Parent  408fb8a7e990ff78f1976f0cb92af109873187bd
Add an m68k command for switching back to 68K debugger from Z80

diff -r 408fb8a7e990 -r 3d2cc2af1da3 debug.c
--- a/debug.c	Sat Aug 13 23:15:00 2022 -0700
+++ b/debug.c	Sat Aug 13 23:24:54 2022 -0700
@@ -2078,6 +2078,33 @@
 	return 1;
 }
 
+static uint8_t cmd_gen_m68k(debug_root *root, char *format, char *param)
+{
+	while (param && *param && isblank(*param))
+	{
+		++param;
+	}
+	genesis_context *gen = (genesis_context *)current_system;
+	
+	if (param && *param && !isspace(*param)) {
+		parsed_command cmd;
+		debug_root *m68k_root = find_m68k_root(gen->m68k);
+		if (!m68k_root) {
+			fputs("Failed to get debug root for M68K\n", stderr);
+			return 1;
+		}
+		if (!parse_command(m68k_root, param, &cmd)) {
+			return 1;
+		}
+		uint8_t ret = run_command(m68k_root, &cmd);
+		free_parsed_command(&cmd);
+		return ret;
+	} else {
+		gen->header.enter_debugger = 1;
+		return 0;
+	}
+}
+
 command_def z80_commands[] = {
 	{
 		.names = (const char *[]){
@@ -2153,6 +2180,21 @@
 
 #define NUM_Z80 (sizeof(z80_commands)/sizeof(*z80_commands))
 
+command_def gen_z80_commands[] = {
+	{
+		.names = (const char *[]){
+			"m68k", NULL
+		},
+		.usage = "m68k [COMMAND]",
+		.desc = "Run a M68K debugger command or switch to M68K context when no command is given",
+		.raw_impl = cmd_gen_m68k,
+		.min_args = 0,
+		.max_args = -1
+	}
+};
+
+#define NUM_GEN_Z80 (sizeof(gen_z80_commands)/sizeof(*gen_z80_commands))
+
 #endif
 
 void add_commands(debug_root *root, command_def *defs, uint32_t num_commands)
@@ -2679,6 +2721,9 @@
 	if (root && !root->commands) {
 		add_commands(root, common_commands, NUM_COMMON);
 		add_commands(root, z80_commands, NUM_Z80);
+		if (current_system->type == SYSTEM_GENESIS || current_system->type == SYSTEM_SEGACD) {
+			add_commands(root, gen_z80_commands, NUM_GEN_Z80);
+		}
 		root->read_mem = read_z80;
 		root->write_mem = write_z80;
 		root->set = set_z80;