FreeCalypso > hg > fc-tourmaline
view src/nucleus/csc.c @ 303:f76436d19a7a default tip
!GPRS config: fix long-standing AT+COPS chance hanging bug
There has been a long-standing bug in FreeCalypso going back years:
sometimes in the AT command bring-up sequence of an ACI-only MS,
the AT+COPS command would produce only a power scan followed by
cessation of protocol stack activity (only L1 ADC traces), instead
of the expected network search sequence. This behaviour was seen
in different FC firmware versions going back to Citrine, and seemed
to follow some law of chance, not reliably repeatable.
This bug has been tracked down and found to be specific to !GPRS
configuration, stemming from our TCS2/TCS3 hybrid and reconstruction
of !GPRS support that was bitrotten in TCS3.2/LoCosto version.
ACI module psa_mms.c, needed only for !GPRS, was missing in the TCS3
version and had to be pulled from TCS2 - but as it turns out,
there is a new field in the MMR_REG_REQ primitive that needs to be
set correctly, and that psa_mms.c module is the place where this
initialization needed to be added.
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Thu, 08 Jun 2023 08:23:37 +0000 |
| parents | 4e78acac3d88 |
| children |
line wrap: on
line source
/*************************************************************************/ /* */ /* Copyright Mentor Graphics Corporation 2002 */ /* All Rights Reserved. */ /* */ /* THIS WORK CONTAINS TRADE SECRET AND PROPRIETARY INFORMATION WHICH IS */ /* THE PROPERTY OF MENTOR GRAPHICS CORPORATION OR ITS LICENSORS AND IS */ /* SUBJECT TO LICENSE TERMS. */ /* */ /*************************************************************************/ /*************************************************************************/ /* */ /* FILE NAME VERSION */ /* */ /* csc.c Nucleus PLUS 1.14 */ /* */ /* COMPONENT */ /* */ /* CS - Common Services */ /* */ /* DESCRIPTION */ /* */ /* This file contains linked list manipulation facilities used */ /* throughout the Nucleus PLUS system. These facilities operate */ /* on doubly-linked circular lists. */ /* */ /* DATA STRUCTURES */ /* */ /* None */ /* */ /* FUNCTIONS */ /* */ /* CSC_Place_On_List Place node at the end of a */ /* list */ /* CSC_Priority_Place_On_List Place node in priority order */ /* on a list */ /* CSC_Remove_From_List Remove a node from a list */ /* */ /* DEPENDENCIES */ /* */ /* nucleus.h Nucleus PLUS constants */ /* cs_defs.h Common service definitions */ /* */ /* HISTORY */ /* */ /* DATE REMARKS */ /* */ /* 03-01-1993 Created initial version 1.0 */ /* 04-19-1993 Verified version 1.0 */ /* 03-01-1994 Changed void to VOID, removed */ /* clearing link pointers during */ /* removal of a node from a list, */ /* resulting in version 1.1 */ /* */ /* 03-18-1994 Verified version 1.1 */ /* 04-17-1996 updated to version 1.2 */ /* 03-24-1998 Released version 1.3. */ /* 03-26-1999 Released 1.11m (new release */ /* numbering scheme) */ /* 04-17-2002 Released version 1.13m */ /* 11-07-2002 Released version 1.14 */ /*************************************************************************/ #define NU_SOURCE_FILE #include "cs_defs.h" /* Include CS definitions */ #include "cs_extr.h" /* Common service functions */ /*************************************************************************/ /* */ /* FUNCTION */ /* */ /* CSC_Place_On_List */ /* */ /* DESCRIPTION */ /* */ /* This function places the specified node at the end of specified */ /* linked list. */ /* */ /* CALLED BY */ /* */ /* various components */ /* */ /* CALLS */ /* */ /* None */ /* */ /* INPUTS */ /* */ /* head Pointer to head pointer */ /* node Pointer to node to add */ /* */ /* OUTPUTS */ /* */ /* modified list */ /* */ /* HISTORY */ /* */ /* NAME DATE REMARKS */ /* */ /* W. Lamie 03-01-1993 Created initial version 1.0 */ /* D. Lamie 04-19-1993 Verified version 1.0 */ /* */ /*************************************************************************/ #ifndef NU_INLINE VOID CSC_Place_On_List(CS_NODE **head, CS_NODE *new_node) { NU_SUPERV_USER_VARIABLES /* Switch to supervisor mode */ NU_SUPERVISOR_MODE(); /* Determine if the list in non-empty. */ if (*head) { /* The list is not empty. Add the new node to the end of the list. */ new_node -> cs_previous = (*head) -> cs_previous; (new_node -> cs_previous) -> cs_next = new_node; new_node -> cs_next = (*head); (new_node -> cs_next) -> cs_previous = new_node; } else { /* The list is empty, setup the head and the new node. */ (*head) = new_node; new_node -> cs_previous = new_node; new_node -> cs_next = new_node; } /* Return to user mode */ NU_USER_MODE(); } #endif /*************************************************************************/ /* */ /* FUNCTION */ /* */ /* CSC_Priority_Place_On_List */ /* */ /* DESCRIPTION */ /* */ /* This function places the specified node after all other nodes on */ /* the list of equal or greater priority. Note that lower */ /* numerical values indicate greater priority. */ /* */ /* CALLED BY */ /* */ /* various components */ /* */ /* CALLS */ /* */ /* None */ /* */ /* INPUTS */ /* */ /* head Pointer to head pointer */ /* node Pointer to node to add */ /* */ /* OUTPUTS */ /* */ /* modified list */ /* */ /* HISTORY */ /* */ /* NAME DATE REMARKS */ /* */ /* W. Lamie 03-01-1993 Created initial version 1.0 */ /* D. Lamie 04-19-1993 Verified version 1.0 */ /* */ /*************************************************************************/ VOID CSC_Priority_Place_On_List(CS_NODE **head, CS_NODE *new_node) { CS_NODE *search_ptr; /* List search pointer */ NU_SUPERV_USER_VARIABLES /* Switch to supervisor mode */ NU_SUPERVISOR_MODE(); /* Determine if the list in non-empty. */ if (*head) { /* Search the list to find the proper place for the new node. */ search_ptr = (*head); /* Check for insertion before the first node on the list. */ if (search_ptr -> cs_priority > new_node -> cs_priority) { /* Update the head pointer to point at the new node. */ (*head) = new_node; } else { /* We know that the new node is not the highest priority and must be placed somewhere after the head pointer. */ /* Move search pointer up to the next node since we are trying to find the proper node to insert in front of. */ search_ptr = search_ptr -> cs_next; while ((search_ptr -> cs_priority <= new_node -> cs_priority) && (search_ptr != (*head))) { /* Move along to the next node. */ search_ptr = search_ptr -> cs_next; } } /* Insert before search pointer. */ new_node -> cs_previous = search_ptr -> cs_previous; (new_node -> cs_previous) -> cs_next = new_node; new_node -> cs_next = search_ptr; (new_node -> cs_next) -> cs_previous = new_node; } else { /* The list is empty, setup the head and the new node. */ (*head) = new_node; new_node -> cs_previous = new_node; new_node -> cs_next = new_node; } /* Return to user mode */ NU_USER_MODE(); } /*************************************************************************/ /* */ /* FUNCTION */ /* */ /* CSC_Remove_From_List */ /* */ /* DESCRIPTION */ /* */ /* This function removes the specified node from the specified */ /* linked list. */ /* */ /* CALLED BY */ /* */ /* various components */ /* */ /* CALLS */ /* */ /* None */ /* */ /* INPUTS */ /* */ /* head Pointer to head pointer */ /* node Pointer to node to add */ /* */ /* OUTPUTS */ /* */ /* modified list */ /* */ /* HISTORY */ /* */ /* NAME DATE REMARKS */ /* */ /* W. Lamie 03-01-1993 Created initial version 1.0 */ /* D. Lamie 04-19-1993 Verified version 1.0 */ /* W. Lamie 03-01-1994 Removed clearing link pointers */ /* during removal of a node from */ /* list, resulting in version 1.1 */ /* R. Pfaff - */ /* D. Lamie 03-18-1994 Verified version 1.1 */ /* */ /*************************************************************************/ #ifndef NU_INLINE VOID CSC_Remove_From_List(CS_NODE **head, CS_NODE *node) { NU_SUPERV_USER_VARIABLES /* Switch to supervisor mode */ NU_SUPERVISOR_MODE(); /* Determine if this is the only node in the system. */ if (node -> cs_previous == node) { /* Yes, this is the only node in the system. Clear the node's pointers and the head pointer. */ (*head) = NU_NULL; } else { /* Unlink the node from a multiple node list. */ (node -> cs_previous) -> cs_next = node -> cs_next; (node -> cs_next) -> cs_previous = node -> cs_previous; /* Check to see if the node to delete is at the head of the list. */ if (node == *head) /* Move the head pointer to the node after. */ *head = node -> cs_next; } /* Return to user mode */ NU_USER_MODE(); } #endif