minidriver build test driver "minidriver"
[openocd.git] / src / jtag / 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 * Copyright (C) 2009 SoftPLC Corporation *
9 * http://softplc.com *
10 * dick@softplc.com *
11 * *
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. *
16 * *
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. *
21 * *
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 ***************************************************************************/
27 #ifdef HAVE_CONFIG_H
28 #include "config.h"
29 #endif
30
31 #include "jtag.h"
32 #include "minidriver.h"
33 #include "interface.h"
34
35 #ifdef HAVE_STRINGS_H
36 #include <strings.h>
37 #endif
38
39
40 /// The number of JTAG queue flushes (for profiling and debugging purposes).
41 static int jtag_flush_queue_count;
42
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);
45
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
48 */
49 int jtag_error=ERROR_OK;
50
51 char* jtag_event_strings[] =
52 {
53 "JTAG controller reset (RESET or TRST)"
54 };
55
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" },
59
60 { .name = NULL, .value = -1 }
61 };
62
63 int jtag_trst = 0;
64 int jtag_srst = 0;
65
66 /**
67 * List all TAPs that have been created.
68 */
69 static jtag_tap_t *__jtag_all_taps = NULL;
70 /**
71 * The number of TAPs in the __jtag_all_taps list, used to track the
72 * assigned chain position to new TAPs
73 */
74 static int jtag_num_taps = 0;
75
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;
79
80 int jtag_verify_capture_ir = 1;
81 int jtag_verify = 1;
82
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 */
86
87 /* callbacks to inform high-level handlers about JTAG state changes */
88 jtag_event_callback_t *jtag_event_callbacks;
89
90 /* speed in kHz*/
91 static int speed_khz = 0;
92 /* flag if the kHz speed was defined */
93 static bool hasKHz = false;
94
95 /* jtag interfaces (parport, FTDI-USB, TI-USB, ...)
96 */
97
98 #if BUILD_ECOSBOARD == 1
99 extern jtag_interface_t zy1000_interface;
100 #endif
101
102 #if BUILD_MINIDUMMY == 1
103 extern jtag_interface_t minidummy_interface;
104 #endif
105 #if BUILD_PARPORT == 1
106 extern jtag_interface_t parport_interface;
107 #endif
108
109 #if BUILD_DUMMY == 1
110 extern jtag_interface_t dummy_interface;
111 #endif
112
113 #if BUILD_FT2232_FTD2XX == 1
114 extern jtag_interface_t ft2232_interface;
115 #endif
116
117 #if BUILD_FT2232_LIBFTDI == 1
118 extern jtag_interface_t ft2232_interface;
119 #endif
120
121 #if BUILD_AMTJTAGACCEL == 1
122 extern jtag_interface_t amt_jtagaccel_interface;
123 #endif
124
125 #if BUILD_EP93XX == 1
126 extern jtag_interface_t ep93xx_interface;
127 #endif
128
129 #if BUILD_AT91RM9200 == 1
130 extern jtag_interface_t at91rm9200_interface;
131 #endif
132
133 #if BUILD_GW16012 == 1
134 extern jtag_interface_t gw16012_interface;
135 #endif
136
137 #if BUILD_PRESTO_LIBFTDI == 1 || BUILD_PRESTO_FTD2XX == 1
138 extern jtag_interface_t presto_interface;
139 #endif
140
141 #if BUILD_USBPROG == 1
142 extern jtag_interface_t usbprog_interface;
143 #endif
144
145 #if BUILD_JLINK == 1
146 extern jtag_interface_t jlink_interface;
147 #endif
148
149 #if BUILD_VSLLINK == 1
150 extern jtag_interface_t vsllink_interface;
151 #endif
152
153 #if BUILD_RLINK == 1
154 extern jtag_interface_t rlink_interface;
155 #endif
156
157 #if BUILD_ARMJTAGEW == 1
158 extern jtag_interface_t armjtagew_interface;
159 #endif
160
161 jtag_interface_t *jtag_interfaces[] = {
162 #if BUILD_ECOSBOARD == 1
163 &zy1000_interface,
164 #endif
165 #if BUILD_MINIDUMMY == 1
166 &minidummy_interface,
167 #endif
168 #if BUILD_PARPORT == 1
169 &parport_interface,
170 #endif
171 #if BUILD_DUMMY == 1
172 &dummy_interface,
173 #endif
174 #if BUILD_FT2232_FTD2XX == 1
175 &ft2232_interface,
176 #endif
177 #if BUILD_FT2232_LIBFTDI == 1
178 &ft2232_interface,
179 #endif
180 #if BUILD_AMTJTAGACCEL == 1
181 &amt_jtagaccel_interface,
182 #endif
183 #if BUILD_EP93XX == 1
184 &ep93xx_interface,
185 #endif
186 #if BUILD_AT91RM9200 == 1
187 &at91rm9200_interface,
188 #endif
189 #if BUILD_GW16012 == 1
190 &gw16012_interface,
191 #endif
192 #if BUILD_PRESTO_LIBFTDI == 1 || BUILD_PRESTO_FTD2XX == 1
193 &presto_interface,
194 #endif
195 #if BUILD_USBPROG == 1
196 &usbprog_interface,
197 #endif
198 #if BUILD_JLINK == 1
199 &jlink_interface,
200 #endif
201 #if BUILD_VSLLINK == 1
202 &vsllink_interface,
203 #endif
204 #if BUILD_RLINK == 1
205 &rlink_interface,
206 #endif
207 #if BUILD_ARMJTAGEW == 1
208 &armjtagew_interface,
209 #endif
210 NULL,
211 };
212
213 struct jtag_interface_s *jtag = NULL;
214
215 /* configuration */
216 static jtag_interface_t *jtag_interface = NULL;
217 int jtag_speed = 0;
218
219 /* jtag commands */
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);
227
228 static int handle_scan_chain_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
229
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);
236
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);
240
241 jtag_tap_t *jtag_all_taps(void)
242 {
243 return __jtag_all_taps;
244 };
245
246 int jtag_tap_count(void)
247 {
248 return jtag_num_taps;
249 }
250
251 unsigned jtag_tap_count_enabled(void)
252 {
253 jtag_tap_t *t;
254 unsigned n;
255
256 n = 0;
257 t = jtag_all_taps();
258 while(t){
259 if( t->enabled ){
260 n++;
261 }
262 t = t->next_tap;
263 }
264 return n;
265 }
266
267 /// Append a new TAP to the chain of all taps.
268 static void jtag_tap_add(struct jtag_tap_s *t)
269 {
270 t->abs_chain_position = jtag_num_taps++;
271
272 jtag_tap_t **tap = &__jtag_all_taps;
273 while(*tap != NULL)
274 tap = &(*tap)->next_tap;
275 *tap = t;
276 }
277
278 jtag_tap_t *jtag_tap_by_string( const char *s )
279 {
280 jtag_tap_t *t;
281 char *cp;
282
283 t = jtag_all_taps();
284 /* try name first */
285 while(t){
286 if( 0 == strcmp( t->dotted_name, s ) ){
287 break;
288 } else {
289 t = t->next_tap;
290 }
291 }
292 /* backup plan is by number */
293 if( t == NULL ){
294 /* ok - is "s" a number? */
295 int n;
296 n = strtol( s, &cp, 0 );
297 if( (s != cp) && (*cp == 0) ){
298 /* Then it is... */
299 t = jtag_tap_by_abs_position(n);
300 }
301 }
302 return t;
303 }
304
305 jtag_tap_t * jtag_tap_by_jim_obj( Jim_Interp *interp, Jim_Obj *o )
306 {
307 jtag_tap_t *t;
308 const char *cp;
309
310 cp = Jim_GetString( o, NULL );
311 if(cp == NULL){
312 cp = "(unknown)";
313 t = NULL;
314 } else {
315 t = jtag_tap_by_string( cp );
316 }
317 if( t == NULL ){
318 Jim_SetResult_sprintf(interp,"Tap: %s is unknown", cp );
319 }
320 return t;
321 }
322
323 /* returns a pointer to the n-th device in the scan chain */
324 jtag_tap_t * jtag_tap_by_abs_position( int n )
325 {
326 int orig_n;
327 jtag_tap_t *t;
328
329 orig_n = n;
330 t = jtag_all_taps();
331
332 while( t && (n > 0)) {
333 n--;
334 t = t->next_tap;
335 }
336 return t;
337 }
338
339 const char *jtag_tap_name(const jtag_tap_t *tap)
340 {
341 return (tap == NULL) ? "(unknown)" : tap->dotted_name;
342 }
343
344
345 int jtag_register_event_callback(int (*callback)(enum jtag_event event, void *priv), void *priv)
346 {
347 jtag_event_callback_t **callbacks_p = &jtag_event_callbacks;
348
349 if (callback == NULL)
350 {
351 return ERROR_INVALID_ARGUMENTS;
352 }
353
354 if (*callbacks_p)
355 {
356 while ((*callbacks_p)->next)
357 callbacks_p = &((*callbacks_p)->next);
358 callbacks_p = &((*callbacks_p)->next);
359 }
360
361 (*callbacks_p) = malloc(sizeof(jtag_event_callback_t));
362 (*callbacks_p)->callback = callback;
363 (*callbacks_p)->priv = priv;
364 (*callbacks_p)->next = NULL;
365
366 return ERROR_OK;
367 }
368
369 int jtag_unregister_event_callback(int (*callback)(enum jtag_event event, void *priv))
370 {
371 jtag_event_callback_t **callbacks_p = &jtag_event_callbacks;
372
373 if (callback == NULL)
374 {
375 return ERROR_INVALID_ARGUMENTS;
376 }
377
378 while (*callbacks_p)
379 {
380 jtag_event_callback_t **next = &((*callbacks_p)->next);
381 if ((*callbacks_p)->callback == callback)
382 {
383 free(*callbacks_p);
384 *callbacks_p = *next;
385 }
386 callbacks_p = next;
387 }
388
389 return ERROR_OK;
390 }
391
392 int jtag_call_event_callbacks(enum jtag_event event)
393 {
394 jtag_event_callback_t *callback = jtag_event_callbacks;
395
396 LOG_DEBUG("jtag event: %s", jtag_event_strings[event]);
397
398 while (callback)
399 {
400 callback->callback(event, callback->priv);
401 callback = callback->next;
402 }
403
404 return ERROR_OK;
405 }
406
407 static void jtag_checks(void)
408 {
409 assert(jtag_trst == 0);
410 }
411
412 static void jtag_prelude(tap_state_t state)
413 {
414 jtag_checks();
415
416 assert(state!=TAP_INVALID);
417
418 cmd_queue_cur_state = state;
419 }
420
421 void jtag_alloc_in_value32(scan_field_t *field)
422 {
423 interface_jtag_alloc_in_value32(field);
424 }
425
426 void jtag_add_ir_scan_noverify(int in_num_fields, const scan_field_t *in_fields, tap_state_t state)
427 {
428 int retval;
429 jtag_prelude(state);
430
431 retval=interface_jtag_add_ir_scan(in_num_fields, in_fields, state);
432 if (retval!=ERROR_OK)
433 jtag_error=retval;
434
435 }
436
437
438 /**
439 * Generate an IR SCAN with a list of scan fields with one entry for each enabled TAP.
440 *
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.
443 *
444 * TAPs for which no fields are passed are marked as bypassed for subsequent DR SCANs.
445 *
446 */
447 void jtag_add_ir_scan(int in_num_fields, scan_field_t *in_fields, tap_state_t state)
448 {
449 if (jtag_verify&&jtag_verify_capture_ir)
450 {
451 /* 8 x 32 bit id's is enough for all invocations */
452
453 for (int j = 0; j < in_num_fields; j++)
454 {
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.
457 */
458 in_fields[j].check_value=in_fields[j].tap->expected;
459 in_fields[j].check_mask=in_fields[j].tap->expected_mask;
460 }
461 jtag_add_scan_check(jtag_add_ir_scan_noverify, in_num_fields, in_fields, state);
462 } else
463 {
464 jtag_add_ir_scan_noverify(in_num_fields, in_fields, state);
465 }
466 }
467
468 /**
469 * Duplicate the scan fields passed into the function into an IR SCAN command
470 *
471 * This function assumes that the caller handles extra fields for bypassed TAPs
472 *
473 */
474 void jtag_add_plain_ir_scan(int in_num_fields, const scan_field_t *in_fields, tap_state_t state)
475 {
476 int retval;
477
478 jtag_prelude(state);
479
480 retval=interface_jtag_add_plain_ir_scan(in_num_fields, in_fields, state);
481 if (retval!=ERROR_OK)
482 jtag_error=retval;
483 }
484
485 void jtag_add_callback(jtag_callback1_t f, u8 *in)
486 {
487 interface_jtag_add_callback(f, in);
488 }
489
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)
493 {
494 interface_jtag_add_callback4(f, in, data1, data2, data3);
495 }
496
497 int jtag_check_value_inner(u8 *captured, u8 *in_check_value, u8 *in_check_mask, int num_bits);
498
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)
500 {
501 return jtag_check_value_inner(in, (u8 *)data1, (u8 *)data2, (int)data3);
502 }
503
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)
506 {
507 for (int i = 0; i < in_num_fields; i++)
508 {
509 struct scan_field_s *field = &in_fields[i];
510 field->allocated = 0;
511 field->modified = 0;
512 if (field->check_value || field->in_value)
513 continue;
514 interface_jtag_add_scan_check_alloc(field);
515 field->modified = 1;
516 }
517
518 jtag_add_scan(in_num_fields, in_fields, state);
519
520 for (int i = 0; i < in_num_fields; i++)
521 {
522 if ((in_fields[i].check_value != NULL) && (in_fields[i].in_value != NULL))
523 {
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);
529 }
530 if (in_fields[i].allocated)
531 {
532 free(in_fields[i].in_value);
533 }
534 if (in_fields[i].modified)
535 {
536 in_fields[i].in_value = NULL;
537 }
538 }
539 }
540
541 void jtag_add_dr_scan_check(int in_num_fields, scan_field_t *in_fields, tap_state_t state)
542 {
543 if (jtag_verify)
544 {
545 jtag_add_scan_check(jtag_add_dr_scan, in_num_fields, in_fields, state);
546 } else
547 {
548 jtag_add_dr_scan(in_num_fields, in_fields, state);
549 }
550 }
551
552
553 /**
554 * Generate a DR SCAN using the fields passed to the function
555 *
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.
558 *
559 * The bypass status of TAPs is set by jtag_add_ir_scan().
560 *
561 */
562 void jtag_add_dr_scan(int in_num_fields, const scan_field_t *in_fields, tap_state_t state)
563 {
564 int retval;
565
566 jtag_prelude(state);
567
568 retval=interface_jtag_add_dr_scan(in_num_fields, in_fields, state);
569 if (retval!=ERROR_OK)
570 jtag_error=retval;
571 }
572
573
574
575 /**
576 * Duplicate the scan fields passed into the function into a DR SCAN command
577 *
578 * This function assumes that the caller handles extra fields for bypassed TAPs
579 *
580 */
581 void jtag_add_plain_dr_scan(int in_num_fields, const scan_field_t *in_fields, tap_state_t state)
582 {
583 int retval;
584
585 jtag_prelude(state);
586
587 retval=interface_jtag_add_plain_dr_scan(in_num_fields, in_fields, state);
588 if (retval!=ERROR_OK)
589 jtag_error=retval;
590 }
591
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)
595 {
596 assert(end_state != TAP_INVALID);
597
598 cmd_queue_cur_state = end_state;
599
600 interface_jtag_add_dr_out(tap,
601 num_fields, num_bits, value,
602 end_state);
603 }
604
605 void jtag_add_tlr(void)
606 {
607 jtag_prelude(TAP_RESET);
608
609 int retval;
610 retval=interface_jtag_add_tlr();
611 if (retval!=ERROR_OK)
612 jtag_error=retval;
613
614 jtag_call_event_callbacks(JTAG_TRST_ASSERTED);
615 }
616
617 void jtag_add_pathmove(int num_states, const tap_state_t *path)
618 {
619 tap_state_t cur_state = cmd_queue_cur_state;
620 int i;
621 int retval;
622
623 /* the last state has to be a stable state */
624 if (!tap_is_state_stable(path[num_states - 1]))
625 {
626 LOG_ERROR("BUG: TAP path doesn't finish in a stable state");
627 exit(-1);
628 }
629
630 for (i=0; i<num_states; i++)
631 {
632 if (path[i] == TAP_RESET)
633 {
634 LOG_ERROR("BUG: TAP_RESET is not a valid state for pathmove sequences");
635 exit(-1);
636 }
637
638 if ( tap_state_transition(cur_state, true) != path[i]
639 && tap_state_transition(cur_state, false) != path[i])
640 {
641 LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition", tap_state_name(cur_state), tap_state_name(path[i]));
642 exit(-1);
643 }
644 cur_state = path[i];
645 }
646
647 jtag_checks();
648
649 retval = interface_jtag_add_pathmove(num_states, path);
650 cmd_queue_cur_state = path[num_states - 1];
651 if (retval!=ERROR_OK)
652 jtag_error=retval;
653 }
654
655 void jtag_add_runtest(int num_cycles, tap_state_t state)
656 {
657 int retval;
658
659 jtag_prelude(state);
660
661 /* executed by sw or hw fifo */
662 retval=interface_jtag_add_runtest(num_cycles, state);
663 if (retval!=ERROR_OK)
664 jtag_error=retval;
665 }
666
667
668 void jtag_add_clocks( int num_cycles )
669 {
670 int retval;
671
672 if( !tap_is_state_stable(cmd_queue_cur_state) )
673 {
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;
677 return;
678 }
679
680 if( num_cycles > 0 )
681 {
682 jtag_checks();
683
684 retval = interface_jtag_add_clocks(num_cycles);
685 if (retval != ERROR_OK)
686 jtag_error=retval;
687 }
688 }
689
690 void jtag_add_reset(int req_tlr_or_trst, int req_srst)
691 {
692 int trst_with_tlr = 0;
693 int retval;
694
695 /* FIX!!! there are *many* different cases here. A better
696 * approach is needed for legal combinations of transitions...
697 */
698 if ((jtag_reset_config & RESET_HAS_SRST)&&
699 (jtag_reset_config & RESET_HAS_TRST)&&
700 ((jtag_reset_config & RESET_SRST_PULLS_TRST)==0))
701 {
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)))
706 {
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");
709 }
710 }
711
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))
715 {
716 LOG_ERROR("BUG: requested reset would assert trst");
717 jtag_error=ERROR_FAIL;
718 return;
719 }
720
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))
723 {
724 trst_with_tlr = 1;
725 }
726
727 if (req_srst && !(jtag_reset_config & RESET_HAS_SRST))
728 {
729 LOG_ERROR("BUG: requested SRST assertion, but the current configuration doesn't support this");
730 jtag_error=ERROR_FAIL;
731 return;
732 }
733
734 if (req_tlr_or_trst)
735 {
736 if (!trst_with_tlr && (jtag_reset_config & RESET_HAS_TRST))
737 {
738 jtag_trst = 1;
739 } else
740 {
741 trst_with_tlr = 1;
742 }
743 } else
744 {
745 jtag_trst = 0;
746 }
747
748 jtag_srst = req_srst;
749
750 retval = interface_jtag_add_reset(jtag_trst, jtag_srst);
751 if (retval!=ERROR_OK)
752 {
753 jtag_error=retval;
754 return;
755 }
756 jtag_execute_queue();
757
758 if (jtag_srst)
759 {
760 LOG_DEBUG("SRST line asserted");
761 }
762 else
763 {
764 LOG_DEBUG("SRST line released");
765 if (jtag_nsrst_delay)
766 jtag_add_sleep(jtag_nsrst_delay * 1000);
767 }
768
769 if (trst_with_tlr)
770 {
771 LOG_DEBUG("JTAG reset with RESET instead of TRST");
772 jtag_set_end_state(TAP_RESET);
773 jtag_add_tlr();
774 return;
775 }
776
777 if (jtag_trst)
778 {
779 /* we just asserted nTRST, so we're now in Test-Logic-Reset,
780 * and inform possible listeners about this
781 */
782 LOG_DEBUG("TRST line asserted");
783 tap_set_state(TAP_RESET);
784 jtag_call_event_callbacks(JTAG_TRST_ASSERTED);
785 }
786 else
787 {
788 if (jtag_ntrst_delay)
789 jtag_add_sleep(jtag_ntrst_delay * 1000);
790 }
791 }
792
793 tap_state_t jtag_set_end_state(tap_state_t state)
794 {
795 if ((state == TAP_DRSHIFT)||(state == TAP_IRSHIFT))
796 {
797 LOG_ERROR("BUG: TAP_DRSHIFT/IRSHIFT can't be end state. Calling code should use a larger scan field");
798 }
799
800 if (state!=TAP_INVALID)
801 cmd_queue_end_state = state;
802 return cmd_queue_end_state;
803 }
804
805 tap_state_t jtag_get_end_state(void)
806 {
807 return cmd_queue_end_state;
808 }
809
810 void jtag_add_sleep(u32 us)
811 {
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)
815 jtag_error=retval;
816 return;
817 }
818
819 int jtag_check_value_inner(u8 *captured, u8 *in_check_value, u8 *in_check_mask, int num_bits)
820 {
821 int retval = ERROR_OK;
822
823 int compare_failed = 0;
824
825 if (in_check_mask)
826 compare_failed = buf_cmp_mask(captured, in_check_value, in_check_mask, num_bits);
827 else
828 compare_failed = buf_cmp(captured, in_check_value, num_bits);
829
830 if (compare_failed){
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
834 */
835 /*
836 LOG_WARNING("TAP %s:",
837 jtag_tap_name(field->tap));
838 */
839 if (compare_failed)
840 {
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);
843
844 if (in_check_mask)
845 {
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);
852 }
853 else
854 {
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);
856 }
857
858 free(captured_char);
859 free(in_check_value_char);
860
861 retval = ERROR_JTAG_QUEUE_FAILED;
862 }
863
864 }
865 return retval;
866 }
867
868 void jtag_check_value_mask(scan_field_t *field, u8 *value, u8 *mask)
869 {
870 assert(field->in_value != NULL);
871
872 if (value==NULL)
873 {
874 /* no checking to do */
875 return;
876 }
877
878 jtag_execute_queue_noclear();
879
880 int retval=jtag_check_value_inner(field->in_value, value, mask, field->num_bits);
881 jtag_set_error(retval);
882 }
883
884
885
886 int default_interface_jtag_execute_queue(void)
887 {
888 if (NULL == jtag)
889 {
890 LOG_ERROR("No JTAG interface configured yet. "
891 "Issue 'init' command in startup scripts "
892 "before communicating with targets.");
893 return ERROR_FAIL;
894 }
895
896 return jtag->execute_queue();
897 }
898
899 void jtag_execute_queue_noclear(void)
900 {
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....
903 */
904 jtag_flush_queue_count++;
905
906 int retval=interface_jtag_execute_queue();
907 /* we keep the first error */
908 if ((jtag_error==ERROR_OK)&&(retval!=ERROR_OK))
909 {
910 jtag_error=retval;
911 }
912 }
913
914 int jtag_get_flush_queue_count(void)
915 {
916 return jtag_flush_queue_count;
917 }
918
919 int jtag_execute_queue(void)
920 {
921 int retval;
922 jtag_execute_queue_noclear();
923 retval=jtag_error;
924 jtag_error=ERROR_OK;
925 return retval;
926 }
927
928 static int jtag_reset_callback(enum jtag_event event, void *priv)
929 {
930 jtag_tap_t *tap = priv;
931
932 LOG_DEBUG("-");
933
934 if (event == JTAG_TRST_ASSERTED)
935 {
936 buf_set_ones(tap->cur_instr, tap->ir_length);
937 tap->bypass = 1;
938 }
939
940 return ERROR_OK;
941 }
942
943 void jtag_sleep(u32 us)
944 {
945 alive_sleep(us/1000);
946 }
947
948 /// maximum number of JTAG devices expected in the chain
949 #define JTAG_MAX_CHAIN_SIZE 20
950
951 #define EXTRACT_MFG(X) (((X) & 0xffe) >> 1)
952 #define EXTRACT_PART(X) (((X) & 0xffff000) >> 12)
953 #define EXTRACT_VER(X) (((X) & 0xf0000000) >> 28)
954
955 static int jtag_examine_chain_execute(u8 *idcode_buffer, unsigned num_idcode)
956 {
957 scan_field_t field = {
958 .tap = NULL,
959 .num_bits = num_idcode * 32,
960 .out_value = idcode_buffer,
961 .in_value = idcode_buffer,
962 };
963
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);
967
968 jtag_add_plain_dr_scan(1, &field, TAP_RESET);
969 return jtag_execute_queue();
970 }
971
972 static bool jtag_examine_chain_check(u8 *idcodes, unsigned count)
973 {
974 u8 zero_check = 0x0;
975 u8 one_check = 0xff;
976
977 for (unsigned i = 0; i < count * 4; i++)
978 {
979 zero_check |= idcodes[i];
980 one_check &= idcodes[i];
981 }
982
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)
986 {
987 LOG_ERROR("JTAG communication failure: check connection, "
988 "JTAG interface, target power etc.");
989 return false;
990 }
991 return true;
992 }
993
994 static void jtag_examine_chain_display(enum log_levels level, const char *msg,
995 const char *name, u32 idcode)
996 {
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)",
1000 name, msg, idcode,
1001 EXTRACT_MFG(idcode), EXTRACT_PART(idcode), EXTRACT_VER(idcode) );
1002 }
1003
1004 static bool jtag_idcode_is_final(u32 idcode)
1005 {
1006 return idcode == 0x000000FF || idcode == 0xFFFFFFFF;
1007 }
1008
1009 /**
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.
1014 */
1015 static void jtag_examine_chain_end(u8 *idcodes, unsigned count, unsigned max)
1016 {
1017 bool triggered = false;
1018 for ( ; count < max - 31; count += 32)
1019 {
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))
1023 continue;
1024 LOG_WARNING("Unexpected idcode after end of chain: %d 0x%08x",
1025 count, idcode);
1026 triggered = true;
1027 }
1028 }
1029
1030 static bool jtag_examine_chain_match_tap(const struct jtag_tap_s *tap)
1031 {
1032 if (0 == tap->expected_ids_cnt)
1033 {
1034 /// @todo Enable LOG_INFO to ask for reports about unknown TAP IDs.
1035 #if 0
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");
1038 #endif
1039 return true;
1040 }
1041
1042 /* Loop over the expected identification codes and test for a match */
1043 u8 ii;
1044 for (ii = 0; ii < tap->expected_ids_cnt; ii++)
1045 {
1046 if (tap->idcode == tap->expected_ids[ii])
1047 break;
1048 }
1049
1050 /* If none of the expected ids matched, log an error */
1051 if (ii != tap->expected_ids_cnt)
1052 {
1053 LOG_INFO("JTAG Tap/device matched");
1054 return true;
1055 }
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++)
1059 {
1060 char msg[32];
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]);
1065 }
1066 return false;
1067 }
1068
1069 /* Try to examine chain layout according to IEEE 1149.1 §12
1070 */
1071 static int jtag_examine_chain(void)
1072 {
1073 u8 idcode_buffer[JTAG_MAX_CHAIN_SIZE * 4];
1074 unsigned device_count = 0;
1075
1076 jtag_examine_chain_execute(idcode_buffer, JTAG_MAX_CHAIN_SIZE);
1077
1078 if (!jtag_examine_chain_check(idcode_buffer, JTAG_MAX_CHAIN_SIZE))
1079 return ERROR_JTAG_INIT_FAILED;
1080
1081 /* point at the 1st tap */
1082 jtag_tap_t *tap = jtag_tap_next_enabled(NULL);
1083 if (tap == NULL)
1084 {
1085 LOG_ERROR("JTAG: No taps enabled?");
1086 return ERROR_JTAG_INIT_FAILED;
1087 }
1088
1089 for (unsigned bit_count = 0; bit_count < (JTAG_MAX_CHAIN_SIZE * 32) - 31;)
1090 {
1091 u32 idcode = buf_get_u32(idcode_buffer, bit_count, 32);
1092 if ((idcode & 1) == 0)
1093 {
1094 /* LSB must not be 0, this indicates a device in bypass */
1095 LOG_WARNING("Tap/Device does not have IDCODE");
1096 idcode=0;
1097
1098 bit_count += 1;
1099 }
1100 else
1101 {
1102 /*
1103 * End of chain (invalid manufacturer ID) some devices, such
1104 * as AVR will output all 1's instead of TDI input value at
1105 * end of chain.
1106 */
1107 if (jtag_idcode_is_final(idcode))
1108 {
1109 jtag_examine_chain_end(idcode_buffer,
1110 bit_count + 32, JTAG_MAX_CHAIN_SIZE * 32);
1111 break;
1112 }
1113
1114 jtag_examine_chain_display(LOG_LVL_INFO, "tap/device found",
1115 tap ? tap->dotted_name : "(not-named)",
1116 idcode);
1117
1118 bit_count += 32;
1119 }
1120 device_count++;
1121 if (!tap)
1122 continue;
1123
1124 tap->idcode = idcode;
1125
1126 // ensure the TAP ID does matches what was expected
1127 if (!jtag_examine_chain_match_tap(tap))
1128 return ERROR_JTAG_INIT_FAILED;
1129
1130 tap = jtag_tap_next_enabled(tap);
1131 }
1132
1133 /* see if number of discovered devices matches configuration */
1134 if (device_count != jtag_tap_count_enabled())
1135 {
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;
1142 }
1143
1144 return ERROR_OK;
1145 }
1146
1147 static int jtag_validate_chain(void)
1148 {
1149 jtag_tap_t *tap;
1150 int total_ir_length = 0;
1151 u8 *ir_test = NULL;
1152 scan_field_t field;
1153 int chain_pos = 0;
1154
1155 tap = NULL;
1156 total_ir_length = 0;
1157 for(;;){
1158 tap = jtag_tap_next_enabled(tap);
1159 if( tap == NULL ){
1160 break;
1161 }
1162 total_ir_length += tap->ir_length;
1163 }
1164
1165 total_ir_length += 2;
1166 ir_test = malloc(CEIL(total_ir_length, 8));
1167 buf_set_ones(ir_test, total_ir_length);
1168
1169 field.tap = NULL;
1170 field.num_bits = total_ir_length;
1171 field.out_value = ir_test;
1172 field.in_value = ir_test;
1173
1174
1175 jtag_add_plain_ir_scan(1, &field, TAP_RESET);
1176 jtag_execute_queue();
1177
1178 tap = NULL;
1179 chain_pos = 0;
1180 int val;
1181 for(;;){
1182 tap = jtag_tap_next_enabled(tap);
1183 if( tap == NULL ){
1184 break;
1185 }
1186
1187 val = buf_get_u32(ir_test, chain_pos, 2);
1188 if (val != 0x1)
1189 {
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);
1192 free(cbuf);
1193 free(ir_test);
1194 return ERROR_JTAG_INIT_FAILED;
1195 }
1196 chain_pos += tap->ir_length;
1197 }
1198
1199 val = buf_get_u32(ir_test, chain_pos, 2);
1200 if (val != 0x3)
1201 {
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);
1204 free(cbuf);
1205 free(ir_test);
1206 return ERROR_JTAG_INIT_FAILED;
1207 }
1208
1209 free(ir_test);
1210
1211 return ERROR_OK;
1212 }
1213
1214 enum jtag_tap_cfg_param {
1215 JCFG_EVENT
1216 };
1217
1218 static Jim_Nvp nvp_config_opts[] = {
1219 { .name = "-event", .value = JCFG_EVENT },
1220
1221 { .name = NULL, .value = -1 }
1222 };
1223
1224 static int jtag_tap_configure_cmd( Jim_GetOptInfo *goi, jtag_tap_t * tap)
1225 {
1226 Jim_Nvp *n;
1227 Jim_Obj *o;
1228 int e;
1229
1230 /* parse config or cget options */
1231 while (goi->argc > 0) {
1232 Jim_SetEmptyResult (goi->interp);
1233
1234 e = Jim_GetOpt_Nvp(goi, nvp_config_opts, &n);
1235 if (e != JIM_OK) {
1236 Jim_GetOpt_NvpUnknown(goi, nvp_config_opts, 0);
1237 return e;
1238 }
1239
1240 switch (n->value) {
1241 case JCFG_EVENT:
1242 if (goi->argc == 0) {
1243 Jim_WrongNumArgs( goi->interp, goi->argc, goi->argv, "-event ?event-name? ..." );
1244 return JIM_ERR;
1245 }
1246
1247 e = Jim_GetOpt_Nvp( goi, nvp_jtag_tap_event, &n );
1248 if (e != JIM_OK) {
1249 Jim_GetOpt_NvpUnknown(goi, nvp_jtag_tap_event, 1);
1250 return e;
1251 }
1252
1253 if (goi->isconfigure) {
1254 if (goi->argc != 1) {
1255 Jim_WrongNumArgs(goi->interp, goi->argc, goi->argv, "-event ?event-name? ?EVENT-BODY?");
1256 return JIM_ERR;
1257 }
1258 } else {
1259 if (goi->argc != 0) {
1260 Jim_WrongNumArgs(goi->interp, goi->argc, goi->argv, "-event ?event-name?");
1261 return JIM_ERR;
1262 }
1263 }
1264
1265 {
1266 jtag_tap_event_action_t *jteap;
1267
1268 jteap = tap->event_action;
1269 /* replace existing? */
1270 while (jteap) {
1271 if (jteap->event == (enum jtag_tap_event)n->value) {
1272 break;
1273 }
1274 jteap = jteap->next;
1275 }
1276
1277 if (goi->isconfigure) {
1278 if (jteap == NULL) {
1279 /* create new */
1280 jteap = calloc(1, sizeof (*jteap));
1281 }
1282 jteap->event = n->value;
1283 Jim_GetOpt_Obj( goi, &o);
1284 if (jteap->body) {
1285 Jim_DecrRefCount(interp, jteap->body);
1286 }
1287 jteap->body = Jim_DuplicateObj(goi->interp, o);
1288 Jim_IncrRefCount(jteap->body);
1289
1290 /* add to head of event list */
1291 jteap->next = tap->event_action;
1292 tap->event_action = jteap;
1293 Jim_SetEmptyResult(goi->interp);
1294 } else {
1295 /* get */
1296 if (jteap == NULL) {
1297 Jim_SetEmptyResult(goi->interp);
1298 } else {
1299 Jim_SetResult(goi->interp, Jim_DuplicateObj(goi->interp, jteap->body));
1300 }
1301 }
1302 }
1303 /* loop for more */
1304 break;
1305 }
1306 } /* while (goi->argc) */
1307
1308 return JIM_OK;
1309 }
1310
1311
1312 static void jtag_tap_init(jtag_tap_t *tap)
1313 {
1314 assert(0 != tap->ir_length);
1315
1316 tap->expected = malloc(tap->ir_length);
1317 tap->expected_mask = malloc(tap->ir_length);
1318 tap->cur_instr = malloc(tap->ir_length);
1319
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);
1323
1324 // place TAP in bypass mode
1325 tap->bypass = 1;
1326 // register the reset callback for the TAP
1327 jtag_register_event_callback(&jtag_reset_callback, tap);
1328
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);
1333 jtag_tap_add(tap);
1334 }
1335
1336 static void jtag_tap_free(jtag_tap_t *tap)
1337 {
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);
1343 free(tap);
1344 }
1345
1346 static int jim_newtap_cmd( Jim_GetOptInfo *goi )
1347 {
1348 jtag_tap_t *pTap;
1349 jim_wide w;
1350 int x;
1351 int e;
1352 int reqbits;
1353 Jim_Nvp *n;
1354 char *cp;
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 },
1369 };
1370
1371 pTap = malloc( sizeof(jtag_tap_t) );
1372 memset( pTap, 0, sizeof(*pTap) );
1373 if( !pTap ){
1374 Jim_SetResult_sprintf( goi->interp, "no memory");
1375 return JIM_ERR;
1376 }
1377 /*
1378 * we expect CHIP + TAP + OPTIONS
1379 * */
1380 if( goi->argc < 3 ){
1381 Jim_SetResult_sprintf(goi->interp, "Missing CHIP TAP OPTIONS ....");
1382 return JIM_ERR;
1383 }
1384 Jim_GetOpt_String( goi, &cp, NULL );
1385 pTap->chip = strdup(cp);
1386
1387 Jim_GetOpt_String( goi, &cp, NULL );
1388 pTap->tapname = strdup(cp);
1389
1390 /* name + dot + name + null */
1391 x = strlen(pTap->chip) + 1 + strlen(pTap->tapname) + 1;
1392 cp = malloc( x );
1393 sprintf( cp, "%s.%s", pTap->chip, pTap->tapname );
1394 pTap->dotted_name = cp;
1395
1396 LOG_DEBUG("Creating New Tap, Chip: %s, Tap: %s, Dotted: %s, %d params",
1397 pTap->chip, pTap->tapname, pTap->dotted_name, goi->argc);
1398
1399 /* default is enabled */
1400 pTap->enabled = 1;
1401
1402 /* deal with options */
1403 #define NTREQ_IRLEN 1
1404 #define NTREQ_IRCAPTURE 2
1405 #define NTREQ_IRMASK 4
1406
1407 /* clear them as we find them */
1408 reqbits = (NTREQ_IRLEN | NTREQ_IRCAPTURE | NTREQ_IRMASK);
1409
1410 while( goi->argc ){
1411 e = Jim_GetOpt_Nvp( goi, opts, &n );
1412 if( e != JIM_OK ){
1413 Jim_GetOpt_NvpUnknown( goi, opts, 0 );
1414 return e;
1415 }
1416 LOG_DEBUG("Processing option: %s", n->name );
1417 switch( n->value ){
1418 case NTAP_OPT_ENABLED:
1419 pTap->enabled = 1;
1420 break;
1421 case NTAP_OPT_DISABLED:
1422 pTap->enabled = 0;
1423 break;
1424 case NTAP_OPT_EXPECTED_ID:
1425 {
1426 u32 *new_expected_ids;
1427
1428 e = Jim_GetOpt_Wide( goi, &w );
1429 if( e != JIM_OK) {
1430 Jim_SetResult_sprintf(goi->interp, "option: %s bad parameter", n->name);
1431 return e;
1432 }
1433
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");
1437 return JIM_ERR;
1438 }
1439
1440 memcpy(new_expected_ids, pTap->expected_ids, sizeof(u32) * pTap->expected_ids_cnt);
1441
1442 new_expected_ids[pTap->expected_ids_cnt] = w;
1443
1444 free(pTap->expected_ids);
1445 pTap->expected_ids = new_expected_ids;
1446 pTap->expected_ids_cnt++;
1447 break;
1448 }
1449 case NTAP_OPT_IRLEN:
1450 case NTAP_OPT_IRMASK:
1451 case NTAP_OPT_IRCAPTURE:
1452 e = Jim_GetOpt_Wide( goi, &w );
1453 if( e != JIM_OK ){
1454 Jim_SetResult_sprintf( goi->interp, "option: %s bad parameter", n->name );
1455 return e;
1456 }
1457 if( (w < 0) || (w > 0xffff) ){
1458 /* wacky value */
1459 Jim_SetResult_sprintf( goi->interp, "option: %s - wacky value: %d (0x%x)",
1460 n->name, (int)(w), (int)(w));
1461 return JIM_ERR;
1462 }
1463 switch(n->value){
1464 case NTAP_OPT_IRLEN:
1465 pTap->ir_length = w;
1466 reqbits &= (~(NTREQ_IRLEN));
1467 break;
1468 case NTAP_OPT_IRMASK:
1469 pTap->ir_capture_mask = w;
1470 reqbits &= (~(NTREQ_IRMASK));
1471 break;
1472 case NTAP_OPT_IRCAPTURE:
1473 pTap->ir_capture_value = w;
1474 reqbits &= (~(NTREQ_IRCAPTURE));
1475 break;
1476 }
1477 } /* switch(n->value) */
1478 } /* while( goi->argc ) */
1479
1480 /* Did all the required option bits get cleared? */
1481 if (0 == reqbits)
1482 {
1483 jtag_tap_init(pTap);
1484 return ERROR_OK;
1485 }
1486
1487 Jim_SetResult_sprintf( goi->interp,
1488 "newtap: %s missing required parameters",
1489 pTap->dotted_name);
1490 jtag_tap_free(pTap);
1491 return JIM_ERR;
1492 }
1493
1494 static int jim_jtag_command( Jim_Interp *interp, int argc, Jim_Obj *const *argv )
1495 {
1496 Jim_GetOptInfo goi;
1497 int e;
1498 Jim_Nvp *n;
1499 Jim_Obj *o;
1500 struct command_context_s *context;
1501
1502 enum {
1503 JTAG_CMD_INTERFACE,
1504 JTAG_CMD_INIT_RESET,
1505 JTAG_CMD_NEWTAP,
1506 JTAG_CMD_TAPENABLE,
1507 JTAG_CMD_TAPDISABLE,
1508 JTAG_CMD_TAPISENABLED,
1509 JTAG_CMD_CONFIGURE,
1510 JTAG_CMD_CGET
1511 };
1512
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 },
1522
1523 { .name = NULL, .value = -1 },
1524 };
1525
1526 context = Jim_GetAssocData(interp, "context");
1527 /* go past the command */
1528 Jim_GetOpt_Setup( &goi, interp, argc-1, argv+1 );
1529
1530 e = Jim_GetOpt_Nvp( &goi, jtag_cmds, &n );
1531 if( e != JIM_OK ){
1532 Jim_GetOpt_NvpUnknown( &goi, jtag_cmds, 0 );
1533 return e;
1534 }
1535 Jim_SetEmptyResult( goi.interp );
1536 switch( n->value ){
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)");
1543 return JIM_ERR;
1544 }
1545 Jim_SetResultString( goi.interp, jtag_interface->name, -1 );
1546 return JIM_OK;
1547 case JTAG_CMD_INIT_RESET:
1548 if( goi.argc != 0 ){
1549 Jim_WrongNumArgs( goi.interp, 1, goi.argv-1, "(no params)");
1550 return JIM_ERR;
1551 }
1552 e = jtag_init_reset(context);
1553 if( e != ERROR_OK ){
1554 Jim_SetResult_sprintf( goi.interp, "error: %d", e);
1555 return JIM_ERR;
1556 }
1557 return JIM_OK;
1558 case JTAG_CMD_NEWTAP:
1559 return jim_newtap_cmd( &goi );
1560 break;
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 );
1566 return JIM_ERR;
1567 }
1568
1569 {
1570 jtag_tap_t *t;
1571 t = jtag_tap_by_jim_obj( goi.interp, goi.argv[0] );
1572 if( t == NULL ){
1573 return JIM_ERR;
1574 }
1575 switch( n->value ){
1576 case JTAG_CMD_TAPISENABLED:
1577 e = t->enabled;
1578 break;
1579 case JTAG_CMD_TAPENABLE:
1580 jtag_tap_handle_event( t, JTAG_TAP_EVENT_ENABLE);
1581 e = 1;
1582 t->enabled = e;
1583 break;
1584 case JTAG_CMD_TAPDISABLE:
1585 jtag_tap_handle_event( t, JTAG_TAP_EVENT_DISABLE);
1586 e = 0;
1587 t->enabled = e;
1588 break;
1589 }
1590 Jim_SetResult( goi.interp, Jim_NewIntObj( goi.interp, e ) );
1591 return JIM_OK;
1592 }
1593 break;
1594
1595 case JTAG_CMD_CGET:
1596 if( goi.argc < 2 ){
1597 Jim_WrongNumArgs( goi.interp, 0, NULL, "?tap-name? -option ...");
1598 return JIM_ERR;
1599 }
1600
1601 {
1602 jtag_tap_t *t;
1603
1604 Jim_GetOpt_Obj(&goi, &o);
1605 t = jtag_tap_by_jim_obj( goi.interp, o );
1606 if( t == NULL ){
1607 return JIM_ERR;
1608 }
1609
1610 goi.isconfigure = 0;
1611 return jtag_tap_configure_cmd( &goi, t);
1612 }
1613 break;
1614
1615 case JTAG_CMD_CONFIGURE:
1616 if( goi.argc < 3 ){
1617 Jim_WrongNumArgs( goi.interp, 0, NULL, "?tap-name? -option ?VALUE? ...");
1618 return JIM_ERR;
1619 }
1620
1621 {
1622 jtag_tap_t *t;
1623
1624 Jim_GetOpt_Obj(&goi, &o);
1625 t = jtag_tap_by_jim_obj( goi.interp, o );
1626 if( t == NULL ){
1627 return JIM_ERR;
1628 }
1629
1630 goi.isconfigure = 1;
1631 return jtag_tap_configure_cmd( &goi, t);
1632 }
1633 }
1634
1635 return JIM_ERR;
1636 }
1637
1638 int jtag_register_commands(struct command_context_s *cmd_ctx)
1639 {
1640 register_jim( cmd_ctx, "jtag", jim_jtag_command, "perform jtag tap actions");
1641
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,
1652 COMMAND_ANY,
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");
1658
1659 register_command(cmd_ctx, NULL, "scan_chain", handle_scan_chain_command,
1660 COMMAND_EXEC, "print current scan chain configuration");
1661
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");
1672
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>");
1679 return ERROR_OK;
1680 }
1681
1682 int jtag_interface_init(struct command_context_s *cmd_ctx)
1683 {
1684 if (jtag)
1685 return ERROR_OK;
1686
1687 if (!jtag_interface)
1688 {
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;
1692 }
1693 if(hasKHz)
1694 {
1695 jtag_interface->khz(jtag_get_speed_khz(), &jtag_speed);
1696 hasKHz = false;
1697 }
1698
1699 if (jtag_interface->init() != ERROR_OK)
1700 return ERROR_JTAG_INIT_FAILED;
1701
1702 jtag = jtag_interface;
1703 return ERROR_OK;
1704 }
1705
1706 static int jtag_init_inner(struct command_context_s *cmd_ctx)
1707 {
1708 jtag_tap_t *tap;
1709 int retval;
1710
1711 LOG_DEBUG("Init JTAG chain");
1712
1713 tap = jtag_tap_next_enabled(NULL);
1714 if( tap == NULL ){
1715 LOG_ERROR("There are no enabled taps?");
1716 return ERROR_JTAG_INIT_FAILED;
1717 }
1718
1719 jtag_add_tlr();
1720 if ((retval=jtag_execute_queue())!=ERROR_OK)
1721 return retval;
1722
1723 /* examine chain first, as this could discover the real chain layout */
1724 if (jtag_examine_chain() != ERROR_OK)
1725 {
1726 LOG_ERROR("trying to validate configured JTAG chain anyway...");
1727 }
1728
1729 if (jtag_validate_chain() != ERROR_OK)
1730 {
1731 LOG_WARNING("Could not validate JTAG chain, continuing anyway...");
1732 }
1733
1734 return ERROR_OK;
1735 }
1736
1737 int jtag_interface_quit(void)
1738 {
1739 if (!jtag || !jtag->quit)
1740 return ERROR_OK;
1741
1742 // close the JTAG interface
1743 int result = jtag->quit();
1744 if (ERROR_OK != result)
1745 LOG_ERROR("failed: %d", result);
1746
1747 return ERROR_OK;
1748 }
1749
1750
1751 int jtag_init_reset(struct command_context_s *cmd_ctx)
1752 {
1753 int retval;
1754
1755 if ((retval=jtag_interface_init(cmd_ctx)) != ERROR_OK)
1756 return retval;
1757
1758 LOG_DEBUG("Trying to bring the JTAG controller to life by asserting TRST / RESET");
1759
1760 /* Reset can happen after a power cycle.
1761 *
1762 * Ideally we would only assert TRST or run RESET before the target reset.
1763 *
1764 * However w/srst_pulls_trst, trst is asserted together with the target
1765 * reset whether we want it or not.
1766 *
1767 * NB! Some targets have JTAG circuitry disabled until a
1768 * trst & srst has been asserted.
1769 *
1770 * NB! here we assume nsrst/ntrst delay are sufficient!
1771 *
1772 * NB! order matters!!!! srst *can* disconnect JTAG circuitry
1773 *
1774 */
1775 jtag_add_reset(1, 0); /* RESET or TRST */
1776 if (jtag_reset_config & RESET_HAS_SRST)
1777 {
1778 jtag_add_reset(1, 1);
1779 if ((jtag_reset_config & RESET_SRST_PULLS_TRST)==0)
1780 jtag_add_reset(0, 1);
1781 }
1782 jtag_add_reset(0, 0);
1783 if ((retval = jtag_execute_queue()) != ERROR_OK)
1784 return retval;
1785
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
1789 *
1790 * That would allow users to more easily perform any magic they need to before
1791 * reset happens.
1792 */
1793 return jtag_init_inner(cmd_ctx);
1794 }
1795
1796 int jtag_init(struct command_context_s *cmd_ctx)
1797 {
1798 int retval;
1799 if ((retval=jtag_interface_init(cmd_ctx)) != ERROR_OK)
1800 return retval;
1801 if (jtag_init_inner(cmd_ctx)==ERROR_OK)
1802 {
1803 return ERROR_OK;
1804 }
1805 return jtag_init_reset(cmd_ctx);
1806 }
1807
1808 void jtag_set_speed_khz(unsigned khz)
1809 {
1810 speed_khz = khz;
1811 }
1812 unsigned jtag_get_speed_khz(void)
1813 {
1814 return speed_khz;
1815 }
1816
1817 static int default_khz(int khz, int *jtag_speed)
1818 {
1819 LOG_ERROR("Translation from khz to jtag_speed not implemented");
1820 return ERROR_FAIL;
1821 }
1822
1823 static int default_speed_div(int speed, int *khz)
1824 {
1825 LOG_ERROR("Translation from jtag_speed to khz not implemented");
1826 return ERROR_FAIL;
1827 }
1828
1829 static int default_power_dropout(int *dropout)
1830 {
1831 *dropout=0; /* by default we can't detect power dropout */
1832 return ERROR_OK;
1833 }
1834
1835 static int default_srst_asserted(int *srst_asserted)
1836 {
1837 *srst_asserted=0; /* by default we can't detect srst asserted */
1838 return ERROR_OK;
1839 }
1840
1841 static int handle_interface_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
1842 {
1843 int i;
1844 int retval;
1845
1846 /* check whether the interface is already configured */
1847 if (jtag_interface)
1848 {
1849 LOG_WARNING("Interface already configured, ignoring");
1850 return ERROR_OK;
1851 }
1852
1853 /* interface name is a mandatory argument */
1854 if (argc < 1 || args[0][0] == '\0')
1855 {
1856 return ERROR_COMMAND_SYNTAX_ERROR;
1857 }
1858
1859 for (i=0; jtag_interfaces[i]; i++)
1860 {
1861 if (strcmp(args[0], jtag_interfaces[i]->name) == 0)
1862 {
1863 if ((retval = jtag_interfaces[i]->register_commands(cmd_ctx)) != ERROR_OK)
1864 {
1865 return retval;
1866 }
1867
1868 jtag_interface = jtag_interfaces[i];
1869
1870 if (jtag_interface->khz == NULL)
1871 {
1872 jtag_interface->khz = default_khz;
1873 }
1874 if (jtag_interface->speed_div == NULL)
1875 {
1876 jtag_interface->speed_div = default_speed_div;
1877 }
1878 if (jtag_interface->power_dropout == NULL)
1879 {
1880 jtag_interface->power_dropout = default_power_dropout;
1881 }
1882 if (jtag_interface->srst_asserted == NULL)
1883 {
1884 jtag_interface->srst_asserted = default_srst_asserted;
1885 }
1886
1887 return ERROR_OK;
1888 }
1889 }
1890
1891 /* no valid interface was found (i.e. the configuration option,
1892 * didn't match one of the compiled-in interfaces
1893 */
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++)
1897 {
1898 LOG_ERROR("%i: %s", i, jtag_interfaces[i]->name);
1899 }
1900
1901 return ERROR_JTAG_INVALID_INTERFACE;
1902 }
1903
1904 static int handle_jtag_device_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
1905 {
1906 int e;
1907 char buf[1024];
1908 Jim_Obj *newargs[ 10 ];
1909 /*
1910 * CONVERT SYNTAX
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
1916 */
1917
1918 if( argc < 4 ){
1919 command_print( cmd_ctx, "OLD DEPRECATED SYNTAX: Please use the NEW syntax");
1920 return ERROR_OK;
1921 }
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",
1924 args[0],
1925 args[1],
1926 args[2] );
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.");
1931
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 );
1944
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 ) );
1957
1958 e = jim_jtag_command( interp, 10, newargs );
1959 if( e != JIM_OK ){
1960 command_print( cmd_ctx, "%s", Jim_GetString( Jim_GetResult(interp), NULL ) );
1961 }
1962 return e;
1963 }
1964
1965 static int handle_scan_chain_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
1966 {
1967 jtag_tap_t *tap;
1968
1969 tap = jtag_all_taps();
1970 command_print(cmd_ctx, " TapName | Enabled | IdCode Expected IrLen IrCap IrMask Instr ");
1971 command_print(cmd_ctx, "---|--------------------|---------|------------|------------|------|------|------|---------");
1972
1973 while( tap ){
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);
1978
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,
1982 tap->dotted_name,
1983 tap->enabled ? 'Y' : 'n',
1984 tap->idcode,
1985 (tap->expected_ids_cnt > 0 ? tap->expected_ids[0] : 0),
1986 tap->ir_length,
1987 expected,
1988 expected_mask,
1989 cur_instr);
1990
1991 for (ii = 1; ii < tap->expected_ids_cnt; ii++) {
1992 command_print(cmd_ctx, " | | | | 0x%08x | | | | ",
1993 tap->expected_ids[ii]);
1994 }
1995
1996 tap = tap->next_tap;
1997 }
1998
1999 return ERROR_OK;
2000 }
2001
2002 static int handle_reset_config_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2003 {
2004 int new_cfg = 0;
2005 int mask = 0;
2006
2007 if (argc < 1)
2008 return ERROR_COMMAND_SYNTAX_ERROR;
2009
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.
2013 *
2014 * Here we don't care about the order, and only change values
2015 * which have been explicitly specified.
2016 */
2017 for (; argc; argc--, args++) {
2018 int tmp = 0;
2019 int m;
2020
2021 /* signals */
2022 m = RESET_HAS_TRST | RESET_HAS_SRST;
2023 if (strcmp(*args, "none") == 0)
2024 tmp = RESET_NONE;
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;
2031 else
2032 m = 0;
2033 if (mask & m) {
2034 LOG_ERROR("extra reset_config %s spec (%s)",
2035 "signal", *args);
2036 return ERROR_INVALID_ARGUMENTS;
2037 }
2038 if (m)
2039 goto next;
2040
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;
2051 else
2052 m = 0;
2053 if (mask & m) {
2054 LOG_ERROR("extra reset_config %s spec (%s)",
2055 "combination", *args);
2056 return ERROR_INVALID_ARGUMENTS;
2057 }
2058 if (m)
2059 goto next;
2060
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 */;
2067 else
2068 m = 0;
2069 if (mask & m) {
2070 LOG_ERROR("extra reset_config %s spec (%s)",
2071 "trst_type", *args);
2072 return ERROR_INVALID_ARGUMENTS;
2073 }
2074 if (m)
2075 goto next;
2076
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 */;
2083 else
2084 m = 0;
2085 if (mask & m) {
2086 LOG_ERROR("extra reset_config %s spec (%s)",
2087 "srst_type", *args);
2088 return ERROR_INVALID_ARGUMENTS;
2089 }
2090 if (m)
2091 goto next;
2092
2093 /* caller provided nonsense; fail */
2094 LOG_ERROR("unknown reset_config flag (%s)", *args);
2095 return ERROR_INVALID_ARGUMENTS;
2096
2097 next:
2098 /* Remember the bits which were specified (mask)
2099 * and their new values (new_cfg).
2100 */
2101 mask |= m;
2102 new_cfg |= tmp;
2103 }
2104
2105 /* clear previous values of those bits, save new values */
2106 jtag_reset_config &= ~mask;
2107 jtag_reset_config |= new_cfg;
2108
2109 return ERROR_OK;
2110 }
2111
2112 static int handle_jtag_nsrst_delay_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2113 {
2114 if (argc < 1)
2115 {
2116 LOG_ERROR("jtag_nsrst_delay <ms> command takes one required argument");
2117 exit(-1);
2118 }
2119 else
2120 {
2121 jtag_set_nsrst_delay(strtoul(args[0], NULL, 0));
2122 }
2123
2124 return ERROR_OK;
2125 }
2126
2127 static int handle_jtag_ntrst_delay_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2128 {
2129 if (argc < 1)
2130 {
2131 LOG_ERROR("jtag_ntrst_delay <ms> command takes one required argument");
2132 exit(-1);
2133 }
2134 else
2135 {
2136 jtag_set_ntrst_delay(strtoul(args[0], NULL, 0));
2137 }
2138
2139 return ERROR_OK;
2140 }
2141
2142 static int handle_jtag_speed_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2143 {
2144 int retval=ERROR_OK;
2145
2146 if (argc == 1)
2147 {
2148 LOG_DEBUG("handle jtag speed");
2149
2150 int cur_speed = 0;
2151 cur_speed = jtag_speed = strtoul(args[0], NULL, 0);
2152
2153 /* this command can be called during CONFIG,
2154 * in which case jtag isn't initialized */
2155 if (jtag)
2156 {
2157 retval=jtag->speed(cur_speed);
2158 }
2159 } else if (argc == 0)
2160 {
2161 } else
2162 {
2163 return ERROR_COMMAND_SYNTAX_ERROR;
2164 }
2165 command_print(cmd_ctx, "jtag_speed: %d", jtag_speed);
2166
2167 return retval;
2168 }
2169
2170 static int handle_jtag_khz_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2171 {
2172 int retval=ERROR_OK;
2173 LOG_DEBUG("handle jtag khz");
2174
2175 int cur_speed = 0;
2176 if(argc == 1)
2177 {
2178 jtag_set_speed_khz(strtoul(args[0], NULL, 0));
2179 if (jtag != NULL)
2180 {
2181 LOG_DEBUG("have interface set up");
2182 int speed_div1;
2183 if ((retval=jtag->khz(jtag_get_speed_khz(), &speed_div1))!=ERROR_OK)
2184 {
2185 jtag_set_speed_khz(0);
2186 return retval;
2187 }
2188
2189 cur_speed = jtag_speed = speed_div1;
2190
2191 retval=jtag->speed(cur_speed);
2192 } else
2193 {
2194 hasKHz = true;
2195 }
2196 } else if (argc==0)
2197 {
2198 } else
2199 {
2200 return ERROR_COMMAND_SYNTAX_ERROR;
2201 }
2202 cur_speed = jtag_get_speed_khz();
2203
2204 if (jtag!=NULL)
2205 {
2206 if ((retval=jtag->speed_div(jtag_speed, &cur_speed))!=ERROR_OK)
2207 return retval;
2208 }
2209
2210 if (cur_speed)
2211 command_print(cmd_ctx, "%d kHz", cur_speed);
2212 else
2213 command_print(cmd_ctx, "RCLK - adaptive");
2214 return retval;
2215
2216 }
2217
2218 static int handle_endstate_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2219 {
2220 if (argc < 1)
2221 return ERROR_COMMAND_SYNTAX_ERROR;
2222
2223 tap_state_t state = tap_state_by_name(args[0]);
2224 if (state < 0)
2225 {
2226 command_print( cmd_ctx, "Invalid state name: %s\n", args[0] );
2227 return ERROR_COMMAND_SYNTAX_ERROR;
2228 }
2229 jtag_set_end_state(state);
2230 jtag_execute_queue();
2231
2232 command_print(cmd_ctx, "current endstate: %s",
2233 tap_state_name(cmd_queue_end_state));
2234
2235 return ERROR_OK;
2236 }
2237
2238 static int handle_jtag_reset_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2239 {
2240 int trst = -1;
2241 int srst = -1;
2242
2243 if (argc < 2)
2244 {
2245 return ERROR_COMMAND_SYNTAX_ERROR;
2246 }
2247
2248 if (args[0][0] == '1')
2249 trst = 1;
2250 else if (args[0][0] == '0')
2251 trst = 0;
2252 else
2253 {
2254 return ERROR_COMMAND_SYNTAX_ERROR;
2255 }
2256
2257 if (args[1][0] == '1')
2258 srst = 1;
2259 else if (args[1][0] == '0')
2260 srst = 0;
2261 else
2262 {
2263 return ERROR_COMMAND_SYNTAX_ERROR;
2264 }
2265
2266 if (jtag_interface_init(cmd_ctx) != ERROR_OK)
2267 return ERROR_JTAG_INIT_FAILED;
2268
2269 jtag_add_reset(trst, srst);
2270 jtag_execute_queue();
2271
2272 return ERROR_OK;
2273 }
2274
2275 static int handle_runtest_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2276 {
2277 if (argc < 1)
2278 {
2279 return ERROR_COMMAND_SYNTAX_ERROR;
2280 }
2281
2282 jtag_add_runtest(strtol(args[0], NULL, 0), jtag_get_end_state());
2283 jtag_execute_queue();
2284
2285 return ERROR_OK;
2286
2287 }
2288
2289 /*
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.
2293 */
2294 static bool scan_is_safe(tap_state_t state)
2295 {
2296 switch (state)
2297 {
2298 case TAP_RESET:
2299 case TAP_IDLE:
2300 case TAP_DRPAUSE:
2301 case TAP_IRPAUSE:
2302 return true;
2303 default:
2304 return false;
2305 }
2306 }
2307
2308
2309 static int handle_irscan_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2310 {
2311 int i;
2312 scan_field_t *fields;
2313 jtag_tap_t *tap;
2314 tap_state_t endstate;
2315
2316 if ((argc < 2) || (argc % 2))
2317 {
2318 return ERROR_COMMAND_SYNTAX_ERROR;
2319 }
2320
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.
2324 */
2325 endstate = TAP_IDLE;
2326
2327 if( argc >= 4 ){
2328 /* have at least one pair of numbers. */
2329 /* is last pair the magic text? */
2330 if( 0 == strcmp( "-endstate", args[ argc - 2 ] ) ){
2331 const char *cpA;
2332 const char *cpS;
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 ) ){
2337 break;
2338 }
2339 }
2340 if( endstate >= TAP_NUM_STATES ){
2341 return ERROR_COMMAND_SYNTAX_ERROR;
2342 } else {
2343 if (!scan_is_safe(endstate))
2344 LOG_WARNING("irscan with unsafe "
2345 "endstate \"%s\"", cpA);
2346 /* found - remove the last 2 args */
2347 argc -= 2;
2348 }
2349 }
2350 }
2351
2352 int num_fields = argc / 2;
2353
2354 fields = malloc(sizeof(scan_field_t) * num_fields);
2355
2356 for (i = 0; i < num_fields; i++)
2357 {
2358 tap = jtag_tap_by_string( args[i*2] );
2359 if (tap==NULL)
2360 {
2361 command_print( cmd_ctx, "Tap: %s unknown", args[i*2] );
2362 return ERROR_FAIL;
2363 }
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;
2370 }
2371
2372 /* did we have an endstate? */
2373 jtag_add_ir_scan(num_fields, fields, endstate);
2374
2375 int retval=jtag_execute_queue();
2376
2377 for (i = 0; i < num_fields; i++)
2378 free(fields[i].out_value);
2379
2380 free (fields);
2381
2382 return retval;
2383 }
2384
2385 static int Jim_Command_drscan(Jim_Interp *interp, int argc, Jim_Obj *const *args)
2386 {
2387 int retval;
2388 scan_field_t *fields;
2389 int num_fields;
2390 int field_count = 0;
2391 int i, e;
2392 jtag_tap_t *tap;
2393 tap_state_t endstate;
2394
2395 /* args[1] = device
2396 * args[2] = num_bits
2397 * args[3] = hex string
2398 * ... repeat num bits and hex string ...
2399 *
2400 * .. optionally:
2401 * args[N-2] = "-endstate"
2402 * args[N-1] = statename
2403 */
2404 if ((argc < 4) || ((argc % 2)!=0))
2405 {
2406 Jim_WrongNumArgs(interp, 1, args, "wrong arguments");
2407 return JIM_ERR;
2408 }
2409
2410 endstate = TAP_IDLE;
2411
2412 /* validate arguments as numbers */
2413 e = JIM_OK;
2414 for (i = 2; i < argc; i+=2)
2415 {
2416 long bits;
2417 const char *cp;
2418
2419 e = Jim_GetLong(interp, args[i], &bits);
2420 /* If valid - try next arg */
2421 if( e == JIM_OK ){
2422 continue;
2423 }
2424
2425 /* Not valid.. are we at the end? */
2426 if ( ((i+2) != argc) ){
2427 /* nope, then error */
2428 return e;
2429 }
2430
2431 /* it could be: "-endstate FOO"
2432 * e.g. DRPAUSE so we can issue more instructions
2433 * before entering RUN/IDLE and executing them.
2434 */
2435
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 );
2442
2443 /* see if it is a valid state name */
2444 endstate = tap_state_by_name(cp);
2445 if( endstate < 0 ){
2446 /* update the error message */
2447 Jim_SetResult_sprintf(interp,"endstate: %s invalid", cp );
2448 } else {
2449 if (!scan_is_safe(endstate))
2450 LOG_WARNING("drscan with unsafe "
2451 "endstate \"%s\"", cp);
2452
2453 /* valid - so clear the error */
2454 e = JIM_OK;
2455 /* and remove the last 2 args */
2456 argc -= 2;
2457 }
2458 }
2459
2460 /* Still an error? */
2461 if( e != JIM_OK ){
2462 return e; /* too bad */
2463 }
2464 } /* validate args */
2465
2466 tap = jtag_tap_by_jim_obj( interp, args[1] );
2467 if( tap == NULL ){
2468 return JIM_ERR;
2469 }
2470
2471 num_fields=(argc-2)/2;
2472 fields = malloc(sizeof(scan_field_t) * num_fields);
2473 for (i = 2; i < argc; i+=2)
2474 {
2475 long bits;
2476 int len;
2477 const char *str;
2478
2479 Jim_GetLong(interp, args[i], &bits);
2480 str = Jim_GetString(args[i+1], &len);
2481
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;
2487 field_count++;
2488 }
2489
2490 jtag_add_dr_scan(num_fields, fields, endstate);
2491
2492 retval = jtag_execute_queue();
2493 if (retval != ERROR_OK)
2494 {
2495 Jim_SetResultString(interp, "drscan: jtag execute failed",-1);
2496 return JIM_ERR;
2497 }
2498
2499 field_count=0;
2500 Jim_Obj *list = Jim_NewListObj(interp, NULL, 0);
2501 for (i = 2; i < argc; i+=2)
2502 {
2503 long bits;
2504 char *str;
2505
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);
2509
2510 Jim_ListAppendElement(interp, list, Jim_NewStringObj(interp, str, strlen(str)));
2511 free(str);
2512 field_count++;
2513 }
2514
2515 Jim_SetResult(interp, list);
2516
2517 free(fields);
2518
2519 return JIM_OK;
2520 }
2521
2522
2523 static int Jim_Command_flush_count(Jim_Interp *interp, int argc, Jim_Obj *const *args)
2524 {
2525 Jim_SetResult(interp, Jim_NewIntObj(interp, jtag_get_flush_queue_count()));
2526
2527 return JIM_OK;
2528 }
2529
2530
2531 static int handle_verify_ircapture_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2532 {
2533 if (argc == 1)
2534 {
2535 if (strcmp(args[0], "enable") == 0)
2536 {
2537 jtag_verify_capture_ir = 1;
2538 }
2539 else if (strcmp(args[0], "disable") == 0)
2540 {
2541 jtag_verify_capture_ir = 0;
2542 } else
2543 {
2544 return ERROR_COMMAND_SYNTAX_ERROR;
2545 }
2546 } else if (argc != 0)
2547 {
2548 return ERROR_COMMAND_SYNTAX_ERROR;
2549 }
2550
2551 command_print(cmd_ctx, "verify Capture-IR is %s", (jtag_verify_capture_ir) ? "enabled": "disabled");
2552
2553 return ERROR_OK;
2554 }
2555
2556 void jtag_set_verify(bool enable)
2557 {
2558 jtag_verify = enable;
2559 }
2560
2561 bool jtag_will_verify()
2562 {
2563 return jtag_verify;
2564 }
2565
2566 static int handle_verify_jtag_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2567 {
2568 if (argc > 1)
2569 return ERROR_COMMAND_SYNTAX_ERROR;
2570
2571 if (argc == 1)
2572 {
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);
2577 else
2578 return ERROR_COMMAND_SYNTAX_ERROR;
2579 }
2580
2581 const char *status = jtag_will_verify() ? "enabled": "disabled";
2582 command_print(cmd_ctx, "verify jtag capture is %s", status);
2583
2584 return ERROR_OK;
2585 }
2586
2587
2588 int jtag_power_dropout(int *dropout)
2589 {
2590 return jtag->power_dropout(dropout);
2591 }
2592
2593 int jtag_srst_asserted(int *srst_asserted)
2594 {
2595 return jtag->srst_asserted(srst_asserted);
2596 }
2597
2598 void jtag_tap_handle_event( jtag_tap_t * tap, enum jtag_tap_event e)
2599 {
2600 jtag_tap_event_action_t * jteap;
2601 int done;
2602
2603 jteap = tap->event_action;
2604
2605 done = 0;
2606 while (jteap) {
2607 if (jteap->event == e) {
2608 done = 1;
2609 LOG_DEBUG( "JTAG tap: %s event: %d (%s) action: %s\n",
2610 tap->dotted_name,
2611 e,
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);
2616 }
2617 }
2618
2619 jteap = jteap->next;
2620 }
2621
2622 if (!done) {
2623 LOG_DEBUG( "event %d %s - no action",
2624 e,
2625 Jim_Nvp_value2name_simple( nvp_jtag_tap_event, e)->name);
2626 }
2627 }
2628
2629 static int handle_tms_sequence_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
2630 {
2631 if (argc > 1)
2632 return ERROR_COMMAND_SYNTAX_ERROR;
2633
2634 if (argc == 1)
2635 {
2636 bool use_new_table;
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;
2641 else
2642 return ERROR_COMMAND_SYNTAX_ERROR;
2643
2644 tap_use_new_tms_table(use_new_table);
2645 }
2646
2647 command_print(cmd_ctx, "tms sequence is %s",
2648 tap_uses_new_tms_table() ? "short": "long");
2649
2650 return ERROR_OK;
2651 }
2652
2653 /**
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
2657 * description.
2658 */
2659 int jtag_add_statemove(tap_state_t goal_state)
2660 {
2661 int retval = ERROR_OK;
2662
2663 tap_state_t moves[8];
2664 tap_state_t cur_state = cmd_queue_cur_state;
2665 int i;
2666 int tms_bits;
2667 int tms_count;
2668
2669 LOG_DEBUG( "cur_state=%s goal_state=%s",
2670 tap_state_name(cur_state),
2671 tap_state_name(goal_state) );
2672
2673
2674 /* From the XSVF spec, pertaining to XSTATE:
2675
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.
2685 */
2686
2687 if (goal_state==cur_state )
2688 ; /* nothing to do */
2689
2690 else if( goal_state==TAP_RESET )
2691 {
2692 jtag_add_tlr();
2693 }
2694
2695 else if( tap_is_state_stable(cur_state) && tap_is_state_stable(goal_state) )
2696 {
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.
2701 */
2702
2703 tms_bits = tap_get_tms_path(cur_state, goal_state);
2704 tms_count = tap_get_tms_path_len(cur_state, goal_state);
2705
2706 assert( (unsigned) tms_count < DIM(moves) );
2707
2708 for (i=0; i<tms_count; i++, tms_bits>>=1)
2709 {
2710 bool bit = tms_bits & 1;
2711
2712 cur_state = tap_state_transition(cur_state, bit);
2713 moves[i] = cur_state;
2714 }
2715
2716 jtag_add_pathmove(tms_count, moves);
2717 }
2718
2719 /* else state must be immediately reachable in one clock cycle, and does not
2720 need to be a stable state.
2721 */
2722 else if( tap_state_transition(cur_state, true) == goal_state
2723 || tap_state_transition(cur_state, false) == goal_state )
2724 {
2725 /* move a single state */
2726 moves[0] = goal_state;
2727 jtag_add_pathmove( 1, moves );
2728 }
2729
2730 else
2731 {
2732 retval = ERROR_FAIL;
2733 }
2734
2735 return retval;
2736 }
2737
2738 void jtag_set_nsrst_delay(unsigned delay)
2739 {
2740 jtag_nsrst_delay = delay;
2741 }
2742 void jtag_set_ntrst_delay(unsigned delay)
2743 {
2744 jtag_ntrst_delay = delay;
2745 }
2746
2747

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)