|  | /* $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); | 
|  | int err; | 
|  |  | 
|  | 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; | 
|  |  | 
|  | err = request_irq(driver->irq, uctrl_interrupt, 0, "uctrl", driver); | 
|  | if (err) { | 
|  | printk("%s: unable to register irq %d\n", | 
|  | __FUNCTION__, driver->irq); | 
|  | return err; | 
|  | } | 
|  |  | 
|  | 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"); |