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