src/target/arm_jtag.c

   1 /***************************************************************************
   2  *   Copyright (C) 2005 by Dominic Rath                                    *
   3  *   Dominic.Rath@gmx.de                                                   *
   4  *                                                                         *
   5  *   Copyright (C) 2007,2008 Øyvind Harboe                                 *
   6  *   oyvind.harboe@zylin.com                                               *
   7  *                                                                         *
   8  *   This program is free software; you can redistribute it and/or modify  *
   9  *   it under the terms of the GNU General Public License as published by  *
  10  *   the Free Software Foundation; either version 2 of the License, or     *
  11  *   (at your option) any later version.                                   *
  12  *                                                                         *
  13  *   This program is distributed in the hope that it will be useful,       *
  14  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  15  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  16  *   GNU General Public License for more details.                          *
  17  *                                                                         *
  18  *   You should have received a copy of the GNU General Public License     *
  19  *   along with this program; if not, write to the                         *
  20  *   Free Software Foundation, Inc.,                                       *
  21  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
  22  ***************************************************************************/
  23 #ifdef HAVE_CONFIG_H
  24 #include "config.h"
  25 #endif
  26
  27 #include "arm_jtag.h"
  28
  29
  30 #if 0
  31 #define _ARM_JTAG_SCAN_N_CHECK_
  32 #endif
  33
  34 int arm_jtag_set_instr(arm_jtag_t *jtag_info, u32 new_instr,  void *no_verify_capture)
  35 {
  36         jtag_tap_t *tap;
  37         tap = jtag_info->tap;
  38         if (tap==NULL)
  39                 return ERROR_FAIL;
  40
  41         if (buf_get_u32(tap->cur_instr, 0, tap->ir_length) != new_instr)
  42         {
  43                 scan_field_t field;
  44                 u8 t[4];
  45
  46                 field.tap = tap;
  47                 field.num_bits = tap->ir_length;
  48                 field.out_value = t;
  49                 buf_set_u32(field.out_value, 0, field.num_bits, new_instr);
  50                 field.in_value = NULL;
  51
  52
  53
  54                 if (no_verify_capture==NULL)
  55                 {
  56                         jtag_add_ir_scan(1, &field, jtag_get_end_state());
  57                 } else
  58                 {
  59                         /* FIX!!!! this is a kludge!!! arm926ejs.c should reimplement this arm_jtag_set_instr to
  60                          * have special verification code.
  61                          */
  62                         jtag_add_ir_scan_noverify(1, &field, jtag_get_end_state());
  63                 }
  64         }
  65
  66         return ERROR_OK;
  67 }
  68
  69 int arm_jtag_scann(arm_jtag_t *jtag_info, u32 new_scan_chain)
  70 {
  71         int retval = ERROR_OK;
  72         if(jtag_info->cur_scan_chain != new_scan_chain)
  73         {
  74                 u32 values[1];
  75                 int num_bits[1];
  76
  77                 values[0]=new_scan_chain;
  78                 num_bits[0]=jtag_info->scann_size;
  79
  80                 if((retval = arm_jtag_set_instr(jtag_info, jtag_info->scann_instr, NULL)) != ERROR_OK)
  81                 {
  82                         return retval;
  83                 }
  84
  85                 jtag_add_dr_out(jtag_info->tap,
  86                                 1,
  87                                 num_bits,
  88                                 values,
  89                                 jtag_get_end_state());
  90
  91                 jtag_info->cur_scan_chain = new_scan_chain;
  92         }
  93
  94         return retval;
  95 }
  96
  97 int arm_jtag_reset_callback(enum jtag_event event, void *priv)
  98 {
  99         arm_jtag_t *jtag_info = priv;
 100
 101         if (event == JTAG_TRST_ASSERTED)
 102         {
 103                 jtag_info->cur_scan_chain = 0;
 104         }
 105
 106         return ERROR_OK;
 107 }
 108
 109 int arm_jtag_setup_connection(arm_jtag_t *jtag_info)
 110 {
 111         jtag_info->scann_instr = 0x2;
 112         jtag_info->cur_scan_chain = 0;
 113         jtag_info->intest_instr = 0xc;
 114
 115         return jtag_register_event_callback(arm_jtag_reset_callback, jtag_info);
 116 }
 117
 118 /* read JTAG buffer into host-endian u32, flipping bit-order */
 119 int arm_jtag_buf_to_u32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 120 {
 121         u32 *dest = priv;
 122         *dest = flip_u32(le_to_h_u32(in_buf), 32);
 123         return ERROR_OK;
 124 }
 125
 126 /* read JTAG buffer into little-endian u32, flipping bit-order */
 127 int arm_jtag_buf_to_le32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 128 {
 129         h_u32_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
 130         return ERROR_OK;
 131 }
 132
 133 /* read JTAG buffer into little-endian u16, flipping bit-order */
 134 int arm_jtag_buf_to_le16_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 135 {
 136         h_u16_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
 137         return ERROR_OK;
 138 }
 139
 140 /* read JTAG buffer into big-endian u32, flipping bit-order */
 141 int arm_jtag_buf_to_be32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 142 {
 143         h_u32_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
 144         return ERROR_OK;
 145 }
 146
 147 /* read JTAG buffer into big-endian u16, flipping bit-order */
 148 int arm_jtag_buf_to_be16_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 149 {
 150         h_u16_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
 151         return ERROR_OK;
 152 }
 153
 154 /* read JTAG buffer into u8, flipping bit-order */
 155 int arm_jtag_buf_to_8_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 156 {
 157         u8 *dest = priv;
 158         *dest = flip_u32(le_to_h_u32(in_buf), 32) & 0xff;
 159         return ERROR_OK;
 160 }
 161
 162 /* not-flipping variants */
 163 /* read JTAG buffer into host-endian u32 */
 164 int arm_jtag_buf_to_u32(u8 *in_buf, void *priv, struct scan_field_s *field)
 165 {
 166         u32 *dest = priv;
 167         *dest = le_to_h_u32(in_buf);
 168         return ERROR_OK;
 169 }
 170
 171 /* read JTAG buffer into little-endian u32 */
 172 int arm_jtag_buf_to_le32(u8 *in_buf, void *priv, struct scan_field_s *field)
 173 {
 174         h_u32_to_le(((u8*)priv), le_to_h_u32(in_buf));
 175         return ERROR_OK;
 176 }
 177
 178 /* read JTAG buffer into little-endian u16 */
 179 int arm_jtag_buf_to_le16(u8 *in_buf, void *priv, struct scan_field_s *field)
 180 {
 181         h_u16_to_le(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
 182         return ERROR_OK;
 183 }
 184
 185 /* read JTAG buffer into big-endian u32 */
 186 int arm_jtag_buf_to_be32(u8 *in_buf, void *priv, struct scan_field_s *field)
 187 {
 188         h_u32_to_be(((u8*)priv), le_to_h_u32(in_buf));
 189         return ERROR_OK;
 190 }
 191
 192 /* read JTAG buffer into big-endian u16 */
 193 int arm_jtag_buf_to_be16(u8 *in_buf, void *priv, struct scan_field_s *field)
 194 {
 195         h_u16_to_be(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
 196         return ERROR_OK;
 197 }
 198
 199 /* read JTAG buffer into u8 */
 200 int arm_jtag_buf_to_8(u8 *in_buf, void *priv, struct scan_field_s *field)
 201 {
 202         u8 *dest = priv;
 203         *dest = le_to_h_u32(in_buf) & 0xff;
 204         return ERROR_OK;
 205 }