This is an automated email from Gerrit.
"zapb <d...@zapb.de>" just uploaded a new patch set to Gerrit, which you can
find at https://review.openocd.org/c/openocd/+/8514
-- gerrit
commit 211ac8e6fa5943c5c8a59421990826cc238d68b8
Author: Marc Schink <d...@zapb.de>
Date: Fri Aug 30 10:47:55 2024 +0200
tcl/interface: Restructure parport config files
Provide cable specific configuration files like for the FTDI interface.
Depcrecate the old configuration files but keep them until the next release
for
compability reasons.
Change-Id: I436bd60779a107120c9e1b1f0b8a69a39a240ad4
Signed-off-by: Marc Schink <d...@zapb.de>
diff --git a/tcl/interface/parport.cfg b/tcl/interface/parport.cfg
index b9fceeb852..8fb1c148b2 100644
--- a/tcl/interface/parport.cfg
+++ b/tcl/interface/parport.cfg
@@ -5,17 +5,6 @@
#
# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
#
+echo "DEPRECATED: use interface/parport/wiggler.cfg instead of deprecated
interface/parport.cfg"
-if { [info exists PARPORTADDR] } {
- set _PARPORTADDR $PARPORTADDR
-} else {
- if {$tcl_platform(platform) eq "windows"} {
- set _PARPORTADDR 0x378
- } {
- set _PARPORTADDR 0
- }
-}
-
-adapter driver parport
-parport port $_PARPORTADDR
-parport cable wiggler
+source [find interface/parport/wiggler.cfg]
diff --git a/tcl/interface/parport/dlc5.cfg b/tcl/interface/parport/dlc5.cfg
new file mode 100644
index 0000000000..24acea7a95
--- /dev/null
+++ b/tcl/interface/parport/dlc5.cfg
@@ -0,0 +1,17 @@
+# SPDX-License-Identifier: GPL-2.0-or-later
+
+#
+# Xilinx Parallel Cable III 'DLC 5' (and various clones)
+#
+# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html
+#
+
+if { [info exists PARPORTADDR] } {
+ set _PARPORTADDR $PARPORTADDR
+} else {
+ set _PARPORTADDR 0
+}
+
+adapter driver parport
+parport port $_PARPORTADDR
+parport cable dlc5
diff --git a/tcl/interface/parport/wiggler.cfg
b/tcl/interface/parport/wiggler.cfg
new file mode 100644
index 0000000000..b9fceeb852
--- /dev/null
+++ b/tcl/interface/parport/wiggler.cfg
@@ -0,0 +1,21 @@
+# SPDX-License-Identifier: GPL-2.0-or-later
+
+#
+# Parallel port wiggler (many clones available) on port 0x378
+#
+# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
+#
+
+if { [info exists PARPORTADDR] } {
+ set _PARPORTADDR $PARPORTADDR
+} else {
+ if {$tcl_platform(platform) eq "windows"} {
+ set _PARPORTADDR 0x378
+ } {
+ set _PARPORTADDR 0
+ }
+}
+
+adapter driver parport
+parport port $_PARPORTADDR
+parport cable wiggler
diff --git a/tcl/interface/parport_dlc5.cfg b/tcl/interface/parport_dlc5.cfg
index 24acea7a95..83f3b56c48 100644
--- a/tcl/interface/parport_dlc5.cfg
+++ b/tcl/interface/parport_dlc5.cfg
@@ -5,13 +5,6 @@
#
# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html
#
+echo "DEPRECATED: use interface/parport/dlc5.cfg instead of deprecated
interface/parport_dlc5.cfg"
-if { [info exists PARPORTADDR] } {
- set _PARPORTADDR $PARPORTADDR
-} else {
- set _PARPORTADDR 0
-}
-
-adapter driver parport
-parport port $_PARPORTADDR
-parport cable dlc5
+source [find interface/parport/dlc5.cfg]
--
