1 /* $Id: divasmain.c,v 1.55.4.6 2005/02/09 19:28:20 armin Exp $
2 *
3 * Low level driver for Eicon DIVA Server ISDN cards.
4 *
5 * Copyright 2000-2003 by Armin Schindler (mac@melware.de)
6 * Copyright 2000-2003 Cytronics & Melware (info@melware.de)
7 *
8 * This software may be used and distributed according to the terms
9 * of the GNU General Public License, incorporated herein by reference.
10 */
11
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/kernel.h>
15 #include <linux/uaccess.h>
16 #include <asm/io.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>
23
24 #include "platform.h"
25 #undef ID_MASK
26 #undef N_DATA
27 #include "pc.h"
28 #include "di_defs.h"
29 #include "divasync.h"
30 #include "diva.h"
31 #include "di.h"
32 #include "io.h"
33 #include "xdi_msg.h"
34 #include "xdi_adapter.h"
35 #include "xdi_vers.h"
36 #include "diva_dma.h"
37 #include "diva_pci.h"
38
39 static char *main_revision = "$Revision: 1.55.4.6 $";
40
41 static int major;
42
43 static int dbgmask;
44
45 MODULE_DESCRIPTION("Kernel driver for Eicon DIVA Server cards");
46 MODULE_AUTHOR("Cytronics & Melware, Eicon Networks");
47 MODULE_LICENSE("GPL");
48
49 module_param(dbgmask, int, 0);
50 MODULE_PARM_DESC(dbgmask, "initial debug mask");
51
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";
57
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);
64
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;
69
70 /* --------------------------------------------------------------------------
71 PCI driver interface section
72 -------------------------------------------------------------------------- */
73 /*
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)
76 subdevice
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.
80 */
81
82 #if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2)
83 #define PCI_DEVICE_ID_EICON_MAESTRAP_2 0xE015
84 #endif
85
86 #if !defined(PCI_DEVICE_ID_EICON_4BRI_VOIP)
87 #define PCI_DEVICE_ID_EICON_4BRI_VOIP 0xE016
88 #endif
89
90 #if !defined(PCI_DEVICE_ID_EICON_4BRI_2_VOIP)
91 #define PCI_DEVICE_ID_EICON_4BRI_2_VOIP 0xE017
92 #endif
93
94 #if !defined(PCI_DEVICE_ID_EICON_BRI2M_2)
95 #define PCI_DEVICE_ID_EICON_BRI2M_2 0xE018
96 #endif
97
98 #if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP)
99 #define PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP 0xE019
100 #endif
101
102 #if !defined(PCI_DEVICE_ID_EICON_2F)
103 #define PCI_DEVICE_ID_EICON_2F 0xE01A
104 #endif
105
106 #if !defined(PCI_DEVICE_ID_EICON_BRI2M_2_VOIP)
107 #define PCI_DEVICE_ID_EICON_BRI2M_2_VOIP 0xE01B
108 #endif
109
110 /*
111 This table should be sorted by PCI device ID
112 */
113 static const 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. */
148 };
149 MODULE_DEVICE_TABLE(pci, divas_pci_tbl);
150
151 static int divas_init_one(struct pci_dev *pdev,
152 const struct pci_device_id *ent);
153 static void divas_remove_one(struct pci_dev *pdev);
154
155 static struct pci_driver diva_pci_driver = {
156 .name = "divas",
157 .probe = divas_init_one,
158 .remove = divas_remove_one,
159 .id_table = divas_pci_tbl,
160 };
161
162 /*********************************************************
163 ** little helper functions
164 *********************************************************/
getrev(const char * revision)165 static char *getrev(const char *revision)
166 {
167 char *rev;
168 char *p;
169 if ((p = strchr(revision, ':'))) {
170 rev = p + 2;
171 p = strchr(rev, '$');
172 *--p = 0;
173 } else
174 rev = "1.0";
175 return rev;
176 }
177
diva_log_info(unsigned char * format,...)178 void diva_log_info(unsigned char *format, ...)
179 {
180 va_list args;
181 unsigned char line[160];
182
183 va_start(args, format);
184 vsnprintf(line, sizeof(line), format, args);
185 va_end(args);
186
187 printk(KERN_INFO "%s: %s\n", DRIVERLNAME, line);
188 }
189
divas_get_version(char * p)190 void divas_get_version(char *p)
191 {
192 char tmprev[32];
193
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);
197 }
198
199 /* --------------------------------------------------------------------------
200 PCI Bus services
201 -------------------------------------------------------------------------- */
diva_os_get_pci_bus(void * pci_dev_handle)202 byte diva_os_get_pci_bus(void *pci_dev_handle)
203 {
204 struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
205 return ((byte) pdev->bus->number);
206 }
207
diva_os_get_pci_func(void * pci_dev_handle)208 byte diva_os_get_pci_func(void *pci_dev_handle)
209 {
210 struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
211 return ((byte) pdev->devfn);
212 }
213
divasa_get_pci_irq(unsigned char bus,unsigned char func,void * pci_dev_handle)214 unsigned long divasa_get_pci_irq(unsigned char bus, unsigned char func,
215 void *pci_dev_handle)
216 {
217 unsigned char irq = 0;
218 struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
219
220 irq = dev->irq;
221
222 return ((unsigned long) irq);
223 }
224
divasa_get_pci_bar(unsigned char bus,unsigned char func,int bar,void * pci_dev_handle)225 unsigned long divasa_get_pci_bar(unsigned char bus, unsigned char func,
226 int bar, void *pci_dev_handle)
227 {
228 unsigned long ret = 0;
229 struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
230
231 if (bar < 6) {
232 ret = dev->resource[bar].start;
233 }
234
235 DBG_TRC(("GOT BAR[%d]=%08x", bar, ret));
236
237 {
238 unsigned long type = (ret & 0x00000001);
239 if (type & PCI_BASE_ADDRESS_SPACE_IO) {
240 DBG_TRC((" I/O"));
241 ret &= PCI_BASE_ADDRESS_IO_MASK;
242 } else {
243 DBG_TRC((" memory"));
244 ret &= PCI_BASE_ADDRESS_MEM_MASK;
245 }
246 DBG_TRC((" final=%08x", ret));
247 }
248
249 return (ret);
250 }
251
PCIwrite(byte bus,byte func,int offset,void * data,int length,void * pci_dev_handle)252 void PCIwrite(byte bus, byte func, int offset, void *data, int length,
253 void *pci_dev_handle)
254 {
255 struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
256
257 switch (length) {
258 case 1: /* byte */
259 pci_write_config_byte(dev, offset,
260 *(unsigned char *) data);
261 break;
262 case 2: /* word */
263 pci_write_config_word(dev, offset,
264 *(unsigned short *) data);
265 break;
266 case 4: /* dword */
267 pci_write_config_dword(dev, offset,
268 *(unsigned int *) data);
269 break;
270
271 default: /* buffer */
272 if (!(length % 4) && !(length & 0x03)) { /* Copy as dword */
273 dword *p = (dword *) data;
274 length /= 4;
275
276 while (length--) {
277 pci_write_config_dword(dev, offset,
278 *(unsigned int *)
279 p++);
280 }
281 } else { /* copy as byte stream */
282 byte *p = (byte *) data;
283
284 while (length--) {
285 pci_write_config_byte(dev, offset,
286 *(unsigned char *)
287 p++);
288 }
289 }
290 }
291 }
292
PCIread(byte bus,byte func,int offset,void * data,int length,void * pci_dev_handle)293 void PCIread(byte bus, byte func, int offset, void *data, int length,
294 void *pci_dev_handle)
295 {
296 struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;
297
298 switch (length) {
299 case 1: /* byte */
300 pci_read_config_byte(dev, offset, (unsigned char *) data);
301 break;
302 case 2: /* word */
303 pci_read_config_word(dev, offset, (unsigned short *) data);
304 break;
305 case 4: /* dword */
306 pci_read_config_dword(dev, offset, (unsigned int *) data);
307 break;
308
309 default: /* buffer */
310 if (!(length % 4) && !(length & 0x03)) { /* Copy as dword */
311 dword *p = (dword *) data;
312 length /= 4;
313
314 while (length--) {
315 pci_read_config_dword(dev, offset,
316 (unsigned int *)
317 p++);
318 }
319 } else { /* copy as byte stream */
320 byte *p = (byte *) data;
321
322 while (length--) {
323 pci_read_config_byte(dev, offset,
324 (unsigned char *)
325 p++);
326 }
327 }
328 }
329 }
330
331 /*
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
334 interface
335 */
diva_pci_alloc_consistent(struct pci_dev * hwdev,size_t size,dma_addr_t * dma_handle,void ** addr_handle)336 static void *diva_pci_alloc_consistent(struct pci_dev *hwdev,
337 size_t size,
338 dma_addr_t *dma_handle,
339 void **addr_handle)
340 {
341 void *addr = pci_alloc_consistent(hwdev, size, dma_handle);
342
343 *addr_handle = addr;
344
345 return (addr);
346 }
347
diva_init_dma_map(void * hdev,struct _diva_dma_map_entry ** ppmap,int nentries)348 void diva_init_dma_map(void *hdev,
349 struct _diva_dma_map_entry **ppmap, int nentries)
350 {
351 struct pci_dev *pdev = (struct pci_dev *) hdev;
352 struct _diva_dma_map_entry *pmap =
353 diva_alloc_dma_map(hdev, nentries);
354
355 if (pmap) {
356 int i;
357 dma_addr_t dma_handle;
358 void *cpu_addr;
359 void *addr_handle;
360
361 for (i = 0; i < nentries; i++) {
362 if (!(cpu_addr = diva_pci_alloc_consistent(pdev,
363 PAGE_SIZE,
364 &dma_handle,
365 &addr_handle)))
366 {
367 break;
368 }
369 diva_init_dma_map_entry(pmap, i, cpu_addr,
370 (dword) dma_handle,
371 addr_handle);
372 DBG_TRC(("dma map alloc [%d]=(%08lx:%08x:%08lx)",
373 i, (unsigned long) cpu_addr,
374 (dword) dma_handle,
375 (unsigned long) addr_handle))}
376 }
377
378 *ppmap = pmap;
379 }
380
381 /*
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
384 */
diva_free_dma_map(void * hdev,struct _diva_dma_map_entry * pmap)385 void diva_free_dma_map(void *hdev, struct _diva_dma_map_entry *pmap)
386 {
387 struct pci_dev *pdev = (struct pci_dev *) hdev;
388 int i;
389 dword phys_addr;
390 void *cpu_addr;
391 dma_addr_t dma_handle;
392 void *addr_handle;
393
394 for (i = 0; (pmap != NULL); i++) {
395 diva_get_dma_map_entry(pmap, i, &cpu_addr, &phys_addr);
396 if (!cpu_addr) {
397 break;
398 }
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,
402 dma_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))
406 }
407
408 diva_free_dma_mapping(pmap);
409 }
410
411
412 /*********************************************************
413 ** I/O port utilities
414 *********************************************************/
415
416 int
diva_os_register_io_port(void * adapter,int on,unsigned long port,unsigned long length,const char * name,int id)417 diva_os_register_io_port(void *adapter, int on, unsigned long port,
418 unsigned long length, const char *name, int id)
419 {
420 if (on) {
421 if (!request_region(port, length, name)) {
422 DBG_ERR(("A: I/O: can't register port=%08x", port))
423 return (-1);
424 }
425 } else {
426 release_region(port, length);
427 }
428 return (0);
429 }
430
divasa_remap_pci_bar(diva_os_xdi_adapter_t * a,int id,unsigned long bar,unsigned long area_length)431 void __iomem *divasa_remap_pci_bar(diva_os_xdi_adapter_t *a, int id, unsigned long bar, unsigned long area_length)
432 {
433 void __iomem *ret = ioremap(bar, area_length);
434 DBG_TRC(("remap(%08x)->%p", bar, ret));
435 return (ret);
436 }
437
divasa_unmap_pci_bar(void __iomem * bar)438 void divasa_unmap_pci_bar(void __iomem *bar)
439 {
440 if (bar) {
441 iounmap(bar);
442 }
443 }
444
445 /*********************************************************
446 ** I/O port access
447 *********************************************************/
inpp(void __iomem * addr)448 inline byte inpp(void __iomem *addr)
449 {
450 return (inb((unsigned long) addr));
451 }
452
inppw(void __iomem * addr)453 inline word inppw(void __iomem *addr)
454 {
455 return (inw((unsigned long) addr));
456 }
457
inppw_buffer(void __iomem * addr,void * P,int length)458 inline void inppw_buffer(void __iomem *addr, void *P, int length)
459 {
460 insw((unsigned long) addr, (word *) P, length >> 1);
461 }
462
outppw_buffer(void __iomem * addr,void * P,int length)463 inline void outppw_buffer(void __iomem *addr, void *P, int length)
464 {
465 outsw((unsigned long) addr, (word *) P, length >> 1);
466 }
467
outppw(void __iomem * addr,word w)468 inline void outppw(void __iomem *addr, word w)
469 {
470 outw(w, (unsigned long) addr);
471 }
472
outpp(void __iomem * addr,word p)473 inline void outpp(void __iomem *addr, word p)
474 {
475 outb(p, (unsigned long) addr);
476 }
477
478 /* --------------------------------------------------------------------------
479 IRQ request / remove
480 -------------------------------------------------------------------------- */
diva_os_register_irq(void * context,byte irq,const char * name)481 int diva_os_register_irq(void *context, byte irq, const char *name)
482 {
483 int result = request_irq(irq, diva_os_irq_wrapper,
484 IRQF_SHARED, name, context);
485 return (result);
486 }
487
diva_os_remove_irq(void * context,byte irq)488 void diva_os_remove_irq(void *context, byte irq)
489 {
490 free_irq(irq, context);
491 }
492
493 /* --------------------------------------------------------------------------
494 DPC framework implementation
495 -------------------------------------------------------------------------- */
diva_os_dpc_proc(unsigned long context)496 static void diva_os_dpc_proc(unsigned long context)
497 {
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;
500
501 (*(pisr->callback)) (pisr, pisr->callback_context);
502 }
503
diva_os_initialize_soft_isr(diva_os_soft_isr_t * psoft_isr,diva_os_soft_isr_callback_t callback,void * 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)
507 {
508 diva_os_thread_dpc_t *pdpc;
509
510 pdpc = (diva_os_thread_dpc_t *) diva_os_malloc(0, sizeof(*pdpc));
511 if (!(psoft_isr->object = pdpc)) {
512 return (-1);
513 }
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);
519
520 return (0);
521 }
522
diva_os_schedule_soft_isr(diva_os_soft_isr_t * psoft_isr)523 int diva_os_schedule_soft_isr(diva_os_soft_isr_t *psoft_isr)
524 {
525 if (psoft_isr && psoft_isr->object) {
526 diva_os_thread_dpc_t *pdpc =
527 (diva_os_thread_dpc_t *) psoft_isr->object;
528
529 tasklet_schedule(&pdpc->divas_task);
530 }
531
532 return (1);
533 }
534
diva_os_cancel_soft_isr(diva_os_soft_isr_t * psoft_isr)535 int diva_os_cancel_soft_isr(diva_os_soft_isr_t *psoft_isr)
536 {
537 return (0);
538 }
539
diva_os_remove_soft_isr(diva_os_soft_isr_t * psoft_isr)540 void diva_os_remove_soft_isr(diva_os_soft_isr_t *psoft_isr)
541 {
542 if (psoft_isr && psoft_isr->object) {
543 diva_os_thread_dpc_t *pdpc =
544 (diva_os_thread_dpc_t *) psoft_isr->object;
545 void *mem;
546
547 tasklet_kill(&pdpc->divas_task);
548 mem = psoft_isr->object;
549 psoft_isr->object = NULL;
550 diva_os_free(0, mem);
551 }
552 }
553
554 /*
555 * kernel/user space copy functions
556 */
557 static int
xdi_copy_to_user(void * os_handle,void __user * dst,const void * src,int length)558 xdi_copy_to_user(void *os_handle, void __user *dst, const void *src, int length)
559 {
560 if (copy_to_user(dst, src, length)) {
561 return (-EFAULT);
562 }
563 return (length);
564 }
565
566 static int
xdi_copy_from_user(void * os_handle,void * dst,const void __user * src,int length)567 xdi_copy_from_user(void *os_handle, void *dst, const void __user *src, int length)
568 {
569 if (copy_from_user(dst, src, length)) {
570 return (-EFAULT);
571 }
572 return (length);
573 }
574
575 /*
576 * device node operations
577 */
divas_open(struct inode * inode,struct file * file)578 static int divas_open(struct inode *inode, struct file *file)
579 {
580 return (0);
581 }
582
divas_release(struct inode * inode,struct file * file)583 static int divas_release(struct inode *inode, struct file *file)
584 {
585 if (file->private_data) {
586 diva_xdi_close_adapter(file->private_data, file);
587 }
588 return (0);
589 }
590
divas_write(struct file * file,const char __user * buf,size_t count,loff_t * ppos)591 static ssize_t divas_write(struct file *file, const char __user *buf,
592 size_t count, loff_t *ppos)
593 {
594 diva_xdi_um_cfg_cmd_t msg;
595 int ret = -EINVAL;
596
597 if (!file->private_data) {
598 file->private_data = diva_xdi_open_adapter(file, buf,
599 count, &msg,
600 xdi_copy_from_user);
601 if (!file->private_data)
602 return (-ENODEV);
603 ret = diva_xdi_write(file->private_data, file,
604 buf, count, &msg, xdi_copy_from_user);
605 } else {
606 ret = diva_xdi_write(file->private_data, file,
607 buf, count, NULL, xdi_copy_from_user);
608 }
609
610 switch (ret) {
611 case -1: /* Message should be removed from rx mailbox first */
612 ret = -EBUSY;
613 break;
614 case -2: /* invalid adapter was specified in this call */
615 ret = -ENOMEM;
616 break;
617 case -3:
618 ret = -ENXIO;
619 break;
620 }
621 DBG_TRC(("write: ret %d", ret));
622 return (ret);
623 }
624
divas_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)625 static ssize_t divas_read(struct file *file, char __user *buf,
626 size_t count, loff_t *ppos)
627 {
628 diva_xdi_um_cfg_cmd_t msg;
629 int ret = -EINVAL;
630
631 if (!file->private_data) {
632 file->private_data = diva_xdi_open_adapter(file, buf,
633 count, &msg,
634 xdi_copy_from_user);
635 }
636 if (!file->private_data) {
637 return (-ENODEV);
638 }
639
640 ret = diva_xdi_read(file->private_data, file,
641 buf, count, xdi_copy_to_user);
642 switch (ret) {
643 case -1: /* RX mailbox is empty */
644 ret = -EAGAIN;
645 break;
646 case -2: /* no memory, mailbox was cleared, last command is failed */
647 ret = -ENOMEM;
648 break;
649 case -3: /* can't copy to user, retry */
650 ret = -EFAULT;
651 break;
652 }
653 DBG_TRC(("read: ret %d", ret));
654 return (ret);
655 }
656
divas_poll(struct file * file,poll_table * wait)657 static __poll_t divas_poll(struct file *file, poll_table *wait)
658 {
659 if (!file->private_data) {
660 return (EPOLLERR);
661 }
662 return (EPOLLIN | EPOLLRDNORM);
663 }
664
665 static const struct file_operations divas_fops = {
666 .owner = THIS_MODULE,
667 .llseek = no_llseek,
668 .read = divas_read,
669 .write = divas_write,
670 .poll = divas_poll,
671 .open = divas_open,
672 .release = divas_release
673 };
674
divas_unregister_chrdev(void)675 static void divas_unregister_chrdev(void)
676 {
677 unregister_chrdev(major, DEVNAME);
678 }
679
divas_register_chrdev(void)680 static int __init divas_register_chrdev(void)
681 {
682 if ((major = register_chrdev(0, DEVNAME, &divas_fops)) < 0)
683 {
684 printk(KERN_ERR "%s: failed to create /dev entry.\n",
685 DRIVERLNAME);
686 return (0);
687 }
688
689 return (1);
690 }
691
692 /* --------------------------------------------------------------------------
693 PCI driver section
694 -------------------------------------------------------------------------- */
divas_init_one(struct pci_dev * pdev,const struct pci_device_id * ent)695 static int divas_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
696 {
697 void *pdiva = NULL;
698 u8 pci_latency;
699 u8 new_latency = 32;
700
701 DBG_TRC(("%s bus: %08x fn: %08x insertion.\n",
702 CardProperties[ent->driver_data].Name,
703 pdev->bus->number, pdev->devfn))
704 printk(KERN_INFO "%s: %s bus: %08x fn: %08x insertion.\n",
705 DRIVERLNAME, CardProperties[ent->driver_data].Name,
706 pdev->bus->number, pdev->devfn);
707
708 if (pci_enable_device(pdev)) {
709 DBG_TRC(("%s: %s bus: %08x fn: %08x device init failed.\n",
710 DRIVERLNAME,
711 CardProperties[ent->driver_data].Name,
712 pdev->bus->number,
713 pdev->devfn))
714 printk(KERN_ERR
715 "%s: %s bus: %08x fn: %08x device init failed.\n",
716 DRIVERLNAME,
717 CardProperties[ent->driver_data].
718 Name, pdev->bus->number,
719 pdev->devfn);
720 return (-EIO);
721 }
722
723 pci_set_master(pdev);
724
725 pci_read_config_byte(pdev, PCI_LATENCY_TIMER, &pci_latency);
726 if (!pci_latency) {
727 DBG_TRC(("%s: bus: %08x fn: %08x fix latency.\n",
728 DRIVERLNAME, pdev->bus->number, pdev->devfn))
729 printk(KERN_INFO
730 "%s: bus: %08x fn: %08x fix latency.\n",
731 DRIVERLNAME, pdev->bus->number, pdev->devfn);
732 pci_write_config_byte(pdev, PCI_LATENCY_TIMER, new_latency);
733 }
734
735 if (!(pdiva = diva_driver_add_card(pdev, ent->driver_data))) {
736 DBG_TRC(("%s: %s bus: %08x fn: %08x card init failed.\n",
737 DRIVERLNAME,
738 CardProperties[ent->driver_data].Name,
739 pdev->bus->number,
740 pdev->devfn))
741 printk(KERN_ERR
742 "%s: %s bus: %08x fn: %08x card init failed.\n",
743 DRIVERLNAME,
744 CardProperties[ent->driver_data].
745 Name, pdev->bus->number,
746 pdev->devfn);
747 return (-EIO);
748 }
749
750 pci_set_drvdata(pdev, pdiva);
751
752 return (0);
753 }
754
divas_remove_one(struct pci_dev * pdev)755 static void divas_remove_one(struct pci_dev *pdev)
756 {
757 void *pdiva = pci_get_drvdata(pdev);
758
759 DBG_TRC(("bus: %08x fn: %08x removal.\n",
760 pdev->bus->number, pdev->devfn))
761 printk(KERN_INFO "%s: bus: %08x fn: %08x removal.\n",
762 DRIVERLNAME, pdev->bus->number, pdev->devfn);
763
764 if (pdiva) {
765 diva_driver_remove_card(pdiva);
766 }
767
768 }
769
770 /* --------------------------------------------------------------------------
771 Driver Load / Startup
772 -------------------------------------------------------------------------- */
divas_init(void)773 static int __init divas_init(void)
774 {
775 char tmprev[50];
776 int ret = 0;
777
778 printk(KERN_INFO "%s\n", DRIVERNAME);
779 printk(KERN_INFO "%s: Rel:%s Rev:", DRIVERLNAME, DRIVERRELEASE_DIVAS);
780 strcpy(tmprev, main_revision);
781 printk("%s Build: %s(%s)\n", getrev(tmprev),
782 diva_xdi_common_code_build, DIVA_BUILD);
783 printk(KERN_INFO "%s: support for: ", DRIVERLNAME);
784 #ifdef CONFIG_ISDN_DIVAS_BRIPCI
785 printk("BRI/PCI ");
786 #endif
787 #ifdef CONFIG_ISDN_DIVAS_PRIPCI
788 printk("PRI/PCI ");
789 #endif
790 printk("adapters\n");
791
792 if (!divasfunc_init(dbgmask)) {
793 printk(KERN_ERR "%s: failed to connect to DIDD.\n",
794 DRIVERLNAME);
795 ret = -EIO;
796 goto out;
797 }
798
799 if (!divas_register_chrdev()) {
800 #ifdef MODULE
801 divasfunc_exit();
802 #endif
803 ret = -EIO;
804 goto out;
805 }
806
807 if (!create_divas_proc()) {
808 #ifdef MODULE
809 divas_unregister_chrdev();
810 divasfunc_exit();
811 #endif
812 printk(KERN_ERR "%s: failed to create proc entry.\n",
813 DRIVERLNAME);
814 ret = -EIO;
815 goto out;
816 }
817
818 if ((ret = pci_register_driver(&diva_pci_driver))) {
819 #ifdef MODULE
820 remove_divas_proc();
821 divas_unregister_chrdev();
822 divasfunc_exit();
823 #endif
824 printk(KERN_ERR "%s: failed to init pci driver.\n",
825 DRIVERLNAME);
826 goto out;
827 }
828 printk(KERN_INFO "%s: started with major %d\n", DRIVERLNAME, major);
829
830 out:
831 return (ret);
832 }
833
834 /* --------------------------------------------------------------------------
835 Driver Unload
836 -------------------------------------------------------------------------- */
divas_exit(void)837 static void __exit divas_exit(void)
838 {
839 pci_unregister_driver(&diva_pci_driver);
840 remove_divas_proc();
841 divas_unregister_chrdev();
842 divasfunc_exit();
843
844 printk(KERN_INFO "%s: module unloaded.\n", DRIVERLNAME);
845 }
846
847 module_init(divas_init);
848 module_exit(divas_exit);
849