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 "interface.h"
30 #define USB_VID 0x15ba
31 #define USB_PID 0x001e
33 #define ARMJTAGEW_EPT_BULK_OUT 0x01u
34 #define ARMJTAGEW_EPT_BULK_IN 0x82u
36 #define ARMJTAGEW_USB_TIMEOUT 2000
38 #define ARMJTAGEW_IN_BUFFER_SIZE (4*1024)
39 #define ARMJTAGEW_OUT_BUFFER_SIZE (4*1024)
42 /* USB command request codes. */
43 #define CMD_GET_VERSION 0x00
44 #define CMD_SELECT_DPIMPL 0x10
45 #define CMD_SET_TCK_FREQUENCY 0x11
46 #define CMD_GET_TCK_FREQUENCY 0x12
47 #define CMD_MEASURE_MAX_TCK_FREQ 0x15
48 #define CMD_MEASURE_RTCK_RESPONSE 0x16
49 #define CMD_TAP_SHIFT 0x17
50 #define CMD_SET_TAPHW_STATE 0x20
51 #define CMD_GET_TAPHW_STATE 0x21
52 #define CMD_TGPWR_SETUP 0x22
54 /* Global USB buffers */
55 static uint8_t usb_in_buffer[ARMJTAGEW_IN_BUFFER_SIZE];
56 static uint8_t usb_out_buffer[ARMJTAGEW_OUT_BUFFER_SIZE];
58 /* Queue command functions */
59 static void armjtagew_end_state(tap_state_t state);
60 static void armjtagew_state_move(void);
61 static void armjtagew_path_move(int num_states, tap_state_t *path);
62 static void armjtagew_runtest(int num_cycles);
63 static void armjtagew_scan(bool ir_scan, enum scan_type type, uint8_t *buffer, int scan_size, struct scan_command *command);
64 static void armjtagew_reset(int trst, int srst);
65 //static void armjtagew_simple_command(uint8_t command);
66 static int armjtagew_get_status(void);
68 /* tap buffer functions */
69 static void armjtagew_tap_init(void);
70 static int armjtagew_tap_execute(void);
71 static void armjtagew_tap_ensure_space(int scans, int bits);
72 static void armjtagew_tap_append_step(int tms, int tdi);
73 static void armjtagew_tap_append_scan(int length, uint8_t *buffer, struct scan_command *command);
75 /* ARM-JTAG-EW lowlevel functions */
77 struct usb_dev_handle* usb_handle;
80 static struct armjtagew *armjtagew_usb_open(void);
81 static void armjtagew_usb_close(struct armjtagew *armjtagew);
82 static int armjtagew_usb_message(struct armjtagew *armjtagew, int out_length, int in_length);
83 static int armjtagew_usb_write(struct armjtagew *armjtagew, int out_length);
84 static int armjtagew_usb_read(struct armjtagew *armjtagew, int exp_in_length);
86 /* helper functions */
87 static int armjtagew_get_version_info(void);
89 #ifdef _DEBUG_USB_COMMS_
90 static void armjtagew_debug_buffer(uint8_t *buffer, int length);
93 static struct armjtagew* armjtagew_handle;
97 /***************************************************************************/
98 /* External interface implementation */
100 static int armjtagew_execute_queue(void)
102 struct jtag_command *cmd = jtag_command_queue;
112 DEBUG_JTAG_IO("runtest %i cycles, end in %i", cmd->cmd.runtest->num_cycles, \
113 cmd->cmd.runtest->end_state);
115 armjtagew_end_state(cmd->cmd.runtest->end_state);
116 armjtagew_runtest(cmd->cmd.runtest->num_cycles);
120 DEBUG_JTAG_IO("statemove end in %i", cmd->cmd.statemove->end_state);
122 armjtagew_end_state(cmd->cmd.statemove->end_state);
123 armjtagew_state_move();
127 DEBUG_JTAG_IO("pathmove: %i states, end in %i", \
128 cmd->cmd.pathmove->num_states, \
129 cmd->cmd.pathmove->path[cmd->cmd.pathmove->num_states - 1]);
131 armjtagew_path_move(cmd->cmd.pathmove->num_states, cmd->cmd.pathmove->path);
135 DEBUG_JTAG_IO("scan end in %i", cmd->cmd.scan->end_state);
137 armjtagew_end_state(cmd->cmd.scan->end_state);
139 scan_size = jtag_build_buffer(cmd->cmd.scan, &buffer);
140 DEBUG_JTAG_IO("scan input, length = %d", scan_size);
142 #ifdef _DEBUG_USB_COMMS_
143 armjtagew_debug_buffer(buffer, (scan_size + 7) / 8);
145 type = jtag_scan_type(cmd->cmd.scan);
146 armjtagew_scan(cmd->cmd.scan->ir_scan, type, buffer, scan_size, cmd->cmd.scan);
150 DEBUG_JTAG_IO("reset trst: %i srst %i", cmd->cmd.reset->trst, cmd->cmd.reset->srst);
152 armjtagew_tap_execute();
154 if (cmd->cmd.reset->trst == 1)
156 tap_set_state(TAP_RESET);
158 armjtagew_reset(cmd->cmd.reset->trst, cmd->cmd.reset->srst);
162 DEBUG_JTAG_IO("sleep %i", cmd->cmd.sleep->us);
163 armjtagew_tap_execute();
164 jtag_sleep(cmd->cmd.sleep->us);
168 LOG_ERROR("BUG: unknown JTAG command type encountered");
174 return armjtagew_tap_execute();
178 /* Sets speed in kHz. */
179 static int armjtagew_speed(int speed)
185 usb_out_buffer[0] = CMD_SET_TCK_FREQUENCY;
186 buf_set_u32(usb_out_buffer + 1, 0, 32, speed);
188 result = armjtagew_usb_message(armjtagew_handle, 4, 4);
192 LOG_ERROR("ARM-JTAG-EW setting speed failed (%d)", result);
193 return ERROR_JTAG_DEVICE_ERROR;
196 usb_out_buffer[0] = CMD_GET_TCK_FREQUENCY;
197 result = armjtagew_usb_message(armjtagew_handle, 1, 4);
198 speed_real = (int)buf_get_u32(usb_in_buffer,0,32);
201 LOG_ERROR("ARM-JTAG-EW getting speed failed (%d)", result);
202 return ERROR_JTAG_DEVICE_ERROR;
206 LOG_INFO("Requested speed %dkHz, emulator reported %dkHz.", speed, speed_real);
213 static int armjtagew_khz(int khz, int *jtag_speed)
220 static int armjtagew_init(void)
224 armjtagew_handle = armjtagew_usb_open();
226 if (armjtagew_handle == 0)
228 LOG_ERROR("Cannot find ARM-JTAG-EW Interface! Please check connection and permissions.");
229 return ERROR_JTAG_INIT_FAILED;
233 while (check_cnt < 3)
235 if (armjtagew_get_version_info() == ERROR_OK)
237 /* attempt to get status */
238 armjtagew_get_status();
247 LOG_INFO("ARM-JTAG-EW initial read failed, don't worry");
250 LOG_INFO("ARM-JTAG-EW JTAG Interface ready");
252 armjtagew_reset(0, 0);
253 armjtagew_tap_init();
258 static int armjtagew_quit(void)
260 armjtagew_usb_close(armjtagew_handle);
264 /***************************************************************************/
265 /* Queue command implementations */
267 static void armjtagew_end_state(tap_state_t state)
269 if (tap_is_state_stable(state))
271 tap_set_end_state(state);
275 LOG_ERROR("BUG: %i is not a valid end state", state);
280 /* Goes to the end state. */
281 static void armjtagew_state_move(void)
285 uint8_t tms_scan = tap_get_tms_path(tap_get_state(), tap_get_end_state());
286 int tms_count = tap_get_tms_path_len(tap_get_state(), tap_get_end_state());
288 for (i = 0; i < tms_count; i++)
290 tms = (tms_scan >> i) & 1;
291 armjtagew_tap_append_step(tms, 0);
294 tap_set_state(tap_get_end_state());
297 static void armjtagew_path_move(int num_states, tap_state_t *path)
301 for (i = 0; i < num_states; i++)
304 * TODO: The ARM-JTAG-EW hardware delays TDI with 3 TCK cycles when in RTCK mode.
305 * Either handle that here, or update the documentation with examples
306 * how to fix that in the configuration files.
308 if (path[i] == tap_state_transition(tap_get_state(), false))
310 armjtagew_tap_append_step(0, 0);
312 else if (path[i] == tap_state_transition(tap_get_state(), true))
314 armjtagew_tap_append_step(1, 0);
318 LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition", tap_state_name(tap_get_state()), tap_state_name(path[i]));
322 tap_set_state(path[i]);
325 tap_set_end_state(tap_get_state());
328 static void armjtagew_runtest(int num_cycles)
332 tap_state_t saved_end_state = tap_get_end_state();
334 /* only do a state_move when we're not already in IDLE */
335 if (tap_get_state() != TAP_IDLE)
337 armjtagew_end_state(TAP_IDLE);
338 armjtagew_state_move();
341 /* execute num_cycles */
342 for (i = 0; i < num_cycles; i++)
344 armjtagew_tap_append_step(0, 0);
347 /* finish in end_state */
348 armjtagew_end_state(saved_end_state);
349 if (tap_get_state() != tap_get_end_state())
351 armjtagew_state_move();
355 static void armjtagew_scan(bool ir_scan, enum scan_type type, uint8_t *buffer, int scan_size, struct scan_command *command)
357 tap_state_t saved_end_state;
359 armjtagew_tap_ensure_space(1, scan_size + 8);
361 saved_end_state = tap_get_end_state();
363 /* Move to appropriate scan state */
364 armjtagew_end_state(ir_scan ? TAP_IRSHIFT : TAP_DRSHIFT);
366 armjtagew_state_move();
367 armjtagew_end_state(saved_end_state);
370 armjtagew_tap_append_scan(scan_size, buffer, command);
372 /* We are in Exit1, go to Pause */
373 armjtagew_tap_append_step(0, 0);
375 tap_set_state(ir_scan ? TAP_IRPAUSE : TAP_DRPAUSE);
377 if (tap_get_state() != tap_get_end_state())
379 armjtagew_state_move();
383 static void armjtagew_reset(int trst, int srst)
385 const uint8_t trst_mask = (1u << 5);
386 const uint8_t srst_mask = (1u << 6);
389 uint8_t change_mask = 0;
392 LOG_DEBUG("trst: %i, srst: %i", trst, srst);
397 outp_en &= ~srst_mask; /* tristate */
398 change_mask |= srst_mask;
403 outp_en |= srst_mask;
404 change_mask |= srst_mask;
410 outp_en &= ~trst_mask; /* tristate */
411 change_mask |= trst_mask;
416 outp_en |= trst_mask;
417 change_mask |= trst_mask;
420 usb_out_buffer[0] = CMD_SET_TAPHW_STATE;
421 usb_out_buffer[1] = val;
422 usb_out_buffer[2] = outp_en;
423 usb_out_buffer[3] = change_mask;
424 result = armjtagew_usb_write(armjtagew_handle, 4);
427 LOG_ERROR("ARM-JTAG-EW TRST/SRST pin set failed failed (%d)", result);
432 static int armjtagew_get_status(void)
436 usb_out_buffer[0] = CMD_GET_TAPHW_STATE;
437 result = armjtagew_usb_message(armjtagew_handle, 1, 12);
441 unsigned int u_tg = buf_get_u32(usb_in_buffer, 0, 16);
442 LOG_INFO("U_tg = %d mV, U_aux = %d mV, U_tgpwr = %d mV, I_tgpwr = %d mA, D1 = %d, Target power %s %s\n",
443 (int)(buf_get_u32(usb_in_buffer + 0, 0, 16)),
444 (int)(buf_get_u32(usb_in_buffer + 2, 0, 16)),
445 (int)(buf_get_u32(usb_in_buffer + 4, 0, 16)),
446 (int)(buf_get_u32(usb_in_buffer + 6, 0, 16)),
448 usb_in_buffer[11] ? "OVERCURRENT" : "OK",
449 usb_in_buffer[10] ? "enabled" : "disabled");
453 LOG_ERROR("Vref too low. Check Target Power\n");
458 LOG_ERROR("ARM-JTAG-EW command CMD_GET_TAPHW_STATE failed (%d)\n", result);
464 static int armjtagew_get_version_info(void)
470 /* query hardware version */
471 usb_out_buffer[0] = CMD_GET_VERSION;
472 result = armjtagew_usb_message(armjtagew_handle, 1, 4 + 15 + 256);
476 LOG_ERROR("ARM-JTAG-EW command CMD_GET_VERSION failed (%d)\n", result);
477 return ERROR_JTAG_DEVICE_ERROR;
481 memcpy(sn, usb_in_buffer + 4, 15);
483 memcpy(auxinfo, usb_in_buffer + 4+15, 256);
486 LOG_INFO("ARM-JTAG-EW firmware version %d.%d, hardware revision %c, SN=%s, Additional info: %s", \
487 usb_in_buffer[1], usb_in_buffer[0], \
488 isgraph(usb_in_buffer[2]) ? usb_in_buffer[2] : 'X', \
493 COMMAND_HANDLER(armjtagew_handle_armjtagew_info_command)
495 if (armjtagew_get_version_info() == ERROR_OK)
497 /* attempt to get status */
498 armjtagew_get_status();
504 static int armjtagew_register_commands(struct command_context *cmd_ctx)
506 register_command(cmd_ctx, NULL, "armjtagew_info",
507 &armjtagew_handle_armjtagew_info_command, COMMAND_EXEC,
508 "query armjtagew info");
512 struct jtag_interface armjtagew_interface = {
513 .name = "arm-jtag-ew",
514 .execute_queue = &armjtagew_execute_queue,
515 .speed = &armjtagew_speed,
516 .khz = &armjtagew_khz,
517 .register_commands = &armjtagew_register_commands,
518 .init = &armjtagew_init,
519 .quit = &armjtagew_quit,
522 /***************************************************************************/
523 /* ARM-JTAG-EW tap functions */
525 /* 2048 is the max value we can use here */
526 #define ARMJTAGEW_TAP_BUFFER_SIZE 2048
528 static int tap_length;
529 static uint8_t tms_buffer[ARMJTAGEW_TAP_BUFFER_SIZE];
530 static uint8_t tdi_buffer[ARMJTAGEW_TAP_BUFFER_SIZE];
531 static uint8_t tdo_buffer[ARMJTAGEW_TAP_BUFFER_SIZE];
533 struct pending_scan_result {
534 int first; /* First bit position in tdo_buffer to read */
535 int length; /* Number of bits to read */
536 struct scan_command *command; /* Corresponding scan command */
540 #define MAX_PENDING_SCAN_RESULTS 256
542 static int pending_scan_results_length;
543 static struct pending_scan_result pending_scan_results_buffer[MAX_PENDING_SCAN_RESULTS];
547 static void armjtagew_tap_init(void)
550 pending_scan_results_length = 0;
553 static void armjtagew_tap_ensure_space(int scans, int bits)
555 int available_scans = MAX_PENDING_SCAN_RESULTS - pending_scan_results_length;
556 int available_bits = ARMJTAGEW_TAP_BUFFER_SIZE * 8 - tap_length;
558 if (scans > available_scans || bits > available_bits)
560 armjtagew_tap_execute();
564 static void armjtagew_tap_append_step(int tms, int tdi)
567 int index = tap_length / 8;
569 if (index < ARMJTAGEW_TAP_BUFFER_SIZE)
571 int bit_index = tap_length % 8;
572 uint8_t bit = 1 << bit_index;
576 tms_buffer[index] |= bit;
580 tms_buffer[index] &= ~bit;
585 tdi_buffer[index] |= bit;
589 tdi_buffer[index] &= ~bit;
596 LOG_ERROR("armjtagew_tap_append_step, overflow");
600 void armjtagew_tap_append_scan(int length, uint8_t *buffer, struct scan_command *command)
602 struct pending_scan_result *pending_scan_result = &pending_scan_results_buffer[pending_scan_results_length];
605 pending_scan_result->first = tap_length;
606 pending_scan_result->length = length;
607 pending_scan_result->command = command;
608 pending_scan_result->buffer = buffer;
610 for (i = 0; i < length; i++)
612 armjtagew_tap_append_step((i < length-1 ? 0 : 1), (buffer[i/8] >> (i%8)) & 1);
614 pending_scan_results_length++;
617 /* Pad and send a tap sequence to the device, and receive the answer.
618 * For the purpose of padding we assume that we are in idle or pause state. */
619 static int armjtagew_tap_execute(void)
629 /* Pad last byte so that tap_length is divisible by 8 */
630 while (tap_length % 8 != 0)
632 /* More of the last TMS value keeps us in the same state,
633 * analogous to free-running JTAG interfaces. */
634 armjtagew_tap_append_step(last_tms, 0);
637 byte_length = tap_length / 8;
639 usb_out_buffer[0] = CMD_TAP_SHIFT;
640 buf_set_u32(usb_out_buffer + 1, 0, 16, byte_length);
643 for (i = 0; i < byte_length; i++)
645 usb_out_buffer[tms_offset + i] = flip_u32(tms_buffer[i],8);
648 tdi_offset = tms_offset + byte_length;
649 for (i = 0; i < byte_length; i++)
651 usb_out_buffer[tdi_offset + i] = flip_u32(tdi_buffer[i],8);
654 result = armjtagew_usb_message(armjtagew_handle, 3 + 2 * byte_length, byte_length + 4);
660 stat = (int)buf_get_u32(usb_in_buffer + byte_length, 0, 32);
662 LOG_ERROR("armjtagew_tap_execute, emulator returned error code %d for a CMD_TAP_SHIFT command", stat);
663 return ERROR_JTAG_QUEUE_FAILED;
666 for (i = 0; i < byte_length; i++)
668 tdo_buffer[i] = flip_u32(usb_in_buffer[i],8);
671 for (i = 0; i < pending_scan_results_length; i++)
673 struct pending_scan_result *pending_scan_result = &pending_scan_results_buffer[i];
674 uint8_t *buffer = pending_scan_result->buffer;
675 int length = pending_scan_result->length;
676 int first = pending_scan_result->first;
677 struct scan_command *command = pending_scan_result->command;
680 buf_set_buf(tdo_buffer, first, buffer, 0, length);
682 DEBUG_JTAG_IO("pending scan result, length = %d", length);
684 #ifdef _DEBUG_USB_COMMS_
685 armjtagew_debug_buffer(buffer, byte_length);
688 if (jtag_read_buffer(buffer, command) != ERROR_OK)
690 armjtagew_tap_init();
691 return ERROR_JTAG_QUEUE_FAILED;
694 if (pending_scan_result->buffer != NULL)
696 free(pending_scan_result->buffer);
702 LOG_ERROR("armjtagew_tap_execute, wrong result %d, expected %d", result, byte_length);
703 return ERROR_JTAG_QUEUE_FAILED;
706 armjtagew_tap_init();
712 /*****************************************************************************/
713 /* JLink USB low-level functions */
715 static struct armjtagew* armjtagew_usb_open()
717 struct usb_bus *busses;
719 struct usb_device *dev;
721 struct armjtagew *result;
723 result = (struct armjtagew*) malloc(sizeof(struct armjtagew));
729 busses = usb_get_busses();
731 /* find armjtagew device in usb bus */
733 for (bus = busses; bus; bus = bus->next)
735 for (dev = bus->devices; dev; dev = dev->next)
737 if ((dev->descriptor.idVendor == USB_VID) && (dev->descriptor.idProduct == USB_PID))
739 result->usb_handle = usb_open(dev);
742 /* usb_set_configuration required under win32 */
743 usb_set_configuration(result->usb_handle, dev->config[0].bConfigurationValue);
745 usb_claim_interface(result->usb_handle, 0);
749 * This makes problems under Mac OS X. And is not needed
750 * under Windows. Hopefully this will not break a linux build
752 usb_set_altinterface(result->usb_handle, 0);
763 static void armjtagew_usb_close(struct armjtagew *armjtagew)
765 usb_close(armjtagew->usb_handle);
769 /* Send a message and receive the reply. */
770 static int armjtagew_usb_message(struct armjtagew *armjtagew, int out_length, int in_length)
774 result = armjtagew_usb_write(armjtagew, out_length);
775 if (result == out_length)
777 result = armjtagew_usb_read(armjtagew, in_length);
778 if (result != in_length)
780 LOG_ERROR("usb_bulk_read failed (requested=%d, result=%d)", in_length, result);
786 LOG_ERROR("usb_bulk_write failed (requested=%d, result=%d)", out_length, result);
792 /* Write data from out_buffer to USB. */
793 static int armjtagew_usb_write(struct armjtagew *armjtagew, int out_length)
797 if (out_length > ARMJTAGEW_OUT_BUFFER_SIZE)
799 LOG_ERROR("armjtagew_write illegal out_length=%d (max=%d)", out_length, ARMJTAGEW_OUT_BUFFER_SIZE);
803 result = usb_bulk_write(armjtagew->usb_handle, ARMJTAGEW_EPT_BULK_OUT, \
804 (char*)usb_out_buffer, out_length, ARMJTAGEW_USB_TIMEOUT);
806 DEBUG_JTAG_IO("armjtagew_usb_write, out_length = %d, result = %d", out_length, result);
808 #ifdef _DEBUG_USB_COMMS_
809 armjtagew_debug_buffer(usb_out_buffer, out_length);
814 /* Read data from USB into in_buffer. */
815 static int armjtagew_usb_read(struct armjtagew *armjtagew, int exp_in_length)
817 int result = usb_bulk_read(armjtagew->usb_handle, ARMJTAGEW_EPT_BULK_IN, \
818 (char*)usb_in_buffer, exp_in_length, ARMJTAGEW_USB_TIMEOUT);
820 DEBUG_JTAG_IO("armjtagew_usb_read, result = %d", result);
822 #ifdef _DEBUG_USB_COMMS_
823 armjtagew_debug_buffer(usb_in_buffer, result);
829 #ifdef _DEBUG_USB_COMMS_
830 #define BYTES_PER_LINE 16
832 static void armjtagew_debug_buffer(uint8_t *buffer, int length)
839 for (i = 0; i < length; i += BYTES_PER_LINE)
841 snprintf(line, 5, "%04x", i);
842 for (j = i; j < i + BYTES_PER_LINE && j < length; j++)
844 snprintf(s, 4, " %02x", buffer[j]);
847 LOG_DEBUG("%s", line);