1 /***************************************************************************
2 * Copyright (C) 2005 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
5 * Copyright (C) 2007,2008 Øyvind Harboe *
6 * oyvind.harboe@zylin.com *
8 * Copyright (C) 2009 SoftPLC Corporation *
12 * This program is free software; you can redistribute it and/or modify *
13 * it under the terms of the GNU General Public License as published by *
14 * the Free Software Foundation; either version 2 of the License, or *
15 * (at your option) any later version. *
17 * This program is distributed in the hope that it will be useful, *
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
20 * GNU General Public License for more details. *
22 * You should have received a copy of the GNU General Public License *
23 * along with this program; if not, write to the *
24 * Free Software Foundation, Inc., *
25 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
26 ***************************************************************************/
32 #include "minidriver.h"
33 #include "interface.h"
40 /// The number of JTAG queue flushes (for profiling and debugging purposes).
41 static int jtag_flush_queue_count
;
43 static void jtag_add_scan_check(void (*jtag_add_scan
)(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
),
44 int in_num_fields
, scan_field_t
*in_fields
, tap_state_t state
);
46 /* note that this is not marked as static as it must be available from outside jtag.c for those
47 that implement the jtag_xxx() minidriver layer
49 int jtag_error
=ERROR_OK
;
51 char* jtag_event_strings
[] =
53 "JTAG controller reset (RESET or TRST)"
56 const Jim_Nvp nvp_jtag_tap_event
[] = {
57 { .value
= JTAG_TAP_EVENT_ENABLE
, .name
= "tap-enable" },
58 { .value
= JTAG_TAP_EVENT_DISABLE
, .name
= "tap-disable" },
60 { .name
= NULL
, .value
= -1 }
67 * List all TAPs that have been created.
69 static jtag_tap_t
*__jtag_all_taps
= NULL
;
71 * The number of TAPs in the __jtag_all_taps list, used to track the
72 * assigned chain position to new TAPs
74 static int jtag_num_taps
= 0;
76 enum reset_types jtag_reset_config
= RESET_NONE
;
77 tap_state_t cmd_queue_end_state
= TAP_RESET
;
78 tap_state_t cmd_queue_cur_state
= TAP_RESET
;
80 int jtag_verify_capture_ir
= 1;
83 /* how long the OpenOCD should wait before attempting JTAG communication after reset lines deasserted (in ms) */
84 static int jtag_nsrst_delay
= 0; /* default to no nSRST delay */
85 static int jtag_ntrst_delay
= 0; /* default to no nTRST delay */
87 /* callbacks to inform high-level handlers about JTAG state changes */
88 jtag_event_callback_t
*jtag_event_callbacks
;
91 static int speed_khz
= 0;
92 /* flag if the kHz speed was defined */
93 static bool hasKHz
= false;
95 /* jtag interfaces (parport, FTDI-USB, TI-USB, ...)
98 #if BUILD_ECOSBOARD == 1
99 extern jtag_interface_t zy1000_interface
;
102 #if BUILD_MINIDUMMY == 1
103 extern jtag_interface_t minidummy_interface
;
105 #if BUILD_PARPORT == 1
106 extern jtag_interface_t parport_interface
;
110 extern jtag_interface_t dummy_interface
;
113 #if BUILD_FT2232_FTD2XX == 1
114 extern jtag_interface_t ft2232_interface
;
117 #if BUILD_FT2232_LIBFTDI == 1
118 extern jtag_interface_t ft2232_interface
;
121 #if BUILD_AMTJTAGACCEL == 1
122 extern jtag_interface_t amt_jtagaccel_interface
;
125 #if BUILD_EP93XX == 1
126 extern jtag_interface_t ep93xx_interface
;
129 #if BUILD_AT91RM9200 == 1
130 extern jtag_interface_t at91rm9200_interface
;
133 #if BUILD_GW16012 == 1
134 extern jtag_interface_t gw16012_interface
;
137 #if BUILD_PRESTO_LIBFTDI == 1 || BUILD_PRESTO_FTD2XX == 1
138 extern jtag_interface_t presto_interface
;
141 #if BUILD_USBPROG == 1
142 extern jtag_interface_t usbprog_interface
;
146 extern jtag_interface_t jlink_interface
;
149 #if BUILD_VSLLINK == 1
150 extern jtag_interface_t vsllink_interface
;
154 extern jtag_interface_t rlink_interface
;
157 #if BUILD_ARMJTAGEW == 1
158 extern jtag_interface_t armjtagew_interface
;
161 jtag_interface_t
*jtag_interfaces
[] = {
162 #if BUILD_ECOSBOARD == 1
165 #if BUILD_MINIDUMMY == 1
166 &minidummy_interface
,
168 #if BUILD_PARPORT == 1
174 #if BUILD_FT2232_FTD2XX == 1
177 #if BUILD_FT2232_LIBFTDI == 1
180 #if BUILD_AMTJTAGACCEL == 1
181 &amt_jtagaccel_interface
,
183 #if BUILD_EP93XX == 1
186 #if BUILD_AT91RM9200 == 1
187 &at91rm9200_interface
,
189 #if BUILD_GW16012 == 1
192 #if BUILD_PRESTO_LIBFTDI == 1 || BUILD_PRESTO_FTD2XX == 1
195 #if BUILD_USBPROG == 1
201 #if BUILD_VSLLINK == 1
207 #if BUILD_ARMJTAGEW == 1
208 &armjtagew_interface
,
213 struct jtag_interface_s
*jtag
= NULL
;
216 static jtag_interface_t
*jtag_interface
= NULL
;
220 static int handle_interface_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
221 static int handle_jtag_speed_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
222 static int handle_jtag_khz_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
223 static int handle_jtag_device_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
224 static int handle_reset_config_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
225 static int handle_jtag_nsrst_delay_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
226 static int handle_jtag_ntrst_delay_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
228 static int handle_scan_chain_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
230 static int handle_endstate_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
231 static int handle_jtag_reset_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
232 static int handle_runtest_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
233 static int handle_irscan_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
234 static int Jim_Command_drscan(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *argv
);
235 static int Jim_Command_flush_count(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *args
);
237 static int handle_verify_ircapture_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
238 static int handle_verify_jtag_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
239 static int handle_tms_sequence_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
);
241 jtag_tap_t
*jtag_all_taps(void)
243 return __jtag_all_taps
;
246 int jtag_tap_count(void)
248 return jtag_num_taps
;
251 unsigned jtag_tap_count_enabled(void)
267 /// Append a new TAP to the chain of all taps.
268 static void jtag_tap_add(struct jtag_tap_s
*t
)
270 t
->abs_chain_position
= jtag_num_taps
++;
272 jtag_tap_t
**tap
= &__jtag_all_taps
;
274 tap
= &(*tap
)->next_tap
;
278 jtag_tap_t
*jtag_tap_by_string( const char *s
)
286 if( 0 == strcmp( t
->dotted_name
, s
) ){
292 /* backup plan is by number */
294 /* ok - is "s" a number? */
296 n
= strtol( s
, &cp
, 0 );
297 if( (s
!= cp
) && (*cp
== 0) ){
299 t
= jtag_tap_by_abs_position(n
);
305 jtag_tap_t
* jtag_tap_by_jim_obj( Jim_Interp
*interp
, Jim_Obj
*o
)
310 cp
= Jim_GetString( o
, NULL
);
315 t
= jtag_tap_by_string( cp
);
318 Jim_SetResult_sprintf(interp
,"Tap: %s is unknown", cp
);
323 /* returns a pointer to the n-th device in the scan chain */
324 jtag_tap_t
* jtag_tap_by_abs_position( int n
)
332 while( t
&& (n
> 0)) {
339 const char *jtag_tap_name(const jtag_tap_t
*tap
)
341 return (tap
== NULL
) ? "(unknown)" : tap
->dotted_name
;
345 int jtag_register_event_callback(int (*callback
)(enum jtag_event event
, void *priv
), void *priv
)
347 jtag_event_callback_t
**callbacks_p
= &jtag_event_callbacks
;
349 if (callback
== NULL
)
351 return ERROR_INVALID_ARGUMENTS
;
356 while ((*callbacks_p
)->next
)
357 callbacks_p
= &((*callbacks_p
)->next
);
358 callbacks_p
= &((*callbacks_p
)->next
);
361 (*callbacks_p
) = malloc(sizeof(jtag_event_callback_t
));
362 (*callbacks_p
)->callback
= callback
;
363 (*callbacks_p
)->priv
= priv
;
364 (*callbacks_p
)->next
= NULL
;
369 int jtag_unregister_event_callback(int (*callback
)(enum jtag_event event
, void *priv
))
371 jtag_event_callback_t
**callbacks_p
= &jtag_event_callbacks
;
373 if (callback
== NULL
)
375 return ERROR_INVALID_ARGUMENTS
;
380 jtag_event_callback_t
**next
= &((*callbacks_p
)->next
);
381 if ((*callbacks_p
)->callback
== callback
)
384 *callbacks_p
= *next
;
392 int jtag_call_event_callbacks(enum jtag_event event
)
394 jtag_event_callback_t
*callback
= jtag_event_callbacks
;
396 LOG_DEBUG("jtag event: %s", jtag_event_strings
[event
]);
400 callback
->callback(event
, callback
->priv
);
401 callback
= callback
->next
;
407 static void jtag_checks(void)
409 assert(jtag_trst
== 0);
412 static void jtag_prelude(tap_state_t state
)
416 assert(state
!=TAP_INVALID
);
418 cmd_queue_cur_state
= state
;
421 void jtag_alloc_in_value32(scan_field_t
*field
)
423 interface_jtag_alloc_in_value32(field
);
426 void jtag_add_ir_scan_noverify(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
)
431 retval
=interface_jtag_add_ir_scan(in_num_fields
, in_fields
, state
);
432 if (retval
!=ERROR_OK
)
439 * Generate an IR SCAN with a list of scan fields with one entry for each enabled TAP.
441 * If the input field list contains an instruction value for a TAP then that is used
442 * otherwise the TAP is set to bypass.
444 * TAPs for which no fields are passed are marked as bypassed for subsequent DR SCANs.
447 void jtag_add_ir_scan(int in_num_fields
, scan_field_t
*in_fields
, tap_state_t state
)
449 if (jtag_verify
&&jtag_verify_capture_ir
)
451 /* 8 x 32 bit id's is enough for all invocations */
453 for (int j
= 0; j
< in_num_fields
; j
++)
455 /* if we are to run a verification of the ir scan, we need to get the input back.
456 * We may have to allocate space if the caller didn't ask for the input back.
458 in_fields
[j
].check_value
=in_fields
[j
].tap
->expected
;
459 in_fields
[j
].check_mask
=in_fields
[j
].tap
->expected_mask
;
461 jtag_add_scan_check(jtag_add_ir_scan_noverify
, in_num_fields
, in_fields
, state
);
464 jtag_add_ir_scan_noverify(in_num_fields
, in_fields
, state
);
469 * Duplicate the scan fields passed into the function into an IR SCAN command
471 * This function assumes that the caller handles extra fields for bypassed TAPs
474 void jtag_add_plain_ir_scan(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
)
480 retval
=interface_jtag_add_plain_ir_scan(in_num_fields
, in_fields
, state
);
481 if (retval
!=ERROR_OK
)
485 void jtag_add_callback(jtag_callback1_t f
, u8
*in
)
487 interface_jtag_add_callback(f
, in
);
490 void jtag_add_callback4(jtag_callback_t f
, u8
*in
,
491 jtag_callback_data_t data1
, jtag_callback_data_t data2
,
492 jtag_callback_data_t data3
)
494 interface_jtag_add_callback4(f
, in
, data1
, data2
, data3
);
497 int jtag_check_value_inner(u8
*captured
, u8
*in_check_value
, u8
*in_check_mask
, int num_bits
);
499 static int jtag_check_value_mask_callback(u8
*in
, jtag_callback_data_t data1
, jtag_callback_data_t data2
, jtag_callback_data_t data3
)
501 return jtag_check_value_inner(in
, (u8
*)data1
, (u8
*)data2
, (int)data3
);
504 static void jtag_add_scan_check(void (*jtag_add_scan
)(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
),
505 int in_num_fields
, scan_field_t
*in_fields
, tap_state_t state
)
507 for (int i
= 0; i
< in_num_fields
; i
++)
509 struct scan_field_s
*field
= &in_fields
[i
];
510 field
->allocated
= 0;
512 if (field
->check_value
|| field
->in_value
)
514 interface_jtag_add_scan_check_alloc(field
);
518 jtag_add_scan(in_num_fields
, in_fields
, state
);
520 for (int i
= 0; i
< in_num_fields
; i
++)
522 if ((in_fields
[i
].check_value
!= NULL
) && (in_fields
[i
].in_value
!= NULL
))
524 /* this is synchronous for a minidriver */
525 jtag_add_callback4(jtag_check_value_mask_callback
, in_fields
[i
].in_value
,
526 (jtag_callback_data_t
)in_fields
[i
].check_value
,
527 (jtag_callback_data_t
)in_fields
[i
].check_mask
,
528 (jtag_callback_data_t
)in_fields
[i
].num_bits
);
530 if (in_fields
[i
].allocated
)
532 free(in_fields
[i
].in_value
);
534 if (in_fields
[i
].modified
)
536 in_fields
[i
].in_value
= NULL
;
541 void jtag_add_dr_scan_check(int in_num_fields
, scan_field_t
*in_fields
, tap_state_t state
)
545 jtag_add_scan_check(jtag_add_dr_scan
, in_num_fields
, in_fields
, state
);
548 jtag_add_dr_scan(in_num_fields
, in_fields
, state
);
554 * Generate a DR SCAN using the fields passed to the function
556 * For not bypassed TAPs the function checks in_fields and uses fields specified there.
557 * For bypassed TAPs the function generates a dummy 1bit field.
559 * The bypass status of TAPs is set by jtag_add_ir_scan().
562 void jtag_add_dr_scan(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
)
568 retval
=interface_jtag_add_dr_scan(in_num_fields
, in_fields
, state
);
569 if (retval
!=ERROR_OK
)
576 * Duplicate the scan fields passed into the function into a DR SCAN command
578 * This function assumes that the caller handles extra fields for bypassed TAPs
581 void jtag_add_plain_dr_scan(int in_num_fields
, const scan_field_t
*in_fields
, tap_state_t state
)
587 retval
=interface_jtag_add_plain_dr_scan(in_num_fields
, in_fields
, state
);
588 if (retval
!=ERROR_OK
)
592 void jtag_add_dr_out(jtag_tap_t
* tap
,
593 int num_fields
, const int* num_bits
, const u32
* value
,
594 tap_state_t end_state
)
596 assert(end_state
!= TAP_INVALID
);
598 cmd_queue_cur_state
= end_state
;
600 interface_jtag_add_dr_out(tap
,
601 num_fields
, num_bits
, value
,
605 void jtag_add_tlr(void)
607 jtag_prelude(TAP_RESET
);
610 retval
=interface_jtag_add_tlr();
611 if (retval
!=ERROR_OK
)
614 jtag_call_event_callbacks(JTAG_TRST_ASSERTED
);
617 void jtag_add_pathmove(int num_states
, const tap_state_t
*path
)
619 tap_state_t cur_state
= cmd_queue_cur_state
;
623 /* the last state has to be a stable state */
624 if (!tap_is_state_stable(path
[num_states
- 1]))
626 LOG_ERROR("BUG: TAP path doesn't finish in a stable state");
630 for (i
=0; i
<num_states
; i
++)
632 if (path
[i
] == TAP_RESET
)
634 LOG_ERROR("BUG: TAP_RESET is not a valid state for pathmove sequences");
638 if ( tap_state_transition(cur_state
, true) != path
[i
]
639 && tap_state_transition(cur_state
, false) != path
[i
])
641 LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition", tap_state_name(cur_state
), tap_state_name(path
[i
]));
649 retval
= interface_jtag_add_pathmove(num_states
, path
);
650 cmd_queue_cur_state
= path
[num_states
- 1];
651 if (retval
!=ERROR_OK
)
655 void jtag_add_runtest(int num_cycles
, tap_state_t state
)
661 /* executed by sw or hw fifo */
662 retval
=interface_jtag_add_runtest(num_cycles
, state
);
663 if (retval
!=ERROR_OK
)
668 void jtag_add_clocks( int num_cycles
)
672 if( !tap_is_state_stable(cmd_queue_cur_state
) )
674 LOG_ERROR( "jtag_add_clocks() was called with TAP in non-stable state \"%s\"",
675 tap_state_name(cmd_queue_cur_state
) );
676 jtag_error
= ERROR_JTAG_NOT_STABLE_STATE
;
684 retval
= interface_jtag_add_clocks(num_cycles
);
685 if (retval
!= ERROR_OK
)
690 void jtag_add_reset(int req_tlr_or_trst
, int req_srst
)
692 int trst_with_tlr
= 0;
695 /* FIX!!! there are *many* different cases here. A better
696 * approach is needed for legal combinations of transitions...
698 if ((jtag_reset_config
& RESET_HAS_SRST
)&&
699 (jtag_reset_config
& RESET_HAS_TRST
)&&
700 ((jtag_reset_config
& RESET_SRST_PULLS_TRST
)==0))
702 if (((req_tlr_or_trst
&&!jtag_trst
)||
703 (!req_tlr_or_trst
&&jtag_trst
))&&
704 ((req_srst
&&!jtag_srst
)||
705 (!req_srst
&&jtag_srst
)))
707 /* FIX!!! srst_pulls_trst allows 1,1 => 0,0 transition.... */
708 //LOG_ERROR("BUG: transition of req_tlr_or_trst and req_srst in the same jtag_add_reset() call is undefined");
712 /* Make sure that jtag_reset_config allows the requested reset */
713 /* if SRST pulls TRST, we can't fulfill srst == 1 with trst == 0 */
714 if (((jtag_reset_config
& RESET_SRST_PULLS_TRST
) && (req_srst
== 1)) && (!req_tlr_or_trst
))
716 LOG_ERROR("BUG: requested reset would assert trst");
717 jtag_error
=ERROR_FAIL
;
721 /* if TRST pulls SRST, we reset with TAP T-L-R */
722 if (((jtag_reset_config
& RESET_TRST_PULLS_SRST
) && (req_tlr_or_trst
)) && (req_srst
== 0))
727 if (req_srst
&& !(jtag_reset_config
& RESET_HAS_SRST
))
729 LOG_ERROR("BUG: requested SRST assertion, but the current configuration doesn't support this");
730 jtag_error
=ERROR_FAIL
;
736 if (!trst_with_tlr
&& (jtag_reset_config
& RESET_HAS_TRST
))
748 jtag_srst
= req_srst
;
750 retval
= interface_jtag_add_reset(jtag_trst
, jtag_srst
);
751 if (retval
!=ERROR_OK
)
756 jtag_execute_queue();
760 LOG_DEBUG("SRST line asserted");
764 LOG_DEBUG("SRST line released");
765 if (jtag_nsrst_delay
)
766 jtag_add_sleep(jtag_nsrst_delay
* 1000);
771 LOG_DEBUG("JTAG reset with RESET instead of TRST");
772 jtag_set_end_state(TAP_RESET
);
779 /* we just asserted nTRST, so we're now in Test-Logic-Reset,
780 * and inform possible listeners about this
782 LOG_DEBUG("TRST line asserted");
783 tap_set_state(TAP_RESET
);
784 jtag_call_event_callbacks(JTAG_TRST_ASSERTED
);
788 if (jtag_ntrst_delay
)
789 jtag_add_sleep(jtag_ntrst_delay
* 1000);
793 tap_state_t
jtag_set_end_state(tap_state_t state
)
795 if ((state
== TAP_DRSHIFT
)||(state
== TAP_IRSHIFT
))
797 LOG_ERROR("BUG: TAP_DRSHIFT/IRSHIFT can't be end state. Calling code should use a larger scan field");
800 if (state
!=TAP_INVALID
)
801 cmd_queue_end_state
= state
;
802 return cmd_queue_end_state
;
805 tap_state_t
jtag_get_end_state(void)
807 return cmd_queue_end_state
;
810 void jtag_add_sleep(u32 us
)
812 keep_alive(); /* we might be running on a very slow JTAG clk */
813 int retval
=interface_jtag_add_sleep(us
);
814 if (retval
!=ERROR_OK
)
819 int jtag_check_value_inner(u8
*captured
, u8
*in_check_value
, u8
*in_check_mask
, int num_bits
)
821 int retval
= ERROR_OK
;
823 int compare_failed
= 0;
826 compare_failed
= buf_cmp_mask(captured
, in_check_value
, in_check_mask
, num_bits
);
828 compare_failed
= buf_cmp(captured
, in_check_value
, num_bits
);
831 /* An error handler could have caught the failing check
832 * only report a problem when there wasn't a handler, or if the handler
833 * acknowledged the error
836 LOG_WARNING("TAP %s:",
837 jtag_tap_name(field->tap));
841 char *captured_char
= buf_to_str(captured
, (num_bits
> DEBUG_JTAG_IOZ
) ? DEBUG_JTAG_IOZ
: num_bits
, 16);
842 char *in_check_value_char
= buf_to_str(in_check_value
, (num_bits
> DEBUG_JTAG_IOZ
) ? DEBUG_JTAG_IOZ
: num_bits
, 16);
846 char *in_check_mask_char
;
847 in_check_mask_char
= buf_to_str(in_check_mask
, (num_bits
> DEBUG_JTAG_IOZ
) ? DEBUG_JTAG_IOZ
: num_bits
, 16);
848 LOG_WARNING("value captured during scan didn't pass the requested check:");
849 LOG_WARNING("captured: 0x%s check_value: 0x%s check_mask: 0x%s",
850 captured_char
, in_check_value_char
, in_check_mask_char
);
851 free(in_check_mask_char
);
855 LOG_WARNING("value captured during scan didn't pass the requested check: captured: 0x%s check_value: 0x%s", captured_char
, in_check_value_char
);
859 free(in_check_value_char
);
861 retval
= ERROR_JTAG_QUEUE_FAILED
;
868 void jtag_check_value_mask(scan_field_t
*field
, u8
*value
, u8
*mask
)
870 assert(field
->in_value
!= NULL
);
874 /* no checking to do */
878 jtag_execute_queue_noclear();
880 int retval
=jtag_check_value_inner(field
->in_value
, value
, mask
, field
->num_bits
);
881 jtag_set_error(retval
);
886 int default_interface_jtag_execute_queue(void)
890 LOG_ERROR("No JTAG interface configured yet. "
891 "Issue 'init' command in startup scripts "
892 "before communicating with targets.");
896 return jtag
->execute_queue();
899 void jtag_execute_queue_noclear(void)
901 /* each flush can take as much as 1-2ms on high bandwidth low latency interfaces.
902 * E.g. a JTAG over TCP/IP or USB....
904 jtag_flush_queue_count
++;
906 int retval
=interface_jtag_execute_queue();
907 /* we keep the first error */
908 if ((jtag_error
==ERROR_OK
)&&(retval
!=ERROR_OK
))
914 int jtag_get_flush_queue_count(void)
916 return jtag_flush_queue_count
;
919 int jtag_execute_queue(void)
922 jtag_execute_queue_noclear();
928 static int jtag_reset_callback(enum jtag_event event
, void *priv
)
930 jtag_tap_t
*tap
= priv
;
934 if (event
== JTAG_TRST_ASSERTED
)
936 buf_set_ones(tap
->cur_instr
, tap
->ir_length
);
943 void jtag_sleep(u32 us
)
945 alive_sleep(us
/1000);
948 /// maximum number of JTAG devices expected in the chain
949 #define JTAG_MAX_CHAIN_SIZE 20
951 #define EXTRACT_MFG(X) (((X) & 0xffe) >> 1)
952 #define EXTRACT_PART(X) (((X) & 0xffff000) >> 12)
953 #define EXTRACT_VER(X) (((X) & 0xf0000000) >> 28)
955 static int jtag_examine_chain_execute(u8
*idcode_buffer
, unsigned num_idcode
)
957 scan_field_t field
= {
959 .num_bits
= num_idcode
* 32,
960 .out_value
= idcode_buffer
,
961 .in_value
= idcode_buffer
,
964 // initialize to the end of chain ID value
965 for (unsigned i
= 0; i
< JTAG_MAX_CHAIN_SIZE
; i
++)
966 buf_set_u32(idcode_buffer
, i
* 32, 32, 0x000000FF);
968 jtag_add_plain_dr_scan(1, &field
, TAP_RESET
);
969 return jtag_execute_queue();
972 static bool jtag_examine_chain_check(u8
*idcodes
, unsigned count
)
977 for (unsigned i
= 0; i
< count
* 4; i
++)
979 zero_check
|= idcodes
[i
];
980 one_check
&= idcodes
[i
];
983 /* if there wasn't a single non-zero bit or if all bits were one,
984 * the scan is not valid */
985 if (zero_check
== 0x00 || one_check
== 0xff)
987 LOG_ERROR("JTAG communication failure: check connection, "
988 "JTAG interface, target power etc.");
994 static void jtag_examine_chain_display(enum log_levels level
, const char *msg
,
995 const char *name
, u32 idcode
)
997 log_printf_lf(level
, __FILE__
, __LINE__
, __FUNCTION__
,
998 "JTAG tap: %s %16.16s: 0x%08x "
999 "(mfg: 0x%3.3x, part: 0x%4.4x, ver: 0x%1.1x)",
1001 EXTRACT_MFG(idcode
), EXTRACT_PART(idcode
), EXTRACT_VER(idcode
) );
1004 static bool jtag_idcode_is_final(u32 idcode
)
1006 return idcode
== 0x000000FF || idcode
== 0xFFFFFFFF;
1010 * This helper checks that remaining bits in the examined chain data are
1011 * all as expected, but a single JTAG device requires only 64 bits to be
1012 * read back correctly. This can help identify and diagnose problems
1013 * with the JTAG chain earlier, gives more helpful/explicit error messages.
1015 static void jtag_examine_chain_end(u8
*idcodes
, unsigned count
, unsigned max
)
1017 bool triggered
= false;
1018 for ( ; count
< max
- 31; count
+= 32)
1020 u32 idcode
= buf_get_u32(idcodes
, count
, 32);
1021 // do not trigger the warning if the data looks good
1022 if (!triggered
&& jtag_idcode_is_final(idcode
))
1024 LOG_WARNING("Unexpected idcode after end of chain: %d 0x%08x",
1030 static bool jtag_examine_chain_match_tap(const struct jtag_tap_s
*tap
)
1032 if (0 == tap
->expected_ids_cnt
)
1034 /// @todo Enable LOG_INFO to ask for reports about unknown TAP IDs.
1036 LOG_INFO("Uknown JTAG TAP ID: 0x%08x", tap
->idcode
)
1037 LOG_INFO("Please report the chip name and reported ID code to the openocd project");
1042 /* Loop over the expected identification codes and test for a match */
1044 for (ii
= 0; ii
< tap
->expected_ids_cnt
; ii
++)
1046 if (tap
->idcode
== tap
->expected_ids
[ii
])
1050 /* If none of the expected ids matched, log an error */
1051 if (ii
!= tap
->expected_ids_cnt
)
1053 LOG_INFO("JTAG Tap/device matched");
1056 jtag_examine_chain_display(LOG_LVL_ERROR
, "got",
1057 tap
->dotted_name
, tap
->idcode
);
1058 for (ii
= 0; ii
< tap
->expected_ids_cnt
; ii
++)
1061 snprintf(msg
, sizeof(msg
), "expected %hhu of %hhu",
1062 ii
+ 1, tap
->expected_ids_cnt
);
1063 jtag_examine_chain_display(LOG_LVL_ERROR
, msg
,
1064 tap
->dotted_name
, tap
->expected_ids
[ii
]);
1069 /* Try to examine chain layout according to IEEE 1149.1 §12
1071 static int jtag_examine_chain(void)
1073 u8 idcode_buffer
[JTAG_MAX_CHAIN_SIZE
* 4];
1074 unsigned device_count
= 0;
1076 jtag_examine_chain_execute(idcode_buffer
, JTAG_MAX_CHAIN_SIZE
);
1078 if (!jtag_examine_chain_check(idcode_buffer
, JTAG_MAX_CHAIN_SIZE
))
1079 return ERROR_JTAG_INIT_FAILED
;
1081 /* point at the 1st tap */
1082 jtag_tap_t
*tap
= jtag_tap_next_enabled(NULL
);
1085 LOG_ERROR("JTAG: No taps enabled?");
1086 return ERROR_JTAG_INIT_FAILED
;
1089 for (unsigned bit_count
= 0; bit_count
< (JTAG_MAX_CHAIN_SIZE
* 32) - 31;)
1091 u32 idcode
= buf_get_u32(idcode_buffer
, bit_count
, 32);
1092 if ((idcode
& 1) == 0)
1094 /* LSB must not be 0, this indicates a device in bypass */
1095 LOG_WARNING("Tap/Device does not have IDCODE");
1103 * End of chain (invalid manufacturer ID) some devices, such
1104 * as AVR will output all 1's instead of TDI input value at
1107 if (jtag_idcode_is_final(idcode
))
1109 jtag_examine_chain_end(idcode_buffer
,
1110 bit_count
+ 32, JTAG_MAX_CHAIN_SIZE
* 32);
1114 jtag_examine_chain_display(LOG_LVL_INFO
, "tap/device found",
1115 tap
? tap
->dotted_name
: "(not-named)",
1124 tap
->idcode
= idcode
;
1126 // ensure the TAP ID does matches what was expected
1127 if (!jtag_examine_chain_match_tap(tap
))
1128 return ERROR_JTAG_INIT_FAILED
;
1130 tap
= jtag_tap_next_enabled(tap
);
1133 /* see if number of discovered devices matches configuration */
1134 if (device_count
!= jtag_tap_count_enabled())
1136 LOG_ERROR("number of discovered devices in JTAG chain (%i) "
1137 "does not match (enabled) configuration (%i), total taps: %d",
1138 device_count
, jtag_tap_count_enabled(), jtag_tap_count());
1139 LOG_ERROR("check the config file and ensure proper JTAG communication"
1140 " (connections, speed, ...)");
1141 return ERROR_JTAG_INIT_FAILED
;
1147 static int jtag_validate_chain(void)
1150 int total_ir_length
= 0;
1156 total_ir_length
= 0;
1158 tap
= jtag_tap_next_enabled(tap
);
1162 total_ir_length
+= tap
->ir_length
;
1165 total_ir_length
+= 2;
1166 ir_test
= malloc(CEIL(total_ir_length
, 8));
1167 buf_set_ones(ir_test
, total_ir_length
);
1170 field
.num_bits
= total_ir_length
;
1171 field
.out_value
= ir_test
;
1172 field
.in_value
= ir_test
;
1175 jtag_add_plain_ir_scan(1, &field
, TAP_RESET
);
1176 jtag_execute_queue();
1182 tap
= jtag_tap_next_enabled(tap
);
1187 val
= buf_get_u32(ir_test
, chain_pos
, 2);
1190 char *cbuf
= buf_to_str(ir_test
, total_ir_length
, 16);
1191 LOG_ERROR("Could not validate JTAG scan chain, IR mismatch, scan returned 0x%s. tap=%s pos=%d expected 0x1 got %0x", cbuf
, jtag_tap_name(tap
), chain_pos
, val
);
1194 return ERROR_JTAG_INIT_FAILED
;
1196 chain_pos
+= tap
->ir_length
;
1199 val
= buf_get_u32(ir_test
, chain_pos
, 2);
1202 char *cbuf
= buf_to_str(ir_test
, total_ir_length
, 16);
1203 LOG_ERROR("Could not validate end of JTAG scan chain, IR mismatch, scan returned 0x%s. pos=%d expected 0x3 got %0x", cbuf
, chain_pos
, val
);
1206 return ERROR_JTAG_INIT_FAILED
;
1214 enum jtag_tap_cfg_param
{
1218 static Jim_Nvp nvp_config_opts
[] = {
1219 { .name
= "-event", .value
= JCFG_EVENT
},
1221 { .name
= NULL
, .value
= -1 }
1224 static int jtag_tap_configure_cmd( Jim_GetOptInfo
*goi
, jtag_tap_t
* tap
)
1230 /* parse config or cget options */
1231 while (goi
->argc
> 0) {
1232 Jim_SetEmptyResult (goi
->interp
);
1234 e
= Jim_GetOpt_Nvp(goi
, nvp_config_opts
, &n
);
1236 Jim_GetOpt_NvpUnknown(goi
, nvp_config_opts
, 0);
1242 if (goi
->argc
== 0) {
1243 Jim_WrongNumArgs( goi
->interp
, goi
->argc
, goi
->argv
, "-event ?event-name? ..." );
1247 e
= Jim_GetOpt_Nvp( goi
, nvp_jtag_tap_event
, &n
);
1249 Jim_GetOpt_NvpUnknown(goi
, nvp_jtag_tap_event
, 1);
1253 if (goi
->isconfigure
) {
1254 if (goi
->argc
!= 1) {
1255 Jim_WrongNumArgs(goi
->interp
, goi
->argc
, goi
->argv
, "-event ?event-name? ?EVENT-BODY?");
1259 if (goi
->argc
!= 0) {
1260 Jim_WrongNumArgs(goi
->interp
, goi
->argc
, goi
->argv
, "-event ?event-name?");
1266 jtag_tap_event_action_t
*jteap
;
1268 jteap
= tap
->event_action
;
1269 /* replace existing? */
1271 if (jteap
->event
== (enum jtag_tap_event
)n
->value
) {
1274 jteap
= jteap
->next
;
1277 if (goi
->isconfigure
) {
1278 if (jteap
== NULL
) {
1280 jteap
= calloc(1, sizeof (*jteap
));
1282 jteap
->event
= n
->value
;
1283 Jim_GetOpt_Obj( goi
, &o
);
1285 Jim_DecrRefCount(interp
, jteap
->body
);
1287 jteap
->body
= Jim_DuplicateObj(goi
->interp
, o
);
1288 Jim_IncrRefCount(jteap
->body
);
1290 /* add to head of event list */
1291 jteap
->next
= tap
->event_action
;
1292 tap
->event_action
= jteap
;
1293 Jim_SetEmptyResult(goi
->interp
);
1296 if (jteap
== NULL
) {
1297 Jim_SetEmptyResult(goi
->interp
);
1299 Jim_SetResult(goi
->interp
, Jim_DuplicateObj(goi
->interp
, jteap
->body
));
1306 } /* while (goi->argc) */
1312 static void jtag_tap_init(jtag_tap_t
*tap
)
1314 assert(0 != tap
->ir_length
);
1316 tap
->expected
= malloc(tap
->ir_length
);
1317 tap
->expected_mask
= malloc(tap
->ir_length
);
1318 tap
->cur_instr
= malloc(tap
->ir_length
);
1320 buf_set_u32(tap
->expected
, 0, tap
->ir_length
, tap
->ir_capture_value
);
1321 buf_set_u32(tap
->expected_mask
, 0, tap
->ir_length
, tap
->ir_capture_mask
);
1322 buf_set_ones(tap
->cur_instr
, tap
->ir_length
);
1324 // place TAP in bypass mode
1326 // register the reset callback for the TAP
1327 jtag_register_event_callback(&jtag_reset_callback
, tap
);
1329 LOG_DEBUG("Created Tap: %s @ abs position %d, "
1330 "irlen %d, capture: 0x%x mask: 0x%x", tap
->dotted_name
,
1331 tap
->abs_chain_position
, tap
->ir_length
,
1332 tap
->ir_capture_value
, tap
->ir_capture_mask
);
1336 static void jtag_tap_free(jtag_tap_t
*tap
)
1338 /// @todo is anything missing? no memory leaks please
1339 free((void *)tap
->expected_ids
);
1340 free((void *)tap
->chip
);
1341 free((void *)tap
->tapname
);
1342 free((void *)tap
->dotted_name
);
1346 static int jim_newtap_cmd( Jim_GetOptInfo
*goi
)
1355 const Jim_Nvp opts
[] = {
1356 #define NTAP_OPT_IRLEN 0
1357 { .name
= "-irlen" , .value
= NTAP_OPT_IRLEN
},
1358 #define NTAP_OPT_IRMASK 1
1359 { .name
= "-irmask" , .value
= NTAP_OPT_IRMASK
},
1360 #define NTAP_OPT_IRCAPTURE 2
1361 { .name
= "-ircapture" , .value
= NTAP_OPT_IRCAPTURE
},
1362 #define NTAP_OPT_ENABLED 3
1363 { .name
= "-enable" , .value
= NTAP_OPT_ENABLED
},
1364 #define NTAP_OPT_DISABLED 4
1365 { .name
= "-disable" , .value
= NTAP_OPT_DISABLED
},
1366 #define NTAP_OPT_EXPECTED_ID 5
1367 { .name
= "-expected-id" , .value
= NTAP_OPT_EXPECTED_ID
},
1368 { .name
= NULL
, .value
= -1 },
1371 pTap
= malloc( sizeof(jtag_tap_t
) );
1372 memset( pTap
, 0, sizeof(*pTap
) );
1374 Jim_SetResult_sprintf( goi
->interp
, "no memory");
1378 * we expect CHIP + TAP + OPTIONS
1380 if( goi
->argc
< 3 ){
1381 Jim_SetResult_sprintf(goi
->interp
, "Missing CHIP TAP OPTIONS ....");
1384 Jim_GetOpt_String( goi
, &cp
, NULL
);
1385 pTap
->chip
= strdup(cp
);
1387 Jim_GetOpt_String( goi
, &cp
, NULL
);
1388 pTap
->tapname
= strdup(cp
);
1390 /* name + dot + name + null */
1391 x
= strlen(pTap
->chip
) + 1 + strlen(pTap
->tapname
) + 1;
1393 sprintf( cp
, "%s.%s", pTap
->chip
, pTap
->tapname
);
1394 pTap
->dotted_name
= cp
;
1396 LOG_DEBUG("Creating New Tap, Chip: %s, Tap: %s, Dotted: %s, %d params",
1397 pTap
->chip
, pTap
->tapname
, pTap
->dotted_name
, goi
->argc
);
1399 /* default is enabled */
1402 /* deal with options */
1403 #define NTREQ_IRLEN 1
1404 #define NTREQ_IRCAPTURE 2
1405 #define NTREQ_IRMASK 4
1407 /* clear them as we find them */
1408 reqbits
= (NTREQ_IRLEN
| NTREQ_IRCAPTURE
| NTREQ_IRMASK
);
1411 e
= Jim_GetOpt_Nvp( goi
, opts
, &n
);
1413 Jim_GetOpt_NvpUnknown( goi
, opts
, 0 );
1416 LOG_DEBUG("Processing option: %s", n
->name
);
1418 case NTAP_OPT_ENABLED
:
1421 case NTAP_OPT_DISABLED
:
1424 case NTAP_OPT_EXPECTED_ID
:
1426 u32
*new_expected_ids
;
1428 e
= Jim_GetOpt_Wide( goi
, &w
);
1430 Jim_SetResult_sprintf(goi
->interp
, "option: %s bad parameter", n
->name
);
1434 new_expected_ids
= malloc(sizeof(u32
) * (pTap
->expected_ids_cnt
+ 1));
1435 if (new_expected_ids
== NULL
) {
1436 Jim_SetResult_sprintf( goi
->interp
, "no memory");
1440 memcpy(new_expected_ids
, pTap
->expected_ids
, sizeof(u32
) * pTap
->expected_ids_cnt
);
1442 new_expected_ids
[pTap
->expected_ids_cnt
] = w
;
1444 free(pTap
->expected_ids
);
1445 pTap
->expected_ids
= new_expected_ids
;
1446 pTap
->expected_ids_cnt
++;
1449 case NTAP_OPT_IRLEN
:
1450 case NTAP_OPT_IRMASK
:
1451 case NTAP_OPT_IRCAPTURE
:
1452 e
= Jim_GetOpt_Wide( goi
, &w
);
1454 Jim_SetResult_sprintf( goi
->interp
, "option: %s bad parameter", n
->name
);
1457 if( (w
< 0) || (w
> 0xffff) ){
1459 Jim_SetResult_sprintf( goi
->interp
, "option: %s - wacky value: %d (0x%x)",
1460 n
->name
, (int)(w
), (int)(w
));
1464 case NTAP_OPT_IRLEN
:
1465 pTap
->ir_length
= w
;
1466 reqbits
&= (~(NTREQ_IRLEN
));
1468 case NTAP_OPT_IRMASK
:
1469 pTap
->ir_capture_mask
= w
;
1470 reqbits
&= (~(NTREQ_IRMASK
));
1472 case NTAP_OPT_IRCAPTURE
:
1473 pTap
->ir_capture_value
= w
;
1474 reqbits
&= (~(NTREQ_IRCAPTURE
));
1477 } /* switch(n->value) */
1478 } /* while( goi->argc ) */
1480 /* Did all the required option bits get cleared? */
1483 jtag_tap_init(pTap
);
1487 Jim_SetResult_sprintf(goi
->interp
,
1488 "newtap: %s missing required parameters",
1490 jtag_tap_free(pTap
);
1494 static int jim_jtag_command( Jim_Interp
*interp
, int argc
, Jim_Obj
*const *argv
)
1500 struct command_context_s
*context
;
1504 JTAG_CMD_INIT_RESET
,
1507 JTAG_CMD_TAPDISABLE
,
1508 JTAG_CMD_TAPISENABLED
,
1513 const Jim_Nvp jtag_cmds
[] = {
1514 { .name
= "interface" , .value
= JTAG_CMD_INTERFACE
},
1515 { .name
= "arp_init-reset", .value
= JTAG_CMD_INIT_RESET
},
1516 { .name
= "newtap" , .value
= JTAG_CMD_NEWTAP
},
1517 { .name
= "tapisenabled" , .value
= JTAG_CMD_TAPISENABLED
},
1518 { .name
= "tapenable" , .value
= JTAG_CMD_TAPENABLE
},
1519 { .name
= "tapdisable" , .value
= JTAG_CMD_TAPDISABLE
},
1520 { .name
= "configure" , .value
= JTAG_CMD_CONFIGURE
},
1521 { .name
= "cget" , .value
= JTAG_CMD_CGET
},
1523 { .name
= NULL
, .value
= -1 },
1526 context
= Jim_GetAssocData(interp
, "context");
1527 /* go past the command */
1528 Jim_GetOpt_Setup( &goi
, interp
, argc
-1, argv
+1 );
1530 e
= Jim_GetOpt_Nvp( &goi
, jtag_cmds
, &n
);
1532 Jim_GetOpt_NvpUnknown( &goi
, jtag_cmds
, 0 );
1535 Jim_SetEmptyResult( goi
.interp
);
1537 case JTAG_CMD_INTERFACE
:
1538 /* return the name of the interface */
1539 /* TCL code might need to know the exact type... */
1540 /* FUTURE: we allow this as a means to "set" the interface. */
1541 if( goi
.argc
!= 0 ){
1542 Jim_WrongNumArgs( goi
.interp
, 1, goi
.argv
-1, "(no params)");
1545 Jim_SetResultString( goi
.interp
, jtag_interface
->name
, -1 );
1547 case JTAG_CMD_INIT_RESET
:
1548 if( goi
.argc
!= 0 ){
1549 Jim_WrongNumArgs( goi
.interp
, 1, goi
.argv
-1, "(no params)");
1552 e
= jtag_init_reset(context
);
1553 if( e
!= ERROR_OK
){
1554 Jim_SetResult_sprintf( goi
.interp
, "error: %d", e
);
1558 case JTAG_CMD_NEWTAP
:
1559 return jim_newtap_cmd( &goi
);
1561 case JTAG_CMD_TAPISENABLED
:
1562 case JTAG_CMD_TAPENABLE
:
1563 case JTAG_CMD_TAPDISABLE
:
1564 if( goi
.argc
!= 1 ){
1565 Jim_SetResultString( goi
.interp
, "Too many parameters",-1 );
1571 t
= jtag_tap_by_jim_obj( goi
.interp
, goi
.argv
[0] );
1576 case JTAG_CMD_TAPISENABLED
:
1579 case JTAG_CMD_TAPENABLE
:
1580 jtag_tap_handle_event( t
, JTAG_TAP_EVENT_ENABLE
);
1584 case JTAG_CMD_TAPDISABLE
:
1585 jtag_tap_handle_event( t
, JTAG_TAP_EVENT_DISABLE
);
1590 Jim_SetResult( goi
.interp
, Jim_NewIntObj( goi
.interp
, e
) );
1597 Jim_WrongNumArgs( goi
.interp
, 0, NULL
, "?tap-name? -option ...");
1604 Jim_GetOpt_Obj(&goi
, &o
);
1605 t
= jtag_tap_by_jim_obj( goi
.interp
, o
);
1610 goi
.isconfigure
= 0;
1611 return jtag_tap_configure_cmd( &goi
, t
);
1615 case JTAG_CMD_CONFIGURE
:
1617 Jim_WrongNumArgs( goi
.interp
, 0, NULL
, "?tap-name? -option ?VALUE? ...");
1624 Jim_GetOpt_Obj(&goi
, &o
);
1625 t
= jtag_tap_by_jim_obj( goi
.interp
, o
);
1630 goi
.isconfigure
= 1;
1631 return jtag_tap_configure_cmd( &goi
, t
);
1638 int jtag_register_commands(struct command_context_s
*cmd_ctx
)
1640 register_jim( cmd_ctx
, "jtag", jim_jtag_command
, "perform jtag tap actions");
1642 register_command(cmd_ctx
, NULL
, "interface", handle_interface_command
,
1643 COMMAND_CONFIG
, "try to configure interface");
1644 register_command(cmd_ctx
, NULL
, "jtag_speed", handle_jtag_speed_command
,
1645 COMMAND_ANY
, "(DEPRECATED) set jtag speed (if supported)");
1646 register_command(cmd_ctx
, NULL
, "jtag_khz", handle_jtag_khz_command
,
1647 COMMAND_ANY
, "set maximum jtag speed (if supported); "
1648 "parameter is maximum khz, or 0 for adaptive clocking (RTCK).");
1649 register_command(cmd_ctx
, NULL
, "jtag_device", handle_jtag_device_command
,
1650 COMMAND_CONFIG
, "(DEPRECATED) jtag_device <ir_length> <ir_expected> <ir_mask>");
1651 register_command(cmd_ctx
, NULL
, "reset_config", handle_reset_config_command
,
1653 "[none/trst_only/srst_only/trst_and_srst] [srst_pulls_trst/trst_pulls_srst] [combined/separate] [trst_push_pull/trst_open_drain] [srst_push_pull/srst_open_drain]");
1654 register_command(cmd_ctx
, NULL
, "jtag_nsrst_delay", handle_jtag_nsrst_delay_command
,
1655 COMMAND_ANY
, "jtag_nsrst_delay <ms> - delay after deasserting srst in ms");
1656 register_command(cmd_ctx
, NULL
, "jtag_ntrst_delay", handle_jtag_ntrst_delay_command
,
1657 COMMAND_ANY
, "jtag_ntrst_delay <ms> - delay after deasserting trst in ms");
1659 register_command(cmd_ctx
, NULL
, "scan_chain", handle_scan_chain_command
,
1660 COMMAND_EXEC
, "print current scan chain configuration");
1662 register_command(cmd_ctx
, NULL
, "endstate", handle_endstate_command
,
1663 COMMAND_EXEC
, "finish JTAG operations in <tap_state>");
1664 register_command(cmd_ctx
, NULL
, "jtag_reset", handle_jtag_reset_command
,
1665 COMMAND_EXEC
, "toggle reset lines <trst> <srst>");
1666 register_command(cmd_ctx
, NULL
, "runtest", handle_runtest_command
,
1667 COMMAND_EXEC
, "move to Run-Test/Idle, and execute <num_cycles>");
1668 register_command(cmd_ctx
, NULL
, "irscan", handle_irscan_command
,
1669 COMMAND_EXEC
, "execute IR scan <device> <instr> [dev2] [instr2] ...");
1670 register_jim(cmd_ctx
, "drscan", Jim_Command_drscan
, "execute DR scan <device> <num_bits> <value> <num_bits1> <value2> ...");
1671 register_jim(cmd_ctx
, "flush_count", Jim_Command_flush_count
, "returns number of times the JTAG queue has been flushed");
1673 register_command(cmd_ctx
, NULL
, "verify_ircapture", handle_verify_ircapture_command
,
1674 COMMAND_ANY
, "verify value captured during Capture-IR <enable|disable>");
1675 register_command(cmd_ctx
, NULL
, "verify_jtag", handle_verify_jtag_command
,
1676 COMMAND_ANY
, "verify value capture <enable|disable>");
1677 register_command(cmd_ctx
, NULL
, "tms_sequence", handle_tms_sequence_command
,
1678 COMMAND_ANY
, "choose short(default) or long tms_sequence <short|long>");
1682 int jtag_interface_init(struct command_context_s
*cmd_ctx
)
1687 if (!jtag_interface
)
1689 /* nothing was previously specified by "interface" command */
1690 LOG_ERROR("JTAG interface has to be specified, see \"interface\" command");
1691 return ERROR_JTAG_INVALID_INTERFACE
;
1695 jtag_interface
->khz(jtag_get_speed_khz(), &jtag_speed
);
1699 if (jtag_interface
->init() != ERROR_OK
)
1700 return ERROR_JTAG_INIT_FAILED
;
1702 jtag
= jtag_interface
;
1706 static int jtag_init_inner(struct command_context_s
*cmd_ctx
)
1711 LOG_DEBUG("Init JTAG chain");
1713 tap
= jtag_tap_next_enabled(NULL
);
1715 LOG_ERROR("There are no enabled taps?");
1716 return ERROR_JTAG_INIT_FAILED
;
1720 if ((retval
=jtag_execute_queue())!=ERROR_OK
)
1723 /* examine chain first, as this could discover the real chain layout */
1724 if (jtag_examine_chain() != ERROR_OK
)
1726 LOG_ERROR("trying to validate configured JTAG chain anyway...");
1729 if (jtag_validate_chain() != ERROR_OK
)
1731 LOG_WARNING("Could not validate JTAG chain, continuing anyway...");
1737 int jtag_interface_quit(void)
1739 if (!jtag
|| !jtag
->quit
)
1742 // close the JTAG interface
1743 int result
= jtag
->quit();
1744 if (ERROR_OK
!= result
)
1745 LOG_ERROR("failed: %d", result
);
1751 int jtag_init_reset(struct command_context_s
*cmd_ctx
)
1755 if ((retval
=jtag_interface_init(cmd_ctx
)) != ERROR_OK
)
1758 LOG_DEBUG("Trying to bring the JTAG controller to life by asserting TRST / RESET");
1760 /* Reset can happen after a power cycle.
1762 * Ideally we would only assert TRST or run RESET before the target reset.
1764 * However w/srst_pulls_trst, trst is asserted together with the target
1765 * reset whether we want it or not.
1767 * NB! Some targets have JTAG circuitry disabled until a
1768 * trst & srst has been asserted.
1770 * NB! here we assume nsrst/ntrst delay are sufficient!
1772 * NB! order matters!!!! srst *can* disconnect JTAG circuitry
1775 jtag_add_reset(1, 0); /* RESET or TRST */
1776 if (jtag_reset_config
& RESET_HAS_SRST
)
1778 jtag_add_reset(1, 1);
1779 if ((jtag_reset_config
& RESET_SRST_PULLS_TRST
)==0)
1780 jtag_add_reset(0, 1);
1782 jtag_add_reset(0, 0);
1783 if ((retval
= jtag_execute_queue()) != ERROR_OK
)
1786 /* Check that we can communication on the JTAG chain + eventually we want to
1787 * be able to perform enumeration only after OpenOCD has started
1788 * telnet and GDB server
1790 * That would allow users to more easily perform any magic they need to before
1793 return jtag_init_inner(cmd_ctx
);
1796 int jtag_init(struct command_context_s
*cmd_ctx
)
1799 if ((retval
=jtag_interface_init(cmd_ctx
)) != ERROR_OK
)
1801 if (jtag_init_inner(cmd_ctx
)==ERROR_OK
)
1805 return jtag_init_reset(cmd_ctx
);
1808 void jtag_set_speed_khz(unsigned khz
)
1812 unsigned jtag_get_speed_khz(void)
1817 static int default_khz(int khz
, int *jtag_speed
)
1819 LOG_ERROR("Translation from khz to jtag_speed not implemented");
1823 static int default_speed_div(int speed
, int *khz
)
1825 LOG_ERROR("Translation from jtag_speed to khz not implemented");
1829 static int default_power_dropout(int *dropout
)
1831 *dropout
=0; /* by default we can't detect power dropout */
1835 static int default_srst_asserted(int *srst_asserted
)
1837 *srst_asserted
=0; /* by default we can't detect srst asserted */
1841 static int handle_interface_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
1846 /* check whether the interface is already configured */
1849 LOG_WARNING("Interface already configured, ignoring");
1853 /* interface name is a mandatory argument */
1854 if (argc
< 1 || args
[0][0] == '\0')
1856 return ERROR_COMMAND_SYNTAX_ERROR
;
1859 for (i
=0; jtag_interfaces
[i
]; i
++)
1861 if (strcmp(args
[0], jtag_interfaces
[i
]->name
) == 0)
1863 if ((retval
= jtag_interfaces
[i
]->register_commands(cmd_ctx
)) != ERROR_OK
)
1868 jtag_interface
= jtag_interfaces
[i
];
1870 if (jtag_interface
->khz
== NULL
)
1872 jtag_interface
->khz
= default_khz
;
1874 if (jtag_interface
->speed_div
== NULL
)
1876 jtag_interface
->speed_div
= default_speed_div
;
1878 if (jtag_interface
->power_dropout
== NULL
)
1880 jtag_interface
->power_dropout
= default_power_dropout
;
1882 if (jtag_interface
->srst_asserted
== NULL
)
1884 jtag_interface
->srst_asserted
= default_srst_asserted
;
1891 /* no valid interface was found (i.e. the configuration option,
1892 * didn't match one of the compiled-in interfaces
1894 LOG_ERROR("No valid jtag interface found (%s)", args
[0]);
1895 LOG_ERROR("compiled-in jtag interfaces:");
1896 for (i
= 0; jtag_interfaces
[i
]; i
++)
1898 LOG_ERROR("%i: %s", i
, jtag_interfaces
[i
]->name
);
1901 return ERROR_JTAG_INVALID_INTERFACE
;
1904 static int handle_jtag_device_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
1908 Jim_Obj
*newargs
[ 10 ];
1911 * argv[-1] = command
1912 * argv[ 0] = ir length
1913 * argv[ 1] = ir capture
1914 * argv[ 2] = ir mask
1915 * argv[ 3] = not actually used by anything but in the docs
1919 command_print( cmd_ctx
, "OLD DEPRECATED SYNTAX: Please use the NEW syntax");
1922 command_print( cmd_ctx
, "OLD SYNTAX: DEPRECATED - translating to new syntax");
1923 command_print( cmd_ctx
, "jtag newtap CHIP TAP -irlen %s -ircapture %s -irvalue %s",
1927 command_print( cmd_ctx
, "Example: STM32 has 2 taps, the cortexM3(len4) + boundaryscan(len5)");
1928 command_print( cmd_ctx
, "jtag newtap stm32 cortexm3 ....., thus creating the tap: \"stm32.cortexm3\"");
1929 command_print( cmd_ctx
, "jtag newtap stm32 boundary ....., and the tap: \"stm32.boundary\"");
1930 command_print( cmd_ctx
, "And then refer to the taps by the dotted name.");
1932 newargs
[0] = Jim_NewStringObj( interp
, "jtag", -1 );
1933 newargs
[1] = Jim_NewStringObj( interp
, "newtap", -1 );
1934 sprintf( buf
, "chip%d", jtag_tap_count() );
1935 newargs
[2] = Jim_NewStringObj( interp
, buf
, -1 );
1936 sprintf( buf
, "tap%d", jtag_tap_count() );
1937 newargs
[3] = Jim_NewStringObj( interp
, buf
, -1 );
1938 newargs
[4] = Jim_NewStringObj( interp
, "-irlen", -1 );
1939 newargs
[5] = Jim_NewStringObj( interp
, args
[0], -1 );
1940 newargs
[6] = Jim_NewStringObj( interp
, "-ircapture", -1 );
1941 newargs
[7] = Jim_NewStringObj( interp
, args
[1], -1 );
1942 newargs
[8] = Jim_NewStringObj( interp
, "-irmask", -1 );
1943 newargs
[9] = Jim_NewStringObj( interp
, args
[2], -1 );
1945 command_print( cmd_ctx
, "NEW COMMAND:");
1946 sprintf( buf
, "%s %s %s %s %s %s %s %s %s %s",
1947 Jim_GetString( newargs
[0], NULL
),
1948 Jim_GetString( newargs
[1], NULL
),
1949 Jim_GetString( newargs
[2], NULL
),
1950 Jim_GetString( newargs
[3], NULL
),
1951 Jim_GetString( newargs
[4], NULL
),
1952 Jim_GetString( newargs
[5], NULL
),
1953 Jim_GetString( newargs
[6], NULL
),
1954 Jim_GetString( newargs
[7], NULL
),
1955 Jim_GetString( newargs
[8], NULL
),
1956 Jim_GetString( newargs
[9], NULL
) );
1958 e
= jim_jtag_command( interp
, 10, newargs
);
1960 command_print( cmd_ctx
, "%s", Jim_GetString( Jim_GetResult(interp
), NULL
) );
1965 static int handle_scan_chain_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
1969 tap
= jtag_all_taps();
1970 command_print(cmd_ctx
, " TapName | Enabled | IdCode Expected IrLen IrCap IrMask Instr ");
1971 command_print(cmd_ctx
, "---|--------------------|---------|------------|------------|------|------|------|---------");
1974 u32 expected
, expected_mask
, cur_instr
, ii
;
1975 expected
= buf_get_u32(tap
->expected
, 0, tap
->ir_length
);
1976 expected_mask
= buf_get_u32(tap
->expected_mask
, 0, tap
->ir_length
);
1977 cur_instr
= buf_get_u32(tap
->cur_instr
, 0, tap
->ir_length
);
1979 command_print(cmd_ctx
,
1980 "%2d | %-18s | %c | 0x%08x | 0x%08x | 0x%02x | 0x%02x | 0x%02x | 0x%02x",
1981 tap
->abs_chain_position
,
1983 tap
->enabled
? 'Y' : 'n',
1985 (tap
->expected_ids_cnt
> 0 ? tap
->expected_ids
[0] : 0),
1991 for (ii
= 1; ii
< tap
->expected_ids_cnt
; ii
++) {
1992 command_print(cmd_ctx
, " | | | | 0x%08x | | | | ",
1993 tap
->expected_ids
[ii
]);
1996 tap
= tap
->next_tap
;
2002 static int handle_reset_config_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2008 return ERROR_COMMAND_SYNTAX_ERROR
;
2010 /* Original versions cared about the order of these tokens:
2011 * reset_config signals [combination [trst_type [srst_type]]]
2012 * They also clobbered the previous configuration even on error.
2014 * Here we don't care about the order, and only change values
2015 * which have been explicitly specified.
2017 for (; argc
; argc
--, args
++) {
2022 m
= RESET_HAS_TRST
| RESET_HAS_SRST
;
2023 if (strcmp(*args
, "none") == 0)
2025 else if (strcmp(*args
, "trst_only") == 0)
2026 tmp
= RESET_HAS_TRST
;
2027 else if (strcmp(*args
, "srst_only") == 0)
2028 tmp
= RESET_HAS_SRST
;
2029 else if (strcmp(*args
, "trst_and_srst") == 0)
2030 tmp
= RESET_HAS_TRST
| RESET_HAS_SRST
;
2034 LOG_ERROR("extra reset_config %s spec (%s)",
2036 return ERROR_INVALID_ARGUMENTS
;
2041 /* combination (options for broken wiring) */
2042 m
= RESET_SRST_PULLS_TRST
| RESET_TRST_PULLS_SRST
;
2043 if (strcmp(*args
, "separate") == 0)
2044 /* separate reset lines - default */;
2045 else if (strcmp(*args
, "srst_pulls_trst") == 0)
2046 tmp
|= RESET_SRST_PULLS_TRST
;
2047 else if (strcmp(*args
, "trst_pulls_srst") == 0)
2048 tmp
|= RESET_TRST_PULLS_SRST
;
2049 else if (strcmp(*args
, "combined") == 0)
2050 tmp
|= RESET_SRST_PULLS_TRST
| RESET_TRST_PULLS_SRST
;
2054 LOG_ERROR("extra reset_config %s spec (%s)",
2055 "combination", *args
);
2056 return ERROR_INVALID_ARGUMENTS
;
2061 /* trst_type (NOP without HAS_TRST) */
2062 m
= RESET_TRST_OPEN_DRAIN
;
2063 if (strcmp(*args
, "trst_open_drain") == 0)
2064 tmp
|= RESET_TRST_OPEN_DRAIN
;
2065 else if (strcmp(*args
, "trst_push_pull") == 0)
2066 /* push/pull from adapter - default */;
2070 LOG_ERROR("extra reset_config %s spec (%s)",
2071 "trst_type", *args
);
2072 return ERROR_INVALID_ARGUMENTS
;
2077 /* srst_type (NOP without HAS_SRST) */
2078 m
|= RESET_SRST_PUSH_PULL
;
2079 if (strcmp(*args
, "srst_push_pull") == 0)
2080 tmp
|= RESET_SRST_PUSH_PULL
;
2081 else if (strcmp(*args
, "srst_open_drain") == 0)
2082 /* open drain from adapter - default */;
2086 LOG_ERROR("extra reset_config %s spec (%s)",
2087 "srst_type", *args
);
2088 return ERROR_INVALID_ARGUMENTS
;
2093 /* caller provided nonsense; fail */
2094 LOG_ERROR("unknown reset_config flag (%s)", *args
);
2095 return ERROR_INVALID_ARGUMENTS
;
2098 /* Remember the bits which were specified (mask)
2099 * and their new values (new_cfg).
2105 /* clear previous values of those bits, save new values */
2106 jtag_reset_config
&= ~mask
;
2107 jtag_reset_config
|= new_cfg
;
2112 static int handle_jtag_nsrst_delay_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2116 LOG_ERROR("jtag_nsrst_delay <ms> command takes one required argument");
2121 jtag_set_nsrst_delay(strtoul(args
[0], NULL
, 0));
2127 static int handle_jtag_ntrst_delay_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2131 LOG_ERROR("jtag_ntrst_delay <ms> command takes one required argument");
2136 jtag_set_ntrst_delay(strtoul(args
[0], NULL
, 0));
2142 static int handle_jtag_speed_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2144 int retval
=ERROR_OK
;
2148 LOG_DEBUG("handle jtag speed");
2151 cur_speed
= jtag_speed
= strtoul(args
[0], NULL
, 0);
2153 /* this command can be called during CONFIG,
2154 * in which case jtag isn't initialized */
2157 retval
=jtag
->speed(cur_speed
);
2159 } else if (argc
== 0)
2163 return ERROR_COMMAND_SYNTAX_ERROR
;
2165 command_print(cmd_ctx
, "jtag_speed: %d", jtag_speed
);
2170 static int handle_jtag_khz_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2172 int retval
=ERROR_OK
;
2173 LOG_DEBUG("handle jtag khz");
2178 jtag_set_speed_khz(strtoul(args
[0], NULL
, 0));
2181 LOG_DEBUG("have interface set up");
2183 if ((retval
=jtag
->khz(jtag_get_speed_khz(), &speed_div1
))!=ERROR_OK
)
2185 jtag_set_speed_khz(0);
2189 cur_speed
= jtag_speed
= speed_div1
;
2191 retval
=jtag
->speed(cur_speed
);
2200 return ERROR_COMMAND_SYNTAX_ERROR
;
2202 cur_speed
= jtag_get_speed_khz();
2206 if ((retval
=jtag
->speed_div(jtag_speed
, &cur_speed
))!=ERROR_OK
)
2211 command_print(cmd_ctx
, "%d kHz", cur_speed
);
2213 command_print(cmd_ctx
, "RCLK - adaptive");
2218 static int handle_endstate_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2221 return ERROR_COMMAND_SYNTAX_ERROR
;
2223 tap_state_t state
= tap_state_by_name(args
[0]);
2226 command_print( cmd_ctx
, "Invalid state name: %s\n", args
[0] );
2227 return ERROR_COMMAND_SYNTAX_ERROR
;
2229 jtag_set_end_state(state
);
2230 jtag_execute_queue();
2232 command_print(cmd_ctx
, "current endstate: %s",
2233 tap_state_name(cmd_queue_end_state
));
2238 static int handle_jtag_reset_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2245 return ERROR_COMMAND_SYNTAX_ERROR
;
2248 if (args
[0][0] == '1')
2250 else if (args
[0][0] == '0')
2254 return ERROR_COMMAND_SYNTAX_ERROR
;
2257 if (args
[1][0] == '1')
2259 else if (args
[1][0] == '0')
2263 return ERROR_COMMAND_SYNTAX_ERROR
;
2266 if (jtag_interface_init(cmd_ctx
) != ERROR_OK
)
2267 return ERROR_JTAG_INIT_FAILED
;
2269 jtag_add_reset(trst
, srst
);
2270 jtag_execute_queue();
2275 static int handle_runtest_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2279 return ERROR_COMMAND_SYNTAX_ERROR
;
2282 jtag_add_runtest(strtol(args
[0], NULL
, 0), jtag_get_end_state());
2283 jtag_execute_queue();
2290 * For "irscan" or "drscan" commands, the "end" (really, "next") state
2291 * should be stable ... and *NOT* a shift state, otherwise free-running
2292 * jtag clocks could change the values latched by the update state.
2294 static bool scan_is_safe(tap_state_t state
)
2309 static int handle_irscan_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2312 scan_field_t
*fields
;
2314 tap_state_t endstate
;
2316 if ((argc
< 2) || (argc
% 2))
2318 return ERROR_COMMAND_SYNTAX_ERROR
;
2321 /* optional "-endstate" "statename" at the end of the arguments,
2322 * so that e.g. IRPAUSE can let us load the data register before
2323 * entering RUN/IDLE to execute the instruction we load here.
2325 endstate
= TAP_IDLE
;
2328 /* have at least one pair of numbers. */
2329 /* is last pair the magic text? */
2330 if( 0 == strcmp( "-endstate", args
[ argc
- 2 ] ) ){
2333 cpA
= args
[ argc
-1 ];
2334 for( endstate
= 0 ; endstate
< TAP_NUM_STATES
; endstate
++ ){
2335 cpS
= tap_state_name( endstate
);
2336 if( 0 == strcmp( cpA
, cpS
) ){
2340 if( endstate
>= TAP_NUM_STATES
){
2341 return ERROR_COMMAND_SYNTAX_ERROR
;
2343 if (!scan_is_safe(endstate
))
2344 LOG_WARNING("irscan with unsafe "
2345 "endstate \"%s\"", cpA
);
2346 /* found - remove the last 2 args */
2352 int num_fields
= argc
/ 2;
2354 fields
= malloc(sizeof(scan_field_t
) * num_fields
);
2356 for (i
= 0; i
< num_fields
; i
++)
2358 tap
= jtag_tap_by_string( args
[i
*2] );
2361 command_print( cmd_ctx
, "Tap: %s unknown", args
[i
*2] );
2364 int field_size
= tap
->ir_length
;
2365 fields
[i
].tap
= tap
;
2366 fields
[i
].num_bits
= field_size
;
2367 fields
[i
].out_value
= malloc(CEIL(field_size
, 8));
2368 buf_set_u32(fields
[i
].out_value
, 0, field_size
, strtoul(args
[i
*2+1], NULL
, 0));
2369 fields
[i
].in_value
= NULL
;
2372 /* did we have an endstate? */
2373 jtag_add_ir_scan(num_fields
, fields
, endstate
);
2375 int retval
=jtag_execute_queue();
2377 for (i
= 0; i
< num_fields
; i
++)
2378 free(fields
[i
].out_value
);
2385 static int Jim_Command_drscan(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *args
)
2388 scan_field_t
*fields
;
2390 int field_count
= 0;
2393 tap_state_t endstate
;
2396 * args[2] = num_bits
2397 * args[3] = hex string
2398 * ... repeat num bits and hex string ...
2401 * args[N-2] = "-endstate"
2402 * args[N-1] = statename
2404 if ((argc
< 4) || ((argc
% 2)!=0))
2406 Jim_WrongNumArgs(interp
, 1, args
, "wrong arguments");
2410 endstate
= TAP_IDLE
;
2412 /* validate arguments as numbers */
2414 for (i
= 2; i
< argc
; i
+=2)
2419 e
= Jim_GetLong(interp
, args
[i
], &bits
);
2420 /* If valid - try next arg */
2425 /* Not valid.. are we at the end? */
2426 if ( ((i
+2) != argc
) ){
2427 /* nope, then error */
2431 /* it could be: "-endstate FOO"
2432 * e.g. DRPAUSE so we can issue more instructions
2433 * before entering RUN/IDLE and executing them.
2436 /* get arg as a string. */
2437 cp
= Jim_GetString( args
[i
], NULL
);
2438 /* is it the magic? */
2439 if( 0 == strcmp( "-endstate", cp
) ){
2440 /* is the statename valid? */
2441 cp
= Jim_GetString( args
[i
+1], NULL
);
2443 /* see if it is a valid state name */
2444 endstate
= tap_state_by_name(cp
);
2446 /* update the error message */
2447 Jim_SetResult_sprintf(interp
,"endstate: %s invalid", cp
);
2449 if (!scan_is_safe(endstate
))
2450 LOG_WARNING("drscan with unsafe "
2451 "endstate \"%s\"", cp
);
2453 /* valid - so clear the error */
2455 /* and remove the last 2 args */
2460 /* Still an error? */
2462 return e
; /* too bad */
2464 } /* validate args */
2466 tap
= jtag_tap_by_jim_obj( interp
, args
[1] );
2471 num_fields
=(argc
-2)/2;
2472 fields
= malloc(sizeof(scan_field_t
) * num_fields
);
2473 for (i
= 2; i
< argc
; i
+=2)
2479 Jim_GetLong(interp
, args
[i
], &bits
);
2480 str
= Jim_GetString(args
[i
+1], &len
);
2482 fields
[field_count
].tap
= tap
;
2483 fields
[field_count
].num_bits
= bits
;
2484 fields
[field_count
].out_value
= malloc(CEIL(bits
, 8));
2485 str_to_buf(str
, len
, fields
[field_count
].out_value
, bits
, 0);
2486 fields
[field_count
].in_value
= fields
[field_count
].out_value
;
2490 jtag_add_dr_scan(num_fields
, fields
, endstate
);
2492 retval
= jtag_execute_queue();
2493 if (retval
!= ERROR_OK
)
2495 Jim_SetResultString(interp
, "drscan: jtag execute failed",-1);
2500 Jim_Obj
*list
= Jim_NewListObj(interp
, NULL
, 0);
2501 for (i
= 2; i
< argc
; i
+=2)
2506 Jim_GetLong(interp
, args
[i
], &bits
);
2507 str
= buf_to_str(fields
[field_count
].in_value
, bits
, 16);
2508 free(fields
[field_count
].out_value
);
2510 Jim_ListAppendElement(interp
, list
, Jim_NewStringObj(interp
, str
, strlen(str
)));
2515 Jim_SetResult(interp
, list
);
2523 static int Jim_Command_flush_count(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *args
)
2525 Jim_SetResult(interp
, Jim_NewIntObj(interp
, jtag_get_flush_queue_count()));
2531 static int handle_verify_ircapture_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2535 if (strcmp(args
[0], "enable") == 0)
2537 jtag_verify_capture_ir
= 1;
2539 else if (strcmp(args
[0], "disable") == 0)
2541 jtag_verify_capture_ir
= 0;
2544 return ERROR_COMMAND_SYNTAX_ERROR
;
2546 } else if (argc
!= 0)
2548 return ERROR_COMMAND_SYNTAX_ERROR
;
2551 command_print(cmd_ctx
, "verify Capture-IR is %s", (jtag_verify_capture_ir
) ? "enabled": "disabled");
2556 void jtag_set_verify(bool enable
)
2558 jtag_verify
= enable
;
2561 bool jtag_will_verify()
2566 static int handle_verify_jtag_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2569 return ERROR_COMMAND_SYNTAX_ERROR
;
2573 if (strcmp(args
[0], "enable") == 0)
2574 jtag_set_verify(true);
2575 else if (strcmp(args
[0], "disable") == 0)
2576 jtag_set_verify(false);
2578 return ERROR_COMMAND_SYNTAX_ERROR
;
2581 const char *status
= jtag_will_verify() ? "enabled": "disabled";
2582 command_print(cmd_ctx
, "verify jtag capture is %s", status
);
2588 int jtag_power_dropout(int *dropout
)
2590 return jtag
->power_dropout(dropout
);
2593 int jtag_srst_asserted(int *srst_asserted
)
2595 return jtag
->srst_asserted(srst_asserted
);
2598 void jtag_tap_handle_event( jtag_tap_t
* tap
, enum jtag_tap_event e
)
2600 jtag_tap_event_action_t
* jteap
;
2603 jteap
= tap
->event_action
;
2607 if (jteap
->event
== e
) {
2609 LOG_DEBUG( "JTAG tap: %s event: %d (%s) action: %s\n",
2612 Jim_Nvp_value2name_simple(nvp_jtag_tap_event
, e
)->name
,
2613 Jim_GetString(jteap
->body
, NULL
) );
2614 if (Jim_EvalObj(interp
, jteap
->body
) != JIM_OK
) {
2615 Jim_PrintErrorMessage(interp
);
2619 jteap
= jteap
->next
;
2623 LOG_DEBUG( "event %d %s - no action",
2625 Jim_Nvp_value2name_simple( nvp_jtag_tap_event
, e
)->name
);
2629 static int handle_tms_sequence_command(struct command_context_s
*cmd_ctx
, char *cmd
, char **args
, int argc
)
2632 return ERROR_COMMAND_SYNTAX_ERROR
;
2637 if (strcmp(args
[0], "short") == 0)
2638 use_new_table
= true;
2639 else if (strcmp(args
[0], "long") == 0)
2640 use_new_table
= false;
2642 return ERROR_COMMAND_SYNTAX_ERROR
;
2644 tap_use_new_tms_table(use_new_table
);
2647 command_print(cmd_ctx
, "tms sequence is %s",
2648 tap_uses_new_tms_table() ? "short": "long");
2654 * Function jtag_add_statemove
2655 * moves from the current state to the goal \a state. This needs
2656 * to be handled according to the xsvf spec, see the XSTATE command
2659 int jtag_add_statemove(tap_state_t goal_state
)
2661 int retval
= ERROR_OK
;
2663 tap_state_t moves
[8];
2664 tap_state_t cur_state
= cmd_queue_cur_state
;
2669 LOG_DEBUG( "cur_state=%s goal_state=%s",
2670 tap_state_name(cur_state
),
2671 tap_state_name(goal_state
) );
2674 /* From the XSVF spec, pertaining to XSTATE:
2676 For special states known as stable states (Test-Logic-Reset,
2677 Run-Test/Idle, Pause-DR, Pause- IR), an XSVF interpreter follows
2678 predefined TAP state paths when the starting state is a stable state and
2679 when the XSTATE specifies a new stable state (see the STATE command in
2680 the [Ref 5] for the TAP state paths between stable states). For
2681 non-stable states, XSTATE should specify a state that is only one TAP
2682 state transition distance from the current TAP state to avoid undefined
2683 TAP state paths. A sequence of multiple XSTATE commands can be issued to
2684 transition the TAP through a specific state path.
2687 if (goal_state
==cur_state
)
2688 ; /* nothing to do */
2690 else if( goal_state
==TAP_RESET
)
2695 else if( tap_is_state_stable(cur_state
) && tap_is_state_stable(goal_state
) )
2697 /* note: unless tms_bits holds a path that agrees with [Ref 5] in above
2698 spec, then this code is not fully conformant to the xsvf spec. This
2699 puts a burden on tap_get_tms_path() function from the xsvf spec.
2700 If in doubt, you should confirm that that burden is being met.
2703 tms_bits
= tap_get_tms_path(cur_state
, goal_state
);
2704 tms_count
= tap_get_tms_path_len(cur_state
, goal_state
);
2706 assert( (unsigned) tms_count
< DIM(moves
) );
2708 for (i
=0; i
<tms_count
; i
++, tms_bits
>>=1)
2710 bool bit
= tms_bits
& 1;
2712 cur_state
= tap_state_transition(cur_state
, bit
);
2713 moves
[i
] = cur_state
;
2716 jtag_add_pathmove(tms_count
, moves
);
2719 /* else state must be immediately reachable in one clock cycle, and does not
2720 need to be a stable state.
2722 else if( tap_state_transition(cur_state
, true) == goal_state
2723 || tap_state_transition(cur_state
, false) == goal_state
)
2725 /* move a single state */
2726 moves
[0] = goal_state
;
2727 jtag_add_pathmove( 1, moves
);
2732 retval
= ERROR_FAIL
;
2738 void jtag_set_nsrst_delay(unsigned delay
)
2740 jtag_nsrst_delay
= delay
;
2742 void jtag_set_ntrst_delay(unsigned delay
)
2744 jtag_ntrst_delay
= delay
;
Linking to existing account procedure
If you already have an account and want to add another login method
you
MUST first sign in with your existing account and
then change URL to read
https://review.openocd.org/login/?link
to get to this page again but this time it'll work for linking. Thank you.
SSH host keys fingerprints
1024 SHA256:YKx8b7u5ZWdcbp7/4AeXNaqElP49m6QrwfXaqQGJAOk gerrit-code-review@openocd.zylin.com (DSA)
384 SHA256:jHIbSQa4REvwCFG4cq5LBlBLxmxSqelQPem/EXIrxjk gerrit-code-review@openocd.org (ECDSA)
521 SHA256:UAOPYkU9Fjtcao0Ul/Rrlnj/OsQvt+pgdYSZ4jOYdgs gerrit-code-review@openocd.org (ECDSA)
256 SHA256:A13M5QlnozFOvTllybRZH6vm7iSt0XLxbA48yfc2yfY gerrit-code-review@openocd.org (ECDSA)
256 SHA256:spYMBqEYoAOtK7yZBrcwE8ZpYt6b68Cfh9yEVetvbXg gerrit-code-review@openocd.org (ED25519)
+--[ED25519 256]--+
|=.. |
|+o.. . |
|*.o . . |
|+B . . . |
|Bo. = o S |
|Oo.+ + = |
|oB=.* = . o |
| =+=.+ + E |
|. .=o . o |
+----[SHA256]-----+
2048 SHA256:0Onrb7/PHjpo6iVZ7xQX2riKN83FJ3KGU0TvI0TaFG4 gerrit-code-review@openocd.zylin.com (RSA)