divasmain.c

Go to the documentation of this file.

/* $Id: divasmain.c,v 1.55.4.6 2005/02/09 19:28:20 armin Exp $
 *
 * Low level driver for Eicon DIVA Server ISDN cards.
 *
 * Copyright 2000-2003 by Armin Schindler ([email protected])
 * Copyright 2000-2003 Cytronics & Melware ([email protected])
 *
 * 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/init.h>
#include <linux/kernel.h>
#include <asm/uaccess.h>
#include <asm/io.h>
#include <linux/ioport.h>
#include <linux/pci.h>
#include <linux/interrupt.h>
#include <linux/list.h>
#include <linux/poll.h>
#include <linux/kmod.h>

#include "platform.h"
#undef ID_MASK
#undef N_DATA
#include "pc.h"
#include "di_defs.h"
#include "divasync.h"
#include "diva.h"
#include "di.h"
#include "io.h"
#include "xdi_msg.h"
#include "xdi_adapter.h"
#include "xdi_vers.h"
#include "diva_dma.h"
#include "diva_pci.h"

static char *main_revision = "$Revision: 1.55.4.6 $";

static int major;

static int dbgmask;

MODULE_DESCRIPTION("Kernel driver for Eicon DIVA Server cards");
MODULE_AUTHOR("Cytronics & Melware, Eicon Networks");
MODULE_LICENSE("GPL");

module_param(dbgmask, int, 0);
MODULE_PARM_DESC(dbgmask, "initial debug mask");

static char *DRIVERNAME =
    "Eicon DIVA Server driver (http://www.melware.net)";
static char *DRIVERLNAME = "divas";
static char *DEVNAME = "Divas";
char *DRIVERRELEASE_DIVAS = "2.0";

extern irqreturn_t diva_os_irq_wrapper(int irq, void *context);
extern int create_divas_proc(void);
extern void remove_divas_proc(void);
extern void diva_get_vserial_number(PISDN_ADAPTER IoAdapter, char *buf);
extern int divasfunc_init(int dbgmask);
extern void divasfunc_exit(void);

typedef struct _diva_os_thread_dpc {
    struct tasklet_struct divas_task;
    diva_os_soft_isr_t *psoft_isr;
} diva_os_thread_dpc_t;

/* --------------------------------------------------------------------------
   PCI driver interface section
   -------------------------------------------------------------------------- */
/*
  vendor, device    Vendor and device ID to match (or PCI_ANY_ID)
  subvendor,    Subsystem vendor and device ID to match (or PCI_ANY_ID)
  subdevice
  class,        Device class to match. The class_mask tells which bits
  class_mask    of the class are honored during the comparison.
  driver_data   Data private to the driver.
*/

#if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2)
#define PCI_DEVICE_ID_EICON_MAESTRAP_2       0xE015
#endif

#if !defined(PCI_DEVICE_ID_EICON_4BRI_VOIP)
#define PCI_DEVICE_ID_EICON_4BRI_VOIP        0xE016
#endif

#if !defined(PCI_DEVICE_ID_EICON_4BRI_2_VOIP)
#define PCI_DEVICE_ID_EICON_4BRI_2_VOIP      0xE017
#endif

#if !defined(PCI_DEVICE_ID_EICON_BRI2M_2)
#define PCI_DEVICE_ID_EICON_BRI2M_2          0xE018
#endif

#if !defined(PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP)
#define PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP  0xE019
#endif

#if !defined(PCI_DEVICE_ID_EICON_2F)
#define PCI_DEVICE_ID_EICON_2F               0xE01A
#endif

#if !defined(PCI_DEVICE_ID_EICON_BRI2M_2_VOIP)
#define PCI_DEVICE_ID_EICON_BRI2M_2_VOIP     0xE01B
#endif

/*
  This table should be sorted by PCI device ID
*/
static struct pci_device_id divas_pci_tbl[] = {
    /* Diva Server BRI-2M PCI 0xE010 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRA),
      CARDTYPE_MAESTRA_PCI },
    /* Diva Server 4BRI-8M PCI 0xE012 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAQ),
      CARDTYPE_DIVASRV_Q_8M_PCI },
    /* Diva Server 4BRI-8M 2.0 PCI 0xE013 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAQ_U),
      CARDTYPE_DIVASRV_Q_8M_V2_PCI },
    /* Diva Server PRI-30M PCI 0xE014 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP),
      CARDTYPE_DIVASRV_P_30M_PCI },
    /* Diva Server PRI 2.0 adapter 0xE015 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP_2),
      CARDTYPE_DIVASRV_P_30M_V2_PCI },
    /* Diva Server Voice 4BRI-8M PCI 0xE016 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_4BRI_VOIP),
      CARDTYPE_DIVASRV_VOICE_Q_8M_PCI },
    /* Diva Server Voice 4BRI-8M 2.0 PCI 0xE017 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_4BRI_2_VOIP),
      CARDTYPE_DIVASRV_VOICE_Q_8M_V2_PCI },
    /* Diva Server BRI-2M 2.0 PCI 0xE018 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_BRI2M_2),
      CARDTYPE_DIVASRV_B_2M_V2_PCI },
    /* Diva Server Voice PRI 2.0 PCI 0xE019 */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_MAESTRAP_2_VOIP),
      CARDTYPE_DIVASRV_VOICE_P_30M_V2_PCI },
    /* Diva Server 2FX 0xE01A */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_2F),
      CARDTYPE_DIVASRV_B_2F_PCI },
    /* Diva Server Voice BRI-2M 2.0 PCI 0xE01B */
    { PCI_VDEVICE(EICON, PCI_DEVICE_ID_EICON_BRI2M_2_VOIP),
      CARDTYPE_DIVASRV_VOICE_B_2M_V2_PCI },
    { 0, }          /* 0 terminated list. */
};
MODULE_DEVICE_TABLE(pci, divas_pci_tbl);

static int divas_init_one(struct pci_dev *pdev,
              const struct pci_device_id *ent);
static void __devexit divas_remove_one(struct pci_dev *pdev);

static struct pci_driver diva_pci_driver = {
    .name     = "divas",
    .probe    = divas_init_one,
    .remove   = __devexit_p(divas_remove_one),
    .id_table = divas_pci_tbl,
};

/*********************************************************
 ** little helper functions
 *********************************************************/
static char *getrev(const char *revision)
{
    char *rev;
    char *p;
    if ((p = strchr(revision, ':'))) {
        rev = p + 2;
        p = strchr(rev, '$');
        *--p = 0;
    } else
        rev = "1.0";
    return rev;
}

void diva_log_info(unsigned char *format, ...)
{
    va_list args;
    unsigned char line[160];

    va_start(args, format);
    vsnprintf(line, sizeof(line), format, args);
    va_end(args);

    printk(KERN_INFO "%s: %s\n", DRIVERLNAME, line);
}

void divas_get_version(char *p)
{
    char tmprev[32];

    strcpy(tmprev, main_revision);
    sprintf(p, "%s: %s(%s) %s(%s) major=%d\n", DRIVERLNAME, DRIVERRELEASE_DIVAS,
        getrev(tmprev), diva_xdi_common_code_build, DIVA_BUILD, major);
}

/* --------------------------------------------------------------------------
   PCI Bus services
   -------------------------------------------------------------------------- */
byte diva_os_get_pci_bus(void *pci_dev_handle)
{
    struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
    return ((byte) pdev->bus->number);
}

byte diva_os_get_pci_func(void *pci_dev_handle)
{
    struct pci_dev *pdev = (struct pci_dev *) pci_dev_handle;
    return ((byte) pdev->devfn);
}

unsigned long divasa_get_pci_irq(unsigned char bus, unsigned char func,
                 void *pci_dev_handle)
{
    unsigned char irq = 0;
    struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;

    irq = dev->irq;

    return ((unsigned long) irq);
}

unsigned long divasa_get_pci_bar(unsigned char bus, unsigned char func,
                 int bar, void *pci_dev_handle)
{
    unsigned long ret = 0;
    struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;

    if (bar < 6) {
        ret = dev->resource[bar].start;
    }

    DBG_TRC(("GOT BAR[%d]=%08x", bar, ret));

    {
        unsigned long type = (ret & 0x00000001);
        if (type & PCI_BASE_ADDRESS_SPACE_IO) {
            DBG_TRC(("  I/O"));
            ret &= PCI_BASE_ADDRESS_IO_MASK;
        } else {
            DBG_TRC(("  memory"));
            ret &= PCI_BASE_ADDRESS_MEM_MASK;
        }
        DBG_TRC(("  final=%08x", ret));
    }

    return (ret);
}

void PCIwrite(byte bus, byte func, int offset, void *data, int length,
          void *pci_dev_handle)
{
    struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;

    switch (length) {
    case 1:     /* byte */
        pci_write_config_byte(dev, offset,
                      *(unsigned char *) data);
        break;
    case 2:     /* word */
        pci_write_config_word(dev, offset,
                      *(unsigned short *) data);
        break;
    case 4:     /* dword */
        pci_write_config_dword(dev, offset,
                       *(unsigned int *) data);
        break;

    default:        /* buffer */
        if (!(length % 4) && !(length & 0x03)) {    /* Copy as dword */
            dword *p = (dword *) data;
            length /= 4;

            while (length--) {
                pci_write_config_dword(dev, offset,
                               *(unsigned int *)
                               p++);
            }
        } else {    /* copy as byte stream */
            byte *p = (byte *) data;

            while (length--) {
                pci_write_config_byte(dev, offset,
                              *(unsigned char *)
                              p++);
            }
        }
    }
}

void PCIread(byte bus, byte func, int offset, void *data, int length,
         void *pci_dev_handle)
{
    struct pci_dev *dev = (struct pci_dev *) pci_dev_handle;

    switch (length) {
    case 1:     /* byte */
        pci_read_config_byte(dev, offset, (unsigned char *) data);
        break;
    case 2:     /* word */
        pci_read_config_word(dev, offset, (unsigned short *) data);
        break;
    case 4:     /* dword */
        pci_read_config_dword(dev, offset, (unsigned int *) data);
        break;

    default:        /* buffer */
        if (!(length % 4) && !(length & 0x03)) {    /* Copy as dword */
            dword *p = (dword *) data;
            length /= 4;

            while (length--) {
                pci_read_config_dword(dev, offset,
                              (unsigned int *)
                              p++);
            }
        } else {    /* copy as byte stream */
            byte *p = (byte *) data;

            while (length--) {
                pci_read_config_byte(dev, offset,
                             (unsigned char *)
                             p++);
            }
        }
    }
}

/*
  Init map with DMA pages. It is not problem if some allocations fail -
  the channels that will not get one DMA page will use standard PIO
  interface
*/
static void *diva_pci_alloc_consistent(struct pci_dev *hwdev,
                       size_t size,
                       dma_addr_t *dma_handle,
                       void **addr_handle)
{
    void *addr = pci_alloc_consistent(hwdev, size, dma_handle);

    *addr_handle = addr;

    return (addr);
}

void diva_init_dma_map(void *hdev,
               struct _diva_dma_map_entry **ppmap, int nentries)
{
    struct pci_dev *pdev = (struct pci_dev *) hdev;
    struct _diva_dma_map_entry *pmap =
        diva_alloc_dma_map(hdev, nentries);

    if (pmap) {
        int i;
        dma_addr_t dma_handle;
        void *cpu_addr;
        void *addr_handle;

        for (i = 0; i < nentries; i++) {
            if (!(cpu_addr = diva_pci_alloc_consistent(pdev,
                                   PAGE_SIZE,
                                   &dma_handle,
                                   &addr_handle)))
            {
                break;
            }
            diva_init_dma_map_entry(pmap, i, cpu_addr,
                        (dword) dma_handle,
                        addr_handle);
            DBG_TRC(("dma map alloc [%d]=(%08lx:%08x:%08lx)",
                 i, (unsigned long) cpu_addr,
                 (dword) dma_handle,
                 (unsigned long) addr_handle))}
    }

    *ppmap = pmap;
}

/*
  Free all contained in the map entries and memory used by the map
  Should be always called after adapter removal from DIDD array
*/
void diva_free_dma_map(void *hdev, struct _diva_dma_map_entry *pmap)
{
    struct pci_dev *pdev = (struct pci_dev *) hdev;
    int i;
    dword phys_addr;
    void *cpu_addr;
    dma_addr_t dma_handle;
    void *addr_handle;

    for (i = 0; (pmap != NULL); i++) {
        diva_get_dma_map_entry(pmap, i, &cpu_addr, &phys_addr);
        if (!cpu_addr) {
            break;
        }
        addr_handle = diva_get_entry_handle(pmap, i);
        dma_handle = (dma_addr_t) phys_addr;
        pci_free_consistent(pdev, PAGE_SIZE, addr_handle,
                    dma_handle);
        DBG_TRC(("dma map free [%d]=(%08lx:%08x:%08lx)", i,
             (unsigned long) cpu_addr, (dword) dma_handle,
             (unsigned long) addr_handle))
            }

    diva_free_dma_mapping(pmap);
}


/*********************************************************
 ** I/O port utilities
 *********************************************************/

int
diva_os_register_io_port(void *adapter, int on, unsigned long port,
             unsigned long length, const char *name, int id)
{
    if (on) {
        if (!request_region(port, length, name)) {
            DBG_ERR(("A: I/O: can't register port=%08x", port))
                return (-1);
        }
    } else {
        release_region(port, length);
    }
    return (0);
}

void __iomem *divasa_remap_pci_bar(diva_os_xdi_adapter_t *a, int id, unsigned long bar, unsigned long area_length)
{
    void __iomem *ret = ioremap(bar, area_length);
    DBG_TRC(("remap(%08x)->%p", bar, ret));
    return (ret);
}

void divasa_unmap_pci_bar(void __iomem *bar)
{
    if (bar) {
        iounmap(bar);
    }
}

/*********************************************************
 ** I/O port access
 *********************************************************/
byte __inline__ inpp(void __iomem *addr)
{
    return (inb((unsigned long) addr));
}

word __inline__ inppw(void __iomem *addr)
{
    return (inw((unsigned long) addr));
}

void __inline__ inppw_buffer(void __iomem *addr, void *P, int length)
{
    insw((unsigned long) addr, (word *) P, length >> 1);
}

void __inline__ outppw_buffer(void __iomem *addr, void *P, int length)
{
    outsw((unsigned long) addr, (word *) P, length >> 1);
}

void __inline__ outppw(void __iomem *addr, word w)
{
    outw(w, (unsigned long) addr);
}

void __inline__ outpp(void __iomem *addr, word p)
{
    outb(p, (unsigned long) addr);
}

/* --------------------------------------------------------------------------
   IRQ request / remove
   -------------------------------------------------------------------------- */
int diva_os_register_irq(void *context, byte irq, const char *name)
{
    int result = request_irq(irq, diva_os_irq_wrapper,
                 IRQF_DISABLED | IRQF_SHARED, name, context);
    return (result);
}

void diva_os_remove_irq(void *context, byte irq)
{
    free_irq(irq, context);
}

/* --------------------------------------------------------------------------
   DPC framework implementation
   -------------------------------------------------------------------------- */
static void diva_os_dpc_proc(unsigned long context)
{
    diva_os_thread_dpc_t *psoft_isr = (diva_os_thread_dpc_t *) context;
    diva_os_soft_isr_t *pisr = psoft_isr->psoft_isr;

    (*(pisr->callback)) (pisr, pisr->callback_context);
}

int diva_os_initialize_soft_isr(diva_os_soft_isr_t *psoft_isr,
                diva_os_soft_isr_callback_t callback,
                void *callback_context)
{
    diva_os_thread_dpc_t *pdpc;

    pdpc = (diva_os_thread_dpc_t *) diva_os_malloc(0, sizeof(*pdpc));
    if (!(psoft_isr->object = pdpc)) {
        return (-1);
    }
    memset(pdpc, 0x00, sizeof(*pdpc));
    psoft_isr->callback = callback;
    psoft_isr->callback_context = callback_context;
    pdpc->psoft_isr = psoft_isr;
    tasklet_init(&pdpc->divas_task, diva_os_dpc_proc, (unsigned long)pdpc);

    return (0);
}

int diva_os_schedule_soft_isr(diva_os_soft_isr_t *psoft_isr)
{
    if (psoft_isr && psoft_isr->object) {
        diva_os_thread_dpc_t *pdpc =
            (diva_os_thread_dpc_t *) psoft_isr->object;

        tasklet_schedule(&pdpc->divas_task);
    }

    return (1);
}

int diva_os_cancel_soft_isr(diva_os_soft_isr_t *psoft_isr)
{
    return (0);
}

void diva_os_remove_soft_isr(diva_os_soft_isr_t *psoft_isr)
{
    if (psoft_isr && psoft_isr->object) {
        diva_os_thread_dpc_t *pdpc =
            (diva_os_thread_dpc_t *) psoft_isr->object;
        void *mem;

        tasklet_kill(&pdpc->divas_task);
        mem = psoft_isr->object;
        psoft_isr->object = NULL;
        diva_os_free(0, mem);
    }
}

/*
 * kernel/user space copy functions
 */
static int
xdi_copy_to_user(void *os_handle, void __user *dst, const void *src, int length)
{
    if (copy_to_user(dst, src, length)) {
        return (-EFAULT);
    }
    return (length);
}

static int
xdi_copy_from_user(void *os_handle, void *dst, const void __user *src, int length)
{
    if (copy_from_user(dst, src, length)) {
        return (-EFAULT);
    }
    return (length);
}

/*
 * device node operations
 */
static int divas_open(struct inode *inode, struct file *file)
{
    return (0);
}

static int divas_release(struct inode *inode, struct file *file)
{
    if (file->private_data) {
        diva_xdi_close_adapter(file->private_data, file);
    }
    return (0);
}

static ssize_t divas_write(struct file *file, const char __user *buf,
               size_t count, loff_t *ppos)
{
    int ret = -EINVAL;

    if (!file->private_data) {
        file->private_data = diva_xdi_open_adapter(file, buf,
                               count,
                               xdi_copy_from_user);
    }
    if (!file->private_data) {
        return (-ENODEV);
    }

    ret = diva_xdi_write(file->private_data, file,
                 buf, count, xdi_copy_from_user);
    switch (ret) {
    case -1:        /* Message should be removed from rx mailbox first */
        ret = -EBUSY;
        break;
    case -2:        /* invalid adapter was specified in this call */
        ret = -ENOMEM;
        break;
    case -3:
        ret = -ENXIO;
        break;
    }
    DBG_TRC(("write: ret %d", ret));
    return (ret);
}

static ssize_t divas_read(struct file *file, char __user *buf,
              size_t count, loff_t *ppos)
{
    int ret = -EINVAL;

    if (!file->private_data) {
        file->private_data = diva_xdi_open_adapter(file, buf,
                               count,
                               xdi_copy_from_user);
    }
    if (!file->private_data) {
        return (-ENODEV);
    }

    ret = diva_xdi_read(file->private_data, file,
                buf, count, xdi_copy_to_user);
    switch (ret) {
    case -1:        /* RX mailbox is empty */
        ret = -EAGAIN;
        break;
    case -2:        /* no memory, mailbox was cleared, last command is failed */
        ret = -ENOMEM;
        break;
    case -3:        /* can't copy to user, retry */
        ret = -EFAULT;
        break;
    }
    DBG_TRC(("read: ret %d", ret));
    return (ret);
}

static unsigned int divas_poll(struct file *file, poll_table *wait)
{
    if (!file->private_data) {
        return (POLLERR);
    }
    return (POLLIN | POLLRDNORM);
}

static const struct file_operations divas_fops = {
    .owner   = THIS_MODULE,
    .llseek  = no_llseek,
    .read    = divas_read,
    .write   = divas_write,
    .poll    = divas_poll,
    .open    = divas_open,
    .release = divas_release
};

static void divas_unregister_chrdev(void)
{
    unregister_chrdev(major, DEVNAME);
}

static int __init divas_register_chrdev(void)
{
    if ((major = register_chrdev(0, DEVNAME, &divas_fops)) < 0)
    {
        printk(KERN_ERR "%s: failed to create /dev entry.\n",
               DRIVERLNAME);
        return (0);
    }

    return (1);
}

/* --------------------------------------------------------------------------
   PCI driver section
   -------------------------------------------------------------------------- */
static int __devinit divas_init_one(struct pci_dev *pdev,
                    const struct pci_device_id *ent)
{
    void *pdiva = NULL;
    u8 pci_latency;
    u8 new_latency = 32;

    DBG_TRC(("%s bus: %08x fn: %08x insertion.\n",
         CardProperties[ent->driver_data].Name,
         pdev->bus->number, pdev->devfn))
        printk(KERN_INFO "%s: %s bus: %08x fn: %08x insertion.\n",
               DRIVERLNAME, CardProperties[ent->driver_data].Name,
               pdev->bus->number, pdev->devfn);

    if (pci_enable_device(pdev)) {
        DBG_TRC(("%s: %s bus: %08x fn: %08x device init failed.\n",
             DRIVERLNAME,
             CardProperties[ent->driver_data].Name,
             pdev->bus->number,
             pdev->devfn))
            printk(KERN_ERR
                   "%s: %s bus: %08x fn: %08x device init failed.\n",
                   DRIVERLNAME,
                   CardProperties[ent->driver_data].
                   Name, pdev->bus->number,
                   pdev->devfn);
        return (-EIO);
    }

    pci_set_master(pdev);

    pci_read_config_byte(pdev, PCI_LATENCY_TIMER, &pci_latency);
    if (!pci_latency) {
        DBG_TRC(("%s: bus: %08x fn: %08x fix latency.\n",
             DRIVERLNAME, pdev->bus->number, pdev->devfn))
            printk(KERN_INFO
                   "%s: bus: %08x fn: %08x fix latency.\n",
                   DRIVERLNAME, pdev->bus->number, pdev->devfn);
        pci_write_config_byte(pdev, PCI_LATENCY_TIMER, new_latency);
    }

    if (!(pdiva = diva_driver_add_card(pdev, ent->driver_data))) {
        DBG_TRC(("%s: %s bus: %08x fn: %08x card init failed.\n",
             DRIVERLNAME,
             CardProperties[ent->driver_data].Name,
             pdev->bus->number,
             pdev->devfn))
            printk(KERN_ERR
                   "%s: %s bus: %08x fn: %08x card init failed.\n",
                   DRIVERLNAME,
                   CardProperties[ent->driver_data].
                   Name, pdev->bus->number,
                   pdev->devfn);
        return (-EIO);
    }

    pci_set_drvdata(pdev, pdiva);

    return (0);
}

static void __devexit divas_remove_one(struct pci_dev *pdev)
{
    void *pdiva = pci_get_drvdata(pdev);

    DBG_TRC(("bus: %08x fn: %08x removal.\n",
         pdev->bus->number, pdev->devfn))
        printk(KERN_INFO "%s: bus: %08x fn: %08x removal.\n",
               DRIVERLNAME, pdev->bus->number, pdev->devfn);

    if (pdiva) {
        diva_driver_remove_card(pdiva);
    }

}

/* --------------------------------------------------------------------------
   Driver Load / Startup
   -------------------------------------------------------------------------- */
static int __init divas_init(void)
{
    char tmprev[50];
    int ret = 0;

    printk(KERN_INFO "%s\n", DRIVERNAME);
    printk(KERN_INFO "%s: Rel:%s  Rev:", DRIVERLNAME, DRIVERRELEASE_DIVAS);
    strcpy(tmprev, main_revision);
    printk("%s  Build: %s(%s)\n", getrev(tmprev),
           diva_xdi_common_code_build, DIVA_BUILD);
    printk(KERN_INFO "%s: support for: ", DRIVERLNAME);
#ifdef CONFIG_ISDN_DIVAS_BRIPCI
    printk("BRI/PCI ");
#endif
#ifdef CONFIG_ISDN_DIVAS_PRIPCI
    printk("PRI/PCI ");
#endif
    printk("adapters\n");

    if (!divasfunc_init(dbgmask)) {
        printk(KERN_ERR "%s: failed to connect to DIDD.\n",
               DRIVERLNAME);
        ret = -EIO;
        goto out;
    }

    if (!divas_register_chrdev()) {
#ifdef MODULE
        divasfunc_exit();
#endif
        ret = -EIO;
        goto out;
    }

    if (!create_divas_proc()) {
#ifdef MODULE
        divas_unregister_chrdev();
        divasfunc_exit();
#endif
        printk(KERN_ERR "%s: failed to create proc entry.\n",
               DRIVERLNAME);
        ret = -EIO;
        goto out;
    }

    if ((ret = pci_register_driver(&diva_pci_driver))) {
#ifdef MODULE
        remove_divas_proc();
        divas_unregister_chrdev();
        divasfunc_exit();
#endif
        printk(KERN_ERR "%s: failed to init pci driver.\n",
               DRIVERLNAME);
        goto out;
    }
    printk(KERN_INFO "%s: started with major %d\n", DRIVERLNAME, major);

out:
    return (ret);
}

/* --------------------------------------------------------------------------
   Driver Unload
   -------------------------------------------------------------------------- */
static void __exit divas_exit(void)
{
    pci_unregister_driver(&diva_pci_driver);
    remove_divas_proc();
    divas_unregister_chrdev();
    divasfunc_exit();

    printk(KERN_INFO "%s: module unloaded.\n", DRIVERLNAME);
}

module_init(divas_init);
module_exit(divas_exit);