dtl1_cs.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:18k
- /*
- *
- * A driver for Nokia Connectivity Card DTL-1 devices
- *
- * Copyright (C) 2001-2002 Marcel Holtmann <marcel@holtmann.org>
- *
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License version 2 as
- * published by the Free Software Foundation;
- *
- * Software distributed under the License is distributed on an "AS
- * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
- * implied. See the License for the specific language governing
- * rights and limitations under the License.
- *
- * The initial developer of the original code is David A. Hinds
- * <dahinds@users.sourceforge.net>. Portions created by David A. Hinds
- * are Copyright (C) 1999 David A. Hinds. All Rights Reserved.
- *
- */
- #include <linux/config.h>
- #include <linux/module.h>
- #include <linux/kernel.h>
- #include <linux/init.h>
- #include <linux/slab.h>
- #include <linux/types.h>
- #include <linux/sched.h>
- #include <linux/timer.h>
- #include <linux/errno.h>
- #include <linux/ptrace.h>
- #include <linux/ioport.h>
- #include <linux/spinlock.h>
- #include <linux/skbuff.h>
- #include <linux/string.h>
- #include <linux/serial.h>
- #include <linux/serial_reg.h>
- #include <asm/system.h>
- #include <asm/bitops.h>
- #include <asm/io.h>
- #include <pcmcia/version.h>
- #include <pcmcia/cs_types.h>
- #include <pcmcia/cs.h>
- #include <pcmcia/cistpl.h>
- #include <pcmcia/ciscode.h>
- #include <pcmcia/ds.h>
- #include <pcmcia/cisreg.h>
- #include <net/bluetooth/bluetooth.h>
- #include <net/bluetooth/hci_core.h>
- /* ======================== Module parameters ======================== */
- /* Bit map of interrupts to choose from */
- static u_int irq_mask = 0xffff;
- static int irq_list[4] = { -1 };
- MODULE_PARM(irq_mask, "i");
- MODULE_PARM(irq_list, "1-4i");
- MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
- MODULE_DESCRIPTION("BlueZ driver for Nokia Connectivity Card DTL-1");
- MODULE_LICENSE("GPL");
- /* ======================== Local structures ======================== */
- typedef struct dtl1_info_t {
- dev_link_t link;
- dev_node_t node;
- struct hci_dev hdev;
- spinlock_t lock; /* For serializing operations */
- unsigned long flowmask; /* HCI flow mask */
- int ri_latch;
- struct sk_buff_head txq;
- unsigned long tx_state;
- unsigned long rx_state;
- unsigned long rx_count;
- struct sk_buff *rx_skb;
- } dtl1_info_t;
- void dtl1_config(dev_link_t *link);
- void dtl1_release(u_long arg);
- int dtl1_event(event_t event, int priority, event_callback_args_t *args);
- static dev_info_t dev_info = "dtl1_cs";
- dev_link_t *dtl1_attach(void);
- void dtl1_detach(dev_link_t *);
- static dev_link_t *dev_list = NULL;
- /* Transmit states */
- #define XMIT_SENDING 1
- #define XMIT_WAKEUP 2
- #define XMIT_WAITING 8
- /* Receiver States */
- #define RECV_WAIT_NSH 0
- #define RECV_WAIT_DATA 1
- typedef struct {
- u8 type;
- u8 zero;
- u16 len;
- } __attribute__ ((packed)) nsh_t; /* Nokia Specific Header */
- #define NSHL 4 /* Nokia Specific Header Length */
- /* ======================== Interrupt handling ======================== */
- static int dtl1_write(unsigned int iobase, int fifo_size, __u8 *buf, int len)
- {
- int actual = 0;
- /* Tx FIFO should be empty */
- if (!(inb(iobase + UART_LSR) & UART_LSR_THRE))
- return 0;
- /* Fill FIFO with current frame */
- while ((fifo_size-- > 0) && (actual < len)) {
- /* Transmit next byte */
- outb(buf[actual], iobase + UART_TX);
- actual++;
- }
- return actual;
- }
- static void dtl1_write_wakeup(dtl1_info_t *info)
- {
- if (!info) {
- printk(KERN_WARNING "dtl1_cs: Call of write_wakeup for unknown device.n");
- return;
- }
- if (test_bit(XMIT_WAITING, &(info->tx_state))) {
- set_bit(XMIT_WAKEUP, &(info->tx_state));
- return;
- }
- if (test_and_set_bit(XMIT_SENDING, &(info->tx_state))) {
- set_bit(XMIT_WAKEUP, &(info->tx_state));
- return;
- }
- do {
- register unsigned int iobase = info->link.io.BasePort1;
- register struct sk_buff *skb;
- register int len;
- clear_bit(XMIT_WAKEUP, &(info->tx_state));
- if (!(info->link.state & DEV_PRESENT))
- return;
- if (!(skb = skb_dequeue(&(info->txq))))
- break;
- /* Send frame */
- len = dtl1_write(iobase, 32, skb->data, skb->len);
- if (len == skb->len) {
- set_bit(XMIT_WAITING, &(info->tx_state));
- kfree_skb(skb);
- } else {
- skb_pull(skb, len);
- skb_queue_head(&(info->txq), skb);
- }
- info->hdev.stat.byte_tx += len;
- } while (test_bit(XMIT_WAKEUP, &(info->tx_state)));
- clear_bit(XMIT_SENDING, &(info->tx_state));
- }
- static void dtl1_control(dtl1_info_t *info, struct sk_buff *skb)
- {
- u8 flowmask = *(u8 *)skb->data;
- int i;
- printk(KERN_INFO "dtl1_cs: Nokia control data = ");
- for (i = 0; i < skb->len; i++) {
- printk("%02x ", skb->data[i]);
- }
- printk("n");
- /* transition to active state */
- if (((info->flowmask & 0x07) == 0) && ((flowmask & 0x07) != 0)) {
- clear_bit(XMIT_WAITING, &(info->tx_state));
- dtl1_write_wakeup(info);
- }
- info->flowmask = flowmask;
- kfree_skb(skb);
- }
- static void dtl1_receive(dtl1_info_t *info)
- {
- unsigned int iobase;
- nsh_t *nsh;
- int boguscount = 0;
- if (!info) {
- printk(KERN_WARNING "dtl1_cs: Call of receive for unknown device.n");
- return;
- }
- iobase = info->link.io.BasePort1;
- do {
- info->hdev.stat.byte_rx++;
- /* Allocate packet */
- if (info->rx_skb == NULL)
- if (!(info->rx_skb = bluez_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC))) {
- printk(KERN_WARNING "dtl1_cs: Can't allocate mem for new packet.n");
- info->rx_state = RECV_WAIT_NSH;
- info->rx_count = NSHL;
- return;
- }
- *skb_put(info->rx_skb, 1) = inb(iobase + UART_RX);
- nsh = (nsh_t *)info->rx_skb->data;
- info->rx_count--;
- if (info->rx_count == 0) {
- switch (info->rx_state) {
- case RECV_WAIT_NSH:
- info->rx_state = RECV_WAIT_DATA;
- info->rx_count = nsh->len + (nsh->len & 0x0001);
- break;
- case RECV_WAIT_DATA:
- info->rx_skb->pkt_type = nsh->type;
- /* remove PAD byte if it exists */
- if (nsh->len & 0x0001) {
- info->rx_skb->tail--;
- info->rx_skb->len--;
- }
- /* remove NSH */
- skb_pull(info->rx_skb, NSHL);
- switch (info->rx_skb->pkt_type) {
- case 0x80:
- /* control data for the Nokia Card */
- dtl1_control(info, info->rx_skb);
- break;
- case 0x82:
- case 0x83:
- case 0x84:
- /* send frame to the HCI layer */
- info->rx_skb->dev = (void *)&(info->hdev);
- info->rx_skb->pkt_type &= 0x0f;
- hci_recv_frame(info->rx_skb);
- break;
- default:
- /* unknown packet */
- printk(KERN_WARNING "dtl1_cs: Unknown HCI packet with type 0x%02x received.n", info->rx_skb->pkt_type);
- kfree_skb(info->rx_skb);
- break;
- }
- info->rx_state = RECV_WAIT_NSH;
- info->rx_count = NSHL;
- info->rx_skb = NULL;
- break;
- }
- }
- /* Make sure we don't stay here to long */
- if (boguscount++ > 32)
- break;
- } while (inb(iobase + UART_LSR) & UART_LSR_DR);
- }
- void dtl1_interrupt(int irq, void *dev_inst, struct pt_regs *regs)
- {
- dtl1_info_t *info = dev_inst;
- unsigned int iobase;
- unsigned char msr;
- int boguscount = 0;
- int iir, lsr;
- if (!info) {
- printk(KERN_WARNING "dtl1_cs: Call of irq %d for unknown device.n", irq);
- return;
- }
- iobase = info->link.io.BasePort1;
- spin_lock(&(info->lock));
- iir = inb(iobase + UART_IIR) & UART_IIR_ID;
- while (iir) {
- /* Clear interrupt */
- lsr = inb(iobase + UART_LSR);
- switch (iir) {
- case UART_IIR_RLSI:
- printk(KERN_NOTICE "dtl1_cs: RLSIn");
- break;
- case UART_IIR_RDI:
- /* Receive interrupt */
- dtl1_receive(info);
- break;
- case UART_IIR_THRI:
- if (lsr & UART_LSR_THRE) {
- /* Transmitter ready for data */
- dtl1_write_wakeup(info);
- }
- break;
- default:
- printk(KERN_NOTICE "dtl1_cs: Unhandled IIR=%#xn", iir);
- break;
- }
- /* Make sure we don't stay here to long */
- if (boguscount++ > 100)
- break;
- iir = inb(iobase + UART_IIR) & UART_IIR_ID;
- }
- msr = inb(iobase + UART_MSR);
- if (info->ri_latch ^ (msr & UART_MSR_RI)) {
- info->ri_latch = msr & UART_MSR_RI;
- clear_bit(XMIT_WAITING, &(info->tx_state));
- dtl1_write_wakeup(info);
- }
- spin_unlock(&(info->lock));
- }
- /* ======================== HCI interface ======================== */
- static int dtl1_hci_open(struct hci_dev *hdev)
- {
- set_bit(HCI_RUNNING, &(hdev->flags));
- return 0;
- }
- static int dtl1_hci_flush(struct hci_dev *hdev)
- {
- dtl1_info_t *info = (dtl1_info_t *)(hdev->driver_data);
- /* Drop TX queue */
- skb_queue_purge(&(info->txq));
- return 0;
- }
- static int dtl1_hci_close(struct hci_dev *hdev)
- {
- if (!test_and_clear_bit(HCI_RUNNING, &(hdev->flags)))
- return 0;
- dtl1_hci_flush(hdev);
- return 0;
- }
- static int dtl1_hci_send_frame(struct sk_buff *skb)
- {
- dtl1_info_t *info;
- struct hci_dev *hdev = (struct hci_dev *)(skb->dev);
- struct sk_buff *s;
- nsh_t nsh;
- if (!hdev) {
- printk(KERN_WARNING "dtl1_cs: Frame for unknown HCI device (hdev=NULL).");
- return -ENODEV;
- }
- info = (dtl1_info_t *)(hdev->driver_data);
- switch (skb->pkt_type) {
- case HCI_COMMAND_PKT:
- hdev->stat.cmd_tx++;
- nsh.type = 0x81;
- break;
- case HCI_ACLDATA_PKT:
- hdev->stat.acl_tx++;
- nsh.type = 0x82;
- break;
- case HCI_SCODATA_PKT:
- hdev->stat.sco_tx++;
- nsh.type = 0x83;
- break;
- };
- nsh.zero = 0;
- nsh.len = skb->len;
- s = bluez_skb_alloc(NSHL + skb->len + 1, GFP_ATOMIC);
- skb_reserve(s, NSHL);
- memcpy(skb_put(s, skb->len), skb->data, skb->len);
- if (skb->len & 0x0001)
- *skb_put(s, 1) = 0; /* PAD */
- /* Prepend skb with Nokia frame header and queue */
- memcpy(skb_push(s, NSHL), &nsh, NSHL);
- skb_queue_tail(&(info->txq), s);
- dtl1_write_wakeup(info);
- kfree_skb(skb);
- return 0;
- }
- static void dtl1_hci_destruct(struct hci_dev *hdev)
- {
- }
- static int dtl1_hci_ioctl(struct hci_dev *hdev, unsigned int cmd, unsigned long arg)
- {
- return -ENOIOCTLCMD;
- }
- /* ======================== Card services HCI interaction ======================== */
- int dtl1_open(dtl1_info_t *info)
- {
- unsigned long flags;
- unsigned int iobase = info->link.io.BasePort1;
- struct hci_dev *hdev;
- spin_lock_init(&(info->lock));
- skb_queue_head_init(&(info->txq));
- info->rx_state = RECV_WAIT_NSH;
- info->rx_count = NSHL;
- info->rx_skb = NULL;
- set_bit(XMIT_WAITING, &(info->tx_state));
- spin_lock_irqsave(&(info->lock), flags);
- /* Reset UART */
- outb(0, iobase + UART_MCR);
- /* Turn off interrupts */
- outb(0, iobase + UART_IER);
- /* Initialize UART */
- outb(UART_LCR_WLEN8, iobase + UART_LCR); /* Reset DLAB */
- outb((UART_MCR_DTR | UART_MCR_RTS | UART_MCR_OUT2), iobase + UART_MCR);
- info->ri_latch = inb(info->link.io.BasePort1 + UART_MSR) & UART_MSR_RI;
- /* Turn on interrupts */
- outb(UART_IER_RLSI | UART_IER_RDI | UART_IER_THRI, iobase + UART_IER);
- spin_unlock_irqrestore(&(info->lock), flags);
- /* Timeout before it is safe to send the first HCI packet */
- set_current_state(TASK_INTERRUPTIBLE);
- schedule_timeout(HZ * 2);
- /* Initialize and register HCI device */
- hdev = &(info->hdev);
- hdev->type = HCI_PCCARD;
- hdev->driver_data = info;
- hdev->open = dtl1_hci_open;
- hdev->close = dtl1_hci_close;
- hdev->flush = dtl1_hci_flush;
- hdev->send = dtl1_hci_send_frame;
- hdev->destruct = dtl1_hci_destruct;
- hdev->ioctl = dtl1_hci_ioctl;
- if (hci_register_dev(hdev) < 0) {
- printk(KERN_WARNING "dtl1_cs: Can't register HCI device %s.n", hdev->name);
- return -ENODEV;
- }
- return 0;
- }
- int dtl1_close(dtl1_info_t *info)
- {
- unsigned long flags;
- unsigned int iobase = info->link.io.BasePort1;
- struct hci_dev *hdev = &(info->hdev);
- dtl1_hci_close(hdev);
- spin_lock_irqsave(&(info->lock), flags);
- /* Reset UART */
- outb(0, iobase + UART_MCR);
- /* Turn off interrupts */
- outb(0, iobase + UART_IER);
- spin_unlock_irqrestore(&(info->lock), flags);
- if (hci_unregister_dev(hdev) < 0)
- printk(KERN_WARNING "dtl1_cs: Can't unregister HCI device %s.n", hdev->name);
- return 0;
- }
- /* ======================== Card services ======================== */
- static void cs_error(client_handle_t handle, int func, int ret)
- {
- error_info_t err = { func, ret };
- CardServices(ReportError, handle, &err);
- }
- dev_link_t *dtl1_attach(void)
- {
- dtl1_info_t *info;
- client_reg_t client_reg;
- dev_link_t *link;
- int i, ret;
- /* Create new info device */
- info = kmalloc(sizeof(*info), GFP_KERNEL);
- if (!info)
- return NULL;
- memset(info, 0, sizeof(*info));
- link = &info->link;
- link->priv = info;
- link->release.function = &dtl1_release;
- link->release.data = (u_long)link;
- link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
- link->io.NumPorts1 = 8;
- link->irq.Attributes = IRQ_TYPE_EXCLUSIVE | IRQ_HANDLE_PRESENT;
- link->irq.IRQInfo1 = IRQ_INFO2_VALID | IRQ_LEVEL_ID;
- if (irq_list[0] == -1)
- link->irq.IRQInfo2 = irq_mask;
- else
- for (i = 0; i < 4; i++)
- link->irq.IRQInfo2 |= 1 << irq_list[i];
- link->irq.Handler = dtl1_interrupt;
- link->irq.Instance = info;
- link->conf.Attributes = CONF_ENABLE_IRQ;
- link->conf.Vcc = 50;
- link->conf.IntType = INT_MEMORY_AND_IO;
- /* Register with Card Services */
- link->next = dev_list;
- dev_list = link;
- client_reg.dev_info = &dev_info;
- client_reg.Attributes = INFO_IO_CLIENT | INFO_CARD_SHARE;
- client_reg.EventMask =
- CS_EVENT_CARD_INSERTION | CS_EVENT_CARD_REMOVAL |
- CS_EVENT_RESET_PHYSICAL | CS_EVENT_CARD_RESET |
- CS_EVENT_PM_SUSPEND | CS_EVENT_PM_RESUME;
- client_reg.event_handler = &dtl1_event;
- client_reg.Version = 0x0210;
- client_reg.event_callback_args.client_data = link;
- ret = CardServices(RegisterClient, &link->handle, &client_reg);
- if (ret != CS_SUCCESS) {
- cs_error(link->handle, RegisterClient, ret);
- dtl1_detach(link);
- return NULL;
- }
- return link;
- }
- void dtl1_detach(dev_link_t *link)
- {
- dtl1_info_t *info = link->priv;
- dev_link_t **linkp;
- int ret;
- /* Locate device structure */
- for (linkp = &dev_list; *linkp; linkp = &(*linkp)->next)
- if (*linkp == link)
- break;
- if (*linkp == NULL)
- return;
- del_timer(&link->release);
- if (link->state & DEV_CONFIG)
- dtl1_release((u_long)link);
- if (link->handle) {
- ret = CardServices(DeregisterClient, link->handle);
- if (ret != CS_SUCCESS)
- cs_error(link->handle, DeregisterClient, ret);
- }
- /* Unlink device structure, free bits */
- *linkp = link->next;
- kfree(info);
- }
- static int get_tuple(int fn, client_handle_t handle, tuple_t *tuple, cisparse_t *parse)
- {
- int i;
- i = CardServices(fn, handle, tuple);
- if (i != CS_SUCCESS)
- return CS_NO_MORE_ITEMS;
- i = CardServices(GetTupleData, handle, tuple);
- if (i != CS_SUCCESS)
- return i;
- return CardServices(ParseTuple, handle, tuple, parse);
- }
- #define first_tuple(a, b, c) get_tuple(GetFirstTuple, a, b, c)
- #define next_tuple(a, b, c) get_tuple(GetNextTuple, a, b, c)
- void dtl1_config(dev_link_t *link)
- {
- client_handle_t handle = link->handle;
- dtl1_info_t *info = link->priv;
- tuple_t tuple;
- u_short buf[256];
- cisparse_t parse;
- cistpl_cftable_entry_t *cf = &parse.cftable_entry;
- config_info_t config;
- int i, last_ret, last_fn;
- tuple.TupleData = (cisdata_t *)buf;
- tuple.TupleOffset = 0;
- tuple.TupleDataMax = 255;
- tuple.Attributes = 0;
- /* Get configuration register information */
- tuple.DesiredTuple = CISTPL_CONFIG;
- last_ret = first_tuple(handle, &tuple, &parse);
- if (last_ret != CS_SUCCESS) {
- last_fn = ParseTuple;
- goto cs_failed;
- }
- link->conf.ConfigBase = parse.config.base;
- link->conf.Present = parse.config.rmask[0];
- /* Configure card */
- link->state |= DEV_CONFIG;
- i = CardServices(GetConfigurationInfo, handle, &config);
- link->conf.Vcc = config.Vcc;
- tuple.TupleData = (cisdata_t *)buf;
- tuple.TupleOffset = 0;
- tuple.TupleDataMax = 255;
- tuple.Attributes = 0;
- tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
- /* Look for a generic full-sized window */
- link->io.NumPorts1 = 8;
- i = first_tuple(handle, &tuple, &parse);
- while (i != CS_NO_MORE_ITEMS) {
- if ((i == CS_SUCCESS) && (cf->io.nwin == 1) && (cf->io.win[0].len > 8)) {
- link->conf.ConfigIndex = cf->index;
- link->io.BasePort1 = cf->io.win[0].base;
- link->io.NumPorts1 = cf->io.win[0].len; /*yo */
- link->io.IOAddrLines = cf->io.flags & CISTPL_IO_LINES_MASK;
- i = CardServices(RequestIO, link->handle, &link->io);
- if (i == CS_SUCCESS)
- break;
- }
- i = next_tuple(handle, &tuple, &parse);
- }
- if (i != CS_SUCCESS) {
- cs_error(link->handle, RequestIO, i);
- goto failed;
- }
- i = CardServices(RequestIRQ, link->handle, &link->irq);
- if (i != CS_SUCCESS) {
- cs_error(link->handle, RequestIRQ, i);
- link->irq.AssignedIRQ = 0;
- }
- i = CardServices(RequestConfiguration, link->handle, &link->conf);
- if (i != CS_SUCCESS) {
- cs_error(link->handle, RequestConfiguration, i);
- goto failed;
- }
- MOD_INC_USE_COUNT;
- if (dtl1_open(info) != 0)
- goto failed;
- strcpy(info->node.dev_name, info->hdev.name);
- link->dev = &info->node;
- link->state &= ~DEV_CONFIG_PENDING;
- return;
- cs_failed:
- cs_error(link->handle, last_fn, last_ret);
- failed:
- dtl1_release((u_long)link);
- }
- void dtl1_release(u_long arg)
- {
- dev_link_t *link = (dev_link_t *)arg;
- dtl1_info_t *info = link->priv;
- if (link->state & DEV_PRESENT)
- dtl1_close(info);
- MOD_DEC_USE_COUNT;
- link->dev = NULL;
- CardServices(ReleaseConfiguration, link->handle);
- CardServices(ReleaseIO, link->handle, &link->io);
- CardServices(ReleaseIRQ, link->handle, &link->irq);
- link->state &= ~DEV_CONFIG;
- }
- int dtl1_event(event_t event, int priority, event_callback_args_t *args)
- {
- dev_link_t *link = args->client_data;
- dtl1_info_t *info = link->priv;
- switch (event) {
- case CS_EVENT_CARD_REMOVAL:
- link->state &= ~DEV_PRESENT;
- if (link->state & DEV_CONFIG) {
- dtl1_close(info);
- mod_timer(&link->release, jiffies + HZ / 20);
- }
- break;
- case CS_EVENT_CARD_INSERTION:
- link->state |= DEV_PRESENT | DEV_CONFIG_PENDING;
- dtl1_config(link);
- break;
- case CS_EVENT_PM_SUSPEND:
- link->state |= DEV_SUSPEND;
- /* Fall through... */
- case CS_EVENT_RESET_PHYSICAL:
- if (link->state & DEV_CONFIG)
- CardServices(ReleaseConfiguration, link->handle);
- break;
- case CS_EVENT_PM_RESUME:
- link->state &= ~DEV_SUSPEND;
- /* Fall through... */
- case CS_EVENT_CARD_RESET:
- if (DEV_OK(link))
- CardServices(RequestConfiguration, link->handle, &link->conf);
- break;
- }
- return 0;
- }
- /* ======================== Module initialization ======================== */
- int __init init_dtl1_cs(void)
- {
- servinfo_t serv;
- int err;
- CardServices(GetCardServicesInfo, &serv);
- if (serv.Revision != CS_RELEASE_CODE) {
- printk(KERN_NOTICE "dtl1_cs: Card Services release does not match!n");
- return -1;
- }
- err = register_pccard_driver(&dev_info, &dtl1_attach, &dtl1_detach);
- return err;
- }
- void __exit exit_dtl1_cs(void)
- {
- unregister_pccard_driver(&dev_info);
- while (dev_list != NULL)
- dtl1_detach(dev_list);
- }
- module_init(init_dtl1_cs);
- module_exit(exit_dtl1_cs);
- EXPORT_NO_SYMBOLS;