Remove FSF address from GPL notices
[fw/openocd] / src / jtag / hla / hla_interface.c
1 /***************************************************************************
2  *   Copyright (C) 2011 by Mathias Kuester                                 *
3  *   Mathias Kuester <kesmtp@freenet.de>                                   *
4  *                                                                         *
5  *   Copyright (C) 2012 by Spencer Oliver                                  *
6  *   spen@spen-soft.co.uk                                                  *
7  *                                                                         *
8  *   This program is free software; you can redistribute it and/or modify  *
9  *   it under the terms of the GNU General Public License as published by  *
10  *   the Free Software Foundation; either version 2 of the License, or     *
11  *   (at your option) any later version.                                   *
12  *                                                                         *
13  *   This program is distributed in the hope that it will be useful,       *
14  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
15  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
16  *   GNU General Public License for more details.                          *
17  *                                                                         *
18  *   You should have received a copy of the GNU General Public License     *
19  *   along with this program.  If not, see <http://www.gnu.org/licenses/>. *
20  ***************************************************************************/
21
22 #ifdef HAVE_CONFIG_H
23 #include "config.h"
24 #endif
25
26 /* project specific includes */
27 #include <jtag/interface.h>
28 #include <transport/transport.h>
29 #include <helper/time_support.h>
30
31 #include <jtag/hla/hla_tcl.h>
32 #include <jtag/hla/hla_layout.h>
33 #include <jtag/hla/hla_transport.h>
34 #include <jtag/hla/hla_interface.h>
35
36 #include <target/target.h>
37
38 static struct hl_interface_s hl_if = { {0, 0, 0, 0, 0, HL_TRANSPORT_UNKNOWN, false, -1}, 0, 0 };
39
40 int hl_interface_open(enum hl_transports tr)
41 {
42         LOG_DEBUG("hl_interface_open");
43
44         enum reset_types jtag_reset_config = jtag_get_reset_config();
45
46         if (jtag_reset_config & RESET_CNCT_UNDER_SRST) {
47                 if (jtag_reset_config & RESET_SRST_NO_GATING)
48                         hl_if.param.connect_under_reset = true;
49                 else
50                         LOG_WARNING("\'srst_nogate\' reset_config option is required");
51         }
52
53         /* set transport mode */
54         hl_if.param.transport = tr;
55
56         int result = hl_if.layout->open(&hl_if);
57         if (result != ERROR_OK)
58                 return result;
59
60         return hl_interface_init_reset();
61 }
62
63 int hl_interface_init_target(struct target *t)
64 {
65         int res;
66
67         LOG_DEBUG("hl_interface_init_target");
68
69         /* this is the interface for the current target and we
70          * can setup the private pointer in the tap structure
71          * if the interface match the tap idcode
72          */
73         res = hl_if.layout->api->idcode(hl_if.handle, &t->tap->idcode);
74
75         if (res != ERROR_OK)
76                 return res;
77
78         unsigned ii, limit = t->tap->expected_ids_cnt;
79         int found = 0;
80
81         for (ii = 0; ii < limit; ii++) {
82                 uint32_t expected = t->tap->expected_ids[ii];
83
84                 /* treat "-expected-id 0" as a "don't-warn" wildcard */
85                 if (!expected || !t->tap->idcode ||
86                     (t->tap->idcode == expected)) {
87                         found = 1;
88                         break;
89                 }
90         }
91
92         if (found == 0) {
93                 LOG_WARNING("UNEXPECTED idcode: 0x%08" PRIx32, t->tap->idcode);
94                 for (ii = 0; ii < limit; ii++)
95                         LOG_ERROR("expected %u of %u: 0x%08" PRIx32, ii + 1, limit,
96                                 t->tap->expected_ids[ii]);
97
98                 return ERROR_FAIL;
99         }
100
101         t->tap->priv = &hl_if;
102         t->tap->hasidcode = 1;
103
104         return ERROR_OK;
105 }
106
107 static int hl_interface_init(void)
108 {
109         LOG_DEBUG("hl_interface_init");
110
111         /* here we can initialize the layout */
112         return hl_layout_init(&hl_if);
113 }
114
115 static int hl_interface_quit(void)
116 {
117         LOG_DEBUG("hl_interface_quit");
118
119         if (hl_if.layout->api->close)
120                 hl_if.layout->api->close(hl_if.handle);
121
122         return ERROR_OK;
123 }
124
125 static int hl_interface_execute_queue(void)
126 {
127         LOG_DEBUG("hl_interface_execute_queue: ignored");
128
129         return ERROR_OK;
130 }
131
132 int hl_interface_init_reset(void)
133 {
134         /* incase the adapter has not already handled asserting srst
135          * we will attempt it again */
136         if (hl_if.param.connect_under_reset) {
137                 jtag_add_reset(0, 1);
138                 hl_if.layout->api->assert_srst(hl_if.handle, 0);
139         } else {
140                 jtag_add_reset(0, 0);
141         }
142
143         return ERROR_OK;
144 }
145
146 static int hl_interface_khz(int khz, int *jtag_speed)
147 {
148         if (hl_if.layout->api->speed == NULL)
149                 return ERROR_OK;
150
151         *jtag_speed = hl_if.layout->api->speed(hl_if.handle, khz, true);
152         return ERROR_OK;
153 }
154
155 static int hl_interface_speed_div(int speed, int *khz)
156 {
157         *khz = speed;
158         return ERROR_OK;
159 }
160
161 static int hl_interface_speed(int speed)
162 {
163         if (hl_if.layout->api->speed == NULL)
164                 return ERROR_OK;
165
166         if (hl_if.handle == NULL) {
167                 /* pass speed as initial param as interface not open yet */
168                 hl_if.param.initial_interface_speed = speed;
169                 return ERROR_OK;
170         }
171
172         hl_if.layout->api->speed(hl_if.handle, speed, false);
173
174         return ERROR_OK;
175 }
176
177 int hl_interface_override_target(const char **targetname)
178 {
179         if (hl_if.layout->api->override_target) {
180                 if (hl_if.layout->api->override_target(*targetname)) {
181                         *targetname = "hla_target";
182                         return ERROR_OK;
183                 } else
184                         return ERROR_FAIL;
185         }
186         return ERROR_FAIL;
187 }
188
189 int hl_interface_config_trace(bool enabled, enum tpio_pin_protocol pin_protocol,
190                               uint32_t port_size, unsigned int *trace_freq)
191 {
192         if (hl_if.layout->api->config_trace)
193                 return hl_if.layout->api->config_trace(hl_if.handle, enabled, pin_protocol,
194                                                        port_size, trace_freq);
195         else if (enabled) {
196                 LOG_ERROR("The selected interface does not support tracing");
197                 return ERROR_FAIL;
198         }
199
200         return ERROR_OK;
201 }
202
203 int hl_interface_poll_trace(uint8_t *buf, size_t *size)
204 {
205         if (hl_if.layout->api->poll_trace)
206                 return hl_if.layout->api->poll_trace(hl_if.handle, buf, size);
207
208         return ERROR_FAIL;
209 }
210
211 COMMAND_HANDLER(hl_interface_handle_device_desc_command)
212 {
213         LOG_DEBUG("hl_interface_handle_device_desc_command");
214
215         if (CMD_ARGC == 1) {
216                 hl_if.param.device_desc = strdup(CMD_ARGV[0]);
217         } else {
218                 LOG_ERROR("expected exactly one argument to hl_device_desc <description>");
219         }
220
221         return ERROR_OK;
222 }
223
224 COMMAND_HANDLER(hl_interface_handle_serial_command)
225 {
226         LOG_DEBUG("hl_interface_handle_serial_command");
227
228         if (CMD_ARGC == 1) {
229                 hl_if.param.serial = strdup(CMD_ARGV[0]);
230         } else {
231                 LOG_ERROR("expected exactly one argument to hl_serial <serial-number>");
232         }
233
234         return ERROR_OK;
235 }
236
237 COMMAND_HANDLER(hl_interface_handle_layout_command)
238 {
239         LOG_DEBUG("hl_interface_handle_layout_command");
240
241         if (CMD_ARGC != 1) {
242                 LOG_ERROR("Need exactly one argument to stlink_layout");
243                 return ERROR_COMMAND_SYNTAX_ERROR;
244         }
245
246         if (hl_if.layout) {
247                 LOG_ERROR("already specified hl_layout %s",
248                                 hl_if.layout->name);
249                 return (strcmp(hl_if.layout->name, CMD_ARGV[0]) != 0)
250                     ? ERROR_FAIL : ERROR_OK;
251         }
252
253         for (const struct hl_layout *l = hl_layout_get_list(); l->name;
254              l++) {
255                 if (strcmp(l->name, CMD_ARGV[0]) == 0) {
256                         hl_if.layout = l;
257                         return ERROR_OK;
258                 }
259         }
260
261         LOG_ERROR("No adapter layout '%s' found", CMD_ARGV[0]);
262         return ERROR_FAIL;
263 }
264
265 COMMAND_HANDLER(hl_interface_handle_vid_pid_command)
266 {
267         LOG_DEBUG("hl_interface_handle_vid_pid_command");
268
269         if (CMD_ARGC != 2) {
270                 LOG_WARNING("ignoring extra IDs in hl_vid_pid (maximum is 1 pair)");
271                 return ERROR_COMMAND_SYNTAX_ERROR;
272         }
273
274         COMMAND_PARSE_NUMBER(u16, CMD_ARGV[0], hl_if.param.vid);
275         COMMAND_PARSE_NUMBER(u16, CMD_ARGV[1], hl_if.param.pid);
276
277         return ERROR_OK;
278 }
279
280 COMMAND_HANDLER(interface_handle_hla_command)
281 {
282         if (CMD_ARGC != 1)
283                 return ERROR_COMMAND_SYNTAX_ERROR;
284
285         if (!hl_if.layout->api->custom_command) {
286                 LOG_ERROR("The selected adapter doesn't support custom commands");
287                 return ERROR_FAIL;
288         }
289
290         hl_if.layout->api->custom_command(hl_if.handle, CMD_ARGV[0]);
291
292         return ERROR_OK;
293 }
294
295 static const struct command_registration hl_interface_command_handlers[] = {
296         {
297          .name = "hla_device_desc",
298          .handler = &hl_interface_handle_device_desc_command,
299          .mode = COMMAND_CONFIG,
300          .help = "set the a device description of the adapter",
301          .usage = "description_string",
302          },
303         {
304          .name = "hla_serial",
305          .handler = &hl_interface_handle_serial_command,
306          .mode = COMMAND_CONFIG,
307          .help = "set the serial number of the adapter",
308          .usage = "serial_string",
309          },
310         {
311          .name = "hla_layout",
312          .handler = &hl_interface_handle_layout_command,
313          .mode = COMMAND_CONFIG,
314          .help = "set the layout of the adapter",
315          .usage = "layout_name",
316          },
317         {
318          .name = "hla_vid_pid",
319          .handler = &hl_interface_handle_vid_pid_command,
320          .mode = COMMAND_CONFIG,
321          .help = "the vendor and product ID of the adapter",
322          .usage = "(vid pid)* ",
323          },
324          {
325          .name = "hla_command",
326          .handler = &interface_handle_hla_command,
327          .mode = COMMAND_EXEC,
328          .help = "execute a custom adapter-specific command",
329          .usage = "hla_command <command>",
330          },
331         COMMAND_REGISTRATION_DONE
332 };
333
334 struct jtag_interface hl_interface = {
335         .name = "hla",
336         .supported = 0,
337         .commands = hl_interface_command_handlers,
338         .transports = hl_transports,
339         .init = hl_interface_init,
340         .quit = hl_interface_quit,
341         .execute_queue = hl_interface_execute_queue,
342         .speed = &hl_interface_speed,
343         .khz = &hl_interface_khz,
344         .speed_div = &hl_interface_speed_div,
345         .config_trace = &hl_interface_config_trace,
346         .poll_trace = &hl_interface_poll_trace,
347 };