drivers/isdn/hisax/hfcscard.c

   1 /* $Id: hfcscard.c,v 1.8 2000/11/24 17:05:37 kai Exp $
   2  *
   3  * hfcscard.c     low level stuff for hfcs based cards (Teles3c, ACER P10)
   4  *
   5  * Author     Karsten Keil (keil@isdn4linux.de)
   6  *
   7  * This file is (c) under GNU PUBLIC LICENSE
   8  *
   9  */
  10
  11 #define __NO_VERSION__
  12 #include <linux/init.h>
  13 #include "hisax.h"
  14 #include "hfc_2bds0.h"
  15 #include "isdnl1.h"
  16
  17 extern const char *CardType[];
  18
  19 static const char *hfcs_revision = "$Revision: 1.8 $";
  20
  21 static void
  22 hfcs_interrupt(int intno, void *dev_id, struct pt_regs *regs)
  23 {
  24         struct IsdnCardState *cs = dev_id;
  25         u_char val, stat;
  26
  27         if (!cs) {
  28                 printk(KERN_WARNING "HFCS: Spurious interrupt!\n");
  29                 return;
  30         }
  31         if ((HFCD_ANYINT | HFCD_BUSY_NBUSY) &
  32                 (stat = cs->BC_Read_Reg(cs, HFCD_DATA, HFCD_STAT))) {
  33                 val = cs->BC_Read_Reg(cs, HFCD_DATA, HFCD_INT_S1);
  34                 if (cs->debug & L1_DEB_ISAC)
  35                         debugl1(cs, "HFCS: stat(%02x) s1(%02x)", stat, val);
  36                 hfc2bds0_interrupt(cs, val);
  37         } else {
  38                 if (cs->debug & L1_DEB_ISAC)
  39                         debugl1(cs, "HFCS: irq_no_irq stat(%02x)", stat);
  40         }
  41 }
  42
  43 static void
  44 hfcs_Timer(struct IsdnCardState *cs)
  45 {
  46         cs->hw.hfcD.timer.expires = jiffies + 75;
  47         /* WD RESET */
  48 /*      WriteReg(cs, HFCD_DATA, HFCD_CTMT, cs->hw.hfcD.ctmt | 0x80);
  49         add_timer(&cs->hw.hfcD.timer);
  50 */
  51 }
  52
  53 void
  54 release_io_hfcs(struct IsdnCardState *cs)
  55 {
  56         release2bds0(cs);
  57         del_timer(&cs->hw.hfcD.timer);
  58         if (cs->hw.hfcD.addr)
  59                 release_region(cs->hw.hfcD.addr, 2);
  60 }
  61
  62 static void
  63 reset_hfcs(struct IsdnCardState *cs)
  64 {
  65         long flags;
  66
  67         printk(KERN_INFO "HFCS: resetting card\n");
  68         cs->hw.hfcD.cirm = HFCD_RESET;
  69         if (cs->typ == ISDN_CTYPE_TELES3C)
  70                 cs->hw.hfcD.cirm |= HFCD_MEM8K;
  71         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CIRM, cs->hw.hfcD.cirm);   /* Reset On */
  72         save_flags(flags);
  73         sti();
  74         set_current_state(TASK_UNINTERRUPTIBLE);
  75         schedule_timeout((30*HZ)/1000);
  76         cs->hw.hfcD.cirm = 0;
  77         if (cs->typ == ISDN_CTYPE_TELES3C)
  78                 cs->hw.hfcD.cirm |= HFCD_MEM8K;
  79         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CIRM, cs->hw.hfcD.cirm);   /* Reset Off */
  80         set_current_state(TASK_UNINTERRUPTIBLE);
  81         schedule_timeout((10*HZ)/1000);
  82         if (cs->typ == ISDN_CTYPE_TELES3C)
  83                 cs->hw.hfcD.cirm |= HFCD_INTB;
  84         else if (cs->typ == ISDN_CTYPE_ACERP10)
  85                 cs->hw.hfcD.cirm |= HFCD_INTA;
  86         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CIRM, cs->hw.hfcD.cirm);
  87         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CLKDEL, 0x0e);
  88         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_TEST, HFCD_AUTO_AWAKE); /* S/T Auto awake */
  89         cs->hw.hfcD.ctmt = HFCD_TIM25 | HFCD_AUTO_TIMER;
  90         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CTMT, cs->hw.hfcD.ctmt);
  91         cs->hw.hfcD.int_m2 = HFCD_IRQ_ENABLE;
  92         cs->hw.hfcD.int_m1 = HFCD_INTS_B1TRANS | HFCD_INTS_B2TRANS |
  93                 HFCD_INTS_DTRANS | HFCD_INTS_B1REC | HFCD_INTS_B2REC |
  94                 HFCD_INTS_DREC | HFCD_INTS_L1STATE;
  95         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_INT_M1, cs->hw.hfcD.int_m1);
  96         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_INT_M2, cs->hw.hfcD.int_m2);
  97         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_STATES, HFCD_LOAD_STATE | 2); /* HFC ST 2 */
  98         udelay(10);
  99         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_STATES, 2); /* HFC ST 2 */
 100         cs->hw.hfcD.mst_m = HFCD_MASTER;
 101         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_MST_MODE, cs->hw.hfcD.mst_m); /* HFC Master */
 102         cs->hw.hfcD.sctrl = 0;
 103         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_SCTRL, cs->hw.hfcD.sctrl);
 104         restore_flags(flags);
 105 }
 106
 107 static int
 108 hfcs_card_msg(struct IsdnCardState *cs, int mt, void *arg)
 109 {
 110         long flags;
 111
 112         if (cs->debug & L1_DEB_ISAC)
 113                 debugl1(cs, "HFCS: card_msg %x", mt);
 114         switch (mt) {
 115                 case CARD_RESET:
 116                         reset_hfcs(cs);
 117                         return(0);
 118                 case CARD_RELEASE:
 119                         release_io_hfcs(cs);
 120                         return(0);
 121                 case CARD_INIT:
 122                         cs->hw.hfcD.timer.expires = jiffies + 75;
 123                         add_timer(&cs->hw.hfcD.timer);
 124                         init2bds0(cs);
 125                         save_flags(flags);
 126                         sti();
 127                         set_current_state(TASK_UNINTERRUPTIBLE);
 128                         schedule_timeout((80*HZ)/1000);
 129                         cs->hw.hfcD.ctmt |= HFCD_TIM800;
 130                         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_CTMT, cs->hw.hfcD.ctmt);
 131                         cs->BC_Write_Reg(cs, HFCD_DATA, HFCD_MST_MODE, cs->hw.hfcD.mst_m);
 132                         restore_flags(flags);
 133                         return(0);
 134                 case CARD_TEST:
 135                         return(0);
 136         }
 137         return(0);
 138 }
 139
 140 int __init
 141 setup_hfcs(struct IsdnCard *card)
 142 {
 143         struct IsdnCardState *cs = card->cs;
 144         char tmp[64];
 145
 146         strcpy(tmp, hfcs_revision);
 147         printk(KERN_INFO "HiSax: HFC-S driver Rev. %s\n", HiSax_getrev(tmp));
 148         cs->hw.hfcD.addr = card->para[1] & 0xfffe;
 149         cs->irq = card->para[0];
 150         cs->hw.hfcD.cip = 0;
 151         cs->hw.hfcD.int_s1 = 0;
 152         cs->hw.hfcD.send = NULL;
 153         cs->bcs[0].hw.hfc.send = NULL;
 154         cs->bcs[1].hw.hfc.send = NULL;
 155         cs->hw.hfcD.dfifosize = 512;
 156         cs->dc.hfcd.ph_state = 0;
 157         cs->hw.hfcD.fifo = 255;
 158         if (cs->typ == ISDN_CTYPE_TELES3C) {
 159                 cs->hw.hfcD.bfifosize = 1024 + 512;
 160         } else if (cs->typ == ISDN_CTYPE_ACERP10) {
 161                 cs->hw.hfcD.bfifosize = 7*1024 + 512;
 162         } else
 163                 return (0);
 164         if (check_region((cs->hw.hfcD.addr), 2)) {
 165                 printk(KERN_WARNING
 166                        "HiSax: %s config port %x-%x already in use\n",
 167                        CardType[card->typ],
 168                        cs->hw.hfcD.addr,
 169                        cs->hw.hfcD.addr + 2);
 170                 return (0);
 171         } else {
 172                 request_region(cs->hw.hfcD.addr, 2, "HFCS isdn");
 173         }
 174         printk(KERN_INFO
 175                "HFCS: defined at 0x%x IRQ %d HZ %d\n",
 176                cs->hw.hfcD.addr,
 177                cs->irq, HZ);
 178         if (cs->typ == ISDN_CTYPE_TELES3C) {
 179                 /* Teles 16.3c IO ADR is 0x200 | YY0U (YY Bit 15/14 address) */
 180                 outb(0x00, cs->hw.hfcD.addr);
 181                 outb(0x56, cs->hw.hfcD.addr | 1);
 182         } else if (cs->typ == ISDN_CTYPE_ACERP10) {
 183                 /* Acer P10 IO ADR is 0x300 */
 184                 outb(0x00, cs->hw.hfcD.addr);
 185                 outb(0x57, cs->hw.hfcD.addr | 1);
 186         }
 187         set_cs_func(cs);
 188         cs->hw.hfcD.timer.function = (void *) hfcs_Timer;
 189         cs->hw.hfcD.timer.data = (long) cs;
 190         init_timer(&cs->hw.hfcD.timer);
 191         reset_hfcs(cs);
 192         cs->cardmsg = &hfcs_card_msg;
 193         cs->irq_func = &hfcs_interrupt;
 194         return (1);
 195 }