509 lines
15 KiB
C
509 lines
15 KiB
C
/*
|
|
* Copyright (c) 1998 Matthias Apitz. 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. Neither the name of the author nor the names of any co-contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
* 4. Altered versions must be plainly marked as such, and must not be
|
|
* misrepresented as being the original software and/or documentation.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``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 OR CONTRIBUTORS 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.
|
|
*
|
|
*---------------------------------------------------------------------------
|
|
*
|
|
* Fritz!Card pcmcia specific routines for isic driver
|
|
* ---------------------------------------------------
|
|
*
|
|
* $Id: isic_pcmcia_avm_fritz.c,v 1.3 2001/11/13 07:26:33 lukem Exp $
|
|
*
|
|
* last edit-date: [Fri Jan 5 11:39:32 2001]
|
|
*
|
|
* -ap added support for AVM PCMCIA Fritz!Card
|
|
* -mh split into separate file
|
|
*
|
|
*---------------------------------------------------------------------------*/
|
|
|
|
#include <sys/cdefs.h>
|
|
__KERNEL_RCSID(0, "$NetBSD: isic_pcmcia_avm_fritz.c,v 1.3 2001/11/13 07:26:33 lukem Exp $");
|
|
|
|
#include "opt_isicpcmcia.h"
|
|
#ifdef ISICPCMCIA_AVM_A1
|
|
|
|
#include <sys/param.h>
|
|
#if defined(__FreeBSD__) && __FreeBSD__ >= 3
|
|
#include <sys/ioccom.h>
|
|
#else
|
|
#include <sys/ioctl.h>
|
|
#endif
|
|
#include <sys/kernel.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/mbuf.h>
|
|
|
|
#ifdef __FreeBSD__
|
|
#include <machine/clock.h>
|
|
#include <i386/isa/isa_device.h>
|
|
#else
|
|
#include <machine/bus.h>
|
|
#include <sys/device.h>
|
|
#endif
|
|
|
|
#include <sys/socket.h>
|
|
#include <net/if.h>
|
|
|
|
#if defined(__NetBSD__) && __NetBSD_Version__ >= 104230000
|
|
#include <sys/callout.h>
|
|
#endif
|
|
|
|
#ifdef __FreeBSD__
|
|
#include <machine/i4b_debug.h>
|
|
#include <machine/i4b_ioctl.h>
|
|
#else
|
|
#include <netisdn/i4b_debug.h>
|
|
#include <netisdn/i4b_ioctl.h>
|
|
#include <dev/pcmcia/pcmciareg.h>
|
|
#include <dev/pcmcia/pcmciavar.h>
|
|
#endif
|
|
|
|
#include <dev/ic/isic_l1.h>
|
|
#include <dev/ic/isac.h>
|
|
#include <dev/ic/hscx.h>
|
|
|
|
#ifndef __FreeBSD__
|
|
#include <dev/pcmcia/isic_pcmcia.h>
|
|
|
|
/* PCMCIA support routines */
|
|
static u_int8_t avma1_pcmcia_read_reg __P((struct l1_softc *sc, int what, bus_size_t offs));
|
|
static void avma1_pcmcia_write_reg __P((struct l1_softc *sc, int what, bus_size_t offs, u_int8_t data));
|
|
static void avma1_pcmcia_read_fifo __P((struct l1_softc *sc, int what, void *buf, size_t size));
|
|
static void avma1_pcmcia_write_fifo __P((struct l1_softc *sc, int what, const void *data, size_t size));
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* AVM PCMCIA Fritz!Card special registers
|
|
*---------------------------------------------------------------------------*/
|
|
|
|
/*
|
|
* register offsets from i/o base 0x140 or 0x300
|
|
*/
|
|
#define ADDR_REG_OFFSET 0x02
|
|
#define DATA_REG_OFFSET 0x03
|
|
#define STAT0_OFFSET 0x04
|
|
#define STAT1_OFFSET 0x05
|
|
#define MODREG_OFFSET 0x06
|
|
#define VERREG_OFFSET 0x07
|
|
/*
|
|
* AVM PCMCIA Status Latch 0 read only bits
|
|
*/
|
|
#define ASL_IRQ_TIMER 0x10 /* Timer interrupt, active low */
|
|
#define ASL_IRQ_ISAC 0x20 /* ISAC interrupt, active low */
|
|
#define ASL_IRQ_HSCX 0x40 /* HSX interrupt, active low */
|
|
#define ASL_IRQ_BCHAN ASL_IRQ_HSCX
|
|
#define ASL_IRQ_Pending (ASL_IRQ_ISAC | ASL_IRQ_HSCX | ASL_IRQ_TIMER)
|
|
/*
|
|
* AVM Status Latch 0 write only bits
|
|
*/
|
|
#define ASL_RESET_ALL 0x01 /* reset siemens IC's, active 1 */
|
|
#define ASL_TIMERDISABLE 0x02 /* active high */
|
|
#define ASL_TIMERRESET 0x04 /* active high */
|
|
#define ASL_ENABLE_INT 0x08 /* active high */
|
|
/*
|
|
* AVM Status Latch 1 write only bits
|
|
*/
|
|
#define ASL1_LED0 0x10 /* active high */
|
|
#define ASL1_LED1 0x20 /* active high */
|
|
|
|
#define ASL1_ENABLE_S0 0xc0 /* enable active S0 I/F */
|
|
|
|
/*----- EEpromless controller -----*/
|
|
/*
|
|
* AVM Status Latch read/write bit
|
|
*/
|
|
|
|
#define ASL_TESTBIT 0x80
|
|
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* AVM read fifo routines
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
static int PCMCIA_IO_BASE = 0; /* ap: XXX hack */
|
|
static void
|
|
avma1_pcmcia_read_fifo(void *buf, const void *base, size_t len)
|
|
{
|
|
outb(PCMCIA_IO_BASE + ADDR_REG_OFFSET, (int)base - 0x20);
|
|
insb(PCMCIA_IO_BASE + DATA_REG_OFFSET, (u_char *)buf, (u_int)len);
|
|
}
|
|
#else
|
|
/* offsets of the different 'what' arguments */
|
|
static u_int8_t what_map[] = {
|
|
0x20-0x20, /* ISIC_WHAT_ISAC */
|
|
0xA0-0x20, /* ISIC_WHAT_HSCXA */
|
|
0xE0-0x20 /* ISIC_WHAT_HSCXB */
|
|
};
|
|
static void
|
|
avma1_pcmcia_read_fifo(struct l1_softc *sc, int what, void *buf, size_t size)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[0].t;
|
|
bus_space_handle_t h = sc->sc_maps[0].h;
|
|
bus_space_write_1(t, h, ADDR_REG_OFFSET, what_map[what]);
|
|
bus_space_read_multi_1(t, h, DATA_REG_OFFSET, buf, size);
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* AVM write fifo routines
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
static void
|
|
avma1_pcmcia_write_fifo(void *base, const void *buf, size_t len)
|
|
{
|
|
outb(PCMCIA_IO_BASE + ADDR_REG_OFFSET, (int)base - 0x20);
|
|
outsb(PCMCIA_IO_BASE + DATA_REG_OFFSET, (u_char *)buf, (u_int)len);
|
|
}
|
|
#else
|
|
static void
|
|
avma1_pcmcia_write_fifo(struct l1_softc *sc, int what, const void *buf, size_t size)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[0].t;
|
|
bus_space_handle_t h = sc->sc_maps[0].h;
|
|
bus_space_write_1(t, h, ADDR_REG_OFFSET, what_map[what]);
|
|
bus_space_write_multi_1(t, h, DATA_REG_OFFSET, (u_int8_t*)buf, size);
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* AVM write register routines
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
static void
|
|
avma1_pcmcia_write_reg(u_char *base, u_int offset, u_int v)
|
|
{
|
|
/* offset includes 0x20 FIFO ! */
|
|
outb(PCMCIA_IO_BASE + ADDR_REG_OFFSET, (int)base+offset-0x20);
|
|
outb(PCMCIA_IO_BASE + DATA_REG_OFFSET, (u_char)v);
|
|
}
|
|
#else
|
|
static void
|
|
avma1_pcmcia_write_reg(struct l1_softc *sc, int what, bus_size_t offs, u_int8_t data)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[0].t;
|
|
bus_space_handle_t h = sc->sc_maps[0].h;
|
|
bus_space_write_1(t, h, ADDR_REG_OFFSET, what_map[what]+offs);
|
|
bus_space_write_1(t, h, DATA_REG_OFFSET, data);
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* AVM read register routines
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
static u_char
|
|
avma1_pcmcia_read_reg(u_char *base, u_int offset)
|
|
{
|
|
/* offset includes 0x20 FIFO ! */
|
|
outb(PCMCIA_IO_BASE + ADDR_REG_OFFSET, (int)base+offset-0x20);
|
|
return (inb(PCMCIA_IO_BASE + DATA_REG_OFFSET));
|
|
}
|
|
#else
|
|
static u_int8_t
|
|
avma1_pcmcia_read_reg(struct l1_softc *sc, int what, bus_size_t offs)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[0].t;
|
|
bus_space_handle_t h = sc->sc_maps[0].h;
|
|
bus_space_write_1(t, h, ADDR_REG_OFFSET, what_map[what]+offs);
|
|
return bus_space_read_1(t, h, DATA_REG_OFFSET);
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* isic_probe_avma1_pcmcia - probe for AVM PCMCIA Fritz!Card
|
|
* This is in the bus attachemnt part on NetBSD (isic_pcmcia.c), no
|
|
* card specicfic probe is needed on direct config buses like pcmcia.
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
int
|
|
isic_probe_avma1_pcmcia(struct isa_device *dev)
|
|
{
|
|
struct l1_softc *sc = &l1_sc[dev->id_unit];
|
|
u_char byte;
|
|
int i;
|
|
u_int cardinfo;
|
|
|
|
/* check max unit range */
|
|
|
|
if(dev->id_unit > 1)
|
|
{
|
|
printf("isic%d: Error, unit %d > MAXUNIT for AVM PCMCIA Fritz!Card\n",
|
|
dev->id_unit, dev->id_unit);
|
|
return(0);
|
|
}
|
|
sc->sc_unit = dev->id_unit;
|
|
|
|
/*
|
|
* we trust the IRQ we got from PCCARD service
|
|
*/
|
|
sc->sc_irq = dev->id_irq;
|
|
|
|
/* check if we got an iobase */
|
|
|
|
switch(dev->id_iobase)
|
|
{
|
|
case 0x140:
|
|
case 0x300:
|
|
break;
|
|
default:
|
|
printf("isic%d: Error, invalid iobase 0x%x specified for AVM PCMCIA Fritz!Card.\n",
|
|
dev->id_unit, dev->id_iobase);
|
|
return(0);
|
|
break;
|
|
}
|
|
sc->sc_port = dev->id_iobase;
|
|
|
|
/* ResetController */
|
|
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x00);
|
|
DELAY(SEC_DELAY / 20);
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x01);
|
|
DELAY(SEC_DELAY / 20);
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x00);
|
|
|
|
/*
|
|
* CheckController
|
|
* The logic to check for the PCMCIA was adapted as
|
|
* described by AVM.
|
|
*/
|
|
|
|
outb(dev->id_iobase + ADDR_REG_OFFSET, 0x21); /* ISAC STAR */
|
|
if ( (byte=inb(dev->id_iobase + DATA_REG_OFFSET) & 0xfd) != 0x48 )
|
|
{
|
|
printf("isic%d: Error, ISAC STAR for AVM PCMCIA is 0x%0x (should be 0x48)\n",
|
|
dev->id_unit, byte);
|
|
return(0);
|
|
}
|
|
|
|
outb(dev->id_iobase + ADDR_REG_OFFSET, 0xa1); /* HSCX STAR */
|
|
if ( (byte=inb(dev->id_iobase + DATA_REG_OFFSET) & 0xfd) != 0x48 )
|
|
{
|
|
printf("isic%d: Error, HSCX STAR for AVM PCMCIA is 0x%0x (should be 0x48)\n",
|
|
dev->id_unit, byte);
|
|
return(0);
|
|
}
|
|
|
|
byte = ASL_TESTBIT;
|
|
for (i=0; i<256; i++) {
|
|
byte = byte ? 0 : ASL_TESTBIT;
|
|
outb(dev->id_iobase + STAT0_OFFSET, byte);
|
|
if ((inb(dev->id_iobase+STAT0_OFFSET)&ASL_TESTBIT)!=byte) {
|
|
printf("isic%d: Error during toggle of AVM PCMCIA Status Latch0\n",
|
|
dev->id_unit);
|
|
return(0);
|
|
}
|
|
}
|
|
|
|
sc->clearirq = NULL;
|
|
sc->readreg = avma1_pcmcia_read_reg;
|
|
sc->writereg = avma1_pcmcia_write_reg;
|
|
|
|
sc->readfifo = avma1_pcmcia_read_fifo;
|
|
sc->writefifo = avma1_pcmcia_write_fifo;
|
|
|
|
/* setup card type */
|
|
|
|
sc->sc_cardtyp = CARD_TYPEP_PCFRITZ;
|
|
|
|
/* setup IOM bus type */
|
|
|
|
sc->sc_bustyp = BUS_TYPE_IOM2; /* ap: XXX ??? */
|
|
|
|
sc->sc_ipac = 0;
|
|
sc->sc_bfifolen = HSCX_FIFO_LEN;
|
|
|
|
/* setup ISAC and HSCX base addr */
|
|
/*
|
|
* NOTE: for PCMCIA these are no real addrs; they are
|
|
* offsets to be written into the base+ADDR_REG_OFFSET register
|
|
* to pick up the values of the bytes fro base+DATA_REG_OFFSET
|
|
*
|
|
* see also the logic in the avma1_pcmcia_* routines;
|
|
* therefore we also must have the base addr in some static
|
|
* space or struct; XXX better solution?
|
|
*/
|
|
|
|
PCMCIA_IO_BASE = dev->id_iobase;
|
|
ISAC_BASE = (caddr_t)0x20;
|
|
|
|
HSCX_A_BASE = (caddr_t)0xA0;
|
|
HSCX_B_BASE = (caddr_t)0xE0;
|
|
|
|
/*
|
|
* Read HSCX A/B VSTR.
|
|
* Expected value for AVM A1 is 0x04 or 0x05 and for the
|
|
* AVM Fritz!Card is 0x05 in the least significant bits.
|
|
*/
|
|
|
|
if( (((HSCX_READ(0, H_VSTR) & 0xf) != 0x5) &&
|
|
((HSCX_READ(0, H_VSTR) & 0xf) != 0x4)) ||
|
|
(((HSCX_READ(1, H_VSTR) & 0xf) != 0x5) &&
|
|
((HSCX_READ(1, H_VSTR) & 0xf) != 0x4)) )
|
|
{
|
|
printf("isic%d: HSCX VSTR test failed for AVM PCMCIA Fritz!Card\n",
|
|
dev->id_unit);
|
|
printf("isic%d: HSC0: VSTR: 0x%0x\n",
|
|
dev->id_unit, HSCX_READ(0, H_VSTR));
|
|
printf("isic%d: HSC1: VSTR: 0x%0x\n",
|
|
dev->id_unit, HSCX_READ(1, H_VSTR));
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* seems we really have an AVM PCMCIA Fritz!Card controller
|
|
*/
|
|
cardinfo = inb(dev->id_iobase + VERREG_OFFSET)<<8 | inb(dev->id_iobase + MODREG_OFFSET);
|
|
printf("isic%d: successfully detect AVM PCMCIA cardinfo = 0x%0x\n",
|
|
dev->id_unit, cardinfo);
|
|
dev->id_flags = FLAG_AVM_A1_PCMCIA;
|
|
return (1);
|
|
}
|
|
#endif /* __FreeBSD__ */
|
|
|
|
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* isic_attach_fritzpcmcia - attach Fritz!Card
|
|
*---------------------------------------------------------------------------*/
|
|
#ifdef __FreeBSD__
|
|
int
|
|
isic_attach_fritzpcmcia(struct isa_device *dev)
|
|
{
|
|
/* ResetController again just to make sure... */
|
|
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x00);
|
|
DELAY(SEC_DELAY / 10);
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x01);
|
|
DELAY(SEC_DELAY / 10);
|
|
outb(dev->id_iobase + STAT0_OFFSET, 0x00);
|
|
DELAY(SEC_DELAY / 10);
|
|
|
|
/* enable IRQ, disable counter IRQ */
|
|
|
|
outb(dev->id_iobase + STAT0_OFFSET, ASL_TIMERDISABLE |
|
|
ASL_TIMERRESET | ASL_ENABLE_INT);
|
|
/* DELAY(SEC_DELAY / 10); */
|
|
|
|
return(1);
|
|
}
|
|
|
|
#else
|
|
|
|
/*
|
|
* XXX - one time only! Some of this has to go into an enable
|
|
* function, with apropriate counterpart in disable, so a card
|
|
* could be removed an inserted again. But never mind for now,
|
|
* this won't work anyway for several reasons (both in NetBSD
|
|
* and in I4B).
|
|
*/
|
|
int
|
|
isic_attach_fritzpcmcia(struct pcmcia_l1_softc *psc, struct pcmcia_config_entry *cfe, struct pcmcia_attach_args *pa)
|
|
{
|
|
struct l1_softc *sc = &psc->sc_isic;
|
|
bus_space_tag_t t;
|
|
bus_space_handle_t h;
|
|
int i;
|
|
|
|
/* Validate config info */
|
|
if (cfe->num_memspace != 0)
|
|
printf(": unexpected number of memory spaces %d should be 0\n",
|
|
cfe->num_memspace);
|
|
if (cfe->num_iospace != 1)
|
|
printf(": unexpected number of memory spaces %d should be 1\n",
|
|
cfe->num_iospace);
|
|
|
|
/* Allocate pcmcia space - but don't listen to the card, it's lying
|
|
about the size needed! */
|
|
for (i = 0; i < cfe->num_iospace; i++)
|
|
if (pcmcia_io_alloc(pa->pf, cfe->iospace[i].start, cfe->iospace[i].length, 1, &psc->sc_pcioh) == 0)
|
|
break;
|
|
if (i >= cfe->num_iospace) {
|
|
printf(": can't allocate i/o space\n");
|
|
return 0;
|
|
}
|
|
|
|
/* map the selected space */
|
|
if (pcmcia_io_map(pa->pf, ((cfe->flags & PCMCIA_CFE_IO16) ?
|
|
PCMCIA_WIDTH_IO16 : PCMCIA_WIDTH_IO8), 0,
|
|
cfe->iospace[i].length, &psc->sc_pcioh, &psc->sc_io_window)) {
|
|
printf(": can't map i/o space\n");
|
|
return 0;
|
|
}
|
|
|
|
/* Setup bus space maps */
|
|
sc->sc_num_mappings = 1;
|
|
sc->sc_cardtyp = CARD_TYPEP_PCFRITZ;
|
|
MALLOC_MAPS(sc);
|
|
|
|
/* Copy our handles/tags to the MI maps */
|
|
sc->sc_maps[0].t = psc->sc_pcioh.iot;
|
|
sc->sc_maps[0].h = psc->sc_pcioh.ioh;
|
|
sc->sc_maps[0].offset = 0;
|
|
sc->sc_maps[0].size = 0; /* not our mapping */
|
|
|
|
t = sc->sc_maps[0].t;
|
|
h = sc->sc_maps[0].h;
|
|
|
|
sc->clearirq = NULL;
|
|
sc->readreg = avma1_pcmcia_read_reg;
|
|
sc->writereg = avma1_pcmcia_write_reg;
|
|
|
|
sc->readfifo = avma1_pcmcia_read_fifo;
|
|
sc->writefifo = avma1_pcmcia_write_fifo;
|
|
|
|
/* setup card type */
|
|
|
|
sc->sc_cardtyp = CARD_TYPEP_PCFRITZ;
|
|
|
|
/* setup IOM bus type */
|
|
|
|
sc->sc_bustyp = BUS_TYPE_IOM2;
|
|
|
|
sc->sc_ipac = 0;
|
|
sc->sc_bfifolen = HSCX_FIFO_LEN;
|
|
|
|
/* Reset controller again just to make sure... */
|
|
|
|
bus_space_write_1(t, h, STAT0_OFFSET, 0x00);
|
|
DELAY(SEC_DELAY / 10);
|
|
bus_space_write_1(t, h, STAT0_OFFSET, 0x01);
|
|
DELAY(SEC_DELAY / 10);
|
|
bus_space_write_1(t, h, STAT0_OFFSET, 0x00);
|
|
DELAY(SEC_DELAY / 10);
|
|
|
|
/* enable IRQ, disable counter IRQ */
|
|
|
|
bus_space_write_1(t, h, STAT0_OFFSET, ASL_TIMERDISABLE |
|
|
ASL_TIMERRESET | ASL_ENABLE_INT);
|
|
|
|
return 1;
|
|
}
|
|
#endif
|
|
|
|
#endif /* ISICPCMCIA_AVM_A1 */
|