| /* $Id: uctrl.c,v 1.12 2001/10/08 22:19:51 davem Exp $ |
| * uctrl.c: TS102 Microcontroller interface on Tadpole Sparcbook 3 |
| * |
| * Copyright 1999 Derrick J Brashear (shadow@dementia.org) |
| */ |
| |
| #include <linux/module.h> |
| #include <linux/errno.h> |
| #include <linux/delay.h> |
| #include <linux/interrupt.h> |
| #include <linux/slab.h> |
| #include <linux/ioport.h> |
| #include <linux/init.h> |
| #include <linux/miscdevice.h> |
| #include <linux/mm.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> |
| #include <asm/sbus.h> |
| |
| #define UCTRL_MINOR 174 |
| |
| #define DEBUG 1 |
| #ifdef DEBUG |
| #define dprintk(x) printk x |
| #else |
| #define dprintk(x) |
| #endif |
| |
| struct uctrl_regs { |
| volatile u32 uctrl_intr; |
| volatile u32 uctrl_data; |
| volatile u32 uctrl_stat; |
| volatile u32 uctrl_xxx[5]; |
| }; |
| |
| struct ts102_regs { |
| volatile u32 card_a_intr; |
| volatile u32 card_a_stat; |
| volatile u32 card_a_ctrl; |
| volatile u32 card_a_xxx; |
| volatile u32 card_b_intr; |
| volatile u32 card_b_stat; |
| volatile u32 card_b_ctrl; |
| volatile u32 card_b_xxx; |
| volatile u32 uctrl_intr; |
| volatile u32 uctrl_data; |
| volatile u32 uctrl_stat; |
| volatile u32 uctrl_xxx; |
| volatile 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, |
| }; |
| |
| struct uctrl_driver { |
| struct uctrl_regs *regs; |
| int irq; |
| int pending; |
| struct uctrl_status status; |
| }; |
| |
| static struct uctrl_driver drv; |
| |
| void uctrl_get_event_status(void); |
| void uctrl_get_external_status(void); |
| |
| static int |
| uctrl_ioctl(struct inode *inode, 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) |
| { |
| uctrl_get_event_status(); |
| uctrl_get_external_status(); |
| return 0; |
| } |
| |
| static irqreturn_t uctrl_interrupt(int irq, void *dev_id) |
| { |
| struct uctrl_driver *driver = (struct uctrl_driver *)dev_id; |
| printk("in uctrl_interrupt\n"); |
| return IRQ_HANDLED; |
| } |
| |
| static const struct file_operations uctrl_fops = { |
| .owner = THIS_MODULE, |
| .llseek = no_llseek, |
| .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 & driver->regs->uctrl_stat) \ |
| break; \ |
| } \ |
| dprintk(("write data 0x%02x\n", value)); \ |
| driver->regs->uctrl_data = value; \ |
| } |
| |
| /* 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 & driver->regs->uctrl_stat) == 0) \ |
| break; \ |
| udelay(1); \ |
| } \ |
| value = driver->regs->uctrl_data; \ |
| dprintk(("read data 0x%02x\n", value)); \ |
| driver->regs->uctrl_stat = UCTRL_STAT_RXNE_STA; \ |
| } |
| |
| void uctrl_set_video(int status) |
| { |
| struct uctrl_driver *driver = &drv; |
| |
| } |
| |
| static void uctrl_do_txn(struct uctrl_txn *txn) |
| { |
| struct uctrl_driver *driver = &drv; |
| int stat, incnt, outcnt, bytecnt, intr; |
| u32 byte; |
| |
| stat = driver->regs->uctrl_stat; |
| intr = driver->regs->uctrl_intr; |
| driver->regs->uctrl_stat = 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++; |
| } |
| } |
| |
| void uctrl_get_event_status(void) |
| { |
| struct uctrl_driver *driver = &drv; |
| 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(&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)); |
| } |
| |
| void uctrl_get_external_status(void) |
| { |
| struct uctrl_driver *driver = &drv; |
| 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(&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 __init ts102_uctrl_init(void) |
| { |
| struct uctrl_driver *driver = &drv; |
| int len, i; |
| struct linux_prom_irqs tmp_irq[2]; |
| unsigned int vaddr[2] = { 0, 0 }; |
| int tmpnode, uctrlnode = prom_getchild(prom_root_node); |
| |
| tmpnode = prom_searchsiblings(uctrlnode, "obio"); |
| |
| if (tmpnode) |
| uctrlnode = prom_getchild(tmpnode); |
| |
| uctrlnode = prom_searchsiblings(uctrlnode, "uctrl"); |
| |
| if (!uctrlnode) |
| return -ENODEV; |
| |
| /* the prom mapped it for us */ |
| len = prom_getproperty(uctrlnode, "address", (void *) vaddr, |
| sizeof(vaddr)); |
| driver->regs = (struct uctrl_regs *)vaddr[0]; |
| |
| len = prom_getproperty(uctrlnode, "intr", (char *) tmp_irq, |
| sizeof(tmp_irq)); |
| |
| /* Flush device */ |
| READUCTLDATA(len); |
| |
| if(!driver->irq) |
| driver->irq = tmp_irq[0].pri; |
| |
| request_irq(driver->irq, uctrl_interrupt, 0, "uctrl", driver); |
| |
| if (misc_register(&uctrl_dev)) { |
| printk("%s: unable to get misc minor %d\n", |
| __FUNCTION__, uctrl_dev.minor); |
| free_irq(driver->irq, driver); |
| return -ENODEV; |
| } |
| |
| driver->regs->uctrl_intr = UCTRL_INTR_RXNE_REQ|UCTRL_INTR_RXNE_MSK; |
| printk("uctrl: 0x%p (irq %d)\n", driver->regs, driver->irq); |
| uctrl_get_event_status(); |
| uctrl_get_external_status(); |
| return 0; |
| } |
| |
| static void __exit ts102_uctrl_cleanup(void) |
| { |
| struct uctrl_driver *driver = &drv; |
| |
| misc_deregister(&uctrl_dev); |
| if (driver->irq) |
| free_irq(driver->irq, driver); |
| if (driver->regs) |
| driver->regs = NULL; |
| } |
| |
| module_init(ts102_uctrl_init); |
| module_exit(ts102_uctrl_cleanup); |
| MODULE_LICENSE("GPL"); |