1
/* $Id: divasmain.c,v 1.55.4.6 2005/02/09 19:28:20 armin Exp $
3
* Low level driver for Eicon DIVA Server ISDN cards.
5
* Copyright 2000-2003 by Armin Schindler (mac@melware.de)
6
* Copyright 2000-2003 Cytronics & Melware (info@melware.de)
8
* This software may be used and distributed according to the terms
9
* of the GNU General Public License, incorporated herein by reference.
12
#include <linux/module.h>
13
#include <linux/init.h>
14
#include <linux/kernel.h>
15
#include <asm/uaccess.h>
17
#include <linux/ioport.h>
18
#include <linux/pci.h>
19
#include <linux/interrupt.h>
20
#include <linux/list.h>
21
#include <linux/poll.h>
22
#include <linux/kmod.h>
34
#include "xdi_adapter.h"
39
static char *main_revision = "$Revision: 1.55.4.6 $";
45
MODULE_DESCRIPTION("Kernel driver for Eicon DIVA Server cards");
46
MODULE_AUTHOR("Cytronics & Melware, Eicon Networks");
47
MODULE_LICENSE("GPL");
49
module_param(dbgmask, int, 0);
50
MODULE_PARM_DESC(dbgmask, "initial debug mask");
52
static char *DRIVERNAME =
53
"Eicon DIVA Server driver (http://www.melware.net)";
54
static char *DRIVERLNAME = "divas";
55
static char *DEVNAME = "Divas";
56
char *DRIVERRELEASE_DIVAS = "2.0";
58
extern irqreturn_t diva_os_irq_wrapper(int irq, void *context);
59
extern int create_divas_proc(void);
60
extern void remove_divas_proc(void);
61
extern void diva_get_vserial_number(PISDN_ADAPTER IoAdapter, char *buf);
62
extern int divasfunc_init(int dbgmask);
63
extern void divasfunc_exit(void);
65
typedef struct _diva_os_thread_dpc {
66
struct tasklet_struct divas_task;
67
diva_os_soft_isr_t *psoft_isr;
68
} diva_os_thread_dpc_t;
70
/* --------------------------------------------------------------------------
71
PCI driver interface section
72
-------------------------------------------------------------------------- */
74
vendor, device Vendor and device ID to match (or PCI_ANY_ID)
75
subvendor, Subsystem vendor and device ID to match (or PCI_ANY_ID)
77
class, Device class to match. The class_mask tells which bits
78
class_mask of the class are honored during the comparison.
79
driver_data Data private to the driver.
82
#if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2)
83
#define PCI_DEVICE_ID_EICON_MAESTRAP_2 0xE015
86
#if !defined(PCI_DEVICE_ID_EICON_4BRI_VOIP)
87
#define PCI_DEVICE_ID_EICON_4BRI_VOIP 0xE016
90
#if !defined(PCI_DEVICE_ID_EICON_4BRI_2_VOIP)
91
#define PCI_DEVICE_ID_EICON_4BRI_2_VOIP 0xE017
94
#if !defined(PCI_DEVICE_ID_EICON_BRI2M_2)
95
#define PCI_DEVICE_ID_EICON_BRI2M_2 0xE018
98
#if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP)
99
#define PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP 0xE019
102
#if !defined(PCI_DEVICE_ID_EICON_2F)
103
#define PCI_DEVICE_ID_EICON_2F 0xE01A
106
#if !defined(PCI_DEVICE_ID_EICON_BRI2M_2_VOIP)
107
#define PCI_DEVICE_ID_EICON_BRI2M_2_VOIP 0xE01B
111
This table should be sorted by PCI device ID
113
static struct pci_device_id divas_pci_tbl[] = {
114
/* Diva Server BRI-2M PCI 0xE010 */
115
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRA),
116
CARDTYPE_MAESTRA_PCI },
117
/* Diva Server 4BRI-8M PCI 0xE012 */
118
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAQ),
119
CARDTYPE_DIVASRV_Q_8M_PCI },
120
/* Diva Server 4BRI-8M 2.0 PCI 0xE013 */
121
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAQ_U),
122
CARDTYPE_DIVASRV_Q_8M_V2_PCI },
123
/* Diva Server PRI-30M PCI 0xE014 */
124
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP),
125
CARDTYPE_DIVASRV_P_30M_PCI },
126
/* Diva Server PRI 2.0 adapter 0xE015 */
127
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP_2),
128
CARDTYPE_DIVASRV_P_30M_V2_PCI },
129
/* Diva Server Voice 4BRI-8M PCI 0xE016 */
130
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_4BRI_VOIP),
131
CARDTYPE_DIVASRV_VOICE_Q_8M_PCI },
132
/* Diva Server Voice 4BRI-8M 2.0 PCI 0xE017 */
133
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_4BRI_2_VOIP),
134
CARDTYPE_DIVASRV_VOICE_Q_8M_V2_PCI },
135
/* Diva Server BRI-2M 2.0 PCI 0xE018 */
136
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_BRI2M_2),
137
CARDTYPE_DIVASRV_B_2M_V2_PCI },
138
/* Diva Server Voice PRI 2.0 PCI 0xE019 */
139
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP),
140
CARDTYPE_DIVASRV_VOICE_P_30M_V2_PCI },
141
/* Diva Server 2FX 0xE01A */
142
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_2F),
143
CARDTYPE_DIVASRV_B_2F_PCI },
144
/* Diva Server Voice BRI-2M 2.0 PCI 0xE01B */
145
{ PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_BRI2M_2_VOIP),
146
CARDTYPE_DIVASRV_VOICE_B_2M_V2_PCI },
147
{ 0, } /* 0 terminated list. */
149
MODULE_DEVICE_TABLE(pci, divas_pci_tbl);
151
static int divas_init_one(struct pci_dev *pdev,
152
const struct pci_device_id *ent);
153
static void __devexit divas_remove_one(struct pci_dev *pdev);
155
static struct pci_driver diva_pci_driver = {
157
.probe = divas_init_one,
158
.remove = __devexit_p(divas_remove_one),
159
.id_table = divas_pci_tbl,
162
/*********************************************************
163
** little helper functions
164
*********************************************************/
165
static char *getrev(const char *revision)
169
if ((p = strchr(revision, ':'))) {
171
p = strchr(rev, '$');
178
void diva_log_info(unsigned char *format, ...)
181
unsigned char line[160];
183
va_start(args, format);
184
vsnprintf(line, sizeof(line), format, args);
187
printk(KERN_INFO "%s: %s\n", DRIVERLNAME, line);
190
void divas_get_version(char *p)
194
strcpy(tmprev, main_revision);
195
sprintf(p, "%s: %s(%s) %s(%s) major=%d\n", DRIVERLNAME, DRIVERRELEASE_DIVAS,
196
getrev(tmprev), diva_xdi_common_code_build, DIVA_BUILD, major);
199
/* --------------------------------------------------------------------------
201
-------------------------------------------------------------------------- */
202
byte diva_os_get_pci_bus(void *pci_dev_handle)
204
struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
205
return ((byte) pdev->bus->number);
208
byte diva_os_get_pci_func(void *pci_dev_handle)
210
struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
211
return ((byte) pdev->devfn);
214
unsigned long divasa_get_pci_irq(unsigned char bus, unsigned char func,
215
void *pci_dev_handle)
217
unsigned char irq = 0;
218
struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
222
return ((unsigned long) irq);
225
unsigned long divasa_get_pci_bar(unsigned char bus, unsigned char func,
226
int bar, void *pci_dev_handle)
228
unsigned long ret = 0;
229
struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
232
ret = dev->resource[bar].start;
235
DBG_TRC(("GOT BAR[%d]=%08x", bar, ret));
238
unsigned long type = (ret & 0x00000001);
239
if (type & PCI_BASE_ADDRESS_SPACE_IO) {
241
ret &= PCI_BASE_ADDRESS_IO_MASK;
243
DBG_TRC((" memory"));
244
ret &= PCI_BASE_ADDRESS_MEM_MASK;
246
DBG_TRC((" final=%08x", ret));
252
void PCIwrite(byte bus, byte func, int offset, void *data, int length,
253
void *pci_dev_handle)
255
struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
259
pci_write_config_byte(dev, offset,
260
*(unsigned char *) data);
263
pci_write_config_word(dev, offset,
264
*(unsigned short *) data);
267
pci_write_config_dword(dev, offset,
268
*(unsigned int *) data);
271
default: /* buffer */
272
if (!(length % 4) && !(length & 0x03)) { /* Copy as dword */
273
dword *p = (dword *) data;
277
pci_write_config_dword(dev, offset,
281
} else { /* copy as byte stream */
282
byte *p = (byte *) data;
285
pci_write_config_byte(dev, offset,
293
void PCIread(byte bus, byte func, int offset, void *data, int length,
294
void *pci_dev_handle)
296
struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
300
pci_read_config_byte(dev, offset, (unsigned char *) data);
303
pci_read_config_word(dev, offset, (unsigned short *) data);
306
pci_read_config_dword(dev, offset, (unsigned int *) data);
309
default: /* buffer */
310
if (!(length % 4) && !(length & 0x03)) { /* Copy as dword */
311
dword *p = (dword *) data;
315
pci_read_config_dword(dev, offset,
319
} else { /* copy as byte stream */
320
byte *p = (byte *) data;
323
pci_read_config_byte(dev, offset,
332
Init map with DMA pages. It is not problem if some allocations fail -
333
the channels that will not get one DMA page will use standard PIO
336
static void *diva_pci_alloc_consistent(struct pci_dev *hwdev,
338
dma_addr_t * dma_handle,
341
void *addr = pci_alloc_consistent(hwdev, size, dma_handle);
348
void diva_init_dma_map(void *hdev,
349
struct _diva_dma_map_entry **ppmap, int nentries)
351
struct pci_dev *pdev = (struct pci_dev *) hdev;
352
struct _diva_dma_map_entry *pmap =
353
diva_alloc_dma_map(hdev, nentries);
357
dma_addr_t dma_handle;
361
for (i = 0; i < nentries; i++) {
362
if (!(cpu_addr = diva_pci_alloc_consistent(pdev,
369
diva_init_dma_map_entry(pmap, i, cpu_addr,
372
DBG_TRC(("dma map alloc [%d]=(%08lx:%08x:%08lx)",
373
i, (unsigned long) cpu_addr,
375
(unsigned long) addr_handle))}
382
Free all contained in the map entries and memory used by the map
383
Should be always called after adapter removal from DIDD array
385
void diva_free_dma_map(void *hdev, struct _diva_dma_map_entry *pmap)
387
struct pci_dev *pdev = (struct pci_dev *) hdev;
391
dma_addr_t dma_handle;
394
for (i = 0; (pmap != NULL); i++) {
395
diva_get_dma_map_entry(pmap, i, &cpu_addr, &phys_addr);
399
addr_handle = diva_get_entry_handle(pmap, i);
400
dma_handle = (dma_addr_t) phys_addr;
401
pci_free_consistent(pdev, PAGE_SIZE, addr_handle,
403
DBG_TRC(("dma map free [%d]=(%08lx:%08x:%08lx)", i,
404
(unsigned long) cpu_addr, (dword) dma_handle,
405
(unsigned long) addr_handle))
408
diva_free_dma_mapping(pmap);
412
/*********************************************************
413
** I/O port utilities
414
*********************************************************/
417
diva_os_register_io_port(void *adapter, int on, unsigned long port,
418
unsigned long length, const char *name, int id)
421
if (!request_region(port, length, name)) {
422
DBG_ERR(("A: I/O: can't register port=%08x", port))
426
release_region(port, length);
431
void __iomem *divasa_remap_pci_bar(diva_os_xdi_adapter_t *a, int id, unsigned long bar, unsigned long area_length)
433
void __iomem *ret = ioremap(bar, area_length);
434
DBG_TRC(("remap(%08x)->%p", bar, ret));
438
void divasa_unmap_pci_bar(void __iomem *bar)
445
/*********************************************************
447
*********************************************************/
448
byte __inline__ inpp(void __iomem *addr)
450
return (inb((unsigned long) addr));
453
word __inline__ inppw(void __iomem *addr)
455
return (inw((unsigned long) addr));
458
void __inline__ inppw_buffer(void __iomem *addr, void *P, int length)
460
insw((unsigned long) addr, (word *) P, length >> 1);
463
void __inline__ outppw_buffer(void __iomem *addr, void *P, int length)
465
outsw((unsigned long) addr, (word *) P, length >> 1);
468
void __inline__ outppw(void __iomem *addr, word w)
470
outw(w, (unsigned long) addr);
473
void __inline__ outpp(void __iomem *addr, word p)
475
outb(p, (unsigned long) addr);
478
/* --------------------------------------------------------------------------
480
-------------------------------------------------------------------------- */
481
int diva_os_register_irq(void *context, byte irq, const char *name)
483
int result = request_irq(irq, diva_os_irq_wrapper,
484
IRQF_DISABLED | IRQF_SHARED, name, context);
488
void diva_os_remove_irq(void *context, byte irq)
490
free_irq(irq, context);
493
/* --------------------------------------------------------------------------
494
DPC framework implementation
495
-------------------------------------------------------------------------- */
496
static void diva_os_dpc_proc(unsigned long context)
498
diva_os_thread_dpc_t *psoft_isr = (diva_os_thread_dpc_t *) context;
499
diva_os_soft_isr_t *pisr = psoft_isr->psoft_isr;
501
(*(pisr->callback)) (pisr, pisr->callback_context);
504
int diva_os_initialize_soft_isr(diva_os_soft_isr_t * psoft_isr,
505
diva_os_soft_isr_callback_t callback,
506
void *callback_context)
508
diva_os_thread_dpc_t *pdpc;
510
pdpc = (diva_os_thread_dpc_t *) diva_os_malloc(0, sizeof(*pdpc));
511
if (!(psoft_isr->object = pdpc)) {
514
memset(pdpc, 0x00, sizeof(*pdpc));
515
psoft_isr->callback = callback;
516
psoft_isr->callback_context = callback_context;
517
pdpc->psoft_isr = psoft_isr;
518
tasklet_init(&pdpc->divas_task, diva_os_dpc_proc, (unsigned long)pdpc);
523
int diva_os_schedule_soft_isr(diva_os_soft_isr_t * psoft_isr)
525
if (psoft_isr && psoft_isr->object) {
526
diva_os_thread_dpc_t *pdpc =
527
(diva_os_thread_dpc_t *) psoft_isr->object;
529
tasklet_schedule(&pdpc->divas_task);
535
int diva_os_cancel_soft_isr(diva_os_soft_isr_t * psoft_isr)
540
void diva_os_remove_soft_isr(diva_os_soft_isr_t * psoft_isr)
542
if (psoft_isr && psoft_isr->object) {
543
diva_os_thread_dpc_t *pdpc =
544
(diva_os_thread_dpc_t *) psoft_isr->object;
547
tasklet_kill(&pdpc->divas_task);
548
mem = psoft_isr->object;
549
psoft_isr->object = NULL;
550
diva_os_free(0, mem);
555
* kernel/user space copy functions
558
xdi_copy_to_user(void *os_handle, void __user *dst, const void *src, int length)
560
if (copy_to_user(dst, src, length)) {
567
xdi_copy_from_user(void *os_handle, void *dst, const void __user *src, int length)
569
if (copy_from_user(dst, src, length)) {
576
* device node operations
578
static int divas_open(struct inode *inode, struct file *file)
583
static int divas_release(struct inode *inode, struct file *file)
585
if (file->private_data) {
586
diva_xdi_close_adapter(file->private_data, file);
591
static ssize_t divas_write(struct file *file, const char __user *buf,
592
size_t count, loff_t * ppos)
596
if (!file->private_data) {
597
file->private_data = diva_xdi_open_adapter(file, buf,
601
if (!file->private_data) {
605
ret = diva_xdi_write(file->private_data, file,
606
buf, count, xdi_copy_from_user);
608
case -1: /* Message should be removed from rx mailbox first */
611
case -2: /* invalid adapter was specified in this call */
618
DBG_TRC(("write: ret %d", ret));
622
static ssize_t divas_read(struct file *file, char __user *buf,
623
size_t count, loff_t * ppos)
627
if (!file->private_data) {
628
file->private_data = diva_xdi_open_adapter(file, buf,
632
if (!file->private_data) {
636
ret = diva_xdi_read(file->private_data, file,
637
buf, count, xdi_copy_to_user);
639
case -1: /* RX mailbox is empty */
642
case -2: /* no memory, mailbox was cleared, last command is failed */
645
case -3: /* can't copy to user, retry */
649
DBG_TRC(("read: ret %d", ret));
653
static unsigned int divas_poll(struct file *file, poll_table * wait)
655
if (!file->private_data) {
658
return (POLLIN | POLLRDNORM);
661
static const struct file_operations divas_fops = {
662
.owner = THIS_MODULE,
665
.write = divas_write,
668
.release = divas_release
671
static void divas_unregister_chrdev(void)
673
unregister_chrdev(major, DEVNAME);
676
static int DIVA_INIT_FUNCTION divas_register_chrdev(void)
678
if ((major = register_chrdev(0, DEVNAME, &divas_fops)) < 0)
680
printk(KERN_ERR "%s: failed to create /dev entry.\n",
688
/* --------------------------------------------------------------------------
690
-------------------------------------------------------------------------- */
691
static int __devinit divas_init_one(struct pci_dev *pdev,
692
const struct pci_device_id *ent)
698
DBG_TRC(("%s bus: %08x fn: %08x insertion.\n",
699
CardProperties[ent->driver_data].Name,
700
pdev->bus->number, pdev->devfn))
701
printk(KERN_INFO "%s: %s bus: %08x fn: %08x insertion.\n",
702
DRIVERLNAME, CardProperties[ent->driver_data].Name,
703
pdev->bus->number, pdev->devfn);
705
if (pci_enable_device(pdev)) {
706
DBG_TRC(("%s: %s bus: %08x fn: %08x device init failed.\n",
708
CardProperties[ent->driver_data].Name,
712
"%s: %s bus: %08x fn: %08x device init failed.\n",
714
CardProperties[ent->driver_data].
715
Name, pdev->bus->number,
720
pci_set_master(pdev);
722
pci_read_config_byte(pdev, PCI_LATENCY_TIMER, &pci_latency);
724
DBG_TRC(("%s: bus: %08x fn: %08x fix latency.\n",
725
DRIVERLNAME, pdev->bus->number, pdev->devfn))
727
"%s: bus: %08x fn: %08x fix latency.\n",
728
DRIVERLNAME, pdev->bus->number, pdev->devfn);
729
pci_write_config_byte(pdev, PCI_LATENCY_TIMER, new_latency);
732
if (!(pdiva = diva_driver_add_card(pdev, ent->driver_data))) {
733
DBG_TRC(("%s: %s bus: %08x fn: %08x card init failed.\n",
735
CardProperties[ent->driver_data].Name,
739
"%s: %s bus: %08x fn: %08x card init failed.\n",
741
CardProperties[ent->driver_data].
742
Name, pdev->bus->number,
747
pci_set_drvdata(pdev, pdiva);
752
static void __devexit divas_remove_one(struct pci_dev *pdev)
754
void *pdiva = pci_get_drvdata(pdev);
756
DBG_TRC(("bus: %08x fn: %08x removal.\n",
757
pdev->bus->number, pdev->devfn))
758
printk(KERN_INFO "%s: bus: %08x fn: %08x removal.\n",
759
DRIVERLNAME, pdev->bus->number, pdev->devfn);
762
diva_driver_remove_card(pdiva);
767
/* --------------------------------------------------------------------------
768
Driver Load / Startup
769
-------------------------------------------------------------------------- */
770
static int DIVA_INIT_FUNCTION divas_init(void)
775
printk(KERN_INFO "%s\n", DRIVERNAME);
776
printk(KERN_INFO "%s: Rel:%s Rev:", DRIVERLNAME, DRIVERRELEASE_DIVAS);
777
strcpy(tmprev, main_revision);
778
printk("%s Build: %s(%s)\n", getrev(tmprev),
779
diva_xdi_common_code_build, DIVA_BUILD);
780
printk(KERN_INFO "%s: support for: ", DRIVERLNAME);
781
#ifdef CONFIG_ISDN_DIVAS_BRIPCI
784
#ifdef CONFIG_ISDN_DIVAS_PRIPCI
787
printk("adapters\n");
789
if (!divasfunc_init(dbgmask)) {
790
printk(KERN_ERR "%s: failed to connect to DIDD.\n",
796
if (!divas_register_chrdev()) {
804
if (!create_divas_proc()) {
806
divas_unregister_chrdev();
809
printk(KERN_ERR "%s: failed to create proc entry.\n",
815
if ((ret = pci_register_driver(&diva_pci_driver))) {
818
divas_unregister_chrdev();
821
printk(KERN_ERR "%s: failed to init pci driver.\n",
825
printk(KERN_INFO "%s: started with major %d\n", DRIVERLNAME, major);
831
/* --------------------------------------------------------------------------
833
-------------------------------------------------------------------------- */
834
static void DIVA_EXIT_FUNCTION divas_exit(void)
836
pci_unregister_driver(&diva_pci_driver);
838
divas_unregister_chrdev();
841
printk(KERN_INFO "%s: module unloaded.\n", DRIVERLNAME);
844
module_init(divas_init);
845
module_exit(divas_exit);