13
0
Fork 1
dedected/com-on-air_cs-linux/com_on_air.c

824 lines
19 KiB
C

/*
* com_on_air_cs - basic driver for the Dosch and Amand "com on air" cards
*
* 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.
*
* authors:
* (C) 2008 Andreas Schuler <krater at badterrorist dot com>
* (C) 2008 Matthias Wenzel <dect at mazzoo dot de>
*
*/
#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/interrupt.h>
#include <linux/delay.h>
#include <linux/init.h>
#include <linux/fs.h>
#include <linux/crc32.h>
#include <linux/kfifo.h>
#include <linux/poll.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 <asm/uaccess.h>
#include "com_on_air.h"
#include "com_on_air_user.h" /* ioctls ... */
#include "sc14421.h"
#include "sc14421_sniffer.h"
MODULE_AUTHOR("Matthias Wenzel comonair<a>mazzoo.de;"
"Andreas Schuler dect<a>badterrorist.com");
MODULE_DESCRIPTION("Dosch&Amand COM-ON-AIR PCMCIA driver");
MODULE_LICENSE("GPL");
#define COA_DEVICE_NAME "com_on_air_cs"
#define COA_FIFO_SIZE 65536
struct coa_info *dev;
static int coa_open(struct inode *inode, struct file *filp)
{
if (dev->open)
return -EBUSY;
dev->open = 1;
return nonseekable_open(inode, filp);
}
/* we use some "hidden" ioctls */
#define COA_IOCTL_TEST0 0xF000
#define COA_IOCTL_TEST1 0xF001
#define COA_IOCTL_TEST2 0xF002
#define COA_IOCTL_TEST3 0xF003
#define COA_IOCTL_TEST4 0xF004
#define COA_IOCTL_TEST5 0xF005
#define COA_IOCTL_TEST6 0xF006
#define COA_IOCTL_TEST7 0xF007
int coa_ioctl(
struct inode *inode,
struct file *filp,
unsigned int cmd,
unsigned long arg)
{
unsigned long __user * argp = (unsigned long __user *) arg;
if (!dev->p_dev->dev_node)
return -EIO;
switch (cmd)
{
case COA_IOCTL_MODE:
{
uint16_t mode;
if (copy_from_user(&mode, argp, sizeof(mode)))
{
printk(COA_DEVICE_NAME
": invalid argument in ioctl()\n");
return -EINVAL;
}
switch (mode & COA_MODEMASK)
{
case COA_MODE_IDLE:
printk("com_on_air_cs: stopping DIP\n");
SC14421_stop_dip(dev->sc14421_base);
dev->operation_mode = mode;
kfifo_reset(dev->rx_fifo);
kfifo_reset(dev->tx_fifo);
break;
case COA_MODE_FP:
printk("FIXME: implement COA_MODE_FP ;)\n");
break;
case COA_MODE_PP:
printk("FIXME: implement COA_MODE_PP ;)\n");
break;
case COA_MODE_SNIFF:
kfifo_reset(dev->rx_fifo);
kfifo_reset(dev->tx_fifo);
/* activiate sniffer */
if (!dev->sniffer_config)
dev->sniffer_config =
kzalloc(sizeof(*dev->sniffer_config),
GFP_KERNEL);
if (!(dev->sniffer_config))
return -ENOMEM;
dev->sniffer_config->snifftype = mode & COA_SUBMODEMASK;
dev->sniffer_config->channel = 0;
dev->operation_mode = mode;
sniffer_init(dev);
printk(COA_DEVICE_NAME": sniffer initialized\n");
break;
case COA_MODE_JAM:
printk("FIXME: implement COA_MODE_JAM\n");
break;
default:
printk("coa: invalid ioctl() value "
"for COA_IOCTL_MODE\n");
return -EINVAL;
}
break;
}
case COA_IOCTL_RADIO:
printk("FIXME: implement COA_IOCTL_RADIO\n");
break;
case COA_IOCTL_RX:
printk("FIXME: implement COA_IOCTL_RX\n");
break;
case COA_IOCTL_TX:
printk("FIXME: implement COA_IOCTL_TX\n");
break;
case COA_IOCTL_CHAN:
{
uint32_t channel;
if (copy_from_user(&channel, argp, sizeof(channel)))
{
printk(COA_DEVICE_NAME": invalid argument "
"in ioctl()\n");
return -EINVAL;
}
if (channel > 10)
return -EINVAL;
switch (dev->operation_mode & COA_MODEMASK)
{
case COA_MODE_IDLE:
break;
case COA_MODE_FP:
/* FIXME: implement COA_MODE_FP ;) */
break;
case COA_MODE_PP:
/* FIXME: implement COA_MODE_PP ;) */
break;
case COA_MODE_SNIFF:
dev->sniffer_config->channel = channel;
break;
case COA_MODE_JAM:
printk("FIXME: implement COA_MODE_JAM\n");
break;
default:
printk("coa: invalid ioctl() value "
"for COA_IOCTL_MODE\n");
return -EINVAL;
}
sniffer_init(dev);
break;
}
case COA_IOCTL_SLOT:
printk("FIXME: implement COA_IOCTL_SLOT\n");
break;
case COA_IOCTL_RSSI:
printk("FIXME: implement COA_IOCTL_RSSI\n");
break;
case COA_IOCTL_FIRMWARE:
printk("FIXME: implement COA_IOCTL_FIRMWARE\n");
break;
case COA_IOCTL_SETRFPI:
{
uint8_t RFPI[5];
if (copy_from_user(&RFPI, argp, sizeof(RFPI)))
{
printk(COA_DEVICE_NAME": invalid argument in ioctl()\n");
return -EINVAL;
}
switch (dev->operation_mode & COA_MODEMASK)
{
case COA_MODE_IDLE:
break;
case COA_MODE_FP:
/* FIXME: implement COA_MODE_FP ;) */
break;
case COA_MODE_PP:
/* FIXME: implement COA_MODE_PP ;) */
break;
case COA_MODE_SNIFF:
memcpy(dev->sniffer_config->RFPI, RFPI, sizeof(dev->sniffer_config->RFPI));
break;
case COA_MODE_JAM:
printk("FIXME: implement COA_MODE_JAM\n");
break;
default:
printk("coa: invalid ioctl() value for COA_IOCTL_MODE\n");
return -EINVAL;
}
break;
}
case COA_IOCTL_TEST7:
case COA_IOCTL_TEST6:
case COA_IOCTL_TEST5:
case COA_IOCTL_TEST4:
case COA_IOCTL_TEST3:
case COA_IOCTL_TEST2:
{
printk("\n\ncom_on_air_cs: saw %d interrupts since loading\n\n\n",
dev->irq_count);
break;
}
case COA_IOCTL_TEST1:
{
static char teststring[] = "awake. "
"shake dreams from your head my pretty child, "
"my swet one. choose the day "
"and choose the sign of your day. "
"the day's divinity.\n";
static char * ps = teststring;
int ret;
ret = kfifo_put(dev->rx_fifo, ps, 1);
if (ret <= 0)
printk("com_on_air_cs: rx fifo full? "
"kfifo_put() = %d\n", ret);
ps++;
if (!*ps)
ps = teststring;
break;
}
case COA_IOCTL_TEST0:
{
unsigned char bank;
int a, b, i;
printk("dumping complete DIP-RAM\n");
disable_irq(dev->irq);
for (i = 0; i < 8; i++)
{
bank = (4 * i);
SC14421_switch_to_bank(dev->sc14421_base, bank);
printk("Setting Banking-Register to %.2x\n\n", bank);
for (a = 0; a < 16; a++)
{
unsigned short *sc14421_base = dev->sc14421_base;
for (b = 0; b < 16; b++)
printk("%.2x ",
(unsigned char)
SC14421_READ( a*16 + b) );
#if 0
if (SC14421_READ(511) & 0x0f)
printk("%.2x ",
(unsigned char)
(SC14421_READ(511)));
printk("\n");
#endif
}
}
enable_irq(dev->irq);
break;
}
default:
printk("coa: invalid ioctl()\n");
return -EINVAL;
}
return 0;
}
static unsigned int coa_poll(struct file *file, poll_table * wait)
{
unsigned int mask = 0;
if (!dev->p_dev->dev_node)
return -EIO;
if (kfifo_len(dev->rx_fifo))
mask |= POLLIN | POLLRDNORM;
if (COA_FIFO_SIZE - kfifo_len(dev->tx_fifo))
mask |= POLLOUT | POLLWRNORM;
return mask;
}
static ssize_t coa_read(
struct file *filp,
char __user *buf,
size_t count_want,
loff_t *ppos)
{
size_t to_copy;
size_t not_copied;
unsigned char *data;
if (!dev->p_dev->dev_node)
return -EIO;
to_copy = min(kfifo_len(dev->rx_fifo), count_want);
data = kmalloc(to_copy, GFP_KERNEL);
if (!data)
return -ENOMEM;
to_copy = kfifo_get(dev->rx_fifo, data, to_copy);
if (to_copy < 0) {
kfree(data);
return -EIO;
}
not_copied = copy_to_user(buf, data, to_copy);
kfree(data);
return to_copy - not_copied;
}
static int coa_close(struct inode *inode, struct file *filp)
{
if (!dev->p_dev->dev_node)
return -EIO;
SC14421_stop_dip(dev->sc14421_base);
dev->open = 0;
kfifo_reset(dev->rx_fifo);
kfifo_reset(dev->tx_fifo);
return 0;
}
static const struct file_operations coa_fops =
{
.owner = THIS_MODULE,
.open = coa_open,
.ioctl = coa_ioctl,
.poll = coa_poll,
.read = coa_read,
.release = coa_close,
};
/**********************************************************************/
static int com_on_air_suspend (struct pcmcia_device *link)
{
return 0;
}
static int com_on_air_resume (struct pcmcia_device *link)
{
return 0;
}
static irqreturn_t
com_on_air_irq_handler(int irq, void *dev_id)
{
struct coa_info * dev = dev_id;
jiffies_to_timespec(jiffies, &dev->irq_timestamp);
dev->irq_count++;
switch(dev->operation_mode & COA_MODEMASK)
{
case COA_MODE_FP:
/*station_irq_handler(dev); */
break;
case COA_MODE_PP:
/*phone_irq_handler(dev); */
break;
case COA_MODE_SNIFF:
sniffer_irq_handler(dev);
break;
default:
if (dev->sc14421_base)
SC14421_clear_interrupt(dev->sc14421_base);
}
return IRQ_HANDLED;
}
static int com_on_air_probe (struct pcmcia_device *link)
{
win_req_t req;
int ret;
dev->p_dev = link;
link->priv = dev;
link->dev_node = kzalloc(sizeof(*link->dev_node), GFP_KERNEL);
if (!link->dev_node)
return -ENOMEM;
link->devname = kzalloc(strlen(COA_DEVICE_NAME), GFP_KERNEL);
if (!link->devname)
{
ret = -ENOMEM;
goto probe_out_5;
}
sprintf(link->devname, COA_DEVICE_NAME);
sprintf(link->dev_node->dev_name, COA_DEVICE_NAME);
printk("com_on_air_cs: >>>>>>>>>>>>>>>>>>>>>>>>\n");
printk("com_on_air_cs: card in slot %s\n", link->devname);
if (link->prod_id[0])
printk("com_on_air_cs: prod_id[0] %s\n",
link->prod_id[0]);
if (link->prod_id[1])
printk("com_on_air_cs: prod_id[1] %s\n",
link->prod_id[1]);
if (link->prod_id[2])
printk("com_on_air_cs: prod_id[2] %s\n",
link->prod_id[2]);
if (link->prod_id[3])
printk("com_on_air_cs: prod_id[3] %s\n",
link->prod_id[3]);
link->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
link->io.NumPorts1 = 16;
link->io.Attributes2 = 0;
link->irq.Attributes = IRQ_TYPE_EXCLUSIVE | IRQ_HANDLE_PRESENT;
link->irq.IRQInfo1 = IRQ_LEVEL_ID;
link->irq.Handler = com_on_air_irq_handler;
link->irq.Instance = dev;
link->conf.Attributes = CONF_ENABLE_IRQ;
link->conf.IntType = INT_MEMORY_AND_IO;
link->conf.ConfigIndex = 1;
link->conf.Present = PRESENT_OPTION;
link->conf.ConfigBase = 0x1020;
req.Attributes = WIN_DATA_WIDTH_16 | WIN_ENABLE;
req.Base = 0;
req.Size = 0x1000;
req.AccessSpeed = 0;
ret = pcmcia_request_window(&link, &req, &link->win);
if (ret != CS_SUCCESS)
{
printk("couldn't pcmcia_request_window() = 0x%x\n", ret);
goto probe_out_4;
}
dev->links[0] = link;
dev->memsize[0] = req.Size;
dev->membase[0] = ioremap_nocache(req.Base, req.Size);
if (!dev->membase[0])
{
printk("com_on_air_cs: ERROR: couldn't ioremap()\n");
ret = -EIO;
goto probe_out_3;
}
printk("com_on_air_cs: ioremap()'d baseaddr %p\n", dev->membase[0]);
link->conf.Present = PRESENT_OPTION;
link->socket->functions = 0;
dev->irq_count = 0;
ret = pcmcia_request_irq(link, &link->irq);
if (ret != CS_SUCCESS)
{
printk("\ncom_on_air_cs: unable to allocate IRQ %d, ret=%x\n",
link->irq.AssignedIRQ, ret);
dev->irq = -1;
goto probe_out_2;
} else {
printk("com_on_air_cs: registered IRQ %d\n",
link->irq.AssignedIRQ);
dev->irq = link->irq.AssignedIRQ;
}
ret = pcmcia_request_configuration(link, &link->conf);
if (ret != CS_SUCCESS)
{
printk("could not pcmcia_request_configuration()\n");
goto probe_out_1;
}
ret = pcmcia_get_configuration_info(link, &(dev->config));
if (ret == CS_SUCCESS)
{
printk("com_on_air_cs: %svalid client.\n",
(dev->config.Attributes & CONF_VALID_CLIENT) ? "":"in");
printk("com_on_air_cs: type 0x%x\n",
link->socket->state);
printk("com_on_air_cs: function 0x%x\n",
dev->config.Function);
printk("com_on_air_cs: Attributes %d\n",
dev->config.Attributes);
printk("com_on_air_cs: Vcc %d\n",
dev->config.Vcc);
printk("com_on_air_cs: Vpp1 %d\n",
dev->config.Vpp1);
printk("com_on_air_cs: Vpp2 %d\n",
dev->config.Vpp2);
printk("com_on_air_cs: IntType %d\n",
dev->config.IntType);
printk("com_on_air_cs: ConfigBase 0x%x\n",
dev->config.ConfigBase);
printk("com_on_air_cs: Status %u, "
"Pin %u, "
"Copy %u, "
"Option %u, "
"ExtStatus %u\n",
dev->config.Status,
dev->config.Pin,
dev->config.Copy,
dev->config.Option,
dev->config.ExtStatus);
printk("com_on_air_cs: Present %d\n",
dev->config.Present);
printk("com_on_air_cs: CardValues 0x%x\n",
dev->config.CardValues);
printk("com_on_air_cs: AssignedIRQ 0x%x\n",
dev->config.AssignedIRQ);
printk("com_on_air_cs: IRQAttributes 0x%x\n",
dev->config.IRQAttributes);
printk("com_on_air_cs: BasePort1 0x%x\n",
dev->config.BasePort1);
printk("com_on_air_cs: NumPorts1 0x%x\n",
dev->config.NumPorts1);
printk("com_on_air_cs: Attributes1 0x%x\n",
dev->config.Attributes1);
printk("com_on_air_cs: BasePort2 0x%x\n",
dev->config.BasePort2);
printk("com_on_air_cs: NumPorts2 0x%x\n",
dev->config.NumPorts2);
printk("com_on_air_cs: Attributes2 0x%x\n",
dev->config.Attributes2);
printk("com_on_air_cs: IOAddrLines 0x%x\n",
dev->config.IOAddrLines);
printk("com_on_air_cs: has%s function_config\n",
(link->function_config) ? "":" no");
} else {
printk("com_on_air_cs: pcmcia_get_configuration_info() "
"failed\n");
goto probe_out_0;
}
set_device_configbase(dev->config.ConfigBase);
dev->sc14421_base = ((unsigned short*)(dev->membase[0]));
ret = get_card_id();
printk("com_on_air_cs: get_card_id() = %d\n", ret);
switch (ret)
{
case 0:
dev->radio_type = COA_RADIO_TYPE_II;
break;
case 1:
case 2:
dev->radio_type = COA_RADIO_TYPE_III;
break;
default:
printk("com_on_air_cs: ERROR; unknown radio type, "
"please update driver\n");
}
dev->card_id = ret;
printk("com_on_air_cs: -----------------------\n");
return 0;
probe_out_0:
pcmcia_disable_device(link);
probe_out_1:
free_irq(dev->irq, dev);
probe_out_2:
iounmap(dev->membase[0]);
probe_out_3:
pcmcia_release_window(link->win);
probe_out_4:
kfree(link->devname);
probe_out_5:
kfree(link->dev_node);
link->dev_node = NULL;
return ret;
}
static void com_on_air_remove(struct pcmcia_device *link)
{
int j;
printk("com_on_air_cs: COM-ON-AIR card ejected\n");
printk("com_on_air_cs: <<<<<<<<<<<<<<<<<<<<<<<\n");
if (dev->irq >= 0)
{
printk("com_on_air_cs: freeing interrupt %d\n",
dev->irq);
free_irq(dev->irq, dev);
}
for (j=0; j<2; j++)
{
if (dev->membase[j])
{
printk("com_on_air_cs: iounmap()ing membase[%d]\n", j);
iounmap(dev->membase[j]);
}
if (dev->links[j])
if (dev->links[j]->win)
{
printk("com_on_air_cs: releasing window %d\n",
j);
pcmcia_release_window(dev->links[j]->win);
}
}
printk("com_on_air_cs: pcmcia_disable_device()\n");
pcmcia_disable_device(link);
if (link->dev_node)
{
printk("com_on_air_cs: freeing dev_node\n");
kfree(link->dev_node);
link->dev_node = 0;
}
if (link->devname)
{
printk("com_on_air_cs: freeing devname\n");
kfree(link->devname);
link->devname = 0;
}
if (dev->sniffer_config)
{
printk("com_on_air_cs: freeing sniffer_config\n");
kfree(dev->sniffer_config);
dev->sniffer_config = 0;
}
}
static struct pcmcia_device_id com_on_air_ids[] =
{
/*
* the crc32 hashes below are generated by the tool in
* Documentation/pcmcia/devicetable.txt
*/
PCMCIA_DEVICE_PROD_ID12 ("DECTDataDevice", "PCMCIA F22",
0x11fe69e9, 0x253670b2),
PCMCIA_DEVICE_PROD_ID12 ("DECTDataDevice", "PCMCIA",
0x11fe69e9, 0x281f1c5d),
#if 1
PCMCIA_DEVICE_PROD_ID1234("DOSCH-AMAND", "MMAP PCMCIA",
"MXM500", "V1.00",
0x4bc552e7, 0x0df519bb,
0x09e43c7c, 0x3488c81a),
#endif
#if 0
There are more devices out there, I only own the above three.
an excerpt from win32 dna.inf:
%String1%=pcmcia.install,PCMCIA\DOSCH-AMAND-MMAP_PCMCIA-C7D7
%String1%=pcmcia.install,PCMCIA\Dosch-Amand-DECT_MultiMedia-BD0D
%String1%=pcmcia.install,PCMCIA\DOSCH_&_AMAND-DECT_MULTIMEDIA-1A9F
%String1%=pcmcia.install,PCMCIA\DECTDataDevice-F13-6433
%String1%=pcmcia.install,PCMCIA\DECTDataDevice-PCMCIA-0EF8
%String4%=pci.install,PCI\VEN_11E3&DEV_0001&SUBSYS_000111E3&REV_00
%String4%=pci.install,PCI\VEN_11E3&DEV_0001&SUBSYS_00011786&REV_32
%String4%=pci.install,PCI\VEN_1786&DEV_0001&SUBSYS_000111E3&REV_00
%String5%=freekey2.install,PCMCIA\DECTDataDevice-PCMCIA-FEF2
%String6%=freekey2.install,PCMCIA\DECTDataDevice-PCMCIA_F22-4BD3
%String6%=freekey2.install,PCMCIA\DECTDataDevice-PCMCIA_F22-BBD9
#endif
PCMCIA_DEVICE_NULL
};
MODULE_DEVICE_TABLE(pcmcia, com_on_air_ids);
/* returns an index into com_on_air_ids[] */
int get_card_id(void)
{
u32 hash[4] = { 0, 0, 0, 0};
int i;
int found = 0;
int ret = -1;
for (i=0; i<4; i++)
{
if (dev->p_dev->prod_id[i])
hash[i] = crc32(0,
dev->p_dev->prod_id[i],
strlen(dev->p_dev->prod_id[i]));
}
i = 0;
while(com_on_air_ids[i].match_flags) /* != PCMCIA_DEVICE_NULL */
{
if ( (hash[0] == com_on_air_ids[i].prod_id_hash[0]) &&
(hash[1] == com_on_air_ids[i].prod_id_hash[1]) &&
(hash[2] == com_on_air_ids[i].prod_id_hash[2]) &&
(hash[3] == com_on_air_ids[i].prod_id_hash[3]) )
{
found = 1;
ret = i;
}
i++;
}
if (!found)
printk("com_on_air_cs: ERROR: get_card_id() "
"didn't find card, please update driver\n");
return ret;
}
static struct pcmcia_driver coa_driver =
{
.owner = THIS_MODULE,
.drv =
{
.name = COA_DEVICE_NAME,
},
.probe = com_on_air_probe,
.remove = com_on_air_remove,
.suspend = com_on_air_suspend,
.resume = com_on_air_resume,
.id_table = com_on_air_ids,
};
static int __init init_com_on_air_cs(void)
{
int ret = 0;
printk(">>> loading " COA_DEVICE_NAME "\n");
dev = kzalloc(sizeof(*dev), GFP_KERNEL);
if (!dev)
return -ENOMEM;
ret = pcmcia_register_driver(&coa_driver);
if (ret != CS_SUCCESS)
{
printk("couldn't pcmcia_register_driver()\n");
goto init_out_3;
}
ret = register_chrdev(0xDEC, COA_DEVICE_NAME, &coa_fops);
if (ret < 0)
{
printk("couldn't register_chrdev()\n");
goto init_out_2;
}
spin_lock_init(&dev->rx_fifo_lock);
dev->rx_fifo = kfifo_alloc(COA_FIFO_SIZE, GFP_KERNEL,
&dev->rx_fifo_lock);
if (IS_ERR(dev->rx_fifo))
{
printk("couldn't kfifo_alloc(dev->rx_fifo)\n");
goto init_out_1;
}
spin_lock_init(&dev->tx_fifo_lock);
dev->tx_fifo = kfifo_alloc(COA_FIFO_SIZE, GFP_KERNEL,
&dev->tx_fifo_lock);
if (IS_ERR(dev->tx_fifo))
{
printk("couldn't kfifo_alloc(dev->tx_fifo)\n");
goto init_out_0;
}
return 0;
init_out_0:
kfifo_free(dev->rx_fifo);
init_out_1:
unregister_chrdev(0xDEC, COA_DEVICE_NAME);
init_out_2:
pcmcia_unregister_driver(&coa_driver);
init_out_3:
kfree(dev);
return ret;
}
static void __exit exit_com_on_air_cs(void)
{
printk("<<< unloading " COA_DEVICE_NAME "\n");
if (!dev) return;
unregister_chrdev(0xDEC, COA_DEVICE_NAME);
pcmcia_unregister_driver(&coa_driver);
kfifo_free(dev->rx_fifo);
kfifo_free(dev->tx_fifo);
kfree(dev);
}
module_init(init_com_on_air_cs);
module_exit(exit_com_on_air_cs);