OpenOCD 多适配器类型配置

Posted 2023-02-14

【中文标题】OpenOCD 多适配器类型配置

【英文标题】：OpenOCD multiadapter type configuration

【发布时间】：2021-05-06 09:40:59

【问题描述】：

我们团队中的一些开发人员使用 J-Link 调试器，而其他开发人员则使用 ST-Link 调试器。我们所有人都在使用相同固件的相同硬件上工作，基本上其他一切都是一样的。当前设置需要为每个适配器使用不同的 cfg 文件启动 OpenOCD。我想自动完成。

有没有办法将 OpenOCD 配置为根据连接的适配器自动选择正确的 cfg 文件？

【问题讨论】：

你是在 Windows 还是 Linux 上开发？

我们正在 Windows 上开发。但是 OpenOCD 是否可以配置为检测连接的调试器并不重要

我认为它不能，这就是我问的原因，因为我更想像jeb 所建议的那样检查存在哪个适配器的包装器命令。

【参考方案1】：

我不知道 OpenOCD 是否可以做到这一点（我不认为它可以），但是由于您使用的是Windows，您可以只使用一个用VBScript 编写的小包装器来检测可用的探针，并根据检测到的探测器启动不同的命令：

openocd.vbs:

' STLink: 
' idVendor:                        0x0483 = STMicroelectronics
' idProduct:                       0x3748
Dim strStlink
Dim stlinkPresent
Dim strStlinkCommand
strStlink = "VID_0483&PID_3748"
stlinkPresent=0
strStlinkCommand="cmd.exe /c D:\opt\openocd\0.10.0-14\stm32f103c8_blue_pill_stlink.cmd"

' Segger JLink'
' idVendor:                        0x1366 = SEGGER Microcontroller Systems GmbH
' idProduct:                       0x0101
Dim strJlink
Dim jlinkPresent
Dim strJlinkCommand
strJlink="VID_1366&PID_0101"
jlinkPresent=0
strJlinkCommand="cmd.exe /c D:\opt\openocd\0.10.0-14\stm32f103c8_blue_pill_jlink.cmd"

' Credits:
' https://***.com/questions/3331043/get-list-of-connected-usb-devices
strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") 
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_PnPEntity",,48) 
For Each objItem in colItems 
 '   Wscript.Echo "-----------------------------------"
 '   Wscript.Echo "Win32_PnPEntity instance"
 '   Wscript.Echo "-----------------------------------"
'    Wscript.Echo "DeviceID: " & objItem.DeviceID
    If InStr(objItem.DeviceID, strStlink) Then
      WScript.Echo("Found STLink Device")
      stlinkPresent=1
    End If

    If InStr(objItem.DeviceID, strJlink) Then
      WScript.Echo("Found JLink Device")
      jlinkPresent=1
    End If
Next

If (jlinkPresent=1 And stlinkPresent=1) Then
    WScript.Echo("Found both JLink and STLink devices - terminating.")
    WScript.Quit(1)
End If

If (jlinkPresent=0 And stlinkPresent=0) Then
    WScript.Echo("No JLink/STLink devices were found - terminating.")
    WScript.Quit(2)
End If

Set WshShell = WScript.CreateObject("WScript.Shell")

If (stlinkPresent=1) Then
    WshShell.Run strStlinkCommand, 1, false
End If

If (jlinkPresent=1) Then
    WshShell.Run strJlinkCommand, 1, false
End If

用法：

cscript.exe openocd.vbs

您必须根据需要调整 strStlinkCommand 和 strJlinkCommand 变量的内容。

您当然可以从批处理过程中调用它：

launch-openocd.cmd:

@cscript.exe openocd.vbs

在Windows 10 version 20H2 19042.746测试

【参考方案2】：

使用 linux，您可以使用 USB-VendorID/ProductID 来选择配置文件。

您可以通过类似的 shell 脚本启动

if lsusb | grep 1366:1015 > /dev/null; then 
  config=j-link.conf
else
  config=st-link.conf
fi
openocd -f $config