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 #include "binarybuffer.h"
  30 #include "log.h"
  31 #include "jtag.h"
  32
  33 #include <stdlib.h>
  34
  35 #if 0
  36 #define _ARM_JTAG_SCAN_N_CHECK_
  37 #endif
  38
  39 int arm_jtag_set_instr(arm_jtag_t *jtag_info, u32 new_instr,  in_handler_t handler)
  40 {
  41         jtag_device_t *device = jtag_get_device(jtag_info->chain_pos);
  42         if (device==NULL)
  43                 return ERROR_FAIL;
  44
  45         if (buf_get_u32(device->cur_instr, 0, device->ir_length) != new_instr)
  46         {
  47                 scan_field_t field;
  48                 u8 t[4];
  49
  50                 field.device = jtag_info->chain_pos;
  51                 field.num_bits = device->ir_length;
  52                 field.out_value = t;
  53                 buf_set_u32(field.out_value, 0, field.num_bits, new_instr);
  54                 field.out_mask = NULL;
  55                 field.in_value = NULL;
  56                 field.in_check_value = NULL;
  57                 field.in_check_mask = NULL;
  58                 field.in_handler = handler;
  59                 field.in_handler_priv = NULL;
  60                 jtag_add_ir_scan(1, &field, -1);
  61         }
  62
  63         return ERROR_OK;
  64 }
  65
  66 int arm_jtag_scann(arm_jtag_t *jtag_info, u32 new_scan_chain)
  67 {
  68         int retval = ERROR_OK;
  69         if(jtag_info->cur_scan_chain != new_scan_chain)
  70         {
  71                 u32 values[1];
  72                 int num_bits[1];
  73
  74                 values[0]=new_scan_chain;
  75                 num_bits[0]=jtag_info->scann_size;
  76
  77                 if((retval = arm_jtag_set_instr(jtag_info, jtag_info->scann_instr, NULL)) != ERROR_OK)
  78                 {
  79                         return retval;
  80                 }
  81
  82                 jtag_add_dr_out(jtag_info->chain_pos,
  83                                 1,
  84                                 num_bits,
  85                                 values,
  86                                 -1);
  87
  88                 jtag_info->cur_scan_chain = new_scan_chain;
  89         }
  90
  91         return retval;
  92 }
  93
  94 int arm_jtag_reset_callback(enum jtag_event event, void *priv)
  95 {
  96         arm_jtag_t *jtag_info = priv;
  97
  98         if (event == JTAG_TRST_ASSERTED)
  99         {
 100                 jtag_info->cur_scan_chain = 0;
 101         }
 102
 103         return ERROR_OK;
 104 }
 105
 106 int arm_jtag_setup_connection(arm_jtag_t *jtag_info)
 107 {
 108         jtag_info->scann_instr = 0x2;
 109         jtag_info->cur_scan_chain = 0;
 110         jtag_info->intest_instr = 0xc;
 111
 112         return jtag_register_event_callback(arm_jtag_reset_callback, jtag_info);
 113 }
 114
 115 /* read JTAG buffer into host-endian u32, flipping bit-order */
 116 int arm_jtag_buf_to_u32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 117 {
 118         u32 *dest = priv;
 119         *dest = flip_u32(le_to_h_u32(in_buf), 32);
 120         return ERROR_OK;
 121 }
 122
 123 /* read JTAG buffer into little-endian u32, flipping bit-order */
 124 int arm_jtag_buf_to_le32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 125 {
 126         h_u32_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
 127         return ERROR_OK;
 128 }
 129
 130 /* read JTAG buffer into little-endian u16, flipping bit-order */
 131 int arm_jtag_buf_to_le16_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 132 {
 133         h_u16_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
 134         return ERROR_OK;
 135 }
 136
 137 /* read JTAG buffer into big-endian u32, flipping bit-order */
 138 int arm_jtag_buf_to_be32_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 139 {
 140         h_u32_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
 141         return ERROR_OK;
 142 }
 143
 144 /* read JTAG buffer into big-endian u16, flipping bit-order */
 145 int arm_jtag_buf_to_be16_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 146 {
 147         h_u16_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
 148         return ERROR_OK;
 149 }
 150
 151 /* read JTAG buffer into u8, flipping bit-order */
 152 int arm_jtag_buf_to_8_flip(u8 *in_buf, void *priv, struct scan_field_s *field)
 153 {
 154         u8 *dest = priv;
 155         *dest = flip_u32(le_to_h_u32(in_buf), 32) & 0xff;
 156         return ERROR_OK;
 157 }
 158
 159 /* not-flipping variants */
 160 /* read JTAG buffer into host-endian u32 */
 161 int arm_jtag_buf_to_u32(u8 *in_buf, void *priv, struct scan_field_s *field)
 162 {
 163         u32 *dest = priv;
 164         *dest = le_to_h_u32(in_buf);
 165         return ERROR_OK;
 166 }
 167
 168 /* read JTAG buffer into little-endian u32 */
 169 int arm_jtag_buf_to_le32(u8 *in_buf, void *priv, struct scan_field_s *field)
 170 {
 171         h_u32_to_le(((u8*)priv), le_to_h_u32(in_buf));
 172         return ERROR_OK;
 173 }
 174
 175 /* read JTAG buffer into little-endian u16 */
 176 int arm_jtag_buf_to_le16(u8 *in_buf, void *priv, struct scan_field_s *field)
 177 {
 178         h_u16_to_le(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
 179         return ERROR_OK;
 180 }
 181
 182 /* read JTAG buffer into big-endian u32 */
 183 int arm_jtag_buf_to_be32(u8 *in_buf, void *priv, struct scan_field_s *field)
 184 {
 185         h_u32_to_be(((u8*)priv), le_to_h_u32(in_buf));
 186         return ERROR_OK;
 187 }
 188
 189 /* read JTAG buffer into big-endian u16 */
 190 int arm_jtag_buf_to_be16(u8 *in_buf, void *priv, struct scan_field_s *field)
 191 {
 192         h_u16_to_be(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
 193         return ERROR_OK;
 194 }
 195
 196 /* read JTAG buffer into u8 */
 197 int arm_jtag_buf_to_8(u8 *in_buf, void *priv, struct scan_field_s *field)
 198 {
 199         u8 *dest = priv;
 200         *dest = le_to_h_u32(in_buf) & 0xff;
 201         return ERROR_OK;
 202 }