176 lines
4.1 KiB
C
176 lines
4.1 KiB
C
/*
|
|
* Copyright (C) 2012 CERN (www.cern.ch)
|
|
* Author: Alessandro Rubini <rubini@gnudd.com>
|
|
*
|
|
* Released according to the GNU GPL, version 2 or any later version.
|
|
*
|
|
* This work is part of the White Rabbit project, a research effort led
|
|
* by CERN, the European Institute for Nuclear Research.
|
|
*/
|
|
#include <linux/module.h>
|
|
#include <linux/string.h>
|
|
#include <linux/firmware.h>
|
|
#include <linux/init.h>
|
|
#include <linux/fmc.h>
|
|
#include <asm/unaligned.h>
|
|
|
|
/*
|
|
* This module uses the firmware loader to program the whole or part
|
|
* of the FMC eeprom. The meat is in the _run functions. However, no
|
|
* default file name is provided, to avoid accidental mishaps. Also,
|
|
* you must pass the busid argument
|
|
*/
|
|
static struct fmc_driver fwe_drv;
|
|
|
|
FMC_PARAM_BUSID(fwe_drv);
|
|
|
|
/* The "file=" is like the generic "gateware=" used elsewhere */
|
|
static char *fwe_file[FMC_MAX_CARDS];
|
|
static int fwe_file_n;
|
|
module_param_array_named(file, fwe_file, charp, &fwe_file_n, 0444);
|
|
|
|
static int fwe_run_tlv(struct fmc_device *fmc, const struct firmware *fw,
|
|
int write)
|
|
{
|
|
const uint8_t *p = fw->data;
|
|
int len = fw->size;
|
|
uint16_t thislen, thisaddr;
|
|
int err;
|
|
|
|
/* format is: 'w' addr16 len16 data... */
|
|
while (len > 5) {
|
|
thisaddr = get_unaligned_le16(p+1);
|
|
thislen = get_unaligned_le16(p+3);
|
|
if (p[0] != 'w' || thislen + 5 > len) {
|
|
dev_err(&fmc->dev, "invalid tlv at offset %ti\n",
|
|
p - fw->data);
|
|
return -EINVAL;
|
|
}
|
|
err = 0;
|
|
if (write) {
|
|
dev_info(&fmc->dev, "write %i bytes at 0x%04x\n",
|
|
thislen, thisaddr);
|
|
err = fmc->op->write_ee(fmc, thisaddr, p + 5, thislen);
|
|
}
|
|
if (err < 0) {
|
|
dev_err(&fmc->dev, "write failure @0x%04x\n",
|
|
thisaddr);
|
|
return err;
|
|
}
|
|
p += 5 + thislen;
|
|
len -= 5 + thislen;
|
|
}
|
|
if (write)
|
|
dev_info(&fmc->dev, "write_eeprom: success\n");
|
|
return 0;
|
|
}
|
|
|
|
static int fwe_run_bin(struct fmc_device *fmc, const struct firmware *fw)
|
|
{
|
|
int ret;
|
|
|
|
dev_info(&fmc->dev, "programming %zi bytes\n", fw->size);
|
|
ret = fmc->op->write_ee(fmc, 0, (void *)fw->data, fw->size);
|
|
if (ret < 0) {
|
|
dev_info(&fmc->dev, "write_eeprom: error %i\n", ret);
|
|
return ret;
|
|
}
|
|
dev_info(&fmc->dev, "write_eeprom: success\n");
|
|
return 0;
|
|
}
|
|
|
|
static int fwe_run(struct fmc_device *fmc, const struct firmware *fw, char *s)
|
|
{
|
|
char *last4 = s + strlen(s) - 4;
|
|
int err;
|
|
|
|
if (!strcmp(last4, ".bin"))
|
|
return fwe_run_bin(fmc, fw);
|
|
if (!strcmp(last4, ".tlv")) {
|
|
err = fwe_run_tlv(fmc, fw, 0);
|
|
if (!err)
|
|
err = fwe_run_tlv(fmc, fw, 1);
|
|
return err;
|
|
}
|
|
dev_err(&fmc->dev, "invalid file name \"%s\"\n", s);
|
|
return -EINVAL;
|
|
}
|
|
|
|
/*
|
|
* Programming is done at probe time. Morever, only those listed with
|
|
* busid= are programmed.
|
|
* card is probed for, only one is programmed. Unfortunately, it's
|
|
* difficult to know in advance when probing the first card if others
|
|
* are there.
|
|
*/
|
|
static int fwe_probe(struct fmc_device *fmc)
|
|
{
|
|
int err, index = 0;
|
|
const struct firmware *fw;
|
|
struct device *dev = &fmc->dev;
|
|
char *s;
|
|
|
|
if (!fwe_drv.busid_n) {
|
|
dev_err(dev, "%s: no busid passed, refusing all cards\n",
|
|
KBUILD_MODNAME);
|
|
return -ENODEV;
|
|
}
|
|
if (fmc->op->validate)
|
|
index = fmc->op->validate(fmc, &fwe_drv);
|
|
if (index < 0) {
|
|
pr_err("%s: refusing device \"%s\"\n", KBUILD_MODNAME,
|
|
dev_name(dev));
|
|
return -ENODEV;
|
|
}
|
|
if (index >= fwe_file_n) {
|
|
pr_err("%s: no filename for device index %i\n",
|
|
KBUILD_MODNAME, index);
|
|
return -ENODEV;
|
|
}
|
|
s = fwe_file[index];
|
|
if (!s) {
|
|
pr_err("%s: no filename for \"%s\" not programming\n",
|
|
KBUILD_MODNAME, dev_name(dev));
|
|
return -ENOENT;
|
|
}
|
|
err = request_firmware(&fw, s, dev);
|
|
if (err < 0) {
|
|
dev_err(&fmc->dev, "request firmware \"%s\": error %i\n",
|
|
s, err);
|
|
return err;
|
|
}
|
|
fwe_run(fmc, fw, s);
|
|
release_firmware(fw);
|
|
return 0;
|
|
}
|
|
|
|
static int fwe_remove(struct fmc_device *fmc)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
static struct fmc_driver fwe_drv = {
|
|
.version = FMC_VERSION,
|
|
.driver.name = KBUILD_MODNAME,
|
|
.probe = fwe_probe,
|
|
.remove = fwe_remove,
|
|
/* no table, as the current match just matches everything */
|
|
};
|
|
|
|
static int fwe_init(void)
|
|
{
|
|
int ret;
|
|
|
|
ret = fmc_driver_register(&fwe_drv);
|
|
return ret;
|
|
}
|
|
|
|
static void fwe_exit(void)
|
|
{
|
|
fmc_driver_unregister(&fwe_drv);
|
|
}
|
|
|
|
module_init(fwe_init);
|
|
module_exit(fwe_exit);
|
|
|
|
MODULE_LICENSE("GPL");
|