/* $Id: mntfunc.c,v 1.19.6.4 2005/01/31 12:22:20 armin Exp $ * * Driver for Eicon DIVA Server ISDN cards. * Maint module * * Copyright 2000-2003 by Armin Schindler (mac@melware.de) * Copyright 2000-2003 Cytronics & Melware (info@melware.de) * * This software may be used and distributed according to the terms * of the GNU General Public License, incorporated herein by reference. */ #include "platform.h" #include "di_defs.h" #include "divasync.h" #include "debug_if.h" extern char *DRIVERRELEASE_MNT; #define DBG_MINIMUM (DL_LOG + DL_FTL + DL_ERR) #define DBG_DEFAULT (DBG_MINIMUM + DL_XLOG + DL_REG) extern void DIVA_DIDD_Read(void *, int); static dword notify_handle; static DESCRIPTOR DAdapter; static DESCRIPTOR MAdapter; static DESCRIPTOR MaintDescriptor = { IDI_DIMAINT, 0, 0, (IDI_CALL) diva_maint_prtComp }; extern int diva_os_copy_to_user(void *os_handle, void __user *dst, const void *src, int length); extern int diva_os_copy_from_user(void *os_handle, void *dst, const void __user *src, int length); static void no_printf(unsigned char *x, ...) { /* dummy debug function */ } #include "debuglib.c" /* * DIDD callback function */ static void *didd_callback(void *context, DESCRIPTOR * adapter, int removal) { if (adapter->type == IDI_DADAPTER) { DBG_ERR(("cb: Change in DAdapter ? Oops ?.")); } else if (adapter->type == IDI_DIMAINT) { if (removal) { DbgDeregister(); memset(&MAdapter, 0, sizeof(MAdapter)); dprintf = no_printf; } else { memcpy(&MAdapter, adapter, sizeof(MAdapter)); dprintf = (DIVA_DI_PRINTF) MAdapter.request; DbgRegister("MAINT", DRIVERRELEASE_MNT, DBG_DEFAULT); } } else if ((adapter->type > 0) && (adapter->type < 16)) { if (removal) { diva_mnt_remove_xdi_adapter(adapter); } else { diva_mnt_add_xdi_adapter(adapter); } } return (NULL); } /* * connect to didd */ static int DIVA_INIT_FUNCTION connect_didd(void) { int x = 0; int dadapter = 0; IDI_SYNC_REQ req; DESCRIPTOR DIDD_Table[MAX_DESCRIPTORS]; DIVA_DIDD_Read(DIDD_Table, sizeof(DIDD_Table)); for (x = 0; x < MAX_DESCRIPTORS; x++) { if (DIDD_Table[x].type == IDI_DADAPTER) { /* DADAPTER found */ dadapter = 1; memcpy(&DAdapter, &DIDD_Table[x], sizeof(DAdapter)); req.didd_notify.e.Req = 0; req.didd_notify.e.Rc = IDI_SYNC_REQ_DIDD_REGISTER_ADAPTER_NOTIFY; req.didd_notify.info.callback = (void *)didd_callback; req.didd_notify.info.context = NULL; DAdapter.request((ENTITY *) & req); if (req.didd_notify.e.Rc != 0xff) return (0); notify_handle = req.didd_notify.info.handle; /* Register MAINT (me) */ req.didd_add_adapter.e.Req = 0; req.didd_add_adapter.e.Rc = IDI_SYNC_REQ_DIDD_ADD_ADAPTER; req.didd_add_adapter.info.descriptor = (void *) &MaintDescriptor; DAdapter.request((ENTITY *) & req); if (req.didd_add_adapter.e.Rc != 0xff) return (0); } else if ((DIDD_Table[x].type > 0) && (DIDD_Table[x].type < 16)) { diva_mnt_add_xdi_adapter(&DIDD_Table[x]); } } return (dadapter); } /* * disconnect from didd */ static void DIVA_EXIT_FUNCTION disconnect_didd(void) { IDI_SYNC_REQ req; req.didd_notify.e.Req = 0; req.didd_notify.e.Rc = IDI_SYNC_REQ_DIDD_REMOVE_ADAPTER_NOTIFY; req.didd_notify.info.handle = notify_handle; DAdapter.request((ENTITY *) & req); req.didd_remove_adapter.e.Req = 0; req.didd_remove_adapter.e.Rc = IDI_SYNC_REQ_DIDD_REMOVE_ADAPTER; req.didd_remove_adapter.info.p_request = (IDI_CALL) MaintDescriptor.request; DAdapter.request((ENTITY *) & req); } /* * read/write maint */ int maint_read_write(void __user *buf, int count) { byte data[128]; dword cmd, id, mask; int ret = 0; if (count < (3 * sizeof(dword))) return (-EFAULT); if (diva_os_copy_from_user(NULL, (void *) &data[0], buf, 3 * sizeof(dword))) { return (-EFAULT); } cmd = *(dword *) & data[0]; /* command */ id = *(dword *) & data[4]; /* driver id */ mask = *(dword *) & data[8]; /* mask or size */ switch (cmd) { case DITRACE_CMD_GET_DRIVER_INFO: if ((ret = diva_get_driver_info(id, data, sizeof(data))) > 0) { if ((count < ret) || diva_os_copy_to_user (NULL, buf, (void *) &data[0], ret)) ret = -EFAULT; } else { ret = -EINVAL; } break; case DITRACE_READ_DRIVER_DBG_MASK: if ((ret = diva_get_driver_dbg_mask(id, (byte *) data)) > 0) { if ((count < ret) || diva_os_copy_to_user (NULL, buf, (void *) &data[0], ret)) ret = -EFAULT; } else { ret = -ENODEV; } break; case DITRACE_WRITE_DRIVER_DBG_MASK: if ((ret = diva_set_driver_dbg_mask(id, mask)) <= 0) { ret = -ENODEV; } break; /* Filter commands will ignore the ID due to fact that filtering affects the B- channel and Audio Tap trace levels only. Also MAINT driver will select the right trace ID by itself */ case DITRACE_WRITE_SELECTIVE_TRACE_FILTER: if (!mask) { ret = diva_set_trace_filter (1, "*"); } else if (mask < sizeof(data)) { if (diva_os_copy_from_user(NULL, data, (char __user *)buf+12, mask)) { ret = -EFAULT; } else { ret = diva_set_trace_filter ((int)mask, data); } } else { ret = -EINVAL; } break; case DITRACE_READ_SELECTIVE_TRACE_FILTER: if ((ret = diva_get_trace_filter (sizeof(data), data)) > 0) { if (diva_os_copy_to_user (NULL, buf, data, ret)) ret = -EFAULT; } else { ret = -ENODEV; } break; case DITRACE_READ_TRACE_ENTRY:{ diva_os_spin_lock_magic_t old_irql; word size; diva_dbg_entry_head_t *pmsg; byte *pbuf; if (!(pbuf = diva_os_malloc(0, mask))) { return (-ENOMEM); } for(;;) { if (!(pmsg = diva_maint_get_message(&size, &old_irql))) { break; } if (size > mask) { diva_maint_ack_message(0, &old_irql); ret = -EINVAL; break; } ret = size; memcpy(pbuf, pmsg, size); diva_maint_ack_message(1, &old_irql); if ((count < size) || diva_os_copy_to_user (NULL, buf, (void *) pbuf, size)) ret = -EFAULT; break; } diva_os_free(0, pbuf); } break; case DITRACE_READ_TRACE_ENTRYS:{ diva_os_spin_lock_magic_t old_irql; word size; diva_dbg_entry_head_t *pmsg; byte *pbuf = NULL; int written = 0; if (mask < 4096) { ret = -EINVAL; break; } if (!(pbuf = diva_os_malloc(0, mask))) { return (-ENOMEM); } for (;;) { if (!(pmsg = diva_maint_get_message(&size, &old_irql))) { break; } if ((size + 8) > mask) { diva_maint_ack_message(0, &old_irql); break; } /* Write entry length */ pbuf[written++] = (byte) size; pbuf[written++] = (byte) (size >> 8); pbuf[written++] = 0; pbuf[written++] = 0; /* Write message */ memcpy(&pbuf[written], pmsg, size); diva_maint_ack_message(1, &old_irql); written += size; mask -= (size + 4); } pbuf[written++] = 0; pbuf[written++] = 0; pbuf[written++] = 0; pbuf[written++] = 0; if ((count < written) || diva_os_copy_to_user(NULL, buf, (void *) pbuf, written)) { ret = -EFAULT; } else { ret = written; } diva_os_free(0, pbuf); } break; default: ret = -EINVAL; } return (ret); } /* * init */ int DIVA_INIT_FUNCTION mntfunc_init(int *buffer_length, void **buffer, unsigned long diva_dbg_mem) { if (*buffer_length < 64) { *buffer_length = 64; } if (*buffer_length > 512) { *buffer_length = 512; } *buffer_length *= 1024; if (diva_dbg_mem) { *buffer = (void *) diva_dbg_mem; } else { while ((*buffer_length >= (64 * 1024)) && (!(*buffer = diva_os_malloc (0, *buffer_length)))) { *buffer_length -= 1024; } if (!*buffer) { DBG_ERR(("init: Can not alloc trace buffer")); return (0); } } if (diva_maint_init(*buffer, *buffer_length, (diva_dbg_mem == 0))) { if (!diva_dbg_mem) { diva_os_free (0, *buffer); } DBG_ERR(("init: maint init failed")); return (0); } if (!connect_didd()) { DBG_ERR(("init: failed to connect to DIDD.")); diva_maint_finit(); if (!diva_dbg_mem) { diva_os_free (0, *buffer); } return (0); } return (1); } /* * exit */ void DIVA_EXIT_FUNCTION mntfunc_finit(void) { void *buffer; int i = 100; DbgDeregister(); while (diva_mnt_shutdown_xdi_adapters() && i--) { diva_os_sleep(10); } disconnect_didd(); if ((buffer = diva_maint_finit())) { diva_os_free (0, buffer); } memset(&MAdapter, 0, sizeof(MAdapter)); dprintf = no_printf; }