interesting
/
riscv-openocd
mirror of https://github.com/riscv/riscv-openocd.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

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 compatibility reasons.

Change-Id: I436bd60779a107120c9e1b1f0b8a69a39a240ad4
Signed-off-by: Marc Schink <dev@zapb.de>
Reviewed-on: https://review.openocd.org/c/openocd/+/8514
Reviewed-by: Antonio Borneo <borneo.antonio@gmail.com>
Tested-by: jenkins
This commit is contained in:
Marc Schink 2024-08-30 10:47:55 +02:00 committed by Antonio Borneo
parent 99f60d5e59
commit f4d81cd4d4
4 changed files with 42 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
tcl/interface/parport.cfg
View File

@ -5,17 +5,6 @@
# #
# Addresses: 0x378/LPT1 or 0x278/LPT2 ... # Addresses: 0x378/LPT1 or 0x278/LPT2 ...
# #
echo "DEPRECATED: use interface/parport/wiggler.cfg instead of deprecated interface/parport.cfg"
if { [info exists PARPORTADDR] } { source [find interface/parport/wiggler.cfg]
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

17
tcl/interface/parport/dlc5.cfg Normal file
View File

@ -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

21
tcl/interface/parport/wiggler.cfg Normal file
View File

@ -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

11
tcl/interface/parport_dlc5.cfg
View File

@ -5,13 +5,6 @@
# #
# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html # 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] } { source [find interface/parport/dlc5.cfg]
set _PARPORTADDR $PARPORTADDR
} else {
set _PARPORTADDR 0
}
adapter driver parport
parport port $_PARPORTADDR
parport cable dlc5