sys/dev/isa/isic_isa_usr_sti.c

   1 /*
   2  * Copyright (c) 1997, 1999 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  *      i4b_usr_sti.c - USRobotics Sportster ISDN TA intern (Tina-pp)
  28  *      -------------------------------------------------------------
  29  *
  30  *      $Id: isic_isa_usr_sti.c,v 1.8 2007/10/19 12:00:20 ad Exp $
  31  *
  32  *      last edit-date: [Fri Jan  5 11:37:22 2001]
  33  *
  34  *---------------------------------------------------------------------------*/
  35
  36 #include <sys/cdefs.h>
  37 __KERNEL_RCSID(0, "$NetBSD: isic_isa_usr_sti.c,v 1.7 2007/03/04 06:02:13 christos Exp $");
  38
  39 #include "opt_isicisa.h"
  40 #ifdef ISICISA_USR_STI
  41
  42 #include <sys/param.h>
  43 #if defined(__FreeBSD__) && __FreeBSD__ >= 3
  44 #include <sys/ioccom.h>
  45 #else
  46 #include <sys/ioctl.h>
  47 #endif
  48 #include <sys/kernel.h>
  49 #include <sys/systm.h>
  50 #include <sys/mbuf.h>
  51
  52 #if defined(__NetBSD__) && __NetBSD_Version__ >= 104230000
  53 #include <sys/callout.h>
  54 #endif
  55
  56 #ifdef __FreeBSD__
  57 #include <machine/clock.h>
  58 #include <i386/isa/isa_device.h>
  59 #else
  60 #include <sys/bus.h>
  61 #include <sys/device.h>
  62 #endif
  63
  64 #include <sys/socket.h>
  65 #include <net/if.h>
  66
  67 #ifdef __FreeBSD__
  68 #include <machine/i4b_debug.h>
  69 #include <machine/i4b_ioctl.h>
  70 #else
  71 #include <netisdn/i4b_global.h>
  72 #include <netisdn/i4b_debug.h>
  73 #include <netisdn/i4b_ioctl.h>
  74 #include <netisdn/i4b_l2.h>
  75 #include <netisdn/i4b_l1l2.h>
  76 #endif
  77
  78 #include <dev/ic/isic_l1.h>
  79 #include <dev/ic/isac.h>
  80 #include <dev/ic/hscx.h>
  81
  82 #include <netisdn/i4b_global.h>
  83
  84 /*---------------------------------------------------------------------------*
  85  *      USR Sportster TA intern special registers
  86  *---------------------------------------------------------------------------*/
  87 #define USR_HSCXA_OFF   0x0000
  88 #define USR_HSCXB_OFF   0x4000
  89 #define USR_INTL_OFF    0x8000
  90 #define USR_ISAC_OFF    0xc000
  91
  92 #define USR_RES_BIT     0x80    /* 0 = normal, 1 = reset ISAC/HSCX      */
  93 #define USR_INTE_BIT    0x40    /* 0 = IRQ disabled, 1 = IRQ's enabled  */
  94 #define USR_IL_MASK     0x07    /* IRQ level config                     */
  95
  96 static u_char intr_no[] = { 0, 0, 0, 0, 0, 1, 0, 2, 0, 0, 3, 4, 5, 0, 6, 7 };
  97
  98 #ifdef __FreeBSD__
  99
 100 #define ADDR(reg)       \
 101         (((reg/4) * 1024) + ((reg%4) * 2))
 102
 103 /*---------------------------------------------------------------------------*
 104  *      USRobotics read fifo routine
 105  *---------------------------------------------------------------------------*/
 106 static void
 107 usrtai_read_fifo(void *buf, const void *base, size_t len)
 108 {
 109         register int offset = 0;
 110
 111         for(;len > 0; len--, offset++)
 112                 *((u_char *)buf + offset) = inb((int)base + ADDR(offset));
 113 }
 114
 115 /*---------------------------------------------------------------------------*
 116  *      USRobotics write fifo routine
 117  *---------------------------------------------------------------------------*/
 118 static void
 119 usrtai_write_fifo(void *base, const void *buf, size_t len)
 120 {
 121         register int offset = 0;
 122
 123         for(;len > 0; len--, offset++)
 124                 outb((int)base + ADDR(offset), *((u_char *)buf + offset));
 125 }
 126
 127 /*---------------------------------------------------------------------------*
 128  *      USRobotics write register routine
 129  *---------------------------------------------------------------------------*/
 130 static void
 131 usrtai_write_reg(u_char *base, u_int offset, u_int v)
 132 {
 133         outb((int)base + ADDR(offset), (u_char)v);
 134 }
 135
 136 /*---------------------------------------------------------------------------*
 137  *      USRobotics read register routine
 138  *---------------------------------------------------------------------------*/
 139 static u_char
 140 usrtai_read_reg(u_char *base, u_int offset)
 141 {
 142         return(inb((int)base + ADDR(offset)));
 143 }
 144
 145 /*---------------------------------------------------------------------------*
 146  *      isic_probe_usrtai - probe for USR
 147  *---------------------------------------------------------------------------*/
 148 int
 149 isic_probe_usrtai(struct isa_device *dev)
 150 {
 151         struct isic_softc *sc = &l1_sc[dev->id_unit];
 152
 153         /* check max unit range */
 154
 155         if(dev->id_unit >= ISIC_MAXUNIT)
 156         {
 157                 printf("isic%d: Error, unit %d >= MAXUNIT for USR Sportster TA!\n",
 158                                 dev->id_unit, dev->id_unit);
 159                 return(0);
 160         }
 161         sc->sc_unit = dev->id_unit;
 162
 163         /* check IRQ validity */
 164
 165         if((intr_no[ffs(dev->id_irq) - 1]) == 0)
 166         {
 167                 printf("isic%d: Error, invalid IRQ [%d] specified for USR Sportster TA!\n",
 168                         dev->id_unit, (ffs(dev->id_irq))-1);
 169                 return(0);
 170         }
 171         sc->sc_irq = dev->id_irq;
 172
 173         /* check if memory addr specified */
 174
 175         if(dev->id_maddr)
 176         {
 177                 printf("isic%d: Error, mem addr 0x%lx specified for USR Sportster TA!\n",
 178                         dev->id_unit, (u_long)dev->id_maddr);
 179                 return(0);
 180         }
 181         dev->id_msize = 0;
 182
 183         /* check if we got an iobase */
 184
 185         switch(dev->id_iobase)
 186         {
 187                 case 0x200:
 188                 case 0x208:
 189                 case 0x210:
 190                 case 0x218:
 191                 case 0x220:
 192                 case 0x228:
 193                 case 0x230:
 194                 case 0x238:
 195                 case 0x240:
 196                 case 0x248:
 197                 case 0x250:
 198                 case 0x258:
 199                 case 0x260:
 200                 case 0x268:
 201                 case 0x270:
 202                 case 0x278:
 203                         break;
 204
 205                 default:
 206                         printf("isic%d: Error, invalid iobase 0x%x specified for USR Sportster TA!\n",
 207                                 dev->id_unit, dev->id_iobase);
 208                         return(0);
 209                         break;
 210         }
 211         sc->sc_port = dev->id_iobase;
 212
 213         /* setup ISAC access routines */
 214
 215         sc->clearirq = NULL;
 216         sc->readreg = usrtai_read_reg;
 217         sc->writereg = usrtai_write_reg;
 218
 219         sc->readfifo = usrtai_read_fifo;
 220         sc->writefifo = usrtai_write_fifo;
 221
 222         /* setup card type */
 223
 224         sc->sc_cardtyp = CARD_TYPEP_USRTA;
 225
 226         /* setup IOM bus type */
 227
 228         sc->sc_bustyp = BUS_TYPE_IOM2;
 229
 230         sc->sc_ipac = 0;
 231         sc->sc_bfifolen = HSCX_FIFO_LEN;
 232
 233         /* setup ISAC and HSCX base addr */
 234
 235         ISAC_BASE   = (void *)dev->id_iobase + USR_ISAC_OFF;
 236         HSCX_A_BASE = (void *)dev->id_iobase + USR_HSCXA_OFF;
 237         HSCX_B_BASE = (void *)dev->id_iobase + USR_HSCXB_OFF;
 238
 239         /*
 240          * Read HSCX A/B VSTR.  Expected value for USR Sportster TA based
 241          * boards is 0x05 in the least significant bits.
 242          */
 243
 244         if( ((HSCX_READ(0, H_VSTR) & 0xf) != 0x5) ||
 245             ((HSCX_READ(1, H_VSTR) & 0xf) != 0x5) )
 246         {
 247                 printf("isic%d: HSCX VSTR test failed for USR Sportster TA\n",
 248                         dev->id_unit);
 249                 printf("isic%d: HSC0: VSTR: %#x\n",
 250                         dev->id_unit, HSCX_READ(0, H_VSTR));
 251                 printf("isic%d: HSC1: VSTR: %#x\n",
 252                         dev->id_unit, HSCX_READ(1, H_VSTR));
 253                 return (0);
 254         }
 255
 256         return (1);
 257 }
 258
 259 /*---------------------------------------------------------------------------*
 260  *      isic_attach_usrtai - attach USR
 261  *---------------------------------------------------------------------------*/
 262 int
 263 isic_attach_usrtai(struct isa_device *dev)
 264 {
 265         u_char irq = 0;
 266
 267         /* reset the HSCX and ISAC chips */
 268
 269         outb(dev->id_iobase + USR_INTL_OFF, USR_RES_BIT);
 270         DELAY(SEC_DELAY / 10);
 271
 272         outb(dev->id_iobase + USR_INTL_OFF, 0x00);
 273         DELAY(SEC_DELAY / 10);
 274
 275         /* setup IRQ */
 276
 277         if((irq = intr_no[ffs(dev->id_irq) - 1]) == 0)
 278         {
 279                 printf("isic%d: Attach error, invalid IRQ [%d] specified for USR Sportster TA!\n",
 280                         dev->id_unit, ffs(dev->id_irq)-1);
 281                 return(0);
 282         }
 283
 284         /* configure and enable irq */
 285
 286         outb(dev->id_iobase + USR_INTL_OFF, irq | USR_INTE_BIT);
 287         DELAY(SEC_DELAY / 10);
 288
 289         return (1);
 290 }
 291
 292 #else /* end of FreeBSD, start NetBSD */
 293
 294 /*
 295  * Use of sc->sc_maps:
 296  *       0 : config register
 297  *  1 - 16 : HSCX A registers
 298  * 17 - 32 : HSCX B registers
 299  * 33 - 48 : ISAC registers
 300  */
 301
 302 #define USR_REG_OFFS(reg)       ((reg % 4) * 2)
 303 #define USR_HSCXA_MAP(reg)      ((reg / 4) + 1)
 304 #define USR_HSCXB_MAP(reg)      ((reg / 4) + 17)
 305 #define USR_ISAC_MAP(reg)       ((reg / 4) + 33)
 306
 307 static int map_base[] = { 33, 1, 17, 0 };       /* ISAC, HSCX A, HSCX B */
 308
 309 /*---------------------------------------------------------------------------*
 310  *      USRobotics read fifo routine
 311  *---------------------------------------------------------------------------*/
 312 static void
 313 usrtai_read_fifo(struct isic_softc *sc, int what, void *buf, size_t size)
 314 {
 315         int map, off, offset;
 316         u_char * p = buf;
 317         bus_space_tag_t t;
 318         bus_space_handle_t h;
 319
 320         for (offset = 0; size > 0; size--, offset++) {
 321                 map = map_base[what] + (offset / 4);
 322                 t = sc->sc_maps[map].t;
 323                 h = sc->sc_maps[map].h;
 324                 off = USR_REG_OFFS(offset);
 325
 326                 *p++ = bus_space_read_1(t, h, off);
 327         }
 328 }
 329
 330 /*---------------------------------------------------------------------------*
 331  *      USRobotics write fifo routine
 332  *---------------------------------------------------------------------------*/
 333 static void
 334 usrtai_write_fifo(struct isic_softc *sc, int what, const void *buf, size_t size)
 335 {
 336         int map, off, offset;
 337         const u_char * p = buf;
 338         bus_space_tag_t t;
 339         bus_space_handle_t h;
 340         u_char v;
 341
 342         for (offset = 0; size > 0; size--, offset++) {
 343                 map = map_base[what] + (offset / 4);
 344                 t = sc->sc_maps[map].t;
 345                 h = sc->sc_maps[map].h;
 346                 off = USR_REG_OFFS(offset);
 347
 348                 v = *p++;
 349                 bus_space_write_1(t, h, off, v);
 350         }
 351 }
 352
 353 /*---------------------------------------------------------------------------*
 354  *      USRobotics write register routine
 355  *---------------------------------------------------------------------------*/
 356 static void
 357 usrtai_write_reg(struct isic_softc *sc, int what, bus_size_t offs, u_int8_t data)
 358 {
 359         int map = map_base[what] + (offs / 4),
 360             off = USR_REG_OFFS(offs);
 361         bus_space_tag_t t = sc->sc_maps[map].t;
 362         bus_space_handle_t h = sc->sc_maps[map].h;
 363
 364         bus_space_write_1(t, h, off, data);
 365 }
 366
 367 /*---------------------------------------------------------------------------*
 368  *      USRobotics read register routine
 369  *---------------------------------------------------------------------------*/
 370 static u_char
 371 usrtai_read_reg(struct isic_softc *sc, int what, bus_size_t offs)
 372 {
 373         int map = map_base[what] + (offs / 4),
 374             off = USR_REG_OFFS(offs);
 375         bus_space_tag_t t = sc->sc_maps[map].t;
 376         bus_space_handle_t h = sc->sc_maps[map].h;
 377
 378         return bus_space_read_1(t, h, off);
 379 }
 380
 381 /*---------------------------------------------------------------------------*
 382  *      isic_probe_usrtai - probe for USR
 383  *---------------------------------------------------------------------------*/
 384 int
 385 isic_probe_usrtai(struct isic_attach_args *ia)
 386 {
 387         /*
 388          * Read HSCX A/B VSTR.  Expected value for IOM2 based
 389          * boards is 0x05 in the least significant bits.
 390          */
 391
 392         if(((bus_space_read_1(ia->ia_maps[USR_HSCXA_MAP(H_VSTR)].t, ia->ia_maps[USR_HSCXA_MAP(H_VSTR)].h, USR_REG_OFFS(H_VSTR)) & 0x0f) != 0x05) ||
 393            ((bus_space_read_1(ia->ia_maps[USR_HSCXB_MAP(H_VSTR)].t, ia->ia_maps[USR_HSCXB_MAP(H_VSTR)].h, USR_REG_OFFS(H_VSTR)) & 0x0f) != 0x05))
 394                 return 0;
 395
 396         return (1);
 397 }
 398
 399 /*---------------------------------------------------------------------------*
 400  *      isic_attach_usrtai - attach USR
 401  *---------------------------------------------------------------------------*/
 402 int
 403 isic_attach_usrtai(struct isic_softc *sc)
 404 {
 405         bus_space_tag_t t = sc->sc_maps[0].t;
 406         bus_space_handle_t h = sc->sc_maps[0].h;
 407         u_char irq = intr_no[sc->sc_irq];
 408
 409         sc->clearirq = NULL;
 410         sc->readreg = usrtai_read_reg;
 411         sc->writereg = usrtai_write_reg;
 412
 413         sc->readfifo = usrtai_read_fifo;
 414         sc->writefifo = usrtai_write_fifo;
 415
 416         /* setup card type */
 417
 418         sc->sc_cardtyp = CARD_TYPEP_USRTA;
 419
 420         /* setup IOM bus type */
 421
 422         sc->sc_bustyp = BUS_TYPE_IOM2;
 423
 424         sc->sc_ipac = 0;
 425         sc->sc_bfifolen = HSCX_FIFO_LEN;
 426
 427         /* reset the HSCX and ISAC chips */
 428
 429         bus_space_write_1(t, h, 0, USR_RES_BIT);
 430         DELAY(SEC_DELAY / 10);
 431
 432         bus_space_write_1(t, h, 0, 0x00);
 433         DELAY(SEC_DELAY / 10);
 434
 435         /* setup IRQ */
 436
 437         bus_space_write_1(t, h, 0, irq | USR_INTE_BIT);
 438         DELAY(SEC_DELAY / 10);
 439
 440         return (1);
 441 }
 442
 443 #endif /* __FreeBSD__ */
 444
 445 #endif /* ISICISA_USR_STI */