Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / char / tb0219.c
diff --git a/kernel/drivers/char/tb0219.c b/kernel/drivers/char/tb0219.c
new file mode 100644 (file)
index 0000000..480a777
--- /dev/null
@@ -0,0 +1,371 @@
+/*
+ *  Driver for TANBAC TB0219 base board.
+ *
+ *  Copyright (C) 2005  Yoichi Yuasa <yuasa@linux-mips.org>
+ *
+ *  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 <linux/platform_device.h>
+#include <linux/fs.h>
+#include <linux/init.h>
+#include <linux/module.h>
+
+#include <asm/io.h>
+#include <asm/reboot.h>
+#include <asm/vr41xx/giu.h>
+#include <asm/vr41xx/tb0219.h>
+
+MODULE_AUTHOR("Yoichi Yuasa <yuasa@linux-mips.org>");
+MODULE_DESCRIPTION("TANBAC TB0219 base board driver");
+MODULE_LICENSE("GPL");
+
+static int major;      /* default is dynamic major device number */
+module_param(major, int, 0);
+MODULE_PARM_DESC(major, "Major device number");
+
+static void (*old_machine_restart)(char *command);
+static void __iomem *tb0219_base;
+static DEFINE_SPINLOCK(tb0219_lock);
+
+#define tb0219_read(offset)            readw(tb0219_base + (offset))
+#define tb0219_write(offset, value)    writew((value), tb0219_base + (offset))
+
+#define TB0219_START   0x0a000000UL
+#define TB0219_SIZE    0x20UL
+
+#define TB0219_LED                     0x00
+#define TB0219_GPIO_INPUT              0x02
+#define TB0219_GPIO_OUTPUT             0x04
+#define TB0219_DIP_SWITCH              0x06
+#define TB0219_MISC                    0x08
+#define TB0219_RESET                   0x0e
+#define TB0219_PCI_SLOT1_IRQ_STATUS    0x10
+#define TB0219_PCI_SLOT2_IRQ_STATUS    0x12
+#define TB0219_PCI_SLOT3_IRQ_STATUS    0x14
+
+typedef enum {
+       TYPE_LED,
+       TYPE_GPIO_OUTPUT,
+} tb0219_type_t;
+
+/*
+ * Minor device number
+ *      0 = 7 segment LED
+ *
+ *     16 = GPIO IN 0
+ *     17 = GPIO IN 1
+ *     18 = GPIO IN 2
+ *     19 = GPIO IN 3
+ *     20 = GPIO IN 4
+ *     21 = GPIO IN 5
+ *     22 = GPIO IN 6
+ *     23 = GPIO IN 7
+ *
+ *     32 = GPIO OUT 0
+ *     33 = GPIO OUT 1
+ *     34 = GPIO OUT 2
+ *     35 = GPIO OUT 3
+ *     36 = GPIO OUT 4
+ *     37 = GPIO OUT 5
+ *     38 = GPIO OUT 6
+ *     39 = GPIO OUT 7
+ *
+ *     48 = DIP switch 1
+ *     49 = DIP switch 2
+ *     50 = DIP switch 3
+ *     51 = DIP switch 4
+ *     52 = DIP switch 5
+ *     53 = DIP switch 6
+ *     54 = DIP switch 7
+ *     55 = DIP switch 8
+ */
+
+static inline char get_led(void)
+{
+       return (char)tb0219_read(TB0219_LED);
+}
+
+static inline char get_gpio_input_pin(unsigned int pin)
+{
+       uint16_t values;
+
+       values = tb0219_read(TB0219_GPIO_INPUT);
+       if (values & (1 << pin))
+               return '1';
+
+       return '0';
+}
+
+static inline char get_gpio_output_pin(unsigned int pin)
+{
+       uint16_t values;
+
+       values = tb0219_read(TB0219_GPIO_OUTPUT);
+       if (values & (1 << pin))
+               return '1';
+
+       return '0';
+}
+
+static inline char get_dip_switch(unsigned int pin)
+{
+       uint16_t values;
+
+       values = tb0219_read(TB0219_DIP_SWITCH);
+       if (values & (1 << pin))
+               return '1';
+
+       return '0';
+}
+
+static inline int set_led(char command)
+{
+       tb0219_write(TB0219_LED, command);
+
+       return 0;
+}
+
+static inline int set_gpio_output_pin(unsigned int pin, char command)
+{
+       unsigned long flags;
+       uint16_t value;
+
+       if (command != '0' && command != '1')
+               return -EINVAL;
+
+       spin_lock_irqsave(&tb0219_lock, flags);
+       value = tb0219_read(TB0219_GPIO_OUTPUT);
+       if (command == '0')
+               value &= ~(1 << pin);
+       else
+               value |= 1 << pin;
+       tb0219_write(TB0219_GPIO_OUTPUT, value);
+       spin_unlock_irqrestore(&tb0219_lock, flags);
+
+       return 0;
+
+}
+
+static ssize_t tanbac_tb0219_read(struct file *file, char __user *buf, size_t len,
+                                  loff_t *ppos)
+{
+       unsigned int minor;
+       char value;
+
+       minor = iminor(file_inode(file));
+       switch (minor) {
+       case 0:
+               value = get_led();
+               break;
+       case 16 ... 23:
+               value = get_gpio_input_pin(minor - 16);
+               break;
+       case 32 ... 39:
+               value = get_gpio_output_pin(minor - 32);
+               break;
+       case 48 ... 55:
+               value = get_dip_switch(minor - 48);
+               break;
+       default:
+               return -EBADF;
+       }
+
+       if (len <= 0)
+               return -EFAULT;
+
+       if (put_user(value, buf))
+               return -EFAULT;
+
+       return 1;
+}
+
+static ssize_t tanbac_tb0219_write(struct file *file, const char __user *data,
+                                   size_t len, loff_t *ppos)
+{
+       unsigned int minor;
+       tb0219_type_t type;
+       size_t i;
+       int retval = 0;
+       char c;
+
+       minor = iminor(file_inode(file));
+       switch (minor) {
+       case 0:
+               type = TYPE_LED;
+               break;
+       case 32 ... 39:
+               type = TYPE_GPIO_OUTPUT;
+               break;
+       default:
+               return -EBADF;
+       }
+
+       for (i = 0; i < len; i++) {
+               if (get_user(c, data + i))
+                       return -EFAULT;
+
+               switch (type) {
+               case TYPE_LED:
+                       retval = set_led(c);
+                       break;
+               case TYPE_GPIO_OUTPUT:
+                       retval = set_gpio_output_pin(minor - 32, c);
+                       break;
+               }
+
+               if (retval < 0)
+                       break;
+       }
+
+       return i;
+}
+
+static int tanbac_tb0219_open(struct inode *inode, struct file *file)
+{
+       unsigned int minor;
+
+       minor = iminor(inode);
+       switch (minor) {
+       case 0:
+       case 16 ... 23:
+       case 32 ... 39:
+       case 48 ... 55:
+               return nonseekable_open(inode, file);
+       default:
+               break;
+       }
+
+       return -EBADF;
+}
+
+static int tanbac_tb0219_release(struct inode *inode, struct file *file)
+{
+       return 0;
+}
+
+static const struct file_operations tb0219_fops = {
+       .owner          = THIS_MODULE,
+       .read           = tanbac_tb0219_read,
+       .write          = tanbac_tb0219_write,
+       .open           = tanbac_tb0219_open,
+       .release        = tanbac_tb0219_release,
+       .llseek         = no_llseek,
+};
+
+static void tb0219_restart(char *command)
+{
+       tb0219_write(TB0219_RESET, 0);
+}
+
+static void tb0219_pci_irq_init(void)
+{
+       /* PCI Slot 1 */
+       vr41xx_set_irq_trigger(TB0219_PCI_SLOT1_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
+       vr41xx_set_irq_level(TB0219_PCI_SLOT1_PIN, IRQ_LEVEL_LOW);
+
+       /* PCI Slot 2 */
+       vr41xx_set_irq_trigger(TB0219_PCI_SLOT2_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
+       vr41xx_set_irq_level(TB0219_PCI_SLOT2_PIN, IRQ_LEVEL_LOW);
+
+       /* PCI Slot 3 */
+       vr41xx_set_irq_trigger(TB0219_PCI_SLOT3_PIN, IRQ_TRIGGER_LEVEL, IRQ_SIGNAL_THROUGH);
+       vr41xx_set_irq_level(TB0219_PCI_SLOT3_PIN, IRQ_LEVEL_LOW);
+}
+
+static int tb0219_probe(struct platform_device *dev)
+{
+       int retval;
+
+       if (request_mem_region(TB0219_START, TB0219_SIZE, "TB0219") == NULL)
+               return -EBUSY;
+
+       tb0219_base = ioremap(TB0219_START, TB0219_SIZE);
+       if (tb0219_base == NULL) {
+               release_mem_region(TB0219_START, TB0219_SIZE);
+               return -ENOMEM;
+       }
+
+       retval = register_chrdev(major, "TB0219", &tb0219_fops);
+       if (retval < 0) {
+               iounmap(tb0219_base);
+               tb0219_base = NULL;
+               release_mem_region(TB0219_START, TB0219_SIZE);
+               return retval;
+       }
+
+       old_machine_restart = _machine_restart;
+       _machine_restart = tb0219_restart;
+
+       tb0219_pci_irq_init();
+
+       if (major == 0) {
+               major = retval;
+               printk(KERN_INFO "TB0219: major number %d\n", major);
+       }
+
+       return 0;
+}
+
+static int tb0219_remove(struct platform_device *dev)
+{
+       _machine_restart = old_machine_restart;
+
+       iounmap(tb0219_base);
+       tb0219_base = NULL;
+
+       release_mem_region(TB0219_START, TB0219_SIZE);
+
+       return 0;
+}
+
+static struct platform_device *tb0219_platform_device;
+
+static struct platform_driver tb0219_device_driver = {
+       .probe          = tb0219_probe,
+       .remove         = tb0219_remove,
+       .driver         = {
+               .name   = "TB0219",
+       },
+};
+
+static int __init tanbac_tb0219_init(void)
+{
+       int retval;
+
+       tb0219_platform_device = platform_device_alloc("TB0219", -1);
+       if (!tb0219_platform_device)
+               return -ENOMEM;
+
+       retval = platform_device_add(tb0219_platform_device);
+       if (retval < 0) {
+               platform_device_put(tb0219_platform_device);
+               return retval;
+       }
+
+       retval = platform_driver_register(&tb0219_device_driver);
+       if (retval < 0)
+               platform_device_unregister(tb0219_platform_device);
+
+       return retval;
+}
+
+static void __exit tanbac_tb0219_exit(void)
+{
+       platform_driver_unregister(&tb0219_device_driver);
+       platform_device_unregister(tb0219_platform_device);
+}
+
+module_init(tanbac_tb0219_init);
+module_exit(tanbac_tb0219_exit);