sys/net/i4b/layer1/isic/i4b_elsa_qs1i.c

   1 /*
   2  * Copyright (c) 1997, 2001 Hellmuth Michaelis. All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23  * SUCH DAMAGE.
  24  *
  25  *---------------------------------------------------------------------------
  26  *
  27  *      isic - I4B Siemens ISDN Chipset Driver for ELSA Quickstep 1000pro ISA
  28  *      =====================================================================
  29  *
  30  * $FreeBSD: src/sys/i4b/layer1/isic/i4b_elsa_qs1i.c,v 1.5.2.1 2001/08/10 14:08:38 obrien Exp $
  31  *
  32  *      last edit-date: [Wed Jan 24 09:09:03 2001]
  33  *
  34  *---------------------------------------------------------------------------*/
  35
  36 #include "isic.h"
  37 #include "opt_i4b.h"
  38
  39 #if (NISIC > 0) && defined(ELSA_QS1ISA)
  40
  41 #include <sys/param.h>
  42 #include <sys/systm.h>
  43 #include <sys/socket.h>
  44 #include <net/if.h>
  45
  46 #include <machine/i4b_ioctl.h>
  47
  48 #include <i4b/layer1/isic/i4b_isic.h>
  49 #include <i4b/layer1/isic/i4b_hscx.h>
  50
  51 static void i4b_eq1i_clrirq(struct l1_softc *sc);
  52
  53 /* masks for register encoded in base addr */
  54
  55 #define ELSA_BASE_MASK          0x0ffff
  56 #define ELSA_OFF_MASK           0xf0000
  57
  58 /* register id's to be encoded in base addr */
  59
  60 #define ELSA_IDISAC             0x00000
  61 #define ELSA_IDHSCXA            0x10000
  62 #define ELSA_IDHSCXB            0x20000
  63
  64 /* offsets from base address */
  65
  66 #define ELSA_OFF_ISAC           0x00
  67 #define ELSA_OFF_HSCX           0x02
  68 #define ELSA_OFF_OFF            0x03
  69 #define ELSA_OFF_CTRL           0x04
  70 #define ELSA_OFF_CFG            0x05
  71 #define ELSA_OFF_TIMR           0x06
  72 #define ELSA_OFF_IRQ            0x07
  73
  74 /* control register (write access) */
  75
  76 #define ELSA_CTRL_LED_YELLOW    0x02
  77 #define ELSA_CTRL_LED_GREEN     0x08
  78 #define ELSA_CTRL_RESET         0x20
  79 #define ELSA_CTRL_TIMEREN       0x80
  80 #define ELSA_CTRL_SECRET        0x50
  81
  82 /*---------------------------------------------------------------------------*
  83  *      ELSA QuickStep 1000pro/ISA clear IRQ routine
  84  *---------------------------------------------------------------------------*/
  85 static void
  86 i4b_eq1i_clrirq(struct l1_softc *sc)
  87 {
  88         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
  89         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
  90         bus_space_write_1(t, h, ELSA_OFF_IRQ, 0);
  91 }
  92
  93 /*---------------------------------------------------------------------------*
  94  *      ELSA QuickStep 1000pro/ISA ISAC get fifo routine
  95  *---------------------------------------------------------------------------*/
  96 static void
  97 eqs1pi_read_fifo(struct l1_softc *sc, int what, void *buf, size_t size)
  98 {
  99         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
 100         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
 101
 102         switch (what) {
 103                 case ISIC_WHAT_ISAC:
 104                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0);
 105                         bus_space_read_multi_1(t, h, ELSA_OFF_ISAC, buf, size);
 106                         break;
 107                 case ISIC_WHAT_HSCXA:
 108                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0);
 109                         bus_space_read_multi_1(t, h, ELSA_OFF_HSCX, buf, size);
 110                         break;
 111                 case ISIC_WHAT_HSCXB:
 112                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0x40);
 113                         bus_space_read_multi_1(t, h, ELSA_OFF_HSCX, buf, size);
 114                         break;
 115         }
 116 }
 117
 118 /*---------------------------------------------------------------------------*
 119  *      ELSA QuickStep 1000pro/ISA ISAC put fifo routine
 120  *---------------------------------------------------------------------------*/
 121 static void
 122 eqs1pi_write_fifo(struct l1_softc *sc, int what, void *buf, size_t size)
 123 {
 124         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
 125         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
 126
 127         switch (what) {
 128                 case ISIC_WHAT_ISAC:
 129                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0);
 130                         bus_space_write_multi_1(t, h, ELSA_OFF_ISAC, buf, size);
 131                         break;
 132                 case ISIC_WHAT_HSCXA:
 133                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0);
 134                         bus_space_write_multi_1(t, h, ELSA_OFF_HSCX, buf, size);
 135                         break;
 136                 case ISIC_WHAT_HSCXB:
 137                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0x40);
 138                         bus_space_write_multi_1(t, h, ELSA_OFF_HSCX, buf, size);
 139                         break;
 140         }
 141 }
 142
 143 /*---------------------------------------------------------------------------*
 144  *      ELSA QuickStep 1000pro/ISA ISAC put register routine
 145  *---------------------------------------------------------------------------*/
 146 static void
 147 eqs1pi_write_reg(struct l1_softc *sc, int what, bus_size_t offs, u_int8_t data)
 148 {
 149         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
 150         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
 151
 152         switch (what) {
 153                 case ISIC_WHAT_ISAC:
 154                         bus_space_write_1(t, h, ELSA_OFF_OFF, offs);
 155                         bus_space_write_1(t, h, ELSA_OFF_ISAC, data);
 156                         break;
 157                 case ISIC_WHAT_HSCXA:
 158                         bus_space_write_1(t, h, ELSA_OFF_OFF, offs);
 159                         bus_space_write_1(t, h, ELSA_OFF_HSCX, data);
 160                         break;
 161                 case ISIC_WHAT_HSCXB:
 162                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0x40+offs);
 163                         bus_space_write_1(t, h, ELSA_OFF_HSCX, data);
 164                         break;
 165         }
 166 }
 167
 168 /*---------------------------------------------------------------------------*
 169  *      ELSA QuickStep 1000pro/ISA ISAC get register routine
 170  *---------------------------------------------------------------------------*/
 171 static u_int8_t
 172 eqs1pi_read_reg(struct l1_softc *sc, int what, bus_size_t offs)
 173 {
 174         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
 175         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
 176
 177         switch (what) {
 178                 case ISIC_WHAT_ISAC:
 179                         bus_space_write_1(t, h, ELSA_OFF_OFF, offs);
 180                         return bus_space_read_1(t, h, ELSA_OFF_ISAC);
 181                 case ISIC_WHAT_HSCXA:
 182                         bus_space_write_1(t, h, ELSA_OFF_OFF, offs);
 183                         return bus_space_read_1(t, h, ELSA_OFF_HSCX);
 184                 case ISIC_WHAT_HSCXB:
 185                         bus_space_write_1(t, h, ELSA_OFF_OFF, 0x40+offs);
 186                         return bus_space_read_1(t, h, ELSA_OFF_HSCX);
 187         }
 188         return 0;
 189 }
 190
 191 /*---------------------------------------------------------------------------*
 192  * isic_attach_Eqs1pi - attach for ELSA QuickStep 1000pro/ISA
 193  *---------------------------------------------------------------------------*/
 194 int
 195 isic_attach_Eqs1pi(device_t dev)
 196 {
 197         int unit = device_get_unit(dev);
 198         struct l1_softc *sc = &l1_sc[unit];
 199         bus_space_tag_t    t = rman_get_bustag(sc->sc_resources.io_base[0]);
 200         bus_space_handle_t h = rman_get_bushandle(sc->sc_resources.io_base[0]);
 201
 202         u_char byte = ELSA_CTRL_SECRET;
 203
 204         /* setup access routines */
 205
 206         sc->clearirq = i4b_eq1i_clrirq;
 207         sc->readreg = eqs1pi_read_reg;
 208         sc->writereg = eqs1pi_write_reg;
 209
 210         sc->readfifo = eqs1pi_read_fifo;
 211         sc->writefifo = eqs1pi_write_fifo;
 212
 213         /* setup card type */
 214
 215         sc->sc_cardtyp = CARD_TYPEP_ELSAQS1ISA;
 216
 217         /* setup IOM bus type */
 218
 219         sc->sc_bustyp = BUS_TYPE_IOM2;
 220
 221         sc->sc_ipac = 0;
 222         sc->sc_bfifolen = HSCX_FIFO_LEN;
 223
 224         /* enable the card */
 225
 226         byte &= ~ELSA_CTRL_RESET;
 227         bus_space_write_1(t, h, ELSA_OFF_CTRL, byte);
 228         DELAY(20);
 229         byte |= ELSA_CTRL_RESET;
 230         bus_space_write_1(t, h, ELSA_OFF_CTRL, byte);
 231
 232         DELAY(20);
 233         bus_space_write_1(t, h, ELSA_OFF_IRQ, 0xff);
 234
 235         return 0;
 236 }
 237 #endif /* (NISIC > 0) && defined(ELSA_QS1ISA) */