add link to 64bit install instructions on Kubuntu by Ken Ryan
[usb-driver] / jtagkey.c
1 #include <stdio.h>
2 #include <ftdi.h>
3 #include <unistd.h>
4 #include <pthread.h>
5 #include "usb-driver.h"
6 #include "config.h"
7 #include "jtagkey.h"
8 #include "jtagmon.h"
9
10 #define USBBUFSIZE 1048576
11 #define JTAG_SPEED 100000
12 #define BULK_LATENCY 2
13 #define OTHER_LATENCY 1
14
15 static struct ftdi_context ftdic;
16
17 static int jtagkey_latency(int latency) {
18 static int current = 0;
19 int ret;
20
21 if (current != latency) {
22 DPRINTF("switching latency\n");
23 if ((ret = ftdi_set_latency_timer(&ftdic, latency)) != 0) {
24 fprintf(stderr, "unable to set latency timer: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
25 return ret;
26 }
27
28 current = latency;
29 }
30
31 return ret;
32 }
33
34 static int jtagkey_init(unsigned short vid, unsigned short pid) {
35 int ret = 0;
36 unsigned char c;
37
38 if ((ret = ftdi_init(&ftdic)) != 0) {
39 fprintf(stderr, "unable to initialise libftdi: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
40 return ret;
41 }
42
43 if ((ret = ftdi_usb_open(&ftdic, vid, pid)) != 0) {
44 fprintf(stderr, "unable to open ftdi device: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
45 return ret;
46 }
47
48 if ((ret = ftdi_usb_reset(&ftdic)) != 0) {
49 fprintf(stderr, "unable reset device: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
50 return ret;
51 }
52
53 if ((ret = ftdi_set_interface(&ftdic, INTERFACE_A)) != 0) {
54 fprintf(stderr, "unable to set interface: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
55 return ret;
56 }
57
58 if ((ret = ftdi_write_data_set_chunksize(&ftdic, USBBUFSIZE)) != 0) {
59 fprintf(stderr, "unable to set write chunksize: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
60 return ret;
61 }
62
63 if ((ret = ftdi_read_data_set_chunksize(&ftdic, USBBUFSIZE)) != 0) {
64 fprintf(stderr, "unable to set read chunksize: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
65 return ret;
66 }
67
68 if ((ret = jtagkey_latency(OTHER_LATENCY)) != 0)
69 return ret;
70
71 c = 0x00;
72 ftdi_write_data(&ftdic, &c, 1);
73
74 if ((ret = ftdi_set_bitmode(&ftdic, JTAGKEY_TCK|JTAGKEY_TDI|JTAGKEY_TMS|JTAGKEY_OEn, BITMODE_SYNCBB)) != 0) {
75 fprintf(stderr, "unable to enable bitbang mode: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
76 return ret;
77 }
78
79 if ((ret = ftdi_set_baudrate(&ftdic, JTAG_SPEED)) != 0) {
80 fprintf(stderr, "unable to set baudrate: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
81 return ret;
82 }
83
84 if ((ret = ftdi_usb_purge_buffers(&ftdic)) != 0) {
85 fprintf(stderr, "unable to purge buffers: %d (%s)\n", ret, ftdi_get_error_string(&ftdic));
86 return ret;
87 }
88
89 return ret;
90 }
91
92 int jtagkey_open(int num) {
93 int ret;
94
95 ret = jtagkey_init(config_usb_vid(num), config_usb_pid(num));
96
97 if (ret >= 0)
98 ret = 0xff;
99
100 return ret;
101 }
102
103 void jtagkey_close(int handle) {
104 if (handle == 0xff) {
105 ftdi_disable_bitbang(&ftdic);
106 ftdi_usb_close(&ftdic);
107 ftdi_deinit(&ftdic);
108 }
109 }
110
111 void jtagkey_state(unsigned char data) {
112 fprintf(stderr,"Pins high: ");
113
114 if (data & JTAGKEY_TCK)
115 fprintf(stderr,"TCK ");
116
117 if (data & JTAGKEY_TDI)
118 fprintf(stderr,"TDI ");
119
120 if (data & JTAGKEY_TDO)
121 fprintf(stderr,"TDO ");
122
123 if (data & JTAGKEY_TMS)
124 fprintf(stderr,"TMS ");
125
126 if (data & JTAGKEY_VREF)
127 fprintf(stderr,"VREF ");
128
129 fprintf(stderr,"\n");
130 }
131
132 struct jtagkey_reader_arg {
133 int num;
134 unsigned char *buf;
135 };
136
137 static void *jtagkey_reader(void *thread_arg) {
138 struct jtagkey_reader_arg *arg = (struct jtagkey_reader_arg*)thread_arg;
139 int i;
140
141 i = 0;
142 DPRINTF("reader for %d bytes\n", arg->num);
143 while (i < arg->num) {
144 i += ftdi_read_data(&ftdic, arg->buf + i, arg->num - i);
145 }
146
147 pthread_exit(NULL);
148 }
149
150 /* TODO: Interpret JTAG commands and transfer in MPSSE mode */
151 int jtagkey_transfer(WD_TRANSFER *tr, int fd, unsigned int request, int ppbase, int ecpbase, int num) {
152 int ret = 0;
153 int i;
154 int nread = 0;
155 unsigned long port;
156 unsigned char val;
157 static unsigned char last_data = 0;
158 static unsigned char last_write = 0x00;
159 static unsigned char writebuf[USBBUFSIZE], *writepos = writebuf;
160 static unsigned char readbuf[USBBUFSIZE], *readpos;
161 unsigned char data, prev_data, last_cyc_write;
162 struct jtagkey_reader_arg targ;
163 pthread_t reader_thread;
164
165 /* Count reads */
166 for (i = 0; i < num; i++)
167 if (tr[i].cmdTrans == PP_READ)
168 nread++;
169
170 /* Write combining */
171 if ((writepos-writebuf > sizeof(writebuf)-num) || (nread && writepos-writebuf)) {
172 unsigned char *pos = writebuf;
173 int len;
174
175 DPRINTF("writing %d bytes due to %d following reads in %d chunks or full buffer\n", writepos-writebuf, nread, num);
176 jtagkey_latency(BULK_LATENCY);
177
178 targ.num = writepos-pos;
179 targ.buf = readbuf;
180 pthread_create(&reader_thread, NULL, &jtagkey_reader, &targ);
181
182 while (pos < writepos) {
183 len = writepos-pos;
184
185 if (len > USBBUFSIZE)
186 len = USBBUFSIZE;
187
188 DPRINTF("combined write of %d/%d\n",len,writepos-pos);
189 ftdi_write_data(&ftdic, pos, len);
190 pos += len;
191 }
192 pthread_join(reader_thread, NULL);
193
194 writepos = writebuf;
195 }
196
197 last_cyc_write = last_write;
198
199 for (i = 0; i < num; i++) {
200 DPRINTF("dwPort: 0x%lx, cmdTrans: %lu, dwbytes: %ld, fautoinc: %ld, dwoptions: %ld\n",
201 (unsigned long)tr[i].dwPort, tr[i].cmdTrans, tr[i].dwBytes,
202 tr[i].fAutoinc, tr[i].dwOptions);
203
204 port = (unsigned long)tr[i].dwPort;
205 val = tr[i].Data.Byte;
206
207 #ifdef DEBUG
208 if (tr[i].cmdTrans == 13)
209 DPRINTF("write byte: %d\n", val);
210
211 if (tr[i].cmdTrans == 13)
212 jtagmon(val & PP_TCK, val & PP_TMS, val & PP_TDI);
213 #endif
214
215 /* Pad writebuf for read-commands in stream */
216 *writepos = last_data;
217 prev_data = last_data;
218
219 if (port == ppbase + PP_DATA) {
220 DPRINTF("data port\n");
221
222 data = 0x00;
223 switch(tr[i].cmdTrans) {
224 case PP_READ:
225 ret = 0; /* We don't support reading of the data port */
226 break;
227
228 case PP_WRITE:
229 if (val & PP_TDI) {
230 data |= JTAGKEY_TDI;
231 DPRINTF("TDI\n");
232 } else {
233 DPRINTF("!TDI\n");
234 }
235 if (val & PP_TCK) {
236 data |= JTAGKEY_TCK;
237 DPRINTF("TCK\n");
238 } else {
239 DPRINTF("!TCK\n");
240 }
241 if (val & PP_TMS) {
242 data |= JTAGKEY_TMS;
243 DPRINTF("TMS\n");
244 } else {
245 DPRINTF("!TMS\n");
246 }
247 if (val & PP_CTRL) {
248 data = JTAGKEY_OEn;
249 DPRINTF("CTRL\n");
250 } else {
251 DPRINTF("!CTRL\n");
252 }
253
254 if (val & PP_PROG) {
255 DPRINTF("PROG\n");
256 } else {
257 DPRINTF("!PROG\n");
258 }
259
260 *writepos = data;
261
262 last_data = data;
263 last_write = val;
264 break;
265
266 default:
267 fprintf(stderr,"!!!Unsupported TRANSFER command: %lu!!!\n", tr[i].cmdTrans);
268 ret = -1;
269 break;
270 }
271 }
272
273 if ((tr[i].cmdTrans == PP_READ) || (*writepos != prev_data) || (i == num-1))
274 writepos++;
275 }
276
277 if (nread)
278 {
279 DPRINTF("writing %d bytes\n", writepos-writebuf);
280
281 *writepos = last_data;
282 writepos++;
283
284 jtagkey_latency(OTHER_LATENCY);
285
286 targ.num = writepos-writebuf;
287 targ.buf = readbuf;
288 pthread_create(&reader_thread, NULL, &jtagkey_reader, &targ);
289 ftdi_write_data(&ftdic, writebuf, writepos-writebuf);
290 pthread_join(reader_thread, NULL);
291
292 #ifdef DEBUG
293 DPRINTF("write: ");
294 hexdump(writebuf, writepos-writebuf);
295 DPRINTF("read: ");
296 hexdump(readbuf, i);
297 #endif
298
299 writepos = writebuf;
300 } else {
301 return ret;
302 }
303
304 readpos = readbuf;
305 last_write = last_cyc_write;
306
307 for (i = 0; i < num; i++) {
308 DPRINTF("dwPort: 0x%lx, cmdTrans: %lu, dwbytes: %ld, fautoinc: %ld, dwoptions: %ld\n",
309 (unsigned long)tr[i].dwPort, tr[i].cmdTrans, tr[i].dwBytes,
310 tr[i].fAutoinc, tr[i].dwOptions);
311
312 port = (unsigned long)tr[i].dwPort;
313 val = tr[i].Data.Byte;
314
315 if ((tr[i].cmdTrans != PP_READ) && (val == last_write) && (i != num-1))
316 continue;
317
318 readpos++;
319
320 if (port == ppbase + PP_DATA) {
321 if (tr[i].cmdTrans == PP_WRITE) {
322 last_write = val;
323 }
324 } else if (port == ppbase + PP_STATUS) {
325 DPRINTF("status port (last write: 0x%x)\n", last_write);
326 switch(tr[i].cmdTrans) {
327 case PP_READ:
328 data = *readpos;
329
330 #ifdef DEBUG
331 DPRINTF("READ: 0x%x\n", data);
332 jtagkey_state(data);
333 #endif
334
335 val = 0x00;
336 if ((data & JTAGKEY_TDO) && (last_write & PP_PROG))
337 val |= PP_TDO;
338
339 if (~last_write & PP_PROG)
340 val |= 0x08;
341
342 if (last_write & 0x40)
343 val |= 0x20;
344 else
345 val |= 0x80;
346 break;
347
348 case PP_WRITE:
349 ret = 0; /* Status Port is readonly */
350 break;
351
352 default:
353 fprintf(stderr,"!!!Unsupported TRANSFER command: %lu!!!\n", tr[i].cmdTrans);
354 ret = -1;
355 break;
356 }
357 } else {
358 ret = 0;
359 }
360
361 tr[i].Data.Byte = val;
362
363 DPRINTF("dwPortReturn: 0x%lx, cmdTrans: %lu, dwbytes: %ld, fautoinc: %ld, dwoptions: %ld\n",
364 (unsigned long)tr[i].dwPort, tr[i].cmdTrans, tr[i].dwBytes,
365 tr[i].fAutoinc, tr[i].dwOptions);
366 #ifdef DEBUG
367 if (tr[i].cmdTrans == 10)
368 DPRINTF("read byte: %d\n", tr[i].Data.Byte);
369 #endif
370 }
371
372 return ret;
373 }
Impressum, Datenschutz