|  | /* | 
|  | * 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/init.h> | 
|  | #include <linux/list.h> | 
|  | #include <linux/slab.h> | 
|  | #include <linux/fs.h> | 
|  | #include <linux/miscdevice.h> | 
|  | #include <linux/spinlock.h> | 
|  | #include <linux/fmc.h> | 
|  | #include <linux/uaccess.h> | 
|  |  | 
|  | static LIST_HEAD(fc_devices); | 
|  | static DEFINE_SPINLOCK(fc_lock); | 
|  |  | 
|  | struct fc_instance { | 
|  | struct list_head list; | 
|  | struct fmc_device *fmc; | 
|  | struct miscdevice misc; | 
|  | }; | 
|  |  | 
|  | /* at open time, we must identify our device */ | 
|  | static int fc_open(struct inode *ino, struct file *f) | 
|  | { | 
|  | struct fmc_device *fmc; | 
|  | struct fc_instance *fc; | 
|  | int minor = iminor(ino); | 
|  |  | 
|  | list_for_each_entry(fc, &fc_devices, list) | 
|  | if (fc->misc.minor == minor) | 
|  | break; | 
|  | if (fc->misc.minor != minor) | 
|  | return -ENODEV; | 
|  | fmc = fc->fmc; | 
|  | if (try_module_get(fmc->owner) == 0) | 
|  | return -ENODEV; | 
|  |  | 
|  | f->private_data = fmc; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int fc_release(struct inode *ino, struct file *f) | 
|  | { | 
|  | struct fmc_device *fmc = f->private_data; | 
|  | module_put(fmc->owner); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /* read and write are simple after the default llseek has been used */ | 
|  | static ssize_t fc_read(struct file *f, char __user *buf, size_t count, | 
|  | loff_t *offp) | 
|  | { | 
|  | struct fmc_device *fmc = f->private_data; | 
|  | unsigned long addr; | 
|  | uint32_t val; | 
|  |  | 
|  | if (count < sizeof(val)) | 
|  | return -EINVAL; | 
|  | count = sizeof(val); | 
|  |  | 
|  | addr = *offp; | 
|  | if (addr > fmc->memlen) | 
|  | return -ESPIPE; /* Illegal seek */ | 
|  | val = fmc_readl(fmc, addr); | 
|  | if (copy_to_user(buf, &val, count)) | 
|  | return -EFAULT; | 
|  | *offp += count; | 
|  | return count; | 
|  | } | 
|  |  | 
|  | static ssize_t fc_write(struct file *f, const char __user *buf, size_t count, | 
|  | loff_t *offp) | 
|  | { | 
|  | struct fmc_device *fmc = f->private_data; | 
|  | unsigned long addr; | 
|  | uint32_t val; | 
|  |  | 
|  | if (count < sizeof(val)) | 
|  | return -EINVAL; | 
|  | count = sizeof(val); | 
|  |  | 
|  | addr = *offp; | 
|  | if (addr > fmc->memlen) | 
|  | return -ESPIPE; /* Illegal seek */ | 
|  | if (copy_from_user(&val, buf, count)) | 
|  | return -EFAULT; | 
|  | fmc_writel(fmc, val, addr); | 
|  | *offp += count; | 
|  | return count; | 
|  | } | 
|  |  | 
|  | static const struct file_operations fc_fops = { | 
|  | .owner = THIS_MODULE, | 
|  | .open = fc_open, | 
|  | .release = fc_release, | 
|  | .llseek = generic_file_llseek, | 
|  | .read = fc_read, | 
|  | .write = fc_write, | 
|  | }; | 
|  |  | 
|  |  | 
|  | /* Device part .. */ | 
|  | static int fc_probe(struct fmc_device *fmc); | 
|  | static int fc_remove(struct fmc_device *fmc); | 
|  |  | 
|  | static struct fmc_driver fc_drv = { | 
|  | .version = FMC_VERSION, | 
|  | .driver.name = KBUILD_MODNAME, | 
|  | .probe = fc_probe, | 
|  | .remove = fc_remove, | 
|  | /* no table: we want to match everything */ | 
|  | }; | 
|  |  | 
|  | /* We accept the generic busid parameter */ | 
|  | FMC_PARAM_BUSID(fc_drv); | 
|  |  | 
|  | /* probe and remove must allocate and release a misc device */ | 
|  | static int fc_probe(struct fmc_device *fmc) | 
|  | { | 
|  | int ret; | 
|  | int index = 0; | 
|  |  | 
|  | struct fc_instance *fc; | 
|  |  | 
|  | if (fmc->op->validate) | 
|  | index = fmc->op->validate(fmc, &fc_drv); | 
|  | if (index < 0) | 
|  | return -EINVAL; /* not our device: invalid */ | 
|  |  | 
|  | /* Create a char device: we want to create it anew */ | 
|  | fc = kzalloc(sizeof(*fc), GFP_KERNEL); | 
|  | if (!fc) | 
|  | return -ENOMEM; | 
|  | fc->fmc = fmc; | 
|  | fc->misc.minor = MISC_DYNAMIC_MINOR; | 
|  | fc->misc.fops = &fc_fops; | 
|  | fc->misc.name = kstrdup(dev_name(&fmc->dev), GFP_KERNEL); | 
|  |  | 
|  | ret = misc_register(&fc->misc); | 
|  | if (ret < 0) | 
|  | goto out; | 
|  | spin_lock(&fc_lock); | 
|  | list_add(&fc->list, &fc_devices); | 
|  | spin_unlock(&fc_lock); | 
|  | dev_info(&fc->fmc->dev, "Created misc device \"%s\"\n", | 
|  | fc->misc.name); | 
|  | return 0; | 
|  |  | 
|  | out: | 
|  | kfree(fc->misc.name); | 
|  | kfree(fc); | 
|  | return ret; | 
|  | } | 
|  |  | 
|  | static int fc_remove(struct fmc_device *fmc) | 
|  | { | 
|  | struct fc_instance *fc; | 
|  |  | 
|  | list_for_each_entry(fc, &fc_devices, list) | 
|  | if (fc->fmc == fmc) | 
|  | break; | 
|  | if (fc->fmc != fmc) { | 
|  | dev_err(&fmc->dev, "remove called but not found\n"); | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | spin_lock(&fc_lock); | 
|  | list_del(&fc->list); | 
|  | spin_unlock(&fc_lock); | 
|  | misc_deregister(&fc->misc); | 
|  | kfree(fc->misc.name); | 
|  | kfree(fc); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  |  | 
|  | static int fc_init(void) | 
|  | { | 
|  | int ret; | 
|  |  | 
|  | ret = fmc_driver_register(&fc_drv); | 
|  | return ret; | 
|  | } | 
|  |  | 
|  | static void fc_exit(void) | 
|  | { | 
|  | fmc_driver_unregister(&fc_drv); | 
|  | } | 
|  |  | 
|  | module_init(fc_init); | 
|  | module_exit(fc_exit); | 
|  |  | 
|  | MODULE_LICENSE("GPL"); |