developer.intra2net.com Git - libftdi/blob - src/ftdi.c

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