--- linux/drivers/char/toshiba.c.orig Sun Feb 6 12:02:25 2000 +++ linux/drivers/char/toshiba.c Sat Feb 12 17:41:52 2000 @@ -0,0 +1,593 @@ +/* toshiba.c -- Linux driver for accessing the SMM on Toshiba laptops + * + * Copyright (c) 1996-2000 Jonathan A. Buzzard (jonathan@buzzard.org.uk) + * + * Valuable assistance and patches from: + * Tom May + * Rob Napier + * + * Fn status port numbers for machine ID's coutesy of + * 0xfc15: Tom May + * 0xfc17: Mr. Dave Konrad + * 0xfc1a: George Betzos + * + * WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING + * + * This code is covered by the GNU GPL and you are free to make any + * changes you wish to it under the terms of the license. However the + * code has the potential to render your computer and/or someone else's + * unuseable. Unless you truely understand what is going on, I urge you + * not to make any modifications and use it as it stands. + * + * 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, 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. + * + * The information used to write this driver has been obtained by reverse + * engineering the software supplied by Toshiba for their portable computers in + * strict accordance with the European Council Directive 92/250/EEC on the legal + * protection of computer programs, and it's implementation into English Law by + * the Copyright (Computer Programs) Regulations 1992 (S.I. 1992 No.3233). + * + */ + +#define TOSH_VERSION "1.6 11/2/2000" +#define TOSH_DEBUG 0 + +#ifdef MODULE +#include +#include +#endif +#include +#include +/* this appears to be needed for gcc 2.9.5! */ +#ifdef __KERNEL_STRICT_NAMES +#define _LOOSE_KERNEL_NAMES +#endif +#include +#include +#include +#include +#include +#include +#ifdef CONFIG_PROC_FS +#include +#include +#endif + +#include + +#define TOSH_MINOR_DEV 181 + +static int tosh_id = 0x0000; +static int tosh_bios = 0x0000; +static int tosh_date = 0x0000; +static int tosh_sci = 0x0000; +static int tosh_fan = 0; +static int tosh_start = 0; +static int tosh_extent = 0; + +int tosh_fn = 0; + +#if LINUX_VERSION_CODE > 0x020100 +MODULE_PARM(tosh_fn, "i"); +#endif + + +static int tosh_get_info(char *, char **, off_t, int, int); +static int tosh_open(struct inode *ip, struct file *); +static int tosh_release(struct inode *, struct file *); +static int tosh_ioctl(struct inode *, struct file *, unsigned int, + unsigned long); + + +static struct file_operations tosh_fops = { + NULL, /* lseek */ + NULL, /* read */ + NULL, /* write */ + NULL, /* readdir */ + NULL, /* select */ + tosh_ioctl, /* ioctl */ + NULL, /* mmap */ + tosh_open, /* open */ + NULL, /* flush */ + tosh_release, /* close */ + NULL, /* fsync */ + NULL /* fasync */ +}; + +static struct miscdevice tosh_device = { + TOSH_MINOR_DEV, + "toshiba", + &tosh_fops +}; + +#ifdef CONFIG_PROC_FS +static struct proc_dir_entry tosh_proc_entry = { + 0, 7, "toshiba", S_IFREG|S_IRUGO, 1, 0, 0, 33, NULL, tosh_get_info, NULL +}; +#endif + + +/* + * Read the Fn key status + */ +static int tosh_fn_status(void) +{ + unsigned char scan; + unsigned long flags; + + if (tosh_fn!=0) { + scan = inb(tosh_fn); + } else { + save_flags(flags); + cli(); + outb(0x8e, 0xe4); + scan = inb(0xe5); + restore_flags(flags); + } + + return (int) scan; +} + + +/* + * At some point we need to emulate setting the HDD auto off times for + * the new laptops. We can do this by calling the ide_ioctl on /dev/hda. + * The values we need for the various times are + * + * Disabled 0x00 + * 1 minute 0x0c + * 3 minutes 0x24 + * 5 minutes 0x3c + * 10 minutes 0x78 + * 15 minutes 0xb4 + * 20 minutes 0xf0 + * 30 minutes 0xf1 + * + */ +/*static int tosh_emulate_hdd(SMMRegisters *regs) +{ + return 0; +}*/ + + +/* + * For the Portage 610CT and the Tecra 700CS/700CDT emulate the HCI fan function + */ +static int tosh_emulate_fan(SMMRegisters *regs) +{ + unsigned long eax,ecx,flags; + unsigned char al; + + eax = regs->eax & 0xff00; + ecx = regs->ecx & 0xffff; + + /* Portage 610CT */ + + if (tosh_id==0xfccb) { + if (eax==0xfe00) { + /* fan status */ + save_flags(flags); + cli(); + outb(0xbe, 0xe4); + al = inb(0xe5); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = (unsigned int) (al & 0x01); + } + if ((eax==0xff00) && (ecx==0x0000)) { + /* fan off */ + save_flags(flags); + cli(); + outb(0xbe, 0xe4); + al = inb(0xe5); + outb(0xbe, 0xe4); + outb (al | 0x01, 0xe5); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = 0x00; + } + if ((eax==0xff00) && (ecx==0x0001)) { + /* fan on */ + save_flags(flags); + cli(); + outb(0xbe, 0xe4); + al = inb(0xe5); + outb(0xbe, 0xe4); + outb(al & 0xfe, 0xe5); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = 0x01; + } + } + + /* Tecra 700CS/CDT */ + + if (tosh_id==0xfccc) { + if (eax==0xfe00) { + /* fan status */ + save_flags(flags); + cli(); + outb(0xe0, 0xe4); + al = inb(0xe5); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = al & 0x01; + } + if ((eax==0xff00) && (ecx==0x0000)) { + /* fan off */ + save_flags(flags); + cli(); + outb(0xe0, 0xe4); + al = inb(0xe5); + outw(0xe0 | ((al & 0xfe) << 8), 0xe4); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = 0x00; + } + if ((eax==0xff00) && (ecx==0x0001)) { + /* fan on */ + save_flags(flags); + cli(); + outb(0xe0, 0xe4); + al = inb(0xe5); + outw(0xe0 | ((al | 0x01) << 8), 0xe4); + restore_flags(flags); + regs->eax = 0x00; + regs->ecx = 0x01; + } + } + + return 0; +} + + +/* + * Put the laptop into System Management Mode + */ +static int tosh_smm(SMMRegisters *regs) +{ + int eax; + + asm ("# load the values into the registers\n\t" \ + "pushl %%eax\n\t" \ + "movl 0(%%eax),%%edx\n\t" \ + "push %%edx\n\t" \ + "movl 4(%%eax),%%ebx\n\t" \ + "movl 8(%%eax),%%ecx\n\t" \ + "movl 12(%%eax),%%edx\n\t" \ + "movl 16(%%eax),%%esi\n\t" \ + "movl 20(%%eax),%%edi\n\t" \ + "popl %%eax\n\t" \ + "# call the System Management mode\n\t" \ + "inb $0xb2,%%al\n\t" + "# fill out the memory with the values in the registers\n\t" \ + "xchgl %%eax,(%%esp)\n\t" + "movl %%ebx,4(%%eax)\n\t" \ + "movl %%ecx,8(%%eax)\n\t" \ + "movl %%edx,12(%%eax)\n\t" \ + "movl %%esi,16(%%eax)\n\t" \ + "movl %%edi,20(%%eax)\n\t" \ + "popl %%edx\n\t" \ + "movl %%edx,0(%%eax)\n\t" \ + "# setup the return value to the carry flag\n\t" \ + "lahf\n\t" \ + "shrl $8,%%eax\n\t" \ + "andl $1,%%eax\n" \ + : "=a" (eax) + : "a" (regs) + : "%ebx", "%ecx", "%edx", "%esi", "%edi"); + + return eax; +} + + +static int tosh_open(struct inode *ip, struct file *fp) +{ + MOD_INC_USE_COUNT; + + return 0; +} + + +static int tosh_release(struct inode *ip, struct file *fp) +{ + MOD_DEC_USE_COUNT; + + return 0; +} + + +static int tosh_ioctl(struct inode *ip, struct file *fp, unsigned int cmd, + unsigned long arg) +{ + SMMRegisters *regs; + unsigned short ax,bx; + int err; + + if (!arg) + return -EINVAL; + + regs = (SMMRegisters *) arg; + switch (cmd) { + case TOSH_SMM: + ax = regs->eax & 0xff00; + bx = regs->ebx & 0xffff; + /* block HCI calls to read/write memory & PCI devices */ + if (((ax==0xff00) || (ax==0xfe00)) && (bx>0x0069)) + return -EINVAL; + + /* do we need to emulate the fan ? */ + if (tosh_fan==1) { + if (((ax==0xf300) || (ax==0xf400)) && (bx==0x0004)) { + err = tosh_emulate_fan(regs); + break; + } + } + err = tosh_smm(regs); + break; + default: + return -EINVAL; + } + + return (err==0) ? 0:-EINVAL; +} + + +/* + * Print the information for /proc/toshiba + */ +#ifdef CONFIG_PROC_FS +int tosh_get_info(char *buffer, char **start, off_t fpos, int length, int dummy) +{ + char *temp; + int key; + + temp = buffer; + key = tosh_fn_status(); + + /* Arguments + 0) Linux driver version (this will change if format changes) + 1) Machine ID + 2) SCI version + 3) BIOS version (major, minor) + 4) BIOS date (in SCI date format) + */ + + temp += sprintf(temp, "1.1 0x%04x %d.%d %d.%d 0x%04x 0x%02x\n", + tosh_id, + (tosh_sci & 0xff00)>>8, + tosh_sci & 0xff, + (tosh_bios & 0xff00)>>8, + tosh_bios & 0xff, + tosh_date, + key); + + return temp-buffer; +} +#endif + + +/* + * Determine which port to use for the Fn key status + */ +static void tosh_set_fn_port(void) +{ + switch (tosh_id) { + case 0xfc1a: case 0xfc15: + tosh_fn = 0x62; + break; + case 0xfce0: case 0xfcd1: case 0xfce2: case 0xfc17: + tosh_fn = 0x68; + break; + default: + tosh_fn = 0x00; + break; + } + + return; +} + + +/* + * Get the machine identification number of the current model + */ +static int tosh_get_machine_id(void) +{ + int id; + unsigned char ah; + unsigned short bx,cx; + unsigned long address; + + id = (0x100*(int) readb(0xffffe))+((int) readb(0xffffa)); + + /* do we have a SCTTable machine identication number on our hands */ + + if (id==0xfc2f) { + + /* start by getting a pointer into the BIOS */ + + asm ("movw $0xc000,%%ax\n\t" \ + "movw $0x0000,%%bx\n\t" \ + "movw $0x0000,%%cx\n\t" \ + "inb $0xb2,%%al\n\t" \ + "movb %%ah,%%al\n" \ + : "=b" (bx), "=a" (ah) : : "%ecx"); + + /* At this point in the Toshiba routines under MS Windows + the bx register holds 0xe6f5. However my code is producing + a different value! For the time being I will just fudge the + value. This has been verified on a Satellite Pro 430CDT, + Tecra 750CDT, Tecra 780DVD and Satellite 310CDT. */ +#if TOSH_DEBUG + printk("toshiba: debugging ID bx=0x%04x\n", bx); +#endif + bx = 0xe6f5; + + /* now twiddle with our pointer a bit */ + + address = 0x000f0000+bx; + cx = readw(address); + address = 0x000f0009+bx+cx; + cx = readw(address); + address = 0x000f000a+cx; + cx = readw(address); + + /* now construct our machine identification number */ + + id = ((cx & 0xff)<<8)+((cx & 0xff00)>>8); + } + + return id; +} + + +/* + * Probe for the presence of a Toshiba laptop + * + * returns and non-zero if unable to detect the presence of a Toshiba + * laptop, otherwise zero and determines the Machine ID, BIOS version and + * date, and SCI version. + */ +int tosh_probe(void) +{ + int major,minor,day,year,month; + unsigned short dx; + unsigned char ah,flags; + + /* call the Toshiba SCI support check routine */ + + asm ("movw $0xf0f0,%%ax\n\t" \ + "movw $0x0000,%%bx\n\t" \ + "movw $0x0000,%%cx\n\t" \ + "inb $0xb2,%%al\n\t" \ + "movb %%ah,%%bl\n\t" \ + "lahf\n\t" \ + "movb %%ah,%%al\n" \ + : "=b" (ah), "=a" (flags), "=d" (dx) + : + : "%ecx"); + + /* if this is not a Toshiba laptop carry flag is set and ah=0x86 */ + + if ((ah==0x86) || ((flags & 0x01)==1)) { + printk("toshiba: not a supported Toshiba laptop\n"); + return -ENODEV; + } + + /* if we get this far then we are running on a Toshiba (probably)! */ + + tosh_sci = (int) dx; + + /* next get the machine ID of the current laptop */ + + tosh_id = tosh_get_machine_id(); + + /* get the BIOS version */ + + major = readb(0xfe009)-'0'; + minor = ((readb(0xfe00b)-'0')*10)+(readb(0xfe00c)-'0'); + tosh_bios = (major*0x100)+minor; + + /* get the BIOS date */ + + day = ((readb(0xffff5)-'0')*10)+(readb(0xffff6)-'0'); + month = ((readb(0xffff8)-'0')*10)+(readb(0xffff9)-'0'); + year = ((readb(0xffffb)-'0')*10)+(readb(0xffffc)-'0'); + tosh_date = (((year-90) & 0x1f)<<10) | ((month & 0xf)<<6) + | ((day & 0x1f)<<1); + + /* what ports do we need to grab on this model for the fn key */ + + switch (tosh_id) { + case 0xfc1a: + tosh_start = 0x62; + tosh_extent = 1; + case 0xfce0: case 0xfcd1: case 0xfce2: + tosh_start = 0x68; + tosh_extent = 1; + break; + default: /* also used for fan on Portage 610CT and Tecra 700x */ + tosh_start = 0xe4; + tosh_extent = 2; + } + + /* we can't check the ports as the keyboard driver grabs 0x60-0x6f + and the pic driver grabs 0xa0-0xbf. We just have to live + dangerously and use the ports anyway */ + + request_region(tosh_start, tosh_extent, "toshiba"); + + /* do we need to emulate the fan? */ + + if ((tosh_id==0xfccb) || (tosh_id==0xfccc)) + tosh_fan = 1; + + return 0; +} + + +__initfunc(int tosh_init(void)) +{ + /* are we running on a Toshiba laptop */ + + if (tosh_probe()!=0) + return -EIO; + + printk(KERN_INFO "Toshiba System Managment Mode driver v" + TOSH_VERSION"\n"); + + /* set the port to use for Fn status if not specified as a parameter */ + + if (tosh_fn==0x00) + tosh_set_fn_port(); + + /* register the device file */ + + misc_register(&tosh_device); + + /* register the proc entry */ + +#ifdef CONFIG_PROC_FS +#if LINUX_VERSION_CODE > 0x020200 + proc_register(&proc_root, &tosh_proc_entry); +#else + proc_register_dynamic(&proc_root, &tosh_proc_entry); +#endif +#endif + + return 0; +} + +#ifdef MODULE +int init_module(void) +{ + return tosh_init(); +} + +void cleanup_module(void) +{ + /* remove the proc entry */ + +#ifdef CONFIG_PROC_FS + proc_unregister(&proc_root, tosh_proc_entry.low_ino); +#endif + + /* unregister the device file */ + + misc_deregister(&tosh_device); + + /* release ports */ + + release_region(tosh_start, tosh_extent); + + return; +} +#endif --- linux/drivers/char/Makefile.orig Sun Feb 6 14:04:10 2000 +++ linux/drivers/char/Makefile Sun Feb 6 13:19:38 2000 @@ -593,6 +593,16 @@ L_OBJS += dz.o endif + +ifeq ($(CONFIG_TOSHIBA),y) +L_OBJS += toshiba.o +else + ifeq ($(CONFIG_TOSHIBA),m) + M_OBJS += toshiba.o + endif +endif + + include $(TOPDIR)/Rules.make fastdep: --- linux/include/linux/toshiba.h.orig Sun Feb 6 14:30:01 2000 +++ linux/include/linux/toshiba.h Sun Feb 6 12:03:22 2000 @@ -0,0 +1,36 @@ +/* toshiba.h -- Linux driver for accessing the SMM on Toshiba laptops + * + * Copyright (c) 1996-2000 Jonathan A. Buzzard (jonathan@buzzard.org.uk) + * + * Thanks to Juergen Heinzl for the pointers + * on making sure the structure is aligned and packed. + * + * 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, 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. + * + */ + +#ifndef _LINUX_TOSHIBA_H +#define _LINUX_TOSHIBA_H + +#define TOSH_PROC "/proc/toshiba" +#define TOSH_DEVICE "/dev/toshiba" +#define TOSH_SMM _IOWR('t', 0x90, 24) + +typedef struct { + unsigned int eax; + unsigned int ebx __attribute__ ((packed)); + unsigned int ecx __attribute__ ((packed)); + unsigned int edx __attribute__ ((packed)); + unsigned int esi __attribute__ ((packed)); + unsigned int edi __attribute__ ((packed)); +} SMMRegisters; + +#endif --- linux/drivers/char/Config.in.orig Tue Jan 4 18:12:14 2000 +++ linux/drivers/char/Config.in Sun Feb 6 13:13:52 2000 @@ -195,4 +195,6 @@ fi endmenu +tristate 'Toshiba Laptop support' CONFIG_TOSHIBA + endmenu --- linux/Documentation/Configure.help.orig Sun Feb 6 11:54:59 2000 +++ linux/Documentation/Configure.help Sun Feb 6 12:01:03 2000 @@ -12039,6 +12039,17 @@ If you do not have any Quicknet telephony cards, you can safely ignore this option. + +Toshiba Laptop support +CONFIG_TOSHIBA + If you intend to run this the kernel on a Toshiba portable say yes + here. This adds a driver to safely access the System Management + Mode of the CPU on Toshiba portables. The System Management Mode + is used to set the BIOS and power saving options on Toshiba portables. + + For information on utilities to make use of this driver see the + Toshiba Linux utilities website at: + http://www.buzzard.org.uk/toshiba/ # # A couple of things I keep forgetting: