Viewing file:  isapnp.c (58.33 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/*
* ISA Plug & Play support
* Copyright (c) by Jaroslav Kysela <perex@suse.cz>
*
*
* 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 of the License, 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.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
* Changelog:
* 2000-01-01 Added quirks handling for buggy hardware
* Peter Denison <peterd@pnd-pc.demon.co.uk>
* 2000-06-14 Added isapnp_probe_devs() and isapnp_activate_dev()
* Christoph Hellwig <hch@infradead.org>
* 2001-06-03 Added release_region calls to correspond with
* request_region calls when a failure occurs. Also
* added KERN_* constants to printk() calls.
* 2001-11-07 Added isapnp_{,un}register_driver calls along the lines
* of the pci driver interface
* Kai Germaschewski <kai.germaschewski@gmx.de>
*/
#include <linux/config.h>
#include <linux/version.h>
#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/ioport.h>
#include <linux/string.h>
#include <linux/slab.h>
#include <linux/delay.h>
#include <asm/io.h>
#include <asm/dma.h>
#include <asm/irq.h>
#include <linux/pci.h>
#include <linux/init.h>
#include <linux/isapnp.h>
LIST_HEAD(isapnp_cards);
LIST_HEAD(isapnp_devices);
#if 0
#define ISAPNP_REGION_OK
#endif
#if 0
#define ISAPNP_DEBUG
#endif
struct resource *pidxr_res;
struct resource *pnpwrp_res;
struct resource *isapnp_rdp_res;
int isapnp_disable; /* Disable ISA PnP */
int isapnp_rdp; /* Read Data Port */
int isapnp_reset = 1; /* reset all PnP cards (deactivate) */
int isapnp_skip_pci_scan; /* skip PCI resource scanning */
int isapnp_verbose = 1; /* verbose mode */
int isapnp_reserve_irq[16] = { [0 ... 15] = -1 }; /* reserve (don't use) some IRQ */
int isapnp_reserve_dma[8] = { [0 ... 7] = -1 }; /* reserve (don't use) some DMA */
int isapnp_reserve_io[16] = { [0 ... 15] = -1 }; /* reserve (don't use) some I/O region */
int isapnp_reserve_mem[16] = { [0 ... 15] = -1 }; /* reserve (don't use) some memory region */
MODULE_AUTHOR("Jaroslav Kysela <perex@suse.cz>");
MODULE_DESCRIPTION("Generic ISA Plug & Play support");
MODULE_PARM(isapnp_disable, "i");
MODULE_PARM_DESC(isapnp_disable, "ISA Plug & Play disable");
MODULE_PARM(isapnp_rdp, "i");
MODULE_PARM_DESC(isapnp_rdp, "ISA Plug & Play read data port");
MODULE_PARM(isapnp_reset, "i");
MODULE_PARM_DESC(isapnp_reset, "ISA Plug & Play reset all cards");
MODULE_PARM(isapnp_skip_pci_scan, "i");
MODULE_PARM_DESC(isapnp_skip_pci_scan, "ISA Plug & Play skip PCI resource scanning");
MODULE_PARM(isapnp_verbose, "i");
MODULE_PARM_DESC(isapnp_verbose, "ISA Plug & Play verbose mode");
MODULE_PARM(isapnp_reserve_irq, "1-16i");
MODULE_PARM_DESC(isapnp_reserve_irq, "ISA Plug & Play - reserve IRQ line(s)");
MODULE_PARM(isapnp_reserve_dma, "1-8i");
MODULE_PARM_DESC(isapnp_reserve_dma, "ISA Plug & Play - reserve DMA channel(s)");
MODULE_PARM(isapnp_reserve_io, "1-16i");
MODULE_PARM_DESC(isapnp_reserve_io, "ISA Plug & Play - reserve I/O region(s) - port,size");
MODULE_PARM(isapnp_reserve_mem, "1-16i");
MODULE_PARM_DESC(isapnp_reserve_mem, "ISA Plug & Play - reserve memory region(s) - address,size");
MODULE_LICENSE("GPL");
#define _PIDXR 0x279
#define _PNPWRP 0xa79
/* short tags */
#define _STAG_PNPVERNO 0x01
#define _STAG_LOGDEVID 0x02
#define _STAG_COMPATDEVID 0x03
#define _STAG_IRQ 0x04
#define _STAG_DMA 0x05
#define _STAG_STARTDEP 0x06
#define _STAG_ENDDEP 0x07
#define _STAG_IOPORT 0x08
#define _STAG_FIXEDIO 0x09
#define _STAG_VENDOR 0x0e
#define _STAG_END 0x0f
/* long tags */
#define _LTAG_MEMRANGE 0x81
#define _LTAG_ANSISTR 0x82
#define _LTAG_UNICODESTR 0x83
#define _LTAG_VENDOR 0x84
#define _LTAG_MEM32RANGE 0x85
#define _LTAG_FIXEDMEM32RANGE 0x86
static unsigned char isapnp_checksum_value;
static DECLARE_MUTEX(isapnp_cfg_mutex);
static int isapnp_detected;
/* some prototypes */
static int isapnp_config_prepare(struct pci_dev *dev);
static int isapnp_config_activate(struct pci_dev *dev);
static int isapnp_config_deactivate(struct pci_dev *dev);
static inline void write_data(unsigned char x)
{
outb(x, _PNPWRP);
}
static inline void write_address(unsigned char x)
{
outb(x, _PIDXR);
udelay(20);
}
static inline unsigned char read_data(void)
{
unsigned char val = inb(isapnp_rdp);
return val;
}
unsigned char isapnp_read_byte(unsigned char idx)
{
write_address(idx);
return read_data();
}
unsigned short isapnp_read_word(unsigned char idx)
{
unsigned short val;
val = isapnp_read_byte(idx);
val = (val << 8) + isapnp_read_byte(idx+1);
return val;
}
unsigned int isapnp_read_dword(unsigned char idx)
{
unsigned int val;
val = isapnp_read_byte(idx);
val = (val << 8) + isapnp_read_byte(idx+1);
val = (val << 8) + isapnp_read_byte(idx+2);
val = (val << 8) + isapnp_read_byte(idx+3);
return val;
}
void isapnp_write_byte(unsigned char idx, unsigned char val)
{
write_address(idx);
write_data(val);
}
void isapnp_write_word(unsigned char idx, unsigned short val)
{
isapnp_write_byte(idx, val >> 8);
isapnp_write_byte(idx+1, val);
}
void isapnp_write_dword(unsigned char idx, unsigned int val)
{
isapnp_write_byte(idx, val >> 24);
isapnp_write_byte(idx+1, val >> 16);
isapnp_write_byte(idx+2, val >> 8);
isapnp_write_byte(idx+3, val);
}
void *isapnp_alloc(long size)
{
void *result;
result = kmalloc(size, GFP_KERNEL);
if (!result)
return NULL;
memset(result, 0, size);
return result;
}
static void isapnp_key(void)
{
unsigned char code = 0x6a, msb;
int i;
mdelay(1);
write_address(0x00);
write_address(0x00);
write_address(code);
for (i = 1; i < 32; i++) {
msb = ((code & 0x01) ^ ((code & 0x02) >> 1)) << 7;
code = (code >> 1) | msb;
write_address(code);
}
}
/* place all pnp cards in wait-for-key state */
static void isapnp_wait(void)
{
isapnp_write_byte(0x02, 0x02);
}
void isapnp_wake(unsigned char csn)
{
isapnp_write_byte(0x03, csn);
}
void isapnp_device(unsigned char logdev)
{
isapnp_write_byte(0x07, logdev);
}
void isapnp_activate(unsigned char logdev)
{
isapnp_device(logdev);
isapnp_write_byte(ISAPNP_CFG_ACTIVATE, 1);
udelay(250);
}
void isapnp_deactivate(unsigned char logdev)
{
isapnp_device(logdev);
isapnp_write_byte(ISAPNP_CFG_ACTIVATE, 0);
udelay(500);
}
static void __init isapnp_peek(unsigned char *data, int bytes)
{
int i, j;
unsigned char d=0;
for (i = 1; i <= bytes; i++) {
for (j = 0; j < 20; j++) {
d = isapnp_read_byte(0x05);
if (d & 1)
break;
udelay(100);
}
if (!(d & 1)) {
if (data != NULL)
*data++ = 0xff;
continue;
}
d = isapnp_read_byte(0x04); /* PRESDI */
isapnp_checksum_value += d;
if (data != NULL)
*data++ = d;
}
}
#define RDP_STEP 32 /* minimum is 4 */
static int isapnp_next_rdp(void)
{
int rdp = isapnp_rdp;
while (rdp <= 0x3ff) {
/*
* We cannot use NE2000 probe spaces for ISAPnP or we
* will lock up machines.
*/
if ((rdp < 0x280 || rdp > 0x380) && !check_region(rdp, 1))
{
isapnp_rdp = rdp;
return 0;
}
rdp += RDP_STEP;
}
return -1;
}
/* Set read port address */
static inline void isapnp_set_rdp(void)
{
isapnp_write_byte(0x00, isapnp_rdp >> 2);
udelay(100);
}
/*
* Perform an isolation. The port selection code now tries to avoid
* "dangerous to read" ports.
*/
static int __init isapnp_isolate_rdp_select(void)
{
isapnp_wait();
isapnp_key();
/* Control: reset CSN and conditionally everything else too */
isapnp_write_byte(0x02, isapnp_reset ? 0x05 : 0x04);
mdelay(2);
isapnp_wait();
isapnp_key();
isapnp_wake(0x00);
if (isapnp_next_rdp() < 0) {
isapnp_wait();
return -1;
}
isapnp_set_rdp();
udelay(1000);
write_address(0x01);
udelay(1000);
return 0;
}
/*
* Isolate (assign uniqued CSN) to all ISA PnP devices.
*/
static int __init isapnp_isolate(void)
{
unsigned char checksum = 0x6a;
unsigned char chksum = 0x00;
unsigned char bit = 0x00;
int data;
int csn = 0;
int i;
int iteration = 1;
isapnp_rdp = 0x213;
if (isapnp_isolate_rdp_select() < 0)
return -1;
while (1) {
for (i = 1; i <= 64; i++) {
data = read_data() << 8;
udelay(250);
data = data | read_data();
udelay(250);
if (data == 0x55aa)
bit = 0x01;
checksum = ((((checksum ^ (checksum >> 1)) & 0x01) ^ bit) << 7) | (checksum >> 1);
bit = 0x00;
}
for (i = 65; i <= 72; i++) {
data = read_data() << 8;
udelay(250);
data = data | read_data();
udelay(250);
if (data == 0x55aa)
chksum |= (1 << (i - 65));
}
if (checksum != 0x00 && checksum == chksum) {
csn++;
isapnp_write_byte(0x06, csn);
udelay(250);
iteration++;
isapnp_wake(0x00);
isapnp_set_rdp();
udelay(1000);
write_address(0x01);
udelay(1000);
goto __next;
}
if (iteration == 1) {
isapnp_rdp += RDP_STEP;
if (isapnp_isolate_rdp_select() < 0)
return -1;
} else if (iteration > 1) {
break;
}
__next:
checksum = 0x6a;
chksum = 0x00;
bit = 0x00;
}
isapnp_wait();
return csn;
}
/*
* Read one tag from stream.
*/
static int __init isapnp_read_tag(unsigned char *type, unsigned short *size)
{
unsigned char tag, tmp[2];
isapnp_peek(&tag, 1);
if (tag == 0) /* invalid tag */
return -1;
if (tag & 0x80) { /* large item */
*type = tag;
isapnp_peek(tmp, 2);
*size = (tmp[1] << 8) | tmp[0];
} else {
*type = (tag >> 3) & 0x0f;
*size = tag & 0x07;
}
#if 0
printk(KERN_DEBUG "tag = 0x%x, type = 0x%x, size = %i\n", tag, *type, *size);
#endif
if (type == 0) /* wrong type */
return -1;
if (*type == 0xff && *size == 0xffff) /* probably invalid data */
return -1;
return 0;
}
/*
* Skip specified number of bytes from stream.
*/
static void __init isapnp_skip_bytes(int count)
{
isapnp_peek(NULL, count);
}
/*
* Parse logical device tag.
*/
static struct pci_dev * __init isapnp_parse_device(struct pci_bus *card, int size, int number)
{
unsigned char tmp[6];
struct pci_dev *dev;
isapnp_peek(tmp, size);
dev = isapnp_alloc(sizeof(struct pci_dev));
if (!dev)
return NULL;
dev->dma_mask = 0x00ffffff;
dev->devfn = number;
dev->vendor = (tmp[1] << 8) | tmp[0];
dev->device = (tmp[3] << 8) | tmp[2];
dev->regs = tmp[4];
dev->bus = card;
if (size > 5)
dev->regs |= tmp[5] << 8;
dev->prepare = isapnp_config_prepare;
dev->activate = isapnp_config_activate;
dev->deactivate = isapnp_config_deactivate;
return dev;
}
/*
* Build new resources structure
*/
static struct isapnp_resources * __init isapnp_build_resources(struct pci_dev *dev, int dependent)
{
struct isapnp_resources *res, *ptr, *ptra;
res = isapnp_alloc(sizeof(struct isapnp_resources));
if (!res)
return NULL;
res->dev = dev;
ptr = (struct isapnp_resources *)dev->sysdata;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr && ptr->dependent && dependent) { /* add to another list */
ptra = ptr->alt;
while (ptra && ptra->alt)
ptra = ptra->alt;
if (!ptra)
ptr->alt = res;
else
ptra->alt = res;
} else {
if (!ptr)
dev->sysdata = res;
else
ptr->next = res;
}
if (dependent) {
res->priority = dependent & 0xff;
if (res->priority > ISAPNP_RES_PRIORITY_FUNCTIONAL)
res->priority = ISAPNP_RES_PRIORITY_INVALID;
res->dependent = 1;
} else {
res->priority = ISAPNP_RES_PRIORITY_PREFERRED;
res->dependent = 0;
}
return res;
}
/*
* Add IRQ resource to resources list.
*/
static void __init isapnp_add_irq_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[3];
int i;
struct isapnp_irq *irq, *ptr;
isapnp_peek(tmp, size);
irq = isapnp_alloc(sizeof(struct isapnp_irq));
if (!irq)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(irq);
return;
}
}
irq->map = (tmp[1] << 8) | tmp[0];
if (size > 2)
irq->flags = tmp[2];
else
irq->flags = IORESOURCE_IRQ_HIGHEDGE;
irq->res = *res;
ptr = (*res)->irq;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = irq;
else
(*res)->irq = irq;
#ifdef CONFIG_PCI
for (i=0; i<16; i++)
if (irq->map & (1<<i))
pcibios_penalize_isa_irq(i);
#endif
}
/*
* Add DMA resource to resources list.
*/
static void __init isapnp_add_dma_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[2];
struct isapnp_dma *dma, *ptr;
isapnp_peek(tmp, size);
dma = isapnp_alloc(sizeof(struct isapnp_dma));
if (!dma)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(dma);
return;
}
}
dma->map = tmp[0];
dma->flags = tmp[1];
dma->res = *res;
ptr = (*res)->dma;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = dma;
else
(*res)->dma = dma;
}
/*
* Add port resource to resources list.
*/
static void __init isapnp_add_port_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[7];
struct isapnp_port *port, *ptr;
isapnp_peek(tmp, size);
port = isapnp_alloc(sizeof(struct isapnp_port));
if (!port)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(port);
return;
}
}
port->min = (tmp[2] << 8) | tmp[1];
port->max = (tmp[4] << 8) | tmp[3];
port->align = tmp[5];
port->size = tmp[6];
port->flags = tmp[0] ? ISAPNP_PORT_FLAG_16BITADDR : 0;
port->res = *res;
ptr = (*res)->port;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = port;
else
(*res)->port = port;
}
/*
* Add fixed port resource to resources list.
*/
static void __init isapnp_add_fixed_port_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[3];
struct isapnp_port *port, *ptr;
isapnp_peek(tmp, size);
port = isapnp_alloc(sizeof(struct isapnp_port));
if (!port)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(port);
return;
}
}
port->min = port->max = (tmp[1] << 8) | tmp[0];
port->size = tmp[2];
port->align = 0;
port->flags = ISAPNP_PORT_FLAG_FIXED;
port->res = *res;
ptr = (*res)->port;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = port;
else
(*res)->port = port;
}
/*
* Add memory resource to resources list.
*/
static void __init isapnp_add_mem_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[9];
struct isapnp_mem *mem, *ptr;
isapnp_peek(tmp, size);
mem = isapnp_alloc(sizeof(struct isapnp_mem));
if (!mem)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(mem);
return;
}
}
mem->min = ((tmp[2] << 8) | tmp[1]) << 8;
mem->max = ((tmp[4] << 8) | tmp[3]) << 8;
mem->align = (tmp[6] << 8) | tmp[5];
mem->size = ((tmp[8] << 8) | tmp[7]) << 8;
mem->flags = tmp[0];
mem->res = *res;
ptr = (*res)->mem;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = mem;
else
(*res)->mem = mem;
}
/*
* Add 32-bit memory resource to resources list.
*/
static void __init isapnp_add_mem32_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[17];
struct isapnp_mem32 *mem32, *ptr;
isapnp_peek(tmp, size);
mem32 = isapnp_alloc(sizeof(struct isapnp_mem32));
if (!mem32)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(mem32);
return;
}
}
memcpy(mem32->data, tmp, 17);
mem32->res = *res;
ptr = (*res)->mem32;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = mem32;
else
(*res)->mem32 = mem32;
}
/*
* Add 32-bit fixed memory resource to resources list.
*/
static void __init isapnp_add_fixed_mem32_resource(struct pci_dev *dev,
struct isapnp_resources **res,
int dependent, int size)
{
unsigned char tmp[17];
struct isapnp_mem32 *mem32, *ptr;
isapnp_peek(tmp, size);
mem32 = isapnp_alloc(sizeof(struct isapnp_mem32));
if (!mem32)
return;
if (*res == NULL) {
*res = isapnp_build_resources(dev, dependent);
if (*res == NULL) {
kfree(mem32);
return;
}
}
memcpy(mem32->data, tmp, 17);
mem32->res = *res;
ptr = (*res)->mem32;
while (ptr && ptr->next)
ptr = ptr->next;
if (ptr)
ptr->next = mem32;
else
(*res)->mem32 = mem32;
}
/*
* Parse card name for ISA PnP device.
*/
static void __init
isapnp_parse_name(char *name, unsigned int name_max, unsigned short *size)
{
if (name[0] == '\0') {
unsigned short size1 = *size >= name_max ? (name_max - 1) : *size;
isapnp_peek(name, size1);
name[size1] = '\0';
*size -= size1;
/* clean whitespace from end of string */
while (size1 > 0 && name[--size1] == ' ')
name[size1] = '\0';
}
}
/*
* Parse resource map for logical device.
*/
static int __init isapnp_create_device(struct pci_bus *card,
unsigned short size)
{
int number = 0, skip = 0, dependent = 0, compat = 0;
unsigned char type, tmp[17];
struct pci_dev *dev;
struct isapnp_resources *res = NULL;
if ((dev = isapnp_parse_device(card, size, number++)) == NULL)
return 1;
list_add(&dev->bus_list, &card->devices);
list_add_tail(&dev->global_list, &isapnp_devices);
while (1) {
if (isapnp_read_tag(&type, &size)<0)
return 1;
if (skip && type != _STAG_LOGDEVID && type != _STAG_END)
goto __skip;
switch (type) {
case _STAG_LOGDEVID:
if (size >= 5 && size <= 6) {
isapnp_config_prepare(dev);
if ((dev = isapnp_parse_device(card, size, number++)) == NULL)
return 1;
list_add_tail(&dev->bus_list, &card->devices);
list_add_tail(&dev->global_list, &isapnp_devices);
size = 0;
skip = 0;
} else {
skip = 1;
}
res = NULL;
dependent = 0;
compat = 0;
break;
case _STAG_COMPATDEVID:
if (size == 4 && compat < DEVICE_COUNT_COMPATIBLE) {
isapnp_peek(tmp, 4);
dev->vendor_compatible[compat] = (tmp[1] << 8) | tmp[0];
dev->device_compatible[compat] = (tmp[3] << 8) | tmp[2];
compat++;
size = 0;
}
break;
case _STAG_IRQ:
if (size < 2 || size > 3)
goto __skip;
isapnp_add_irq_resource(dev, &res, dependent, size);
size = 0;
break;
case _STAG_DMA:
if (size != 2)
goto __skip;
isapnp_add_dma_resource(dev, &res, dependent, size);
size = 0;
break;
case _STAG_STARTDEP:
if (size > 1)
goto __skip;
res = NULL;
dependent = 0x100 | ISAPNP_RES_PRIORITY_ACCEPTABLE;
if (size > 0) {
isapnp_peek(tmp, size);
dependent = 0x100 | tmp[0];
size = 0;
}
break;
case _STAG_ENDDEP:
if (size != 0)
goto __skip;
res = NULL;
dependent = 0;
break;
case _STAG_IOPORT:
if (size != 7)
goto __skip;
isapnp_add_port_resource(dev, &res, dependent, size);
size = 0;
break;
case _STAG_FIXEDIO:
if (size != 3)
goto __skip;
isapnp_add_fixed_port_resource(dev, &res, dependent, size);
size = 0;
break;
case _STAG_VENDOR:
break;
case _LTAG_MEMRANGE:
if (size != 9)
goto __skip;
isapnp_add_mem_resource(dev, &res, dependent, size);
size = 0;
break;
case _LTAG_ANSISTR:
isapnp_parse_name(dev->name, sizeof(dev->name), &size);
break;
case _LTAG_UNICODESTR:
/* silently ignore */
/* who use unicode for hardware identification? */
break;
case _LTAG_VENDOR:
break;
case _LTAG_MEM32RANGE:
if (size != 17)
goto __skip;
isapnp_add_mem32_resource(dev, &res, dependent, size);
size = 0;
break;
case _LTAG_FIXEDMEM32RANGE:
if (size != 17)
goto __skip;
isapnp_add_fixed_mem32_resource(dev, &res, dependent, size);
size = 0;
break;
case _STAG_END:
if (size > 0)
isapnp_skip_bytes(size);
isapnp_config_prepare(dev);
return 1;
default:
printk(KERN_ERR "isapnp: unexpected or unknown tag type 0x%x for logical device %i (device %i), ignored\n", type, dev->devfn, card->number);
}
__skip:
if (size > 0)
isapnp_skip_bytes(size);
}
isapnp_config_prepare(dev);
return 0;
}
/*
* Parse resource map for ISA PnP card.
*/
static void __init isapnp_parse_resource_map(struct pci_bus *card)
{
unsigned char type, tmp[17];
unsigned short size;
while (1) {
if (isapnp_read_tag(&type, &size)<0)
return;
switch (type) {
case _STAG_PNPVERNO:
if (size != 2)
goto __skip;
isapnp_peek(tmp, 2);
card->pnpver = tmp[0];
card->productver = tmp[1];
size = 0;
break;
case _STAG_LOGDEVID:
if (size >= 5 && size <= 6) {
if (isapnp_create_device(card, size)==1)
return;
size = 0;
}
break;
case _STAG_VENDOR:
break;
case _LTAG_ANSISTR:
isapnp_parse_name(card->name, sizeof(card->name), &size);
break;
case _LTAG_UNICODESTR:
/* silently ignore */
/* who use unicode for hardware identification? */
break;
case _LTAG_VENDOR:
break;
case _STAG_END:
if (size > 0)
isapnp_skip_bytes(size);
return;
default:
printk(KERN_ERR "isapnp: unexpected or unknown tag type 0x%x for device %i, ignored\n", type, card->number);
}
__skip:
if (size > 0)
isapnp_skip_bytes(size);
}
}
/*
* Compute ISA PnP checksum for first eight bytes.
*/
static unsigned char __init isapnp_checksum(unsigned char *data)
{
int i, j;
unsigned char checksum = 0x6a, bit, b;
for (i = 0; i < 8; i++) {
b = data[i];
for (j = 0; j < 8; j++) {
bit = 0;
if (b & (1 << j))
bit = 1;
checksum = ((((checksum ^ (checksum >> 1)) & 0x01) ^ bit) << 7) | (checksum >> 1);
}
}
return checksum;
}
/*
* Build device list for all present ISA PnP devices.
*/
static int __init isapnp_build_device_list(void)
{
int csn;
unsigned char header[9], checksum;
struct pci_bus *card;
struct pci_dev *dev;
isapnp_wait();
isapnp_key();
for (csn = 1; csn <= 10; csn++) {
isapnp_wake(csn);
isapnp_peek(header, 9);
checksum = isapnp_checksum(header);
#if 0
printk(KERN_DEBUG "vendor: %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
header[0], header[1], header[2], header[3],
header[4], header[5], header[6], header[7], header[8]);
printk(KERN_DEBUG "checksum = 0x%x\n", checksum);
#endif
/* Don't be strict on the checksum, here !
e.g. 'SCM SwapBox Plug and Play' has header[8]==0 (should be: b7)*/
if (header[8] == 0)
;
else if (checksum == 0x00 || checksum != header[8]) /* not valid CSN */
continue;
if ((card = isapnp_alloc(sizeof(struct pci_bus))) == NULL)
continue;
card->number = csn;
card->vendor = (header[1] << 8) | header[0];
card->device = (header[3] << 8) | header[2];
card->serial = (header[7] << 24) | (header[6] << 16) | (header[5] << 8) | header[4];
isapnp_checksum_value = 0x00;
INIT_LIST_HEAD(&card->children);
INIT_LIST_HEAD(&card->devices);
isapnp_parse_resource_map(card);
if (isapnp_checksum_value != 0x00)
printk(KERN_ERR "isapnp: checksum for device %i is not valid (0x%x)\n", csn, isapnp_checksum_value);
card->checksum = isapnp_checksum_value;
list_add_tail(&card->node, &isapnp_cards);
}
isapnp_for_each_dev(dev) {
isapnp_fixup_device(dev);
}
return 0;
}
/*
* Basic configuration routines.
*/
int isapnp_present(void)
{
return !list_empty(&isapnp_devices);
}
int isapnp_cfg_begin(int csn, int logdev)
{
if (csn < 1 || csn > 10 || logdev > 10)
return -EINVAL;
MOD_INC_USE_COUNT;
down(&isapnp_cfg_mutex);
isapnp_wait();
isapnp_key();
isapnp_wake(csn);
#if 1 /* to avoid malfunction when the isapnptools package is used */
isapnp_set_rdp();
udelay(1000); /* delay 1000us */
write_address(0x01);
udelay(1000); /* delay 1000us */
#endif
if (logdev >= 0)
isapnp_device(logdev);
return 0;
}
int isapnp_cfg_end(void)
{
isapnp_wait();
up(&isapnp_cfg_mutex);
MOD_DEC_USE_COUNT;
return 0;
}
/*
* Resource manager.
*/
static struct isapnp_port *isapnp_find_port(struct pci_dev *dev, int index)
{
struct isapnp_resources *res;
struct isapnp_port *port;
if (!dev || index < 0 || index > 7)
return NULL;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
for (port = res->port; port; port = port->next) {
if (!index)
return port;
index--;
}
}
return NULL;
}
struct isapnp_irq *isapnp_find_irq(struct pci_dev *dev, int index)
{
struct isapnp_resources *res, *resa;
struct isapnp_irq *irq;
int index1, index2, index3;
if (!dev || index < 0 || index > 7)
return NULL;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
index3 = 0;
for (resa = res; resa; resa = resa->alt) {
index1 = index;
index2 = 0;
for (irq = resa->irq; irq; irq = irq->next) {
if (!index1)
return irq;
index1--;
index2++;
}
if (index3 < index2)
index3 = index2;
}
index -= index3;
}
return NULL;
}
struct isapnp_dma *isapnp_find_dma(struct pci_dev *dev, int index)
{
struct isapnp_resources *res;
struct isapnp_dma *dma;
if (!dev || index < 0 || index > 7)
return NULL;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
for (dma = res->dma; dma; dma = dma->next) {
if (!index)
return dma;
index--;
}
}
return NULL;
}
struct isapnp_mem *isapnp_find_mem(struct pci_dev *dev, int index)
{
struct isapnp_resources *res;
struct isapnp_mem *mem;
if (!dev || index < 0 || index > 7)
return NULL;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
for (mem = res->mem; mem; mem = mem->next) {
if (!index)
return mem;
index--;
}
}
return NULL;
}
struct isapnp_mem32 *isapnp_find_mem32(struct pci_dev *dev, int index)
{
struct isapnp_resources *res;
struct isapnp_mem32 *mem32;
if (!dev || index < 0 || index > 7)
return NULL;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
for (mem32 = res->mem32; mem32; mem32 = mem32->next) {
if (!index)
return mem32;
index--;
}
}
return NULL;
}
/*
* Device manager.
*/
struct pci_bus *isapnp_find_card(unsigned short vendor,
unsigned short device,
struct pci_bus *from)
{
struct list_head *list;
list = isapnp_cards.next;
if (from)
list = from->node.next;
while (list != &isapnp_cards) {
struct pci_bus *card = pci_bus_b(list);
if (card->vendor == vendor && card->device == device)
return card;
list = list->next;
}
return NULL;
}
struct pci_dev *isapnp_find_dev(struct pci_bus *card,
unsigned short vendor,
unsigned short function,
struct pci_dev *from)
{
if (card == NULL) { /* look for a logical device from all cards */
struct list_head *list;
list = isapnp_devices.next;
if (from)
list = from->global_list.next;
while (list != &isapnp_devices) {
int idx;
struct pci_dev *dev = pci_dev_g(list);
if (dev->vendor == vendor && dev->device == function)
return dev;
for (idx = 0; idx < DEVICE_COUNT_COMPATIBLE; idx++)
if (dev->vendor_compatible[idx] == vendor &&
dev->device_compatible[idx] == function)
return dev;
list = list->next;
}
} else {
struct list_head *list;
list = card->devices.next;
if (from) {
list = from->bus_list.next;
if (from->bus != card) /* something is wrong */
return NULL;
}
while (list != &card->devices) {
int idx;
struct pci_dev *dev = pci_dev_b(list);
if (dev->vendor == vendor && dev->device == function)
return dev;
for (idx = 0; idx < DEVICE_COUNT_COMPATIBLE; idx++)
if (dev->vendor_compatible[idx] == vendor &&
dev->device_compatible[idx] == function)
return dev;
list = list->next;
}
}
return NULL;
}
static const struct isapnp_card_id *
isapnp_match_card(const struct isapnp_card_id *ids, struct pci_bus *card)
{
int idx;
while (ids->card_vendor || ids->card_device) {
if ((ids->card_vendor == ISAPNP_ANY_ID || ids->card_vendor == card->vendor) &&
(ids->card_device == ISAPNP_ANY_ID || ids->card_device == card->device)) {
for (idx = 0; idx < ISAPNP_CARD_DEVS; idx++) {
if (ids->devs[idx].vendor == 0 &&
ids->devs[idx].function == 0)
return ids;
if (isapnp_find_dev(card,
ids->devs[idx].vendor,
ids->devs[idx].function,
NULL) == NULL)
goto __next;
}
return ids;
}
__next:
ids++;
}
return NULL;
}
int isapnp_probe_cards(const struct isapnp_card_id *ids,
int (*probe)(struct pci_bus *_card,
const struct isapnp_card_id *_id))
{
struct pci_bus *card;
const struct isapnp_card_id *id;
int count = 0;
if (ids == NULL || probe == NULL)
return -EINVAL;
isapnp_for_each_card(card) {
id = isapnp_match_card(ids, card);
if (id != NULL && probe(card, id) >= 0)
count++;
}
return count;
}
static const struct isapnp_device_id *
isapnp_match_dev(const struct isapnp_device_id *ids, struct pci_dev *dev)
{
while (ids->card_vendor || ids->card_device) {
if ((ids->card_vendor == ISAPNP_ANY_ID || ids->card_vendor == dev->bus->vendor) &&
(ids->card_device == ISAPNP_ANY_ID || ids->card_device == dev->bus->device) &&
(ids->vendor == ISAPNP_ANY_ID || ids->vendor == dev->vendor) &&
(ids->function == ISAPNP_ANY_ID || ids->function == dev->device))
return ids;
ids++;
}
return NULL;
}
int isapnp_probe_devs(const struct isapnp_device_id *ids,
int (*probe)(struct pci_dev *dev,
const struct isapnp_device_id *id))
{
struct pci_dev *dev;
const struct isapnp_device_id *id;
int count = 0;
if (ids == NULL || probe == NULL)
return -EINVAL;
isapnp_for_each_dev(dev) {
id = isapnp_match_dev(ids, dev);
if (id != NULL && probe(dev, id) >= 0)
count++;
}
return count;
}
int isapnp_activate_dev(struct pci_dev *dev, const char *name)
{
int err;
/* Device already active? Let's use it and inform the caller */
if (dev->active)
return -EBUSY;
if ((err = dev->activate(dev)) < 0) {
printk(KERN_ERR "isapnp: config of %s failed (out of resources?)[%d]\n", name, err);
dev->deactivate(dev);
return err;
}
return 0;
}
static unsigned int isapnp_dma_resource_flags(struct isapnp_dma *dma)
{
return dma->flags | IORESOURCE_DMA | IORESOURCE_AUTO;
}
static unsigned int isapnp_mem_resource_flags(struct isapnp_mem *mem)
{
unsigned int result;
result = mem->flags | IORESOURCE_MEM | IORESOURCE_AUTO;
if (!(mem->flags & IORESOURCE_MEM_WRITEABLE))
result |= IORESOURCE_READONLY;
if (mem->flags & IORESOURCE_MEM_CACHEABLE)
result |= IORESOURCE_CACHEABLE;
if (mem->flags & IORESOURCE_MEM_RANGELENGTH)
result |= IORESOURCE_RANGELENGTH;
if (mem->flags & IORESOURCE_MEM_SHADOWABLE)
result |= IORESOURCE_SHADOWABLE;
return result;
}
static unsigned int isapnp_irq_resource_flags(struct isapnp_irq *irq)
{
return irq->flags | IORESOURCE_IRQ | IORESOURCE_AUTO;
}
static unsigned int isapnp_port_resource_flags(struct isapnp_port *port)
{
return port->flags | IORESOURCE_IO | IORESOURCE_AUTO;
}
static int isapnp_config_prepare(struct pci_dev *dev)
{
struct isapnp_resources *res, *resa;
struct isapnp_port *port;
struct isapnp_irq *irq;
struct isapnp_dma *dma;
struct isapnp_mem *mem;
int port_count, port_count1;
int irq_count, irq_count1;
int dma_count, dma_count1;
int mem_count, mem_count1;
int idx;
if (dev == NULL)
return -EINVAL;
if (dev->active || dev->ro)
return -EBUSY;
for (idx = 0; idx < DEVICE_COUNT_IRQ; idx++) {
dev->irq_resource[idx].name = NULL;
dev->irq_resource[idx].start = 0;
dev->irq_resource[idx].end = 0;
dev->irq_resource[idx].flags = 0;
}
for (idx = 0; idx < DEVICE_COUNT_DMA; idx++) {
dev->dma_resource[idx].name = NULL;
dev->dma_resource[idx].start = 0;
dev->dma_resource[idx].end = 0;
dev->dma_resource[idx].flags = 0;
}
for (idx = 0; idx < DEVICE_COUNT_RESOURCE; idx++) {
dev->resource[idx].name = NULL;
dev->resource[idx].start = 0;
dev->resource[idx].end = 0;
dev->resource[idx].flags = 0;
}
port_count = irq_count = dma_count = mem_count = 0;
for (res = (struct isapnp_resources *)dev->sysdata; res; res = res->next) {
port_count1 = irq_count1 = dma_count1 = mem_count1 = 0;
for (resa = res; resa; resa = resa->alt) {
for (port = resa->port, idx = 0; port; port = port->next, idx++) {
if (dev->resource[port_count + idx].flags == 0) {
dev->resource[port_count + idx].flags = isapnp_port_resource_flags(port);
dev->resource[port_count + idx].end = port->size;
}
}
if (port_count1 < idx)
port_count1 = idx;
for (irq = resa->irq, idx = 0; irq; irq = irq->next, idx++) {
int count = irq_count + idx;
if (count < DEVICE_COUNT_IRQ) {
if (dev->irq_resource[count].flags == 0) {
dev->irq_resource[count].flags = isapnp_irq_resource_flags(irq);
}
}
}
if (irq_count1 < idx)
irq_count1 = idx;
for (dma = resa->dma, idx = 0; dma; dma = dma->next, idx++)
if (dev->dma_resource[idx].flags == 0) {
dev->dma_resource[idx].flags = isapnp_dma_resource_flags(dma);
}
if (dma_count1 < idx)
dma_count1 = idx;
for (mem = resa->mem, idx = 0; mem; mem = mem->next, idx++)
if (dev->resource[mem_count + idx + 8].flags == 0) {
dev->resource[mem_count + idx + 8].flags = isapnp_mem_resource_flags(mem);
}
if (mem_count1 < idx)
mem_count1 = idx;
}
port_count += port_count1;
irq_count += irq_count1;
dma_count += dma_count1;
mem_count += mem_count1;
}
return 0;
}
struct isapnp_cfgtmp {
struct isapnp_port *port[8];
struct isapnp_irq *irq[2];
struct isapnp_dma *dma[2];
struct isapnp_mem *mem[4];
struct pci_dev *request;
struct pci_dev result;
};
static int isapnp_alternative_switch(struct isapnp_cfgtmp *cfg,
struct isapnp_resources *from,
struct isapnp_resources *to)
{
int tmp, tmp1;
struct isapnp_port *port;
struct isapnp_irq *irq;
struct isapnp_dma *dma;
struct isapnp_mem *mem;
if (!cfg)
return -EINVAL;
/* process port settings */
for (tmp = 0; tmp < 8; tmp++) {
if (!(cfg->request->resource[tmp].flags & IORESOURCE_AUTO))
continue; /* don't touch */
port = cfg->port[tmp];
if (!port) {
cfg->port[tmp] = port = isapnp_find_port(cfg->request, tmp);
if (!port)
return -EINVAL;
}
if (from && port->res == from) {
while (port->res != to) {
if (!port->res->alt)
return -EINVAL;
port = port->res->alt->port;
for (tmp1 = tmp; tmp1 > 0 && port; tmp1--)
port = port->next;
cfg->port[tmp] = port;
if (!port)
return -ENOENT;
cfg->result.resource[tmp].flags = isapnp_port_resource_flags(port);
}
}
}
/* process irq settings */
for (tmp = 0; tmp < 2; tmp++) {
if (!(cfg->request->irq_resource[tmp].flags & IORESOURCE_AUTO))
continue; /* don't touch */
irq = cfg->irq[tmp];
if (!irq) {
cfg->irq[tmp] = irq = isapnp_find_irq(cfg->request, tmp);
if (!irq)
return -EINVAL;
}
if (from && irq->res == from) {
while (irq->res != to) {
if (!irq->res->alt)
return -EINVAL;
irq = irq->res->alt->irq;
for (tmp1 = tmp; tmp1 > 0 && irq; tmp1--)
irq = irq->next;
cfg->irq[tmp] = irq;
if (!irq)
return -ENOENT;
cfg->result.irq_resource[tmp].flags = isapnp_irq_resource_flags(irq);
}
}
}
/* process dma settings */
for (tmp = 0; tmp < 2; tmp++) {
if (!(cfg->request->dma_resource[tmp].flags & IORESOURCE_AUTO))
continue; /* don't touch */
dma = cfg->dma[tmp];
if (!dma) {
cfg->dma[tmp] = dma = isapnp_find_dma(cfg->request, tmp);
if (!dma)
return -EINVAL;
}
if (from && dma->res == from) {
while (dma->res != to) {
if (!dma->res->alt)
return -EINVAL;
dma = dma->res->alt->dma;
for (tmp1 = tmp; tmp1 > 0 && dma; tmp1--)
dma = dma->next;
cfg->dma[tmp] = dma;
if (!dma)
return -ENOENT;
cfg->result.dma_resource[tmp].flags = isapnp_dma_resource_flags(dma);
}
}
}
/* process memory settings */
for (tmp = 0; tmp < 4; tmp++) {
if (!(cfg->request->resource[tmp + 8].flags & IORESOURCE_AUTO))
continue; /* don't touch */
mem = cfg->mem[tmp];
if (!mem) {
cfg->mem[tmp] = mem = isapnp_find_mem(cfg->request, tmp);
if (!mem)
return -EINVAL;
}
if (from && mem->res == from) {
while (mem->res != to) {
if (!mem->res->alt)
return -EINVAL;
mem = mem->res->alt->mem;
for (tmp1 = tmp; tmp1 > 0 && mem; tmp1--)
mem = mem->next;
cfg->mem[tmp] = mem;
if (!mem)
return -ENOENT;
cfg->result.resource[tmp + 8].flags = isapnp_mem_resource_flags(mem);
}
}
}
return 0;
}
static int isapnp_check_port(struct isapnp_cfgtmp *cfg, int port, int size, int idx)
{
int i, tmp, rport, rsize;
struct isapnp_port *xport;
struct pci_dev *dev;
if (check_region(port, size))
return 1;
for (i = 0; i < 8; i++) {
rport = isapnp_reserve_io[i << 1];
rsize = isapnp_reserve_io[(i << 1) + 1];
if (port >= rport && port < rport + rsize)
return 1;
if (port + size > rport && port + size < (rport + rsize) - 1)
return 1;
}
isapnp_for_each_dev(dev) {
if (dev->active) {
for (tmp = 0; tmp < 8; tmp++) {
if (dev->resource[tmp].flags) {
rport = dev->resource[tmp].start;
rsize = (dev->resource[tmp].end - rport) + 1;
if (port >= rport && port < rport + rsize)
return 1;
if (port + size > rport && port + size < (rport + rsize) - 1)
return 1;
}
}
}
}
for (i = 0; i < 8; i++) {
unsigned int flags;
if (i == idx)
continue;
flags = cfg->request->resource[i].flags;
if (!flags)
continue;
tmp = cfg->request->resource[i].start;
if (flags & IORESOURCE_AUTO) { /* auto */
xport = cfg->port[i];
if (!xport)
return 1;
if (cfg->result.resource[i].flags & IORESOURCE_AUTO)
continue;
tmp = cfg->result.resource[i].start;
if (tmp + xport->size >= port && tmp <= port + xport->size)
return 1;
continue;
}
if (port == tmp)
return 1;
xport = isapnp_find_port(cfg->request, i);
if (!xport)
return 1;
if (tmp + xport->size >= port && tmp <= port + xport->size)
return 1;
}
return 0;
}
static int isapnp_valid_port(struct isapnp_cfgtmp *cfg, int idx)
{
int err;
unsigned long *value1, *value2;
struct isapnp_port *port;
if (!cfg || idx < 0 || idx > 7)
return -EINVAL;
if (!(cfg->result.resource[idx].flags & IORESOURCE_AUTO)) /* don't touch */
return 0;
__again:
port = cfg->port[idx];
if (!port)
return -EINVAL;
value1 = &cfg->result.resource[idx].start;
value2 = &cfg->result.resource[idx].end;
if (cfg->result.resource[idx].flags & IORESOURCE_AUTO) {
cfg->result.resource[idx].flags &= ~IORESOURCE_AUTO;
*value1 = port->min;
*value2 = port->min + port->size - 1;
if (!isapnp_check_port(cfg, *value1, port->size, idx))
return 0;
}
do {
*value1 += port->align;
*value2 = *value1 + port->size - 1;
if (*value1 > port->max || !port->align) {
if (port->res && port->res->alt) {
if ((err = isapnp_alternative_switch(cfg, port->res, port->res->alt))<0)
return err;
goto __again;
}
return -ENOENT;
}
} while (isapnp_check_port(cfg, *value1, port->size, idx));
return 0;
}
static void isapnp_test_handler(int irq, void *dev_id, struct pt_regs *regs)
{
}
static int isapnp_check_interrupt(struct isapnp_cfgtmp *cfg, int irq, int idx)
{
int i;
struct pci_dev *dev;
if (irq < 0 || irq > 15)
return 1;
for (i = 0; i < 16; i++) {
if (isapnp_reserve_irq[i] == irq)
return 1;
}
isapnp_for_each_dev(dev) {
if (dev->active) {
if ((dev->irq_resource[0].flags && dev->irq_resource[0].start == irq) ||
(dev->irq_resource[1].flags && dev->irq_resource[1].start == irq))
return 1;
}
}
#ifdef CONFIG_PCI
if (!isapnp_skip_pci_scan) {
pci_for_each_dev(dev) {
if (dev->irq == irq)
return 1;
}
}
#endif
if (request_irq(irq, isapnp_test_handler, SA_INTERRUPT, "isapnp", NULL))
return 1;
free_irq(irq, NULL);
for (i = 0; i < DEVICE_COUNT_IRQ; i++) {
if (i == idx)
continue;
if (!cfg->result.irq_resource[i].flags)
continue;
if (cfg->result.irq_resource[i].flags & IORESOURCE_AUTO)
continue;
if (cfg->result.irq_resource[i].start == irq)
return 1;
}
return 0;
}
static int isapnp_valid_irq(struct isapnp_cfgtmp *cfg, int idx)
{
/* IRQ priority: this table is good for i386 */
static unsigned short xtab[16] = {
5, 10, 11, 12, 9, 14, 15, 7, 3, 4, 13, 0, 1, 6, 8, 2
};
int err, i;
unsigned long *value1, *value2;
struct isapnp_irq *irq;
if (!cfg || idx < 0 || idx > 1)
return -EINVAL;
if (!(cfg->result.irq_resource[idx].flags & IORESOURCE_AUTO))
return 0;
__again:
irq = cfg->irq[idx];
if (!irq)
return -EINVAL;
value1 = &cfg->result.irq_resource[idx].start;
value2 = &cfg->result.irq_resource[idx].end;
if (cfg->result.irq_resource[idx].flags & IORESOURCE_AUTO) {
for (i = 0; i < 16 && !(irq->map & (1<<xtab[i])); i++);
if (i >= 16)
return -ENOENT;
cfg->result.irq_resource[idx].flags &= ~IORESOURCE_AUTO;
if (!isapnp_check_interrupt(cfg, *value1 = *value2 = xtab[i], idx))
return 0;
}
do {
for (i = 0; i < 16 && xtab[i] != *value1; i++);
for (i++; i < 16 && !(irq->map & (1<<xtab[i])); i++);
if (i >= 16) {
if (irq->res && irq->res->alt) {
if ((err = isapnp_alternative_switch(cfg, irq->res, irq->res->alt))<0)
return err;
goto __again;
}
return -ENOENT;
} else {
*value1 = *value2 = xtab[i];
}
} while (isapnp_check_interrupt(cfg, *value1, idx));
return 0;
}
static int isapnp_check_dma(struct isapnp_cfgtmp *cfg, int dma, int idx)
{
int i;
struct pci_dev *dev;
/* Some machines allow DMA 0, but others don't. In fact on some
boxes DMA 0 is the memory refresh. Play safe */
if (dma < 1 || dma == 4 || dma > 7)
return 1;
for (i = 0; i < 8; i++) {
if (isapnp_reserve_dma[i] == dma)
return 1;
}
isapnp_for_each_dev(dev) {
if (dev->active) {
if ((dev->dma_resource[0].flags && dev->dma_resource[0].start == dma) ||
(dev->dma_resource[1].flags && dev->dma_resource[1].start == dma))
return 1;
}
}
if (request_dma(dma, "isapnp"))
return 1;
free_dma(dma);
for (i = 0; i < 2; i++) {
if (i == idx)
continue;
if (!cfg->result.dma_resource[i].flags ||
(cfg->result.dma_resource[i].flags & IORESOURCE_AUTO))
continue;
if (cfg->result.dma_resource[i].start == dma)
return 1;
}
return 0;
}
static int isapnp_valid_dma(struct isapnp_cfgtmp *cfg, int idx)
{
/* DMA priority: this table is good for i386 */
static unsigned short xtab[16] = {
1, 3, 5, 6, 7, 0, 2, 4
};
int err, i;
unsigned long *value1, *value2;
struct isapnp_dma *dma;
if (!cfg || idx < 0 || idx > 1)
return -EINVAL;
if (!(cfg->result.dma_resource[idx].flags & IORESOURCE_AUTO)) /* don't touch */
return 0;
__again:
dma = cfg->dma[idx];
if (!dma)
return -EINVAL;
value1 = &cfg->result.dma_resource[idx].start;
value2 = &cfg->result.dma_resource[idx].end;
if (cfg->result.dma_resource[idx].flags & IORESOURCE_AUTO) {
for (i = 0; i < 8 && !(dma->map & (1<<xtab[i])); i++);
if (i >= 8)
return -ENOENT;
cfg->result.dma_resource[idx].flags &= ~IORESOURCE_AUTO;
if (!isapnp_check_dma(cfg, *value1 = *value2 = xtab[i], idx))
return 0;
}
do {
for (i = 0; i < 8 && xtab[i] != *value1; i++);
for (i++; i < 8 && !(dma->map & (1<<xtab[i])); i++);
if (i >= 8) {
if (dma->res && dma->res->alt) {
if ((err = isapnp_alternative_switch(cfg, dma->res, dma->res->alt))<0)
return err;
goto __again;
}
return -ENOENT;
} else {
*value1 = *value2 = xtab[i];
}
} while (isapnp_check_dma(cfg, *value1, idx));
return 0;
}
static int isapnp_check_mem(struct isapnp_cfgtmp *cfg, unsigned int addr, unsigned int size, int idx)
{
int i, tmp;
unsigned int raddr, rsize;
struct isapnp_mem *xmem;
struct pci_dev *dev;
for (i = 0; i < 8; i++) {
raddr = (unsigned int)isapnp_reserve_mem[i << 1];
rsize = (unsigned int)isapnp_reserve_mem[(i << 1) + 1];
if (addr >= raddr && addr < raddr + rsize)
return 1;
if (addr + size > raddr && addr + size < (raddr + rsize) - 1)
return 1;
if (__check_region(&iomem_resource, addr, size))
return 1;
}
isapnp_for_each_dev(dev) {
if (dev->active) {
for (tmp = 0; tmp < 4; tmp++) {
if (dev->resource[tmp].flags) {
raddr = dev->resource[tmp + 8].start;
rsize = (dev->resource[tmp + 8].end - raddr) + 1;
if (addr >= raddr && addr < raddr + rsize)
return 1;
if (addr + size > raddr && addr + size < (raddr + rsize) - 1)
return 1;
}
}
}
}
for (i = 0; i < 4; i++) {
unsigned int flags = cfg->request->resource[i + 8].flags;
if (i == idx)
continue;
if (!flags)
continue;
tmp = cfg->result.resource[i + 8].start;
if (flags & IORESOURCE_AUTO) { /* auto */
xmem = cfg->mem[i];
if (!xmem)
return 1;
if (cfg->result.resource[i + 8].flags & IORESOURCE_AUTO)
continue;
if (tmp + xmem->size >= addr && tmp <= addr + xmem->size)
return 1;
continue;
}
if (addr == tmp)
return 1;
xmem = isapnp_find_mem(cfg->request, i);
if (!xmem)
return 1;
if (tmp + xmem->size >= addr && tmp <= addr + xmem->size)
return 1;
}
return 0;
}
static int isapnp_valid_mem(struct isapnp_cfgtmp *cfg, int idx)
{
int err;
unsigned long *value1, *value2;
struct isapnp_mem *mem;
if (!cfg || idx < 0 || idx > 3)
return -EINVAL;
if (!(cfg->result.resource[idx + 8].flags & IORESOURCE_AUTO)) /* don't touch */
return 0;
__again:
mem = cfg->mem[idx];
if (!mem)
return -EINVAL;
value1 = &cfg->result.resource[idx + 8].start;
value2 = &cfg->result.resource[idx + 8].end;
if (cfg->result.resource[idx + 8].flags & IORESOURCE_AUTO) {
cfg->result.resource[idx + 8].flags &= ~IORESOURCE_AUTO;
*value1 = mem->min;
*value2 = mem->min + mem->size - 1;
if (!isapnp_check_mem(cfg, *value1, mem->size, idx))
return 0;
}
do {
*value1 += mem->align;
*value2 = *value1 + mem->size - 1;
if (*value1 > mem->max || !mem->align) {
if (mem->res && mem->res->alt) {
if ((err = isapnp_alternative_switch(cfg, mem->res, mem->res->alt))<0)
return err;
goto __again;
}
return -ENOENT;
}
} while (isapnp_check_mem(cfg, *value1, mem->size, idx));
return 0;
}
static int isapnp_check_valid(struct isapnp_cfgtmp *cfg)
{
int tmp;
for (tmp = 0; tmp < 8; tmp++)
if (cfg->result.resource[tmp].flags & IORESOURCE_AUTO)
return -EAGAIN;
for (tmp = 0; tmp < 2; tmp++)
if (cfg->result.irq_resource[tmp].flags & IORESOURCE_AUTO)
return -EAGAIN;
for (tmp = 0; tmp < 2; tmp++)
if (cfg->result.dma_resource[tmp].flags & IORESOURCE_AUTO)
return -EAGAIN;
for (tmp = 0; tmp < 4; tmp++)
if (cfg->result.resource[tmp + 8].flags & IORESOURCE_AUTO)
return -EAGAIN;
return 0;
}
static int isapnp_config_activate(struct pci_dev *dev)
{
struct isapnp_cfgtmp cfg;
int tmp, fauto, err;
if (!dev)
return -EINVAL;
if (dev->active)
return -EBUSY;
memset(&cfg, 0, sizeof(cfg));
cfg.request = dev;
memcpy(&cfg.result, dev, sizeof(struct pci_dev));
/* check if all values are set, otherwise try auto-configuration */
for (tmp = fauto = 0; !fauto && tmp < 8; tmp++) {
if (dev->resource[tmp].flags & IORESOURCE_AUTO)
fauto++;
}
for (tmp = 0; !fauto && tmp < 2; tmp++) {
if (dev->irq_resource[tmp].flags & IORESOURCE_AUTO)
fauto++;
}
for (tmp = 0; !fauto && tmp < 2; tmp++) {
if (dev->dma_resource[tmp].flags & IORESOURCE_AUTO)
fauto++;
}
for (tmp = 0; !fauto && tmp < 4; tmp++) {
if (dev->resource[tmp + 8].flags & IORESOURCE_AUTO)
fauto++;
}
if (!fauto)
goto __skip_auto;
/* set variables to initial values */
if ((err = isapnp_alternative_switch(&cfg, NULL, NULL))<0)
return err;
/* find first valid configuration */
fauto = 0;
do {
for (tmp = 0; tmp < 8 && cfg.result.resource[tmp].flags; tmp++)
if ((err = isapnp_valid_port(&cfg, tmp))<0)
return err;
for (tmp = 0; tmp < 2 && cfg.result.irq_resource[tmp].flags; tmp++)
if ((err = isapnp_valid_irq(&cfg, tmp))<0)
return err;
for (tmp = 0; tmp < 2 && cfg.result.dma_resource[tmp].flags; tmp++)
if ((err = isapnp_valid_dma(&cfg, tmp))<0)
return err;
for (tmp = 0; tmp < 4 && cfg.result.resource[tmp + 8].flags; tmp++)
if ((err = isapnp_valid_mem(&cfg, tmp))<0)
return err;
} while (isapnp_check_valid(&cfg)<0 && fauto++ < 20);
if (fauto >= 20)
return -EAGAIN;
__skip_auto:
/* we have valid configuration, try configure hardware */
isapnp_cfg_begin(dev->bus->number, dev->devfn);
dev->active = 1;
dev->irq_resource[0] = cfg.result.irq_resource[0];
dev->irq_resource[1] = cfg.result.irq_resource[1];
dev->dma_resource[0] = cfg.result.dma_resource[0];
dev->dma_resource[1] = cfg.result.dma_resource[1];
for (tmp = 0; tmp < 12; tmp++) {
dev->resource[tmp] = cfg.result.resource[tmp];
}
for (tmp = 0; tmp < 8 && dev->resource[tmp].flags; tmp++)
isapnp_write_word(ISAPNP_CFG_PORT+(tmp<<1), dev->resource[tmp].start);
for (tmp = 0; tmp < 2 && dev->irq_resource[tmp].flags; tmp++) {
int irq = dev->irq_resource[tmp].start;
if (irq == 2)
irq = 9;
isapnp_write_byte(ISAPNP_CFG_IRQ+(tmp<<1), irq);
}
for (tmp = 0; tmp < 2 && dev->dma_resource[tmp].flags; tmp++)
isapnp_write_byte(ISAPNP_CFG_DMA+tmp, dev->dma_resource[tmp].start);
for (tmp = 0; tmp < 4 && dev->resource[tmp+8].flags; tmp++)
isapnp_write_word(ISAPNP_CFG_MEM+(tmp<<2), (dev->resource[tmp + 8].start >> 8) & 0xffff);
isapnp_activate(dev->devfn);
isapnp_cfg_end();
return 0;
}
static int isapnp_config_deactivate(struct pci_dev *dev)
{
if (!dev || !dev->active)
return -EINVAL;
isapnp_cfg_begin(dev->bus->number, dev->devfn);
isapnp_deactivate(dev->devfn);
dev->active = 0;
isapnp_cfg_end();
return 0;
}
void isapnp_resource_change(struct resource *resource,
unsigned long start,
unsigned long size)
{
if (resource == NULL)
return;
resource->flags &= ~IORESOURCE_AUTO;
resource->start = start;
resource->end = start + size - 1;
}
/*
* Inititialization.
*/
#ifdef MODULE
static void isapnp_free_port(struct isapnp_port *port)
{
struct isapnp_port *next;
while (port) {
next = port->next;
kfree(port);
port = next;
}
}
static void isapnp_free_irq(struct isapnp_irq *irq)
{
struct isapnp_irq *next;
while (irq) {
next = irq->next;
kfree(irq);
irq = next;
}
}
static void isapnp_free_dma(struct isapnp_dma *dma)
{
struct isapnp_dma *next;
while (dma) {
next = dma->next;
kfree(dma);
dma = next;
}
}
static void isapnp_free_mem(struct isapnp_mem *mem)
{
struct isapnp_mem *next;
while (mem) {
next = mem->next;
kfree(mem);
mem = next;
}
}
static void isapnp_free_mem32(struct isapnp_mem32 *mem32)
{
struct isapnp_mem32 *next;
while (mem32) {
next = mem32->next;
kfree(mem32);
mem32 = next;
}
}
static void isapnp_free_resources(struct isapnp_resources *resources, int alt)
{
struct isapnp_resources *next;
while (resources) {
next = alt ? resources->alt : resources->next;
isapnp_free_port(resources->port);
isapnp_free_irq(resources->irq);
isapnp_free_dma(resources->dma);
isapnp_free_mem(resources->mem);
isapnp_free_mem32(resources->mem32);
if (!alt && resources->alt)
isapnp_free_resources(resources->alt, 1);
kfree(resources);
resources = next;
}
}
static void isapnp_free_card(struct pci_bus *card)
{
while (!list_empty(&card->devices)) {
struct list_head *list = card->devices.next;
struct pci_dev *dev = pci_dev_b(list);
list_del(list);
isapnp_free_resources((struct isapnp_resources *)dev->sysdata, 0);
kfree(dev);
}
kfree(card);
}
#endif /* MODULE */
static void isapnp_free_all_resources(void)
{
#ifdef ISAPNP_REGION_OK
if (pidxr_res)
release_resource(pidxr_res);
#endif
if (pnpwrp_res)
release_resource(pnpwrp_res);
if (isapnp_rdp >= 0x203 && isapnp_rdp <= 0x3ff && isapnp_rdp_res)
release_resource(isapnp_rdp_res);
#ifdef MODULE
#ifdef CONFIG_PROC_FS
isapnp_proc_done();
#endif
while (!list_empty(&isapnp_cards)) {
struct list_head *list = isapnp_cards.next;
list_del(list);
isapnp_free_card(pci_bus_b(list));
}
#endif
}
static int isapnp_announce_device(struct isapnp_driver *drv,
struct pci_dev *dev)
{
const struct isapnp_device_id *id;
int ret = 0;
if (drv->id_table) {
id = isapnp_match_dev(drv->id_table, dev);
if (!id) {
ret = 0;
goto out;
}
} else
id = NULL;
if (drv->probe(dev, id) >= 0) {
dev->driver = (struct pci_driver *) drv;
ret = 1;
}
out:
return ret;
}
/**
* isapnp_dev_driver - get the isapnp_driver of a device
* @dev: the device to query
*
* Returns the appropriate isapnp_driver structure or %NULL if there is no
* registered driver for the device.
*/
static struct isapnp_driver *isapnp_dev_driver(const struct pci_dev *dev)
{
return (struct isapnp_driver *) dev->driver;
}
static LIST_HEAD(isapnp_drivers);
/**
* isapnp_register_driver - register a new ISAPnP driver
* @drv: the driver structure to register
*
* Adds the driver structure to the list of registered ISAPnP drivers
* Returns the number of isapnp devices which were claimed by the driver
* during registration. The driver remains registered even if the
* return value is zero.
*/
int isapnp_register_driver(struct isapnp_driver *drv)
{
struct pci_dev *dev;
int count = 0;
list_add_tail(&drv->node, &isapnp_drivers);
isapnp_for_each_dev(dev) {
if (!isapnp_dev_driver(dev))
count += isapnp_announce_device(drv, dev);
}
return count;
}
/**
* isapnp_unregister_driver - unregister an isapnp driver
* @drv: the driver structure to unregister
*
* Deletes the driver structure from the list of registered ISAPnP drivers,
* gives it a chance to clean up by calling its remove() function for
* each device it was responsible for, and marks those devices as
* driverless.
*/
void isapnp_unregister_driver(struct isapnp_driver *drv)
{
struct pci_dev *dev;
list_del(&drv->node);
isapnp_for_each_dev(dev) {
if (dev->driver == (struct pci_driver *) drv) {
if (drv->remove)
drv->remove(dev);
dev->driver = NULL;
}
}
}
EXPORT_SYMBOL(isapnp_cards);
EXPORT_SYMBOL(isapnp_devices);
EXPORT_SYMBOL(isapnp_present);
EXPORT_SYMBOL(isapnp_cfg_begin);
EXPORT_SYMBOL(isapnp_cfg_end);
EXPORT_SYMBOL(isapnp_read_byte);
EXPORT_SYMBOL(isapnp_read_word);
EXPORT_SYMBOL(isapnp_read_dword);
EXPORT_SYMBOL(isapnp_write_byte);
EXPORT_SYMBOL(isapnp_write_word);
EXPORT_SYMBOL(isapnp_write_dword);
EXPORT_SYMBOL(isapnp_wake);
EXPORT_SYMBOL(isapnp_device);
EXPORT_SYMBOL(isapnp_activate);
EXPORT_SYMBOL(isapnp_deactivate);
EXPORT_SYMBOL(isapnp_find_card);
EXPORT_SYMBOL(isapnp_find_dev);
EXPORT_SYMBOL(isapnp_probe_cards);
EXPORT_SYMBOL(isapnp_probe_devs);
EXPORT_SYMBOL(isapnp_activate_dev);
EXPORT_SYMBOL(isapnp_resource_change);
EXPORT_SYMBOL(isapnp_register_driver);
EXPORT_SYMBOL(isapnp_unregister_driver);
int __init isapnp_init(void)
{
int cards;
struct pci_bus *card;
if (isapnp_disable) {
isapnp_detected = 0;
printk(KERN_INFO "isapnp: ISA Plug & Play support disabled\n");
return 0;
}
#ifdef ISAPNP_REGION_OK
pidxr_res=request_region(_PIDXR, 1, "isapnp index");
if(!pidxr_res) {
printk(KERN_ERR "isapnp: Index Register 0x%x already used\n", _PIDXR);
return -EBUSY;
}
#endif
pnpwrp_res=request_region(_PNPWRP, 1, "isapnp write");
if(!pnpwrp_res) {
printk(KERN_ERR "isapnp: Write Data Register 0x%x already used\n", _PNPWRP);
#ifdef ISAPNP_REGION_OK
release_region(_PIDXR, 1);
#endif
return -EBUSY;
}
/*
* Print a message. The existing ISAPnP code is hanging machines
* so let the user know where.
*/
printk(KERN_INFO "isapnp: Scanning for PnP cards...\n");
if (isapnp_rdp >= 0x203 && isapnp_rdp <= 0x3ff) {
isapnp_rdp |= 3;
isapnp_rdp_res=request_region(isapnp_rdp, 1, "isapnp read");
if(!isapnp_rdp_res) {
printk(KERN_ERR "isapnp: Read Data Register 0x%x already used\n", isapnp_rdp);
#ifdef ISAPNP_REGION_OK
release_region(_PIDXR, 1);
#endif
release_region(isapnp_rdp, 1);
return -EBUSY;
}
isapnp_set_rdp();
}
isapnp_detected = 1;
if (isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff) {
cards = isapnp_isolate();
if (cards < 0 ||
(isapnp_rdp < 0x203 || isapnp_rdp > 0x3ff)) {
isapnp_free_all_resources();
isapnp_detected = 0;
printk(KERN_INFO "isapnp: No Plug & Play device found\n");
return 0;
}
isapnp_rdp_res=request_region(isapnp_rdp, 1, "isapnp read");
}
isapnp_build_device_list();
cards = 0;
isapnp_for_each_card(card) {
cards++;
if (isapnp_verbose) {
struct list_head *devlist;
printk(KERN_INFO "isapnp: Card '%s'\n", card->name[0]?card->name:"Unknown");
if (isapnp_verbose < 2)
continue;
for (devlist = card->devices.next; devlist != &card->devices; devlist = devlist->next) {
struct pci_dev *dev = pci_dev_b(devlist);
printk(KERN_INFO "isapnp: Device '%s'\n", dev->name[0]?card->name:"Unknown");
}
}
}
if (cards) {
printk(KERN_INFO "isapnp: %i Plug & Play card%s detected total\n", cards, cards>1?"s":"");
} else {
printk(KERN_INFO "isapnp: No Plug & Play card found\n");
}
#ifdef CONFIG_PROC_FS
isapnp_proc_init();
#endif
return 0;
}
#ifdef MODULE
int init_module(void)
{
return isapnp_init();
}
void cleanup_module(void)
{
if (isapnp_detected)
isapnp_free_all_resources();
}
#else
/* format is: noisapnp */
static int __init isapnp_setup_disable(char *str)
{
isapnp_disable = 1;
return 1;
}
__setup("noisapnp", isapnp_setup_disable);
/* format is: isapnp=rdp,reset,skip_pci_scan,verbose */
static int __init isapnp_setup_isapnp(char *str)
{
(void)((get_option(&str,&isapnp_rdp) == 2) &&
(get_option(&str,&isapnp_reset) == 2) &&
(get_option(&str,&isapnp_skip_pci_scan) == 2) &&
(get_option(&str,&isapnp_verbose) == 2));
return 1;
}
__setup("isapnp=", isapnp_setup_isapnp);
/* format is: isapnp_reserve_irq=irq1[,irq2] .... */
static int __init isapnp_setup_reserve_irq(char *str)
{
int i;
for (i = 0; i < 16; i++)
if (get_option(&str,&isapnp_reserve_irq[i]) != 2)
break;
return 1;
}
__setup("isapnp_reserve_irq=", isapnp_setup_reserve_irq);
/* format is: isapnp_reserve_dma=dma1[,dma2] .... */
static int __init isapnp_setup_reserve_dma(char *str)
{
int i;
for (i = 0; i < 8; i++)
if (get_option(&str,&isapnp_reserve_dma[i]) != 2)
break;
return 1;
}
__setup("isapnp_reserve_dma=", isapnp_setup_reserve_dma);
/* format is: isapnp_reserve_io=io1,size1[,io2,size2] .... */
static int __init isapnp_setup_reserve_io(char *str)
{
int i;
for (i = 0; i < 16; i++)
if (get_option(&str,&isapnp_reserve_io[i]) != 2)
break;
return 1;
}
__setup("isapnp_reserve_io=", isapnp_setup_reserve_io);
/* format is: isapnp_reserve_mem=mem1,size1[,mem2,size2] .... */
static int __init isapnp_setup_reserve_mem(char *str)
{
int i;
for (i = 0; i < 16; i++)
if (get_option(&str,&isapnp_reserve_mem[i]) != 2)
break;
return 1;
}
__setup("isapnp_reserve_mem=", isapnp_setup_reserve_mem);
#endif
|