1 /* $Id: act2000_isa.c,v 1.11.6.3 2001/09/23 22:24:32 kai Exp $
3 * ISDN lowlevel-module for the IBM ISDN-S0 Active 2000 (ISA-Version).
6 * Copyright by Fritz Elfert <fritz@isdn4linux.de>
8 * This software may be used and distributed according to the terms
9 * of the GNU General Public License, incorporated herein by reference.
11 * Thanks to Friedemann Baitinger and IBM Germany
16 #include "act2000_isa.h"
19 static act2000_card *irq2card_map[16];
22 act2000_isa_delay(long t)
24 set_current_state(TASK_INTERRUPTIBLE);
29 * Reset Controller, then try to read the Card's signature.
31 * 1 = Signature found.
32 * 0 = Signature not found.
35 act2000_isa_reset(unsigned short portbase)
43 if ((reg = inb(portbase + ISA_COR)) != 0xff) {
44 outb(reg | ISA_COR_RESET, portbase + ISA_COR);
46 outb(reg, portbase + ISA_COR);
49 for (i = 0; i < 16; i++) {
50 if (inb(portbase + ISA_ISR) & ISA_ISR_SERIAL)
54 if (serial == ISA_SER_ID)
61 act2000_isa_detect(unsigned short portbase)
65 if (request_region(portbase, ACT2000_PORTLEN, "act2000isa")) {
66 ret = act2000_isa_reset(portbase);
67 release_region(portbase, ISA_REGION);
73 act2000_isa_interrupt(int irq, void *dev_id, struct pt_regs *regs)
75 act2000_card *card = irq2card_map[irq];
80 "act2000: Spurious interrupt!\n");
83 istatus = (inb(ISA_PORT_ISR) & 0x07);
84 if (istatus & ISA_ISR_OUT) {
85 /* RX fifo has data */
86 istatus &= ISA_ISR_OUT_MASK;
87 outb(0, ISA_PORT_SIS);
88 act2000_isa_receive(card);
89 outb(ISA_SIS_INT, ISA_PORT_SIS);
91 if (istatus & ISA_ISR_ERR) {
93 istatus &= ISA_ISR_ERR_MASK;
94 printk(KERN_WARNING "act2000: errIRQ\n");
97 printk(KERN_DEBUG "act2000: ?IRQ %d %02x\n", irq, istatus);
102 act2000_isa_select_irq(act2000_card * card)
106 reg = (inb(ISA_PORT_COR) & ~ISA_COR_IRQOFF) | ISA_COR_PERR;
130 outb(reg, ISA_PORT_COR);
134 act2000_isa_enable_irq(act2000_card * card)
136 act2000_isa_select_irq(card);
137 /* Enable READ irq */
138 outb(ISA_SIS_INT, ISA_PORT_SIS);
142 * Install interrupt handler, enable irq on card.
143 * If irq is -1, choose next free irq, else irq is given explicitely.
146 act2000_isa_config_irq(act2000_card * card, short irq)
148 if (card->flags & ACT2000_FLAGS_IVALID) {
149 free_irq(card->irq, NULL);
150 irq2card_map[card->irq] = NULL;
152 card->flags &= ~ACT2000_FLAGS_IVALID;
153 outb(ISA_COR_IRQOFF, ISA_PORT_COR);
157 if (!request_irq(irq, &act2000_isa_interrupt, 0, card->regname, NULL)) {
159 irq2card_map[card->irq] = card;
160 card->flags |= ACT2000_FLAGS_IVALID;
162 "act2000: Could not request irq %d\n",irq);
165 act2000_isa_select_irq(card);
166 /* Disable READ and WRITE irq */
167 outb(0, ISA_PORT_SIS);
168 outb(0, ISA_PORT_SOS);
174 act2000_isa_config_port(act2000_card * card, unsigned short portbase)
176 if (card->flags & ACT2000_FLAGS_PVALID) {
177 release_region(card->port, ISA_REGION);
178 card->flags &= ~ACT2000_FLAGS_PVALID;
180 if (request_region(portbase, ACT2000_PORTLEN, card->regname) == NULL)
183 card->port = portbase;
184 card->flags |= ACT2000_FLAGS_PVALID;
190 * Release ressources, used by an adaptor.
193 act2000_isa_release(act2000_card * card)
197 spin_lock_irqsave(&card->lock, flags);
198 if (card->flags & ACT2000_FLAGS_IVALID) {
199 free_irq(card->irq, NULL);
200 irq2card_map[card->irq] = NULL;
202 card->flags &= ~ACT2000_FLAGS_IVALID;
203 if (card->flags & ACT2000_FLAGS_PVALID)
204 release_region(card->port, ISA_REGION);
205 card->flags &= ~ACT2000_FLAGS_PVALID;
206 spin_unlock_irqrestore(&card->lock, flags);
210 act2000_isa_writeb(act2000_card * card, u_char data)
215 if (inb(ISA_PORT_SOS) & ISA_SOS_READY) {
216 outb(data, ISA_PORT_SDO);
227 act2000_isa_readb(act2000_card * card, u_char * data)
232 if (inb(ISA_PORT_SIS) & ISA_SIS_READY) {
233 *data = inb(ISA_PORT_SDI);
244 act2000_isa_receive(act2000_card *card)
248 if (test_and_set_bit(ACT2000_LOCK_RX, (void *) &card->ilock) != 0)
250 while (!act2000_isa_readb(card, &c)) {
251 if (card->idat.isa.rcvidx < 8) {
252 card->idat.isa.rcvhdr[card->idat.isa.rcvidx++] = c;
253 if (card->idat.isa.rcvidx == 8) {
254 int valid = actcapi_chkhdr(card, (actcapi_msghdr *)&card->idat.isa.rcvhdr);
257 card->idat.isa.rcvlen = ((actcapi_msghdr *)&card->idat.isa.rcvhdr)->len;
258 card->idat.isa.rcvskb = dev_alloc_skb(card->idat.isa.rcvlen);
259 if (card->idat.isa.rcvskb == NULL) {
260 card->idat.isa.rcvignore = 1;
262 "act2000_isa_receive: no memory\n");
263 test_and_clear_bit(ACT2000_LOCK_RX, (void *) &card->ilock);
266 memcpy(skb_put(card->idat.isa.rcvskb, 8), card->idat.isa.rcvhdr, 8);
267 card->idat.isa.rcvptr = skb_put(card->idat.isa.rcvskb, card->idat.isa.rcvlen - 8);
269 card->idat.isa.rcvidx = 0;
271 "act2000_isa_receive: Invalid CAPI msg\n");
273 int i; __u8 *p; __u8 *c; __u8 tmp[30];
274 for (i = 0, p = (__u8 *)&card->idat.isa.rcvhdr, c = tmp; i < 8; i++)
275 c += sprintf(c, "%02x ", *(p++));
276 printk(KERN_WARNING "act2000_isa_receive: %s\n", tmp);
281 if (!card->idat.isa.rcvignore)
282 *card->idat.isa.rcvptr++ = c;
283 if (++card->idat.isa.rcvidx >= card->idat.isa.rcvlen) {
284 if (!card->idat.isa.rcvignore) {
285 skb_queue_tail(&card->rcvq, card->idat.isa.rcvskb);
286 act2000_schedule_rx(card);
288 card->idat.isa.rcvidx = 0;
289 card->idat.isa.rcvlen = 8;
290 card->idat.isa.rcvignore = 0;
291 card->idat.isa.rcvskb = NULL;
292 card->idat.isa.rcvptr = card->idat.isa.rcvhdr;
296 if (!(card->flags & ACT2000_FLAGS_IVALID)) {
297 /* In polling mode, schedule myself */
298 if ((card->idat.isa.rcvidx) &&
299 (card->idat.isa.rcvignore ||
300 (card->idat.isa.rcvidx < card->idat.isa.rcvlen)))
301 act2000_schedule_poll(card);
303 test_and_clear_bit(ACT2000_LOCK_RX, (void *) &card->ilock);
307 act2000_isa_send(act2000_card * card)
314 if (test_and_set_bit(ACT2000_LOCK_TX, (void *) &card->ilock) != 0)
317 spin_lock_irqsave(&card->lock, flags);
319 if ((card->sbuf = skb_dequeue(&card->sndq))) {
320 card->ack_msg = card->sbuf->data;
321 msg = (actcapi_msg *)card->sbuf->data;
322 if ((msg->hdr.cmd.cmd == 0x86) &&
323 (msg->hdr.cmd.subcmd == 0) ) {
324 /* Save flags in message */
325 card->need_b3ack = msg->msg.data_b3_req.flags;
326 msg->msg.data_b3_req.flags = 0;
330 spin_unlock_irqrestore(&card->lock, flags);
332 /* No more data to send */
333 test_and_clear_bit(ACT2000_LOCK_TX, (void *) &card->ilock);
339 if (act2000_isa_writeb(card, *(skb->data))) {
340 /* Fifo is full, but more data to send */
341 test_and_clear_bit(ACT2000_LOCK_TX, (void *) &card->ilock);
342 /* Schedule myself */
343 act2000_schedule_tx(card);
349 msg = (actcapi_msg *)card->ack_msg;
350 if ((msg->hdr.cmd.cmd == 0x86) &&
351 (msg->hdr.cmd.subcmd == 0) ) {
353 * If it's user data, reset data-ptr
354 * and put skb into ackq.
356 skb->data = card->ack_msg;
357 /* Restore flags in message */
358 msg->msg.data_b3_req.flags = card->need_b3ack;
359 skb_queue_tail(&card->ackq, skb);
367 * Get firmware ID, check for 'ISDN' signature.
370 act2000_isa_getid(act2000_card * card)
374 u_char *p = (u_char *) & fid;
380 if (act2000_isa_readb(card, p++))
385 printk(KERN_WARNING "act2000: No Firmware-ID!\n");
389 fid.revlen[0] = '\0';
390 if (strcmp(fid.isdn, "ISDN")) {
391 printk(KERN_WARNING "act2000: Wrong Firmware-ID!\n");
394 if ((p = strchr(fid.revision, '\n')))
396 printk(KERN_INFO "act2000: Firmware-ID: %s\n", fid.revision);
397 if (card->flags & ACT2000_FLAGS_IVALID) {
398 printk(KERN_DEBUG "Enabling Interrupts ...\n");
399 act2000_isa_enable_irq(card);
405 * Download microcode into card, check Firmware signature.
408 act2000_isa_download(act2000_card * card, act2000_ddef __user * cb)
420 if (!act2000_isa_reset(card->port))
422 act2000_isa_delay(HZ / 2);
423 if(copy_from_user(&cblock, cb, sizeof(cblock)))
425 length = cblock.length;
427 if ((ret = verify_area(VERIFY_READ, p, length)))
429 buf = (u_char *) kmalloc(1024, GFP_KERNEL);
434 l = (length > 1024) ? 1024 : length;
437 if (copy_from_user(buf, p, l)) {
442 if (act2000_isa_writeb(card, *b++)) {
444 "act2000: loader timed out"
445 " len=%d c=%d\n", length, c);
455 act2000_isa_delay(HZ / 2);
456 return (act2000_isa_getid(card));