Add print_inverted_bits() to replace a duplicated code block.
[libftdi] / src / ftdi.c
1 /***************************************************************************
2                           ftdi.c  -  description
3                              -------------------
4     begin                : Fri Apr 4 2003
5     copyright            : (C) 2003-2013 by Intra2net AG and the libftdi developers
6     email                : opensource@intra2net.com
7  ***************************************************************************/
8
9 /***************************************************************************
10  *                                                                         *
11  *   This program is free software; you can redistribute it and/or modify  *
12  *   it under the terms of the GNU Lesser General Public License           *
13  *   version 2.1 as published by the Free Software Foundation;             *
14  *                                                                         *
15  ***************************************************************************/
16
17 /**
18     \mainpage libftdi API documentation
19
20     Library to talk to FTDI chips. You find the latest versions of libftdi at
21     http://www.intra2net.com/en/developer/libftdi/
22
23     The library is easy to use. Have a look at this short example:
24     \include simple.c
25
26     More examples can be found in the "examples" directory.
27 */
28 /** \addtogroup libftdi */
29 /* @{ */
30
31 #include <libusb.h>
32 #include <string.h>
33 #include <errno.h>
34 #include <stdio.h>
35 #include <stdlib.h>
36
37 #include "ftdi_i.h"
38 #include "ftdi.h"
39 #include "ftdi_version_i.h"
40
41 #define ftdi_error_return(code, str) do {  \
42         if ( ftdi )                        \
43             ftdi->error_str = str;         \
44         else                               \
45             fprintf(stderr, str);          \
46         return code;                       \
47    } while(0);
48
49 #define ftdi_error_return_free_device_list(code, str, devs) do {    \
50         libusb_free_device_list(devs,1);   \
51         ftdi->error_str = str;             \
52         return code;                       \
53    } while(0);
54
55
56 /**
57     Internal function to close usb device pointer.
58     Sets ftdi->usb_dev to NULL.
59     \internal
60
61     \param ftdi pointer to ftdi_context
62
63     \retval none
64 */
65 static void ftdi_usb_close_internal (struct ftdi_context *ftdi)
66 {
67     if (ftdi && ftdi->usb_dev)
68     {
69         libusb_close (ftdi->usb_dev);
70         ftdi->usb_dev = NULL;
71         if(ftdi->eeprom)
72             ftdi->eeprom->initialized_for_connected_device = 0;
73     }
74 }
75
76 /**
77     Initializes a ftdi_context.
78
79     \param ftdi pointer to ftdi_context
80
81     \retval  0: all fine
82     \retval -1: couldn't allocate read buffer
83     \retval -2: couldn't allocate struct  buffer
84     \retval -3: libusb_init() failed
85
86     \remark This should be called before all functions
87 */
88 int ftdi_init(struct ftdi_context *ftdi)
89 {
90     struct ftdi_eeprom* eeprom = (struct ftdi_eeprom *)malloc(sizeof(struct ftdi_eeprom));
91     ftdi->usb_ctx = NULL;
92     ftdi->usb_dev = NULL;
93     ftdi->usb_read_timeout = 5000;
94     ftdi->usb_write_timeout = 5000;
95
96     ftdi->type = TYPE_BM;    /* chip type */
97     ftdi->baudrate = -1;
98     ftdi->bitbang_enabled = 0;  /* 0: normal mode 1: any of the bitbang modes enabled */
99
100     ftdi->readbuffer = NULL;
101     ftdi->readbuffer_offset = 0;
102     ftdi->readbuffer_remaining = 0;
103     ftdi->writebuffer_chunksize = 4096;
104     ftdi->max_packet_size = 0;
105     ftdi->error_str = NULL;
106     ftdi->module_detach_mode = AUTO_DETACH_SIO_MODULE;
107
108     if (libusb_init(&ftdi->usb_ctx) < 0)
109         ftdi_error_return(-3, "libusb_init() failed");
110
111     ftdi_set_interface(ftdi, INTERFACE_ANY);
112     ftdi->bitbang_mode = 1; /* when bitbang is enabled this holds the number of the mode  */
113
114     if (eeprom == 0)
115         ftdi_error_return(-2, "Can't malloc struct ftdi_eeprom");
116     memset(eeprom, 0, sizeof(struct ftdi_eeprom));
117     ftdi->eeprom = eeprom;
118
119     /* All fine. Now allocate the readbuffer */
120     return ftdi_read_data_set_chunksize(ftdi, 4096);
121 }
122
123 /**
124     Allocate and initialize a new ftdi_context
125
126     \return a pointer to a new ftdi_context, or NULL on failure
127 */
128 struct ftdi_context *ftdi_new(void)
129 {
130     struct ftdi_context * ftdi = (struct ftdi_context *)malloc(sizeof(struct ftdi_context));
131
132     if (ftdi == NULL)
133     {
134         return NULL;
135     }
136
137     if (ftdi_init(ftdi) != 0)
138     {
139         free(ftdi);
140         return NULL;
141     }
142
143     return ftdi;
144 }
145
146 /**
147     Open selected channels on a chip, otherwise use first channel.
148
149     \param ftdi pointer to ftdi_context
150     \param interface Interface to use for FT2232C/2232H/4232H chips.
151
152     \retval  0: all fine
153     \retval -1: unknown interface
154     \retval -2: USB device unavailable
155     \retval -3: Device already open, interface can't be set in that state
156 */
157 int ftdi_set_interface(struct ftdi_context *ftdi, enum ftdi_interface interface)
158 {
159     if (ftdi == NULL)
160         ftdi_error_return(-2, "USB device unavailable");
161
162     if (ftdi->usb_dev != NULL)
163     {
164         int check_interface = interface;
165         if (check_interface == INTERFACE_ANY)
166             check_interface = INTERFACE_A;
167
168         if (ftdi->index != check_interface)
169             ftdi_error_return(-3, "Interface can not be changed on an already open device");
170     }
171
172     switch (interface)
173     {
174         case INTERFACE_ANY:
175         case INTERFACE_A:
176             ftdi->interface = 0;
177             ftdi->index     = INTERFACE_A;
178             ftdi->in_ep     = 0x02;
179             ftdi->out_ep    = 0x81;
180             break;
181         case INTERFACE_B:
182             ftdi->interface = 1;
183             ftdi->index     = INTERFACE_B;
184             ftdi->in_ep     = 0x04;
185             ftdi->out_ep    = 0x83;
186             break;
187         case INTERFACE_C:
188             ftdi->interface = 2;
189             ftdi->index     = INTERFACE_C;
190             ftdi->in_ep     = 0x06;
191             ftdi->out_ep    = 0x85;
192             break;
193         case INTERFACE_D:
194             ftdi->interface = 3;
195             ftdi->index     = INTERFACE_D;
196             ftdi->in_ep     = 0x08;
197             ftdi->out_ep    = 0x87;
198             break;
199         default:
200             ftdi_error_return(-1, "Unknown interface");
201     }
202     return 0;
203 }
204
205 /**
206     Deinitializes a ftdi_context.
207
208     \param ftdi pointer to ftdi_context
209 */
210 void ftdi_deinit(struct ftdi_context *ftdi)
211 {
212     if (ftdi == NULL)
213         return;
214
215     ftdi_usb_close_internal (ftdi);
216
217     if (ftdi->readbuffer != NULL)
218     {
219         free(ftdi->readbuffer);
220         ftdi->readbuffer = NULL;
221     }
222
223     if (ftdi->eeprom != NULL)
224     {
225         if (ftdi->eeprom->manufacturer != 0)
226         {
227             free(ftdi->eeprom->manufacturer);
228             ftdi->eeprom->manufacturer = 0;
229         }
230         if (ftdi->eeprom->product != 0)
231         {
232             free(ftdi->eeprom->product);
233             ftdi->eeprom->product = 0;
234         }
235         if (ftdi->eeprom->serial != 0)
236         {
237             free(ftdi->eeprom->serial);
238             ftdi->eeprom->serial = 0;
239         }
240         free(ftdi->eeprom);
241         ftdi->eeprom = NULL;
242     }
243
244     if (ftdi->usb_ctx)
245     {
246         libusb_exit(ftdi->usb_ctx);
247         ftdi->usb_ctx = NULL;
248     }
249 }
250
251 /**
252     Deinitialize and free an ftdi_context.
253
254     \param ftdi pointer to ftdi_context
255 */
256 void ftdi_free(struct ftdi_context *ftdi)
257 {
258     ftdi_deinit(ftdi);
259     free(ftdi);
260 }
261
262 /**
263     Use an already open libusb device.
264
265     \param ftdi pointer to ftdi_context
266     \param usb libusb libusb_device_handle to use
267 */
268 void ftdi_set_usbdev (struct ftdi_context *ftdi, libusb_device_handle *usb)
269 {
270     if (ftdi == NULL)
271         return;
272
273     ftdi->usb_dev = usb;
274 }
275
276 /**
277  * @brief Get libftdi library version
278  *
279  * @return ftdi_version_info Library version information
280  **/
281 struct ftdi_version_info ftdi_get_library_version()
282 {
283     struct ftdi_version_info ver;
284
285     ver.major = FTDI_MAJOR_VERSION;
286     ver.minor = FTDI_MINOR_VERSION;
287     ver.micro = FTDI_MICRO_VERSION;
288     ver.version_str = FTDI_VERSION_STRING;
289     ver.snapshot_str = FTDI_SNAPSHOT_VERSION;
290
291     return ver;
292 }
293
294 /**
295     Finds all ftdi devices with given VID:PID on the usb bus. Creates a new
296     ftdi_device_list which needs to be deallocated by ftdi_list_free() after
297     use.  With VID:PID 0:0, search for the default devices
298     (0x403:0x6001, 0x403:0x6010, 0x403:0x6011, 0x403:0x6014)
299
300     \param ftdi pointer to ftdi_context
301     \param devlist Pointer where to store list of found devices
302     \param vendor Vendor ID to search for
303     \param product Product ID to search for
304
305     \retval >0: number of devices found
306     \retval -3: out of memory
307     \retval -5: libusb_get_device_list() failed
308     \retval -6: libusb_get_device_descriptor() failed
309 */
310 int ftdi_usb_find_all(struct ftdi_context *ftdi, struct ftdi_device_list **devlist, int vendor, int product)
311 {
312     struct ftdi_device_list **curdev;
313     libusb_device *dev;
314     libusb_device **devs;
315     int count = 0;
316     int i = 0;
317
318     if (libusb_get_device_list(ftdi->usb_ctx, &devs) < 0)
319         ftdi_error_return(-5, "libusb_get_device_list() failed");
320
321     curdev = devlist;
322     *curdev = NULL;
323
324     while ((dev = devs[i++]) != NULL)
325     {
326         struct libusb_device_descriptor desc;
327
328         if (libusb_get_device_descriptor(dev, &desc) < 0)
329             ftdi_error_return_free_device_list(-6, "libusb_get_device_descriptor() failed", devs);
330
331         if (((vendor != 0 && product != 0) &&
332                 desc.idVendor == vendor && desc.idProduct == product) ||
333                 ((vendor == 0 && product == 0) &&
334                  (desc.idVendor == 0x403) && (desc.idProduct == 0x6001 || desc.idProduct == 0x6010
335                                               || desc.idProduct == 0x6011 || desc.idProduct == 0x6014)))
336         {
337             *curdev = (struct ftdi_device_list*)malloc(sizeof(struct ftdi_device_list));
338             if (!*curdev)
339                 ftdi_error_return_free_device_list(-3, "out of memory", devs);
340
341             (*curdev)->next = NULL;
342             (*curdev)->dev = dev;
343             libusb_ref_device(dev);
344             curdev = &(*curdev)->next;
345             count++;
346         }
347     }
348     libusb_free_device_list(devs,1);
349     return count;
350 }
351
352 /**
353     Frees a usb device list.
354
355     \param devlist USB device list created by ftdi_usb_find_all()
356 */
357 void ftdi_list_free(struct ftdi_device_list **devlist)
358 {
359     struct ftdi_device_list *curdev, *next;
360
361     for (curdev = *devlist; curdev != NULL;)
362     {
363         next = curdev->next;
364         libusb_unref_device(curdev->dev);
365         free(curdev);
366         curdev = next;
367     }
368
369     *devlist = NULL;
370 }
371
372 /**
373     Frees a usb device list.
374
375     \param devlist USB device list created by ftdi_usb_find_all()
376 */
377 void ftdi_list_free2(struct ftdi_device_list *devlist)
378 {
379     ftdi_list_free(&devlist);
380 }
381
382 /**
383     Return device ID strings from the usb device.
384
385     The parameters manufacturer, description and serial may be NULL
386     or pointer to buffers to store the fetched strings.
387
388     \note Use this function only in combination with ftdi_usb_find_all()
389           as it closes the internal "usb_dev" after use.
390
391     \param ftdi pointer to ftdi_context
392     \param dev libusb usb_dev to use
393     \param manufacturer Store manufacturer string here if not NULL
394     \param mnf_len Buffer size of manufacturer string
395     \param description Store product description string here if not NULL
396     \param desc_len Buffer size of product description string
397     \param serial Store serial string here if not NULL
398     \param serial_len Buffer size of serial string
399
400     \retval   0: all fine
401     \retval  -1: wrong arguments
402     \retval  -4: unable to open device
403     \retval  -7: get product manufacturer failed
404     \retval  -8: get product description failed
405     \retval  -9: get serial number failed
406     \retval -11: libusb_get_device_descriptor() failed
407 */
408 int ftdi_usb_get_strings(struct ftdi_context * ftdi, struct libusb_device * dev,
409                          char * manufacturer, int mnf_len, char * description, int desc_len, char * serial, int serial_len)
410 {
411     struct libusb_device_descriptor desc;
412
413     if ((ftdi==NULL) || (dev==NULL))
414         return -1;
415
416     if (libusb_open(dev, &ftdi->usb_dev) < 0)
417         ftdi_error_return(-4, "libusb_open() failed");
418
419     if (libusb_get_device_descriptor(dev, &desc) < 0)
420         ftdi_error_return(-11, "libusb_get_device_descriptor() failed");
421
422     if (manufacturer != NULL)
423     {
424         if (libusb_get_string_descriptor_ascii(ftdi->usb_dev, desc.iManufacturer, (unsigned char *)manufacturer, mnf_len) < 0)
425         {
426             ftdi_usb_close_internal (ftdi);
427             ftdi_error_return(-7, "libusb_get_string_descriptor_ascii() failed");
428         }
429     }
430
431     if (description != NULL)
432     {
433         if (libusb_get_string_descriptor_ascii(ftdi->usb_dev, desc.iProduct, (unsigned char *)description, desc_len) < 0)
434         {
435             ftdi_usb_close_internal (ftdi);
436             ftdi_error_return(-8, "libusb_get_string_descriptor_ascii() failed");
437         }
438     }
439
440     if (serial != NULL)
441     {
442         if (libusb_get_string_descriptor_ascii(ftdi->usb_dev, desc.iSerialNumber, (unsigned char *)serial, serial_len) < 0)
443         {
444             ftdi_usb_close_internal (ftdi);
445             ftdi_error_return(-9, "libusb_get_string_descriptor_ascii() failed");
446         }
447     }
448
449     ftdi_usb_close_internal (ftdi);
450
451     return 0;
452 }
453
454 /**
455  * Internal function to determine the maximum packet size.
456  * \param ftdi pointer to ftdi_context
457  * \param dev libusb usb_dev to use
458  * \retval Maximum packet size for this device
459  */
460 static unsigned int _ftdi_determine_max_packet_size(struct ftdi_context *ftdi, libusb_device *dev)
461 {
462     struct libusb_device_descriptor desc;
463     struct libusb_config_descriptor *config0;
464     unsigned int packet_size;
465
466     // Sanity check
467     if (ftdi == NULL || dev == NULL)
468         return 64;
469
470     // Determine maximum packet size. Init with default value.
471     // New hi-speed devices from FTDI use a packet size of 512 bytes
472     // but could be connected to a normal speed USB hub -> 64 bytes packet size.
473     if (ftdi->type == TYPE_2232H || ftdi->type == TYPE_4232H || ftdi->type == TYPE_232H || ftdi->type == TYPE_230X)
474         packet_size = 512;
475     else
476         packet_size = 64;
477
478     if (libusb_get_device_descriptor(dev, &desc) < 0)
479         return packet_size;
480
481     if (libusb_get_config_descriptor(dev, 0, &config0) < 0)
482         return packet_size;
483
484     if (desc.bNumConfigurations > 0)
485     {
486         if (ftdi->interface < config0->bNumInterfaces)
487         {
488             struct libusb_interface interface = config0->interface[ftdi->interface];
489             if (interface.num_altsetting > 0)
490             {
491                 struct libusb_interface_descriptor descriptor = interface.altsetting[0];
492                 if (descriptor.bNumEndpoints > 0)
493                 {
494                     packet_size = descriptor.endpoint[0].wMaxPacketSize;
495                 }
496             }
497         }
498     }
499
500     libusb_free_config_descriptor (config0);
501     return packet_size;
502 }
503
504 /**
505     Opens a ftdi device given by an usb_device.
506
507     \param ftdi pointer to ftdi_context
508     \param dev libusb usb_dev to use
509
510     \retval  0: all fine
511     \retval -3: unable to config device
512     \retval -4: unable to open device
513     \retval -5: unable to claim device
514     \retval -6: reset failed
515     \retval -7: set baudrate failed
516     \retval -8: ftdi context invalid
517     \retval -9: libusb_get_device_descriptor() failed
518     \retval -10: libusb_get_config_descriptor() failed
519     \retval -11: libusb_detach_kernel_driver() failed
520     \retval -12: libusb_get_configuration() failed
521 */
522 int ftdi_usb_open_dev(struct ftdi_context *ftdi, libusb_device *dev)
523 {
524     struct libusb_device_descriptor desc;
525     struct libusb_config_descriptor *config0;
526     int cfg, cfg0, detach_errno = 0;
527
528     if (ftdi == NULL)
529         ftdi_error_return(-8, "ftdi context invalid");
530
531     if (libusb_open(dev, &ftdi->usb_dev) < 0)
532         ftdi_error_return(-4, "libusb_open() failed");
533
534     if (libusb_get_device_descriptor(dev, &desc) < 0)
535         ftdi_error_return(-9, "libusb_get_device_descriptor() failed");
536
537     if (libusb_get_config_descriptor(dev, 0, &config0) < 0)
538         ftdi_error_return(-10, "libusb_get_config_descriptor() failed");
539     cfg0 = config0->bConfigurationValue;
540     libusb_free_config_descriptor (config0);
541
542     // Try to detach ftdi_sio kernel module.
543     //
544     // The return code is kept in a separate variable and only parsed
545     // if usb_set_configuration() or usb_claim_interface() fails as the
546     // detach operation might be denied and everything still works fine.
547     // Likely scenario is a static ftdi_sio kernel module.
548     if (ftdi->module_detach_mode == AUTO_DETACH_SIO_MODULE)
549     {
550         if (libusb_detach_kernel_driver(ftdi->usb_dev, ftdi->interface) !=0)
551             detach_errno = errno;
552     }
553
554     if (libusb_get_configuration (ftdi->usb_dev, &cfg) < 0)
555         ftdi_error_return(-12, "libusb_get_configuration () failed");
556     // set configuration (needed especially for windows)
557     // tolerate EBUSY: one device with one configuration, but two interfaces
558     //    and libftdi sessions to both interfaces (e.g. FT2232)
559     if (desc.bNumConfigurations > 0 && cfg != cfg0)
560     {
561         if (libusb_set_configuration(ftdi->usb_dev, cfg0) < 0)
562         {
563             ftdi_usb_close_internal (ftdi);
564             if (detach_errno == EPERM)
565             {
566                 ftdi_error_return(-8, "inappropriate permissions on device!");
567             }
568             else
569             {
570                 ftdi_error_return(-3, "unable to set usb configuration. Make sure the default FTDI driver is not in use");
571             }
572         }
573     }
574
575     if (libusb_claim_interface(ftdi->usb_dev, ftdi->interface) < 0)
576     {
577         ftdi_usb_close_internal (ftdi);
578         if (detach_errno == EPERM)
579         {
580             ftdi_error_return(-8, "inappropriate permissions on device!");
581         }
582         else
583         {
584             ftdi_error_return(-5, "unable to claim usb device. Make sure the default FTDI driver is not in use");
585         }
586     }
587
588     if (ftdi_usb_reset (ftdi) != 0)
589     {
590         ftdi_usb_close_internal (ftdi);
591         ftdi_error_return(-6, "ftdi_usb_reset failed");
592     }
593
594     // Try to guess chip type
595     // Bug in the BM type chips: bcdDevice is 0x200 for serial == 0
596     if (desc.bcdDevice == 0x400 || (desc.bcdDevice == 0x200
597                                     && desc.iSerialNumber == 0))
598         ftdi->type = TYPE_BM;
599     else if (desc.bcdDevice == 0x200)
600         ftdi->type = TYPE_AM;
601     else if (desc.bcdDevice == 0x500)
602         ftdi->type = TYPE_2232C;
603     else if (desc.bcdDevice == 0x600)
604         ftdi->type = TYPE_R;
605     else if (desc.bcdDevice == 0x700)
606         ftdi->type = TYPE_2232H;
607     else if (desc.bcdDevice == 0x800)
608         ftdi->type = TYPE_4232H;
609     else if (desc.bcdDevice == 0x900)
610         ftdi->type = TYPE_232H;
611     else if (desc.bcdDevice == 0x1000)
612         ftdi->type = TYPE_230X;
613
614     // Determine maximum packet size
615     ftdi->max_packet_size = _ftdi_determine_max_packet_size(ftdi, dev);
616
617     if (ftdi_set_baudrate (ftdi, 9600) != 0)
618     {
619         ftdi_usb_close_internal (ftdi);
620         ftdi_error_return(-7, "set baudrate failed");
621     }
622
623     ftdi_error_return(0, "all fine");
624 }
625
626 /**
627     Opens the first device with a given vendor and product ids.
628
629     \param ftdi pointer to ftdi_context
630     \param vendor Vendor ID
631     \param product Product ID
632
633     \retval same as ftdi_usb_open_desc()
634 */
635 int ftdi_usb_open(struct ftdi_context *ftdi, int vendor, int product)
636 {
637     return ftdi_usb_open_desc(ftdi, vendor, product, NULL, NULL);
638 }
639
640 /**
641     Opens the first device with a given, vendor id, product id,
642     description and serial.
643
644     \param ftdi pointer to ftdi_context
645     \param vendor Vendor ID
646     \param product Product ID
647     \param description Description to search for. Use NULL if not needed.
648     \param serial Serial to search for. Use NULL if not needed.
649
650     \retval  0: all fine
651     \retval -3: usb device not found
652     \retval -4: unable to open device
653     \retval -5: unable to claim device
654     \retval -6: reset failed
655     \retval -7: set baudrate failed
656     \retval -8: get product description failed
657     \retval -9: get serial number failed
658     \retval -12: libusb_get_device_list() failed
659     \retval -13: libusb_get_device_descriptor() failed
660 */
661 int ftdi_usb_open_desc(struct ftdi_context *ftdi, int vendor, int product,
662                        const char* description, const char* serial)
663 {
664     return ftdi_usb_open_desc_index(ftdi,vendor,product,description,serial,0);
665 }
666
667 /**
668     Opens the index-th device with a given, vendor id, product id,
669     description and serial.
670
671     \param ftdi pointer to ftdi_context
672     \param vendor Vendor ID
673     \param product Product ID
674     \param description Description to search for. Use NULL if not needed.
675     \param serial Serial to search for. Use NULL if not needed.
676     \param index Number of matching device to open if there are more than one, starts with 0.
677
678     \retval  0: all fine
679     \retval -1: usb_find_busses() failed
680     \retval -2: usb_find_devices() failed
681     \retval -3: usb device not found
682     \retval -4: unable to open device
683     \retval -5: unable to claim device
684     \retval -6: reset failed
685     \retval -7: set baudrate failed
686     \retval -8: get product description failed
687     \retval -9: get serial number failed
688     \retval -10: unable to close device
689     \retval -11: ftdi context invalid
690 */
691 int ftdi_usb_open_desc_index(struct ftdi_context *ftdi, int vendor, int product,
692                              const char* description, const char* serial, unsigned int index)
693 {
694     libusb_device *dev;
695     libusb_device **devs;
696     char string[256];
697     int i = 0;
698
699     if (ftdi == NULL)
700         ftdi_error_return(-11, "ftdi context invalid");
701
702     if (libusb_get_device_list(ftdi->usb_ctx, &devs) < 0)
703         ftdi_error_return(-12, "libusb_get_device_list() failed");
704
705     while ((dev = devs[i++]) != NULL)
706     {
707         struct libusb_device_descriptor desc;
708         int res;
709
710         if (libusb_get_device_descriptor(dev, &desc) < 0)
711             ftdi_error_return_free_device_list(-13, "libusb_get_device_descriptor() failed", devs);
712
713         if (desc.idVendor == vendor && desc.idProduct == product)
714         {
715             if (libusb_open(dev, &ftdi->usb_dev) < 0)
716                 ftdi_error_return_free_device_list(-4, "usb_open() failed", devs);
717
718             if (description != NULL)
719             {
720                 if (libusb_get_string_descriptor_ascii(ftdi->usb_dev, desc.iProduct, (unsigned char *)string, sizeof(string)) < 0)
721                 {
722                     ftdi_usb_close_internal (ftdi);
723                     ftdi_error_return_free_device_list(-8, "unable to fetch product description", devs);
724                 }
725                 if (strncmp(string, description, sizeof(string)) != 0)
726                 {
727                     ftdi_usb_close_internal (ftdi);
728                     continue;
729                 }
730             }
731             if (serial != NULL)
732             {
733                 if (libusb_get_string_descriptor_ascii(ftdi->usb_dev, desc.iSerialNumber, (unsigned char *)string, sizeof(string)) < 0)
734                 {
735                     ftdi_usb_close_internal (ftdi);
736                     ftdi_error_return_free_device_list(-9, "unable to fetch serial number", devs);
737                 }
738                 if (strncmp(string, serial, sizeof(string)) != 0)
739                 {
740                     ftdi_usb_close_internal (ftdi);
741                     continue;
742                 }
743             }
744
745             ftdi_usb_close_internal (ftdi);
746
747             if (index > 0)
748             {
749                 index--;
750                 continue;
751             }
752
753             res = ftdi_usb_open_dev(ftdi, dev);
754             libusb_free_device_list(devs,1);
755             return res;
756         }
757     }
758
759     // device not found
760     ftdi_error_return_free_device_list(-3, "device not found", devs);
761 }
762
763 /**
764     Opens the ftdi-device described by a description-string.
765     Intended to be used for parsing a device-description given as commandline argument.
766
767     \param ftdi pointer to ftdi_context
768     \param description NULL-terminated description-string, using this format:
769         \li <tt>d:\<devicenode></tt> path of bus and device-node (e.g. "003/001") within usb device tree (usually at /proc/bus/usb/)
770         \li <tt>i:\<vendor>:\<product></tt> first device with given vendor and product id, ids can be decimal, octal (preceded by "0") or hex (preceded by "0x")
771         \li <tt>i:\<vendor>:\<product>:\<index></tt> as above with index being the number of the device (starting with 0) if there are more than one
772         \li <tt>s:\<vendor>:\<product>:\<serial></tt> first device with given vendor id, product id and serial string
773
774     \note The description format may be extended in later versions.
775
776     \retval  0: all fine
777     \retval -2: libusb_get_device_list() failed
778     \retval -3: usb device not found
779     \retval -4: unable to open device
780     \retval -5: unable to claim device
781     \retval -6: reset failed
782     \retval -7: set baudrate failed
783     \retval -8: get product description failed
784     \retval -9: get serial number failed
785     \retval -10: unable to close device
786     \retval -11: illegal description format
787     \retval -12: ftdi context invalid
788 */
789 int ftdi_usb_open_string(struct ftdi_context *ftdi, const char* description)
790 {
791     if (ftdi == NULL)
792         ftdi_error_return(-12, "ftdi context invalid");
793
794     if (description[0] == 0 || description[1] != ':')
795         ftdi_error_return(-11, "illegal description format");
796
797     if (description[0] == 'd')
798     {
799         libusb_device *dev;
800         libusb_device **devs;
801         unsigned int bus_number, device_address;
802         int i = 0;
803
804         if (libusb_get_device_list(ftdi->usb_ctx, &devs) < 0)
805             ftdi_error_return(-2, "libusb_get_device_list() failed");
806
807         /* XXX: This doesn't handle symlinks/odd paths/etc... */
808         if (sscanf (description + 2, "%u/%u", &bus_number, &device_address) != 2)
809             ftdi_error_return_free_device_list(-11, "illegal description format", devs);
810
811         while ((dev = devs[i++]) != NULL)
812         {
813             int ret;
814             if (bus_number == libusb_get_bus_number (dev)
815                     && device_address == libusb_get_device_address (dev))
816             {
817                 ret = ftdi_usb_open_dev(ftdi, dev);
818                 libusb_free_device_list(devs,1);
819                 return ret;
820             }
821         }
822
823         // device not found
824         ftdi_error_return_free_device_list(-3, "device not found", devs);
825     }
826     else if (description[0] == 'i' || description[0] == 's')
827     {
828         unsigned int vendor;
829         unsigned int product;
830         unsigned int index=0;
831         const char *serial=NULL;
832         const char *startp, *endp;
833
834         errno=0;
835         startp=description+2;
836         vendor=strtoul((char*)startp,(char**)&endp,0);
837         if (*endp != ':' || endp == startp || errno != 0)
838             ftdi_error_return(-11, "illegal description format");
839
840         startp=endp+1;
841         product=strtoul((char*)startp,(char**)&endp,0);
842         if (endp == startp || errno != 0)
843             ftdi_error_return(-11, "illegal description format");
844
845         if (description[0] == 'i' && *endp != 0)
846         {
847             /* optional index field in i-mode */
848             if (*endp != ':')
849                 ftdi_error_return(-11, "illegal description format");
850
851             startp=endp+1;
852             index=strtoul((char*)startp,(char**)&endp,0);
853             if (*endp != 0 || endp == startp || errno != 0)
854                 ftdi_error_return(-11, "illegal description format");
855         }
856         if (description[0] == 's')
857         {
858             if (*endp != ':')
859                 ftdi_error_return(-11, "illegal description format");
860
861             /* rest of the description is the serial */
862             serial=endp+1;
863         }
864
865         return ftdi_usb_open_desc_index(ftdi, vendor, product, NULL, serial, index);
866     }
867     else
868     {
869         ftdi_error_return(-11, "illegal description format");
870     }
871 }
872
873 /**
874     Resets the ftdi device.
875
876     \param ftdi pointer to ftdi_context
877
878     \retval  0: all fine
879     \retval -1: FTDI reset failed
880     \retval -2: USB device unavailable
881 */
882 int ftdi_usb_reset(struct ftdi_context *ftdi)
883 {
884     if (ftdi == NULL || ftdi->usb_dev == NULL)
885         ftdi_error_return(-2, "USB device unavailable");
886
887     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
888                                 SIO_RESET_REQUEST, SIO_RESET_SIO,
889                                 ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
890         ftdi_error_return(-1,"FTDI reset failed");
891
892     // Invalidate data in the readbuffer
893     ftdi->readbuffer_offset = 0;
894     ftdi->readbuffer_remaining = 0;
895
896     return 0;
897 }
898
899 /**
900     Clears the read buffer on the chip and the internal read buffer.
901
902     \param ftdi pointer to ftdi_context
903
904     \retval  0: all fine
905     \retval -1: read buffer purge failed
906     \retval -2: USB device unavailable
907 */
908 int ftdi_usb_purge_rx_buffer(struct ftdi_context *ftdi)
909 {
910     if (ftdi == NULL || ftdi->usb_dev == NULL)
911         ftdi_error_return(-2, "USB device unavailable");
912
913     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
914                                 SIO_RESET_REQUEST, SIO_RESET_PURGE_RX,
915                                 ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
916         ftdi_error_return(-1, "FTDI purge of RX buffer failed");
917
918     // Invalidate data in the readbuffer
919     ftdi->readbuffer_offset = 0;
920     ftdi->readbuffer_remaining = 0;
921
922     return 0;
923 }
924
925 /**
926     Clears the write buffer on the chip.
927
928     \param ftdi pointer to ftdi_context
929
930     \retval  0: all fine
931     \retval -1: write buffer purge failed
932     \retval -2: USB device unavailable
933 */
934 int ftdi_usb_purge_tx_buffer(struct ftdi_context *ftdi)
935 {
936     if (ftdi == NULL || ftdi->usb_dev == NULL)
937         ftdi_error_return(-2, "USB device unavailable");
938
939     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
940                                 SIO_RESET_REQUEST, SIO_RESET_PURGE_TX,
941                                 ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
942         ftdi_error_return(-1, "FTDI purge of TX buffer failed");
943
944     return 0;
945 }
946
947 /**
948     Clears the buffers on the chip and the internal read buffer.
949
950     \param ftdi pointer to ftdi_context
951
952     \retval  0: all fine
953     \retval -1: read buffer purge failed
954     \retval -2: write buffer purge failed
955     \retval -3: USB device unavailable
956 */
957 int ftdi_usb_purge_buffers(struct ftdi_context *ftdi)
958 {
959     int result;
960
961     if (ftdi == NULL || ftdi->usb_dev == NULL)
962         ftdi_error_return(-3, "USB device unavailable");
963
964     result = ftdi_usb_purge_rx_buffer(ftdi);
965     if (result < 0)
966         return -1;
967
968     result = ftdi_usb_purge_tx_buffer(ftdi);
969     if (result < 0)
970         return -2;
971
972     return 0;
973 }
974
975
976
977 /**
978     Closes the ftdi device. Call ftdi_deinit() if you're cleaning up.
979
980     \param ftdi pointer to ftdi_context
981
982     \retval  0: all fine
983     \retval -1: usb_release failed
984     \retval -3: ftdi context invalid
985 */
986 int ftdi_usb_close(struct ftdi_context *ftdi)
987 {
988     int rtn = 0;
989
990     if (ftdi == NULL)
991         ftdi_error_return(-3, "ftdi context invalid");
992
993     if (ftdi->usb_dev != NULL)
994         if (libusb_release_interface(ftdi->usb_dev, ftdi->interface) < 0)
995             rtn = -1;
996
997     ftdi_usb_close_internal (ftdi);
998
999     return rtn;
1000 }
1001
1002 /*  ftdi_to_clkbits_AM For the AM device, convert a requested baudrate
1003                     to encoded divisor and the achievable baudrate
1004     Function is only used internally
1005     \internal
1006
1007     See AN120
1008    clk/1   -> 0
1009    clk/1.5 -> 1
1010    clk/2   -> 2
1011    From /2, 0.125/ 0.25 and 0.5 steps may be taken
1012    The fractional part has frac_code encoding
1013 */
1014 static int ftdi_to_clkbits_AM(int baudrate, unsigned long *encoded_divisor)
1015
1016 {
1017     static const char frac_code[8] = {0, 3, 2, 4, 1, 5, 6, 7};
1018     static const char am_adjust_up[8] = {0, 0, 0, 1, 0, 3, 2, 1};
1019     static const char am_adjust_dn[8] = {0, 0, 0, 1, 0, 1, 2, 3};
1020     int divisor, best_divisor, best_baud, best_baud_diff;
1021     divisor = 24000000 / baudrate;
1022     int i;
1023
1024     // Round down to supported fraction (AM only)
1025     divisor -= am_adjust_dn[divisor & 7];
1026
1027     // Try this divisor and the one above it (because division rounds down)
1028     best_divisor = 0;
1029     best_baud = 0;
1030     best_baud_diff = 0;
1031     for (i = 0; i < 2; i++)
1032     {
1033         int try_divisor = divisor + i;
1034         int baud_estimate;
1035         int baud_diff;
1036
1037         // Round up to supported divisor value
1038         if (try_divisor <= 8)
1039         {
1040             // Round up to minimum supported divisor
1041             try_divisor = 8;
1042         }
1043         else if (divisor < 16)
1044         {
1045             // AM doesn't support divisors 9 through 15 inclusive
1046             try_divisor = 16;
1047         }
1048         else
1049         {
1050             // Round up to supported fraction (AM only)
1051             try_divisor += am_adjust_up[try_divisor & 7];
1052             if (try_divisor > 0x1FFF8)
1053             {
1054                 // Round down to maximum supported divisor value (for AM)
1055                 try_divisor = 0x1FFF8;
1056             }
1057         }
1058         // Get estimated baud rate (to nearest integer)
1059         baud_estimate = (24000000 + (try_divisor / 2)) / try_divisor;
1060         // Get absolute difference from requested baud rate
1061         if (baud_estimate < baudrate)
1062         {
1063             baud_diff = baudrate - baud_estimate;
1064         }
1065         else
1066         {
1067             baud_diff = baud_estimate - baudrate;
1068         }
1069         if (i == 0 || baud_diff < best_baud_diff)
1070         {
1071             // Closest to requested baud rate so far
1072             best_divisor = try_divisor;
1073             best_baud = baud_estimate;
1074             best_baud_diff = baud_diff;
1075             if (baud_diff == 0)
1076             {
1077                 // Spot on! No point trying
1078                 break;
1079             }
1080         }
1081     }
1082     // Encode the best divisor value
1083     *encoded_divisor = (best_divisor >> 3) | (frac_code[best_divisor & 7] << 14);
1084     // Deal with special cases for encoded value
1085     if (*encoded_divisor == 1)
1086     {
1087         *encoded_divisor = 0;    // 3000000 baud
1088     }
1089     else if (*encoded_divisor == 0x4001)
1090     {
1091         *encoded_divisor = 1;    // 2000000 baud (BM only)
1092     }
1093     return best_baud;
1094 }
1095
1096 /*  ftdi_to_clkbits Convert a requested baudrate for a given system clock  and predivisor
1097                     to encoded divisor and the achievable baudrate
1098     Function is only used internally
1099     \internal
1100
1101     See AN120
1102    clk/1   -> 0
1103    clk/1.5 -> 1
1104    clk/2   -> 2
1105    From /2, 0.125 steps may be taken.
1106    The fractional part has frac_code encoding
1107
1108    value[13:0] of value is the divisor
1109    index[9] mean 12 MHz Base(120 MHz/10) rate versus 3 MHz (48 MHz/16) else
1110
1111    H Type have all features above with
1112    {index[8],value[15:14]} is the encoded subdivisor
1113
1114    FT232R, FT2232 and FT232BM have no option for 12 MHz and with
1115    {index[0],value[15:14]} is the encoded subdivisor
1116
1117    AM Type chips have only four fractional subdivisors at value[15:14]
1118    for subdivisors 0, 0.5, 0.25, 0.125
1119 */
1120 static int ftdi_to_clkbits(int baudrate, unsigned int clk, int clk_div, unsigned long *encoded_divisor)
1121 {
1122     static const char frac_code[8] = {0, 3, 2, 4, 1, 5, 6, 7};
1123     int best_baud = 0;
1124     int divisor, best_divisor;
1125     if (baudrate >=  clk/clk_div)
1126     {
1127         *encoded_divisor = 0;
1128         best_baud = clk/clk_div;
1129     }
1130     else if (baudrate >=  clk/(clk_div + clk_div/2))
1131     {
1132         *encoded_divisor = 1;
1133         best_baud = clk/(clk_div + clk_div/2);
1134     }
1135     else if (baudrate >=  clk/(2*clk_div))
1136     {
1137         *encoded_divisor = 2;
1138         best_baud = clk/(2*clk_div);
1139     }
1140     else
1141     {
1142         /* We divide by 16 to have 3 fractional bits and one bit for rounding */
1143         divisor = clk*16/clk_div / baudrate;
1144         if (divisor & 1) /* Decide if to round up or down*/
1145             best_divisor = divisor /2 +1;
1146         else
1147             best_divisor = divisor/2;
1148         if(best_divisor > 0x20000)
1149             best_divisor = 0x1ffff;
1150         best_baud = clk*16/clk_div/best_divisor;
1151         if (best_baud & 1) /* Decide if to round up or down*/
1152             best_baud = best_baud /2 +1;
1153         else
1154             best_baud = best_baud /2;
1155         *encoded_divisor = (best_divisor >> 3) | (frac_code[best_divisor & 0x7] << 14);
1156     }
1157     return best_baud;
1158 }
1159 /**
1160     ftdi_convert_baudrate returns nearest supported baud rate to that requested.
1161     Function is only used internally
1162     \internal
1163 */
1164 static int ftdi_convert_baudrate(int baudrate, struct ftdi_context *ftdi,
1165                                  unsigned short *value, unsigned short *index)
1166 {
1167     int best_baud;
1168     unsigned long encoded_divisor;
1169
1170     if (baudrate <= 0)
1171     {
1172         // Return error
1173         return -1;
1174     }
1175
1176 #define H_CLK 120000000
1177 #define C_CLK  48000000
1178     if ((ftdi->type == TYPE_2232H) || (ftdi->type == TYPE_4232H) || (ftdi->type == TYPE_232H) || (ftdi->type == TYPE_230X))
1179     {
1180         if(baudrate*10 > H_CLK /0x3fff)
1181         {
1182             /* On H Devices, use 12 000 000 Baudrate when possible
1183                We have a 14 bit divisor, a 1 bit divisor switch (10 or 16)
1184                three fractional bits and a 120 MHz clock
1185                Assume AN_120 "Sub-integer divisors between 0 and 2 are not allowed" holds for
1186                DIV/10 CLK too, so /1, /1.5 and /2 can be handled the same*/
1187             best_baud = ftdi_to_clkbits(baudrate, H_CLK, 10, &encoded_divisor);
1188             encoded_divisor |= 0x20000; /* switch on CLK/10*/
1189         }
1190         else
1191             best_baud = ftdi_to_clkbits(baudrate, C_CLK, 16, &encoded_divisor);
1192     }
1193     else if ((ftdi->type == TYPE_BM) || (ftdi->type == TYPE_2232C) || (ftdi->type == TYPE_R ))
1194     {
1195         best_baud = ftdi_to_clkbits(baudrate, C_CLK, 16, &encoded_divisor);
1196     }
1197     else
1198     {
1199         best_baud = ftdi_to_clkbits_AM(baudrate, &encoded_divisor);
1200     }
1201     // Split into "value" and "index" values
1202     *value = (unsigned short)(encoded_divisor & 0xFFFF);
1203     if (ftdi->type == TYPE_2232H || ftdi->type == TYPE_4232H || ftdi->type == TYPE_232H || ftdi->type == TYPE_230X)
1204     {
1205         *index = (unsigned short)(encoded_divisor >> 8);
1206         *index &= 0xFF00;
1207         *index |= ftdi->index;
1208     }
1209     else
1210         *index = (unsigned short)(encoded_divisor >> 16);
1211
1212     // Return the nearest baud rate
1213     return best_baud;
1214 }
1215
1216 /**
1217  * @brief Wrapper function to export ftdi_convert_baudrate() to the unit test
1218  * Do not use, it's only for the unit test framework
1219  **/
1220 int convert_baudrate_UT_export(int baudrate, struct ftdi_context *ftdi,
1221                                unsigned short *value, unsigned short *index)
1222 {
1223     return ftdi_convert_baudrate(baudrate, ftdi, value, index);
1224 }
1225
1226 /**
1227     Sets the chip baud rate
1228
1229     \param ftdi pointer to ftdi_context
1230     \param baudrate baud rate to set
1231
1232     \retval  0: all fine
1233     \retval -1: invalid baudrate
1234     \retval -2: setting baudrate failed
1235     \retval -3: USB device unavailable
1236 */
1237 int ftdi_set_baudrate(struct ftdi_context *ftdi, int baudrate)
1238 {
1239     unsigned short value, index;
1240     int actual_baudrate;
1241
1242     if (ftdi == NULL || ftdi->usb_dev == NULL)
1243         ftdi_error_return(-3, "USB device unavailable");
1244
1245     if (ftdi->bitbang_enabled)
1246     {
1247         baudrate = baudrate*4;
1248     }
1249
1250     actual_baudrate = ftdi_convert_baudrate(baudrate, ftdi, &value, &index);
1251     if (actual_baudrate <= 0)
1252         ftdi_error_return (-1, "Silly baudrate <= 0.");
1253
1254     // Check within tolerance (about 5%)
1255     if ((actual_baudrate * 2 < baudrate /* Catch overflows */ )
1256             || ((actual_baudrate < baudrate)
1257                 ? (actual_baudrate * 21 < baudrate * 20)
1258                 : (baudrate * 21 < actual_baudrate * 20)))
1259         ftdi_error_return (-1, "Unsupported baudrate. Note: bitbang baudrates are automatically multiplied by 4");
1260
1261     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
1262                                 SIO_SET_BAUDRATE_REQUEST, value,
1263                                 index, NULL, 0, ftdi->usb_write_timeout) < 0)
1264         ftdi_error_return (-2, "Setting new baudrate failed");
1265
1266     ftdi->baudrate = baudrate;
1267     return 0;
1268 }
1269
1270 /**
1271     Set (RS232) line characteristics.
1272     The break type can only be set via ftdi_set_line_property2()
1273     and defaults to "off".
1274
1275     \param ftdi pointer to ftdi_context
1276     \param bits Number of bits
1277     \param sbit Number of stop bits
1278     \param parity Parity mode
1279
1280     \retval  0: all fine
1281     \retval -1: Setting line property failed
1282 */
1283 int ftdi_set_line_property(struct ftdi_context *ftdi, enum ftdi_bits_type bits,
1284                            enum ftdi_stopbits_type sbit, enum ftdi_parity_type parity)
1285 {
1286     return ftdi_set_line_property2(ftdi, bits, sbit, parity, BREAK_OFF);
1287 }
1288
1289 /**
1290     Set (RS232) line characteristics
1291
1292     \param ftdi pointer to ftdi_context
1293     \param bits Number of bits
1294     \param sbit Number of stop bits
1295     \param parity Parity mode
1296     \param break_type Break type
1297
1298     \retval  0: all fine
1299     \retval -1: Setting line property failed
1300     \retval -2: USB device unavailable
1301 */
1302 int ftdi_set_line_property2(struct ftdi_context *ftdi, enum ftdi_bits_type bits,
1303                             enum ftdi_stopbits_type sbit, enum ftdi_parity_type parity,
1304                             enum ftdi_break_type break_type)
1305 {
1306     unsigned short value = bits;
1307
1308     if (ftdi == NULL || ftdi->usb_dev == NULL)
1309         ftdi_error_return(-2, "USB device unavailable");
1310
1311     switch (parity)
1312     {
1313         case NONE:
1314             value |= (0x00 << 8);
1315             break;
1316         case ODD:
1317             value |= (0x01 << 8);
1318             break;
1319         case EVEN:
1320             value |= (0x02 << 8);
1321             break;
1322         case MARK:
1323             value |= (0x03 << 8);
1324             break;
1325         case SPACE:
1326             value |= (0x04 << 8);
1327             break;
1328     }
1329
1330     switch (sbit)
1331     {
1332         case STOP_BIT_1:
1333             value |= (0x00 << 11);
1334             break;
1335         case STOP_BIT_15:
1336             value |= (0x01 << 11);
1337             break;
1338         case STOP_BIT_2:
1339             value |= (0x02 << 11);
1340             break;
1341     }
1342
1343     switch (break_type)
1344     {
1345         case BREAK_OFF:
1346             value |= (0x00 << 14);
1347             break;
1348         case BREAK_ON:
1349             value |= (0x01 << 14);
1350             break;
1351     }
1352
1353     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
1354                                 SIO_SET_DATA_REQUEST, value,
1355                                 ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
1356         ftdi_error_return (-1, "Setting new line property failed");
1357
1358     return 0;
1359 }
1360
1361 /**
1362     Writes data in chunks (see ftdi_write_data_set_chunksize()) to the chip
1363
1364     \param ftdi pointer to ftdi_context
1365     \param buf Buffer with the data
1366     \param size Size of the buffer
1367
1368     \retval -666: USB device unavailable
1369     \retval <0: error code from usb_bulk_write()
1370     \retval >0: number of bytes written
1371 */
1372 int ftdi_write_data(struct ftdi_context *ftdi, unsigned char *buf, int size)
1373 {
1374     int offset = 0;
1375     int actual_length;
1376
1377     if (ftdi == NULL || ftdi->usb_dev == NULL)
1378         ftdi_error_return(-666, "USB device unavailable");
1379
1380     while (offset < size)
1381     {
1382         int write_size = ftdi->writebuffer_chunksize;
1383
1384         if (offset+write_size > size)
1385             write_size = size-offset;
1386
1387         if (libusb_bulk_transfer(ftdi->usb_dev, ftdi->in_ep, buf+offset, write_size, &actual_length, ftdi->usb_write_timeout) < 0)
1388             ftdi_error_return(-1, "usb bulk write failed");
1389
1390         offset += actual_length;
1391     }
1392
1393     return offset;
1394 }
1395
1396 static void ftdi_read_data_cb(struct libusb_transfer *transfer)
1397 {
1398     struct ftdi_transfer_control *tc = (struct ftdi_transfer_control *) transfer->user_data;
1399     struct ftdi_context *ftdi = tc->ftdi;
1400     int packet_size, actual_length, num_of_chunks, chunk_remains, i, ret;
1401
1402     packet_size = ftdi->max_packet_size;
1403
1404     actual_length = transfer->actual_length;
1405
1406     if (actual_length > 2)
1407     {
1408         // skip FTDI status bytes.
1409         // Maybe stored in the future to enable modem use
1410         num_of_chunks = actual_length / packet_size;
1411         chunk_remains = actual_length % packet_size;
1412         //printf("actual_length = %X, num_of_chunks = %X, chunk_remains = %X, readbuffer_offset = %X\n", actual_length, num_of_chunks, chunk_remains, ftdi->readbuffer_offset);
1413
1414         ftdi->readbuffer_offset += 2;
1415         actual_length -= 2;
1416
1417         if (actual_length > packet_size - 2)
1418         {
1419             for (i = 1; i < num_of_chunks; i++)
1420                 memmove (ftdi->readbuffer+ftdi->readbuffer_offset+(packet_size - 2)*i,
1421                          ftdi->readbuffer+ftdi->readbuffer_offset+packet_size*i,
1422                          packet_size - 2);
1423             if (chunk_remains > 2)
1424             {
1425                 memmove (ftdi->readbuffer+ftdi->readbuffer_offset+(packet_size - 2)*i,
1426                          ftdi->readbuffer+ftdi->readbuffer_offset+packet_size*i,
1427                          chunk_remains-2);
1428                 actual_length -= 2*num_of_chunks;
1429             }
1430             else
1431                 actual_length -= 2*(num_of_chunks-1)+chunk_remains;
1432         }
1433
1434         if (actual_length > 0)
1435         {
1436             // data still fits in buf?
1437             if (tc->offset + actual_length <= tc->size)
1438             {
1439                 memcpy (tc->buf + tc->offset, ftdi->readbuffer + ftdi->readbuffer_offset, actual_length);
1440                 //printf("buf[0] = %X, buf[1] = %X\n", buf[0], buf[1]);
1441                 tc->offset += actual_length;
1442
1443                 ftdi->readbuffer_offset = 0;
1444                 ftdi->readbuffer_remaining = 0;
1445
1446                 /* Did we read exactly the right amount of bytes? */
1447                 if (tc->offset == tc->size)
1448                 {
1449                     //printf("read_data exact rem %d offset %d\n",
1450                     //ftdi->readbuffer_remaining, offset);
1451                     tc->completed = 1;
1452                     return;
1453                 }
1454             }
1455             else
1456             {
1457                 // only copy part of the data or size <= readbuffer_chunksize
1458                 int part_size = tc->size - tc->offset;
1459                 memcpy (tc->buf + tc->offset, ftdi->readbuffer + ftdi->readbuffer_offset, part_size);
1460                 tc->offset += part_size;
1461
1462                 ftdi->readbuffer_offset += part_size;
1463                 ftdi->readbuffer_remaining = actual_length - part_size;
1464
1465                 /* printf("Returning part: %d - size: %d - offset: %d - actual_length: %d - remaining: %d\n",
1466                 part_size, size, offset, actual_length, ftdi->readbuffer_remaining); */
1467                 tc->completed = 1;
1468                 return;
1469             }
1470         }
1471     }
1472     ret = libusb_submit_transfer (transfer);
1473     if (ret < 0)
1474         tc->completed = 1;
1475 }
1476
1477
1478 static void ftdi_write_data_cb(struct libusb_transfer *transfer)
1479 {
1480     struct ftdi_transfer_control *tc = (struct ftdi_transfer_control *) transfer->user_data;
1481     struct ftdi_context *ftdi = tc->ftdi;
1482
1483     tc->offset += transfer->actual_length;
1484
1485     if (tc->offset == tc->size)
1486     {
1487         tc->completed = 1;
1488     }
1489     else
1490     {
1491         int write_size = ftdi->writebuffer_chunksize;
1492         int ret;
1493
1494         if (tc->offset + write_size > tc->size)
1495             write_size = tc->size - tc->offset;
1496
1497         transfer->length = write_size;
1498         transfer->buffer = tc->buf + tc->offset;
1499         ret = libusb_submit_transfer (transfer);
1500         if (ret < 0)
1501             tc->completed = 1;
1502     }
1503 }
1504
1505
1506 /**
1507     Writes data to the chip. Does not wait for completion of the transfer
1508     nor does it make sure that the transfer was successful.
1509
1510     Use libusb 1.0 asynchronous API.
1511
1512     \param ftdi pointer to ftdi_context
1513     \param buf Buffer with the data
1514     \param size Size of the buffer
1515
1516     \retval NULL: Some error happens when submit transfer
1517     \retval !NULL: Pointer to a ftdi_transfer_control
1518 */
1519
1520 struct ftdi_transfer_control *ftdi_write_data_submit(struct ftdi_context *ftdi, unsigned char *buf, int size)
1521 {
1522     struct ftdi_transfer_control *tc;
1523     struct libusb_transfer *transfer;
1524     int write_size, ret;
1525
1526     if (ftdi == NULL || ftdi->usb_dev == NULL)
1527         return NULL;
1528
1529     tc = (struct ftdi_transfer_control *) malloc (sizeof (*tc));
1530     if (!tc)
1531         return NULL;
1532
1533     transfer = libusb_alloc_transfer(0);
1534     if (!transfer)
1535     {
1536         free(tc);
1537         return NULL;
1538     }
1539
1540     tc->ftdi = ftdi;
1541     tc->completed = 0;
1542     tc->buf = buf;
1543     tc->size = size;
1544     tc->offset = 0;
1545
1546     if (size < (int)ftdi->writebuffer_chunksize)
1547         write_size = size;
1548     else
1549         write_size = ftdi->writebuffer_chunksize;
1550
1551     libusb_fill_bulk_transfer(transfer, ftdi->usb_dev, ftdi->in_ep, buf,
1552                               write_size, ftdi_write_data_cb, tc,
1553                               ftdi->usb_write_timeout);
1554     transfer->type = LIBUSB_TRANSFER_TYPE_BULK;
1555
1556     ret = libusb_submit_transfer(transfer);
1557     if (ret < 0)
1558     {
1559         libusb_free_transfer(transfer);
1560         free(tc);
1561         return NULL;
1562     }
1563     tc->transfer = transfer;
1564
1565     return tc;
1566 }
1567
1568 /**
1569     Reads data from the chip. Does not wait for completion of the transfer
1570     nor does it make sure that the transfer was successful.
1571
1572     Use libusb 1.0 asynchronous API.
1573
1574     \param ftdi pointer to ftdi_context
1575     \param buf Buffer with the data
1576     \param size Size of the buffer
1577
1578     \retval NULL: Some error happens when submit transfer
1579     \retval !NULL: Pointer to a ftdi_transfer_control
1580 */
1581
1582 struct ftdi_transfer_control *ftdi_read_data_submit(struct ftdi_context *ftdi, unsigned char *buf, int size)
1583 {
1584     struct ftdi_transfer_control *tc;
1585     struct libusb_transfer *transfer;
1586     int ret;
1587
1588     if (ftdi == NULL || ftdi->usb_dev == NULL)
1589         return NULL;
1590
1591     tc = (struct ftdi_transfer_control *) malloc (sizeof (*tc));
1592     if (!tc)
1593         return NULL;
1594
1595     tc->ftdi = ftdi;
1596     tc->buf = buf;
1597     tc->size = size;
1598
1599     if (size <= (int)ftdi->readbuffer_remaining)
1600     {
1601         memcpy (buf, ftdi->readbuffer+ftdi->readbuffer_offset, size);
1602
1603         // Fix offsets
1604         ftdi->readbuffer_remaining -= size;
1605         ftdi->readbuffer_offset += size;
1606
1607         /* printf("Returning bytes from buffer: %d - remaining: %d\n", size, ftdi->readbuffer_remaining); */
1608
1609         tc->completed = 1;
1610         tc->offset = size;
1611         tc->transfer = NULL;
1612         return tc;
1613     }
1614
1615     tc->completed = 0;
1616     if (ftdi->readbuffer_remaining != 0)
1617     {
1618         memcpy (buf, ftdi->readbuffer+ftdi->readbuffer_offset, ftdi->readbuffer_remaining);
1619
1620         tc->offset = ftdi->readbuffer_remaining;
1621     }
1622     else
1623         tc->offset = 0;
1624
1625     transfer = libusb_alloc_transfer(0);
1626     if (!transfer)
1627     {
1628         free (tc);
1629         return NULL;
1630     }
1631
1632     ftdi->readbuffer_remaining = 0;
1633     ftdi->readbuffer_offset = 0;
1634
1635     libusb_fill_bulk_transfer(transfer, ftdi->usb_dev, ftdi->out_ep, ftdi->readbuffer, ftdi->readbuffer_chunksize, ftdi_read_data_cb, tc, ftdi->usb_read_timeout);
1636     transfer->type = LIBUSB_TRANSFER_TYPE_BULK;
1637
1638     ret = libusb_submit_transfer(transfer);
1639     if (ret < 0)
1640     {
1641         libusb_free_transfer(transfer);
1642         free (tc);
1643         return NULL;
1644     }
1645     tc->transfer = transfer;
1646
1647     return tc;
1648 }
1649
1650 /**
1651     Wait for completion of the transfer.
1652
1653     Use libusb 1.0 asynchronous API.
1654
1655     \param tc pointer to ftdi_transfer_control
1656
1657     \retval < 0: Some error happens
1658     \retval >= 0: Data size transferred
1659 */
1660
1661 int ftdi_transfer_data_done(struct ftdi_transfer_control *tc)
1662 {
1663     int ret;
1664
1665     while (!tc->completed)
1666     {
1667         ret = libusb_handle_events(tc->ftdi->usb_ctx);
1668         if (ret < 0)
1669         {
1670             if (ret == LIBUSB_ERROR_INTERRUPTED)
1671                 continue;
1672             libusb_cancel_transfer(tc->transfer);
1673             while (!tc->completed)
1674                 if (libusb_handle_events(tc->ftdi->usb_ctx) < 0)
1675                     break;
1676             libusb_free_transfer(tc->transfer);
1677             free (tc);
1678             return ret;
1679         }
1680     }
1681
1682     ret = tc->offset;
1683     /**
1684      * tc->transfer could be NULL if "(size <= ftdi->readbuffer_remaining)"
1685      * at ftdi_read_data_submit(). Therefore, we need to check it here.
1686      **/
1687     if (tc->transfer)
1688     {
1689         if (tc->transfer->status != LIBUSB_TRANSFER_COMPLETED)
1690             ret = -1;
1691         libusb_free_transfer(tc->transfer);
1692     }
1693     free(tc);
1694     return ret;
1695 }
1696
1697 /**
1698     Configure write buffer chunk size.
1699     Default is 4096.
1700
1701     \param ftdi pointer to ftdi_context
1702     \param chunksize Chunk size
1703
1704     \retval 0: all fine
1705     \retval -1: ftdi context invalid
1706 */
1707 int ftdi_write_data_set_chunksize(struct ftdi_context *ftdi, unsigned int chunksize)
1708 {
1709     if (ftdi == NULL)
1710         ftdi_error_return(-1, "ftdi context invalid");
1711
1712     ftdi->writebuffer_chunksize = chunksize;
1713     return 0;
1714 }
1715
1716 /**
1717     Get write buffer chunk size.
1718
1719     \param ftdi pointer to ftdi_context
1720     \param chunksize Pointer to store chunk size in
1721
1722     \retval 0: all fine
1723     \retval -1: ftdi context invalid
1724 */
1725 int ftdi_write_data_get_chunksize(struct ftdi_context *ftdi, unsigned int *chunksize)
1726 {
1727     if (ftdi == NULL)
1728         ftdi_error_return(-1, "ftdi context invalid");
1729
1730     *chunksize = ftdi->writebuffer_chunksize;
1731     return 0;
1732 }
1733
1734 /**
1735     Reads data in chunks (see ftdi_read_data_set_chunksize()) from the chip.
1736
1737     Automatically strips the two modem status bytes transfered during every read.
1738
1739     \param ftdi pointer to ftdi_context
1740     \param buf Buffer to store data in
1741     \param size Size of the buffer
1742
1743     \retval -666: USB device unavailable
1744     \retval <0: error code from libusb_bulk_transfer()
1745     \retval  0: no data was available
1746     \retval >0: number of bytes read
1747
1748 */
1749 int ftdi_read_data(struct ftdi_context *ftdi, unsigned char *buf, int size)
1750 {
1751     int offset = 0, ret, i, num_of_chunks, chunk_remains;
1752     int packet_size = ftdi->max_packet_size;
1753     int actual_length = 1;
1754
1755     if (ftdi == NULL || ftdi->usb_dev == NULL)
1756         ftdi_error_return(-666, "USB device unavailable");
1757
1758     // Packet size sanity check (avoid division by zero)
1759     if (packet_size == 0)
1760         ftdi_error_return(-1, "max_packet_size is bogus (zero)");
1761
1762     // everything we want is still in the readbuffer?
1763     if (size <= (int)ftdi->readbuffer_remaining)
1764     {
1765         memcpy (buf, ftdi->readbuffer+ftdi->readbuffer_offset, size);
1766
1767         // Fix offsets
1768         ftdi->readbuffer_remaining -= size;
1769         ftdi->readbuffer_offset += size;
1770
1771         /* printf("Returning bytes from buffer: %d - remaining: %d\n", size, ftdi->readbuffer_remaining); */
1772
1773         return size;
1774     }
1775     // something still in the readbuffer, but not enough to satisfy 'size'?
1776     if (ftdi->readbuffer_remaining != 0)
1777     {
1778         memcpy (buf, ftdi->readbuffer+ftdi->readbuffer_offset, ftdi->readbuffer_remaining);
1779
1780         // Fix offset
1781         offset += ftdi->readbuffer_remaining;
1782     }
1783     // do the actual USB read
1784     while (offset < size && actual_length > 0)
1785     {
1786         ftdi->readbuffer_remaining = 0;
1787         ftdi->readbuffer_offset = 0;
1788         /* returns how much received */
1789         ret = libusb_bulk_transfer (ftdi->usb_dev, ftdi->out_ep, ftdi->readbuffer, ftdi->readbuffer_chunksize, &actual_length, ftdi->usb_read_timeout);
1790         if (ret < 0)
1791             ftdi_error_return(ret, "usb bulk read failed");
1792
1793         if (actual_length > 2)
1794         {
1795             // skip FTDI status bytes.
1796             // Maybe stored in the future to enable modem use
1797             num_of_chunks = actual_length / packet_size;
1798             chunk_remains = actual_length % packet_size;
1799             //printf("actual_length = %X, num_of_chunks = %X, chunk_remains = %X, readbuffer_offset = %X\n", actual_length, num_of_chunks, chunk_remains, ftdi->readbuffer_offset);
1800
1801             ftdi->readbuffer_offset += 2;
1802             actual_length -= 2;
1803
1804             if (actual_length > packet_size - 2)
1805             {
1806                 for (i = 1; i < num_of_chunks; i++)
1807                     memmove (ftdi->readbuffer+ftdi->readbuffer_offset+(packet_size - 2)*i,
1808                              ftdi->readbuffer+ftdi->readbuffer_offset+packet_size*i,
1809                              packet_size - 2);
1810                 if (chunk_remains > 2)
1811                 {
1812                     memmove (ftdi->readbuffer+ftdi->readbuffer_offset+(packet_size - 2)*i,
1813                              ftdi->readbuffer+ftdi->readbuffer_offset+packet_size*i,
1814                              chunk_remains-2);
1815                     actual_length -= 2*num_of_chunks;
1816                 }
1817                 else
1818                     actual_length -= 2*(num_of_chunks-1)+chunk_remains;
1819             }
1820         }
1821         else if (actual_length <= 2)
1822         {
1823             // no more data to read?
1824             return offset;
1825         }
1826         if (actual_length > 0)
1827         {
1828             // data still fits in buf?
1829             if (offset+actual_length <= size)
1830             {
1831                 memcpy (buf+offset, ftdi->readbuffer+ftdi->readbuffer_offset, actual_length);
1832                 //printf("buf[0] = %X, buf[1] = %X\n", buf[0], buf[1]);
1833                 offset += actual_length;
1834
1835                 /* Did we read exactly the right amount of bytes? */
1836                 if (offset == size)
1837                     //printf("read_data exact rem %d offset %d\n",
1838                     //ftdi->readbuffer_remaining, offset);
1839                     return offset;
1840             }
1841             else
1842             {
1843                 // only copy part of the data or size <= readbuffer_chunksize
1844                 int part_size = size-offset;
1845                 memcpy (buf+offset, ftdi->readbuffer+ftdi->readbuffer_offset, part_size);
1846
1847                 ftdi->readbuffer_offset += part_size;
1848                 ftdi->readbuffer_remaining = actual_length-part_size;
1849                 offset += part_size;
1850
1851                 /* printf("Returning part: %d - size: %d - offset: %d - actual_length: %d - remaining: %d\n",
1852                 part_size, size, offset, actual_length, ftdi->readbuffer_remaining); */
1853
1854                 return offset;
1855             }
1856         }
1857     }
1858     // never reached
1859     return -127;
1860 }
1861
1862 /**
1863     Configure read buffer chunk size.
1864     Default is 4096.
1865
1866     Automatically reallocates the buffer.
1867
1868     \param ftdi pointer to ftdi_context
1869     \param chunksize Chunk size
1870
1871     \retval 0: all fine
1872     \retval -1: ftdi context invalid
1873 */
1874 int ftdi_read_data_set_chunksize(struct ftdi_context *ftdi, unsigned int chunksize)
1875 {
1876     unsigned char *new_buf;
1877
1878     if (ftdi == NULL)
1879         ftdi_error_return(-1, "ftdi context invalid");
1880
1881     // Invalidate all remaining data
1882     ftdi->readbuffer_offset = 0;
1883     ftdi->readbuffer_remaining = 0;
1884 #ifdef __linux__
1885     /* We can't set readbuffer_chunksize larger than MAX_BULK_BUFFER_LENGTH,
1886        which is defined in libusb-1.0.  Otherwise, each USB read request will
1887        be divided into multiple URBs.  This will cause issues on Linux kernel
1888        older than 2.6.32.  */
1889     if (chunksize > 16384)
1890         chunksize = 16384;
1891 #endif
1892
1893     if ((new_buf = (unsigned char *)realloc(ftdi->readbuffer, chunksize)) == NULL)
1894         ftdi_error_return(-1, "out of memory for readbuffer");
1895
1896     ftdi->readbuffer = new_buf;
1897     ftdi->readbuffer_chunksize = chunksize;
1898
1899     return 0;
1900 }
1901
1902 /**
1903     Get read buffer chunk size.
1904
1905     \param ftdi pointer to ftdi_context
1906     \param chunksize Pointer to store chunk size in
1907
1908     \retval 0: all fine
1909     \retval -1: FTDI context invalid
1910 */
1911 int ftdi_read_data_get_chunksize(struct ftdi_context *ftdi, unsigned int *chunksize)
1912 {
1913     if (ftdi == NULL)
1914         ftdi_error_return(-1, "FTDI context invalid");
1915
1916     *chunksize = ftdi->readbuffer_chunksize;
1917     return 0;
1918 }
1919
1920 /**
1921     Enable/disable bitbang modes.
1922
1923     \param ftdi pointer to ftdi_context
1924     \param bitmask Bitmask to configure lines.
1925            HIGH/ON value configures a line as output.
1926     \param mode Bitbang mode: use the values defined in \ref ftdi_mpsse_mode
1927
1928     \retval  0: all fine
1929     \retval -1: can't enable bitbang mode
1930     \retval -2: USB device unavailable
1931 */
1932 int ftdi_set_bitmode(struct ftdi_context *ftdi, unsigned char bitmask, unsigned char mode)
1933 {
1934     unsigned short usb_val;
1935
1936     if (ftdi == NULL || ftdi->usb_dev == NULL)
1937         ftdi_error_return(-2, "USB device unavailable");
1938
1939     usb_val = bitmask; // low byte: bitmask
1940     usb_val |= (mode << 8);
1941     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_SET_BITMODE_REQUEST, usb_val, ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
1942         ftdi_error_return(-1, "unable to configure bitbang mode. Perhaps not a BM/2232C type chip?");
1943
1944     ftdi->bitbang_mode = mode;
1945     ftdi->bitbang_enabled = (mode == BITMODE_RESET) ? 0 : 1;
1946     return 0;
1947 }
1948
1949 /**
1950     Disable bitbang mode.
1951
1952     \param ftdi pointer to ftdi_context
1953
1954     \retval  0: all fine
1955     \retval -1: can't disable bitbang mode
1956     \retval -2: USB device unavailable
1957 */
1958 int ftdi_disable_bitbang(struct ftdi_context *ftdi)
1959 {
1960     if (ftdi == NULL || ftdi->usb_dev == NULL)
1961         ftdi_error_return(-2, "USB device unavailable");
1962
1963     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_SET_BITMODE_REQUEST, 0, ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
1964         ftdi_error_return(-1, "unable to leave bitbang mode. Perhaps not a BM type chip?");
1965
1966     ftdi->bitbang_enabled = 0;
1967     return 0;
1968 }
1969
1970
1971 /**
1972     Directly read pin state, circumventing the read buffer. Useful for bitbang mode.
1973
1974     \param ftdi pointer to ftdi_context
1975     \param pins Pointer to store pins into
1976
1977     \retval  0: all fine
1978     \retval -1: read pins failed
1979     \retval -2: USB device unavailable
1980 */
1981 int ftdi_read_pins(struct ftdi_context *ftdi, unsigned char *pins)
1982 {
1983     if (ftdi == NULL || ftdi->usb_dev == NULL)
1984         ftdi_error_return(-2, "USB device unavailable");
1985
1986     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_READ_PINS_REQUEST, 0, ftdi->index, (unsigned char *)pins, 1, ftdi->usb_read_timeout) != 1)
1987         ftdi_error_return(-1, "read pins failed");
1988
1989     return 0;
1990 }
1991
1992 /**
1993     Set latency timer
1994
1995     The FTDI chip keeps data in the internal buffer for a specific
1996     amount of time if the buffer is not full yet to decrease
1997     load on the usb bus.
1998
1999     \param ftdi pointer to ftdi_context
2000     \param latency Value between 1 and 255
2001
2002     \retval  0: all fine
2003     \retval -1: latency out of range
2004     \retval -2: unable to set latency timer
2005     \retval -3: USB device unavailable
2006 */
2007 int ftdi_set_latency_timer(struct ftdi_context *ftdi, unsigned char latency)
2008 {
2009     unsigned short usb_val;
2010
2011     if (latency < 1)
2012         ftdi_error_return(-1, "latency out of range. Only valid for 1-255");
2013
2014     if (ftdi == NULL || ftdi->usb_dev == NULL)
2015         ftdi_error_return(-3, "USB device unavailable");
2016
2017     usb_val = latency;
2018     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_SET_LATENCY_TIMER_REQUEST, usb_val, ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
2019         ftdi_error_return(-2, "unable to set latency timer");
2020
2021     return 0;
2022 }
2023
2024 /**
2025     Get latency timer
2026
2027     \param ftdi pointer to ftdi_context
2028     \param latency Pointer to store latency value in
2029
2030     \retval  0: all fine
2031     \retval -1: unable to get latency timer
2032     \retval -2: USB device unavailable
2033 */
2034 int ftdi_get_latency_timer(struct ftdi_context *ftdi, unsigned char *latency)
2035 {
2036     unsigned short usb_val;
2037
2038     if (ftdi == NULL || ftdi->usb_dev == NULL)
2039         ftdi_error_return(-2, "USB device unavailable");
2040
2041     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_GET_LATENCY_TIMER_REQUEST, 0, ftdi->index, (unsigned char *)&usb_val, 1, ftdi->usb_read_timeout) != 1)
2042         ftdi_error_return(-1, "reading latency timer failed");
2043
2044     *latency = (unsigned char)usb_val;
2045     return 0;
2046 }
2047
2048 /**
2049     Poll modem status information
2050
2051     This function allows the retrieve the two status bytes of the device.
2052     The device sends these bytes also as a header for each read access
2053     where they are discarded by ftdi_read_data(). The chip generates
2054     the two stripped status bytes in the absence of data every 40 ms.
2055
2056     Layout of the first byte:
2057     - B0..B3 - must be 0
2058     - B4       Clear to send (CTS)
2059                  0 = inactive
2060                  1 = active
2061     - B5       Data set ready (DTS)
2062                  0 = inactive
2063                  1 = active
2064     - B6       Ring indicator (RI)
2065                  0 = inactive
2066                  1 = active
2067     - B7       Receive line signal detect (RLSD)
2068                  0 = inactive
2069                  1 = active
2070
2071     Layout of the second byte:
2072     - B0       Data ready (DR)
2073     - B1       Overrun error (OE)
2074     - B2       Parity error (PE)
2075     - B3       Framing error (FE)
2076     - B4       Break interrupt (BI)
2077     - B5       Transmitter holding register (THRE)
2078     - B6       Transmitter empty (TEMT)
2079     - B7       Error in RCVR FIFO
2080
2081     \param ftdi pointer to ftdi_context
2082     \param status Pointer to store status information in. Must be two bytes.
2083
2084     \retval  0: all fine
2085     \retval -1: unable to retrieve status information
2086     \retval -2: USB device unavailable
2087 */
2088 int ftdi_poll_modem_status(struct ftdi_context *ftdi, unsigned short *status)
2089 {
2090     char usb_val[2];
2091
2092     if (ftdi == NULL || ftdi->usb_dev == NULL)
2093         ftdi_error_return(-2, "USB device unavailable");
2094
2095     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_POLL_MODEM_STATUS_REQUEST, 0, ftdi->index, (unsigned char *)usb_val, 2, ftdi->usb_read_timeout) != 2)
2096         ftdi_error_return(-1, "getting modem status failed");
2097
2098     *status = (usb_val[1] << 8) | (usb_val[0] & 0xFF);
2099
2100     return 0;
2101 }
2102
2103 /**
2104     Set flowcontrol for ftdi chip
2105
2106     \param ftdi pointer to ftdi_context
2107     \param flowctrl flow control to use. should be
2108            SIO_DISABLE_FLOW_CTRL, SIO_RTS_CTS_HS, SIO_DTR_DSR_HS or SIO_XON_XOFF_HS
2109
2110     \retval  0: all fine
2111     \retval -1: set flow control failed
2112     \retval -2: USB device unavailable
2113 */
2114 int ftdi_setflowctrl(struct ftdi_context *ftdi, int flowctrl)
2115 {
2116     if (ftdi == NULL || ftdi->usb_dev == NULL)
2117         ftdi_error_return(-2, "USB device unavailable");
2118
2119     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
2120                                 SIO_SET_FLOW_CTRL_REQUEST, 0, (flowctrl | ftdi->index),
2121                                 NULL, 0, ftdi->usb_write_timeout) < 0)
2122         ftdi_error_return(-1, "set flow control failed");
2123
2124     return 0;
2125 }
2126
2127 /**
2128     Set dtr line
2129
2130     \param ftdi pointer to ftdi_context
2131     \param state state to set line to (1 or 0)
2132
2133     \retval  0: all fine
2134     \retval -1: set dtr failed
2135     \retval -2: USB device unavailable
2136 */
2137 int ftdi_setdtr(struct ftdi_context *ftdi, int state)
2138 {
2139     unsigned short usb_val;
2140
2141     if (ftdi == NULL || ftdi->usb_dev == NULL)
2142         ftdi_error_return(-2, "USB device unavailable");
2143
2144     if (state)
2145         usb_val = SIO_SET_DTR_HIGH;
2146     else
2147         usb_val = SIO_SET_DTR_LOW;
2148
2149     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
2150                                 SIO_SET_MODEM_CTRL_REQUEST, usb_val, ftdi->index,
2151                                 NULL, 0, ftdi->usb_write_timeout) < 0)
2152         ftdi_error_return(-1, "set dtr failed");
2153
2154     return 0;
2155 }
2156
2157 /**
2158     Set rts line
2159
2160     \param ftdi pointer to ftdi_context
2161     \param state state to set line to (1 or 0)
2162
2163     \retval  0: all fine
2164     \retval -1: set rts failed
2165     \retval -2: USB device unavailable
2166 */
2167 int ftdi_setrts(struct ftdi_context *ftdi, int state)
2168 {
2169     unsigned short usb_val;
2170
2171     if (ftdi == NULL || ftdi->usb_dev == NULL)
2172         ftdi_error_return(-2, "USB device unavailable");
2173
2174     if (state)
2175         usb_val = SIO_SET_RTS_HIGH;
2176     else
2177         usb_val = SIO_SET_RTS_LOW;
2178
2179     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
2180                                 SIO_SET_MODEM_CTRL_REQUEST, usb_val, ftdi->index,
2181                                 NULL, 0, ftdi->usb_write_timeout) < 0)
2182         ftdi_error_return(-1, "set of rts failed");
2183
2184     return 0;
2185 }
2186
2187 /**
2188     Set dtr and rts line in one pass
2189
2190     \param ftdi pointer to ftdi_context
2191     \param dtr  DTR state to set line to (1 or 0)
2192     \param rts  RTS state to set line to (1 or 0)
2193
2194     \retval  0: all fine
2195     \retval -1: set dtr/rts failed
2196     \retval -2: USB device unavailable
2197  */
2198 int ftdi_setdtr_rts(struct ftdi_context *ftdi, int dtr, int rts)
2199 {
2200     unsigned short usb_val;
2201
2202     if (ftdi == NULL || ftdi->usb_dev == NULL)
2203         ftdi_error_return(-2, "USB device unavailable");
2204
2205     if (dtr)
2206         usb_val = SIO_SET_DTR_HIGH;
2207     else
2208         usb_val = SIO_SET_DTR_LOW;
2209
2210     if (rts)
2211         usb_val |= SIO_SET_RTS_HIGH;
2212     else
2213         usb_val |= SIO_SET_RTS_LOW;
2214
2215     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
2216                                 SIO_SET_MODEM_CTRL_REQUEST, usb_val, ftdi->index,
2217                                 NULL, 0, ftdi->usb_write_timeout) < 0)
2218         ftdi_error_return(-1, "set of rts/dtr failed");
2219
2220     return 0;
2221 }
2222
2223 /**
2224     Set the special event character
2225
2226     \param ftdi pointer to ftdi_context
2227     \param eventch Event character
2228     \param enable 0 to disable the event character, non-zero otherwise
2229
2230     \retval  0: all fine
2231     \retval -1: unable to set event character
2232     \retval -2: USB device unavailable
2233 */
2234 int ftdi_set_event_char(struct ftdi_context *ftdi,
2235                         unsigned char eventch, unsigned char enable)
2236 {
2237     unsigned short usb_val;
2238
2239     if (ftdi == NULL || ftdi->usb_dev == NULL)
2240         ftdi_error_return(-2, "USB device unavailable");
2241
2242     usb_val = eventch;
2243     if (enable)
2244         usb_val |= 1 << 8;
2245
2246     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_SET_EVENT_CHAR_REQUEST, usb_val, ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
2247         ftdi_error_return(-1, "setting event character failed");
2248
2249     return 0;
2250 }
2251
2252 /**
2253     Set error character
2254
2255     \param ftdi pointer to ftdi_context
2256     \param errorch Error character
2257     \param enable 0 to disable the error character, non-zero otherwise
2258
2259     \retval  0: all fine
2260     \retval -1: unable to set error character
2261     \retval -2: USB device unavailable
2262 */
2263 int ftdi_set_error_char(struct ftdi_context *ftdi,
2264                         unsigned char errorch, unsigned char enable)
2265 {
2266     unsigned short usb_val;
2267
2268     if (ftdi == NULL || ftdi->usb_dev == NULL)
2269         ftdi_error_return(-2, "USB device unavailable");
2270
2271     usb_val = errorch;
2272     if (enable)
2273         usb_val |= 1 << 8;
2274
2275     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_SET_ERROR_CHAR_REQUEST, usb_val, ftdi->index, NULL, 0, ftdi->usb_write_timeout) < 0)
2276         ftdi_error_return(-1, "setting error character failed");
2277
2278     return 0;
2279 }
2280
2281 /**
2282     Init eeprom with default values for the connected device
2283     \param ftdi pointer to ftdi_context
2284     \param manufacturer String to use as Manufacturer
2285     \param product String to use as Product description
2286     \param serial String to use as Serial number description
2287
2288     \retval  0: all fine
2289     \retval -1: No struct ftdi_context
2290     \retval -2: No struct ftdi_eeprom
2291     \retval -3: No connected device or device not yet opened
2292 */
2293 int ftdi_eeprom_initdefaults(struct ftdi_context *ftdi, char * manufacturer,
2294                              char * product, char * serial)
2295 {
2296     struct ftdi_eeprom *eeprom;
2297
2298     if (ftdi == NULL)
2299         ftdi_error_return(-1, "No struct ftdi_context");
2300
2301     if (ftdi->eeprom == NULL)
2302         ftdi_error_return(-2,"No struct ftdi_eeprom");
2303
2304     eeprom = ftdi->eeprom;
2305     memset(eeprom, 0, sizeof(struct ftdi_eeprom));
2306
2307     if (ftdi->usb_dev == NULL)
2308         ftdi_error_return(-3, "No connected device or device not yet opened");
2309
2310     eeprom->vendor_id = 0x0403;
2311     eeprom->use_serial = 1;
2312     if ((ftdi->type == TYPE_AM) || (ftdi->type == TYPE_BM) ||
2313             (ftdi->type == TYPE_R))
2314         eeprom->product_id = 0x6001;
2315     else if (ftdi->type == TYPE_4232H)
2316         eeprom->product_id = 0x6011;
2317     else if (ftdi->type == TYPE_232H)
2318         eeprom->product_id = 0x6014;
2319     else if (ftdi->type == TYPE_230X)
2320         eeprom->product_id = 0x6015;
2321     else
2322         eeprom->product_id = 0x6010;
2323
2324     if (ftdi->type == TYPE_AM)
2325         eeprom->usb_version = 0x0101;
2326     else
2327         eeprom->usb_version = 0x0200;
2328     eeprom->max_power = 100;
2329
2330     if (eeprom->manufacturer)
2331         free (eeprom->manufacturer);
2332     eeprom->manufacturer = NULL;
2333     if (manufacturer)
2334     {
2335         eeprom->manufacturer = malloc(strlen(manufacturer)+1);
2336         if (eeprom->manufacturer)
2337             strcpy(eeprom->manufacturer, manufacturer);
2338     }
2339
2340     if (eeprom->product)
2341         free (eeprom->product);
2342     eeprom->product = NULL;
2343     if(product)
2344     {
2345         eeprom->product = malloc(strlen(product)+1);
2346         if (eeprom->product)
2347             strcpy(eeprom->product, product);
2348     }
2349     else
2350     {
2351         const char* default_product;
2352         switch(ftdi->type)
2353         {
2354             case TYPE_AM:    default_product = "AM"; break;
2355             case TYPE_BM:    default_product = "BM"; break;
2356             case TYPE_2232C: default_product = "Dual RS232"; break;
2357             case TYPE_R:     default_product = "FT232R USB UART"; break;
2358             case TYPE_2232H: default_product = "Dual RS232-HS"; break;
2359             case TYPE_4232H: default_product = "FT4232H"; break;
2360             case TYPE_232H:  default_product = "Single-RS232-HS"; break;
2361             case TYPE_230X:  default_product = "FT230X Basic UART"; break;
2362             default:
2363                 ftdi_error_return(-3, "Unknown chip type");
2364         }
2365         eeprom->product = malloc(strlen(default_product) +1);
2366         if (eeprom->product)
2367             strcpy(eeprom->product, default_product);
2368     }
2369
2370     if (eeprom->serial)
2371         free (eeprom->serial);
2372     eeprom->serial = NULL;
2373     if (serial)
2374     {
2375         eeprom->serial = malloc(strlen(serial)+1);
2376         if (eeprom->serial)
2377             strcpy(eeprom->serial, serial);
2378     }
2379
2380     if (ftdi->type == TYPE_R)
2381     {
2382         eeprom->max_power = 90;
2383         eeprom->size = 0x80;
2384         eeprom->cbus_function[0] = CBUS_TXLED;
2385         eeprom->cbus_function[1] = CBUS_RXLED;
2386         eeprom->cbus_function[2] = CBUS_TXDEN;
2387         eeprom->cbus_function[3] = CBUS_PWREN;
2388         eeprom->cbus_function[4] = CBUS_SLEEP;
2389     }
2390     else if (ftdi->type == TYPE_230X)
2391     {
2392         eeprom->max_power = 90;
2393         eeprom->size = 0x100;
2394         eeprom->cbus_function[0] = CBUSH_TXDEN;
2395         eeprom->cbus_function[1] = CBUSH_RXLED;
2396         eeprom->cbus_function[2] = CBUSH_TXLED;
2397         eeprom->cbus_function[3] = CBUSH_SLEEP;
2398     }
2399     else
2400     {
2401         if(ftdi->type == TYPE_232H)
2402         {
2403             int i;
2404             for (i=0; i<10; i++)
2405                 eeprom->cbus_function[i] = CBUSH_TRISTATE;
2406         }
2407         eeprom->size = -1;
2408     }
2409     switch (ftdi->type)
2410     {
2411         case TYPE_AM:
2412             eeprom->release_number = 0x0200;
2413             break;
2414         case TYPE_BM:
2415             eeprom->release_number = 0x0400;
2416             break;
2417         case TYPE_2232C:
2418             eeprom->release_number = 0x0500;
2419             break;
2420         case TYPE_R:
2421             eeprom->release_number = 0x0600;
2422             break;
2423         case TYPE_2232H:
2424             eeprom->release_number = 0x0700;
2425             break;
2426         case TYPE_4232H:
2427             eeprom->release_number = 0x0800;
2428             break;
2429         case TYPE_232H:
2430             eeprom->release_number = 0x0900;
2431             break;
2432         case TYPE_230X:
2433             eeprom->release_number = 0x1000;
2434             break;
2435         default:
2436             eeprom->release_number = 0x00;
2437     }
2438     return 0;
2439 }
2440
2441 int ftdi_eeprom_set_strings(struct ftdi_context *ftdi, char * manufacturer,
2442                             char * product, char * serial)
2443 {
2444     struct ftdi_eeprom *eeprom;
2445
2446     if (ftdi == NULL)
2447         ftdi_error_return(-1, "No struct ftdi_context");
2448
2449     if (ftdi->eeprom == NULL)
2450         ftdi_error_return(-2,"No struct ftdi_eeprom");
2451
2452     eeprom = ftdi->eeprom;
2453
2454     if (ftdi->usb_dev == NULL)
2455         ftdi_error_return(-3, "No connected device or device not yet opened");
2456
2457     if (manufacturer)
2458     {
2459         if (eeprom->manufacturer)
2460             free (eeprom->manufacturer);
2461         eeprom->manufacturer = malloc(strlen(manufacturer)+1);
2462         if (eeprom->manufacturer)
2463             strcpy(eeprom->manufacturer, manufacturer);
2464     }
2465
2466     if(product)
2467     {
2468         if (eeprom->product)
2469             free (eeprom->product);
2470         eeprom->product = malloc(strlen(product)+1);
2471         if (eeprom->product)
2472             strcpy(eeprom->product, product);
2473     }
2474
2475     if (serial)
2476     {
2477         if (eeprom->serial)
2478             free (eeprom->serial);
2479         eeprom->serial = malloc(strlen(serial)+1);
2480         if (eeprom->serial)
2481         {
2482             strcpy(eeprom->serial, serial);
2483             eeprom->use_serial = 1;
2484         }
2485     }
2486     return 0;
2487 }
2488
2489
2490 /*FTD2XX doesn't check for values not fitting in the ACBUS Signal oprtions*/
2491 void set_ft232h_cbus(struct ftdi_eeprom *eeprom, unsigned char * output)
2492 {
2493     int i;
2494     for(i=0; i<5; i++)
2495     {
2496         int mode_low, mode_high;
2497         if (eeprom->cbus_function[2*i]> CBUSH_CLK7_5)
2498             mode_low = CBUSH_TRISTATE;
2499         else
2500             mode_low = eeprom->cbus_function[2*i];
2501         if (eeprom->cbus_function[2*i+1]> CBUSH_CLK7_5)
2502             mode_high = CBUSH_TRISTATE;
2503         else
2504             mode_high = eeprom->cbus_function[2*i+1];
2505
2506         output[0x18+i] = (mode_high <<4) | mode_low;
2507     }
2508 }
2509 /* Return the bits for the encoded EEPROM Structure of a requested Mode
2510  *
2511  */
2512 static unsigned char type2bit(unsigned char type, enum ftdi_chip_type chip)
2513 {
2514     switch (chip)
2515     {
2516         case TYPE_2232H:
2517         case TYPE_2232C:
2518         {
2519             switch (type)
2520             {
2521                 case CHANNEL_IS_UART: return 0;
2522                 case CHANNEL_IS_FIFO: return 0x01;
2523                 case CHANNEL_IS_OPTO: return 0x02;
2524                 case CHANNEL_IS_CPU : return 0x04;
2525                 default: return 0;
2526             }
2527         }
2528         case TYPE_232H:
2529         {
2530             switch (type)
2531             {
2532                 case CHANNEL_IS_UART   : return 0;
2533                 case CHANNEL_IS_FIFO   : return 0x01;
2534                 case CHANNEL_IS_OPTO   : return 0x02;
2535                 case CHANNEL_IS_CPU    : return 0x04;
2536                 case CHANNEL_IS_FT1284 : return 0x08;
2537                 default: return 0;
2538             }
2539         }
2540         case TYPE_230X: /* FT230X is only UART */
2541         default: return 0;
2542     }
2543     return 0;
2544 }
2545
2546 /**
2547     Build binary buffer from ftdi_eeprom structure.
2548     Output is suitable for ftdi_write_eeprom().
2549
2550     \param ftdi pointer to ftdi_context
2551
2552     \retval >=0: size of eeprom user area in bytes
2553     \retval -1: eeprom size (128 bytes) exceeded by custom strings
2554     \retval -2: Invalid eeprom or ftdi pointer
2555     \retval -3: Invalid cbus function setting     (FIXME: Not in the code?)
2556     \retval -4: Chip doesn't support invert       (FIXME: Not in the code?)
2557     \retval -5: Chip doesn't support high current drive         (FIXME: Not in the code?)
2558     \retval -6: No connected EEPROM or EEPROM Type unknown
2559 */
2560 int ftdi_eeprom_build(struct ftdi_context *ftdi)
2561 {
2562     unsigned char i, j, eeprom_size_mask;
2563     unsigned short checksum, value;
2564     unsigned char manufacturer_size = 0, product_size = 0, serial_size = 0;
2565     int user_area_size;
2566     struct ftdi_eeprom *eeprom;
2567     unsigned char * output;
2568
2569     if (ftdi == NULL)
2570         ftdi_error_return(-2,"No context");
2571     if (ftdi->eeprom == NULL)
2572         ftdi_error_return(-2,"No eeprom structure");
2573
2574     eeprom= ftdi->eeprom;
2575     output = eeprom->buf;
2576
2577     if (eeprom->chip == -1)
2578         ftdi_error_return(-6,"No connected EEPROM or EEPROM type unknown");
2579
2580     if (eeprom->size == -1)
2581     {
2582         if ((eeprom->chip == 0x56) || (eeprom->chip == 0x66))
2583             eeprom->size = 0x100;
2584         else
2585             eeprom->size = 0x80;
2586     }
2587
2588     if (eeprom->manufacturer != NULL)
2589         manufacturer_size = strlen(eeprom->manufacturer);
2590     if (eeprom->product != NULL)
2591         product_size = strlen(eeprom->product);
2592     if (eeprom->serial != NULL)
2593         serial_size = strlen(eeprom->serial);
2594
2595     // eeprom size check
2596     switch (ftdi->type)
2597     {
2598         case TYPE_AM:
2599         case TYPE_BM:
2600             user_area_size = 96;    // base size for strings (total of 48 characters)
2601             break;
2602         case TYPE_2232C:
2603             user_area_size = 90;     // two extra config bytes and 4 bytes PnP stuff
2604             break;
2605         case TYPE_R:
2606         case TYPE_230X:
2607             user_area_size = 88;     // four extra config bytes + 4 bytes PnP stuff
2608             break;
2609         case TYPE_2232H:            // six extra config bytes + 4 bytes PnP stuff
2610         case TYPE_4232H:
2611             user_area_size = 86;
2612             break;
2613         case TYPE_232H:
2614             user_area_size = 80;
2615             break;
2616         default:
2617             user_area_size = 0;
2618             break;
2619     }
2620     user_area_size  -= (manufacturer_size + product_size + serial_size) * 2;
2621
2622     if (user_area_size < 0)
2623         ftdi_error_return(-1,"eeprom size exceeded");
2624
2625     // empty eeprom
2626     if (ftdi->type == TYPE_230X)
2627     {
2628         /* FT230X have a reserved section in the middle of the MTP,
2629            which cannot be written to, but must be included in the checksum */
2630         memset(ftdi->eeprom->buf, 0, 0x80);
2631         memset((ftdi->eeprom->buf + 0xa0), 0, (FTDI_MAX_EEPROM_SIZE - 0xa0));
2632     }
2633     else
2634     {
2635         memset(ftdi->eeprom->buf, 0, FTDI_MAX_EEPROM_SIZE);
2636     }
2637
2638     // Bytes and Bits set for all Types
2639
2640     // Addr 02: Vendor ID
2641     output[0x02] = eeprom->vendor_id;
2642     output[0x03] = eeprom->vendor_id >> 8;
2643
2644     // Addr 04: Product ID
2645     output[0x04] = eeprom->product_id;
2646     output[0x05] = eeprom->product_id >> 8;
2647
2648     // Addr 06: Device release number (0400h for BM features)
2649     output[0x06] = eeprom->release_number;
2650     output[0x07] = eeprom->release_number >> 8;
2651
2652     // Addr 08: Config descriptor
2653     // Bit 7: always 1
2654     // Bit 6: 1 if this device is self powered, 0 if bus powered
2655     // Bit 5: 1 if this device uses remote wakeup
2656     // Bit 4-0: reserved - 0
2657     j = 0x80;
2658     if (eeprom->self_powered)
2659         j |= 0x40;
2660     if (eeprom->remote_wakeup)
2661         j |= 0x20;
2662     output[0x08] = j;
2663
2664     // Addr 09: Max power consumption: max power = value * 2 mA
2665     output[0x09] = eeprom->max_power / MAX_POWER_MILLIAMP_PER_UNIT;
2666
2667     if ((ftdi->type != TYPE_AM) && (ftdi->type != TYPE_230X))
2668     {
2669         // Addr 0A: Chip configuration
2670         // Bit 7: 0 - reserved
2671         // Bit 6: 0 - reserved
2672         // Bit 5: 0 - reserved
2673         // Bit 4: 1 - Change USB version
2674         // Bit 3: 1 - Use the serial number string
2675         // Bit 2: 1 - Enable suspend pull downs for lower power
2676         // Bit 1: 1 - Out EndPoint is Isochronous
2677         // Bit 0: 1 - In EndPoint is Isochronous
2678         //
2679         j = 0;
2680         if (eeprom->in_is_isochronous)
2681             j = j | 1;
2682         if (eeprom->out_is_isochronous)
2683             j = j | 2;
2684         output[0x0A] = j;
2685     }
2686
2687     // Dynamic content
2688     // Strings start at 0x94 (TYPE_AM, TYPE_BM)
2689     // 0x96 (TYPE_2232C), 0x98 (TYPE_R) and 0x9a (TYPE_x232H)
2690     // 0xa0 (TYPE_232H)
2691     i = 0;
2692     switch (ftdi->type)
2693     {
2694         case TYPE_232H:
2695             i += 2;
2696         case TYPE_2232H:
2697         case TYPE_4232H:
2698             i += 2;
2699         case TYPE_R:
2700             i += 2;
2701         case TYPE_2232C:
2702             i += 2;
2703         case TYPE_AM:
2704         case TYPE_BM:
2705             i += 0x94;
2706             break;
2707         case TYPE_230X:
2708             i = 0xa0;
2709             break;
2710     }
2711     /* Wrap around 0x80 for 128 byte EEPROMS (Internale and 93x46) */
2712     eeprom_size_mask = eeprom->size -1;
2713
2714     // Addr 0E: Offset of the manufacturer string + 0x80, calculated later
2715     // Addr 0F: Length of manufacturer string
2716     // Output manufacturer
2717     output[0x0E] = i;  // calculate offset
2718     output[i & eeprom_size_mask] = manufacturer_size*2 + 2, i++;
2719     output[i & eeprom_size_mask] = 0x03, i++; // type: string
2720     for (j = 0; j < manufacturer_size; j++)
2721     {
2722         output[i & eeprom_size_mask] = eeprom->manufacturer[j], i++;
2723         output[i & eeprom_size_mask] = 0x00, i++;
2724     }
2725     output[0x0F] = manufacturer_size*2 + 2;
2726
2727     // Addr 10: Offset of the product string + 0x80, calculated later
2728     // Addr 11: Length of product string
2729     output[0x10] = i | 0x80;  // calculate offset
2730     output[i & eeprom_size_mask] = product_size*2 + 2, i++;
2731     output[i & eeprom_size_mask] = 0x03, i++;
2732     for (j = 0; j < product_size; j++)
2733     {
2734         output[i & eeprom_size_mask] = eeprom->product[j], i++;
2735         output[i & eeprom_size_mask] = 0x00, i++;
2736     }
2737     output[0x11] = product_size*2 + 2;
2738
2739     // Addr 12: Offset of the serial string + 0x80, calculated later
2740     // Addr 13: Length of serial string
2741     output[0x12] = i | 0x80; // calculate offset
2742     output[i & eeprom_size_mask] = serial_size*2 + 2, i++;
2743     output[i & eeprom_size_mask] = 0x03, i++;
2744     for (j = 0; j < serial_size; j++)
2745     {
2746         output[i & eeprom_size_mask] = eeprom->serial[j], i++;
2747         output[i & eeprom_size_mask] = 0x00, i++;
2748     }
2749
2750     // Legacy port name and PnP fields for FT2232 and newer chips
2751     if (ftdi->type > TYPE_BM)
2752     {
2753         output[i & eeprom_size_mask] = 0x02; /* as seen when written with FTD2XX */
2754         i++;
2755         output[i & eeprom_size_mask] = 0x03; /* as seen when written with FTD2XX */
2756         i++;
2757         output[i & eeprom_size_mask] = eeprom->is_not_pnp; /* as seen when written with FTD2XX */
2758         i++;
2759     }
2760
2761     output[0x13] = serial_size*2 + 2;
2762
2763     if (ftdi->type > TYPE_AM) /* use_serial not used in AM devices */
2764     {
2765         if (eeprom->use_serial)
2766             output[0x0A] |= USE_SERIAL_NUM;
2767         else
2768             output[0x0A] &= ~USE_SERIAL_NUM;
2769     }
2770
2771     /* Bytes and Bits specific to (some) types
2772        Write linear, as this allows easier fixing*/
2773     switch (ftdi->type)
2774     {
2775         case TYPE_AM:
2776             break;
2777         case TYPE_BM:
2778             output[0x0C] = eeprom->usb_version & 0xff;
2779             output[0x0D] = (eeprom->usb_version>>8) & 0xff;
2780             if (eeprom->use_usb_version == USE_USB_VERSION_BIT)
2781                 output[0x0A] |= USE_USB_VERSION_BIT;
2782             else
2783                 output[0x0A] &= ~USE_USB_VERSION_BIT;
2784
2785             break;
2786         case TYPE_2232C:
2787
2788             output[0x00] = type2bit(eeprom->channel_a_type, TYPE_2232C);
2789             if ( eeprom->channel_a_driver == DRIVER_VCP)
2790                 output[0x00] |= DRIVER_VCP;
2791             else
2792                 output[0x00] &= ~DRIVER_VCP;
2793
2794             if ( eeprom->high_current_a == HIGH_CURRENT_DRIVE)
2795                 output[0x00] |= HIGH_CURRENT_DRIVE;
2796             else
2797                 output[0x00] &= ~HIGH_CURRENT_DRIVE;
2798
2799             output[0x01] = type2bit(eeprom->channel_b_type, TYPE_2232C);
2800             if ( eeprom->channel_b_driver == DRIVER_VCP)
2801                 output[0x01] |= DRIVER_VCP;
2802             else
2803                 output[0x01] &= ~DRIVER_VCP;
2804
2805             if ( eeprom->high_current_b == HIGH_CURRENT_DRIVE)
2806                 output[0x01] |= HIGH_CURRENT_DRIVE;
2807             else
2808                 output[0x01] &= ~HIGH_CURRENT_DRIVE;
2809
2810             if (eeprom->in_is_isochronous)
2811                 output[0x0A] |= 0x1;
2812             else
2813                 output[0x0A] &= ~0x1;
2814             if (eeprom->out_is_isochronous)
2815                 output[0x0A] |= 0x2;
2816             else
2817                 output[0x0A] &= ~0x2;
2818             if (eeprom->suspend_pull_downs)
2819                 output[0x0A] |= 0x4;
2820             else
2821                 output[0x0A] &= ~0x4;
2822             if (eeprom->use_usb_version == USE_USB_VERSION_BIT)
2823                 output[0x0A] |= USE_USB_VERSION_BIT;
2824             else
2825                 output[0x0A] &= ~USE_USB_VERSION_BIT;
2826
2827             output[0x0C] = eeprom->usb_version & 0xff;
2828             output[0x0D] = (eeprom->usb_version>>8) & 0xff;
2829             output[0x14] = eeprom->chip;
2830             break;
2831         case TYPE_R:
2832             if (eeprom->high_current == HIGH_CURRENT_DRIVE_R)
2833                 output[0x00] |= HIGH_CURRENT_DRIVE_R;
2834             output[0x01] = 0x40; /* Hard coded Endpoint Size*/
2835
2836             if (eeprom->suspend_pull_downs)
2837                 output[0x0A] |= 0x4;
2838             else
2839                 output[0x0A] &= ~0x4;
2840             output[0x0B] = eeprom->invert;
2841             output[0x0C] = eeprom->usb_version & 0xff;
2842             output[0x0D] = (eeprom->usb_version>>8) & 0xff;
2843
2844             if (eeprom->cbus_function[0] > CBUS_BB)
2845                 output[0x14] = CBUS_TXLED;
2846             else
2847                 output[0x14] = eeprom->cbus_function[0];
2848
2849             if (eeprom->cbus_function[1] > CBUS_BB)
2850                 output[0x14] |= CBUS_RXLED<<4;
2851             else
2852                 output[0x14] |= eeprom->cbus_function[1]<<4;
2853
2854             if (eeprom->cbus_function[2] > CBUS_BB)
2855                 output[0x15] = CBUS_TXDEN;
2856             else
2857                 output[0x15] = eeprom->cbus_function[2];
2858
2859             if (eeprom->cbus_function[3] > CBUS_BB)
2860                 output[0x15] |= CBUS_PWREN<<4;
2861             else
2862                 output[0x15] |= eeprom->cbus_function[3]<<4;
2863
2864             if (eeprom->cbus_function[4] > CBUS_CLK6)
2865                 output[0x16] = CBUS_SLEEP;
2866             else
2867                 output[0x16] = eeprom->cbus_function[4];
2868             break;
2869         case TYPE_2232H:
2870             output[0x00] = type2bit(eeprom->channel_a_type, TYPE_2232H);
2871             if ( eeprom->channel_a_driver == DRIVER_VCP)
2872                 output[0x00] |= DRIVER_VCP;
2873             else
2874                 output[0x00] &= ~DRIVER_VCP;
2875
2876             output[0x01] = type2bit(eeprom->channel_b_type, TYPE_2232H);
2877             if ( eeprom->channel_b_driver == DRIVER_VCP)
2878                 output[0x01] |= DRIVER_VCP;
2879             else
2880                 output[0x01] &= ~DRIVER_VCP;
2881             if (eeprom->suspend_dbus7 == SUSPEND_DBUS7_BIT)
2882                 output[0x01] |= SUSPEND_DBUS7_BIT;
2883             else
2884                 output[0x01] &= ~SUSPEND_DBUS7_BIT;
2885
2886             if (eeprom->suspend_pull_downs)
2887                 output[0x0A] |= 0x4;
2888             else
2889                 output[0x0A] &= ~0x4;
2890
2891             if (eeprom->group0_drive > DRIVE_16MA)
2892                 output[0x0c] |= DRIVE_16MA;
2893             else
2894                 output[0x0c] |= eeprom->group0_drive;
2895             if (eeprom->group0_schmitt == IS_SCHMITT)
2896                 output[0x0c] |= IS_SCHMITT;
2897             if (eeprom->group0_slew == SLOW_SLEW)
2898                 output[0x0c] |= SLOW_SLEW;
2899
2900             if (eeprom->group1_drive > DRIVE_16MA)
2901                 output[0x0c] |= DRIVE_16MA<<4;
2902             else
2903                 output[0x0c] |= eeprom->group1_drive<<4;
2904             if (eeprom->group1_schmitt == IS_SCHMITT)
2905                 output[0x0c] |= IS_SCHMITT<<4;
2906             if (eeprom->group1_slew == SLOW_SLEW)
2907                 output[0x0c] |= SLOW_SLEW<<4;
2908
2909             if (eeprom->group2_drive > DRIVE_16MA)
2910                 output[0x0d] |= DRIVE_16MA;
2911             else
2912                 output[0x0d] |= eeprom->group2_drive;
2913             if (eeprom->group2_schmitt == IS_SCHMITT)
2914                 output[0x0d] |= IS_SCHMITT;
2915             if (eeprom->group2_slew == SLOW_SLEW)
2916                 output[0x0d] |= SLOW_SLEW;
2917
2918             if (eeprom->group3_drive > DRIVE_16MA)
2919                 output[0x0d] |= DRIVE_16MA<<4;
2920             else
2921                 output[0x0d] |= eeprom->group3_drive<<4;
2922             if (eeprom->group3_schmitt == IS_SCHMITT)
2923                 output[0x0d] |= IS_SCHMITT<<4;
2924             if (eeprom->group3_slew == SLOW_SLEW)
2925                 output[0x0d] |= SLOW_SLEW<<4;
2926
2927             output[0x18] = eeprom->chip;
2928
2929             break;
2930         case TYPE_4232H:
2931             if (eeprom->channel_a_driver == DRIVER_VCP)
2932                 output[0x00] |= DRIVER_VCP;
2933             else
2934                 output[0x00] &= ~DRIVER_VCP;
2935             if (eeprom->channel_b_driver == DRIVER_VCP)
2936                 output[0x01] |= DRIVER_VCP;
2937             else
2938                 output[0x01] &= ~DRIVER_VCP;
2939             if (eeprom->channel_c_driver == DRIVER_VCP)
2940                 output[0x00] |= (DRIVER_VCP << 4);
2941             else
2942                 output[0x00] &= ~(DRIVER_VCP << 4);
2943             if (eeprom->channel_d_driver == DRIVER_VCP)
2944                 output[0x01] |= (DRIVER_VCP << 4);
2945             else
2946                 output[0x01] &= ~(DRIVER_VCP << 4);
2947
2948             if (eeprom->suspend_pull_downs)
2949                 output[0x0a] |= 0x4;
2950             else
2951                 output[0x0a] &= ~0x4;
2952
2953             if (eeprom->channel_a_rs485enable)
2954                 output[0x0b] |= CHANNEL_IS_RS485 << 0;
2955             else
2956                 output[0x0b] &= ~(CHANNEL_IS_RS485 << 0);
2957             if (eeprom->channel_b_rs485enable)
2958                 output[0x0b] |= CHANNEL_IS_RS485 << 1;
2959             else
2960                 output[0x0b] &= ~(CHANNEL_IS_RS485 << 1);
2961             if (eeprom->channel_c_rs485enable)
2962                 output[0x0b] |= CHANNEL_IS_RS485 << 2;
2963             else
2964                 output[0x0b] &= ~(CHANNEL_IS_RS485 << 2);
2965             if (eeprom->channel_d_rs485enable)
2966                 output[0x0b] |= CHANNEL_IS_RS485 << 3;
2967             else
2968                 output[0x0b] &= ~(CHANNEL_IS_RS485 << 3);
2969
2970             if (eeprom->group0_drive > DRIVE_16MA)
2971                 output[0x0c] |= DRIVE_16MA;
2972             else
2973                 output[0x0c] |= eeprom->group0_drive;
2974             if (eeprom->group0_schmitt == IS_SCHMITT)
2975                 output[0x0c] |= IS_SCHMITT;
2976             if (eeprom->group0_slew == SLOW_SLEW)
2977                 output[0x0c] |= SLOW_SLEW;
2978
2979             if (eeprom->group1_drive > DRIVE_16MA)
2980                 output[0x0c] |= DRIVE_16MA<<4;
2981             else
2982                 output[0x0c] |= eeprom->group1_drive<<4;
2983             if (eeprom->group1_schmitt == IS_SCHMITT)
2984                 output[0x0c] |= IS_SCHMITT<<4;
2985             if (eeprom->group1_slew == SLOW_SLEW)
2986                 output[0x0c] |= SLOW_SLEW<<4;
2987
2988             if (eeprom->group2_drive > DRIVE_16MA)
2989                 output[0x0d] |= DRIVE_16MA;
2990             else
2991                 output[0x0d] |= eeprom->group2_drive;
2992             if (eeprom->group2_schmitt == IS_SCHMITT)
2993                 output[0x0d] |= IS_SCHMITT;
2994             if (eeprom->group2_slew == SLOW_SLEW)
2995                 output[0x0d] |= SLOW_SLEW;
2996
2997             if (eeprom->group3_drive > DRIVE_16MA)
2998                 output[0x0d] |= DRIVE_16MA<<4;
2999             else
3000                 output[0x0d] |= eeprom->group3_drive<<4;
3001             if (eeprom->group3_schmitt == IS_SCHMITT)
3002                 output[0x0d] |= IS_SCHMITT<<4;
3003             if (eeprom->group3_slew == SLOW_SLEW)
3004                 output[0x0d] |= SLOW_SLEW<<4;
3005
3006             output[0x18] = eeprom->chip;
3007
3008             break;
3009         case TYPE_232H:
3010             output[0x00] = type2bit(eeprom->channel_a_type, TYPE_232H);
3011             if ( eeprom->channel_a_driver == DRIVER_VCP)
3012                 output[0x00] |= DRIVER_VCPH;
3013             else
3014                 output[0x00] &= ~DRIVER_VCPH;
3015             if (eeprom->powersave)
3016                 output[0x01] |= POWER_SAVE_DISABLE_H;
3017             else
3018                 output[0x01] &= ~POWER_SAVE_DISABLE_H;
3019             if (eeprom->clock_polarity)
3020                 output[0x01] |= FT1284_CLK_IDLE_STATE;
3021             else
3022                 output[0x01] &= ~FT1284_CLK_IDLE_STATE;
3023             if (eeprom->data_order)
3024                 output[0x01] |= FT1284_DATA_LSB;
3025             else
3026                 output[0x01] &= ~FT1284_DATA_LSB;
3027             if (eeprom->flow_control)
3028                 output[0x01] |= FT1284_FLOW_CONTROL;
3029             else
3030                 output[0x01] &= ~FT1284_FLOW_CONTROL;
3031             if (eeprom->group0_drive > DRIVE_16MA)
3032                 output[0x0c] |= DRIVE_16MA;
3033             else
3034                 output[0x0c] |= eeprom->group0_drive;
3035             if (eeprom->group0_schmitt == IS_SCHMITT)
3036                 output[0x0c] |= IS_SCHMITT;
3037             if (eeprom->group0_slew == SLOW_SLEW)
3038                 output[0x0c] |= SLOW_SLEW;
3039
3040             if (eeprom->group1_drive > DRIVE_16MA)
3041                 output[0x0d] |= DRIVE_16MA;
3042             else
3043                 output[0x0d] |= eeprom->group1_drive;
3044             if (eeprom->group1_schmitt == IS_SCHMITT)
3045                 output[0x0d] |= IS_SCHMITT;
3046             if (eeprom->group1_slew == SLOW_SLEW)
3047                 output[0x0d] |= SLOW_SLEW;
3048
3049             set_ft232h_cbus(eeprom, output);
3050
3051             output[0x1e] = eeprom->chip;
3052             fprintf(stderr,"FIXME: Build FT232H specific EEPROM settings\n");
3053             break;
3054         case TYPE_230X:
3055             output[0x00] = 0x80; /* Actually, leave the default value */
3056             output[0x0a] = 0x08; /* Enable USB Serial Number */
3057             output[0x0c] = (0x01) | (0x3 << 4); /* DBUS drive 4mA, CBUS drive 16mA */
3058             for (j = 0; j <= 6; j++)
3059             {
3060                 output[0x1a + j] = eeprom->cbus_function[j];
3061             }
3062             break;
3063     }
3064
3065     // calculate checksum
3066     checksum = 0xAAAA;
3067
3068     for (i = 0; i < eeprom->size/2-1; i++)
3069     {
3070         if ((ftdi->type == TYPE_230X) && (i == 0x12))
3071         {
3072             /* FT230X has a user section in the MTP which is not part of the checksum */
3073             i = 0x40;
3074         }
3075         value = output[i*2];
3076         value += output[(i*2)+1] << 8;
3077
3078         checksum = value^checksum;
3079         checksum = (checksum << 1) | (checksum >> 15);
3080     }
3081
3082     output[eeprom->size-2] = checksum;
3083     output[eeprom->size-1] = checksum >> 8;
3084
3085     eeprom->initialized_for_connected_device = 1;
3086     return user_area_size;
3087 }
3088 /* Decode the encoded EEPROM field for the FTDI Mode into a value for the abstracted
3089  * EEPROM structure
3090  *
3091  * FTD2XX doesn't allow to set multiple bits in the interface mode bitfield, and so do we
3092  */
3093 static unsigned char bit2type(unsigned char bits)
3094 {
3095     switch (bits)
3096     {
3097         case   0: return CHANNEL_IS_UART;
3098         case   1: return CHANNEL_IS_FIFO;
3099         case   2: return CHANNEL_IS_OPTO;
3100         case   4: return CHANNEL_IS_CPU;
3101         case   8: return CHANNEL_IS_FT1284;
3102         default:
3103             fprintf(stderr," Unexpected value %d for Hardware Interface type\n",
3104                     bits);
3105     }
3106     return 0;
3107 }
3108 /**
3109    Decode binary EEPROM image into an ftdi_eeprom structure.
3110
3111    \param ftdi pointer to ftdi_context
3112    \param verbose Decode EEPROM on stdout
3113
3114    \retval 0: all fine
3115    \retval -1: something went wrong
3116
3117    FIXME: How to pass size? How to handle size field in ftdi_eeprom?
3118    FIXME: Strings are malloc'ed here and should be freed somewhere
3119 */
3120 int ftdi_eeprom_decode(struct ftdi_context *ftdi, int verbose)
3121 {
3122     unsigned char i, j;
3123     unsigned short checksum, eeprom_checksum, value;
3124     unsigned char manufacturer_size = 0, product_size = 0, serial_size = 0;
3125     int eeprom_size;
3126     struct ftdi_eeprom *eeprom;
3127     unsigned char *buf = NULL;
3128
3129     if (ftdi == NULL)
3130         ftdi_error_return(-1,"No context");
3131     if (ftdi->eeprom == NULL)
3132         ftdi_error_return(-1,"No eeprom structure");
3133
3134     eeprom = ftdi->eeprom;
3135     eeprom_size = eeprom->size;
3136     buf = ftdi->eeprom->buf;
3137
3138     // Addr 02: Vendor ID
3139     eeprom->vendor_id = buf[0x02] + (buf[0x03] << 8);
3140
3141     // Addr 04: Product ID
3142     eeprom->product_id = buf[0x04] + (buf[0x05] << 8);
3143
3144     // Addr 06: Device release number
3145     eeprom->release_number = buf[0x06] + (buf[0x07]<<8);
3146
3147     // Addr 08: Config descriptor
3148     // Bit 7: always 1
3149     // Bit 6: 1 if this device is self powered, 0 if bus powered
3150     // Bit 5: 1 if this device uses remote wakeup
3151     eeprom->self_powered = buf[0x08] & 0x40;
3152     eeprom->remote_wakeup = buf[0x08] & 0x20;
3153
3154     // Addr 09: Max power consumption: max power = value * 2 mA
3155     eeprom->max_power = MAX_POWER_MILLIAMP_PER_UNIT * buf[0x09];
3156
3157     // Addr 0A: Chip configuration
3158     // Bit 7: 0 - reserved
3159     // Bit 6: 0 - reserved
3160     // Bit 5: 0 - reserved
3161     // Bit 4: 1 - Change USB version on BM and 2232C
3162     // Bit 3: 1 - Use the serial number string
3163     // Bit 2: 1 - Enable suspend pull downs for lower power
3164     // Bit 1: 1 - Out EndPoint is Isochronous
3165     // Bit 0: 1 - In EndPoint is Isochronous
3166     //
3167     eeprom->in_is_isochronous  = buf[0x0A]&0x01;
3168     eeprom->out_is_isochronous = buf[0x0A]&0x02;
3169     eeprom->suspend_pull_downs = buf[0x0A]&0x04;
3170     eeprom->use_serial         = (buf[0x0A] & USE_SERIAL_NUM)?1:0;
3171     eeprom->use_usb_version    = buf[0x0A] & USE_USB_VERSION_BIT;
3172
3173     // Addr 0C: USB version low byte when 0x0A
3174     // Addr 0D: USB version high byte when 0x0A
3175     eeprom->usb_version = buf[0x0C] + (buf[0x0D] << 8);
3176
3177     // Addr 0E: Offset of the manufacturer string + 0x80, calculated later
3178     // Addr 0F: Length of manufacturer string
3179     manufacturer_size = buf[0x0F]/2;
3180     if (eeprom->manufacturer)
3181         free(eeprom->manufacturer);
3182     if (manufacturer_size > 0)
3183     {
3184         eeprom->manufacturer = malloc(manufacturer_size);
3185         if (eeprom->manufacturer)
3186         {
3187             // Decode manufacturer
3188             i = buf[0x0E] & (eeprom_size -1); // offset
3189             for (j=0; j<manufacturer_size-1; j++)
3190             {
3191                 eeprom->manufacturer[j] = buf[2*j+i+2];
3192             }
3193             eeprom->manufacturer[j] = '\0';
3194         }
3195     }
3196     else eeprom->manufacturer = NULL;
3197
3198     // Addr 10: Offset of the product string + 0x80, calculated later
3199     // Addr 11: Length of product string
3200     if (eeprom->product)
3201         free(eeprom->product);
3202     product_size = buf[0x11]/2;
3203     if (product_size > 0)
3204     {
3205         eeprom->product = malloc(product_size);
3206         if (eeprom->product)
3207         {
3208             // Decode product name
3209             i = buf[0x10] & (eeprom_size -1); // offset
3210             for (j=0; j<product_size-1; j++)
3211             {
3212                 eeprom->product[j] = buf[2*j+i+2];
3213             }
3214             eeprom->product[j] = '\0';
3215         }
3216     }
3217     else eeprom->product = NULL;
3218
3219     // Addr 12: Offset of the serial string + 0x80, calculated later
3220     // Addr 13: Length of serial string
3221     if (eeprom->serial)
3222         free(eeprom->serial);
3223     serial_size = buf[0x13]/2;
3224     if (serial_size > 0)
3225     {
3226         eeprom->serial = malloc(serial_size);
3227         if (eeprom->serial)
3228         {
3229             // Decode serial
3230             i = buf[0x12] & (eeprom_size -1); // offset
3231             for (j=0; j<serial_size-1; j++)
3232             {
3233                 eeprom->serial[j] = buf[2*j+i+2];
3234             }
3235             eeprom->serial[j] = '\0';
3236         }
3237     }
3238     else eeprom->serial = NULL;
3239
3240     // verify checksum
3241     checksum = 0xAAAA;
3242
3243     for (i = 0; i < eeprom_size/2-1; i++)
3244     {
3245         if ((ftdi->type == TYPE_230X) && (i == 0x12))
3246         {
3247             /* FT230X has a user section in the MTP which is not part of the checksum */
3248             i = 0x40;
3249         }
3250         value = buf[i*2];
3251         value += buf[(i*2)+1] << 8;
3252
3253         checksum = value^checksum;
3254         checksum = (checksum << 1) | (checksum >> 15);
3255     }
3256
3257     eeprom_checksum = buf[eeprom_size-2] + (buf[eeprom_size-1] << 8);
3258
3259     if (eeprom_checksum != checksum)
3260     {
3261         fprintf(stderr, "Checksum Error: %04x %04x\n", checksum, eeprom_checksum);
3262         ftdi_error_return(-1,"EEPROM checksum error");
3263     }
3264
3265     eeprom->channel_a_type   = 0;
3266     if ((ftdi->type == TYPE_AM) || (ftdi->type == TYPE_BM))
3267     {
3268         eeprom->chip = -1;
3269     }
3270     else if (ftdi->type == TYPE_2232C)
3271     {
3272         eeprom->channel_a_type   = bit2type(buf[0x00] & 0x7);
3273         eeprom->channel_a_driver = buf[0x00] & DRIVER_VCP;
3274         eeprom->high_current_a   = buf[0x00] & HIGH_CURRENT_DRIVE;
3275         eeprom->channel_b_type   = buf[0x01] & 0x7;
3276         eeprom->channel_b_driver = buf[0x01] & DRIVER_VCP;
3277         eeprom->high_current_b   = buf[0x01] & HIGH_CURRENT_DRIVE;
3278         eeprom->chip = buf[0x14];
3279     }
3280     else if (ftdi->type == TYPE_R)
3281     {
3282         /* TYPE_R flags D2XX, not VCP as all others*/
3283         eeprom->channel_a_driver = ~buf[0x00] & DRIVER_VCP;
3284         eeprom->high_current     = buf[0x00] & HIGH_CURRENT_DRIVE_R;
3285         if ( (buf[0x01]&0x40) != 0x40)
3286             fprintf(stderr,
3287                     "TYPE_R EEPROM byte[0x01] Bit 6 unexpected Endpoint size."
3288                     " If this happened with the\n"
3289                     " EEPROM programmed by FTDI tools, please report "
3290                     "to libftdi@developer.intra2net.com\n");
3291
3292         eeprom->chip = buf[0x16];
3293         // Addr 0B: Invert data lines
3294         // Works only on FT232R, not FT245R, but no way to distinguish
3295         eeprom->invert = buf[0x0B];
3296         // Addr 14: CBUS function: CBUS0, CBUS1
3297         // Addr 15: CBUS function: CBUS2, CBUS3
3298         // Addr 16: CBUS function: CBUS5
3299         eeprom->cbus_function[0] = buf[0x14] & 0x0f;
3300         eeprom->cbus_function[1] = (buf[0x14] >> 4) & 0x0f;
3301         eeprom->cbus_function[2] = buf[0x15] & 0x0f;
3302         eeprom->cbus_function[3] = (buf[0x15] >> 4) & 0x0f;
3303         eeprom->cbus_function[4] = buf[0x16] & 0x0f;
3304     }
3305     else if ((ftdi->type == TYPE_2232H) || (ftdi->type == TYPE_4232H))
3306     {
3307         eeprom->channel_a_driver = buf[0x00] & DRIVER_VCP;
3308         eeprom->channel_b_driver = buf[0x01] & DRIVER_VCP;
3309
3310         if (ftdi->type == TYPE_2232H)
3311         {
3312             eeprom->channel_a_type   = bit2type(buf[0x00] & 0x7);
3313             eeprom->channel_b_type   = bit2type(buf[0x01] & 0x7);
3314             eeprom->suspend_dbus7    = buf[0x01] & SUSPEND_DBUS7_BIT;
3315         }
3316         else
3317         {
3318             eeprom->channel_c_driver = (buf[0x00] >> 4) & DRIVER_VCP;
3319             eeprom->channel_d_driver = (buf[0x01] >> 4) & DRIVER_VCP;
3320             eeprom->channel_a_rs485enable = buf[0x0b] & (CHANNEL_IS_RS485 << 0);
3321             eeprom->channel_b_rs485enable = buf[0x0b] & (CHANNEL_IS_RS485 << 1);
3322             eeprom->channel_c_rs485enable = buf[0x0b] & (CHANNEL_IS_RS485 << 2);
3323             eeprom->channel_d_rs485enable = buf[0x0b] & (CHANNEL_IS_RS485 << 3);
3324         }
3325
3326         eeprom->chip = buf[0x18];
3327         eeprom->group0_drive   =  buf[0x0c]       & DRIVE_16MA;
3328         eeprom->group0_schmitt =  buf[0x0c]       & IS_SCHMITT;
3329         eeprom->group0_slew    =  buf[0x0c]       & SLOW_SLEW;
3330         eeprom->group1_drive   = (buf[0x0c] >> 4) & 0x3;
3331         eeprom->group1_schmitt = (buf[0x0c] >> 4) & IS_SCHMITT;
3332         eeprom->group1_slew    = (buf[0x0c] >> 4) & SLOW_SLEW;
3333         eeprom->group2_drive   =  buf[0x0d]       & DRIVE_16MA;
3334         eeprom->group2_schmitt =  buf[0x0d]       & IS_SCHMITT;
3335         eeprom->group2_slew    =  buf[0x0d]       & SLOW_SLEW;
3336         eeprom->group3_drive   = (buf[0x0d] >> 4) & DRIVE_16MA;
3337         eeprom->group3_schmitt = (buf[0x0d] >> 4) & IS_SCHMITT;
3338         eeprom->group3_slew    = (buf[0x0d] >> 4) & SLOW_SLEW;
3339     }
3340     else if (ftdi->type == TYPE_232H)
3341     {
3342         int i;
3343
3344         eeprom->channel_a_type   = buf[0x00] & 0xf;
3345         eeprom->channel_a_driver = (buf[0x00] & DRIVER_VCPH)?DRIVER_VCP:0;
3346         eeprom->clock_polarity =  buf[0x01]       & FT1284_CLK_IDLE_STATE;
3347         eeprom->data_order     =  buf[0x01]       & FT1284_DATA_LSB;
3348         eeprom->flow_control   =  buf[0x01]       & FT1284_FLOW_CONTROL;
3349         eeprom->powersave      =  buf[0x01]       & POWER_SAVE_DISABLE_H;
3350         eeprom->group0_drive   =  buf[0x0c]       & DRIVE_16MA;
3351         eeprom->group0_schmitt =  buf[0x0c]       & IS_SCHMITT;
3352         eeprom->group0_slew    =  buf[0x0c]       & SLOW_SLEW;
3353         eeprom->group1_drive   =  buf[0x0d]       & DRIVE_16MA;
3354         eeprom->group1_schmitt =  buf[0x0d]       & IS_SCHMITT;
3355         eeprom->group1_slew    =  buf[0x0d]       & SLOW_SLEW;
3356
3357         for(i=0; i<5; i++)
3358         {
3359             eeprom->cbus_function[2*i  ] =  buf[0x18+i] & 0x0f;
3360             eeprom->cbus_function[2*i+1] = (buf[0x18+i] >> 4) & 0x0f;
3361         }
3362         eeprom->chip = buf[0x1e];
3363         /*FIXME: Decipher more values*/
3364     }
3365     else if (ftdi->type == TYPE_230X)
3366     {
3367         for(i=0; i<4; i++)
3368         {
3369             eeprom->cbus_function[i] =  buf[0x1a + i] & 0xFF;
3370         }
3371         eeprom->group0_drive   =  buf[0x0c]       & 0x03;
3372         eeprom->group0_schmitt =  buf[0x0c]       & IS_SCHMITT;
3373         eeprom->group0_slew    =  buf[0x0c]       & SLOW_SLEW;
3374         eeprom->group1_drive   = (buf[0x0c] >> 4) & 0x03;
3375         eeprom->group1_schmitt = (buf[0x0c] >> 4) & IS_SCHMITT;
3376         eeprom->group1_slew    = (buf[0x0c] >> 4) & SLOW_SLEW;
3377     }
3378
3379     if (verbose)
3380     {
3381         char *channel_mode[] = {"UART", "FIFO", "CPU", "OPTO", "FT1284"};
3382         fprintf(stdout, "VID:     0x%04x\n",eeprom->vendor_id);
3383         fprintf(stdout, "PID:     0x%04x\n",eeprom->product_id);
3384         fprintf(stdout, "Release: 0x%04x\n",eeprom->release_number);
3385
3386         if (eeprom->self_powered)
3387             fprintf(stdout, "Self-Powered%s", (eeprom->remote_wakeup)?", USB Remote Wake Up\n":"\n");
3388         else
3389             fprintf(stdout, "Bus Powered: %3d mA%s", eeprom->max_power,
3390                     (eeprom->remote_wakeup)?" USB Remote Wake Up\n":"\n");
3391         if (eeprom->manufacturer)
3392             fprintf(stdout, "Manufacturer: %s\n",eeprom->manufacturer);
3393         if (eeprom->product)
3394             fprintf(stdout, "Product:      %s\n",eeprom->product);
3395         if (eeprom->serial)
3396             fprintf(stdout, "Serial:       %s\n",eeprom->serial);
3397         fprintf(stdout,     "Checksum      : %04x\n", checksum);
3398         if (ftdi->type == TYPE_R)
3399             fprintf(stdout,     "Internal EEPROM\n");
3400         else if (eeprom->chip >= 0x46)
3401             fprintf(stdout,     "Attached EEPROM: 93x%02x\n", eeprom->chip);
3402         if (eeprom->suspend_dbus7)
3403             fprintf(stdout, "Suspend on DBUS7\n");
3404         if (eeprom->suspend_pull_downs)
3405             fprintf(stdout, "Pull IO pins low during suspend\n");
3406         if(eeprom->powersave)
3407         {
3408             if(ftdi->type >= TYPE_232H)
3409                 fprintf(stdout,"Enter low power state on ACBUS7\n");
3410         }
3411         if (eeprom->remote_wakeup)
3412             fprintf(stdout, "Enable Remote Wake Up\n");
3413         fprintf(stdout, "PNP: %d\n",(eeprom->is_not_pnp)?0:1);
3414         if (ftdi->type >= TYPE_2232C)
3415             fprintf(stdout,"Channel A has Mode %s%s%s\n",
3416                     channel_mode[eeprom->channel_a_type],
3417                     (eeprom->channel_a_driver)?" VCP":"",
3418                     (eeprom->high_current_a)?" High Current IO":"");
3419         if (ftdi->type >= TYPE_232H)
3420         {
3421             fprintf(stdout,"FT1284 Mode Clock is idle %s, %s first, %sFlow Control\n",
3422                     (eeprom->clock_polarity)?"HIGH":"LOW",
3423                     (eeprom->data_order)?"LSB":"MSB",
3424                     (eeprom->flow_control)?"":"No ");
3425         }
3426         if ((ftdi->type >= TYPE_2232C) && (ftdi->type != TYPE_R) && (ftdi->type != TYPE_232H))
3427             fprintf(stdout,"Channel B has Mode %s%s%s\n",
3428                     channel_mode[eeprom->channel_b_type],
3429                     (eeprom->channel_b_driver)?" VCP":"",
3430                     (eeprom->high_current_b)?" High Current IO":"");
3431         if (((ftdi->type == TYPE_BM) || (ftdi->type == TYPE_2232C)) &&
3432                 eeprom->use_usb_version == USE_USB_VERSION_BIT)
3433             fprintf(stdout,"Use explicit USB Version %04x\n",eeprom->usb_version);
3434
3435         if ((ftdi->type == TYPE_2232H) || (ftdi->type == TYPE_4232H))
3436         {
3437             fprintf(stdout,"%s has %d mA drive%s%s\n",
3438                     (ftdi->type == TYPE_2232H)?"AL":"A",
3439                     (eeprom->group0_drive+1) *4,
3440                     (eeprom->group0_schmitt)?" Schmitt Input":"",
3441                     (eeprom->group0_slew)?" Slow Slew":"");
3442             fprintf(stdout,"%s has %d mA drive%s%s\n",
3443                     (ftdi->type == TYPE_2232H)?"AH":"B",
3444                     (eeprom->group1_drive+1) *4,
3445                     (eeprom->group1_schmitt)?" Schmitt Input":"",
3446                     (eeprom->group1_slew)?" Slow Slew":"");
3447             fprintf(stdout,"%s has %d mA drive%s%s\n",
3448                     (ftdi->type == TYPE_2232H)?"BL":"C",
3449                     (eeprom->group2_drive+1) *4,
3450                     (eeprom->group2_schmitt)?" Schmitt Input":"",
3451                     (eeprom->group2_slew)?" Slow Slew":"");
3452             fprintf(stdout,"%s has %d mA drive%s%s\n",
3453                     (ftdi->type == TYPE_2232H)?"BH":"D",
3454                     (eeprom->group3_drive+1) *4,
3455                     (eeprom->group3_schmitt)?" Schmitt Input":"",
3456                     (eeprom->group3_slew)?" Slow Slew":"");
3457         }
3458         else if (ftdi->type == TYPE_232H)
3459         {
3460             int i;
3461             char *cbush_mux[] = {"TRISTATE","RXLED","TXLED", "TXRXLED","PWREN",
3462                                  "SLEEP","DRIVE_0","DRIVE_1","IOMODE","TXDEN",
3463                                  "CLK30","CLK15","CLK7_5"
3464                                 };
3465             fprintf(stdout,"ACBUS has %d mA drive%s%s\n",
3466                     (eeprom->group0_drive+1) *4,
3467                     (eeprom->group0_schmitt)?" Schmitt Input":"",
3468                     (eeprom->group0_slew)?" Slow Slew":"");
3469             fprintf(stdout,"ADBUS has %d mA drive%s%s\n",
3470                     (eeprom->group1_drive+1) *4,
3471                     (eeprom->group1_schmitt)?" Schmitt Input":"",
3472                     (eeprom->group1_slew)?" Slow Slew":"");
3473             for (i=0; i<10; i++)
3474             {
3475                 if (eeprom->cbus_function[i]<= CBUSH_CLK7_5 )
3476                     fprintf(stdout,"C%d Function: %s\n", i,
3477                             cbush_mux[eeprom->cbus_function[i]]);
3478             }
3479         }
3480         else if (ftdi->type == TYPE_230X)
3481         {
3482             int i;
3483             char *cbush_mux[] = {"TRISTATE","RXLED","TXLED", "TXRXLED","PWREN",
3484                                  "SLEEP","DRIVE_0","DRIVE_1","IOMODE","TXDEN",
3485                                  "CLK24","CLK12","CLK6","BAT_DETECT","BAT_DETECT#",
3486                                  "I2C_TXE#", "I2C_RXF#", "VBUS_SENSE", "BB_WR#",
3487                                  "BBRD#", "TIME_STAMP", "AWAKE#",
3488                                 };
3489             fprintf(stdout,"IOBUS has %d mA drive%s%s\n",
3490                     (eeprom->group0_drive+1) *4,
3491                     (eeprom->group0_schmitt)?" Schmitt Input":"",
3492                     (eeprom->group0_slew)?" Slow Slew":"");
3493             fprintf(stdout,"CBUS has %d mA drive%s%s\n",
3494                     (eeprom->group1_drive+1) *4,
3495                     (eeprom->group1_schmitt)?" Schmitt Input":"",
3496                     (eeprom->group1_slew)?" Slow Slew":"");
3497             for (i=0; i<4; i++)
3498             {
3499                 if (eeprom->cbus_function[i]<= CBUSH_AWAKE)
3500                     fprintf(stdout,"CBUS%d Function: %s\n", i, cbush_mux[eeprom->cbus_function[i]]);
3501             }
3502         }
3503
3504         if (ftdi->type == TYPE_R)
3505         {
3506             char *cbus_mux[] = {"TXDEN","PWREN","RXLED", "TXLED","TX+RXLED",
3507                                 "SLEEP","CLK48","CLK24","CLK12","CLK6",
3508                                 "IOMODE","BB_WR","BB_RD"
3509                                };
3510             char *cbus_BB[] = {"RXF","TXE","RD", "WR"};
3511
3512             if (eeprom->invert)
3513             {
3514                 char *r_bits[] = {"TXD","RXD","RTS", "CTS","DTR","DSR","DCD","RI"};
3515                 fprintf(stdout,"Inverted bits:");
3516                 for (i=0; i<8; i++)
3517                     if ((eeprom->invert & (1<<i)) == (1<<i))
3518                         fprintf(stdout," %s",r_bits[i]);
3519                 fprintf(stdout,"\n");
3520             }
3521             for (i=0; i<5; i++)
3522             {
3523                 if (eeprom->cbus_function[i]<CBUS_BB)
3524                     fprintf(stdout,"C%d Function: %s\n", i,
3525                             cbus_mux[eeprom->cbus_function[i]]);
3526                 else
3527                 {
3528                     if (i < 4)
3529                         /* Running MPROG show that C0..3 have fixed function Synchronous
3530                            Bit Bang mode */
3531                         fprintf(stdout,"C%d BB Function: %s\n", i,
3532                                 cbus_BB[i]);
3533                     else
3534                         fprintf(stdout, "Unknown CBUS mode. Might be special mode?\n");
3535                 }
3536             }
3537         }
3538     }
3539     return 0;
3540 }
3541
3542 /**
3543    Get a value from the decoded EEPROM structure
3544
3545    \param ftdi pointer to ftdi_context
3546    \param value_name Enum of the value to query
3547    \param value Pointer to store read value
3548
3549    \retval 0: all fine
3550    \retval -1: Value doesn't exist
3551 */
3552 int ftdi_get_eeprom_value(struct ftdi_context *ftdi, enum ftdi_eeprom_value value_name, int* value)
3553 {
3554     switch (value_name)
3555     {
3556         case VENDOR_ID:
3557             *value = ftdi->eeprom->vendor_id;
3558             break;
3559         case PRODUCT_ID:
3560             *value = ftdi->eeprom->product_id;
3561             break;
3562         case RELEASE_NUMBER:
3563             *value = ftdi->eeprom->release_number;
3564             break;
3565         case SELF_POWERED:
3566             *value = ftdi->eeprom->self_powered;
3567             break;
3568         case REMOTE_WAKEUP:
3569             *value = ftdi->eeprom->remote_wakeup;
3570             break;
3571         case IS_NOT_PNP:
3572             *value = ftdi->eeprom->is_not_pnp;
3573             break;
3574         case SUSPEND_DBUS7:
3575             *value = ftdi->eeprom->suspend_dbus7;
3576             break;
3577         case IN_IS_ISOCHRONOUS:
3578             *value = ftdi->eeprom->in_is_isochronous;
3579             break;
3580         case OUT_IS_ISOCHRONOUS:
3581             *value = ftdi->eeprom->out_is_isochronous;
3582             break;
3583         case SUSPEND_PULL_DOWNS:
3584             *value = ftdi->eeprom->suspend_pull_downs;
3585             break;
3586         case USE_SERIAL:
3587             *value = ftdi->eeprom->use_serial;
3588             break;
3589         case USB_VERSION:
3590             *value = ftdi->eeprom->usb_version;
3591             break;
3592         case USE_USB_VERSION:
3593             *value = ftdi->eeprom->use_usb_version;
3594             break;
3595         case MAX_POWER:
3596             *value = ftdi->eeprom->max_power;
3597             break;
3598         case CHANNEL_A_TYPE:
3599             *value = ftdi->eeprom->channel_a_type;
3600             break;
3601         case CHANNEL_B_TYPE:
3602             *value = ftdi->eeprom->channel_b_type;
3603             break;
3604         case CHANNEL_A_DRIVER:
3605             *value = ftdi->eeprom->channel_a_driver;
3606             break;
3607         case CHANNEL_B_DRIVER:
3608             *value = ftdi->eeprom->channel_b_driver;
3609             break;
3610         case CHANNEL_C_DRIVER:
3611             *value = ftdi->eeprom->channel_c_driver;
3612             break;
3613         case CHANNEL_D_DRIVER:
3614             *value = ftdi->eeprom->channel_d_driver;
3615             break;
3616         case CHANNEL_A_RS485:
3617             *value = ftdi->eeprom->channel_a_rs485enable;
3618             break;
3619         case CHANNEL_B_RS485:
3620             *value = ftdi->eeprom->channel_b_rs485enable;
3621             break;
3622         case CHANNEL_C_RS485:
3623             *value = ftdi->eeprom->channel_c_rs485enable;
3624             break;
3625         case CHANNEL_D_RS485:
3626             *value = ftdi->eeprom->channel_d_rs485enable;
3627             break;
3628         case CBUS_FUNCTION_0:
3629             *value = ftdi->eeprom->cbus_function[0];
3630             break;
3631         case CBUS_FUNCTION_1:
3632             *value = ftdi->eeprom->cbus_function[1];
3633             break;
3634         case CBUS_FUNCTION_2:
3635             *value = ftdi->eeprom->cbus_function[2];
3636             break;
3637         case CBUS_FUNCTION_3:
3638             *value = ftdi->eeprom->cbus_function[3];
3639             break;
3640         case CBUS_FUNCTION_4:
3641             *value = ftdi->eeprom->cbus_function[4];
3642             break;
3643         case CBUS_FUNCTION_5:
3644             *value = ftdi->eeprom->cbus_function[5];
3645             break;
3646         case CBUS_FUNCTION_6:
3647             *value = ftdi->eeprom->cbus_function[6];
3648             break;
3649         case CBUS_FUNCTION_7:
3650             *value = ftdi->eeprom->cbus_function[7];
3651             break;
3652         case CBUS_FUNCTION_8:
3653             *value = ftdi->eeprom->cbus_function[8];
3654             break;
3655         case CBUS_FUNCTION_9:
3656             *value = ftdi->eeprom->cbus_function[8];
3657             break;
3658         case HIGH_CURRENT:
3659             *value = ftdi->eeprom->high_current;
3660             break;
3661         case HIGH_CURRENT_A:
3662             *value = ftdi->eeprom->high_current_a;
3663             break;
3664         case HIGH_CURRENT_B:
3665             *value = ftdi->eeprom->high_current_b;
3666             break;
3667         case INVERT:
3668             *value = ftdi->eeprom->invert;
3669             break;
3670         case GROUP0_DRIVE:
3671             *value = ftdi->eeprom->group0_drive;
3672             break;
3673         case GROUP0_SCHMITT:
3674             *value = ftdi->eeprom->group0_schmitt;
3675             break;
3676         case GROUP0_SLEW:
3677             *value = ftdi->eeprom->group0_slew;
3678             break;
3679         case GROUP1_DRIVE:
3680             *value = ftdi->eeprom->group1_drive;
3681             break;
3682         case GROUP1_SCHMITT:
3683             *value = ftdi->eeprom->group1_schmitt;
3684             break;
3685         case GROUP1_SLEW:
3686             *value = ftdi->eeprom->group1_slew;
3687             break;
3688         case GROUP2_DRIVE:
3689             *value = ftdi->eeprom->group2_drive;
3690             break;
3691         case GROUP2_SCHMITT:
3692             *value = ftdi->eeprom->group2_schmitt;
3693             break;
3694         case GROUP2_SLEW:
3695             *value = ftdi->eeprom->group2_slew;
3696             break;
3697         case GROUP3_DRIVE:
3698             *value = ftdi->eeprom->group3_drive;
3699             break;
3700         case GROUP3_SCHMITT:
3701             *value = ftdi->eeprom->group3_schmitt;
3702             break;
3703         case GROUP3_SLEW:
3704             *value = ftdi->eeprom->group3_slew;
3705             break;
3706         case POWER_SAVE:
3707             *value = ftdi->eeprom->powersave;
3708             break;
3709         case CLOCK_POLARITY:
3710             *value = ftdi->eeprom->clock_polarity;
3711             break;
3712         case DATA_ORDER:
3713             *value = ftdi->eeprom->data_order;
3714             break;
3715         case FLOW_CONTROL:
3716             *value = ftdi->eeprom->flow_control;
3717             break;
3718         case CHIP_TYPE:
3719             *value = ftdi->eeprom->chip;
3720             break;
3721         case CHIP_SIZE:
3722             *value = ftdi->eeprom->size;
3723             break;
3724         default:
3725             ftdi_error_return(-1, "Request for unknown EEPROM value");
3726     }
3727     return 0;
3728 }
3729
3730 /**
3731    Set a value in the decoded EEPROM Structure
3732    No parameter checking is performed
3733
3734    \param ftdi pointer to ftdi_context
3735    \param value_name Enum of the value to set
3736    \param value to set
3737
3738    \retval 0: all fine
3739    \retval -1: Value doesn't exist
3740    \retval -2: Value not user settable
3741 */
3742 int ftdi_set_eeprom_value(struct ftdi_context *ftdi, enum ftdi_eeprom_value value_name, int value)
3743 {
3744     switch (value_name)
3745     {
3746         case VENDOR_ID:
3747             ftdi->eeprom->vendor_id = value;
3748             break;
3749         case PRODUCT_ID:
3750             ftdi->eeprom->product_id = value;
3751             break;
3752         case RELEASE_NUMBER:
3753             ftdi->eeprom->release_number = value;
3754             break;
3755         case SELF_POWERED:
3756             ftdi->eeprom->self_powered = value;
3757             break;
3758         case REMOTE_WAKEUP:
3759             ftdi->eeprom->remote_wakeup = value;
3760             break;
3761         case IS_NOT_PNP:
3762             ftdi->eeprom->is_not_pnp = value;
3763             break;
3764         case SUSPEND_DBUS7:
3765             ftdi->eeprom->suspend_dbus7 = value;
3766             break;
3767         case IN_IS_ISOCHRONOUS:
3768             ftdi->eeprom->in_is_isochronous = value;
3769             break;
3770         case OUT_IS_ISOCHRONOUS:
3771             ftdi->eeprom->out_is_isochronous = value;
3772             break;
3773         case SUSPEND_PULL_DOWNS:
3774             ftdi->eeprom->suspend_pull_downs = value;
3775             break;
3776         case USE_SERIAL:
3777             ftdi->eeprom->use_serial = value;
3778             break;
3779         case USB_VERSION:
3780             ftdi->eeprom->usb_version = value;
3781             break;
3782         case USE_USB_VERSION:
3783             ftdi->eeprom->use_usb_version = value;
3784             break;
3785         case MAX_POWER:
3786             ftdi->eeprom->max_power = value;
3787             break;
3788         case CHANNEL_A_TYPE:
3789             ftdi->eeprom->channel_a_type = value;
3790             break;
3791         case CHANNEL_B_TYPE:
3792             ftdi->eeprom->channel_b_type = value;
3793             break;
3794         case CHANNEL_A_DRIVER:
3795             ftdi->eeprom->channel_a_driver = value;
3796             break;
3797         case CHANNEL_B_DRIVER:
3798             ftdi->eeprom->channel_b_driver = value;
3799             break;
3800         case CHANNEL_C_DRIVER:
3801             ftdi->eeprom->channel_c_driver = value;
3802             break;
3803         case CHANNEL_D_DRIVER:
3804             ftdi->eeprom->channel_d_driver = value;
3805             break;
3806         case CHANNEL_A_RS485:
3807             ftdi->eeprom->channel_a_rs485enable = value;
3808             break;
3809         case CHANNEL_B_RS485:
3810             ftdi->eeprom->channel_b_rs485enable = value;
3811             break;
3812         case CHANNEL_C_RS485:
3813             ftdi->eeprom->channel_c_rs485enable = value;
3814             break;
3815         case CHANNEL_D_RS485:
3816             ftdi->eeprom->channel_d_rs485enable = value;
3817             break;
3818         case CBUS_FUNCTION_0:
3819             ftdi->eeprom->cbus_function[0] = value;
3820             break;
3821         case CBUS_FUNCTION_1:
3822             ftdi->eeprom->cbus_function[1] = value;
3823             break;
3824         case CBUS_FUNCTION_2:
3825             ftdi->eeprom->cbus_function[2] = value;
3826             break;
3827         case CBUS_FUNCTION_3:
3828             ftdi->eeprom->cbus_function[3] = value;
3829             break;
3830         case CBUS_FUNCTION_4:
3831             ftdi->eeprom->cbus_function[4] = value;
3832             break;
3833         case CBUS_FUNCTION_5:
3834             ftdi->eeprom->cbus_function[5] = value;
3835             break;
3836         case CBUS_FUNCTION_6:
3837             ftdi->eeprom->cbus_function[6] = value;
3838             break;
3839         case CBUS_FUNCTION_7:
3840             ftdi->eeprom->cbus_function[7] = value;
3841             break;
3842         case CBUS_FUNCTION_8:
3843             ftdi->eeprom->cbus_function[8] = value;
3844             break;
3845         case CBUS_FUNCTION_9:
3846             ftdi->eeprom->cbus_function[9] = value;
3847             break;
3848         case HIGH_CURRENT:
3849             ftdi->eeprom->high_current = value;
3850             break;
3851         case HIGH_CURRENT_A:
3852             ftdi->eeprom->high_current_a = value;
3853             break;
3854         case HIGH_CURRENT_B:
3855             ftdi->eeprom->high_current_b = value;
3856             break;
3857         case INVERT:
3858             ftdi->eeprom->invert = value;
3859             break;
3860         case GROUP0_DRIVE:
3861             ftdi->eeprom->group0_drive = value;
3862             break;
3863         case GROUP0_SCHMITT:
3864             ftdi->eeprom->group0_schmitt = value;
3865             break;
3866         case GROUP0_SLEW:
3867             ftdi->eeprom->group0_slew = value;
3868             break;
3869         case GROUP1_DRIVE:
3870             ftdi->eeprom->group1_drive = value;
3871             break;
3872         case GROUP1_SCHMITT:
3873             ftdi->eeprom->group1_schmitt = value;
3874             break;
3875         case GROUP1_SLEW:
3876             ftdi->eeprom->group1_slew = value;
3877             break;
3878         case GROUP2_DRIVE:
3879             ftdi->eeprom->group2_drive = value;
3880             break;
3881         case GROUP2_SCHMITT:
3882             ftdi->eeprom->group2_schmitt = value;
3883             break;
3884         case GROUP2_SLEW:
3885             ftdi->eeprom->group2_slew = value;
3886             break;
3887         case GROUP3_DRIVE:
3888             ftdi->eeprom->group3_drive = value;
3889             break;
3890         case GROUP3_SCHMITT:
3891             ftdi->eeprom->group3_schmitt = value;
3892             break;
3893         case GROUP3_SLEW:
3894             ftdi->eeprom->group3_slew = value;
3895             break;
3896         case CHIP_TYPE:
3897             ftdi->eeprom->chip = value;
3898             break;
3899         case POWER_SAVE:
3900             ftdi->eeprom->powersave = value;
3901             break;
3902         case CLOCK_POLARITY:
3903             ftdi->eeprom->clock_polarity = value;
3904             break;
3905         case DATA_ORDER:
3906             ftdi->eeprom->data_order = value;
3907             break;
3908         case FLOW_CONTROL:
3909             ftdi->eeprom->flow_control = value;
3910             break;
3911         case CHIP_SIZE:
3912             ftdi_error_return(-2, "EEPROM Value can't be changed");
3913         default :
3914             ftdi_error_return(-1, "Request to unknown EEPROM value");
3915     }
3916     ftdi->eeprom->initialized_for_connected_device = 0;
3917     return 0;
3918 }
3919
3920 /** Get the read-only buffer to the binary EEPROM content
3921
3922     \param ftdi pointer to ftdi_context
3923     \param buf buffer to receive EEPROM content
3924     \param size Size of receiving buffer
3925
3926     \retval 0: All fine
3927     \retval -1: struct ftdi_contxt or ftdi_eeprom missing
3928     \retval -2: Not enough room to store eeprom
3929 */
3930 int ftdi_get_eeprom_buf(struct ftdi_context *ftdi, unsigned char * buf, int size)
3931 {
3932     if (!ftdi || !(ftdi->eeprom))
3933         ftdi_error_return(-1, "No appropriate structure");
3934
3935     if (!buf || size < ftdi->eeprom->size)
3936         ftdi_error_return(-1, "Not enough room to store eeprom");
3937
3938     // Only copy up to FTDI_MAX_EEPROM_SIZE bytes
3939     if (size > FTDI_MAX_EEPROM_SIZE)
3940         size = FTDI_MAX_EEPROM_SIZE;
3941
3942     memcpy(buf, ftdi->eeprom->buf, size);
3943
3944     return 0;
3945 }
3946
3947 /** Set the EEPROM content from the user-supplied prefilled buffer
3948
3949     \param ftdi pointer to ftdi_context
3950     \param buf buffer to read EEPROM content
3951     \param size Size of buffer
3952
3953     \retval 0: All fine
3954     \retval -1: struct ftdi_contxt or ftdi_eeprom of buf missing
3955 */
3956 int ftdi_set_eeprom_buf(struct ftdi_context *ftdi, const unsigned char * buf, int size)
3957 {
3958     if (!ftdi || !(ftdi->eeprom) || !buf)
3959         ftdi_error_return(-1, "No appropriate structure");
3960
3961     // Only copy up to FTDI_MAX_EEPROM_SIZE bytes
3962     if (size > FTDI_MAX_EEPROM_SIZE)
3963         size = FTDI_MAX_EEPROM_SIZE;
3964
3965     memcpy(ftdi->eeprom->buf, buf, size);
3966
3967     return 0;
3968 }
3969
3970 /**
3971     Read eeprom location
3972
3973     \param ftdi pointer to ftdi_context
3974     \param eeprom_addr Address of eeprom location to be read
3975     \param eeprom_val Pointer to store read eeprom location
3976
3977     \retval  0: all fine
3978     \retval -1: read failed
3979     \retval -2: USB device unavailable
3980 */
3981 int ftdi_read_eeprom_location (struct ftdi_context *ftdi, int eeprom_addr, unsigned short *eeprom_val)
3982 {
3983     if (ftdi == NULL || ftdi->usb_dev == NULL)
3984         ftdi_error_return(-2, "USB device unavailable");
3985
3986     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_READ_EEPROM_REQUEST, 0, eeprom_addr, (unsigned char *)eeprom_val, 2, ftdi->usb_read_timeout) != 2)
3987         ftdi_error_return(-1, "reading eeprom failed");
3988
3989     return 0;
3990 }
3991
3992 /**
3993     Read eeprom
3994
3995     \param ftdi pointer to ftdi_context
3996
3997     \retval  0: all fine
3998     \retval -1: read failed
3999     \retval -2: USB device unavailable
4000 */
4001 int ftdi_read_eeprom(struct ftdi_context *ftdi)
4002 {
4003     int i;
4004     unsigned char *buf;
4005
4006     if (ftdi == NULL || ftdi->usb_dev == NULL)
4007         ftdi_error_return(-2, "USB device unavailable");
4008     buf = ftdi->eeprom->buf;
4009
4010     for (i = 0; i < FTDI_MAX_EEPROM_SIZE/2; i++)
4011     {
4012         if (libusb_control_transfer(
4013                     ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE,SIO_READ_EEPROM_REQUEST, 0, i,
4014                     buf+(i*2), 2, ftdi->usb_read_timeout) != 2)
4015             ftdi_error_return(-1, "reading eeprom failed");
4016     }
4017
4018     if (ftdi->type == TYPE_R)
4019         ftdi->eeprom->size = 0x80;
4020     /*    Guesses size of eeprom by comparing halves
4021           - will not work with blank eeprom */
4022     else if (strrchr((const char *)buf, 0xff) == ((const char *)buf +FTDI_MAX_EEPROM_SIZE -1))
4023         ftdi->eeprom->size = -1;
4024     else if (memcmp(buf,&buf[0x80],0x80) == 0)
4025         ftdi->eeprom->size = 0x80;
4026     else if (memcmp(buf,&buf[0x40],0x40) == 0)
4027         ftdi->eeprom->size = 0x40;
4028     else
4029         ftdi->eeprom->size = 0x100;
4030     return 0;
4031 }
4032
4033 /*
4034     ftdi_read_chipid_shift does the bitshift operation needed for the FTDIChip-ID
4035     Function is only used internally
4036     \internal
4037 */
4038 static unsigned char ftdi_read_chipid_shift(unsigned char value)
4039 {
4040     return ((value & 1) << 1) |
4041            ((value & 2) << 5) |
4042            ((value & 4) >> 2) |
4043            ((value & 8) << 4) |
4044            ((value & 16) >> 1) |
4045            ((value & 32) >> 1) |
4046            ((value & 64) >> 4) |
4047            ((value & 128) >> 2);
4048 }
4049
4050 /**
4051     Read the FTDIChip-ID from R-type devices
4052
4053     \param ftdi pointer to ftdi_context
4054     \param chipid Pointer to store FTDIChip-ID
4055
4056     \retval  0: all fine
4057     \retval -1: read failed
4058     \retval -2: USB device unavailable
4059 */
4060 int ftdi_read_chipid(struct ftdi_context *ftdi, unsigned int *chipid)
4061 {
4062     unsigned int a = 0, b = 0;
4063
4064     if (ftdi == NULL || ftdi->usb_dev == NULL)
4065         ftdi_error_return(-2, "USB device unavailable");
4066
4067     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_READ_EEPROM_REQUEST, 0, 0x43, (unsigned char *)&a, 2, ftdi->usb_read_timeout) == 2)
4068     {
4069         a = a << 8 | a >> 8;
4070         if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_IN_REQTYPE, SIO_READ_EEPROM_REQUEST, 0, 0x44, (unsigned char *)&b, 2, ftdi->usb_read_timeout) == 2)
4071         {
4072             b = b << 8 | b >> 8;
4073             a = (a << 16) | (b & 0xFFFF);
4074             a = ftdi_read_chipid_shift(a) | ftdi_read_chipid_shift(a>>8)<<8
4075                 | ftdi_read_chipid_shift(a>>16)<<16 | ftdi_read_chipid_shift(a>>24)<<24;
4076             *chipid = a ^ 0xa5f0f7d1;
4077             return 0;
4078         }
4079     }
4080
4081     ftdi_error_return(-1, "read of FTDIChip-ID failed");
4082 }
4083
4084 /**
4085     Write eeprom location
4086
4087     \param ftdi pointer to ftdi_context
4088     \param eeprom_addr Address of eeprom location to be written
4089     \param eeprom_val Value to be written
4090
4091     \retval  0: all fine
4092     \retval -1: write failed
4093     \retval -2: USB device unavailable
4094     \retval -3: Invalid access to checksum protected area below 0x80
4095     \retval -4: Device can't access unprotected area
4096     \retval -5: Reading chip type failed
4097 */
4098 int ftdi_write_eeprom_location(struct ftdi_context *ftdi, int eeprom_addr,
4099                                unsigned short eeprom_val)
4100 {
4101     int chip_type_location;
4102     unsigned short chip_type;
4103
4104     if (ftdi == NULL || ftdi->usb_dev == NULL)
4105         ftdi_error_return(-2, "USB device unavailable");
4106
4107     if (eeprom_addr <0x80)
4108         ftdi_error_return(-2, "Invalid access to checksum protected area  below 0x80");
4109
4110
4111     switch (ftdi->type)
4112     {
4113         case TYPE_BM:
4114         case  TYPE_2232C:
4115             chip_type_location = 0x14;
4116             break;
4117         case TYPE_2232H:
4118         case TYPE_4232H:
4119             chip_type_location = 0x18;
4120             break;
4121         case TYPE_232H:
4122             chip_type_location = 0x1e;
4123             break;
4124         default:
4125             ftdi_error_return(-4, "Device can't access unprotected area");
4126     }
4127
4128     if (ftdi_read_eeprom_location( ftdi, chip_type_location>>1, &chip_type))
4129         ftdi_error_return(-5, "Reading failed");
4130     fprintf(stderr," loc 0x%04x val 0x%04x\n", chip_type_location,chip_type);
4131     if ((chip_type & 0xff) != 0x66)
4132     {
4133         ftdi_error_return(-6, "EEPROM is not of 93x66");
4134     }
4135
4136     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
4137                                 SIO_WRITE_EEPROM_REQUEST, eeprom_val, eeprom_addr,
4138                                 NULL, 0, ftdi->usb_write_timeout) != 0)
4139         ftdi_error_return(-1, "unable to write eeprom");
4140
4141     return 0;
4142 }
4143
4144 /**
4145     Write eeprom
4146
4147     \param ftdi pointer to ftdi_context
4148
4149     \retval  0: all fine
4150     \retval -1: read failed
4151     \retval -2: USB device unavailable
4152     \retval -3: EEPROM not initialized for the connected device;
4153 */
4154 int ftdi_write_eeprom(struct ftdi_context *ftdi)
4155 {
4156     unsigned short usb_val, status;
4157     int i, ret;
4158     unsigned char *eeprom;
4159
4160     if (ftdi == NULL || ftdi->usb_dev == NULL)
4161         ftdi_error_return(-2, "USB device unavailable");
4162
4163     if(ftdi->eeprom->initialized_for_connected_device == 0)
4164         ftdi_error_return(-3, "EEPROM not initialized for the connected device");
4165
4166     eeprom = ftdi->eeprom->buf;
4167
4168     /* These commands were traced while running MProg */
4169     if ((ret = ftdi_usb_reset(ftdi)) != 0)
4170         return ret;
4171     if ((ret = ftdi_poll_modem_status(ftdi, &status)) != 0)
4172         return ret;
4173     if ((ret = ftdi_set_latency_timer(ftdi, 0x77)) != 0)
4174         return ret;
4175
4176     for (i = 0; i < ftdi->eeprom->size/2; i++)
4177     {
4178         /* Do not try to write to reserved area */
4179         if ((ftdi->type == TYPE_230X) && (i == 0x40))
4180         {
4181             i = 0x50;
4182         }
4183         usb_val = eeprom[i*2];
4184         usb_val += eeprom[(i*2)+1] << 8;
4185         if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
4186                                     SIO_WRITE_EEPROM_REQUEST, usb_val, i,
4187                                     NULL, 0, ftdi->usb_write_timeout) < 0)
4188             ftdi_error_return(-1, "unable to write eeprom");
4189     }
4190
4191     return 0;
4192 }
4193
4194 /**
4195     Erase eeprom
4196
4197     This is not supported on FT232R/FT245R according to the MProg manual from FTDI.
4198
4199     \param ftdi pointer to ftdi_context
4200
4201     \retval  0: all fine
4202     \retval -1: erase failed
4203     \retval -2: USB device unavailable
4204     \retval -3: Writing magic failed
4205     \retval -4: Read EEPROM failed
4206     \retval -5: Unexpected EEPROM value
4207 */
4208 #define MAGIC 0x55aa
4209 int ftdi_erase_eeprom(struct ftdi_context *ftdi)
4210 {
4211     unsigned short eeprom_value;
4212     if (ftdi == NULL || ftdi->usb_dev == NULL)
4213         ftdi_error_return(-2, "USB device unavailable");
4214
4215     if (ftdi->type == TYPE_R)
4216     {
4217         ftdi->eeprom->chip = 0;
4218         return 0;
4219     }
4220
4221     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_ERASE_EEPROM_REQUEST,
4222                                 0, 0, NULL, 0, ftdi->usb_write_timeout) < 0)
4223         ftdi_error_return(-1, "unable to erase eeprom");
4224
4225
4226     /* detect chip type by writing 0x55AA as magic at word position 0xc0
4227        Chip is 93x46 if magic is read at word position 0x00, as wraparound happens around 0x40
4228        Chip is 93x56 if magic is read at word position 0x40, as wraparound happens around 0x80
4229        Chip is 93x66 if magic is only read at word position 0xc0*/
4230     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE,
4231                                 SIO_WRITE_EEPROM_REQUEST, MAGIC, 0xc0,
4232                                 NULL, 0, ftdi->usb_write_timeout) != 0)
4233         ftdi_error_return(-3, "Writing magic failed");
4234     if (ftdi_read_eeprom_location( ftdi, 0x00, &eeprom_value))
4235         ftdi_error_return(-4, "Reading failed");
4236     if (eeprom_value == MAGIC)
4237     {
4238         ftdi->eeprom->chip = 0x46;
4239     }
4240     else
4241     {
4242         if (ftdi_read_eeprom_location( ftdi, 0x40, &eeprom_value))
4243             ftdi_error_return(-4, "Reading failed");
4244         if (eeprom_value == MAGIC)
4245             ftdi->eeprom->chip = 0x56;
4246         else
4247         {
4248             if (ftdi_read_eeprom_location( ftdi, 0xc0, &eeprom_value))
4249                 ftdi_error_return(-4, "Reading failed");
4250             if (eeprom_value == MAGIC)
4251                 ftdi->eeprom->chip = 0x66;
4252             else
4253             {
4254                 ftdi->eeprom->chip = -1;
4255             }
4256         }
4257     }
4258     if (libusb_control_transfer(ftdi->usb_dev, FTDI_DEVICE_OUT_REQTYPE, SIO_ERASE_EEPROM_REQUEST,
4259                                 0, 0, NULL, 0, ftdi->usb_write_timeout) < 0)
4260         ftdi_error_return(-1, "unable to erase eeprom");
4261     return 0;
4262 }
4263
4264 /**
4265     Get string representation for last error code
4266
4267     \param ftdi pointer to ftdi_context
4268
4269     \retval Pointer to error string
4270 */
4271 char *ftdi_get_error_string (struct ftdi_context *ftdi)
4272 {
4273     if (ftdi == NULL)
4274         return "";
4275
4276     return ftdi->error_str;
4277 }
4278
4279 /* @} end of doxygen libftdi group */