int load_pic(struct astribank *ab, int numfiles, char *filelist[])
{
int i;
const char *devstr;
devstr = xusb_devpath(xusb_dev_of_astribank(ab));
DBG("%s: Loading %d PIC files...\n", devstr, numfiles);
for(i = 0; i < numfiles; i++) {
struct hexdata *picdata;
const char *curr = filelist[i];
DBG("%s\n", curr);
if((picdata = parse_hexfile(curr, MAX_HEX_LINES)) == NULL) {
perror(curr);
return -errno;
}
if(!pic_burn(ab, picdata)) {
ERR("%s: PIC %s burning failed\n", devstr, curr);
return -ENODEV;
}
free_hexdata(picdata);
}
if((i = send_picline(ab, 0, PIC_ENDS_FLAG, 0, NULL, 0)) != 0) {
ERR("%s: PIC end burning failed\n", devstr);
return -ENODEV;
}
return 0;
}
/*
* Returns: true on success, false on failure
*/
static int pic_burn(struct astribank *ab, const struct hexdata *hexdata)
{
const char *v = hexdata->version_info;
const char *basename;
uint8_t *data;
unsigned char check_sum = 0;
uint8_t card_type;
int ret;
unsigned int i;
const char *devstr;
const struct xusb_device *xusb;
v = (v[0]) ? v : "Unknown";
assert(ab != NULL);
assert(hexdata != NULL);
xusb = xusb_dev_of_astribank(ab);
devstr = xusb_devpath(xusb);
i = xusb_packet_size(xusb);
if(i != 512) {
ERR("%s: Skip PIC burning (not USB2)\n", devstr);
return 0;
}
INFO("%s [%s]: Loading PIC Firmware: %s (version %s)\n",
devstr,
xusb_serial(xusb),
hexdata->fname,
hexdata->version_info);
basename = pic_basename(hexdata->fname, &card_type);
if(!basename) {
ERR("%s: Bad PIC filename '%s'. Abort.\n", devstr, hexdata->fname);
return 0;
}
DBG("basename=%s card_type=%d maxlines=%d\n",
basename, card_type, hexdata->maxlines);
/*
* Try to read extra left-overs from USB controller
*/
for(i = 2; i; i--) {
char buf[PACKET_SIZE];
if (astribank_recv(ab, 0, buf, sizeof(buf), TIMEOUT) <= 0)
break;
}
if((ret = send_picline(ab, card_type, PIC_START_FLAG, 0, NULL, 0)) != 0) {
perror("Failed sending start hexline");
return 0;
}
for(i = 0; i < hexdata->maxlines; i++) {
struct hexline *hexline;
unsigned int len;
hexline = hexdata->lines[i];
if(!hexline) {
ERR("%s: hexdata finished early (line %d)", devstr, i);
return 0;
}
if(hexline->d.content.header.tt == TT_DATA) {
len = hexline->d.content.header.ll; /* don't send checksum */
if(len != 3) {
ERR("%s: Bad line len %d\n", devstr, len);
return 0;
}
data = hexline->d.content.tt_data.data;
check_sum ^= data[0] ^ data[1] ^ data[2];
ret = send_picline(ab, card_type, PIC_DATA_FLAG,
hexline->d.content.header.offset, data, len);
if(ret) {
perror("Failed sending data hexline");
return 0;
}
} else if(hexline->d.content.header.tt == TT_EOF) {
break;
} else {
ERR("%s: Unexpected TT = %d in line %d\n",
devstr, hexline->d.content.header.tt, i);
return 0;
}
}
if((ret = send_picline(ab, card_type, PIC_END_FLAG, 0, &check_sum, 1)) != 0) {
perror("Failed sending end hexline");
return 0;
}
DBG("Finished...\n");
return 1;
}
/*
* Returns: true on success, false on failure
*/
static int pic_burn(struct astribank_device *astribank, const struct hexdata *hexdata)
{
const char *v = hexdata->version_info;
const char *basename;
uint8_t *data;
unsigned char check_sum = 0;
uint8_t card_type;
int ret;
unsigned int i;
v = (v[0]) ? v : "Unknown";
assert(astribank != NULL);
assert(hexdata != NULL);
if(!astribank->is_usb2) {
ERR("Skip PIC burning (not USB2)\n");
return 0;
}
INFO("Load PIC: %s (version %s)\n", hexdata->fname, hexdata->version_info);
basename = pic_basename(hexdata->fname, &card_type);
if(!basename) {
ERR("Bad PIC filename '%s'. Abort.\n", hexdata->fname);
return 0;
}
DBG("basename=%s card_type=%d maxlines=%d\n",
basename, card_type, hexdata->maxlines);
/*
* Try to read extra left-overs from USB controller
*/
for(i = 2; i; i--) {
char buf[PACKET_SIZE];
if(usb_bulk_read(astribank->handle, astribank->my_ep_in, buf, sizeof(buf), 1) <= 0)
break;
}
if((ret = send_picline(astribank, card_type, PIC_START_FLAG, 0, NULL, 0)) != 0) {
perror("Failed sending start hexline");
return 0;
}
for(i = 0; i < hexdata->maxlines; i++) {
struct hexline *hexline;
unsigned int len;
hexline = hexdata->lines[i];
if(!hexline) {
ERR("hexdata finished early (line %d)", i);
return 0;
}
if(hexline->d.content.header.tt == TT_DATA) {
len = hexline->d.content.header.ll; /* don't send checksum */
if(len != 3) {
ERR("Bad line len %d\n", len);
return 0;
}
data = hexline->d.content.tt_data.data;
check_sum ^= data[0] ^ data[1] ^ data[2];
ret = send_picline(astribank, card_type, PIC_DATA_FLAG,
hexline->d.content.header.offset, data, len);
if(ret) {
perror("Failed sending data hexline");
return 0;
}
} else if(hexline->d.content.header.tt == TT_EOF) {
break;
} else {
ERR("Unexpected TT = %d in line %d\n",
hexline->d.content.header.tt, i);
return 0;
}
}
if((ret = send_picline(astribank, card_type, PIC_END_FLAG, 0, &check_sum, 1)) != 0) {
perror("Failed sending end hexline");
return 0;
}
DBG("Finished...\n");
return 1;
}
