tcl/cpld/jtagspi.cfg

   1 # SPDX-License-Identifier: GPL-2.0-or-later
   2
   3 set _USER1 0x02
   4
   5 if { [info exists JTAGSPI_IR] } {
   6         set _JTAGSPI_IR $JTAGSPI_IR
   7 } elseif {[info exists JTAGSPI_CHAIN_ID]} {
   8         set _JTAGSPI_CHAIN_ID $JTAGSPI_CHAIN_ID
   9 } else {
  10         set _JTAGSPI_IR $_USER1
  11 }
  12
  13 if { [info exists TARGETNAME] } {
  14         set _TARGETNAME $TARGETNAME
  15 } else {
  16         set _TARGETNAME $_CHIPNAME.proxy
  17 }
  18
  19 if { [info exists FLASHNAME] } {
  20         set _FLASHNAME $FLASHNAME
  21 } else {
  22         set _FLASHNAME $_CHIPNAME.spi
  23 }
  24
  25 target create $_TARGETNAME testee -chain-position $_CHIPNAME.tap
  26 if { [info exists _JTAGSPI_IR] } {
  27         flash bank $_FLASHNAME jtagspi 0 0 0 0 $_TARGETNAME $_JTAGSPI_IR
  28 } else {
  29     flash bank $_FLASHNAME jtagspi 0 0 0 0 $_TARGETNAME -pld $_JTAGSPI_CHAIN_ID
  30 }
  31
  32 # initialize jtagspi flash
  33 # chain_id: identifier of pld (you can get a list with 'pld devices')
  34 # proxy_bit: file with bitstream connecting JTAG and SPI interface in the PLD.
  35 # release_from_pwr_down_cmd: optional, command sent to spi flash before probing.
  36 #                            ex: 0xAB to release from power-dowm.
  37 #                            Just omit it to not send a command.
  38
  39 proc jtagspi_init {chain_id proxy_bit {release_from_pwr_down_cmd -1}} {
  40         # load proxy bitstream $proxy_bit and probe spi flash
  41         global _FLASHNAME
  42         if { $proxy_bit ne "" } {
  43                 pld load $chain_id $proxy_bit
  44         }
  45         reset halt
  46         if {$release_from_pwr_down_cmd != -1} {
  47                 jtagspi cmd $_FLASHNAME 0 $release_from_pwr_down_cmd
  48         }
  49         flash probe $_FLASHNAME
  50 }
  51
  52 proc jtagspi_program {bin addr} {
  53         # write and verify binary file $bin at offset $addr
  54         global _FLASHNAME
  55         flash write_image erase $bin $addr
  56         flash verify_bank $_FLASHNAME $bin $addr
  57 }