423 lines
10 KiB
C
423 lines
10 KiB
C
/* $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/sched.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 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");
|