Firebee/m68k-bdm
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

initial push

Browse Source
This commit is contained in:
Bernd Mueller
2026-06-17 13:44:30 +02:00
commit adfd70813f
372 changed files with 146450 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1544
gdb/patches/gdb-4.18-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

1970
gdb/patches/gdb-5.0-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

2016
gdb/patches/gdb-5.2.1-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

2043
gdb/patches/gdb-5.3-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

2044
gdb/patches/gdb-6.0-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

2204
gdb/patches/gdb-6.1-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

2504
gdb/patches/gdb-6.3-bdm-m68k.patch Normal file
View File

File diff suppressed because it is too large Load Diff

55
gdb/patches/insight-5.0.patch Normal file
View File

@@ -0,0 +1,55 @@
diff -urN insight-5.0.orig/gdb/gdbtk/library/targetselection.itb insight-5.0/gdb/gdbtk/library/targetselection.itb
--- insight-5.0.orig/gdb/gdbtk/library/targetselection.itb Fri Feb 2 17:34:20 2001
+++ insight-5.0/gdb/gdbtk/library/targetselection.itb Fri Feb 2 23:07:22 2001
@@ -104,6 +104,20 @@
set gdb_target(remotetcp,runlist) {1 1 0 1}
set gdb_target(remotetcp,after_attaching) {}
+ # BDM
+ set gdb_target(bdm,pretty-name) "BDM/Direct"
+ set gdb_target(bdm,defbaud) "DIRECT"
+ set gdb_target(bdm,baud-rates) {}
+ set gdb_target(bdm,cmd) "bdm /dev/bdmcf0"
+ set gdb_target(bdm,runlist) {1 1 0 1}
+ set gdb_target(bdm,after_attaching) { setup-and-load }
+ set gdb_target(bdmtcp,pretty-name) "BDM/TCP"
+ set gdb_target(bdmtcp,defbaud) "TCP"
+ set gdb_target(bdmtcp,baud-rates) {}
+ set gdb_target(bdmtcp,cmd) "BDM tcpX"
+ set gdb_target(bdmtcp,runlist) {1 1 0 1}
+ set gdb_target(bdmtcp,after_attaching) { setup-and-load }
+
# ARM Angel
set gdb_target(rdi,pretty-name) "ARM Angel/Serial"
set gdb_target(rdi,defbaud) "9600"
@@ -627,7 +641,20 @@
pref define gdb/load/$t-verbose [pref get gdb/load/verbose]
$f.fr.verb config -variable [pref varname gdb/load/$t-verbose]
# Map the correct entries and comboboxes onto the screen
- if {$gdb_target($t,defbaud) == "TCP"} {
+ if {$gdb_target($t,defbaud) == "DIRECT"} {
+ # we have a direct device target
+ # map device
+ if {$mapped1 != "$fr.host"} {
+ grid forget $mapped1
+ set mapped1 $fr.host
+ grid $mapped1 -row 1 -column 1 -sticky w -padx 5 -pady 5
+ }
+ $fr.cbl configure -text "Device:"
+ $fr.host config -textvariable [pref varname gdb/load/$t-device]
+
+ $mapped1 configure -state normal
+# $mapped2 configure -state normal
+ } elseif {$gdb_target($t,defbaud) == "TCP"} {
# we have a tcp target
# map host and porte
if {$mapped1 != "$fr.host"} {
@@ -769,7 +796,7 @@
# ------------------------------------------------------------------
body TargetSelection::change_baud {w {baud ""}} {
if {$baud != ""} {
- if {[string compare $baud "TCP"] != 0} {
+ if {[string compare $baud "TCP"] != 0 && [string compare $baud "DIRECT"] != 0} {
gdb_cmd "set remotebaud $baud"
if {[catch {gdb_cmd "show remotebaud"} res]} {
set newbaud 0

56
gdb/patches/insight-5.2.1.patch Normal file
View File

@@ -0,0 +1,56 @@
diff -urN insight-5.2.1.orig/gdb/gdbtk/library/targetselection.itb insight-5.2.1/gdb/gdbtk/library/targetselection.itb
--- insight-5.2.1.orig/gdb/gdbtk/library/targetselection.itb 2002-02-12 21:05:14.000000000 +0100
+++ insight-5.2.1/gdb/gdbtk/library/targetselection.itb 2003-06-14 00:48:01.000000000 +0200
@@ -104,6 +104,20 @@
set gdb_target(remotetcp,runlist) {1 1 0 1}
set gdb_target(remotetcp,after_attaching) {}
+ # BDM
+ set gdb_target(bdm,pretty-name) "BDM/Direct"
+ set gdb_target(bdm,defbaud) "DIRECT"
+ set gdb_target(bdm,baud-rates) {}
+ set gdb_target(bdm,cmd) "bdm /dev/bdmcf0"
+ set gdb_target(bdm,runlist) {1 1 0 1}
+ set gdb_target(bdm,after_attaching) { setup-and-load }
+ set gdb_target(bdmtcp,pretty-name) "BDM/TCP"
+ set gdb_target(bdmtcp,defbaud) "TCP"
+ set gdb_target(bdmtcp,baud-rates) {}
+ set gdb_target(bdmtcp,cmd) "BDM tcpX"
+ set gdb_target(bdmtcp,runlist) {1 1 0 1}
+ set gdb_target(bdmtcp,after_attaching) { setup-and-load }
+
# ARM Angel
set gdb_target(rdi,pretty-name) "ARM Angel/Serial"
set gdb_target(rdi,defbaud) "9600"
@@ -681,7 +695,20 @@
pref define gdb/load/$t-verbose [pref get gdb/load/verbose]
$f.fr.verb config -variable [pref varname gdb/load/$t-verbose]
# Map the correct entries and comboboxes onto the screen
- if {$gdb_target($t,defbaud) == "TCP"} {
+ if {$gdb_target($t,defbaud) == "DIRECT"} {
+ # we have a direct device target
+ # map device
+ if {$mapped1 != "$fr.host"} {
+ grid forget $mapped1
+ set mapped1 $fr.host
+ grid $mapped1 -row 1 -column 1 -sticky w -padx 5 -pady 5
+ }
+ $fr.cbl configure -text "Device:"
+ $fr.host config -textvariable [pref varname gdb/load/$t-device]
+
+ $mapped1 configure -state normal
+# $mapped2 configure -state normal
+ } elseif {$gdb_target($t,defbaud) == "TCP"} {
# we have a tcp target
# map host and porte
if {$mapped1 != "$fr.host"} {
@@ -833,7 +860,8 @@
body TargetSelection::change_baud {w {baud ""}} {
if {$baud != ""} {
if {([string compare $baud "TCP"] != 0)
- && ([string compare $baud "ETH"] != 0)} {
+ && ([string compare $baud "ETH"] != 0)
+ && ([string compare $baud "DIRECT"] != 0)} {
gdb_cmd "set remotebaud $baud"
if {[catch {gdb_cmd "show remotebaud"} res]} {
set newbaud 0

79
gdb/patches/insight-5.3.patch Normal file
View File

@@ -0,0 +1,79 @@
diff -urN insight-5.3.orig/gdb/gdbtk/library/targetselection.itb insight-5.3/gdb/gdbtk/library/targetselection.itb
--- insight-5.3.orig/gdb/gdbtk/library/targetselection.itb 2002-02-12 21:05:14.000000000 +0100
+++ insight-5.3/gdb/gdbtk/library/targetselection.itb 2003-06-14 00:48:01.000000000 +0200
@@ -104,6 +104,20 @@
set gdb_target(remotetcp,runlist) {1 1 0 1}
set gdb_target(remotetcp,after_attaching) {}
+ # BDM
+ set gdb_target(bdm,pretty-name) "BDM/Direct"
+ set gdb_target(bdm,defbaud) "DIRECT"
+ set gdb_target(bdm,baud-rates) {}
+ set gdb_target(bdm,cmd) "bdm /dev/bdmcf0"
+ set gdb_target(bdm,runlist) {1 1 0 1}
+ set gdb_target(bdm,after_attaching) { setup-and-load }
+ set gdb_target(bdmtcp,pretty-name) "BDM/TCP"
+ set gdb_target(bdmtcp,defbaud) "TCP"
+ set gdb_target(bdmtcp,baud-rates) {}
+ set gdb_target(bdmtcp,cmd) "BDM tcpX"
+ set gdb_target(bdmtcp,runlist) {1 1 0 1}
+ set gdb_target(bdmtcp,after_attaching) { setup-and-load }
+
# ARM Angel
set gdb_target(rdi,pretty-name) "ARM Angel/Serial"
set gdb_target(rdi,defbaud) "9600"
@@ -681,7 +695,20 @@
pref define gdb/load/$t-verbose [pref get gdb/load/verbose]
$f.fr.verb config -variable [pref varname gdb/load/$t-verbose]
# Map the correct entries and comboboxes onto the screen
- if {$gdb_target($t,defbaud) == "TCP"} {
+ if {$gdb_target($t,defbaud) == "DIRECT"} {
+ # we have a direct device target
+ # map device
+ if {$mapped1 != "$fr.host"} {
+ grid forget $mapped1
+ set mapped1 $fr.host
+ grid $mapped1 -row 1 -column 1 -sticky w -padx 5 -pady 5
+ }
+ $fr.cbl configure -text "Device:"
+ $fr.host config -textvariable [pref varname gdb/load/$t-device]
+
+ $mapped1 configure -state normal
+# $mapped2 configure -state normal
+ } elseif {$gdb_target($t,defbaud) == "TCP"} {
# we have a tcp target
# map host and porte
if {$mapped1 != "$fr.host"} {
@@ -833,7 +860,8 @@
body TargetSelection::change_baud {w {baud ""}} {
if {$baud != ""} {
if {([string compare $baud "TCP"] != 0)
- && ([string compare $baud "ETH"] != 0)} {
+ && ([string compare $baud "ETH"] != 0)
+ && ([string compare $baud "DIRECT"] != 0)} {
gdb_cmd "set remotebaud $baud"
if {[catch {gdb_cmd "show remotebaud"} res]} {
set newbaud 0
diff -Nur insight-5.3.orig/gdb/gdbtk/generic/gdbtk-hooks.c insight-5.3/gdb/gdbtk/generic/gdbtk-hooks.c
--- insight-5.3.orig/gdb/gdbtk/generic/gdbtk-hooks.c 2002-07-03 19:38:22.000000000 +0200
+++ insight-5.3/gdb/gdbtk/generic/gdbtk-hooks.c 2003-09-05 14:02:42.000000000 +0200
@@ -518,6 +518,10 @@
gdbtk_call_command (struct cmd_list_element *cmdblk,
char *arg, int from_tty)
{
+ struct cleanup *old_chain;
+
+ old_chain = make_cleanup (null_cleanup, 0);
+
running_now = 0;
if (cmdblk->class == class_run || cmdblk->class == class_trace)
{
@@ -532,6 +536,8 @@
}
else
cmd_func (cmdblk, arg, from_tty);
+
+ do_cleanups (old_chain);
}
/* Called after a `set' command succeeds. Runs the Tcl hook

56
gdb/patches/insight-6.0.patch Normal file
View File

@@ -0,0 +1,56 @@
diff -Nru insight-5.3.92.orig/gdb/gdbtk/library/targetselection.itb insight-5.3.92/gdb/gdbtk/library/targetselection.itb
--- insight-5.3.92.orig/gdb/gdbtk/library/targetselection.itb 2003-02-04 09:03:09.000000000 +0100
+++ insight-5.3.92/gdb/gdbtk/library/targetselection.itb 2003-09-21 13:12:41.000000000 +0200
@@ -104,6 +104,20 @@
set gdb_target(remotetcp,runlist) {1 1 0 1}
set gdb_target(remotetcp,after_attaching) {}
+ # BDM
+ set gdb_target(bdm,pretty-name) "BDM/Direct"
+ set gdb_target(bdm,defbaud) "DIRECT"
+ set gdb_target(bdm,baud-rates) {}
+ set gdb_target(bdm,cmd) "bdm /dev/bdmcf0"
+ set gdb_target(bdm,runlist) {1 1 0 1}
+ set gdb_target(bdm,after_attaching) { setup-and-load }
+ set gdb_target(bdmtcp,pretty-name) "BDM/TCP"
+ set gdb_target(bdmtcp,defbaud) "TCP"
+ set gdb_target(bdmtcp,baud-rates) {}
+ set gdb_target(bdmtcp,cmd) "BDM tcpX"
+ set gdb_target(bdmtcp,runlist) {1 1 0 1}
+ set gdb_target(bdmtcp,after_attaching) { setup-and-load }
+
# ARM Angel
set gdb_target(rdi,pretty-name) "ARM Angel/Serial"
set gdb_target(rdi,defbaud) "9600"
@@ -694,7 +708,20 @@
pref define gdb/load/$t-verbose [pref get gdb/load/verbose]
$f.fr.verb config -variable [pref varname gdb/load/$t-verbose]
# Map the correct entries and comboboxes onto the screen
- if {$gdb_target($t,defbaud) == "TCP"} {
+ if {$gdb_target($t,defbaud) == "DIRECT"} {
+ # we have a direct device target
+ # map device
+ if {$mapped1 != "$fr.host"} {
+ grid forget $mapped1
+ set mapped1 $fr.host
+ grid $mapped1 -row 1 -column 1 -sticky w -padx 5 -pady 5
+ }
+ $fr.cbl configure -text "Device:"
+ $fr.host config -textvariable [pref varname gdb/load/$t-device]
+
+ $mapped1 configure -state normal
+# $mapped2 configure -state normal
+ } elseif {$gdb_target($t,defbaud) == "TCP"} {
# we have a tcp target
# map host and porte
if {$mapped1 != "$fr.host"} {
@@ -846,7 +873,8 @@
itcl::body TargetSelection::change_baud {w {baud ""}} {
if {$baud != ""} {
if {([string compare $baud "TCP"] != 0)
- && ([string compare $baud "ETH"] != 0)} {
+ && ([string compare $baud "ETH"] != 0)
+ && ([string compare $baud "DIRECT"] != 0)} {
gdb_cmd "set remotebaud $baud"
if {[catch {gdb_cmd "show remotebaud"} res]} {
set newbaud 0