blob: c6d2a30f295cd533942417ccc805093a7cb232ba [file] [log] [blame]
/*
* This file is part of the flashrom project.
*
* Copyright (C) 2010 Carl-Daniel Hailfinger
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; version 2 of the License.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
#include <sys/types.h>
#include <usb.h>
#include "flash.h"
#include "spi.h"
#define DEFAULT_TIMEOUT 3000
usb_dev_handle *dediprog_handle;
int dediprog_do_stuff(void);
void print_hex(void *buf, size_t len)
{
size_t i;
for (i = 0; i < len; i++)
msg_pdbg(" %02x", ((uint8_t *)buf)[i]);
}
struct usb_device *get_device_by_vid_pid(uint16_t vid, uint16_t pid)
{
struct usb_bus *bus;
struct usb_device *dev;
for (bus = usb_get_busses(); bus; bus = bus->next)
for (dev = bus->devices; dev; dev = dev->next)
if ((dev->descriptor.idVendor == vid) &&
(dev->descriptor.idProduct == pid))
return dev;
return NULL;
}
//int usb_control_msg(usb_dev_handle *dev, int requesttype, int request, int value, int index, char *bytes, int size, int timeout);
int dediprog_set_spi_voltage(uint16_t voltage)
{
int ret;
unsigned int mv;
switch (voltage) {
case 0x0:
/* Admittedly this one is an assumption. */
mv = 0;
break;
case 0x12:
mv = 1800;
break;
case 0x11:
mv = 2500;
break;
case 0x10:
mv = 3500;
break;
default:
msg_perr("Unknown voltage selector 0x%x! Aborting.\n", voltage);
return 1;
}
msg_pdbg("Setting SPI voltage to %u.%03u V\n", mv / 1000, mv % 1000);
ret = usb_control_msg(dediprog_handle, 0x42, 0x9, voltage, 0xff, NULL, 0x0, DEFAULT_TIMEOUT);
if (ret != 0x0) {
msg_perr("Command Set SPI Voltage 0x%x failed!\n", voltage);
return 1;
}
return 0;
}
/* After dediprog_set_spi_speed, the original app always calls
* dediprog_set_spi_voltage(0) and then
* dediprog_check_devicestring() four times in a row.
* After that, dediprog_command_a() is called.
* This looks suspiciously like the microprocessor in the SF100 has to be
* restarted/reinitialized in case the speed changes.
*/
int dediprog_set_spi_speed(uint16_t speed)
{
int ret;
unsigned int khz;
/* Case 1 and 2 are in weird order. Probably an organically "grown"
* interface.
* Base frequency is 24000 kHz, divisors are (in order)
* 1, 3, 2, 8, 11, 16, 32, 64.
*/
switch (speed) {
case 0x0:
khz = 24000;
break;
case 0x1:
khz = 8000;
break;
case 0x2:
khz = 12000;
break;
case 0x3:
khz = 3000;
break;
case 0x4:
khz = 2180;
break;
case 0x5:
khz = 1500;
break;
case 0x6:
khz = 750;
break;
case 0x7:
khz = 375;
break;
default:
msg_perr("Unknown frequency selector 0x%x! Aborting.\n", speed);
return 1;
}
msg_pdbg("Setting SPI speed to %u kHz\n", khz);
ret = usb_control_msg(dediprog_handle, 0x42, 0x61, speed, 0xff, NULL, 0x0, DEFAULT_TIMEOUT);
if (ret != 0x0) {
msg_perr("Command Set SPI Speed 0x%x failed!\n", speed);
return 1;
}
return 0;
}
int dediprog_spi_read(struct flashchip *flash, uint8_t *buf, int start, int len)
{
msg_pspew("%s, start=0x%x, len=0x%x\n", __func__, start, len);
/* Chosen read length is 16 bytes for now. */
return spi_read_chunked(flash, buf, start, len, 16);
}
int dediprog_spi_send_command(unsigned int writecnt, unsigned int readcnt,
const unsigned char *writearr, unsigned char *readarr)
{
int ret;
msg_pspew("%s, writecnt=%i, readcnt=%i\n", __func__, writecnt, readcnt);
/* Paranoid, but I don't want to be blamed if anything explodes. */
if (writecnt > 5) {
msg_perr("Untested writecnt=%i, aborting.\n", writecnt);
return 1;
}
/* 16 byte reads should work. */
if (readcnt > 16) {
msg_perr("Untested readcnt=%i, aborting.\n", readcnt);
return 1;
}
ret = usb_control_msg(dediprog_handle, 0x42, 0x1, 0xff, readcnt ? 0x1 : 0x0, (char *)writearr, writecnt, DEFAULT_TIMEOUT);
if (ret != writecnt) {
msg_perr("Send SPI failed, expected %i, got %i %s!\n",
writecnt, ret, usb_strerror());
return 1;
}
if (!readcnt)
return 0;
memset(readarr, 0, readcnt);
ret = usb_control_msg(dediprog_handle, 0xc2, 0x01, 0xbb8, 0x0000, (char *)readarr, readcnt, DEFAULT_TIMEOUT);
if (ret != readcnt) {
msg_perr("Receive SPI failed, expected %i, got %i %s!\n",
readcnt, ret, usb_strerror());
return 1;
}
return 0;
}
int dediprog_check_devicestring(void)
{
int ret;
char buf[0x11];
/* Command Prepare Receive Device String. */
memset(buf, 0, sizeof(buf));
ret = usb_control_msg(dediprog_handle, 0xc3, 0x7, 0x0, 0xef03, buf, 0x1, DEFAULT_TIMEOUT);
/* The char casting is needed to stop gcc complaining about an always true comparison. */
if ((ret != 0x1) || (buf[0] != (char)0xff)) {
msg_perr("Unexpected response to Command Prepare Receive Device"
" String!\n");
return 1;
}
/* Command Receive Device String. */
memset(buf, 0, sizeof(buf));
ret = usb_control_msg(dediprog_handle, 0xc2, 0x8, 0xff, 0xff, buf, 0x10, DEFAULT_TIMEOUT);
if (ret != 0x10) {
msg_perr("Incomplete/failed Command Receive Device String!\n");
return 1;
}
buf[0x10] = '\0';
msg_pdbg("Found a %s\n", buf);
if (memcmp(buf, "SF100", 0x5)) {
msg_perr("Device not a SF100!\n");
return 1;
}
/* Only these versions were tested. */
if (memcmp(buf, "SF100 V:2.1.1 ", 0x10) &&
memcmp(buf, "SF100 V:3.1.8 ", 0x10)) {
msg_perr("Unexpected firmware version!\n");
return 1;
}
return 0;
}
/* Command A seems to be some sort of device init. It is either followed by
* dediprog_check_devicestring (often) or Command A (often) or
* Command F (once).
*/
int dediprog_command_a(void)
{
int ret;
char buf[0x1];
memset(buf, 0, sizeof(buf));
ret = usb_control_msg(dediprog_handle, 0xc3, 0xb, 0x0, 0x0, buf, 0x1, DEFAULT_TIMEOUT);
if ((ret != 0x1) || (buf[0] != 0x6f)) {
msg_perr("Unexpected response to Command A!\n");
return 1;
}
return 0;
}
/* Command C is only sent after dediprog_check_devicestring, but not after every
* invocation of dediprog_check_devicestring. It is only sent after the first
* dediprog_command_a(); dediprog_check_devicestring() sequence in each session.
* I'm tempted to call this one start_SPI_engine or finish_init.
*/
int dediprog_command_c(void)
{
int ret;
ret = usb_control_msg(dediprog_handle, 0x42, 0x4, 0x0, 0x0, NULL, 0x0, DEFAULT_TIMEOUT);
if (ret != 0x0) {
msg_perr("Unexpected response to Command C!\n");
return 1;
}
return 0;
}
/* Very strange. Seems to be a programmer keepalive or somesuch.
* Wait unsuccessfully for timeout ms to read one byte.
* Is usually called after setting voltage to 0.
*/
int dediprog_command_f(int timeout)
{
int ret;
char buf[0x1];
memset(buf, 0, sizeof(buf));
ret = usb_control_msg(dediprog_handle, 0xc2, 0x11, 0xff, 0xff, buf, 0x1, timeout);
if (ret != 0x0) {
msg_perr("Unexpected response to Command F!\n");
return 1;
}
return 0;
}
/* URB numbers refer to the first log ever captured. */
int dediprog_init(void)
{
struct usb_device *dev;
msg_pspew("%s\n", __func__);
/* Here comes the USB stuff. */
usb_init();
usb_find_busses();
usb_find_devices();
dev = get_device_by_vid_pid(0x0483, 0xdada);
if (!dev) {
msg_perr("Could not find a Dediprog SF100 on USB!\n");
return 1;
}
msg_pdbg("Found USB device (%04x:%04x).\n",
dev->descriptor.idVendor,
dev->descriptor.idProduct);
dediprog_handle = usb_open(dev);
usb_set_configuration(dediprog_handle, 1);
usb_claim_interface(dediprog_handle, 0);
/* URB 6. Command A. */
if (dediprog_command_a())
return 1;
/* URB 7. Command A. */
if (dediprog_command_a())
return 1;
/* URB 8. Command Prepare Receive Device String. */
/* URB 9. Command Receive Device String. */
if (dediprog_check_devicestring())
return 1;
/* URB 10. Command C. */
if (dediprog_command_c())
return 1;
/* URB 11. Command Set SPI Voltage. */
if (dediprog_set_spi_voltage(0x10))
return 1;
buses_supported = CHIP_BUSTYPE_SPI;
spi_controller = SPI_CONTROLLER_DEDIPROG;
/* RE leftover, leave in until the driver is complete. */
#if 0
/* Execute RDID by hand if you want to test it. */
dediprog_do_stuff();
#endif
return 0;
}
/* Leftovers from reverse engineering. Keep for documentation purposes until
* completely understood.
*/
int dediprog_do_stuff(void)
{
char buf[0x4];
/* SPI command processing starts here. */
/* URB 12. Command Send SPI. */
/* URB 13. Command Receive SPI. */
memset(buf, 0, sizeof(buf));
/* JEDEC RDID */
msg_pdbg("Sending RDID\n");
buf[0] = JEDEC_RDID;
if (dediprog_spi_send_command(JEDEC_RDID_OUTSIZE, JEDEC_RDID_INSIZE, (unsigned char *)buf, (unsigned char *)buf))
return 1;
msg_pdbg("Receiving response: ");
print_hex(buf, JEDEC_RDID_INSIZE);
#if 0
/* URB 14-27 are more SPI commands. */
/* URB 28. Command Set SPI Voltage. */
if (dediprog_set_spi_voltage(0x0))
return 1;
/* URB 29-38. Command F, unsuccessful wait. */
if (dediprog_command_f(544))
return 1;
/* URB 39. Command Set SPI Voltage. */
if (dediprog_set_spi_voltage(0x10))
return 1;
/* URB 40. Command Set SPI Speed. */
if (dediprog_set_spi_speed(0x2))
return 1;
/* URB 41 is just URB 28. */
/* URB 42,44,46,48,51,53 is just URB 8. */
/* URB 43,45,47,49,52,54 is just URB 9. */
/* URB 50 is just URB 6/7. */
/* URB 55-131 is just URB 29-38. (wait unsuccessfully for 4695 (maybe 4751) ms)*/
/* URB 132,134 is just URB 6/7. */
/* URB 133 is just URB 29-38. */
/* URB 135 is just URB 8. */
/* URB 136 is just URB 9. */
/* URB 137 is just URB 11. */
/* Command I is probably Start Bulk Read. Data is u16 blockcount, u16 blocksize. */
/* Command J is probably Start Bulk Write. Data is u16 blockcount, u16 blocksize. */
/* Bulk transfer sizes for Command I/J are always 512 bytes, rest is filled with 0xff. */
#endif
msg_pinfo("All probes will fail because this driver is not hooked up "
"to the SPI infrastructure yet.");
return 0;
}
int dediprog_shutdown(void)
{
msg_pspew("%s\n", __func__);
/* URB 28. Command Set SPI Voltage to 0. */
if (dediprog_set_spi_voltage(0x0))
return 1;
if (usb_close(dediprog_handle)) {
msg_perr("Couldn't close USB device!\n");
return 1;
}
return 0;
}