fx2eeprom.c

/*

    Read and Write the eeprom of an fx2 chip with the vend_ax.hex firmware


    1) Mount the usbfs
    mount -t usbfs usbfs /proc/bus/usb

    2) Download the fw
    fxload -I vend_ax.hex  -D /proc/bus/usb/002/011  -v -t fx2

    3) Run fx2eeprom
    3a)Read example
    ./fx2eeprom r 0x123 0x234 45 > eeprom.raw
    3b)Write example
    cat eeprom.raw | ./fxeeprom w 0x123 0x234 45 > eeprom.raw

    Copyright Ricardo Ribalda - 2012 - ricardo.ribalda@gmail.com

    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; either version 2 of the License, or
    (at your option) any later version.

    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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/


#include <libusb-1.0/libusb.h>
#include <stdio.h>
#include <stdlib.h>

#define TRANS_TYPE_READ 0xc0
#define TRANS_TYPE_WRITE 0x40
#define EEPROM 0xa2
#define TIMEOUT 1000
#define LOCATION (1<<4)

enum {READ,WRITE};

void use(char *prog){

	fprintf(stdout,"%s w/r VID PID size\n",prog);

	return;
}

int main(int argc, char *argv[]){
	struct libusb_device_handle *dev;
	int ret;
	unsigned char *buffer;
	int pid, vid,length;
	int address =0;
	int mode;

	if (argc!=5){
		use(argv[0]);
		return -1;
	}

	if ((argv[1][0]=='W')||(argv[1][0]=='w'))
		mode=WRITE;
	else mode=READ;

	vid=strtoul(argv[2],NULL,0);
	pid=strtoul(argv[3],NULL,0);
	length=strtoul(argv[4],NULL,0);

	buffer=malloc(length);
	if (!buffer){
		fprintf(stderr,"Unable to alloc memory\n");
		perror("malloc");
		return -1;
	}


	ret=libusb_init(NULL);
	if (ret<0){
		fprintf(stderr,"Unable to init libusb\n");
		perror("libusb_init");
		return -1;
	}

	dev=libusb_open_device_with_vid_pid(NULL,vid,pid);
	if (!dev){
		fprintf(stderr,"Unable to find device\n");
		perror("libusb_open");
		return -1;
	}

	if (libusb_kernel_driver_active(dev, 0) && libusb_detach_kernel_driver(dev, 0)){
			fprintf(stderr,"Unable to detach kernel driver\n");
			perror("libusb_detach_kernel_driver");
			return -1;
	}

	ret=libusb_claim_interface(dev,0);
	if (ret<0){
		fprintf(stderr,"Unable to clain interface\n");
		perror("libusb_claim_interface");
		return -1;
	}

	if (mode==READ){
		ret = libusb_control_transfer(dev,TRANS_TYPE_READ,EEPROM,address,LOCATION,buffer,length,TIMEOUT);
		if (ret<0){
			fprintf(stderr,"Unable to control transfer\n");
			perror("libusb_control_transfer");
			return -1;
		}

		fprintf(stderr,"Readed %d bytes\n",ret);

		length=fwrite(buffer,ret,1,stdout);
	}
	else {
		ret=fread(buffer,1,length,stdin);
		if (length!=ret){
			fprintf(stderr,"Wrong size from stdin, expected %d readed %d\n",length,ret);
			perror("fread");
			return -1;
		}

		ret = libusb_control_transfer(dev,TRANS_TYPE_WRITE,EEPROM,address,LOCATION,buffer,length,TIMEOUT);
		if (ret<0){
			fprintf(stderr,"Unable to control transfer\n");
			perror("libusb_control_transfer");
			return -1;
		}
		fprintf(stderr,"Written %d bytes\n",ret);
	}

	libusb_close(dev);
	libusb_exit(NULL);

	return 0;
}