387 lines
9.8 KiB
C
387 lines
9.8 KiB
C
/*
|
|
* Copyright (c) 1998 Ignatios Souvatzis. 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.
|
|
*
|
|
*---------------------------------------------------------------------------
|
|
*
|
|
* isic_supio.c - Amiga supio pseudo bus frontend for i4b_isic driver
|
|
* supports:
|
|
* - ISDN Blaster 5001/1
|
|
* - ISDN MasterII 5000/1
|
|
* - ISDN Master 2092/64
|
|
* But we attach to the supio, so just see "isic" or "isicII".
|
|
* -----------------------------------------------------------
|
|
*
|
|
* $FreeBSD$
|
|
*
|
|
* last edit-date: [Mon Mar 22 22:49:20 MET 1999]
|
|
*
|
|
* -is ISDN Master II support added.
|
|
* -is original implementation [Sun Feb 14 10:29:19 1999]
|
|
*
|
|
*---------------------------------------------------------------------------*/
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/errno.h>
|
|
#include <sys/syslog.h>
|
|
#include <sys/device.h>
|
|
#include <sys/socket.h>
|
|
#include <net/if.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/malloc.h>
|
|
|
|
#include <machine/cpu.h>
|
|
#include <machine/intr.h>
|
|
#include <machine/bus.h>
|
|
|
|
#include <amiga/dev/supio.h>
|
|
|
|
#include <i4b/i4b_ioctl.h>
|
|
#include <i4b/i4b_trace.h>
|
|
#include <i4b/include/i4b_global.h>
|
|
#include <i4b/include/i4b_l1l2.h>
|
|
#include <i4b/layer1/i4b_l1.h>
|
|
#include <i4b/layer1/i4b_hscx.h>
|
|
#include <i4b/layer1/i4b_isac.h>
|
|
|
|
/*static*/ int isic_supio_match __P((struct device *, struct cfdata *, void *));
|
|
/*static*/ void isic_supio_attach __P((struct device *, struct device *, void *));
|
|
|
|
/*static*/ u_int8_t aster_read_reg __P((struct isic_softc *sc, int what,
|
|
bus_size_t offs));
|
|
/*static*/ void aster_write_reg __P((struct isic_softc *sc, int what,
|
|
bus_size_t offs, u_int8_t data));
|
|
/*static*/ void aster_read_fifo __P((struct isic_softc *sc, int what,
|
|
void *buf, size_t size));
|
|
/*static*/ void aster_write_fifo __P((struct isic_softc *sc, int what,
|
|
const void *data, size_t size));
|
|
|
|
static int supio_isicattach __P((struct isic_softc *sc));
|
|
|
|
struct isic_supio_softc {
|
|
struct isic_softc sc_isic;
|
|
struct isr sc_isr;
|
|
struct bus_space_tag sc_bst;
|
|
};
|
|
|
|
struct cfattach isic_supio_ca = {
|
|
sizeof(struct isic_supio_softc), isic_supio_match, isic_supio_attach
|
|
};
|
|
|
|
/*
|
|
* Probe card
|
|
*/
|
|
/*static*/ int
|
|
isic_supio_match(parent, cf, aux)
|
|
struct device *parent;
|
|
struct cfdata *cf;
|
|
void *aux;
|
|
{
|
|
struct supio_attach_args *sap = aux;
|
|
|
|
/* ARGSUSED */
|
|
return (!strcmp("isic", sap->supio_name) ||
|
|
!strcmp("isicII", sap->supio_name));
|
|
}
|
|
|
|
int isic_supio_ipl = 2;
|
|
/*
|
|
* Attach the card
|
|
*/
|
|
/*static*/ void
|
|
isic_supio_attach(parent, self, aux)
|
|
struct device *parent, *self;
|
|
void *aux;
|
|
{
|
|
struct isic_supio_softc *ssc = (void *)self;
|
|
struct isic_softc *sc = &ssc->sc_isic;
|
|
struct supio_attach_args *sap = aux;
|
|
|
|
bus_space_tag_t bst;
|
|
bus_space_handle_t h;
|
|
|
|
int o1, o2;
|
|
|
|
/* setup parameters */
|
|
sc->sc_cardtyp = CARD_TYPEP_BLMASTER;
|
|
sc->sc_num_mappings = 3;
|
|
sc->sc_unit = sc->sc_dev.dv_unit; /* XXX ??? */
|
|
|
|
/* create io mappings */
|
|
MALLOC_MAPS(sc);
|
|
|
|
if (!strcmp(sap->supio_name, "isic")) {
|
|
o1 = 0x300;
|
|
o2 = 0x100;
|
|
} else /* "isic-II" */ {
|
|
o1 = 0x100;
|
|
o2 = 0x300;
|
|
}
|
|
bst = sap->supio_iot;
|
|
bus_space_map(bst, sap->supio_iobase, 0x400, 0, &h);
|
|
|
|
/* ISAC */
|
|
sc->sc_maps[0].t = bst;
|
|
sc->sc_maps[0].h = h;
|
|
sc->sc_maps[0].offset = o1/2;
|
|
sc->sc_maps[0].size = 0; /* foreign mapping, leave it alone */
|
|
|
|
/* HSCX A */
|
|
sc->sc_maps[1].t = bst;
|
|
sc->sc_maps[1].h = h;
|
|
sc->sc_maps[1].offset = o2/2;
|
|
sc->sc_maps[1].size = 0; /* foreign mapping, leave it alone */
|
|
|
|
/* HSCX B */
|
|
sc->sc_maps[2].t = bst;
|
|
sc->sc_maps[2].h = h;
|
|
sc->sc_maps[2].offset = (o2 + 0x80)/2;
|
|
sc->sc_maps[2].size = 0; /* foreign mapping, leave it alone */
|
|
|
|
sc->clearirq = NULL;
|
|
sc->readreg = aster_read_reg;
|
|
sc->writereg = aster_write_reg;
|
|
sc->readfifo = aster_read_fifo;
|
|
sc->writefifo = aster_write_fifo;
|
|
|
|
/* setup card type */
|
|
sc->sc_cardtyp = CARD_TYPEP_BLMASTER;
|
|
sc->sc_bustyp = BUS_TYPE_IOM2;
|
|
|
|
sc->sc_ipac = 0;
|
|
sc->sc_bfifolen = HSCX_FIFO_LEN;
|
|
|
|
/* enable RTS on HSCX A */
|
|
aster_write_reg(sc, ISIC_WHAT_HSCXA, H_MODE, HSCX_MODE_RTS);
|
|
|
|
/* MI initialization of card */
|
|
|
|
printf("\n");
|
|
supio_isicattach(sc);
|
|
|
|
ssc->sc_isr.isr_intr = isicintr;
|
|
ssc->sc_isr.isr_arg = sc;
|
|
ssc->sc_isr.isr_ipl = isic_supio_ipl; /* XXX */
|
|
add_isr(&ssc->sc_isr);
|
|
}
|
|
|
|
#if 0
|
|
int
|
|
isic_supiointr(p)
|
|
void *p;
|
|
{
|
|
/* XXX should test whether it is our interupt at all */
|
|
add_sicallback((sifunc_t)isicintr, p, NULL);
|
|
return 1;
|
|
}
|
|
#endif
|
|
|
|
/*static*/ void
|
|
aster_read_fifo(struct isic_softc *sc, int what, void *buf, size_t size)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[what].t;
|
|
bus_space_handle_t h = sc->sc_maps[what].h;
|
|
bus_size_t o = sc->sc_maps[what].offset;
|
|
|
|
bus_space_read_multi_1(t, h, o, buf, size);
|
|
}
|
|
|
|
/*static*/ void
|
|
aster_write_fifo(struct isic_softc *sc, int what, const void *buf, size_t size)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[what].t;
|
|
bus_space_handle_t h = sc->sc_maps[what].h;
|
|
bus_size_t o = sc->sc_maps[what].offset;
|
|
|
|
bus_space_write_multi_1(t, h, o, (u_int8_t*)buf, size);
|
|
}
|
|
|
|
/*static*/ u_int8_t
|
|
aster_read_reg(struct isic_softc *sc, int what, bus_size_t offs)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[what].t;
|
|
bus_space_handle_t h = sc->sc_maps[what].h;
|
|
bus_size_t o = sc->sc_maps[what].offset;
|
|
|
|
return bus_space_read_1(t, h, o + offs);
|
|
}
|
|
|
|
/*static*/ void
|
|
aster_write_reg(struct isic_softc *sc, int what, bus_size_t offs, u_int8_t data)
|
|
{
|
|
bus_space_tag_t t = sc->sc_maps[what].t;
|
|
bus_space_handle_t h = sc->sc_maps[what].h;
|
|
bus_size_t o = sc->sc_maps[what].offset;
|
|
|
|
bus_space_write_1(t, h, o + offs, data);
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* card independend attach for pcmcia^Wsupio cards
|
|
* XXX this should be centralized!
|
|
*---------------------------------------------------------------------------*/
|
|
|
|
/*
|
|
* parameter and format for message producing e.g. "isic0: "
|
|
* there is no FreeBSD/Amiga, so just:
|
|
*/
|
|
|
|
#define ISIC_FMT "%s: "
|
|
#define ISIC_PARM sc->sc_dev.dv_xname
|
|
#define TERMFMT "\n"
|
|
|
|
int
|
|
supio_isicattach(struct isic_softc *sc)
|
|
{
|
|
static char *ISACversion[] = {
|
|
"2085 Version A1/A2 or 2086/2186 Version 1.1",
|
|
"2085 Version B1",
|
|
"2085 Version B2",
|
|
"2085 Version V2.3 (B3)",
|
|
"Unknown Version"
|
|
};
|
|
|
|
static char *HSCXversion[] = {
|
|
"82525 Version A1",
|
|
"Unknown (0x01)",
|
|
"82525 Version A2",
|
|
"Unknown (0x03)",
|
|
"82525 Version A3",
|
|
"82525 or 21525 Version 2.1",
|
|
"Unknown Version"
|
|
};
|
|
|
|
isic_sc[sc->sc_unit] = sc;
|
|
sc->sc_isac_version = 0;
|
|
sc->sc_isac_version = ((ISAC_READ(I_RBCH)) >> 5) & 0x03;
|
|
|
|
switch(sc->sc_isac_version)
|
|
{
|
|
case ISAC_VA:
|
|
case ISAC_VB1:
|
|
case ISAC_VB2:
|
|
case ISAC_VB3:
|
|
break;
|
|
|
|
default:
|
|
printf(ISIC_FMT "Error, ISAC version %d unknown!\n",
|
|
ISIC_PARM, sc->sc_isac_version);
|
|
return(0);
|
|
break;
|
|
}
|
|
|
|
sc->sc_hscx_version = HSCX_READ(0, H_VSTR) & 0xf;
|
|
|
|
switch(sc->sc_hscx_version)
|
|
{
|
|
case HSCX_VA1:
|
|
case HSCX_VA2:
|
|
case HSCX_VA3:
|
|
case HSCX_V21:
|
|
break;
|
|
|
|
default:
|
|
printf(ISIC_FMT "Error, HSCX version %d unknown!\n",
|
|
ISIC_PARM, sc->sc_hscx_version);
|
|
return(0);
|
|
break;
|
|
};
|
|
|
|
/* ISAC setup */
|
|
|
|
isic_isac_init(sc);
|
|
|
|
/* HSCX setup */
|
|
|
|
isic_bchannel_setup(sc->sc_unit, HSCX_CH_A, BPROT_NONE, 0);
|
|
|
|
isic_bchannel_setup(sc->sc_unit, HSCX_CH_B, BPROT_NONE, 0);
|
|
|
|
/* setup linktab */
|
|
|
|
isic_init_linktab(sc);
|
|
|
|
/* set trace level */
|
|
|
|
sc->sc_trace = TRACE_OFF;
|
|
|
|
sc->sc_state = ISAC_IDLE;
|
|
|
|
sc->sc_ibuf = NULL;
|
|
sc->sc_ib = NULL;
|
|
sc->sc_ilen = 0;
|
|
|
|
sc->sc_obuf = NULL;
|
|
sc->sc_op = NULL;
|
|
sc->sc_ol = 0;
|
|
sc->sc_freeflag = 0;
|
|
|
|
sc->sc_obuf2 = NULL;
|
|
sc->sc_freeflag2 = 0;
|
|
|
|
/* init higher protocol layers */
|
|
|
|
MPH_Status_Ind(sc->sc_unit, STI_ATTACH, sc->sc_cardtyp);
|
|
|
|
/* announce chip versions */
|
|
|
|
if(sc->sc_isac_version >= ISAC_UNKN)
|
|
{
|
|
printf(ISIC_FMT "ISAC Version UNKNOWN (VN=0x%x)" TERMFMT,
|
|
ISIC_PARM,
|
|
sc->sc_isac_version);
|
|
sc->sc_isac_version = ISAC_UNKN;
|
|
}
|
|
else
|
|
{
|
|
printf(ISIC_FMT "ISAC %s (IOM-%c)" TERMFMT,
|
|
ISIC_PARM,
|
|
ISACversion[sc->sc_isac_version],
|
|
sc->sc_bustyp == BUS_TYPE_IOM1 ? '1' : '2');
|
|
}
|
|
|
|
if(sc->sc_hscx_version >= HSCX_UNKN)
|
|
{
|
|
printf(ISIC_FMT "HSCX Version UNKNOWN (VN=0x%x)" TERMFMT,
|
|
ISIC_PARM,
|
|
sc->sc_hscx_version);
|
|
sc->sc_hscx_version = HSCX_UNKN;
|
|
}
|
|
else
|
|
{
|
|
printf(ISIC_FMT "HSCX %s" TERMFMT,
|
|
ISIC_PARM,
|
|
HSCXversion[sc->sc_hscx_version]);
|
|
}
|
|
|
|
return(1);
|
|
}
|
|
|