1 /***************************************************************************
2 * Copyright (C) 2009 by Dimitar Dimitrov <dinuxbg@gmail.com> *
3 * based on Dominic Rath's and Benedikt Sauter's usbprog.c *
5 * This program is free software; you can redistribute it and/or modify *
6 * it under the terms of the GNU General Public License as published by *
7 * the Free Software Foundation; either version 2 of the License, or *
8 * (at your option) any later version. *
10 * This program is distributed in the hope that it will be useful, *
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
13 * GNU General Public License for more details. *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program; if not, write to the *
17 * Free Software Foundation, Inc., *
18 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
19 ***************************************************************************/
25 #include <jtag/interface.h>
26 #include <jtag/commands.h>
28 #include "usb_common.h"
31 #define USB_VID 0x15ba
32 #define USB_PID 0x001e
34 #define ARMJTAGEW_EPT_BULK_OUT 0x01u
35 #define ARMJTAGEW_EPT_BULK_IN 0x82u
37 #define ARMJTAGEW_USB_TIMEOUT 2000
39 #define ARMJTAGEW_IN_BUFFER_SIZE (4*1024)
40 #define ARMJTAGEW_OUT_BUFFER_SIZE (4*1024)
43 /* USB command request codes. */
44 #define CMD_GET_VERSION 0x00
45 #define CMD_SELECT_DPIMPL 0x10
46 #define CMD_SET_TCK_FREQUENCY 0x11
47 #define CMD_GET_TCK_FREQUENCY 0x12
48 #define CMD_MEASURE_MAX_TCK_FREQ 0x15
49 #define CMD_MEASURE_RTCK_RESPONSE 0x16
50 #define CMD_TAP_SHIFT 0x17
51 #define CMD_SET_TAPHW_STATE 0x20
52 #define CMD_GET_TAPHW_STATE 0x21
53 #define CMD_TGPWR_SETUP 0x22
55 /* Global USB buffers */
56 static uint8_t usb_in_buffer
[ARMJTAGEW_IN_BUFFER_SIZE
];
57 static uint8_t usb_out_buffer
[ARMJTAGEW_OUT_BUFFER_SIZE
];
59 /* Queue command functions */
60 static void armjtagew_end_state(tap_state_t state
);
61 static void armjtagew_state_move(void);
62 static void armjtagew_path_move(int num_states
, tap_state_t
*path
);
63 static void armjtagew_runtest(int num_cycles
);
64 static void armjtagew_scan(bool ir_scan
, enum scan_type type
, uint8_t *buffer
, int scan_size
, struct scan_command
*command
);
65 static void armjtagew_reset(int trst
, int srst
);
66 //static void armjtagew_simple_command(uint8_t command);
67 static int armjtagew_get_status(void);
69 /* tap buffer functions */
70 static void armjtagew_tap_init(void);
71 static int armjtagew_tap_execute(void);
72 static void armjtagew_tap_ensure_space(int scans
, int bits
);
73 static void armjtagew_tap_append_step(int tms
, int tdi
);
74 static void armjtagew_tap_append_scan(int length
, uint8_t *buffer
, struct scan_command
*command
);
76 /* ARM-JTAG-EW lowlevel functions */
78 struct usb_dev_handle
* usb_handle
;
81 static struct armjtagew
*armjtagew_usb_open(void);
82 static void armjtagew_usb_close(struct armjtagew
*armjtagew
);
83 static int armjtagew_usb_message(struct armjtagew
*armjtagew
, int out_length
, int in_length
);
84 static int armjtagew_usb_write(struct armjtagew
*armjtagew
, int out_length
);
85 static int armjtagew_usb_read(struct armjtagew
*armjtagew
, int exp_in_length
);
87 /* helper functions */
88 static int armjtagew_get_version_info(void);
90 #ifdef _DEBUG_USB_COMMS_
91 static void armjtagew_debug_buffer(uint8_t *buffer
, int length
);
94 static struct armjtagew
* armjtagew_handle
;
98 /***************************************************************************/
99 /* External interface implementation */
101 static int armjtagew_execute_queue(void)
103 struct jtag_command
*cmd
= jtag_command_queue
;
113 DEBUG_JTAG_IO("runtest %i cycles, end in %i", cmd
->cmd
.runtest
->num_cycles
, \
114 cmd
->cmd
.runtest
->end_state
);
116 armjtagew_end_state(cmd
->cmd
.runtest
->end_state
);
117 armjtagew_runtest(cmd
->cmd
.runtest
->num_cycles
);
121 DEBUG_JTAG_IO("statemove end in %i", cmd
->cmd
.statemove
->end_state
);
123 armjtagew_end_state(cmd
->cmd
.statemove
->end_state
);
124 armjtagew_state_move();
128 DEBUG_JTAG_IO("pathmove: %i states, end in %i", \
129 cmd
->cmd
.pathmove
->num_states
, \
130 cmd
->cmd
.pathmove
->path
[cmd
->cmd
.pathmove
->num_states
- 1]);
132 armjtagew_path_move(cmd
->cmd
.pathmove
->num_states
, cmd
->cmd
.pathmove
->path
);
136 DEBUG_JTAG_IO("scan end in %i", cmd
->cmd
.scan
->end_state
);
138 armjtagew_end_state(cmd
->cmd
.scan
->end_state
);
140 scan_size
= jtag_build_buffer(cmd
->cmd
.scan
, &buffer
);
141 DEBUG_JTAG_IO("scan input, length = %d", scan_size
);
143 #ifdef _DEBUG_USB_COMMS_
144 armjtagew_debug_buffer(buffer
, (scan_size
+ 7) / 8);
146 type
= jtag_scan_type(cmd
->cmd
.scan
);
147 armjtagew_scan(cmd
->cmd
.scan
->ir_scan
, type
, buffer
, scan_size
, cmd
->cmd
.scan
);
151 DEBUG_JTAG_IO("reset trst: %i srst %i", cmd
->cmd
.reset
->trst
, cmd
->cmd
.reset
->srst
);
153 armjtagew_tap_execute();
155 if (cmd
->cmd
.reset
->trst
== 1)
157 tap_set_state(TAP_RESET
);
159 armjtagew_reset(cmd
->cmd
.reset
->trst
, cmd
->cmd
.reset
->srst
);
163 DEBUG_JTAG_IO("sleep %i", cmd
->cmd
.sleep
->us
);
164 armjtagew_tap_execute();
165 jtag_sleep(cmd
->cmd
.sleep
->us
);
169 LOG_ERROR("BUG: unknown JTAG command type encountered");
175 return armjtagew_tap_execute();
179 /* Sets speed in kHz. */
180 static int armjtagew_speed(int speed
)
186 usb_out_buffer
[0] = CMD_SET_TCK_FREQUENCY
;
187 buf_set_u32(usb_out_buffer
+ 1, 0, 32, speed
*1000);
189 result
= armjtagew_usb_message(armjtagew_handle
, 5, 4);
193 LOG_ERROR("ARM-JTAG-EW setting speed failed (%d)", result
);
194 return ERROR_JTAG_DEVICE_ERROR
;
197 usb_out_buffer
[0] = CMD_GET_TCK_FREQUENCY
;
198 result
= armjtagew_usb_message(armjtagew_handle
, 1, 4);
199 speed_real
= (int)buf_get_u32(usb_in_buffer
,0,32) / 1000;
202 LOG_ERROR("ARM-JTAG-EW getting speed failed (%d)", result
);
203 return ERROR_JTAG_DEVICE_ERROR
;
207 LOG_INFO("Requested speed %dkHz, emulator reported %dkHz.", speed
, speed_real
);
214 static int armjtagew_khz(int khz
, int *jtag_speed
)
221 static int armjtagew_speed_div(int speed
, int* khz
)
229 static int armjtagew_init(void)
233 armjtagew_handle
= armjtagew_usb_open();
235 if (armjtagew_handle
== 0)
237 LOG_ERROR("Cannot find ARM-JTAG-EW Interface! Please check connection and permissions.");
238 return ERROR_JTAG_INIT_FAILED
;
242 while (check_cnt
< 3)
244 if (armjtagew_get_version_info() == ERROR_OK
)
246 /* attempt to get status */
247 armjtagew_get_status();
256 LOG_INFO("ARM-JTAG-EW initial read failed, don't worry");
259 LOG_INFO("ARM-JTAG-EW JTAG Interface ready");
261 armjtagew_reset(0, 0);
262 armjtagew_tap_init();
267 static int armjtagew_quit(void)
269 armjtagew_usb_close(armjtagew_handle
);
273 /***************************************************************************/
274 /* Queue command implementations */
276 static void armjtagew_end_state(tap_state_t state
)
278 if (tap_is_state_stable(state
))
280 tap_set_end_state(state
);
284 LOG_ERROR("BUG: %i is not a valid end state", state
);
289 /* Goes to the end state. */
290 static void armjtagew_state_move(void)
294 uint8_t tms_scan
= tap_get_tms_path(tap_get_state(), tap_get_end_state());
295 int tms_count
= tap_get_tms_path_len(tap_get_state(), tap_get_end_state());
297 for (i
= 0; i
< tms_count
; i
++)
299 tms
= (tms_scan
>> i
) & 1;
300 armjtagew_tap_append_step(tms
, 0);
303 tap_set_state(tap_get_end_state());
306 static void armjtagew_path_move(int num_states
, tap_state_t
*path
)
310 for (i
= 0; i
< num_states
; i
++)
313 * TODO: The ARM-JTAG-EW hardware delays TDI with 3 TCK cycles when in RTCK mode.
314 * Either handle that here, or update the documentation with examples
315 * how to fix that in the configuration files.
317 if (path
[i
] == tap_state_transition(tap_get_state(), false))
319 armjtagew_tap_append_step(0, 0);
321 else if (path
[i
] == tap_state_transition(tap_get_state(), true))
323 armjtagew_tap_append_step(1, 0);
327 LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition", tap_state_name(tap_get_state()), tap_state_name(path
[i
]));
331 tap_set_state(path
[i
]);
334 tap_set_end_state(tap_get_state());
337 static void armjtagew_runtest(int num_cycles
)
341 tap_state_t saved_end_state
= tap_get_end_state();
343 /* only do a state_move when we're not already in IDLE */
344 if (tap_get_state() != TAP_IDLE
)
346 armjtagew_end_state(TAP_IDLE
);
347 armjtagew_state_move();
350 /* execute num_cycles */
351 for (i
= 0; i
< num_cycles
; i
++)
353 armjtagew_tap_append_step(0, 0);
356 /* finish in end_state */
357 armjtagew_end_state(saved_end_state
);
358 if (tap_get_state() != tap_get_end_state())
360 armjtagew_state_move();
364 static void armjtagew_scan(bool ir_scan
, enum scan_type type
, uint8_t *buffer
, int scan_size
, struct scan_command
*command
)
366 tap_state_t saved_end_state
;
368 armjtagew_tap_ensure_space(1, scan_size
+ 8);
370 saved_end_state
= tap_get_end_state();
372 /* Move to appropriate scan state */
373 armjtagew_end_state(ir_scan
? TAP_IRSHIFT
: TAP_DRSHIFT
);
375 armjtagew_state_move();
376 armjtagew_end_state(saved_end_state
);
379 armjtagew_tap_append_scan(scan_size
, buffer
, command
);
381 /* We are in Exit1, go to Pause */
382 armjtagew_tap_append_step(0, 0);
384 tap_set_state(ir_scan
? TAP_IRPAUSE
: TAP_DRPAUSE
);
386 if (tap_get_state() != tap_get_end_state())
388 armjtagew_state_move();
392 static void armjtagew_reset(int trst
, int srst
)
394 const uint8_t trst_mask
= (1u << 5);
395 const uint8_t srst_mask
= (1u << 6);
398 uint8_t change_mask
= 0;
401 LOG_DEBUG("trst: %i, srst: %i", trst
, srst
);
406 outp_en
&= ~srst_mask
; /* tristate */
407 change_mask
|= srst_mask
;
412 outp_en
|= srst_mask
;
413 change_mask
|= srst_mask
;
419 outp_en
&= ~trst_mask
; /* tristate */
420 change_mask
|= trst_mask
;
425 outp_en
|= trst_mask
;
426 change_mask
|= trst_mask
;
429 usb_out_buffer
[0] = CMD_SET_TAPHW_STATE
;
430 usb_out_buffer
[1] = val
;
431 usb_out_buffer
[2] = outp_en
;
432 usb_out_buffer
[3] = change_mask
;
433 result
= armjtagew_usb_write(armjtagew_handle
, 4);
436 LOG_ERROR("ARM-JTAG-EW TRST/SRST pin set failed failed (%d)", result
);
441 static int armjtagew_get_status(void)
445 usb_out_buffer
[0] = CMD_GET_TAPHW_STATE
;
446 result
= armjtagew_usb_message(armjtagew_handle
, 1, 12);
450 unsigned int u_tg
= buf_get_u32(usb_in_buffer
, 0, 16);
451 LOG_INFO("U_tg = %d mV, U_aux = %d mV, U_tgpwr = %d mV, I_tgpwr = %d mA, D1 = %d, Target power %s %s",
452 (int)(buf_get_u32(usb_in_buffer
+ 0, 0, 16)),
453 (int)(buf_get_u32(usb_in_buffer
+ 2, 0, 16)),
454 (int)(buf_get_u32(usb_in_buffer
+ 4, 0, 16)),
455 (int)(buf_get_u32(usb_in_buffer
+ 6, 0, 16)),
457 usb_in_buffer
[11] ? "OVERCURRENT" : "OK",
458 usb_in_buffer
[10] ? "enabled" : "disabled");
462 LOG_ERROR("Vref too low. Check Target Power");
467 LOG_ERROR("ARM-JTAG-EW command CMD_GET_TAPHW_STATE failed (%d)", result
);
473 static int armjtagew_get_version_info(void)
479 /* query hardware version */
480 usb_out_buffer
[0] = CMD_GET_VERSION
;
481 result
= armjtagew_usb_message(armjtagew_handle
, 1, 4 + 15 + 256);
485 LOG_ERROR("ARM-JTAG-EW command CMD_GET_VERSION failed (%d)", result
);
486 return ERROR_JTAG_DEVICE_ERROR
;
490 memcpy(sn
, usb_in_buffer
+ 4, 15);
492 memcpy(auxinfo
, usb_in_buffer
+ 4+15, 256);
495 LOG_INFO("ARM-JTAG-EW firmware version %d.%d, hardware revision %c, SN=%s, Additional info: %s", \
496 usb_in_buffer
[1], usb_in_buffer
[0], \
497 isgraph(usb_in_buffer
[2]) ? usb_in_buffer
[2] : 'X', \
502 COMMAND_HANDLER(armjtagew_handle_armjtagew_info_command
)
504 if (armjtagew_get_version_info() == ERROR_OK
)
506 /* attempt to get status */
507 armjtagew_get_status();
513 static const struct command_registration armjtagew_command_handlers
[] = {
515 .name
= "armjtagew_info",
516 .handler
= &armjtagew_handle_armjtagew_info_command
,
517 .mode
= COMMAND_EXEC
,
518 .help
= "query armjtagew info",
520 COMMAND_REGISTRATION_DONE
523 struct jtag_interface armjtagew_interface
= {
524 .name
= "arm-jtag-ew",
525 .commands
= armjtagew_command_handlers
,
527 .execute_queue
= armjtagew_execute_queue
,
528 .speed
= armjtagew_speed
,
529 .speed_div
= armjtagew_speed_div
,
530 .khz
= armjtagew_khz
,
531 .init
= armjtagew_init
,
532 .quit
= armjtagew_quit
,
535 /***************************************************************************/
536 /* ARM-JTAG-EW tap functions */
538 /* 2048 is the max value we can use here */
539 #define ARMJTAGEW_TAP_BUFFER_SIZE 2048
541 static int tap_length
;
542 static uint8_t tms_buffer
[ARMJTAGEW_TAP_BUFFER_SIZE
];
543 static uint8_t tdi_buffer
[ARMJTAGEW_TAP_BUFFER_SIZE
];
544 static uint8_t tdo_buffer
[ARMJTAGEW_TAP_BUFFER_SIZE
];
546 struct pending_scan_result
{
547 int first
; /* First bit position in tdo_buffer to read */
548 int length
; /* Number of bits to read */
549 struct scan_command
*command
; /* Corresponding scan command */
553 #define MAX_PENDING_SCAN_RESULTS 256
555 static int pending_scan_results_length
;
556 static struct pending_scan_result pending_scan_results_buffer
[MAX_PENDING_SCAN_RESULTS
];
560 static void armjtagew_tap_init(void)
563 pending_scan_results_length
= 0;
566 static void armjtagew_tap_ensure_space(int scans
, int bits
)
568 int available_scans
= MAX_PENDING_SCAN_RESULTS
- pending_scan_results_length
;
569 int available_bits
= ARMJTAGEW_TAP_BUFFER_SIZE
* 8 - tap_length
;
571 if (scans
> available_scans
|| bits
> available_bits
)
573 armjtagew_tap_execute();
577 static void armjtagew_tap_append_step(int tms
, int tdi
)
580 int index_local
= tap_length
/ 8;
582 if (index_local
< ARMJTAGEW_TAP_BUFFER_SIZE
)
584 int bit_index
= tap_length
% 8;
585 uint8_t bit
= 1 << bit_index
;
589 tms_buffer
[index_local
] |= bit
;
593 tms_buffer
[index_local
] &= ~bit
;
598 tdi_buffer
[index_local
] |= bit
;
602 tdi_buffer
[index_local
] &= ~bit
;
609 LOG_ERROR("armjtagew_tap_append_step, overflow");
613 void armjtagew_tap_append_scan(int length
, uint8_t *buffer
, struct scan_command
*command
)
615 struct pending_scan_result
*pending_scan_result
= &pending_scan_results_buffer
[pending_scan_results_length
];
618 pending_scan_result
->first
= tap_length
;
619 pending_scan_result
->length
= length
;
620 pending_scan_result
->command
= command
;
621 pending_scan_result
->buffer
= buffer
;
623 for (i
= 0; i
< length
; i
++)
625 armjtagew_tap_append_step((i
< length
-1 ? 0 : 1), (buffer
[i
/8] >> (i
%8)) & 1);
627 pending_scan_results_length
++;
630 /* Pad and send a tap sequence to the device, and receive the answer.
631 * For the purpose of padding we assume that we are in idle or pause state. */
632 static int armjtagew_tap_execute(void)
642 /* Pad last byte so that tap_length is divisible by 8 */
643 while (tap_length
% 8 != 0)
645 /* More of the last TMS value keeps us in the same state,
646 * analogous to free-running JTAG interfaces. */
647 armjtagew_tap_append_step(last_tms
, 0);
650 byte_length
= tap_length
/ 8;
652 usb_out_buffer
[0] = CMD_TAP_SHIFT
;
653 buf_set_u32(usb_out_buffer
+ 1, 0, 16, byte_length
);
656 for (i
= 0; i
< byte_length
; i
++)
658 usb_out_buffer
[tms_offset
+ i
] = flip_u32(tms_buffer
[i
],8);
661 tdi_offset
= tms_offset
+ byte_length
;
662 for (i
= 0; i
< byte_length
; i
++)
664 usb_out_buffer
[tdi_offset
+ i
] = flip_u32(tdi_buffer
[i
],8);
667 result
= armjtagew_usb_message(armjtagew_handle
, 3 + 2 * byte_length
, byte_length
+ 4);
673 stat_local
= (int)buf_get_u32(usb_in_buffer
+ byte_length
, 0, 32);
675 LOG_ERROR("armjtagew_tap_execute, emulator returned error code %d for a CMD_TAP_SHIFT command", stat_local
);
676 return ERROR_JTAG_QUEUE_FAILED
;
679 for (i
= 0; i
< byte_length
; i
++)
681 tdo_buffer
[i
] = flip_u32(usb_in_buffer
[i
],8);
684 for (i
= 0; i
< pending_scan_results_length
; i
++)
686 struct pending_scan_result
*pending_scan_result
= &pending_scan_results_buffer
[i
];
687 uint8_t *buffer
= pending_scan_result
->buffer
;
688 int length
= pending_scan_result
->length
;
689 int first
= pending_scan_result
->first
;
690 struct scan_command
*command
= pending_scan_result
->command
;
693 buf_set_buf(tdo_buffer
, first
, buffer
, 0, length
);
695 DEBUG_JTAG_IO("pending scan result, length = %d", length
);
697 #ifdef _DEBUG_USB_COMMS_
698 armjtagew_debug_buffer(buffer
, byte_length
);
701 if (jtag_read_buffer(buffer
, command
) != ERROR_OK
)
703 armjtagew_tap_init();
704 return ERROR_JTAG_QUEUE_FAILED
;
707 if (pending_scan_result
->buffer
!= NULL
)
709 free(pending_scan_result
->buffer
);
715 LOG_ERROR("armjtagew_tap_execute, wrong result %d, expected %d", result
, byte_length
);
716 return ERROR_JTAG_QUEUE_FAILED
;
719 armjtagew_tap_init();
725 /*****************************************************************************/
726 /* JLink USB low-level functions */
728 static struct armjtagew
* armjtagew_usb_open()
732 const uint16_t vids
[] = { USB_VID
, 0 };
733 const uint16_t pids
[] = { USB_PID
, 0 };
734 struct usb_dev_handle
*dev
;
735 if (jtag_usb_open(vids
, pids
, &dev
) != ERROR_OK
)
738 struct armjtagew
*result
= malloc(sizeof(struct armjtagew
));
739 result
->usb_handle
= dev
;
742 /* usb_set_configuration required under win32 */
743 usb_set_configuration(dev
, dev
->config
[0].bConfigurationValue
);
745 usb_claim_interface(dev
, 0);
748 * This makes problems under Mac OS X. And is not needed
749 * under Windows. Hopefully this will not break a linux build
751 usb_set_altinterface(dev
, 0);
756 static void armjtagew_usb_close(struct armjtagew
*armjtagew
)
758 usb_close(armjtagew
->usb_handle
);
762 /* Send a message and receive the reply. */
763 static int armjtagew_usb_message(struct armjtagew
*armjtagew
, int out_length
, int in_length
)
767 result
= armjtagew_usb_write(armjtagew
, out_length
);
768 if (result
== out_length
)
770 result
= armjtagew_usb_read(armjtagew
, in_length
);
771 if (result
!= in_length
)
773 LOG_ERROR("usb_bulk_read failed (requested=%d, result=%d)", in_length
, result
);
779 LOG_ERROR("usb_bulk_write failed (requested=%d, result=%d)", out_length
, result
);
785 /* Write data from out_buffer to USB. */
786 static int armjtagew_usb_write(struct armjtagew
*armjtagew
, int out_length
)
790 if (out_length
> ARMJTAGEW_OUT_BUFFER_SIZE
)
792 LOG_ERROR("armjtagew_write illegal out_length=%d (max=%d)", out_length
, ARMJTAGEW_OUT_BUFFER_SIZE
);
796 result
= usb_bulk_write(armjtagew
->usb_handle
, ARMJTAGEW_EPT_BULK_OUT
, \
797 (char*)usb_out_buffer
, out_length
, ARMJTAGEW_USB_TIMEOUT
);
799 DEBUG_JTAG_IO("armjtagew_usb_write, out_length = %d, result = %d", out_length
, result
);
801 #ifdef _DEBUG_USB_COMMS_
802 armjtagew_debug_buffer(usb_out_buffer
, out_length
);
807 /* Read data from USB into in_buffer. */
808 static int armjtagew_usb_read(struct armjtagew
*armjtagew
, int exp_in_length
)
810 int result
= usb_bulk_read(armjtagew
->usb_handle
, ARMJTAGEW_EPT_BULK_IN
, \
811 (char*)usb_in_buffer
, exp_in_length
, ARMJTAGEW_USB_TIMEOUT
);
813 DEBUG_JTAG_IO("armjtagew_usb_read, result = %d", result
);
815 #ifdef _DEBUG_USB_COMMS_
816 armjtagew_debug_buffer(usb_in_buffer
, result
);
822 #ifdef _DEBUG_USB_COMMS_
823 #define BYTES_PER_LINE 16
825 static void armjtagew_debug_buffer(uint8_t *buffer
, int length
)
832 for (i
= 0; i
< length
; i
+= BYTES_PER_LINE
)
834 snprintf(line
, 5, "%04x", i
);
835 for (j
= i
; j
< i
+ BYTES_PER_LINE
&& j
< length
; j
++)
837 snprintf(s
, 4, " %02x", buffer
[j
]);
840 LOG_DEBUG("%s", line
);