39c50d587a
reading the CIS on some cards. However, not all just yet. This makes at least some of the xircom cards that weren't working to work. It doesn't make my home and away card work, however. o Don't get the card offset wrong. This is the biggest hassle for reading the CIS. The old code was just so wrong I can't believe that it worked at all. o Don't set the bit that allows/forces 16-bit memory access to the memory. It is hard coded with 0x80. o Don't need to slow down memory access with wait-states. OLDCARD didn't need them and it doesn't hurt anything. o remove bogus grousying in comment.
839 lines
23 KiB
C
839 lines
23 KiB
C
/*
|
||
* Copyright (c) 2002 M Warner Losh. All rights reserved.
|
||
*
|
||
* Redistribution and use in source and binary forms, with or without
|
||
* modification, are permitted provided that the following conditions
|
||
* are met:
|
||
* 1. Redistributions of source code must retain the above copyright
|
||
* notice, this list of conditions and the following disclaimer.
|
||
* 2. Redistributions in binary form must reproduce the above copyright
|
||
* notice, this list of conditions and the following disclaimer in the
|
||
* documentation and/or other materials provided with the distribution.
|
||
*
|
||
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
||
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
||
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
||
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
||
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
||
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
||
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
||
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||
*
|
||
* This software may be derived from NetBSD i82365.c and other files with
|
||
* the following copyright:
|
||
*
|
||
* Copyright (c) 1997 Marc Horowitz. All rights reserved.
|
||
*
|
||
* Redistribution and use in source and binary forms, with or without
|
||
* modification, are permitted provided that the following conditions
|
||
* are met:
|
||
* 1. Redistributions of source code must retain the above copyright
|
||
* notice, this list of conditions and the following disclaimer.
|
||
* 2. Redistributions in binary form must reproduce the above copyright
|
||
* notice, this list of conditions and the following disclaimer in the
|
||
* documentation and/or other materials provided with the distribution.
|
||
* 3. All advertising materials mentioning features or use of this software
|
||
* must display the following acknowledgement:
|
||
* This product includes software developed by Marc Horowitz.
|
||
* 4. The name of the author may not be used to endorse or promote products
|
||
* derived from this software without specific prior written permission.
|
||
*
|
||
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
||
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
||
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
||
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
||
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
||
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
||
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
||
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||
*/
|
||
|
||
#include <sys/cdefs.h>
|
||
__FBSDID("$FreeBSD$");
|
||
|
||
#include <sys/param.h>
|
||
#include <sys/systm.h>
|
||
#include <sys/condvar.h>
|
||
#include <sys/errno.h>
|
||
#include <sys/kernel.h>
|
||
#include <sys/malloc.h>
|
||
#include <sys/queue.h>
|
||
#include <sys/module.h>
|
||
#include <sys/lock.h>
|
||
#include <sys/mutex.h>
|
||
#include <sys/conf.h>
|
||
|
||
#include <sys/bus.h>
|
||
#include <machine/bus.h>
|
||
#include <sys/rman.h>
|
||
#include <machine/resource.h>
|
||
|
||
#include <dev/pccard/pccardreg.h>
|
||
#include <dev/pccard/pccardvar.h>
|
||
|
||
#include <dev/exca/excareg.h>
|
||
#include <dev/exca/excavar.h>
|
||
|
||
#ifdef EXCA_DEBUG
|
||
#define DEVPRINTF(dev, fmt, args...) device_printf((dev), (fmt), ## args)
|
||
#define DPRINTF(fmt, args...) printf(fmt, ## args)
|
||
#else
|
||
#define DEVPRINTF(dev, fmt, args...)
|
||
#define DPRINTF(fmt, args...)
|
||
#endif
|
||
|
||
#if 0
|
||
static const char *chip_names[] =
|
||
{
|
||
"CardBus socket",
|
||
"Intel i82365SL-A/B or clone",
|
||
"Intel i82365sl-DF step",
|
||
"VLSI chip",
|
||
"Cirrus Logic PD6710",
|
||
"Cirrus logic PD6722",
|
||
"Cirrus Logic PD6729",
|
||
"Vadem 365",
|
||
"Vadem 465",
|
||
"Vadem 468",
|
||
"Vadem 469",
|
||
"Ricoh RF5C296",
|
||
"Ricoh RF5C396",
|
||
"IBM clone",
|
||
"IBM KING PCMCIA Controller"
|
||
};
|
||
#endif
|
||
|
||
static exca_getb_fn exca_mem_getb;
|
||
static exca_putb_fn exca_mem_putb;
|
||
static exca_getb_fn exca_io_getb;
|
||
static exca_putb_fn exca_io_putb;
|
||
|
||
/* memory */
|
||
|
||
#define EXCA_MEMINFO(NUM) { \
|
||
EXCA_SYSMEM_ADDR ## NUM ## _START_LSB, \
|
||
EXCA_SYSMEM_ADDR ## NUM ## _START_MSB, \
|
||
EXCA_SYSMEM_ADDR ## NUM ## _STOP_LSB, \
|
||
EXCA_SYSMEM_ADDR ## NUM ## _STOP_MSB, \
|
||
EXCA_SYSMEM_ADDR ## NUM ## _WIN, \
|
||
EXCA_CARDMEM_ADDR ## NUM ## _LSB, \
|
||
EXCA_CARDMEM_ADDR ## NUM ## _MSB, \
|
||
EXCA_ADDRWIN_ENABLE_MEM ## NUM, \
|
||
}
|
||
|
||
static struct mem_map_index_st {
|
||
int sysmem_start_lsb;
|
||
int sysmem_start_msb;
|
||
int sysmem_stop_lsb;
|
||
int sysmem_stop_msb;
|
||
int sysmem_win;
|
||
int cardmem_lsb;
|
||
int cardmem_msb;
|
||
int memenable;
|
||
} mem_map_index[] = {
|
||
EXCA_MEMINFO(0),
|
||
EXCA_MEMINFO(1),
|
||
EXCA_MEMINFO(2),
|
||
EXCA_MEMINFO(3),
|
||
EXCA_MEMINFO(4)
|
||
};
|
||
#undef EXCA_MEMINFO
|
||
|
||
static uint8_t
|
||
exca_mem_getb(struct exca_softc *sc, int reg)
|
||
{
|
||
return (bus_space_read_1(sc->bst, sc->bsh, sc->offset + reg));
|
||
}
|
||
|
||
static void
|
||
exca_mem_putb(struct exca_softc *sc, int reg, uint8_t val)
|
||
{
|
||
bus_space_write_1(sc->bst, sc->bsh, sc->offset + reg, val);
|
||
}
|
||
|
||
static uint8_t
|
||
exca_io_getb(struct exca_softc *sc, int reg)
|
||
{
|
||
bus_space_write_1(sc->bst, sc->bsh, EXCA_REG_INDEX, reg + sc->offset);
|
||
return (bus_space_read_1(sc->bst, sc->bsh, EXCA_REG_DATA));
|
||
}
|
||
|
||
static void
|
||
exca_io_putb(struct exca_softc *sc, int reg, uint8_t val)
|
||
{
|
||
bus_space_write_1(sc->bst, sc->bsh, EXCA_REG_INDEX, reg + sc->offset);
|
||
bus_space_write_1(sc->bst, sc->bsh, EXCA_REG_DATA, val);
|
||
}
|
||
|
||
/*
|
||
* Helper function. This will map the requested memory slot. We setup the
|
||
* map before we call this function. This is used to initially force the
|
||
* mapping, as well as later restore the mapping after it has been destroyed
|
||
* in some fashion (due to a power event typically).
|
||
*/
|
||
static void
|
||
exca_do_mem_map(struct exca_softc *sc, int win)
|
||
{
|
||
struct mem_map_index_st *map;
|
||
struct pccard_mem_handle *mem;
|
||
|
||
map = &mem_map_index[win];
|
||
mem = &sc->mem[win];
|
||
exca_putb(sc, map->sysmem_start_lsb,
|
||
(mem->addr >> EXCA_SYSMEM_ADDRX_SHIFT) & 0xff);
|
||
exca_putb(sc, map->sysmem_start_msb,
|
||
((mem->addr >> (EXCA_SYSMEM_ADDRX_SHIFT + 8)) &
|
||
EXCA_SYSMEM_ADDRX_START_MSB_ADDR_MASK));
|
||
|
||
exca_putb(sc, map->sysmem_stop_lsb,
|
||
((mem->addr + mem->realsize - 1) >>
|
||
EXCA_SYSMEM_ADDRX_SHIFT) & 0xff);
|
||
exca_putb(sc, map->sysmem_stop_msb,
|
||
(((mem->addr + mem->realsize - 1) >>
|
||
(EXCA_SYSMEM_ADDRX_SHIFT + 8)) &
|
||
EXCA_SYSMEM_ADDRX_STOP_MSB_ADDR_MASK));
|
||
|
||
exca_putb(sc, map->sysmem_win,
|
||
(mem->addr >> EXCA_MEMREG_WIN_SHIFT) & 0xff);
|
||
|
||
exca_putb(sc, map->cardmem_lsb,
|
||
(mem->cardaddr >> EXCA_CARDMEM_ADDRX_SHIFT) & 0xff);
|
||
exca_putb(sc, map->cardmem_msb,
|
||
((mem->cardaddr >> (EXCA_CARDMEM_ADDRX_SHIFT + 8)) &
|
||
EXCA_CARDMEM_ADDRX_MSB_ADDR_MASK) |
|
||
((mem->kind == PCCARD_MEM_ATTR) ?
|
||
EXCA_CARDMEM_ADDRX_MSB_REGACTIVE_ATTR : 0));
|
||
|
||
exca_setb(sc, EXCA_ADDRWIN_ENABLE, map->memenable);
|
||
#ifdef EXCA_DEBUG
|
||
if (mem->kind == PCCARD_MEM_ATTR)
|
||
printf("attribtue memory\n");
|
||
else
|
||
printf("common memory\n");
|
||
#endif
|
||
exca_setb(sc, EXCA_ADDRWIN_ENABLE, EXCA_ADDRWIN_ENABLE_MEMCS16);
|
||
|
||
DELAY(100);
|
||
#ifdef EXCA_DEBUG
|
||
{
|
||
int r1, r2, r3, r4, r5, r6, r7;
|
||
r1 = exca_getb(sc, map->sysmem_start_msb);
|
||
r2 = exca_getb(sc, map->sysmem_start_lsb);
|
||
r3 = exca_getb(sc, map->sysmem_stop_msb);
|
||
r4 = exca_getb(sc, map->sysmem_stop_lsb);
|
||
r5 = exca_getb(sc, map->cardmem_msb);
|
||
r6 = exca_getb(sc, map->cardmem_lsb);
|
||
r7 = exca_getb(sc, map->sysmem_win);
|
||
printf("exca_do_mem_map window %d: %02x%02x %02x%02x "
|
||
"%02x%02x %02x (%08x+%08x.%08x*%08x)\n",
|
||
win, r1, r2, r3, r4, r5, r6, r7,
|
||
mem->addr, mem->size, mem->realsize,
|
||
mem->cardaddr);
|
||
}
|
||
#endif
|
||
}
|
||
|
||
/*
|
||
* public interface to map a resource. kind is the type of memory to
|
||
* map (either common or attribute). Memory created via this interface
|
||
* starts out at card address 0. Since the only way to set this is
|
||
* to set it on a struct resource after it has been mapped, we're safe
|
||
* in maping this assumption. Note that resources can be remapped using
|
||
* exca_do_mem_map so that's how the card address can be set later.
|
||
*/
|
||
int
|
||
exca_mem_map(struct exca_softc *sc, int kind, struct resource *res)
|
||
{
|
||
int win;
|
||
|
||
for (win = 0; win < EXCA_MEM_WINS; win++) {
|
||
if ((sc->memalloc & (1 << win)) == 0) {
|
||
sc->memalloc |= (1 << win);
|
||
break;
|
||
}
|
||
}
|
||
if (win >= EXCA_MEM_WINS)
|
||
return (1);
|
||
if (((rman_get_start(res) >> EXCA_CARDMEM_ADDRX_SHIFT) & 0xff) != 0 &&
|
||
(sc->flags & EXCA_HAS_MEMREG_WIN) == 0) {
|
||
device_printf(sc->dev, "Does not support mapping above 24M.");
|
||
return (1);
|
||
}
|
||
|
||
sc->mem[win].cardaddr = 0;
|
||
sc->mem[win].memt = rman_get_bustag(res);
|
||
sc->mem[win].memh = rman_get_bushandle(res);
|
||
sc->mem[win].addr = rman_get_start(res);
|
||
sc->mem[win].size = rman_get_end(res) - sc->mem[win].addr + 1;
|
||
sc->mem[win].realsize = sc->mem[win].size + EXCA_MEM_PAGESIZE - 1;
|
||
sc->mem[win].realsize = sc->mem[win].realsize -
|
||
(sc->mem[win].realsize % EXCA_MEM_PAGESIZE);
|
||
sc->mem[win].kind = kind;
|
||
DPRINTF("exca_mem_map window %d bus %x+%x card addr %x\n",
|
||
win, sc->mem[win].addr, sc->mem[win].size, sc->mem[win].cardaddr);
|
||
exca_do_mem_map(sc, win);
|
||
|
||
return (0);
|
||
}
|
||
|
||
/*
|
||
* Private helper function. This turns off a given memory map that is in
|
||
* use. We do this by just clearing the enable bit in the pcic. If we needed
|
||
* to make memory unmapping/mapping pairs faster, we would have to store
|
||
* more state information about the pcic and then use that to intelligently
|
||
* to the map/unmap. However, since we don't do that sort of thing often
|
||
* (generally just at configure time), it isn't a case worth optimizing.
|
||
*/
|
||
static void
|
||
exca_mem_unmap(struct exca_softc *sc, int window)
|
||
{
|
||
if (window < 0 || window >= EXCA_MEM_WINS)
|
||
panic("exca_mem_unmap: window out of range");
|
||
|
||
exca_clrb(sc, EXCA_ADDRWIN_ENABLE, mem_map_index[window].memenable);
|
||
sc->memalloc &= ~(1 << window);
|
||
}
|
||
|
||
/*
|
||
* Find the map that we're using to hold the resoruce. This works well
|
||
* so long as the client drivers don't do silly things like map the same
|
||
* area mutliple times, or map both common and attribute memory at the
|
||
* same time. This latter restriction is a bug. We likely should just
|
||
* store a pointer to the res in the mem[x] data structure.
|
||
*/
|
||
static int
|
||
exca_mem_findmap(struct exca_softc *sc, struct resource *res)
|
||
{
|
||
int win;
|
||
|
||
for (win = 0; win < EXCA_MEM_WINS; win++) {
|
||
if (sc->mem[win].memt == rman_get_bustag(res) &&
|
||
sc->mem[win].addr == rman_get_start(res) &&
|
||
sc->mem[win].size == rman_get_size(res))
|
||
return (win);
|
||
}
|
||
return (-1);
|
||
}
|
||
|
||
/*
|
||
* Set the memory flag. This means that we are setting if the memory
|
||
* is coming from attribute memory or from common memory on the card.
|
||
* CIS entries are generally in attribute memory (although they can
|
||
* reside in common memory). Generally, this is the only use for attribute
|
||
* memory. However, some cards require their drivers to dance in both
|
||
* common and/or attribute memory and this interface (and setting the
|
||
* offset interface) exist for such cards.
|
||
*/
|
||
int
|
||
exca_mem_set_flags(struct exca_softc *sc, struct resource *res, uint32_t flags)
|
||
{
|
||
int win;
|
||
|
||
win = exca_mem_findmap(sc, res);
|
||
if (win < 0) {
|
||
device_printf(sc->dev,
|
||
"set_res_flags: specified resource not active\n");
|
||
return (ENOENT);
|
||
}
|
||
|
||
sc->mem[win].kind = flags;
|
||
exca_do_mem_map(sc, win);
|
||
return (0);
|
||
}
|
||
|
||
/*
|
||
* Given a resource, go ahead and unmap it if we can find it in the
|
||
* resrouce list that's used.
|
||
*/
|
||
int
|
||
exca_mem_unmap_res(struct exca_softc *sc, struct resource *res)
|
||
{
|
||
int win;
|
||
|
||
win = exca_mem_findmap(sc, res);
|
||
if (win < 0)
|
||
return (ENOENT);
|
||
exca_mem_unmap(sc, win);
|
||
return (0);
|
||
}
|
||
|
||
/*
|
||
* Set the offset of the memory. We use this for reading the CIS and
|
||
* frobbing the pccard's pccard registers (POR, etc). Some drivers
|
||
* need to access this functionality as well, since they have receive
|
||
* buffers defined in the attribute memory.
|
||
*/
|
||
int
|
||
exca_mem_set_offset(struct exca_softc *sc, struct resource *res,
|
||
uint32_t cardaddr, uint32_t *deltap)
|
||
{
|
||
int win;
|
||
uint32_t delta;
|
||
|
||
win = exca_mem_findmap(sc, res);
|
||
if (win < 0) {
|
||
device_printf(sc->dev,
|
||
"set_memory_offset: specified resource not active\n");
|
||
return (ENOENT);
|
||
}
|
||
sc->mem[win].cardaddr = cardaddr & ~(EXCA_MEM_PAGESIZE - 1);
|
||
delta = cardaddr % EXCA_MEM_PAGESIZE;
|
||
if (deltap)
|
||
*deltap = delta;
|
||
sc->mem[win].realsize = sc->mem[win].size + delta +
|
||
EXCA_MEM_PAGESIZE - 1;
|
||
sc->mem[win].realsize = sc->mem[win].realsize -
|
||
(sc->mem[win].realsize % EXCA_MEM_PAGESIZE);
|
||
exca_do_mem_map(sc, win);
|
||
return (0);
|
||
}
|
||
|
||
|
||
/* I/O */
|
||
|
||
#define EXCA_IOINFO(NUM) { \
|
||
EXCA_IOADDR ## NUM ## _START_LSB, \
|
||
EXCA_IOADDR ## NUM ## _START_MSB, \
|
||
EXCA_IOADDR ## NUM ## _STOP_LSB, \
|
||
EXCA_IOADDR ## NUM ## _STOP_MSB, \
|
||
EXCA_ADDRWIN_ENABLE_IO ## NUM, \
|
||
EXCA_IOCTL_IO ## NUM ## _WAITSTATE \
|
||
| EXCA_IOCTL_IO ## NUM ## _ZEROWAIT \
|
||
| EXCA_IOCTL_IO ## NUM ## _IOCS16SRC_MASK \
|
||
| EXCA_IOCTL_IO ## NUM ## _DATASIZE_MASK, \
|
||
{ \
|
||
EXCA_IOCTL_IO ## NUM ## _IOCS16SRC_CARD, \
|
||
EXCA_IOCTL_IO ## NUM ## _IOCS16SRC_DATASIZE \
|
||
| EXCA_IOCTL_IO ## NUM ## _DATASIZE_8BIT, \
|
||
EXCA_IOCTL_IO ## NUM ## _IOCS16SRC_DATASIZE \
|
||
| EXCA_IOCTL_IO ## NUM ## _DATASIZE_16BIT, \
|
||
} \
|
||
}
|
||
|
||
static struct io_map_index_st {
|
||
int start_lsb;
|
||
int start_msb;
|
||
int stop_lsb;
|
||
int stop_msb;
|
||
int ioenable;
|
||
int ioctlmask;
|
||
int ioctlbits[3]; /* indexed by PCCARD_WIDTH_* */
|
||
} io_map_index[] = {
|
||
EXCA_IOINFO(0),
|
||
EXCA_IOINFO(1),
|
||
};
|
||
#undef EXCA_IOINFO
|
||
|
||
static void
|
||
exca_do_io_map(struct exca_softc *sc, int win)
|
||
{
|
||
struct io_map_index_st *map;
|
||
|
||
struct pccard_io_handle *io;
|
||
|
||
map = &io_map_index[win];
|
||
io = &sc->io[win];
|
||
exca_putb(sc, map->start_lsb, io->addr & 0xff);
|
||
exca_putb(sc, map->start_msb, (io->addr >> 8) & 0xff);
|
||
|
||
exca_putb(sc, map->stop_lsb, (io->addr + io->size - 1) & 0xff);
|
||
exca_putb(sc, map->stop_msb, ((io->addr + io->size - 1) >> 8) & 0xff);
|
||
|
||
exca_clrb(sc, EXCA_IOCTL, map->ioctlmask);
|
||
exca_setb(sc, EXCA_IOCTL, map->ioctlbits[io->width]);
|
||
|
||
exca_setb(sc, EXCA_ADDRWIN_ENABLE, map->ioenable);
|
||
#ifdef EXCA_DEBUG
|
||
{
|
||
int r1, r2, r3, r4;
|
||
r1 = exca_getb(sc, map->start_msb);
|
||
r2 = exca_getb(sc, map->start_lsb);
|
||
r3 = exca_getb(sc, map->stop_msb);
|
||
r4 = exca_getb(sc, map->stop_lsb);
|
||
DPRINTF("exca_do_io_map window %d: %02x%02x %02x%02x "
|
||
"(%08x+%08x)\n", win, r1, r2, r3, r4,
|
||
io->addr, io->size);
|
||
}
|
||
#endif
|
||
}
|
||
|
||
int
|
||
exca_io_map(struct exca_softc *sc, int width, struct resource *r)
|
||
{
|
||
int win;
|
||
#ifdef EXCA_DEBUG
|
||
static char *width_names[] = { "auto", "io8", "io16"};
|
||
#endif
|
||
for (win=0; win < EXCA_IO_WINS; win++) {
|
||
if ((sc->ioalloc & (1 << win)) == 0) {
|
||
sc->ioalloc |= (1 << win);
|
||
break;
|
||
}
|
||
}
|
||
if (win >= EXCA_IO_WINS)
|
||
return (1);
|
||
|
||
sc->io[win].iot = rman_get_bustag(r);
|
||
sc->io[win].ioh = rman_get_bushandle(r);
|
||
sc->io[win].addr = rman_get_start(r);
|
||
sc->io[win].size = rman_get_end(r) - sc->io[win].addr + 1;
|
||
sc->io[win].flags = 0;
|
||
sc->io[win].width = width;
|
||
DPRINTF("exca_io_map window %d %s port %x+%x\n",
|
||
win, width_names[width], sc->io[win].addr,
|
||
sc->io[win].size);
|
||
exca_do_io_map(sc, win);
|
||
|
||
return (0);
|
||
}
|
||
|
||
static void
|
||
exca_io_unmap(struct exca_softc *sc, int window)
|
||
{
|
||
if (window >= EXCA_IO_WINS)
|
||
panic("exca_io_unmap: window out of range");
|
||
|
||
exca_clrb(sc, EXCA_ADDRWIN_ENABLE, io_map_index[window].ioenable);
|
||
|
||
sc->ioalloc &= ~(1 << window);
|
||
|
||
sc->io[window].iot = 0;
|
||
sc->io[window].ioh = 0;
|
||
sc->io[window].addr = 0;
|
||
sc->io[window].size = 0;
|
||
sc->io[window].flags = 0;
|
||
sc->io[window].width = 0;
|
||
}
|
||
|
||
static int
|
||
exca_io_findmap(struct exca_softc *sc, struct resource *res)
|
||
{
|
||
int win;
|
||
|
||
for (win = 0; win < EXCA_IO_WINS; win++) {
|
||
if (sc->io[win].iot == rman_get_bustag(res) &&
|
||
sc->io[win].addr == rman_get_start(res) &&
|
||
sc->io[win].size == rman_get_size(res))
|
||
return (win);
|
||
}
|
||
return (-1);
|
||
}
|
||
|
||
|
||
int
|
||
exca_io_unmap_res(struct exca_softc *sc, struct resource *res)
|
||
{
|
||
int win;
|
||
|
||
win = exca_io_findmap(sc, res);
|
||
if (win < 0)
|
||
return (ENOENT);
|
||
exca_io_unmap(sc, win);
|
||
return (0);
|
||
}
|
||
|
||
/* Misc */
|
||
|
||
/*
|
||
* If interrupts are enabled, then we should be able to just wait for
|
||
* an interrupt routine to wake us up. Busy waiting shouldn't be
|
||
* necessary. Sadly, not all legacy ISA cards support an interrupt
|
||
* for the busy state transitions, at least according to their datasheets,
|
||
* so we busy wait a while here..
|
||
*/
|
||
static void
|
||
exca_wait_ready(struct exca_softc *sc)
|
||
{
|
||
int i;
|
||
DEVPRINTF(sc->dev, "exca_wait_ready: status 0x%02x\n",
|
||
exca_getb(sc, EXCA_IF_STATUS));
|
||
for (i = 0; i < 10000; i++) {
|
||
if (exca_getb(sc, EXCA_IF_STATUS) & EXCA_IF_STATUS_READY)
|
||
return;
|
||
DELAY(500);
|
||
}
|
||
device_printf(sc->dev, "ready never happened, status = %02x\n",
|
||
exca_getb(sc, EXCA_IF_STATUS));
|
||
}
|
||
|
||
/*
|
||
* Reset the card. Ideally, we'd do a lot of this via interrupts.
|
||
* However, many PC Cards will deassert the ready signal. This means
|
||
* that they are asserting an interrupt. This makes it hard to
|
||
* do anything but a busy wait here. One could argue that these
|
||
* such cards are broken, or that the bridge that allows this sort
|
||
* of interrupt through isn't quite what you'd want (and may be a standards
|
||
* violation). However, such arguing would leave a huge class of pc cards
|
||
* and bridges out of reach for use in the system.
|
||
*
|
||
* Maybe I should reevaluate the above based on the power bug I fixed
|
||
* in OLDCARD.
|
||
*/
|
||
void
|
||
exca_reset(struct exca_softc *sc, device_t child)
|
||
{
|
||
int cardtype;
|
||
int win;
|
||
|
||
/* enable socket i/o */
|
||
exca_setb(sc, EXCA_PWRCTL, EXCA_PWRCTL_OE);
|
||
|
||
exca_putb(sc, EXCA_INTR, EXCA_INTR_ENABLE);
|
||
/* hold reset for 30ms */
|
||
DELAY(30*1000);
|
||
/* clear the reset flag */
|
||
exca_setb(sc, EXCA_INTR, EXCA_INTR_RESET);
|
||
/* wait 20ms as per pc card standard (r2.01) section 4.3.6 */
|
||
DELAY(20*1000);
|
||
|
||
exca_wait_ready(sc);
|
||
|
||
/* disable all address windows */
|
||
exca_putb(sc, EXCA_ADDRWIN_ENABLE, 0);
|
||
|
||
CARD_GET_TYPE(child, &cardtype);
|
||
exca_setb(sc, EXCA_INTR, (cardtype == PCCARD_IFTYPE_IO) ?
|
||
EXCA_INTR_CARDTYPE_IO : EXCA_INTR_CARDTYPE_MEM);
|
||
DEVPRINTF(sc->dev, "card type is %s\n",
|
||
(cardtype == PCCARD_IFTYPE_IO) ? "io" : "mem");
|
||
|
||
/* reinstall all the memory and io mappings */
|
||
for (win = 0; win < EXCA_MEM_WINS; ++win)
|
||
if (sc->memalloc & (1 << win))
|
||
exca_do_mem_map(sc, win);
|
||
for (win = 0; win < EXCA_IO_WINS; ++win)
|
||
if (sc->ioalloc & (1 << win))
|
||
exca_do_io_map(sc, win);
|
||
}
|
||
|
||
/*
|
||
* Initialize the exca_softc data structure for the first time.
|
||
*/
|
||
void
|
||
exca_init(struct exca_softc *sc, device_t dev,
|
||
bus_space_tag_t bst, bus_space_handle_t bsh, uint32_t offset)
|
||
{
|
||
sc->dev = dev;
|
||
sc->memalloc = 0;
|
||
sc->ioalloc = 0;
|
||
sc->bst = bst;
|
||
sc->bsh = bsh;
|
||
sc->offset = offset;
|
||
sc->flags = 0;
|
||
sc->getb = exca_mem_getb;
|
||
sc->putb = exca_mem_putb;
|
||
}
|
||
|
||
/*
|
||
* Is this socket valid?
|
||
*/
|
||
static int
|
||
exca_valid_slot(struct exca_softc *exca)
|
||
{
|
||
uint8_t c;
|
||
|
||
/* Assume the worst */
|
||
exca->chipset = EXCA_BOGUS;
|
||
|
||
/*
|
||
* see if there's a PCMCIA controller here
|
||
* Intel PCMCIA controllers use 0x82 and 0x83
|
||
* IBM clone chips use 0x88 and 0x89, apparently
|
||
*/
|
||
c = exca_getb(exca, EXCA_IDENT);
|
||
if ((c & EXCA_IDENT_IFTYPE_MASK) != EXCA_IDENT_IFTYPE_MEM_AND_IO)
|
||
return (0);
|
||
if ((c & EXCA_IDENT_ZERO) != 0)
|
||
return (0);
|
||
switch (c & EXCA_IDENT_REV_MASK) {
|
||
/*
|
||
* 82365 or clones.
|
||
*/
|
||
case EXCA_IDENT_REV_I82365SLR0:
|
||
case EXCA_IDENT_REV_I82365SLR1:
|
||
exca->chipset = EXCA_I82365;
|
||
/*
|
||
* Check for Vadem chips by unlocking their extra
|
||
* registers and looking for valid ID. Bit 3 in
|
||
* the ID register is normally 0, except when
|
||
* EXCA_VADEMREV is set. Other bridges appear
|
||
* to ignore this frobbing.
|
||
*/
|
||
bus_space_write_1(exca->bst, exca->bsh, EXCA_REG_INDEX,
|
||
EXCA_VADEM_COOKIE1);
|
||
bus_space_write_1(exca->bst, exca->bsh, EXCA_REG_INDEX,
|
||
EXCA_VADEM_COOKIE2);
|
||
exca_setb(exca, EXCA_VADEM_VMISC, EXCA_VADEM_REV);
|
||
c = exca_getb(exca, EXCA_IDENT);
|
||
if (c & 0x08) {
|
||
switch (c & 7) {
|
||
case 1:
|
||
exca->chipset = EXCA_VG365;
|
||
break;
|
||
case 2:
|
||
exca->chipset = EXCA_VG465;
|
||
break;
|
||
case 3:
|
||
exca->chipset = EXCA_VG468;
|
||
break;
|
||
default:
|
||
exca->chipset = EXCA_VG469;
|
||
break;
|
||
}
|
||
exca_clrb(exca, EXCA_VADEM_VMISC, EXCA_VADEM_REV);
|
||
break;
|
||
}
|
||
/*
|
||
* Check for RICOH RF5C[23]96 PCMCIA Controller
|
||
*/
|
||
c = exca_getb(exca, EXCA_RICOH_ID);
|
||
if (c == EXCA_RID_396) {
|
||
exca->chipset = EXCA_RF5C396;
|
||
break;
|
||
} else if (c == EXCA_RID_296) {
|
||
exca->chipset = EXCA_RF5C296;
|
||
break;
|
||
}
|
||
/*
|
||
* Check for Cirrus logic chips.
|
||
*/
|
||
exca_putb(exca, EXCA_CIRRUS_CHIP_INFO, 0);
|
||
c = exca_getb(exca, EXCA_CIRRUS_CHIP_INFO);
|
||
if ((c & EXCA_CIRRUS_CHIP_INFO_CHIP_ID) ==
|
||
EXCA_CIRRUS_CHIP_INFO_CHIP_ID) {
|
||
c = exca_getb(exca, EXCA_CIRRUS_CHIP_INFO);
|
||
if ((c & EXCA_CIRRUS_CHIP_INFO_CHIP_ID) == 0) {
|
||
if (c & EXCA_CIRRUS_CHIP_INFO_SLOTS)
|
||
exca->chipset = EXCA_PD6722;
|
||
else
|
||
exca->chipset = EXCA_PD6710;
|
||
break;
|
||
}
|
||
}
|
||
break;
|
||
|
||
case EXCA_IDENT_REV_I82365SLDF:
|
||
/*
|
||
* Intel i82365sl-DF step or maybe a vlsi 82c146
|
||
* we detected the vlsi case earlier, so if the controller
|
||
* isn't set, we know it is a i82365sl step D.
|
||
*/
|
||
exca->chipset = EXCA_I82365SL_DF;
|
||
break;
|
||
case EXCA_IDENT_REV_IBM1:
|
||
case EXCA_IDENT_REV_IBM2:
|
||
exca->chipset = EXCA_IBM;
|
||
break;
|
||
case EXCA_IDENT_REV_IBM_KING:
|
||
exca->chipset = EXCA_IBM_KING;
|
||
break;
|
||
default:
|
||
return (0);
|
||
}
|
||
return (1);
|
||
}
|
||
|
||
/*
|
||
* Probe the expected slots. We maybe should set the ID for each of these
|
||
* slots too while we're at it. But maybe that belongs to a separate
|
||
* function.
|
||
*
|
||
* The caller must guarantee that at least EXCA_NSLOTS are present in exca.
|
||
*/
|
||
int
|
||
exca_probe_slots(device_t dev, struct exca_softc *exca, bus_space_tag_t iot,
|
||
bus_space_handle_t ioh)
|
||
{
|
||
int err;
|
||
int i;
|
||
|
||
err = ENXIO;
|
||
for (i = 0; i < EXCA_NSLOTS; i++) {
|
||
exca_init(&exca[i], dev, iot, ioh, i * EXCA_SOCKET_SIZE);
|
||
exca->getb = exca_io_getb;
|
||
exca->putb = exca_io_putb;
|
||
if (exca_valid_slot(&exca[i]))
|
||
err = 0;
|
||
}
|
||
return (err);
|
||
}
|
||
|
||
void
|
||
exca_insert(struct exca_softc *exca)
|
||
{
|
||
if (exca->pccarddev != NULL) {
|
||
if (CARD_ATTACH_CARD(exca->pccarddev) != 0)
|
||
device_printf(exca->dev,
|
||
"PC Card card activation failed\n");
|
||
} else {
|
||
device_printf(exca->dev,
|
||
"PC Card inserted, but no pccard bus.\n");
|
||
}
|
||
}
|
||
|
||
|
||
void
|
||
exca_removal(struct exca_softc *exca)
|
||
{
|
||
if (exca->pccarddev != NULL)
|
||
CARD_DETACH_CARD(exca->pccarddev);
|
||
}
|
||
|
||
int
|
||
exca_activate_resource(struct exca_softc *exca, device_t child, int type,
|
||
int rid, struct resource *res)
|
||
{
|
||
int err;
|
||
if (!(rman_get_flags(res) & RF_ACTIVE)) { /* not already activated */
|
||
switch (type) {
|
||
case SYS_RES_IOPORT:
|
||
err = exca_io_map(exca, 0, res);
|
||
break;
|
||
case SYS_RES_MEMORY:
|
||
err = exca_mem_map(exca, 0, res);
|
||
break;
|
||
default:
|
||
err = 0;
|
||
break;
|
||
}
|
||
if (err)
|
||
return (err);
|
||
|
||
}
|
||
return (BUS_ACTIVATE_RESOURCE(device_get_parent(exca->dev), child,
|
||
type, rid, res));
|
||
}
|
||
|
||
int
|
||
exca_deactivate_resource(struct exca_softc *exca, device_t child, int type,
|
||
int rid, struct resource *res)
|
||
{
|
||
if (rman_get_flags(res) & RF_ACTIVE) { /* if activated */
|
||
switch (type) {
|
||
case SYS_RES_IOPORT:
|
||
if (exca_io_unmap_res(exca, res))
|
||
return (ENOENT);
|
||
break;
|
||
case SYS_RES_MEMORY:
|
||
if (exca_mem_unmap_res(exca, res))
|
||
return (ENOENT);
|
||
break;
|
||
}
|
||
}
|
||
return (BUS_DEACTIVATE_RESOURCE(device_get_parent(exca->dev), child,
|
||
type, rid, res));
|
||
}
|
||
|
||
static int
|
||
exca_modevent(module_t mod, int cmd, void *arg)
|
||
{
|
||
return 0;
|
||
}
|
||
|
||
DEV_MODULE(exca, exca_modevent, NULL);
|
||
MODULE_VERSION(exca, 1);
|