| #include "platform.h" |
| #include "pc.h" |
| #include "di_defs.h" |
| #include "debug_if.h" |
| #include "divasync.h" |
| #include "kst_ifc.h" |
| #include "maintidi.h" |
| #include "man_defs.h" |
| |
| /* |
| LOCALS |
| */ |
| #define DBG_MAGIC (0x47114711L) |
| |
| static void DI_register (void *arg); |
| static void DI_deregister (pDbgHandle hDbg); |
| static void DI_format (int do_lock, word id, int type, char *format, va_list argument_list); |
| static void DI_format_locked (word id, int type, char *format, va_list argument_list); |
| static void DI_format_old (word id, char *format, va_list ap) { } |
| static void DiProcessEventLog (unsigned short id, unsigned long msgID, va_list ap) { } |
| static void single_p (byte * P, word * PLength, byte Id); |
| static void diva_maint_xdi_cb (ENTITY* e); |
| static word SuperTraceCreateReadReq (byte* P, const char* path); |
| static int diva_mnt_cmp_nmbr (const char* nmbr); |
| static void diva_free_dma_descriptor (IDI_CALL request, int nr); |
| static int diva_get_dma_descriptor (IDI_CALL request, dword *dma_magic); |
| void diva_mnt_internal_dprintf (dword drv_id, dword type, char* p, ...); |
| |
| static dword MaxDumpSize = 256 ; |
| static dword MaxXlogSize = 2 + 128 ; |
| static char TraceFilter[DIVA_MAX_SELECTIVE_FILTER_LENGTH+1]; |
| static int TraceFilterIdent = -1; |
| static int TraceFilterChannel = -1; |
| |
| typedef struct _diva_maint_client { |
| dword sec; |
| dword usec; |
| pDbgHandle hDbg; |
| char drvName[128]; |
| dword dbgMask; |
| dword last_dbgMask; |
| IDI_CALL request; |
| _DbgHandle_ Dbg; |
| int logical; |
| int channels; |
| diva_strace_library_interface_t* pIdiLib; |
| BUFFERS XData; |
| char xbuffer[2048+512]; |
| byte* pmem; |
| int request_pending; |
| int dma_handle; |
| } diva_maint_client_t; |
| static diva_maint_client_t clients[MAX_DESCRIPTORS]; |
| |
| static void diva_change_management_debug_mask (diva_maint_client_t* pC, dword old_mask); |
| |
| static void diva_maint_error (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| int error, |
| const char* file, |
| int line); |
| static void diva_maint_state_change_notify (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| diva_trace_line_state_t* channel, |
| int notify_subject); |
| static void diva_maint_trace_notify (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| void* xlog_buffer, |
| int length); |
| |
| |
| |
| typedef struct MSG_QUEUE { |
| dword Size; /* total size of queue (constant) */ |
| byte *Base; /* lowest address (constant) */ |
| byte *High; /* Base + Size (constant) */ |
| byte *Head; /* first message in queue (if any) */ |
| byte *Tail; /* first free position */ |
| byte *Wrap; /* current wraparound position */ |
| dword Count; /* current no of bytes in queue */ |
| } MSG_QUEUE; |
| |
| typedef struct MSG_HEAD { |
| volatile dword Size; /* size of data following MSG_HEAD */ |
| #define MSG_INCOMPLETE 0x8000 /* ored to Size until queueCompleteMsg */ |
| } MSG_HEAD; |
| |
| #define queueCompleteMsg(p) do{ ((MSG_HEAD *)p - 1)->Size &= ~MSG_INCOMPLETE; }while(0) |
| #define queueCount(q) ((q)->Count) |
| #define MSG_NEED(size) \ |
| ( (sizeof(MSG_HEAD) + size + sizeof(dword) - 1) & ~(sizeof(dword) - 1) ) |
| |
| static void queueInit (MSG_QUEUE *Q, byte *Buffer, dword sizeBuffer) { |
| Q->Size = sizeBuffer; |
| Q->Base = Q->Head = Q->Tail = Buffer; |
| Q->High = Buffer + sizeBuffer; |
| Q->Wrap = NULL; |
| Q->Count= 0; |
| } |
| |
| static byte *queueAllocMsg (MSG_QUEUE *Q, word size) { |
| /* Allocate 'size' bytes at tail of queue which will be filled later |
| * directly with callers own message header info and/or message. |
| * An 'alloced' message is marked incomplete by oring the 'Size' field |
| * with MSG_INCOMPLETE. |
| * This must be reset via queueCompleteMsg() after the message is filled. |
| * As long as a message is marked incomplete queuePeekMsg() will return |
| * a 'queue empty' condition when it reaches such a message. */ |
| |
| MSG_HEAD *Msg; |
| word need = MSG_NEED(size); |
| |
| if (Q->Tail == Q->Head) { |
| if (Q->Wrap || need > Q->Size) { |
| return NULL; /* full */ |
| } |
| goto alloc; /* empty */ |
| } |
| |
| if (Q->Tail > Q->Head) { |
| if (Q->Tail + need <= Q->High) goto alloc; /* append */ |
| if (Q->Base + need > Q->Head) { |
| return NULL; /* too much */ |
| } |
| /* wraparound the queue (but not the message) */ |
| Q->Wrap = Q->Tail; |
| Q->Tail = Q->Base; |
| goto alloc; |
| } |
| |
| if (Q->Tail + need > Q->Head) { |
| return NULL; /* too much */ |
| } |
| |
| alloc: |
| Msg = (MSG_HEAD *)Q->Tail; |
| |
| Msg->Size = size | MSG_INCOMPLETE; |
| |
| Q->Tail += need; |
| Q->Count += size; |
| |
| |
| |
| return ((byte*)(Msg + 1)); |
| } |
| |
| static void queueFreeMsg (MSG_QUEUE *Q) { |
| /* Free the message at head of queue */ |
| |
| word size = ((MSG_HEAD *)Q->Head)->Size & ~MSG_INCOMPLETE; |
| |
| Q->Head += MSG_NEED(size); |
| Q->Count -= size; |
| |
| if (Q->Wrap) { |
| if (Q->Head >= Q->Wrap) { |
| Q->Head = Q->Base; |
| Q->Wrap = NULL; |
| } |
| } else if (Q->Head >= Q->Tail) { |
| Q->Head = Q->Tail = Q->Base; |
| } |
| } |
| |
| static byte *queuePeekMsg (MSG_QUEUE *Q, word *size) { |
| /* Show the first valid message in queue BUT DON'T free the message. |
| * After looking on the message contents it can be freed queueFreeMsg() |
| * or simply remain in message queue. */ |
| |
| MSG_HEAD *Msg = (MSG_HEAD *)Q->Head; |
| |
| if (((byte *)Msg == Q->Tail && !Q->Wrap) || |
| (Msg->Size & MSG_INCOMPLETE)) { |
| return NULL; |
| } else { |
| *size = Msg->Size; |
| return ((byte *)(Msg + 1)); |
| } |
| } |
| |
| /* |
| Message queue header |
| */ |
| static MSG_QUEUE* dbg_queue; |
| static byte* dbg_base; |
| static int external_dbg_queue; |
| static diva_os_spin_lock_t dbg_q_lock; |
| static diva_os_spin_lock_t dbg_adapter_lock; |
| static int dbg_q_busy; |
| static volatile dword dbg_sequence; |
| static dword start_sec; |
| static dword start_usec; |
| |
| /* |
| INTERFACE: |
| Initialize run time queue structures. |
| base: base of the message queue |
| length: length of the message queue |
| do_init: perfor queue reset |
| |
| return: zero on success, -1 on error |
| */ |
| int diva_maint_init (byte* base, unsigned long length, int do_init) { |
| if (dbg_queue || (!base) || (length < (4096*4))) { |
| return (-1); |
| } |
| |
| TraceFilter[0] = 0; |
| TraceFilterIdent = -1; |
| TraceFilterChannel = -1; |
| |
| dbg_base = base; |
| |
| diva_os_get_time (&start_sec, &start_usec); |
| |
| *(dword*)base = (dword)DBG_MAGIC; /* Store Magic */ |
| base += sizeof(dword); |
| length -= sizeof(dword); |
| |
| *(dword*)base = 2048; /* Extension Field Length */ |
| base += sizeof(dword); |
| length -= sizeof(dword); |
| |
| strcpy (base, "KERNEL MODE BUFFER\n"); |
| base += 2048; |
| length -= 2048; |
| |
| *(dword*)base = 0; /* Terminate extension */ |
| base += sizeof(dword); |
| length -= sizeof(dword); |
| |
| *(void**)base = (void*)(base+sizeof(void*)); /* Store Base */ |
| base += sizeof(void*); |
| length -= sizeof(void*); |
| |
| dbg_queue = (MSG_QUEUE*)base; |
| queueInit (dbg_queue, base + sizeof(MSG_QUEUE), length - sizeof(MSG_QUEUE) - 512); |
| external_dbg_queue = 0; |
| |
| if (!do_init) { |
| external_dbg_queue = 1; /* memory was located on the external device */ |
| } |
| |
| |
| if (diva_os_initialize_spin_lock (&dbg_q_lock, "dbg_init")) { |
| dbg_queue = NULL; |
| dbg_base = NULL; |
| external_dbg_queue = 0; |
| return (-1); |
| } |
| |
| if (diva_os_initialize_spin_lock (&dbg_adapter_lock, "dbg_init")) { |
| diva_os_destroy_spin_lock(&dbg_q_lock, "dbg_init"); |
| dbg_queue = NULL; |
| dbg_base = NULL; |
| external_dbg_queue = 0; |
| return (-1); |
| } |
| |
| return (0); |
| } |
| |
| /* |
| INTERFACE: |
| Finit at unload time |
| return address of internal queue or zero if queue |
| was external |
| */ |
| void* diva_maint_finit (void) { |
| void* ret = (void*)dbg_base; |
| int i; |
| |
| dbg_queue = NULL; |
| dbg_base = NULL; |
| |
| if (ret) { |
| diva_os_destroy_spin_lock(&dbg_q_lock, "dbg_finit"); |
| diva_os_destroy_spin_lock(&dbg_adapter_lock, "dbg_finit"); |
| } |
| |
| if (external_dbg_queue) { |
| ret = NULL; |
| } |
| external_dbg_queue = 0; |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].pmem) { |
| diva_os_free (0, clients[i].pmem); |
| } |
| } |
| |
| return (ret); |
| } |
| |
| /* |
| INTERFACE: |
| Return amount of messages in debug queue |
| */ |
| dword diva_dbg_q_length (void) { |
| return (dbg_queue ? queueCount(dbg_queue) : 0); |
| } |
| |
| /* |
| INTERFACE: |
| Lock message queue and return the pointer to the first |
| entry. |
| */ |
| diva_dbg_entry_head_t* diva_maint_get_message (word* size, |
| diva_os_spin_lock_magic_t* old_irql) { |
| diva_dbg_entry_head_t* pmsg = NULL; |
| |
| diva_os_enter_spin_lock (&dbg_q_lock, old_irql, "read"); |
| if (dbg_q_busy) { |
| diva_os_leave_spin_lock (&dbg_q_lock, old_irql, "read_busy"); |
| return NULL; |
| } |
| dbg_q_busy = 1; |
| |
| if (!(pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, size))) { |
| dbg_q_busy = 0; |
| diva_os_leave_spin_lock (&dbg_q_lock, old_irql, "read_empty"); |
| } |
| |
| return (pmsg); |
| } |
| |
| /* |
| INTERFACE: |
| acknowledge last message and unlock queue |
| */ |
| void diva_maint_ack_message (int do_release, |
| diva_os_spin_lock_magic_t* old_irql) { |
| if (!dbg_q_busy) { |
| return; |
| } |
| if (do_release) { |
| queueFreeMsg (dbg_queue); |
| } |
| dbg_q_busy = 0; |
| diva_os_leave_spin_lock (&dbg_q_lock, old_irql, "read_ack"); |
| } |
| |
| |
| /* |
| INTERFACE: |
| PRT COMP function used to register |
| with MAINT adapter or log in compatibility |
| mode in case older driver version is connected too |
| */ |
| void diva_maint_prtComp (char *format, ...) { |
| void *hDbg; |
| va_list ap; |
| |
| if (!format) |
| return; |
| |
| va_start(ap, format); |
| |
| /* |
| register to new log driver functions |
| */ |
| if ((format[0] == 0) && ((unsigned char)format[1] == 255)) { |
| hDbg = va_arg(ap, void *); /* ptr to DbgHandle */ |
| DI_register (hDbg); |
| } |
| |
| va_end (ap); |
| } |
| |
| static void DI_register (void *arg) { |
| diva_os_spin_lock_magic_t old_irql; |
| dword sec, usec; |
| pDbgHandle hDbg ; |
| int id, free_id = -1, best_id = 0; |
| |
| diva_os_get_time (&sec, &usec); |
| |
| hDbg = (pDbgHandle)arg ; |
| /* |
| Check for bad args, specially for the old obsolete debug handle |
| */ |
| if ((hDbg == NULL) || |
| ((hDbg->id == 0) && (((_OldDbgHandle_ *)hDbg)->id == -1)) || |
| (hDbg->Registered != 0)) { |
| return ; |
| } |
| |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| |
| for (id = 1; id < ARRAY_SIZE(clients); id++) { |
| if (clients[id].hDbg == hDbg) { |
| /* |
| driver already registered |
| */ |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| return; |
| } |
| if (clients[id].hDbg) { /* slot is busy */ |
| continue; |
| } |
| free_id = id; |
| if (!strcmp (clients[id].drvName, hDbg->drvName)) { |
| /* |
| This driver was already registered with this name |
| and slot is still free - reuse it |
| */ |
| best_id = 1; |
| break; |
| } |
| if (!clients[id].hDbg) { /* slot is busy */ |
| break; |
| } |
| } |
| |
| if (free_id != -1) { |
| diva_dbg_entry_head_t* pmsg = NULL; |
| int len; |
| char tmp[256]; |
| word size; |
| |
| /* |
| Register new driver with id == free_id |
| */ |
| clients[free_id].hDbg = hDbg; |
| clients[free_id].sec = sec; |
| clients[free_id].usec = usec; |
| strcpy (clients[free_id].drvName, hDbg->drvName); |
| |
| clients[free_id].dbgMask = hDbg->dbgMask; |
| if (best_id) { |
| hDbg->dbgMask |= clients[free_id].last_dbgMask; |
| } else { |
| clients[free_id].last_dbgMask = 0; |
| } |
| |
| hDbg->Registered = DBG_HANDLE_REG_NEW ; |
| hDbg->id = (byte)free_id; |
| hDbg->dbg_end = DI_deregister; |
| hDbg->dbg_prt = DI_format_locked; |
| hDbg->dbg_ev = DiProcessEventLog; |
| hDbg->dbg_irq = DI_format_locked; |
| if (hDbg->Version > 0) { |
| hDbg->dbg_old = DI_format_old; |
| } |
| hDbg->next = (pDbgHandle)DBG_MAGIC; |
| |
| /* |
| Log driver register, MAINT driver ID is '0' |
| */ |
| len = sprintf (tmp, "DIMAINT - drv # %d = '%s' registered", |
| free_id, hDbg->drvName); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)(len+1+sizeof(*pmsg))))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| |
| if (pmsg) { |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_STRING; |
| pmsg->dli = DLI_REG; |
| pmsg->drv_id = 0; /* id 0 - DIMAINT */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = len+1; |
| |
| memcpy (&pmsg[1], tmp, len+1); |
| queueCompleteMsg (pmsg); |
| diva_maint_wakeup_read(); |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| } |
| |
| static void DI_deregister (pDbgHandle hDbg) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| dword sec, usec; |
| int i; |
| word size; |
| byte* pmem = NULL; |
| |
| diva_os_get_time (&sec, &usec); |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "read"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "read"); |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].hDbg == hDbg) { |
| diva_dbg_entry_head_t* pmsg; |
| char tmp[256]; |
| int len; |
| |
| clients[i].hDbg = NULL; |
| |
| hDbg->id = -1; |
| hDbg->dbgMask = 0; |
| hDbg->dbg_end = NULL; |
| hDbg->dbg_prt = NULL; |
| hDbg->dbg_irq = NULL; |
| if (hDbg->Version > 0) |
| hDbg->dbg_old = NULL; |
| hDbg->Registered = 0; |
| hDbg->next = NULL; |
| |
| if (clients[i].pIdiLib) { |
| (*(clients[i].pIdiLib->DivaSTraceLibraryFinit))(clients[i].pIdiLib->hLib); |
| clients[i].pIdiLib = NULL; |
| |
| pmem = clients[i].pmem; |
| clients[i].pmem = NULL; |
| } |
| |
| /* |
| Log driver register, MAINT driver ID is '0' |
| */ |
| len = sprintf (tmp, "DIMAINT - drv # %d = '%s' de-registered", |
| i, hDbg->drvName); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)(len+1+sizeof(*pmsg))))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| |
| if (pmsg) { |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_STRING; |
| pmsg->dli = DLI_REG; |
| pmsg->drv_id = 0; /* id 0 - DIMAINT */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = len+1; |
| |
| memcpy (&pmsg[1], tmp, len+1); |
| queueCompleteMsg (pmsg); |
| diva_maint_wakeup_read(); |
| } |
| |
| break; |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "read_ack"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "read_ack"); |
| |
| if (pmem) { |
| diva_os_free (0, pmem); |
| } |
| } |
| |
| static void DI_format_locked (unsigned short id, |
| int type, |
| char *format, |
| va_list argument_list) { |
| DI_format (1, id, type, format, argument_list); |
| } |
| |
| static void DI_format (int do_lock, |
| unsigned short id, |
| int type, |
| char *format, |
| va_list ap) { |
| diva_os_spin_lock_magic_t old_irql; |
| dword sec, usec; |
| diva_dbg_entry_head_t* pmsg = NULL; |
| dword length; |
| word size; |
| static char fmtBuf[MSG_FRAME_MAX_SIZE+sizeof(*pmsg)+1]; |
| char *data; |
| unsigned short code; |
| |
| if (diva_os_in_irq()) { |
| dbg_sequence++; |
| return; |
| } |
| |
| if ((!format) || |
| ((TraceFilter[0] != 0) && ((TraceFilterIdent < 0) || (TraceFilterChannel < 0)))) { |
| return; |
| } |
| |
| |
| |
| diva_os_get_time (&sec, &usec); |
| |
| if (do_lock) { |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "format"); |
| } |
| |
| switch (type) { |
| case DLI_MXLOG : |
| case DLI_BLK : |
| case DLI_SEND: |
| case DLI_RECV: |
| if (!(length = va_arg(ap, unsigned long))) { |
| break; |
| } |
| if (length > MaxDumpSize) { |
| length = MaxDumpSize; |
| } |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)length+sizeof(*pmsg)))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| if (pmsg) { |
| memcpy (&pmsg[1], format, length); |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_BINARY ; |
| pmsg->dli = type; /* DLI_XXX */ |
| pmsg->drv_id = id; /* driver MAINT id */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = length; |
| queueCompleteMsg (pmsg); |
| } |
| break; |
| |
| case DLI_XLOG: { |
| byte* p; |
| data = va_arg(ap, char*); |
| code = (unsigned short)va_arg(ap, unsigned int); |
| length = (unsigned long) va_arg(ap, unsigned int); |
| |
| if (length > MaxXlogSize) |
| length = MaxXlogSize; |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)length+sizeof(*pmsg)+2))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| if (pmsg) { |
| p = (byte*)&pmsg[1]; |
| p[0] = (char)(code) ; |
| p[1] = (char)(code >> 8) ; |
| if (data && length) { |
| memcpy (&p[2], &data[0], length) ; |
| } |
| length += 2 ; |
| |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_BINARY ; |
| pmsg->dli = type; /* DLI_XXX */ |
| pmsg->drv_id = id; /* driver MAINT id */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = length; |
| queueCompleteMsg (pmsg); |
| } |
| } break; |
| |
| case DLI_LOG : |
| case DLI_FTL : |
| case DLI_ERR : |
| case DLI_TRC : |
| case DLI_REG : |
| case DLI_MEM : |
| case DLI_SPL : |
| case DLI_IRP : |
| case DLI_TIM : |
| case DLI_TAPI: |
| case DLI_NDIS: |
| case DLI_CONN: |
| case DLI_STAT: |
| case DLI_PRV0: |
| case DLI_PRV1: |
| case DLI_PRV2: |
| case DLI_PRV3: |
| if ((length = (unsigned long)vsprintf (&fmtBuf[0], format, ap)) > 0) { |
| length += (sizeof(*pmsg)+1); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)length))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_STRING; |
| pmsg->dli = type; /* DLI_XXX */ |
| pmsg->drv_id = id; /* driver MAINT id */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = length - sizeof(*pmsg); |
| |
| memcpy (&pmsg[1], fmtBuf, pmsg->data_length); |
| queueCompleteMsg (pmsg); |
| } |
| break; |
| |
| } /* switch type */ |
| |
| |
| if (queueCount(dbg_queue)) { |
| diva_maint_wakeup_read(); |
| } |
| |
| if (do_lock) { |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "format"); |
| } |
| } |
| |
| /* |
| Write driver ID and driver revision to callers buffer |
| */ |
| int diva_get_driver_info (dword id, byte* data, int data_length) { |
| diva_os_spin_lock_magic_t old_irql; |
| byte* p = data; |
| int to_copy; |
| |
| if (!data || !id || (data_length < 17) || |
| (id >= ARRAY_SIZE(clients))) { |
| return (-1); |
| } |
| |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "driver info"); |
| |
| if (clients[id].hDbg) { |
| *p++ = 1; |
| *p++ = (byte)clients[id].sec; /* save seconds */ |
| *p++ = (byte)(clients[id].sec >> 8); |
| *p++ = (byte)(clients[id].sec >> 16); |
| *p++ = (byte)(clients[id].sec >> 24); |
| |
| *p++ = (byte)(clients[id].usec/1000); /* save mseconds */ |
| *p++ = (byte)((clients[id].usec/1000) >> 8); |
| *p++ = (byte)((clients[id].usec/1000) >> 16); |
| *p++ = (byte)((clients[id].usec/1000) >> 24); |
| |
| data_length -= 9; |
| |
| if ((to_copy = min(strlen(clients[id].drvName), (size_t)(data_length-1)))) { |
| memcpy (p, clients[id].drvName, to_copy); |
| p += to_copy; |
| data_length -= to_copy; |
| if ((data_length >= 4) && clients[id].hDbg->drvTag[0]) { |
| *p++ = '('; |
| data_length -= 1; |
| if ((to_copy = min(strlen(clients[id].hDbg->drvTag), (size_t)(data_length-2)))) { |
| memcpy (p, clients[id].hDbg->drvTag, to_copy); |
| p += to_copy; |
| data_length -= to_copy; |
| if (data_length >= 2) { |
| *p++ = ')'; |
| data_length--; |
| } |
| } |
| } |
| } |
| } |
| *p++ = 0; |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "driver info"); |
| |
| return (p - data); |
| } |
| |
| int diva_get_driver_dbg_mask (dword id, byte* data) { |
| diva_os_spin_lock_magic_t old_irql; |
| int ret = -1; |
| |
| if (!data || !id || (id >= ARRAY_SIZE(clients))) { |
| return (-1); |
| } |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "driver info"); |
| |
| if (clients[id].hDbg) { |
| ret = 4; |
| *data++= (byte)(clients[id].hDbg->dbgMask); |
| *data++= (byte)(clients[id].hDbg->dbgMask >> 8); |
| *data++= (byte)(clients[id].hDbg->dbgMask >> 16); |
| *data++= (byte)(clients[id].hDbg->dbgMask >> 24); |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "driver info"); |
| |
| return (ret); |
| } |
| |
| int diva_set_driver_dbg_mask (dword id, dword mask) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| int ret = -1; |
| |
| |
| if (!id || (id >= ARRAY_SIZE(clients))) { |
| return (-1); |
| } |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "dbg mask"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "dbg mask"); |
| |
| if (clients[id].hDbg) { |
| dword old_mask = clients[id].hDbg->dbgMask; |
| mask &= 0x7fffffff; |
| clients[id].hDbg->dbgMask = mask; |
| clients[id].last_dbgMask = (clients[id].hDbg->dbgMask | clients[id].dbgMask); |
| ret = 4; |
| diva_change_management_debug_mask (&clients[id], old_mask); |
| } |
| |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "dbg mask"); |
| |
| if (clients[id].request_pending) { |
| clients[id].request_pending = 0; |
| (*(clients[id].request))((ENTITY*)(*(clients[id].pIdiLib->DivaSTraceGetHandle))(clients[id].pIdiLib->hLib)); |
| } |
| |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "dbg mask"); |
| |
| return (ret); |
| } |
| |
| static int diva_get_idi_adapter_info (IDI_CALL request, dword* serial, dword* logical) { |
| IDI_SYNC_REQ sync_req; |
| |
| sync_req.xdi_logical_adapter_number.Req = 0; |
| sync_req.xdi_logical_adapter_number.Rc = IDI_SYNC_REQ_XDI_GET_LOGICAL_ADAPTER_NUMBER; |
| (*request)((ENTITY *)&sync_req); |
| *logical = sync_req.xdi_logical_adapter_number.info.logical_adapter_number; |
| |
| sync_req.GetSerial.Req = 0; |
| sync_req.GetSerial.Rc = IDI_SYNC_REQ_GET_SERIAL; |
| sync_req.GetSerial.serial = 0; |
| (*request)((ENTITY *)&sync_req); |
| *serial = sync_req.GetSerial.serial; |
| |
| return (0); |
| } |
| |
| /* |
| Register XDI adapter as MAINT compatible driver |
| */ |
| void diva_mnt_add_xdi_adapter (const DESCRIPTOR* d) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| dword sec, usec, logical, serial, org_mask; |
| int id, best_id = 0, free_id = -1; |
| char tmp[256]; |
| diva_dbg_entry_head_t* pmsg = NULL; |
| int len; |
| word size; |
| byte* pmem; |
| |
| diva_os_get_time (&sec, &usec); |
| diva_get_idi_adapter_info (d->request, &serial, &logical); |
| if (serial & 0xff000000) { |
| sprintf (tmp, "ADAPTER:%d SN:%u-%d", |
| (int)logical, |
| serial & 0x00ffffff, |
| (byte)(((serial & 0xff000000) >> 24) + 1)); |
| } else { |
| sprintf (tmp, "ADAPTER:%d SN:%u", (int)logical, serial); |
| } |
| |
| if (!(pmem = diva_os_malloc (0, DivaSTraceGetMemotyRequirement (d->channels)))) { |
| return; |
| } |
| memset (pmem, 0x00, DivaSTraceGetMemotyRequirement (d->channels)); |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "register"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| |
| for (id = 1; id < ARRAY_SIZE(clients); id++) { |
| if (clients[id].hDbg && (clients[id].request == d->request)) { |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "register"); |
| diva_os_free(0, pmem); |
| return; |
| } |
| if (clients[id].hDbg) { /* slot is busy */ |
| continue; |
| } |
| if (free_id < 0) { |
| free_id = id; |
| } |
| if (!strcmp (clients[id].drvName, tmp)) { |
| /* |
| This driver was already registered with this name |
| and slot is still free - reuse it |
| */ |
| free_id = id; |
| best_id = 1; |
| break; |
| } |
| } |
| |
| if (free_id < 0) { |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "register"); |
| diva_os_free (0, pmem); |
| return; |
| } |
| |
| id = free_id; |
| clients[id].request = d->request; |
| clients[id].request_pending = 0; |
| clients[id].hDbg = &clients[id].Dbg; |
| clients[id].sec = sec; |
| clients[id].usec = usec; |
| strcpy (clients[id].drvName, tmp); |
| strcpy (clients[id].Dbg.drvName, tmp); |
| clients[id].Dbg.drvTag[0] = 0; |
| clients[id].logical = (int)logical; |
| clients[id].channels = (int)d->channels; |
| clients[id].dma_handle = -1; |
| |
| clients[id].Dbg.dbgMask = 0; |
| clients[id].dbgMask = clients[id].Dbg.dbgMask; |
| if (id) { |
| clients[id].Dbg.dbgMask |= clients[free_id].last_dbgMask; |
| } else { |
| clients[id].last_dbgMask = 0; |
| } |
| clients[id].Dbg.Registered = DBG_HANDLE_REG_NEW; |
| clients[id].Dbg.id = (byte)id; |
| clients[id].Dbg.dbg_end = DI_deregister; |
| clients[id].Dbg.dbg_prt = DI_format_locked; |
| clients[id].Dbg.dbg_ev = DiProcessEventLog; |
| clients[id].Dbg.dbg_irq = DI_format_locked; |
| clients[id].Dbg.next = (pDbgHandle)DBG_MAGIC; |
| |
| { |
| diva_trace_library_user_interface_t diva_maint_user_ifc = { &clients[id], |
| diva_maint_state_change_notify, |
| diva_maint_trace_notify, |
| diva_maint_error }; |
| |
| /* |
| Attach to adapter management interface |
| */ |
| if ((clients[id].pIdiLib = |
| DivaSTraceLibraryCreateInstance ((int)logical, &diva_maint_user_ifc, pmem))) { |
| if (((*(clients[id].pIdiLib->DivaSTraceLibraryStart))(clients[id].pIdiLib->hLib))) { |
| diva_mnt_internal_dprintf (0, DLI_ERR, "Adapter(%d) Start failed", (int)logical); |
| (*(clients[id].pIdiLib->DivaSTraceLibraryFinit))(clients[id].pIdiLib->hLib); |
| clients[id].pIdiLib = NULL; |
| } |
| } else { |
| diva_mnt_internal_dprintf (0, DLI_ERR, "A(%d) management init failed", (int)logical); |
| } |
| } |
| |
| if (!clients[id].pIdiLib) { |
| clients[id].request = NULL; |
| clients[id].request_pending = 0; |
| clients[id].hDbg = NULL; |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "register"); |
| diva_os_free (0, pmem); |
| return; |
| } |
| |
| /* |
| Log driver register, MAINT driver ID is '0' |
| */ |
| len = sprintf (tmp, "DIMAINT - drv # %d = '%s' registered", |
| id, clients[id].Dbg.drvName); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)(len+1+sizeof(*pmsg))))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| |
| if (pmsg) { |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_STRING; |
| pmsg->dli = DLI_REG; |
| pmsg->drv_id = 0; /* id 0 - DIMAINT */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = len+1; |
| |
| memcpy (&pmsg[1], tmp, len+1); |
| queueCompleteMsg (pmsg); |
| diva_maint_wakeup_read(); |
| } |
| |
| org_mask = clients[id].Dbg.dbgMask; |
| clients[id].Dbg.dbgMask = 0; |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "register"); |
| |
| if (clients[id].request_pending) { |
| clients[id].request_pending = 0; |
| (*(clients[id].request))((ENTITY*)(*(clients[id].pIdiLib->DivaSTraceGetHandle))(clients[id].pIdiLib->hLib)); |
| } |
| |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "register"); |
| |
| diva_set_driver_dbg_mask (id, org_mask); |
| } |
| |
| /* |
| De-Register XDI adapter |
| */ |
| void diva_mnt_remove_xdi_adapter (const DESCRIPTOR* d) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| dword sec, usec; |
| int i; |
| word size; |
| byte* pmem = NULL; |
| |
| diva_os_get_time (&sec, &usec); |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "read"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "read"); |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].hDbg && (clients[i].request == d->request)) { |
| diva_dbg_entry_head_t* pmsg; |
| char tmp[256]; |
| int len; |
| |
| if (clients[i].pIdiLib) { |
| (*(clients[i].pIdiLib->DivaSTraceLibraryFinit))(clients[i].pIdiLib->hLib); |
| clients[i].pIdiLib = NULL; |
| |
| pmem = clients[i].pmem; |
| clients[i].pmem = NULL; |
| } |
| |
| clients[i].hDbg = NULL; |
| clients[i].request_pending = 0; |
| if (clients[i].dma_handle >= 0) { |
| /* |
| Free DMA handle |
| */ |
| diva_free_dma_descriptor (clients[i].request, clients[i].dma_handle); |
| clients[i].dma_handle = -1; |
| } |
| clients[i].request = NULL; |
| |
| /* |
| Log driver register, MAINT driver ID is '0' |
| */ |
| len = sprintf (tmp, "DIMAINT - drv # %d = '%s' de-registered", |
| i, clients[i].Dbg.drvName); |
| |
| memset (&clients[i].Dbg, 0x00, sizeof(clients[i].Dbg)); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)(len+1+sizeof(*pmsg))))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| |
| if (pmsg) { |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_STRING; |
| pmsg->dli = DLI_REG; |
| pmsg->drv_id = 0; /* id 0 - DIMAINT */ |
| pmsg->di_cpu = 0; |
| pmsg->data_length = len+1; |
| |
| memcpy (&pmsg[1], tmp, len+1); |
| queueCompleteMsg (pmsg); |
| diva_maint_wakeup_read(); |
| } |
| |
| break; |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "read_ack"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "read_ack"); |
| |
| if (pmem) { |
| diva_os_free (0, pmem); |
| } |
| } |
| |
| /* ---------------------------------------------------------------- |
| Low level interface for management interface client |
| ---------------------------------------------------------------- */ |
| /* |
| Return handle to client structure |
| */ |
| void* SuperTraceOpenAdapter (int AdapterNumber) { |
| int i; |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].hDbg && clients[i].request && (clients[i].logical == AdapterNumber)) { |
| return (&clients[i]); |
| } |
| } |
| |
| return NULL; |
| } |
| |
| int SuperTraceCloseAdapter (void* AdapterHandle) { |
| return (0); |
| } |
| |
| int SuperTraceReadRequest (void* AdapterHandle, const char* name, byte* data) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| byte* xdata = (byte*)&pC->xbuffer[0]; |
| char tmp = 0; |
| word length; |
| |
| if (!strcmp(name, "\\")) { /* Read ROOT */ |
| name = &tmp; |
| } |
| length = SuperTraceCreateReadReq (xdata, name); |
| single_p (xdata, &length, 0); /* End Of Message */ |
| |
| e->Req = MAN_READ; |
| e->ReqCh = 0; |
| e->X->PLength = length; |
| e->X->P = (byte*)xdata; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| int SuperTraceGetNumberOfChannels (void* AdapterHandle) { |
| if (AdapterHandle) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| return (pC->channels); |
| } |
| |
| return (0); |
| } |
| |
| int SuperTraceASSIGN (void* AdapterHandle, byte* data) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| IDI_SYNC_REQ* preq; |
| char buffer[((sizeof(preq->xdi_extended_features)+4) > sizeof(ENTITY)) ? (sizeof(preq->xdi_extended_features)+4) : sizeof(ENTITY)]; |
| char features[4]; |
| word assign_data_length = 1; |
| |
| features[0] = 0; |
| pC->xbuffer[0] = 0; |
| preq = (IDI_SYNC_REQ*)&buffer[0]; |
| preq->xdi_extended_features.Req = 0; |
| preq->xdi_extended_features.Rc = IDI_SYNC_REQ_XDI_GET_EXTENDED_FEATURES; |
| preq->xdi_extended_features.info.buffer_length_in_bytes = sizeof(features); |
| preq->xdi_extended_features.info.features = &features[0]; |
| |
| (*(pC->request))((ENTITY*)preq); |
| |
| if ((features[0] & DIVA_XDI_EXTENDED_FEATURES_VALID) && |
| (features[0] & DIVA_XDI_EXTENDED_FEATURE_MANAGEMENT_DMA)) { |
| dword uninitialized_var(rx_dma_magic); |
| if ((pC->dma_handle = diva_get_dma_descriptor (pC->request, &rx_dma_magic)) >= 0) { |
| pC->xbuffer[0] = LLI; |
| pC->xbuffer[1] = 8; |
| pC->xbuffer[2] = 0x40; |
| pC->xbuffer[3] = (byte)pC->dma_handle; |
| pC->xbuffer[4] = (byte)rx_dma_magic; |
| pC->xbuffer[5] = (byte)(rx_dma_magic >> 8); |
| pC->xbuffer[6] = (byte)(rx_dma_magic >> 16); |
| pC->xbuffer[7] = (byte)(rx_dma_magic >> 24); |
| pC->xbuffer[8] = (byte)(DIVA_MAX_MANAGEMENT_TRANSFER_SIZE & 0xFF); |
| pC->xbuffer[9] = (byte)(DIVA_MAX_MANAGEMENT_TRANSFER_SIZE >> 8); |
| pC->xbuffer[10] = 0; |
| |
| assign_data_length = 11; |
| } |
| } else { |
| pC->dma_handle = -1; |
| } |
| |
| e->Id = MAN_ID; |
| e->callback = diva_maint_xdi_cb; |
| e->XNum = 1; |
| e->X = &pC->XData; |
| e->Req = ASSIGN; |
| e->ReqCh = 0; |
| e->X->PLength = assign_data_length; |
| e->X->P = (byte*)&pC->xbuffer[0]; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| int SuperTraceREMOVE (void* AdapterHandle) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| |
| e->XNum = 1; |
| e->X = &pC->XData; |
| e->Req = REMOVE; |
| e->ReqCh = 0; |
| e->X->PLength = 1; |
| e->X->P = (byte*)&pC->xbuffer[0]; |
| pC->xbuffer[0] = 0; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| int SuperTraceTraceOnRequest(void* hAdapter, const char* name, byte* data) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)hAdapter; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| byte* xdata = (byte*)&pC->xbuffer[0]; |
| char tmp = 0; |
| word length; |
| |
| if (!strcmp(name, "\\")) { /* Read ROOT */ |
| name = &tmp; |
| } |
| length = SuperTraceCreateReadReq (xdata, name); |
| single_p (xdata, &length, 0); /* End Of Message */ |
| e->Req = MAN_EVENT_ON; |
| e->ReqCh = 0; |
| e->X->PLength = length; |
| e->X->P = (byte*)xdata; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| int SuperTraceWriteVar (void* AdapterHandle, |
| byte* data, |
| const char* name, |
| void* var, |
| byte type, |
| byte var_length) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| diva_man_var_header_t* pVar = (diva_man_var_header_t*)&pC->xbuffer[0]; |
| word length = SuperTraceCreateReadReq ((byte*)pVar, name); |
| |
| memcpy (&pC->xbuffer[length], var, var_length); |
| length += var_length; |
| pVar->length += var_length; |
| pVar->value_length = var_length; |
| pVar->type = type; |
| single_p ((byte*)pVar, &length, 0); /* End Of Message */ |
| |
| e->Req = MAN_WRITE; |
| e->ReqCh = 0; |
| e->X->PLength = length; |
| e->X->P = (byte*)pVar; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| int SuperTraceExecuteRequest (void* AdapterHandle, |
| const char* name, |
| byte* data) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)AdapterHandle; |
| |
| if (pC && pC->pIdiLib && pC->request) { |
| ENTITY* e = (ENTITY*)(*(pC->pIdiLib->DivaSTraceGetHandle))(pC->pIdiLib->hLib); |
| byte* xdata = (byte*)&pC->xbuffer[0]; |
| word length; |
| |
| length = SuperTraceCreateReadReq (xdata, name); |
| single_p (xdata, &length, 0); /* End Of Message */ |
| |
| e->Req = MAN_EXECUTE; |
| e->ReqCh = 0; |
| e->X->PLength = length; |
| e->X->P = (byte*)xdata; |
| |
| pC->request_pending = 1; |
| |
| return (0); |
| } |
| |
| return (-1); |
| } |
| |
| static word SuperTraceCreateReadReq (byte* P, const char* path) { |
| byte var_length; |
| byte* plen; |
| |
| var_length = (byte)strlen (path); |
| |
| *P++ = ESC; |
| plen = P++; |
| *P++ = 0x80; /* MAN_IE */ |
| *P++ = 0x00; /* Type */ |
| *P++ = 0x00; /* Attribute */ |
| *P++ = 0x00; /* Status */ |
| *P++ = 0x00; /* Variable Length */ |
| *P++ = var_length; |
| memcpy (P, path, var_length); |
| P += var_length; |
| *plen = var_length + 0x06; |
| |
| return ((word)(var_length + 0x08)); |
| } |
| |
| static void single_p (byte * P, word * PLength, byte Id) { |
| P[(*PLength)++] = Id; |
| } |
| |
| static void diva_maint_xdi_cb (ENTITY* e) { |
| diva_strace_context_t* pLib = DIVAS_CONTAINING_RECORD(e,diva_strace_context_t,e); |
| diva_maint_client_t* pC; |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "xdi_cb"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "xdi_cb"); |
| |
| pC = (diva_maint_client_t*)pLib->hAdapter; |
| |
| if ((e->complete == 255) || (pC->dma_handle < 0)) { |
| if ((*(pLib->instance.DivaSTraceMessageInput))(&pLib->instance)) { |
| diva_mnt_internal_dprintf (0, DLI_ERR, "Trace internal library error"); |
| } |
| } else { |
| /* |
| Process combined management interface indication |
| */ |
| if ((*(pLib->instance.DivaSTraceMessageInput))(&pLib->instance)) { |
| diva_mnt_internal_dprintf (0, DLI_ERR, "Trace internal library error (DMA mode)"); |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "xdi_cb"); |
| |
| |
| if (pC->request_pending) { |
| pC->request_pending = 0; |
| (*(pC->request))(e); |
| } |
| |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "xdi_cb"); |
| } |
| |
| |
| static void diva_maint_error (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| int error, |
| const char* file, |
| int line) { |
| diva_mnt_internal_dprintf (0, DLI_ERR, |
| "Trace library error(%d) A(%d) %s %d", error, Adapter, file, line); |
| } |
| |
| static void print_ie (diva_trace_ie_t* ie, char* buffer, int length) { |
| int i; |
| |
| buffer[0] = 0; |
| |
| if (length > 32) { |
| for (i = 0; ((i < ie->length) && (length > 3)); i++) { |
| sprintf (buffer, "%02x", ie->data[i]); |
| buffer += 2; |
| length -= 2; |
| if (i < (ie->length-1)) { |
| strcpy (buffer, " "); |
| buffer++; |
| length--; |
| } |
| } |
| } |
| } |
| |
| static void diva_maint_state_change_notify (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| diva_trace_line_state_t* channel, |
| int notify_subject) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)user_context; |
| diva_trace_fax_state_t* fax = &channel->fax; |
| diva_trace_modem_state_t* modem = &channel->modem; |
| char tmp[256]; |
| |
| if (!pC->hDbg) { |
| return; |
| } |
| |
| switch (notify_subject) { |
| case DIVA_SUPER_TRACE_NOTIFY_LINE_CHANGE: { |
| int view = (TraceFilter[0] == 0); |
| /* |
| Process selective Trace |
| */ |
| if (channel->Line[0] == 'I' && channel->Line[1] == 'd' && |
| channel->Line[2] == 'l' && channel->Line[3] == 'e') { |
| if ((TraceFilterIdent == pC->hDbg->id) && (TraceFilterChannel == (int)channel->ChannelNumber)) { |
| (*(hLib->DivaSTraceSetBChannel))(hLib, (int)channel->ChannelNumber, 0); |
| (*(hLib->DivaSTraceSetAudioTap))(hLib, (int)channel->ChannelNumber, 0); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, "Selective Trace OFF for Ch=%d", |
| (int)channel->ChannelNumber); |
| TraceFilterIdent = -1; |
| TraceFilterChannel = -1; |
| view = 1; |
| } |
| } else if (TraceFilter[0] && (TraceFilterIdent < 0) && !(diva_mnt_cmp_nmbr (&channel->RemoteAddress[0]) && |
| diva_mnt_cmp_nmbr (&channel->LocalAddress[0]))) { |
| |
| if ((pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_BCHANNEL) != 0) { /* Activate B-channel trace */ |
| (*(hLib->DivaSTraceSetBChannel))(hLib, (int)channel->ChannelNumber, 1); |
| } |
| if ((pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_AUDIO) != 0) { /* Activate AudioTap Trace */ |
| (*(hLib->DivaSTraceSetAudioTap))(hLib, (int)channel->ChannelNumber, 1); |
| } |
| |
| TraceFilterIdent = pC->hDbg->id; |
| TraceFilterChannel = (int)channel->ChannelNumber; |
| |
| if (TraceFilterIdent >= 0) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, "Selective Trace ON for Ch=%d", |
| (int)channel->ChannelNumber); |
| view = 1; |
| } |
| } |
| if (view && (pC->hDbg->dbgMask & DIVA_MGT_DBG_LINE_EVENTS)) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Ch = %d", |
| (int)channel->ChannelNumber); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Status = <%s>", &channel->Line[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Layer1 = <%s>", &channel->Framing[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Layer2 = <%s>", &channel->Layer2[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Layer3 = <%s>", &channel->Layer3[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L RAddr = <%s>", |
| &channel->RemoteAddress[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L RSAddr = <%s>", |
| &channel->RemoteSubAddress[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L LAddr = <%s>", |
| &channel->LocalAddress[0]); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L LSAddr = <%s>", |
| &channel->LocalSubAddress[0]); |
| print_ie(&channel->call_BC, tmp, sizeof(tmp)); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L BC = <%s>", tmp); |
| print_ie(&channel->call_HLC, tmp, sizeof(tmp)); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L HLC = <%s>", tmp); |
| print_ie(&channel->call_LLC, tmp, sizeof(tmp)); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L LLC = <%s>", tmp); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L CR = 0x%x", channel->CallReference); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Disc = 0x%x", |
| channel->LastDisconnecCause); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, "L Owner = <%s>", &channel->UserID[0]); |
| } |
| |
| } break; |
| |
| case DIVA_SUPER_TRACE_NOTIFY_MODEM_CHANGE: |
| if (pC->hDbg->dbgMask & DIVA_MGT_DBG_MDM_PROGRESS) { |
| { |
| int ch = TraceFilterChannel; |
| int id = TraceFilterIdent; |
| |
| if ((id >= 0) && (ch >= 0) && (id < ARRAY_SIZE(clients)) && |
| (clients[id].Dbg.id == (byte)id) && (clients[id].pIdiLib == hLib)) { |
| if (ch != (int)modem->ChannelNumber) { |
| break; |
| } |
| } else if (TraceFilter[0] != 0) { |
| break; |
| } |
| } |
| |
| |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Ch = %lu", |
| (int)modem->ChannelNumber); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Event = %lu", modem->Event); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Norm = %lu", modem->Norm); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Opts. = 0x%08x", modem->Options); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Tx = %lu Bps", modem->TxSpeed); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Rx = %lu Bps", modem->RxSpeed); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM RT = %lu mSec", |
| modem->RoundtripMsec); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Sr = %lu", modem->SymbolRate); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM Rxl = %d dBm", modem->RxLeveldBm); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM El = %d dBm", modem->EchoLeveldBm); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM SNR = %lu dB", modem->SNRdb); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM MAE = %lu", modem->MAE); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM LRet = %lu", |
| modem->LocalRetrains); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM RRet = %lu", |
| modem->RemoteRetrains); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM LRes = %lu", modem->LocalResyncs); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "MDM RRes = %lu", |
| modem->RemoteResyncs); |
| if (modem->Event == 3) { |
| diva_mnt_internal_dprintf(pC->hDbg->id,DLI_STAT,"MDM Disc = %lu", modem->DiscReason); |
| } |
| } |
| if ((modem->Event == 3) && (pC->hDbg->dbgMask & DIVA_MGT_DBG_MDM_STATISTICS)) { |
| (*(pC->pIdiLib->DivaSTraceGetModemStatistics))(pC->pIdiLib); |
| } |
| break; |
| |
| case DIVA_SUPER_TRACE_NOTIFY_FAX_CHANGE: |
| if (pC->hDbg->dbgMask & DIVA_MGT_DBG_FAX_PROGRESS) { |
| { |
| int ch = TraceFilterChannel; |
| int id = TraceFilterIdent; |
| |
| if ((id >= 0) && (ch >= 0) && (id < ARRAY_SIZE(clients)) && |
| (clients[id].Dbg.id == (byte)id) && (clients[id].pIdiLib == hLib)) { |
| if (ch != (int)fax->ChannelNumber) { |
| break; |
| } |
| } else if (TraceFilter[0] != 0) { |
| break; |
| } |
| } |
| |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Ch = %lu",(int)fax->ChannelNumber); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Event = %lu", fax->Event); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Pages = %lu", fax->Page_Counter); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Feat. = 0x%08x", fax->Features); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX ID = <%s>", &fax->Station_ID[0]); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Saddr = <%s>", &fax->Subaddress[0]); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Pwd = <%s>", &fax->Password[0]); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Speed = %lu", fax->Speed); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Res. = 0x%08x", fax->Resolution); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Width = %lu", fax->Paper_Width); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Length= %lu", fax->Paper_Length); |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX SLT = %lu", fax->Scanline_Time); |
| if (fax->Event == 3) { |
| diva_mnt_internal_dprintf(pC->hDbg->id, DLI_STAT, "FAX Disc = %lu", fax->Disc_Reason); |
| } |
| } |
| if ((fax->Event == 3) && (pC->hDbg->dbgMask & DIVA_MGT_DBG_FAX_STATISTICS)) { |
| (*(pC->pIdiLib->DivaSTraceGetFaxStatistics))(pC->pIdiLib); |
| } |
| break; |
| |
| case DIVA_SUPER_TRACE_INTERFACE_CHANGE: |
| if (pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_EVENTS) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, |
| "Layer 1 -> [%s]", channel->pInterface->Layer1); |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_STAT, |
| "Layer 2 -> [%s]", channel->pInterface->Layer2); |
| } |
| break; |
| |
| case DIVA_SUPER_TRACE_NOTIFY_STAT_CHANGE: |
| if (pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_STATISTICS) { |
| /* |
| Incoming Statistics |
| */ |
| if (channel->pInterfaceStat->inc.Calls) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Calls =%lu", channel->pInterfaceStat->inc.Calls); |
| } |
| if (channel->pInterfaceStat->inc.Connected) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Connected =%lu", channel->pInterfaceStat->inc.Connected); |
| } |
| if (channel->pInterfaceStat->inc.User_Busy) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Busy =%lu", channel->pInterfaceStat->inc.User_Busy); |
| } |
| if (channel->pInterfaceStat->inc.Call_Rejected) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Rejected =%lu", channel->pInterfaceStat->inc.Call_Rejected); |
| } |
| if (channel->pInterfaceStat->inc.Wrong_Number) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Wrong Nr =%lu", channel->pInterfaceStat->inc.Wrong_Number); |
| } |
| if (channel->pInterfaceStat->inc.Incompatible_Dst) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Incomp. Dest =%lu", channel->pInterfaceStat->inc.Incompatible_Dst); |
| } |
| if (channel->pInterfaceStat->inc.Out_of_Order) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Out of Order =%lu", channel->pInterfaceStat->inc.Out_of_Order); |
| } |
| if (channel->pInterfaceStat->inc.Ignored) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Inc Ignored =%lu", channel->pInterfaceStat->inc.Ignored); |
| } |
| |
| /* |
| Outgoing Statistics |
| */ |
| if (channel->pInterfaceStat->outg.Calls) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Calls =%lu", channel->pInterfaceStat->outg.Calls); |
| } |
| if (channel->pInterfaceStat->outg.Connected) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Connected =%lu", channel->pInterfaceStat->outg.Connected); |
| } |
| if (channel->pInterfaceStat->outg.User_Busy) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Busy =%lu", channel->pInterfaceStat->outg.User_Busy); |
| } |
| if (channel->pInterfaceStat->outg.No_Answer) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg No Answer =%lu", channel->pInterfaceStat->outg.No_Answer); |
| } |
| if (channel->pInterfaceStat->outg.Wrong_Number) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Wrong Nr =%lu", channel->pInterfaceStat->outg.Wrong_Number); |
| } |
| if (channel->pInterfaceStat->outg.Call_Rejected) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Rejected =%lu", channel->pInterfaceStat->outg.Call_Rejected); |
| } |
| if (channel->pInterfaceStat->outg.Other_Failures) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "Outg Other Failures =%lu", channel->pInterfaceStat->outg.Other_Failures); |
| } |
| } |
| break; |
| |
| case DIVA_SUPER_TRACE_NOTIFY_MDM_STAT_CHANGE: |
| if (channel->pInterfaceStat->mdm.Disc_Normal) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Normal = %lu", channel->pInterfaceStat->mdm.Disc_Normal); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Unspecified) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Unsp. = %lu", channel->pInterfaceStat->mdm.Disc_Unspecified); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Busy_Tone) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Busy Tone = %lu", channel->pInterfaceStat->mdm.Disc_Busy_Tone); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Congestion) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Congestion = %lu", channel->pInterfaceStat->mdm.Disc_Congestion); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Carr_Wait) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Carrier Wait = %lu", channel->pInterfaceStat->mdm.Disc_Carr_Wait); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Trn_Timeout) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Trn. T.o. = %lu", channel->pInterfaceStat->mdm.Disc_Trn_Timeout); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Incompat) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Incompatible = %lu", channel->pInterfaceStat->mdm.Disc_Incompat); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_Frame_Rej) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc Frame Reject = %lu", channel->pInterfaceStat->mdm.Disc_Frame_Rej); |
| } |
| if (channel->pInterfaceStat->mdm.Disc_V42bis) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "MDM Disc V.42bis = %lu", channel->pInterfaceStat->mdm.Disc_V42bis); |
| } |
| break; |
| |
| case DIVA_SUPER_TRACE_NOTIFY_FAX_STAT_CHANGE: |
| if (channel->pInterfaceStat->fax.Disc_Normal) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Normal = %lu", channel->pInterfaceStat->fax.Disc_Normal); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Not_Ident) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Not Ident. = %lu", channel->pInterfaceStat->fax.Disc_Not_Ident); |
| } |
| if (channel->pInterfaceStat->fax.Disc_No_Response) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc No Response = %lu", channel->pInterfaceStat->fax.Disc_No_Response); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Retries) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Max Retries = %lu", channel->pInterfaceStat->fax.Disc_Retries); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Unexp_Msg) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Unexp. Msg. = %lu", channel->pInterfaceStat->fax.Disc_Unexp_Msg); |
| } |
| if (channel->pInterfaceStat->fax.Disc_No_Polling) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc No Polling = %lu", channel->pInterfaceStat->fax.Disc_No_Polling); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Training) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Training = %lu", channel->pInterfaceStat->fax.Disc_Training); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Unexpected) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Unexpected = %lu", channel->pInterfaceStat->fax.Disc_Unexpected); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Application) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Application = %lu", channel->pInterfaceStat->fax.Disc_Application); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Incompat) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Incompatible = %lu", channel->pInterfaceStat->fax.Disc_Incompat); |
| } |
| if (channel->pInterfaceStat->fax.Disc_No_Command) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc No Command = %lu", channel->pInterfaceStat->fax.Disc_No_Command); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Long_Msg) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Long Msg. = %lu", channel->pInterfaceStat->fax.Disc_Long_Msg); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Supervisor) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Supervisor = %lu", channel->pInterfaceStat->fax.Disc_Supervisor); |
| } |
| if (channel->pInterfaceStat->fax.Disc_SUB_SEP_PWD) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc SUP SEP PWD = %lu", channel->pInterfaceStat->fax.Disc_SUB_SEP_PWD); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Invalid_Msg) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Invalid Msg. = %lu", channel->pInterfaceStat->fax.Disc_Invalid_Msg); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Page_Coding) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Page Coding = %lu", channel->pInterfaceStat->fax.Disc_Page_Coding); |
| } |
| if (channel->pInterfaceStat->fax.Disc_App_Timeout) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Appl. T.o. = %lu", channel->pInterfaceStat->fax.Disc_App_Timeout); |
| } |
| if (channel->pInterfaceStat->fax.Disc_Unspecified) { |
| diva_mnt_internal_dprintf (pC->hDbg->id, DLI_LOG, |
| "FAX Disc Unspec. = %lu", channel->pInterfaceStat->fax.Disc_Unspecified); |
| } |
| break; |
| } |
| } |
| |
| /* |
| Receive trace information from the Management Interface and store it in the |
| internal trace buffer with MSG_TYPE_MLOG as is, without any filtering. |
| Event Filtering and formatting is done in Management Interface self. |
| */ |
| static void diva_maint_trace_notify (void* user_context, |
| diva_strace_library_interface_t* hLib, |
| int Adapter, |
| void* xlog_buffer, |
| int length) { |
| diva_maint_client_t* pC = (diva_maint_client_t*)user_context; |
| diva_dbg_entry_head_t* pmsg; |
| word size; |
| dword sec, usec; |
| int ch = TraceFilterChannel; |
| int id = TraceFilterIdent; |
| |
| /* |
| Selective trace |
| */ |
| if ((id >= 0) && (ch >= 0) && (id < ARRAY_SIZE(clients)) && |
| (clients[id].Dbg.id == (byte)id) && (clients[id].pIdiLib == hLib)) { |
| const char* p = NULL; |
| int ch_value = -1; |
| MI_XLOG_HDR *TrcData = (MI_XLOG_HDR *)xlog_buffer; |
| |
| if (Adapter != clients[id].logical) { |
| return; /* Ignore all trace messages from other adapters */ |
| } |
| |
| if (TrcData->code == 24) { |
| p = (char*)&TrcData->code; |
| p += 2; |
| } |
| |
| /* |
| All L1 messages start as [dsp,ch], so we can filter this information |
| and filter out all messages that use different channel |
| */ |
| if (p && p[0] == '[') { |
| if (p[2] == ',') { |
| p += 3; |
| ch_value = *p - '0'; |
| } else if (p[3] == ',') { |
| p += 4; |
| ch_value = *p - '0'; |
| } |
| if (ch_value >= 0) { |
| if (p[2] == ']') { |
| ch_value = ch_value * 10 + p[1] - '0'; |
| } |
| if (ch_value != ch) { |
| return; /* Ignore other channels */ |
| } |
| } |
| } |
| |
| } else if (TraceFilter[0] != 0) { |
| return; /* Ignore trace if trace filter is activated, but idle */ |
| } |
| |
| diva_os_get_time (&sec, &usec); |
| |
| while (!(pmsg = (diva_dbg_entry_head_t*)queueAllocMsg (dbg_queue, |
| (word)length+sizeof(*pmsg)))) { |
| if ((pmsg = (diva_dbg_entry_head_t*)queuePeekMsg (dbg_queue, &size))) { |
| queueFreeMsg (dbg_queue); |
| } else { |
| break; |
| } |
| } |
| if (pmsg) { |
| memcpy (&pmsg[1], xlog_buffer, length); |
| pmsg->sequence = dbg_sequence++; |
| pmsg->time_sec = sec; |
| pmsg->time_usec = usec; |
| pmsg->facility = MSG_TYPE_MLOG; |
| pmsg->dli = pC->logical; |
| pmsg->drv_id = pC->hDbg->id; |
| pmsg->di_cpu = 0; |
| pmsg->data_length = length; |
| queueCompleteMsg (pmsg); |
| if (queueCount(dbg_queue)) { |
| diva_maint_wakeup_read(); |
| } |
| } |
| } |
| |
| |
| /* |
| Convert MAINT trace mask to management interface trace mask/work/facility and |
| issue command to management interface |
| */ |
| static void diva_change_management_debug_mask (diva_maint_client_t* pC, dword old_mask) { |
| if (pC->request && pC->hDbg && pC->pIdiLib) { |
| dword changed = pC->hDbg->dbgMask ^ old_mask; |
| |
| if (changed & DIVA_MGT_DBG_TRACE) { |
| (*(pC->pIdiLib->DivaSTraceSetInfo))(pC->pIdiLib, |
| (pC->hDbg->dbgMask & DIVA_MGT_DBG_TRACE) != 0); |
| } |
| if (changed & DIVA_MGT_DBG_DCHAN) { |
| (*(pC->pIdiLib->DivaSTraceSetDChannel))(pC->pIdiLib, |
| (pC->hDbg->dbgMask & DIVA_MGT_DBG_DCHAN) != 0); |
| } |
| if (!TraceFilter[0]) { |
| if (changed & DIVA_MGT_DBG_IFC_BCHANNEL) { |
| int i, state = ((pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_BCHANNEL) != 0); |
| |
| for (i = 0; i < pC->channels; i++) { |
| (*(pC->pIdiLib->DivaSTraceSetBChannel))(pC->pIdiLib, i+1, state); |
| } |
| } |
| if (changed & DIVA_MGT_DBG_IFC_AUDIO) { |
| int i, state = ((pC->hDbg->dbgMask & DIVA_MGT_DBG_IFC_AUDIO) != 0); |
| |
| for (i = 0; i < pC->channels; i++) { |
| (*(pC->pIdiLib->DivaSTraceSetAudioTap))(pC->pIdiLib, i+1, state); |
| } |
| } |
| } |
| } |
| } |
| |
| |
| void diva_mnt_internal_dprintf (dword drv_id, dword type, char* fmt, ...) { |
| va_list ap; |
| |
| va_start(ap, fmt); |
| DI_format (0, (word)drv_id, (int)type, fmt, ap); |
| va_end(ap); |
| } |
| |
| /* |
| Shutdown all adapters before driver removal |
| */ |
| int diva_mnt_shutdown_xdi_adapters (void) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| int i, fret = 0; |
| byte * pmem; |
| |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| pmem = NULL; |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "unload"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "unload"); |
| |
| if (clients[i].hDbg && clients[i].pIdiLib && clients[i].request) { |
| if ((*(clients[i].pIdiLib->DivaSTraceLibraryStop))(clients[i].pIdiLib) == 1) { |
| /* |
| Adapter removal complete |
| */ |
| if (clients[i].pIdiLib) { |
| (*(clients[i].pIdiLib->DivaSTraceLibraryFinit))(clients[i].pIdiLib->hLib); |
| clients[i].pIdiLib = NULL; |
| |
| pmem = clients[i].pmem; |
| clients[i].pmem = NULL; |
| } |
| clients[i].hDbg = NULL; |
| clients[i].request_pending = 0; |
| |
| if (clients[i].dma_handle >= 0) { |
| /* |
| Free DMA handle |
| */ |
| diva_free_dma_descriptor (clients[i].request, clients[i].dma_handle); |
| clients[i].dma_handle = -1; |
| } |
| clients[i].request = NULL; |
| } else { |
| fret = -1; |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "unload"); |
| if (clients[i].hDbg && clients[i].pIdiLib && clients[i].request && clients[i].request_pending) { |
| clients[i].request_pending = 0; |
| (*(clients[i].request))((ENTITY*)(*(clients[i].pIdiLib->DivaSTraceGetHandle))(clients[i].pIdiLib->hLib)); |
| if (clients[i].dma_handle >= 0) { |
| diva_free_dma_descriptor (clients[i].request, clients[i].dma_handle); |
| clients[i].dma_handle = -1; |
| } |
| } |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "unload"); |
| |
| if (pmem) { |
| diva_os_free (0, pmem); |
| } |
| } |
| |
| return (fret); |
| } |
| |
| /* |
| Set/Read the trace filter used for selective tracing. |
| Affects B- and Audio Tap trace mask at run time |
| */ |
| int diva_set_trace_filter (int filter_length, const char* filter) { |
| diva_os_spin_lock_magic_t old_irql, old_irql1; |
| int i, ch, on, client_b_on, client_atap_on; |
| |
| diva_os_enter_spin_lock (&dbg_adapter_lock, &old_irql1, "dbg mask"); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "write_filter"); |
| |
| if (filter_length <= DIVA_MAX_SELECTIVE_FILTER_LENGTH) { |
| memcpy (&TraceFilter[0], filter, filter_length); |
| if (TraceFilter[filter_length]) { |
| TraceFilter[filter_length] = 0; |
| } |
| if (TraceFilter[0] == '*') { |
| TraceFilter[0] = 0; |
| } |
| } else { |
| filter_length = -1; |
| } |
| |
| TraceFilterIdent = -1; |
| TraceFilterChannel = -1; |
| |
| on = (TraceFilter[0] == 0); |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].hDbg && clients[i].pIdiLib && clients[i].request) { |
| client_b_on = on && ((clients[i].hDbg->dbgMask & DIVA_MGT_DBG_IFC_BCHANNEL) != 0); |
| client_atap_on = on && ((clients[i].hDbg->dbgMask & DIVA_MGT_DBG_IFC_AUDIO) != 0); |
| for (ch = 0; ch < clients[i].channels; ch++) { |
| (*(clients[i].pIdiLib->DivaSTraceSetBChannel))(clients[i].pIdiLib->hLib, ch+1, client_b_on); |
| (*(clients[i].pIdiLib->DivaSTraceSetAudioTap))(clients[i].pIdiLib->hLib, ch+1, client_atap_on); |
| } |
| } |
| } |
| |
| for (i = 1; i < ARRAY_SIZE(clients); i++) { |
| if (clients[i].hDbg && clients[i].pIdiLib && clients[i].request && clients[i].request_pending) { |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "write_filter"); |
| clients[i].request_pending = 0; |
| (*(clients[i].request))((ENTITY*)(*(clients[i].pIdiLib->DivaSTraceGetHandle))(clients[i].pIdiLib->hLib)); |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "write_filter"); |
| } |
| } |
| |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "write_filter"); |
| diva_os_leave_spin_lock (&dbg_adapter_lock, &old_irql1, "dbg mask"); |
| |
| return (filter_length); |
| } |
| |
| int diva_get_trace_filter (int max_length, char* filter) { |
| diva_os_spin_lock_magic_t old_irql; |
| int len; |
| |
| diva_os_enter_spin_lock (&dbg_q_lock, &old_irql, "read_filter"); |
| len = strlen (&TraceFilter[0]) + 1; |
| if (max_length >= len) { |
| memcpy (filter, &TraceFilter[0], len); |
| } |
| diva_os_leave_spin_lock (&dbg_q_lock, &old_irql, "read_filter"); |
| |
| return (len); |
| } |
| |
| static int diva_dbg_cmp_key (const char* ref, const char* key) { |
| while (*key && (*ref++ == *key++)); |
| return (!*key && !*ref); |
| } |
| |
| /* |
| In case trace filter starts with "C" character then |
| all following characters are interpreted as command. |
| Followings commands are available: |
| - single, trace single call at time, independent from CPN/CiPN |
| */ |
| static int diva_mnt_cmp_nmbr (const char* nmbr) { |
| const char* ref = &TraceFilter[0]; |
| int ref_len = strlen(&TraceFilter[0]), nmbr_len = strlen(nmbr); |
| |
| if (ref[0] == 'C') { |
| if (diva_dbg_cmp_key (&ref[1], "single")) { |
| return (0); |
| } |
| return (-1); |
| } |
| |
| if (!ref_len || (ref_len > nmbr_len)) { |
| return (-1); |
| } |
| |
| nmbr = nmbr + nmbr_len - 1; |
| ref = ref + ref_len - 1; |
| |
| while (ref_len--) { |
| if (*nmbr-- != *ref--) { |
| return (-1); |
| } |
| } |
| |
| return (0); |
| } |
| |
| static int diva_get_dma_descriptor (IDI_CALL request, dword *dma_magic) { |
| ENTITY e; |
| IDI_SYNC_REQ* pReq = (IDI_SYNC_REQ*)&e; |
| |
| if (!request) { |
| return (-1); |
| } |
| |
| pReq->xdi_dma_descriptor_operation.Req = 0; |
| pReq->xdi_dma_descriptor_operation.Rc = IDI_SYNC_REQ_DMA_DESCRIPTOR_OPERATION; |
| |
| pReq->xdi_dma_descriptor_operation.info.operation = IDI_SYNC_REQ_DMA_DESCRIPTOR_ALLOC; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_number = -1; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_address = NULL; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_magic = 0; |
| |
| (*request)((ENTITY*)pReq); |
| |
| if (!pReq->xdi_dma_descriptor_operation.info.operation && |
| (pReq->xdi_dma_descriptor_operation.info.descriptor_number >= 0) && |
| pReq->xdi_dma_descriptor_operation.info.descriptor_magic) { |
| *dma_magic = pReq->xdi_dma_descriptor_operation.info.descriptor_magic; |
| return (pReq->xdi_dma_descriptor_operation.info.descriptor_number); |
| } else { |
| return (-1); |
| } |
| } |
| |
| static void diva_free_dma_descriptor (IDI_CALL request, int nr) { |
| ENTITY e; |
| IDI_SYNC_REQ* pReq = (IDI_SYNC_REQ*)&e; |
| |
| if (!request || (nr < 0)) { |
| return; |
| } |
| |
| pReq->xdi_dma_descriptor_operation.Req = 0; |
| pReq->xdi_dma_descriptor_operation.Rc = IDI_SYNC_REQ_DMA_DESCRIPTOR_OPERATION; |
| |
| pReq->xdi_dma_descriptor_operation.info.operation = IDI_SYNC_REQ_DMA_DESCRIPTOR_FREE; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_number = nr; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_address = NULL; |
| pReq->xdi_dma_descriptor_operation.info.descriptor_magic = 0; |
| |
| (*request)((ENTITY*)pReq); |
| } |
| |