t1isa.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:14k
- /* $Id: t1isa.c,v 1.1.4.1 2001/11/20 14:19:34 kai Exp $
- *
- * Module for AVM T1 HEMA-card.
- *
- * Copyright 1999 by Carsten Paeth <calle@calle.de>
- *
- * This software may be used and distributed according to the terms
- * of the GNU General Public License, incorporated herein by reference.
- *
- */
- #include <linux/module.h>
- #include <linux/kernel.h>
- #include <linux/skbuff.h>
- #include <linux/delay.h>
- #include <linux/mm.h>
- #include <linux/interrupt.h>
- #include <linux/ioport.h>
- #include <linux/capi.h>
- #include <linux/kernelcapi.h>
- #include <linux/init.h>
- #include <asm/io.h>
- #include "capicmd.h"
- #include "capiutil.h"
- #include "capilli.h"
- #include "avmcard.h"
- static char *revision = "$Revision: 1.1.4.1 $";
- /* ------------------------------------------------------------- */
- MODULE_DESCRIPTION("CAPI4Linux: Driver for AVM T1 HEMA ISA card");
- MODULE_AUTHOR("Carsten Paeth");
- MODULE_LICENSE("GPL");
- /* ------------------------------------------------------------- */
- static struct capi_driver_interface *di;
- /* ------------------------------------------------------------- */
- static int hema_irq_table[16] =
- {0,
- 0,
- 0,
- 0x80, /* irq 3 */
- 0,
- 0x90, /* irq 5 */
- 0,
- 0xA0, /* irq 7 */
- 0,
- 0xB0, /* irq 9 */
- 0xC0, /* irq 10 */
- 0xD0, /* irq 11 */
- 0xE0, /* irq 12 */
- 0,
- 0,
- 0xF0, /* irq 15 */
- };
- static int t1_detectandinit(unsigned int base, unsigned irq, int cardnr)
- {
- unsigned char cregs[8];
- unsigned char reverse_cardnr;
- unsigned long flags;
- unsigned char dummy;
- int i;
- reverse_cardnr = ((cardnr & 0x01) << 3) | ((cardnr & 0x02) << 1)
- | ((cardnr & 0x04) >> 1) | ((cardnr & 0x08) >> 3);
- cregs[0] = (HEMA_VERSION_ID << 4) | (reverse_cardnr & 0xf);
- cregs[1] = 0x00; /* fast & slow link connected to CON1 */
- cregs[2] = 0x05; /* fast link 20MBit, slow link 20 MBit */
- cregs[3] = 0;
- cregs[4] = 0x11; /* zero wait state */
- cregs[5] = hema_irq_table[irq & 0xf];
- cregs[6] = 0;
- cregs[7] = 0;
- save_flags(flags);
- cli();
- /* board reset */
- t1outp(base, T1_RESETBOARD, 0xf);
- mdelay(100);
- dummy = t1inp(base, T1_FASTLINK+T1_OUTSTAT); /* first read */
- /* write config */
- dummy = (base >> 4) & 0xff;
- for (i=1;i<=0xf;i++) t1outp(base, i, dummy);
- t1outp(base, HEMA_PAL_ID & 0xf, dummy);
- t1outp(base, HEMA_PAL_ID >> 4, cregs[0]);
- for(i=1;i<7;i++) t1outp(base, 0, cregs[i]);
- t1outp(base, ((base >> 4)) & 0x3, cregs[7]);
- restore_flags(flags);
- mdelay(100);
- t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
- t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
- mdelay(10);
- t1outp(base, T1_FASTLINK+T1_RESETLINK, 1);
- t1outp(base, T1_SLOWLINK+T1_RESETLINK, 1);
- mdelay(100);
- t1outp(base, T1_FASTLINK+T1_RESETLINK, 0);
- t1outp(base, T1_SLOWLINK+T1_RESETLINK, 0);
- mdelay(10);
- t1outp(base, T1_FASTLINK+T1_ANALYSE, 0);
- mdelay(5);
- t1outp(base, T1_SLOWLINK+T1_ANALYSE, 0);
- if (t1inp(base, T1_FASTLINK+T1_OUTSTAT) != 0x1) /* tx empty */
- return 1;
- if (t1inp(base, T1_FASTLINK+T1_INSTAT) != 0x0) /* rx empty */
- return 2;
- if (t1inp(base, T1_FASTLINK+T1_IRQENABLE) != 0x0)
- return 3;
- if ((t1inp(base, T1_FASTLINK+T1_FIFOSTAT) & 0xf0) != 0x70)
- return 4;
- if ((t1inp(base, T1_FASTLINK+T1_IRQMASTER) & 0x0e) != 0)
- return 5;
- if ((t1inp(base, T1_FASTLINK+T1_IDENT) & 0x7d) != 1)
- return 6;
- if (t1inp(base, T1_SLOWLINK+T1_OUTSTAT) != 0x1) /* tx empty */
- return 7;
- if ((t1inp(base, T1_SLOWLINK+T1_IRQMASTER) & 0x0e) != 0)
- return 8;
- if ((t1inp(base, T1_SLOWLINK+T1_IDENT) & 0x7d) != 0)
- return 9;
- return 0;
- }
- static void t1_handle_interrupt(avmcard * card)
- {
- avmctrl_info *cinfo = &card->ctrlinfo[0];
- struct capi_ctr *ctrl = cinfo->capi_ctrl;
- unsigned char b1cmd;
- struct sk_buff *skb;
- unsigned ApplId;
- unsigned MsgLen;
- unsigned DataB3Len;
- unsigned NCCI;
- unsigned WindowSize;
- while (b1_rx_full(card->port)) {
- b1cmd = b1_get_byte(card->port);
- switch (b1cmd) {
- case RECEIVE_DATA_B3_IND:
- ApplId = (unsigned) b1_get_word(card->port);
- MsgLen = t1_get_slice(card->port, card->msgbuf);
- DataB3Len = t1_get_slice(card->port, card->databuf);
- if (MsgLen < 30) { /* not CAPI 64Bit */
- memset(card->msgbuf+MsgLen, 0, 30-MsgLen);
- MsgLen = 30;
- CAPIMSG_SETLEN(card->msgbuf, 30);
- }
- if (!(skb = alloc_skb(DataB3Len+MsgLen, GFP_ATOMIC))) {
- printk(KERN_ERR "%s: incoming packet droppedn",
- card->name);
- } else {
- memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
- memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len);
- ctrl->handle_capimsg(ctrl, ApplId, skb);
- }
- break;
- case RECEIVE_MESSAGE:
- ApplId = (unsigned) b1_get_word(card->port);
- MsgLen = t1_get_slice(card->port, card->msgbuf);
- if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
- printk(KERN_ERR "%s: incoming packet droppedn",
- card->name);
- } else {
- memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
- ctrl->handle_capimsg(ctrl, ApplId, skb);
- }
- break;
- case RECEIVE_NEW_NCCI:
- ApplId = b1_get_word(card->port);
- NCCI = b1_get_word(card->port);
- WindowSize = b1_get_word(card->port);
- ctrl->new_ncci(ctrl, ApplId, NCCI, WindowSize);
- break;
- case RECEIVE_FREE_NCCI:
- ApplId = b1_get_word(card->port);
- NCCI = b1_get_word(card->port);
- if (NCCI != 0xffffffff)
- ctrl->free_ncci(ctrl, ApplId, NCCI);
- else ctrl->appl_released(ctrl, ApplId);
- break;
- case RECEIVE_START:
- b1_put_byte(card->port, SEND_POLLACK);
- ctrl->resume_output(ctrl);
- break;
- case RECEIVE_STOP:
- ctrl->suspend_output(ctrl);
- break;
- case RECEIVE_INIT:
- cinfo->versionlen = t1_get_slice(card->port, cinfo->versionbuf);
- b1_parse_version(cinfo);
- printk(KERN_INFO "%s: %s-card (%s) now activen",
- card->name,
- cinfo->version[VER_CARDTYPE],
- cinfo->version[VER_DRIVER]);
- ctrl->ready(ctrl);
- break;
- case RECEIVE_TASK_READY:
- ApplId = (unsigned) b1_get_word(card->port);
- MsgLen = t1_get_slice(card->port, card->msgbuf);
- card->msgbuf[MsgLen] = 0;
- while ( MsgLen > 0
- && ( card->msgbuf[MsgLen-1] == 'n'
- || card->msgbuf[MsgLen-1] == 'r')) {
- card->msgbuf[MsgLen-1] = 0;
- MsgLen--;
- }
- printk(KERN_INFO "%s: task %d "%s" ready.n",
- card->name, ApplId, card->msgbuf);
- break;
- case RECEIVE_DEBUGMSG:
- MsgLen = t1_get_slice(card->port, card->msgbuf);
- card->msgbuf[MsgLen] = 0;
- while ( MsgLen > 0
- && ( card->msgbuf[MsgLen-1] == 'n'
- || card->msgbuf[MsgLen-1] == 'r')) {
- card->msgbuf[MsgLen-1] = 0;
- MsgLen--;
- }
- printk(KERN_INFO "%s: DEBUG: %sn", card->name, card->msgbuf);
- break;
- case 0xff:
- printk(KERN_ERR "%s: card reseted ?n", card->name);
- return;
- default:
- printk(KERN_ERR "%s: b1_interrupt: 0x%x ???n",
- card->name, b1cmd);
- return;
- }
- }
- }
- /* ------------------------------------------------------------- */
- static void t1isa_interrupt(int interrupt, void *devptr, struct pt_regs *regs)
- {
- avmcard *card;
- card = (avmcard *) devptr;
- if (!card) {
- printk(KERN_WARNING "t1isa: interrupt: wrong devicen");
- return;
- }
- if (card->interrupt) {
- printk(KERN_ERR "%s: reentering interrupt hander.n",
- card->name);
- return;
- }
- card->interrupt = 1;
- t1_handle_interrupt(card);
- card->interrupt = 0;
- }
- /* ------------------------------------------------------------- */
- static int t1isa_load_firmware(struct capi_ctr *ctrl, capiloaddata *data)
- {
- avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
- avmcard *card = cinfo->card;
- unsigned int port = card->port;
- unsigned long flags;
- int retval;
- t1_disable_irq(port);
- b1_reset(port);
- if ((retval = b1_load_t4file(card, &data->firmware))) {
- b1_reset(port);
- printk(KERN_ERR "%s: failed to load t4file!!n",
- card->name);
- return retval;
- }
- if (data->configuration.len > 0 && data->configuration.data) {
- if ((retval = b1_load_config(card, &data->configuration))) {
- b1_reset(port);
- printk(KERN_ERR "%s: failed to load config!!n",
- card->name);
- return retval;
- }
- }
- if (!b1_loaded(card)) {
- printk(KERN_ERR "%s: failed to load t4file.n", card->name);
- return -EIO;
- }
- save_flags(flags);
- cli();
- b1_setinterrupt(port, card->irq, card->cardtype);
- b1_put_byte(port, SEND_INIT);
- b1_put_word(port, CAPI_MAXAPPL);
- b1_put_word(port, AVM_NCCI_PER_CHANNEL*30);
- b1_put_word(port, ctrl->cnr - 1);
- restore_flags(flags);
- return 0;
- }
- void t1isa_reset_ctr(struct capi_ctr *ctrl)
- {
- avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
- avmcard *card = cinfo->card;
- unsigned int port = card->port;
- t1_disable_irq(port);
- b1_reset(port);
- b1_reset(port);
- memset(cinfo->version, 0, sizeof(cinfo->version));
- ctrl->reseted(ctrl);
- }
- static void t1isa_remove_ctr(struct capi_ctr *ctrl)
- {
- avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
- avmcard *card = cinfo->card;
- unsigned int port = card->port;
- t1_disable_irq(port);
- b1_reset(port);
- b1_reset(port);
- t1_reset(port);
- di->detach_ctr(ctrl);
- free_irq(card->irq, card);
- release_region(card->port, AVMB1_PORTLEN);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- }
- /* ------------------------------------------------------------- */
- static int t1isa_add_card(struct capi_driver *driver, struct capicardparams *p)
- {
- struct capi_ctr *ctrl;
- avmctrl_info *cinfo;
- avmcard *card;
- int retval;
- MOD_INC_USE_COUNT;
- card = (avmcard *) kmalloc(sizeof(avmcard), GFP_ATOMIC);
- if (!card) {
- printk(KERN_WARNING "%s: no memory.n", driver->name);
- MOD_DEC_USE_COUNT;
- return -ENOMEM;
- }
- memset(card, 0, sizeof(avmcard));
- cinfo = (avmctrl_info *) kmalloc(sizeof(avmctrl_info), GFP_ATOMIC);
- if (!cinfo) {
- printk(KERN_WARNING "%s: no memory.n", driver->name);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -ENOMEM;
- }
- memset(cinfo, 0, sizeof(avmctrl_info));
- card->ctrlinfo = cinfo;
- cinfo->card = card;
- sprintf(card->name, "t1isa-%x", p->port);
- card->port = p->port;
- card->irq = p->irq;
- card->cardtype = avm_t1isa;
- card->cardnr = p->cardnr;
- if (!(((card->port & 0x7) == 0) && ((card->port & 0x30) != 0x30))) {
- printk(KERN_WARNING "%s: illegal port 0x%x.n",
- driver->name, card->port);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EINVAL;
- }
- if (check_region(card->port, AVMB1_PORTLEN)) {
- printk(KERN_WARNING
- "%s: ports 0x%03x-0x%03x in use.n",
- driver->name, card->port, card->port + AVMB1_PORTLEN);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EBUSY;
- }
- if (hema_irq_table[card->irq & 0xf] == 0) {
- printk(KERN_WARNING "%s: irq %d not valid.n",
- driver->name, card->irq);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EINVAL;
- }
- for (ctrl = driver->controller; ctrl; ctrl = ctrl->next) {
- avmcard *cardp = ((avmctrl_info *)(ctrl->driverdata))->card;
- if (cardp->cardnr == card->cardnr) {
- printk(KERN_WARNING "%s: card with number %d already installed at 0x%x.n",
- driver->name, card->cardnr, cardp->port);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EBUSY;
- }
- }
- if ((retval = t1_detectandinit(card->port, card->irq, card->cardnr)) != 0) {
- printk(KERN_NOTICE "%s: NO card at 0x%x (%d)n",
- driver->name, card->port, retval);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EIO;
- }
- t1_disable_irq(card->port);
- b1_reset(card->port);
- request_region(p->port, AVMB1_PORTLEN, card->name);
- retval = request_irq(card->irq, t1isa_interrupt, 0, card->name, card);
- if (retval) {
- printk(KERN_ERR "%s: unable to get IRQ %d.n",
- driver->name, card->irq);
- release_region(card->port, AVMB1_PORTLEN);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EBUSY;
- }
- cinfo->capi_ctrl = di->attach_ctr(driver, card->name, cinfo);
- if (!cinfo->capi_ctrl) {
- printk(KERN_ERR "%s: attach controller failed.n",
- driver->name);
- free_irq(card->irq, card);
- release_region(card->port, AVMB1_PORTLEN);
- kfree(card->ctrlinfo);
- kfree(card);
- MOD_DEC_USE_COUNT;
- return -EBUSY;
- }
- printk(KERN_INFO
- "%s: AVM T1 ISA at i/o %#x, irq %d, card %dn",
- driver->name, card->port, card->irq, card->cardnr);
- return 0;
- }
- static void t1isa_send_message(struct capi_ctr *ctrl, struct sk_buff *skb)
- {
- avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
- avmcard *card = cinfo->card;
- unsigned int port = card->port;
- unsigned long flags;
- __u16 len = CAPIMSG_LEN(skb->data);
- __u8 cmd = CAPIMSG_COMMAND(skb->data);
- __u8 subcmd = CAPIMSG_SUBCOMMAND(skb->data);
- save_flags(flags);
- cli();
- if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
- __u16 dlen = CAPIMSG_DATALEN(skb->data);
- b1_put_byte(port, SEND_DATA_B3_REQ);
- t1_put_slice(port, skb->data, len);
- t1_put_slice(port, skb->data + len, dlen);
- } else {
- b1_put_byte(port, SEND_MESSAGE);
- t1_put_slice(port, skb->data, len);
- }
- restore_flags(flags);
- dev_kfree_skb(skb);
- }
- /* ------------------------------------------------------------- */
- static char *t1isa_procinfo(struct capi_ctr *ctrl)
- {
- avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
- if (!cinfo)
- return "";
- sprintf(cinfo->infobuf, "%s %s 0x%x %d %d",
- cinfo->cardname[0] ? cinfo->cardname : "-",
- cinfo->version[VER_DRIVER] ? cinfo->version[VER_DRIVER] : "-",
- cinfo->card ? cinfo->card->port : 0x0,
- cinfo->card ? cinfo->card->irq : 0,
- cinfo->card ? cinfo->card->cardnr : 0
- );
- return cinfo->infobuf;
- }
- /* ------------------------------------------------------------- */
- static struct capi_driver t1isa_driver = {
- name: "t1isa",
- revision: "0.0",
- load_firmware: t1isa_load_firmware,
- reset_ctr: t1isa_reset_ctr,
- remove_ctr: t1isa_remove_ctr,
- register_appl: b1_register_appl,
- release_appl: b1_release_appl,
- send_message: t1isa_send_message,
- procinfo: t1isa_procinfo,
- ctr_read_proc: b1ctl_read_proc,
- driver_read_proc: 0, /* use standard driver_read_proc */
- add_card: t1isa_add_card,
- };
- static int __init t1isa_init(void)
- {
- struct capi_driver *driver = &t1isa_driver;
- char *p;
- int retval = 0;
- MOD_INC_USE_COUNT;
- if ((p = strchr(revision, ':')) != 0 && p[1]) {
- strncpy(driver->revision, p + 2, sizeof(driver->revision));
- driver->revision[sizeof(driver->revision)-1] = 0;
- if ((p = strchr(driver->revision, '$')) != 0 && p > driver->revision)
- *(p-1) = 0;
- }
- printk(KERN_INFO "%s: revision %sn", driver->name, driver->revision);
- di = attach_capi_driver(driver);
- if (!di) {
- printk(KERN_ERR "%s: failed to attach capi_drivern",
- driver->name);
- retval = -EIO;
- }
- MOD_DEC_USE_COUNT;
- return retval;
- }
- static void __exit t1isa_exit(void)
- {
- detach_capi_driver(&t1isa_driver);
- }
- module_init(t1isa_init);
- module_exit(t1isa_exit);