| /* uctrl.c: TS102 Microcontroller interface on Tadpole Sparcbook 3 |
| * |
| * Copyright 1999 Derrick J Brashear (shadow@dementia.org) |
| * Copyright 2008 David S. Miller (davem@davemloft.net) |
| */ |
| |
| #include <linux/module.h> |
| #include <linux/errno.h> |
| #include <linux/delay.h> |
| #include <linux/interrupt.h> |
| #include <linux/slab.h> |
| #include <linux/smp_lock.h> |
| #include <linux/ioport.h> |
| #include <linux/init.h> |
| #include <linux/miscdevice.h> |
| #include <linux/mm.h> |
| #include <linux/of.h> |
| #include <linux/of_device.h> |
| |
| #include <asm/openprom.h> |
| #include <asm/oplib.h> |
| #include <asm/system.h> |
| #include <asm/irq.h> |
| #include <asm/io.h> |
| #include <asm/pgtable.h> |
| |
| #define UCTRL_MINOR 174 |
| |
| #define DEBUG 1 |
| #ifdef DEBUG |
| #define dprintk(x) printk x |
| #else |
| #define dprintk(x) |
| #endif |
| |
| struct uctrl_regs { |
| u32 uctrl_intr; |
| u32 uctrl_data; |
| u32 uctrl_stat; |
| u32 uctrl_xxx[5]; |
| }; |
| |
| struct ts102_regs { |
| u32 card_a_intr; |
| u32 card_a_stat; |
| u32 card_a_ctrl; |
| u32 card_a_xxx; |
| u32 card_b_intr; |
| u32 card_b_stat; |
| u32 card_b_ctrl; |
| u32 card_b_xxx; |
| u32 uctrl_intr; |
| u32 uctrl_data; |
| u32 uctrl_stat; |
| u32 uctrl_xxx; |
| u32 ts102_xxx[4]; |
| }; |
| |
| /* Bits for uctrl_intr register */ |
| #define UCTRL_INTR_TXE_REQ 0x01 /* transmit FIFO empty int req */ |
| #define UCTRL_INTR_TXNF_REQ 0x02 /* transmit FIFO not full int req */ |
| #define UCTRL_INTR_RXNE_REQ 0x04 /* receive FIFO not empty int req */ |
| #define UCTRL_INTR_RXO_REQ 0x08 /* receive FIFO overflow int req */ |
| #define UCTRL_INTR_TXE_MSK 0x10 /* transmit FIFO empty mask */ |
| #define UCTRL_INTR_TXNF_MSK 0x20 /* transmit FIFO not full mask */ |
| #define UCTRL_INTR_RXNE_MSK 0x40 /* receive FIFO not empty mask */ |
| #define UCTRL_INTR_RXO_MSK 0x80 /* receive FIFO overflow mask */ |
| |
| /* Bits for uctrl_stat register */ |
| #define UCTRL_STAT_TXE_STA 0x01 /* transmit FIFO empty status */ |
| #define UCTRL_STAT_TXNF_STA 0x02 /* transmit FIFO not full status */ |
| #define UCTRL_STAT_RXNE_STA 0x04 /* receive FIFO not empty status */ |
| #define UCTRL_STAT_RXO_STA 0x08 /* receive FIFO overflow status */ |
| |
| static const char *uctrl_extstatus[16] = { |
| "main power available", |
| "internal battery attached", |
| "external battery attached", |
| "external VGA attached", |
| "external keyboard attached", |
| "external mouse attached", |
| "lid down", |
| "internal battery currently charging", |
| "external battery currently charging", |
| "internal battery currently discharging", |
| "external battery currently discharging", |
| }; |
| |
| /* Everything required for one transaction with the uctrl */ |
| struct uctrl_txn { |
| u8 opcode; |
| u8 inbits; |
| u8 outbits; |
| u8 *inbuf; |
| u8 *outbuf; |
| }; |
| |
| struct uctrl_status { |
| u8 current_temp; /* 0x07 */ |
| u8 reset_status; /* 0x0b */ |
| u16 event_status; /* 0x0c */ |
| u16 error_status; /* 0x10 */ |
| u16 external_status; /* 0x11, 0x1b */ |
| u8 internal_charge; /* 0x18 */ |
| u8 external_charge; /* 0x19 */ |
| u16 control_lcd; /* 0x20 */ |
| u8 control_bitport; /* 0x21 */ |
| u8 speaker_volume; /* 0x23 */ |
| u8 control_tft_brightness; /* 0x24 */ |
| u8 control_kbd_repeat_delay; /* 0x28 */ |
| u8 control_kbd_repeat_period; /* 0x29 */ |
| u8 control_screen_contrast; /* 0x2F */ |
| }; |
| |
| enum uctrl_opcode { |
| READ_SERIAL_NUMBER=0x1, |
| READ_ETHERNET_ADDRESS=0x2, |
| READ_HARDWARE_VERSION=0x3, |
| READ_MICROCONTROLLER_VERSION=0x4, |
| READ_MAX_TEMPERATURE=0x5, |
| READ_MIN_TEMPERATURE=0x6, |
| READ_CURRENT_TEMPERATURE=0x7, |
| READ_SYSTEM_VARIANT=0x8, |
| READ_POWERON_CYCLES=0x9, |
| READ_POWERON_SECONDS=0xA, |
| READ_RESET_STATUS=0xB, |
| READ_EVENT_STATUS=0xC, |
| READ_REAL_TIME_CLOCK=0xD, |
| READ_EXTERNAL_VGA_PORT=0xE, |
| READ_MICROCONTROLLER_ROM_CHECKSUM=0xF, |
| READ_ERROR_STATUS=0x10, |
| READ_EXTERNAL_STATUS=0x11, |
| READ_USER_CONFIGURATION_AREA=0x12, |
| READ_MICROCONTROLLER_VOLTAGE=0x13, |
| READ_INTERNAL_BATTERY_VOLTAGE=0x14, |
| READ_DCIN_VOLTAGE=0x15, |
| READ_HORIZONTAL_POINTER_VOLTAGE=0x16, |
| READ_VERTICAL_POINTER_VOLTAGE=0x17, |
| READ_INTERNAL_BATTERY_CHARGE_LEVEL=0x18, |
| READ_EXTERNAL_BATTERY_CHARGE_LEVEL=0x19, |
| READ_REAL_TIME_CLOCK_ALARM=0x1A, |
| READ_EVENT_STATUS_NO_RESET=0x1B, |
| READ_INTERNAL_KEYBOARD_LAYOUT=0x1C, |
| READ_EXTERNAL_KEYBOARD_LAYOUT=0x1D, |
| READ_EEPROM_STATUS=0x1E, |
| CONTROL_LCD=0x20, |
| CONTROL_BITPORT=0x21, |
| SPEAKER_VOLUME=0x23, |
| CONTROL_TFT_BRIGHTNESS=0x24, |
| CONTROL_WATCHDOG=0x25, |
| CONTROL_FACTORY_EEPROM_AREA=0x26, |
| CONTROL_KBD_TIME_UNTIL_REPEAT=0x28, |
| CONTROL_KBD_TIME_BETWEEN_REPEATS=0x29, |
| CONTROL_TIMEZONE=0x2A, |
| CONTROL_MARK_SPACE_RATIO=0x2B, |
| CONTROL_DIAGNOSTIC_MODE=0x2E, |
| CONTROL_SCREEN_CONTRAST=0x2F, |
| RING_BELL=0x30, |
| SET_DIAGNOSTIC_STATUS=0x32, |
| CLEAR_KEY_COMBINATION_TABLE=0x33, |
| PERFORM_SOFTWARE_RESET=0x34, |
| SET_REAL_TIME_CLOCK=0x35, |
| RECALIBRATE_POINTING_STICK=0x36, |
| SET_BELL_FREQUENCY=0x37, |
| SET_INTERNAL_BATTERY_CHARGE_RATE=0x39, |
| SET_EXTERNAL_BATTERY_CHARGE_RATE=0x3A, |
| SET_REAL_TIME_CLOCK_ALARM=0x3B, |
| READ_EEPROM=0x40, |
| WRITE_EEPROM=0x41, |
| WRITE_TO_STATUS_DISPLAY=0x42, |
| DEFINE_SPECIAL_CHARACTER=0x43, |
| DEFINE_KEY_COMBINATION_ENTRY=0x50, |
| DEFINE_STRING_TABLE_ENTRY=0x51, |
| DEFINE_STATUS_SCREEN_DISPLAY=0x52, |
| PERFORM_EMU_COMMANDS=0x64, |
| READ_EMU_REGISTER=0x65, |
| WRITE_EMU_REGISTER=0x66, |
| READ_EMU_RAM=0x67, |
| WRITE_EMU_RAM=0x68, |
| READ_BQ_REGISTER=0x69, |
| WRITE_BQ_REGISTER=0x6A, |
| SET_USER_PASSWORD=0x70, |
| VERIFY_USER_PASSWORD=0x71, |
| GET_SYSTEM_PASSWORD_KEY=0x72, |
| VERIFY_SYSTEM_PASSWORD=0x73, |
| POWER_OFF=0x82, |
| POWER_RESTART=0x83, |
| }; |
| |
| static struct uctrl_driver { |
| struct uctrl_regs __iomem *regs; |
| int irq; |
| int pending; |
| struct uctrl_status status; |
| } *global_driver; |
| |
| static void uctrl_get_event_status(struct uctrl_driver *); |
| static void uctrl_get_external_status(struct uctrl_driver *); |
| |
| static long |
| uctrl_ioctl(struct file *file, unsigned int cmd, unsigned long arg) |
| { |
| switch (cmd) { |
| default: |
| return -EINVAL; |
| } |
| return 0; |
| } |
| |
| static int |
| uctrl_open(struct inode *inode, struct file *file) |
| { |
| lock_kernel(); |
| uctrl_get_event_status(global_driver); |
| uctrl_get_external_status(global_driver); |
| unlock_kernel(); |
| return 0; |
| } |
| |
| static irqreturn_t uctrl_interrupt(int irq, void *dev_id) |
| { |
| return IRQ_HANDLED; |
| } |
| |
| static const struct file_operations uctrl_fops = { |
| .owner = THIS_MODULE, |
| .llseek = no_llseek, |
| .unlocked_ioctl = uctrl_ioctl, |
| .open = uctrl_open, |
| }; |
| |
| static struct miscdevice uctrl_dev = { |
| UCTRL_MINOR, |
| "uctrl", |
| &uctrl_fops |
| }; |
| |
| /* Wait for space to write, then write to it */ |
| #define WRITEUCTLDATA(value) \ |
| { \ |
| unsigned int i; \ |
| for (i = 0; i < 10000; i++) { \ |
| if (UCTRL_STAT_TXNF_STA & sbus_readl(&driver->regs->uctrl_stat)) \ |
| break; \ |
| } \ |
| dprintk(("write data 0x%02x\n", value)); \ |
| sbus_writel(value, &driver->regs->uctrl_data); \ |
| } |
| |
| /* Wait for something to read, read it, then clear the bit */ |
| #define READUCTLDATA(value) \ |
| { \ |
| unsigned int i; \ |
| value = 0; \ |
| for (i = 0; i < 10000; i++) { \ |
| if ((UCTRL_STAT_RXNE_STA & sbus_readl(&driver->regs->uctrl_stat)) == 0) \ |
| break; \ |
| udelay(1); \ |
| } \ |
| value = sbus_readl(&driver->regs->uctrl_data); \ |
| dprintk(("read data 0x%02x\n", value)); \ |
| sbus_writel(UCTRL_STAT_RXNE_STA, &driver->regs->uctrl_stat); \ |
| } |
| |
| static void uctrl_do_txn(struct uctrl_driver *driver, struct uctrl_txn *txn) |
| { |
| int stat, incnt, outcnt, bytecnt, intr; |
| u32 byte; |
| |
| stat = sbus_readl(&driver->regs->uctrl_stat); |
| intr = sbus_readl(&driver->regs->uctrl_intr); |
| sbus_writel(stat, &driver->regs->uctrl_stat); |
| |
| dprintk(("interrupt stat 0x%x int 0x%x\n", stat, intr)); |
| |
| incnt = txn->inbits; |
| outcnt = txn->outbits; |
| byte = (txn->opcode << 8); |
| WRITEUCTLDATA(byte); |
| |
| bytecnt = 0; |
| while (incnt > 0) { |
| byte = (txn->inbuf[bytecnt] << 8); |
| WRITEUCTLDATA(byte); |
| incnt--; |
| bytecnt++; |
| } |
| |
| /* Get the ack */ |
| READUCTLDATA(byte); |
| dprintk(("ack was %x\n", (byte >> 8))); |
| |
| bytecnt = 0; |
| while (outcnt > 0) { |
| READUCTLDATA(byte); |
| txn->outbuf[bytecnt] = (byte >> 8); |
| dprintk(("set byte to %02x\n", byte)); |
| outcnt--; |
| bytecnt++; |
| } |
| } |
| |
| static void uctrl_get_event_status(struct uctrl_driver *driver) |
| { |
| struct uctrl_txn txn; |
| u8 outbits[2]; |
| |
| txn.opcode = READ_EVENT_STATUS; |
| txn.inbits = 0; |
| txn.outbits = 2; |
| txn.inbuf = NULL; |
| txn.outbuf = outbits; |
| |
| uctrl_do_txn(driver, &txn); |
| |
| dprintk(("bytes %x %x\n", (outbits[0] & 0xff), (outbits[1] & 0xff))); |
| driver->status.event_status = |
| ((outbits[0] & 0xff) << 8) | (outbits[1] & 0xff); |
| dprintk(("ev is %x\n", driver->status.event_status)); |
| } |
| |
| static void uctrl_get_external_status(struct uctrl_driver *driver) |
| { |
| struct uctrl_txn txn; |
| u8 outbits[2]; |
| int i, v; |
| |
| txn.opcode = READ_EXTERNAL_STATUS; |
| txn.inbits = 0; |
| txn.outbits = 2; |
| txn.inbuf = NULL; |
| txn.outbuf = outbits; |
| |
| uctrl_do_txn(driver, &txn); |
| |
| dprintk(("bytes %x %x\n", (outbits[0] & 0xff), (outbits[1] & 0xff))); |
| driver->status.external_status = |
| ((outbits[0] * 256) + (outbits[1])); |
| dprintk(("ex is %x\n", driver->status.external_status)); |
| v = driver->status.external_status; |
| for (i = 0; v != 0; i++, v >>= 1) { |
| if (v & 1) { |
| dprintk(("%s%s", " ", uctrl_extstatus[i])); |
| } |
| } |
| dprintk(("\n")); |
| |
| } |
| |
| static int __devinit uctrl_probe(struct of_device *op, |
| const struct of_device_id *match) |
| { |
| struct uctrl_driver *p; |
| int err = -ENOMEM; |
| |
| p = kzalloc(sizeof(*p), GFP_KERNEL); |
| if (!p) { |
| printk(KERN_ERR "uctrl: Unable to allocate device struct.\n"); |
| goto out; |
| } |
| |
| p->regs = of_ioremap(&op->resource[0], 0, |
| resource_size(&op->resource[0]), |
| "uctrl"); |
| if (!p->regs) { |
| printk(KERN_ERR "uctrl: Unable to map registers.\n"); |
| goto out_free; |
| } |
| |
| p->irq = op->irqs[0]; |
| err = request_irq(p->irq, uctrl_interrupt, 0, "uctrl", p); |
| if (err) { |
| printk(KERN_ERR "uctrl: Unable to register irq.\n"); |
| goto out_iounmap; |
| } |
| |
| err = misc_register(&uctrl_dev); |
| if (err) { |
| printk(KERN_ERR "uctrl: Unable to register misc device.\n"); |
| goto out_free_irq; |
| } |
| |
| sbus_writel(UCTRL_INTR_RXNE_REQ|UCTRL_INTR_RXNE_MSK, &p->regs->uctrl_intr); |
| printk(KERN_INFO "%s: uctrl regs[0x%p] (irq %d)\n", |
| op->node->full_name, p->regs, p->irq); |
| uctrl_get_event_status(p); |
| uctrl_get_external_status(p); |
| |
| dev_set_drvdata(&op->dev, p); |
| global_driver = p; |
| |
| out: |
| return err; |
| |
| out_free_irq: |
| free_irq(p->irq, p); |
| |
| out_iounmap: |
| of_iounmap(&op->resource[0], p->regs, resource_size(&op->resource[0])); |
| |
| out_free: |
| kfree(p); |
| goto out; |
| } |
| |
| static int __devexit uctrl_remove(struct of_device *op) |
| { |
| struct uctrl_driver *p = dev_get_drvdata(&op->dev); |
| |
| if (p) { |
| misc_deregister(&uctrl_dev); |
| free_irq(p->irq, p); |
| of_iounmap(&op->resource[0], p->regs, resource_size(&op->resource[0])); |
| kfree(p); |
| } |
| return 0; |
| } |
| |
| static const struct of_device_id uctrl_match[] = { |
| { |
| .name = "uctrl", |
| }, |
| {}, |
| }; |
| MODULE_DEVICE_TABLE(of, uctrl_match); |
| |
| static struct of_platform_driver uctrl_driver = { |
| .name = "uctrl", |
| .match_table = uctrl_match, |
| .probe = uctrl_probe, |
| .remove = __devexit_p(uctrl_remove), |
| }; |
| |
| |
| static int __init uctrl_init(void) |
| { |
| return of_register_driver(&uctrl_driver, &of_bus_type); |
| } |
| |
| static void __exit uctrl_exit(void) |
| { |
| of_unregister_driver(&uctrl_driver); |
| } |
| |
| module_init(uctrl_init); |
| module_exit(uctrl_exit); |
| MODULE_LICENSE("GPL"); |