This is an automated email from Gerrit.

Moritz Fischer ([email protected]) just uploaded a new patch set to Gerrit, 
which you can find at http://openocd.zylin.com/5314

-- gerrit

commit fd98bec974dadb55fd090f167ca776cee0938626
Author: Moritz Fischer <[email protected]>
Date:   Thu Oct 3 20:25:26 2019 -0700

    jtag: drivers: xlnx-pcie-xvc: Add support for Xilinx XVC/PCIe controller
    
    Add support for Xilinx Virtual Cable over PCIe JTAG controller.
    It is commonly used in Xilinx based PCI Express designs with JTAG IP in
    the FPGA fabric.
    
    Access to the JTAG registers happens via the extended configuration space.
    
    This can be used to debug soft-cores instantiated in the FPGA fabric.
    
    Change-Id: Ib12ede0d1f26dacfda808d5e05b947b640c5bde7
    Signed-off-by: Moritz Fischer <[email protected]>

diff --git a/configure.ac b/configure.ac
index b84e3e8..381be06 100644
--- a/configure.ac
+++ b/configure.ac
@@ -142,6 +142,9 @@ m4_define([LIBFTDI_ADAPTERS],
 m4_define([LIBJAYLINK_ADAPTERS],
        [[[jlink], [SEGGER J-Link Programmer], [JLINK]]])
 
+m4_define([PCIE_ADAPTERS],
+       [[[xlnx_pcie_xvc], [Xilinx XVC/PCIe], [XLNX_PCIE_XVC]]])
+
 
 AC_ARG_ENABLE([doxygen-html],
   AS_HELP_STRING([--disable-doxygen-html],
@@ -315,12 +318,20 @@ AC_ARG_ENABLE([sysfsgpio],
   AS_HELP_STRING([--enable-sysfsgpio], [Enable building support for 
programming driven via sysfs gpios.]),
   [build_sysfsgpio=$enableval], [build_sysfsgpio=no])
 
+AC_ARG_ENABLE([xlnx_pcie_xvc],
+  AS_HELP_STRING([--enable-xlnx-pcie-xvc], [Enable building support for Xilinx 
XVC/PCIe.]),
+  [build_xlnx_pcie_xvc=$enableval], [build_xlnx_pcie_xvc=yes])
+
 AS_CASE([$host_os],
   [linux*], [],
   [
     AS_IF([test "x$build_sysfsgpio" = "xyes"], [
       AC_MSG_ERROR([sysfsgpio is only available on linux])
     ])
+
+    AS_IF([test "x$build_xlnx_pcie_xvc" = "xyes"], [
+      AC_MSG_ERROR([xlnx_pcie_xvc is only availabe on linux])
+    ])
 ])
 
 AC_ARG_ENABLE([minidriver_dummy],
@@ -580,6 +591,13 @@ AS_IF([test "x$build_sysfsgpio" = "xyes"], [
   AC_DEFINE([BUILD_SYSFSGPIO], [0], [0 if you don't want SysfsGPIO driver.])
 ])
 
+AS_IF([test "x$build_xlnx_pcie_xvc" = "xyes"], [
+  build_xlnx_pcie_xvc=yes
+  AC_DEFINE([BUILD_XLNX_PCIE_XVC], [1], [1 if you want the Xilinx XVC/PCIe 
driver.])
+], [
+  AC_DEFINE([BUILD_XLNX_PCIE_XVC], [0], [0 if you don't want Xilinx XVC/PCIe 
driver.])
+])
+
 AS_IF([test "x$build_target64" = "xyes"], [
   AC_DEFINE([BUILD_TARGET64], [1], [1 if you want 64-bit addresses.])
 ], [
@@ -699,6 +717,7 @@ AM_CONDITIONAL([OOCD_TRACE], [test "x$build_oocd_trace" = 
"xyes"])
 AM_CONDITIONAL([REMOTE_BITBANG], [test "x$build_remote_bitbang" = "xyes"])
 AM_CONDITIONAL([BUSPIRATE], [test "x$build_buspirate" = "xyes"])
 AM_CONDITIONAL([SYSFSGPIO], [test "x$build_sysfsgpio" = "xyes"])
+AM_CONDITIONAL([XLNX_PCIE_XVC], [test "x$build_xlnx_pcie_xvc" = "xyes"])
 AM_CONDITIONAL([USE_LIBUSB0], [test "x$use_libusb0" = "xyes"])
 AM_CONDITIONAL([USE_LIBUSB1], [test "x$use_libusb1" = "xyes"])
 AM_CONDITIONAL([IS_CYGWIN], [test "x$is_cygwin" = "xyes"])
@@ -778,7 +797,7 @@ echo OpenOCD configuration summary
 echo --------------------------------------------------
 m4_foreach([adapter], [USB1_ADAPTERS, USB_ADAPTERS, USB0_ADAPTERS,
        HIDAPI_ADAPTERS, HIDAPI_USB1_ADAPTERS, LIBFTDI_ADAPTERS,
-       LIBJAYLINK_ADAPTERS],
+       LIBJAYLINK_ADAPTERS, PCIE_ADAPTERS],
        [s=m4_format(["%-40s"], ADAPTER_DESC([adapter]))
        AS_CASE([$ADAPTER_VAR([adapter])],
                [auto], [
diff --git a/doc/openocd.texi b/doc/openocd.texi
index c5a926c..8b182e5 100644
--- a/doc/openocd.texi
+++ b/doc/openocd.texi
@@ -3104,6 +3104,17 @@ opendous-jtag is a freely programmable USB adapter.
 This is the Keil ULINK v1 JTAG debugger.
 @end deffn
 
+@deffn {Interface Driver} {xlnx_pcie_xvc}
+This driver supports the Xilinx Xilinx Virtual Cable (XVC) over PCI Express.
+It is commonly found in Xilinx based PCI express designs. It allows debugging
+fabric based JTAG devices such as Cortex-M1/M3 microcontrollers. Access to 
this is
+exposed via extended capability registers in the PCIe configuration space.
+
+@deffn {Config Command} {xlnx_pcie_xvc_config} device
+Specifies the PCI express device via parameter @var{device} to use.
+@end deffn
+@end deffn
+
 @deffn {Interface Driver} {ZY1000}
 This is the Zylin ZY1000 JTAG debugger.
 @end deffn
diff --git a/src/jtag/drivers/Makefile.am b/src/jtag/drivers/Makefile.am
index 572cd24..7fbcd58 100644
--- a/src/jtag/drivers/Makefile.am
+++ b/src/jtag/drivers/Makefile.am
@@ -145,6 +145,9 @@ endif
 if SYSFSGPIO
 DRIVERFILES += %D%/sysfsgpio.c
 endif
+if XLNX_PCIE_XVC
+DRIVERFILES += %D%/xlnx-pcie-xvc.c
+endif
 if BCM2835GPIO
 DRIVERFILES += %D%/bcm2835gpio.c
 endif
diff --git a/src/jtag/drivers/xlnx-pcie-xvc.c b/src/jtag/drivers/xlnx-pcie-xvc.c
new file mode 100644
index 0000000..c772a45
--- /dev/null
+++ b/src/jtag/drivers/xlnx-pcie-xvc.c
@@ -0,0 +1,403 @@
+/*
+ * SPDX-License-Identifier: GPL-2.0
+ *
+ * Copyright (c) 2019 Google LLC.
+ * Author: Moritz Fischer <[email protected]>
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <stdint.h>
+#include <stdlib.h>
+#include <math.h>
+#include <unistd.h>
+#include <linux/pci.h>
+
+#include <jtag/interface.h>
+#include <jtag/swd.h>
+#include <jtag/commands.h>
+#include <helper/replacements.h>
+#include <helper/bits.h>
+
+#define PCIE_EXT_CAP_LST       0x100
+
+#define XLNX_XVC_EXT_CAP       0x00
+#define XLNX_XVC_VSEC_HDR      0x04
+#define XLNX_XVC_VERSION       0x08
+#define XLNX_XVC_LEN_REG       0x0C
+#define XLNX_XVC_TMS_REG       0x10
+#define XLNX_XVC_TDx_REG       0x14
+#define XLNX_XVC_STS_REG       0x1c
+
+#define XLNX_XVC_CAP_SIZE      0x20
+#define XLNX_XVC_VSEC_ID       0x8
+#define XLNX_XVC_MAX_BITS      0x20
+
+struct xlnx_pcie_xvc {
+       int fd;
+       int offset;
+       char *device;
+};
+
+static struct xlnx_pcie_xvc xlnx_pcie_xvc_state;
+static struct xlnx_pcie_xvc *xlnx_pcie_xvc = &xlnx_pcie_xvc_state;
+
+static uint32_t xlnx_pcie_xvc_read_reg(const int offset)
+{
+       uint32_t res;
+       int ret;
+
+       ret = pread(xlnx_pcie_xvc->fd, &res, sizeof(res),
+                   xlnx_pcie_xvc->offset + offset);
+       if (ret < 4)
+               LOG_ERROR("Failed to read offset %x", offset);
+
+       return res;
+}
+
+static void xlnx_pcie_xvc_write_reg(const int offset, const uint32_t val)
+{
+       int ret;
+
+       ret = pwrite(xlnx_pcie_xvc->fd, &val, sizeof(val),
+                    xlnx_pcie_xvc->offset + offset);
+       if (ret < 4)
+               LOG_ERROR("Failed to write offset: %x with value: %x",
+                         offset, val);
+}
+
+static void xlnx_pcie_xvc_transact(size_t num_bits, uint32_t tms, uint32_t tdi,
+                                  uint32_t *tdo)
+{
+       xlnx_pcie_xvc_write_reg(XLNX_XVC_LEN_REG, num_bits);
+       xlnx_pcie_xvc_write_reg(XLNX_XVC_TMS_REG, tms);
+       xlnx_pcie_xvc_write_reg(XLNX_XVC_TDx_REG, tdi);
+       if (tdo) {
+               *tdo = xlnx_pcie_xvc_read_reg(XLNX_XVC_TDx_REG);
+               LOG_DEBUG_IO("Transact num_bits: %zu, tms: %x, tdi: %x, tdo: 
%x",
+                            num_bits, tms, tdi, *tdo);
+       } else {
+               (void)xlnx_pcie_xvc_read_reg(XLNX_XVC_TDx_REG);
+               LOG_DEBUG("Transact num_bits: %zu, tms: %x, tdi: %x, tdo: 
<null>",
+                         num_bits, tms, tdi);
+       }
+}
+
+void xlnx_pcie_xvc_execute_stableclocks(struct jtag_command *cmd)
+{
+       int tms = tap_get_state() == TAP_RESET ? 1 : 0;
+       size_t left = cmd->cmd.stableclocks->num_cycles;
+       size_t write;
+
+       LOG_DEBUG("stableclocks %i cycles", cmd->cmd.runtest->num_cycles);
+
+       while (left) {
+               write = MIN(XLNX_XVC_MAX_BITS, left);
+               xlnx_pcie_xvc_transact(write, tms, 0, NULL);
+               left -= write;
+       };
+}
+
+static void xlnx_pcie_xvc_execute_statemove(size_t skip)
+{
+       uint8_t tms_scan = tap_get_tms_path(tap_get_state(),
+                                           tap_get_end_state());
+       int tms_count = tap_get_tms_path_len(tap_get_state(),
+                                            tap_get_end_state());
+
+       LOG_DEBUG("statemove starting at (skip: %zu) %s end in %s", skip,
+                 tap_state_name(tap_get_state()),
+                 tap_state_name(tap_get_end_state()));
+
+
+       xlnx_pcie_xvc_transact(tms_count - skip, tms_scan >> skip, 0, NULL);
+       tap_set_state(tap_get_end_state());
+}
+
+static void xlnx_pcie_xvc_execute_runtest(struct jtag_command *cmd)
+{
+       LOG_DEBUG("runtest %i cycles, end in %i",
+                 cmd->cmd.runtest->num_cycles,
+                 cmd->cmd.runtest->end_state);
+
+       tap_state_t tmp_state = tap_get_end_state();
+
+       if (tap_get_state() != TAP_IDLE) {
+               tap_set_end_state(TAP_IDLE);
+               xlnx_pcie_xvc_execute_statemove(0);
+       };
+
+       size_t left = cmd->cmd.runtest->num_cycles;
+       size_t write;
+
+       while (left) {
+               write = MIN(XLNX_XVC_MAX_BITS, left);
+               xlnx_pcie_xvc_transact(write, 0, 0, NULL);
+               left -= write;
+       };
+
+       tap_set_end_state(tmp_state);
+       if (tap_get_state() != tap_get_end_state())
+               xlnx_pcie_xvc_execute_statemove(0);
+}
+
+static void xlnx_pcie_xvc_execute_pathmove(struct jtag_command *cmd)
+{
+       size_t num_states = cmd->cmd.pathmove->num_states;
+       tap_state_t *path = cmd->cmd.pathmove->path;
+       size_t i;
+
+       LOG_DEBUG("pathmove: %i states, end in %i",
+                 cmd->cmd.pathmove->num_states,
+                 cmd->cmd.pathmove->path[cmd->cmd.pathmove->num_states - 1]);
+
+       for (i = 0; i < num_states; i++) {
+               if (path[i] == tap_state_transition(tap_get_state(), false))
+                       xlnx_pcie_xvc_transact(1, 1, 0, NULL);
+               else if (path[i] == tap_state_transition(tap_get_state(), true))
+                       xlnx_pcie_xvc_transact(1, 0, 0, NULL);
+               else
+                       LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition.",
+                                 tap_state_name(tap_get_state()),
+                                 tap_state_name(path[i]));
+               tap_set_state(path[i]);
+       }
+
+       tap_set_end_state(tap_get_state());
+}
+
+static int xlnx_pcie_xvc_execute_scan(struct jtag_command *cmd)
+{
+       enum scan_type type = jtag_scan_type(cmd->cmd.scan);
+       tap_state_t saved_end_state = cmd->cmd.scan->end_state;
+       bool ir_scan = cmd->cmd.scan->ir_scan;
+       uint32_t tdi, tms, tdo;
+       uint8_t *buf, *rd_ptr;
+       int err, scan_size;
+       size_t write;
+       size_t left;
+
+       scan_size = jtag_build_buffer(cmd->cmd.scan, &buf);
+       rd_ptr = buf;
+       LOG_DEBUG("%s scan type %d %d bits; starts in %s end in %s",
+                 (cmd->cmd.scan->ir_scan) ? "IR" : "DR", type, scan_size,
+                 tap_state_name(tap_get_state()),
+                 tap_state_name(cmd->cmd.scan->end_state));
+
+       /* If we're in TAP_DR_SHIFT state but need to do a IR_SCAN or
+        * vice-versa, do a statemove to corresponding other state, then restore
+        * end state
+        */
+       if (ir_scan && tap_get_state() != TAP_IRSHIFT) {
+               tap_set_end_state(TAP_IRSHIFT);
+               xlnx_pcie_xvc_execute_statemove(0);
+               tap_set_end_state(saved_end_state);
+       } else if (!ir_scan && (tap_get_state() != TAP_DRSHIFT)) {
+               tap_set_end_state(TAP_DRSHIFT);
+               xlnx_pcie_xvc_execute_statemove(0);
+               tap_set_end_state(saved_end_state);
+       }
+
+       left = scan_size;
+       while (left) {
+               write = MIN(XLNX_XVC_MAX_BITS, left);
+               /* the last TMS should be a 1, to leave the state */
+               tms = left <= XLNX_XVC_MAX_BITS ? BIT(write - 1) : 0;
+               tdi = (type != SCAN_IN) ? buf_get_u32(rd_ptr, 0, write) : 0;
+               xlnx_pcie_xvc_transact(write, tms, tdi, type != SCAN_OUT ?
+                                 &tdo : NULL);
+               left -= write;
+               buf_set_u32(rd_ptr, 0, write, tdo);
+               rd_ptr += sizeof(uint32_t);
+       };
+
+       err = jtag_read_buffer(buf, cmd->cmd.scan);
+       if (buf)
+               free(buf);
+
+       if (tap_get_state() != tap_get_end_state())
+               xlnx_pcie_xvc_execute_statemove(1);
+
+       return err;
+}
+
+static void xlnx_pcie_xvc_execute_reset(struct jtag_command *cmd)
+{
+       LOG_DEBUG("reset trst: %i srst: %i", cmd->cmd.reset->trst,
+                 cmd->cmd.reset->srst);
+}
+
+static void xlnx_pcie_xvc_execute_sleep(struct jtag_command *cmd)
+{
+       LOG_DEBUG("sleep %" PRIi32 "", cmd->cmd.sleep->us);
+       usleep(cmd->cmd.sleep->us);
+}
+
+static int xlnx_pcie_xvc_execute_tms(struct jtag_command *cmd)
+{
+       const size_t num_bits = cmd->cmd.tms->num_bits;
+       const uint8_t *bits = cmd->cmd.tms->bits;
+       size_t left, write;
+       uint32_t tms;
+
+       LOG_DEBUG("execute tms %zu", num_bits);
+
+       left = num_bits;
+       while (left) {
+               write = MIN(XLNX_XVC_MAX_BITS, left);
+               tms = buf_get_u32(bits, 0, write);
+               xlnx_pcie_xvc_transact(write, tms, 0, NULL);
+               left -= write;
+               bits += 4;
+       };
+
+       return ERROR_OK;
+}
+
+static int xlnx_pcie_xvc_execute_command(struct jtag_command *cmd)
+{
+       LOG_DEBUG("%s: cmd->type: %u", __func__, cmd->type);
+       switch (cmd->type) {
+       case JTAG_STABLECLOCKS:
+               xlnx_pcie_xvc_execute_stableclocks(cmd);
+               break;
+       case JTAG_RUNTEST:
+               xlnx_pcie_xvc_execute_runtest(cmd);
+               break;
+       case JTAG_TLR_RESET:
+               tap_set_end_state(cmd->cmd.statemove->end_state);
+               xlnx_pcie_xvc_execute_statemove(0);
+               break;
+       case JTAG_PATHMOVE:
+               xlnx_pcie_xvc_execute_pathmove(cmd);
+               break;
+       case JTAG_SCAN:
+               return xlnx_pcie_xvc_execute_scan(cmd);
+       case JTAG_RESET:
+               xlnx_pcie_xvc_execute_reset(cmd);
+               break;
+       case JTAG_SLEEP:
+               xlnx_pcie_xvc_execute_sleep(cmd);
+               break;
+       case JTAG_TMS:
+               return xlnx_pcie_xvc_execute_tms(cmd);
+       default:
+               LOG_ERROR("BUG: Unknown JTAG command type encountered.");
+               return ERROR_JTAG_QUEUE_FAILED;
+       }
+
+       return ERROR_OK;
+}
+
+static int xlnx_pcie_xvc_execute_queue(void)
+{
+       struct jtag_command *cmd = jtag_command_queue;
+       int ret;
+
+       while (cmd) {
+               ret = xlnx_pcie_xvc_execute_command(cmd);
+
+               if (ret != ERROR_OK)
+                       return ret;
+
+               cmd = cmd->next;
+       }
+
+       return ERROR_OK;
+}
+
+
+static int xlnx_pcie_xvc_init(void)
+{
+       char filename[PATH_MAX];
+       uint32_t cap, vh;
+
+       snprintf(filename, PATH_MAX, "/sys/bus/pci/devices/%s/config",
+                xlnx_pcie_xvc->device);
+       xlnx_pcie_xvc->fd = open(filename, O_RDWR | O_SYNC);
+       if (xlnx_pcie_xvc->fd < 0) {
+               LOG_ERROR("Failed to open device: %s", filename);
+               return ERROR_JTAG_INIT_FAILED;
+       }
+
+       LOG_INFO("Scanning device %s's extended capabilities for XVC/PCIe ...", 
xlnx_pcie_xvc->device);
+       /* Parse the PCIe extended capability list and try to find vendor 
specific header */
+       xlnx_pcie_xvc->offset = PCIE_EXT_CAP_LST;
+       while (xlnx_pcie_xvc->offset <= PCI_CFG_SPACE_EXP_SIZE - 4 &&
+              xlnx_pcie_xvc->offset >= PCIE_EXT_CAP_LST) {
+               cap = xlnx_pcie_xvc_read_reg(XLNX_XVC_EXT_CAP);
+               LOG_DEBUG("Checking capability at 0x%x; id=%04x version=%x 
next=%x",
+                        xlnx_pcie_xvc->offset,
+                        PCI_EXT_CAP_ID(cap),
+                        PCI_EXT_CAP_VER(cap),
+                        PCI_EXT_CAP_NEXT(cap));
+               if (PCI_EXT_CAP_ID(cap) == PCI_EXT_CAP_ID_VNDR) {
+                       vh = xlnx_pcie_xvc_read_reg(XLNX_XVC_VSEC_HDR);
+                       LOG_DEBUG("Checking possible match at %x; id: %x; rev: 
%x; length: %x",
+                                xlnx_pcie_xvc->offset,
+                                PCI_VNDR_HEADER_ID(vh),
+                                PCI_VNDR_HEADER_REV(vh),
+                                PCI_VNDR_HEADER_LEN(vh));
+                       if ((PCI_VNDR_HEADER_ID(vh) == XLNX_XVC_VSEC_ID) &&
+                           (PCI_VNDR_HEADER_LEN(vh) == XLNX_XVC_CAP_SIZE))
+                               break;
+               }
+               xlnx_pcie_xvc->offset = PCI_EXT_CAP_NEXT(cap);
+       }
+       if ((xlnx_pcie_xvc->offset > PCI_CFG_SPACE_EXP_SIZE - 
XLNX_XVC_CAP_SIZE) ||
+            xlnx_pcie_xvc->offset < PCIE_EXT_CAP_LST)
+               return ERROR_JTAG_INIT_FAILED;
+
+       LOG_INFO("Found XVC/PCIe at offset: %x", xlnx_pcie_xvc->offset);
+
+       return ERROR_OK;
+}
+
+static int xlnx_pcie_xvc_quit(void)
+{
+       int err;
+
+       err = close(xlnx_pcie_xvc->fd);
+       if (err)
+               return err;
+
+       free(xlnx_pcie_xvc->device);
+
+       return ERROR_OK;
+}
+
+COMMAND_HANDLER(xlnx_pcie_xvc_handle_config_command)
+{
+       if (CMD_ARGC < 1)
+               return ERROR_COMMAND_SYNTAX_ERROR;
+
+       xlnx_pcie_xvc->device = strdup(CMD_ARGV[0]);
+       return ERROR_OK;
+}
+
+static const struct command_registration xlnx_pcie_xvc_command_handlers[] = {
+       {
+               .name = "xlnx_pcie_xvc_config",
+               .handler = xlnx_pcie_xvc_handle_config_command,
+               .mode = COMMAND_CONFIG,
+               .help = "Configure XVC/PCIe JTAG adapter",
+               .usage = "device",
+       },
+       COMMAND_REGISTRATION_DONE
+};
+
+static const char * const xlnx_pcie_xvc_transports[] = { "jtag", NULL };
+
+struct jtag_interface xlnx_pcie_xvc_interface = {
+       .name = "xlnx_pcie_xvc",
+       .commands = xlnx_pcie_xvc_command_handlers,
+       .transports = xlnx_pcie_xvc_transports,
+       .execute_queue = &xlnx_pcie_xvc_execute_queue,
+       .speed = NULL,
+       .speed_div = NULL,
+       .khz = NULL,
+       .init = &xlnx_pcie_xvc_init,
+       .quit = &xlnx_pcie_xvc_quit,
+};

-- 


_______________________________________________
OpenOCD-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/openocd-devel

Reply via email to