freecalypso-citrine: gpf/frame/route.c annotate

author	Mychaela Falconia <falcon@freecalypso.org>
date	Thu, 09 Jun 2016 00:02:41 +0000
parents
children

rev	line source
0 75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +------------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| File: route.c
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 +------------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 \| Copyright 2004 Texas Instruments Deutschland, AG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| All rights reserved.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \| This file is confidential and a trade secret of Texas
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| Instruments Berlin, AG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| The receipt of or possession of this file does not convey
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| any rights to reproduce or disclose its contents or to
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| manufacture, use, or sell anything it may describe, in
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| whole, or in part, without the specific written consent of
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| Texas Instruments Deutschland, AG.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 \| Purpose : This Modul performs the filtering and routing of
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| primitives for testing capabilities of the protocol stack.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 #ifndef __ROUTE_C__
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #define __ROUTE_C__
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 /==== INCLUDES ===================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 #include <stdio.h>
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 #include <string.h>
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 #include "gpfconf.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 #include "typedefs.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #include "os.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include "vsi.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #include "frame.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #include "tools.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "frm_defs.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "frm_types.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "frm_glob.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "p_mem.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #include "route.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "frm_ext.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 /==== CONSTANTS ==================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 /==== TYPES ======================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 /==== CONSTANTS ====================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 /==== EXTERNALS =====================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 /* -------------- S H A R E D - BEGIN ---------------- */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 #ifdef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #pragma data_seg("FRAME_SHARED")
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 extern OS_HANDLE ext_data_pool_handle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 extern T_HANDLE TestGroupHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 extern T_FRM_ROUTING_TABLE_ENTRY *Routing[];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 extern char TaskName[];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #ifndef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 extern T_lemu_SendToQueue lemu_SendToQueue_func;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 /==== VARIABLES ==================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 T_HANDLE rt_tst_handle = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 extern int rt_tst_handle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 #ifdef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #pragma data_seg()
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 /* -------------- S H A R E D - END ---------------- */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 #ifndef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 extern const T_MEM_PROPERTIES *mem;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 /==== FUNCTIONS ==================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 \| STATE : code ROUTINE : rt_Init \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 PURPOSE : initialize the routing table.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 GLOBAL SHORT rt_Init (void)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 USHORT i;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 * Initialize the routingTable
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 for ( i = 0; i <= MaxEntities; i++ )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 Routing[i] = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 return OS_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 \| STATE : code ROUTINE : rt_CvrtOpcMask \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 PURPOSE : convert "1010101" mask to opcMask and opcStatus
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 LOCAL SHORT rt_CvrtToOpcMask ( char OpcString, ULONG opcMask, ULONG *opcStatus )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 unsigned int len;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 unsigned int i;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 char *p;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 len = strlen ( OpcString );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 p = OpcString + len;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 for ( i = 0; i < len; i++ )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 switch (*--p)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 case '1':
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 *opcMask \|= (1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 *opcStatus \|= (1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 case '0':
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 *opcMask \|= (1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 *opcStatus &= ~((unsigned int)1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 case '': / wildcard matches */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 *opcMask &= ~((unsigned int)1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 *opcStatus &= ~((unsigned int)1<<i);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 default:
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 return OS_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 \| STATE : code ROUTINE : rt_CvrtOpcMask \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 PURPOSE : convert opcMask and opcStatus to "1010101"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 LOCAL SHORT rt_CvrtFromOpcMask ( char *OpcString, ULONG opcMask, ULONG opcStatus )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 signed char i;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 char len;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 if ( opcMask >> 16 )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 len = 32;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 len = 16;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 for ( i = len-1; i >= 0; i-- )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 if ( opcMask & (1<<i) )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 if ( opcStatus & (1<<i) )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 *OpcString = '1';
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 *OpcString = '0';
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 OpcString = '';
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 OpcString++;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 *(OpcString++) = ' ';
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 *(OpcString++) = 0;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 return OS_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 \| STATE : code ROUTINE : rt_ReadRouting \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 PURPOSE : reads all routings of the routing table of the task.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 GLOBAL SHORT rt_RouteRead ( T_HANDLE Handle, char *Buffer )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 T_HANDLE TstComHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 static T_FRM_ROUTING_TABLE_ENTRY *pEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 char OrgReceiver[ RESOURCE_NAMELEN ];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 char NewReceiver[ RESOURCE_NAMELEN ];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 char OpcString [18];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 char const *pCmd;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 static UBYTE FirstRead = 1;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 if ( FirstRead )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 FirstRead = 0;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 pEntry = Routing[Handle];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 if ( pEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 if ( pEntry->OldDestComHandle == ROUTE_ALL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 strcpy ( OrgReceiver, RT_ALL_TOKEN );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 strcpy ( OrgReceiver, pf_TaskTable[pEntry->OldDestComHandle].Name );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 TstComHandle = vsi_c_open ( Handle, FRM_TST_NAME );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 if ( pEntry->NewDestComHandle == TstComHandle )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 strcpy ( NewReceiver, pEntry->ExtDest );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 if ( pEntry->NewDestComHandle != 0 )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 strcpy ( NewReceiver, pf_TaskTable[pEntry->NewDestComHandle].Name );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 if ( pEntry->opcMask )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 rt_CvrtFromOpcMask ( OpcString, pEntry->opcMask, pEntry->opcStatus );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 OpcString[0] = 0;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 switch (pEntry->Command & RT_COMMAND_MASK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 case RT_DUPLICATE: pCmd = SYSPRIM_DUPLICATE_TOKEN;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 case RT_REDIRECT: pCmd = SYSPRIM_REDIRECT_TOKEN;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 case RT_DESTROY: pCmd = SYSPRIM_REDIRECT_TOKEN;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 strcpy ( NewReceiver, SYSPRIM_NULL_TOKEN );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 default: pCmd = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 sprintf ( Buffer, "%s %s %s %s%s", pf_TaskTable[Handle].Name, pCmd, OrgReceiver, OpcString, NewReceiver );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 return RT_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 FirstRead = 1;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 pEntry = Routing[Handle];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 return RT_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 \| STATE : code ROUTINE : rt_RoutingEntry \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 PURPOSE : adds a new routing to the routing table of the task.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 routings with duplicates are stored in the beginning
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 of the table because if the primitive is redirected and
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 send it can not be duplicated.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 LOCAL SHORT rt_RoutingEntry ( T_HANDLE SndTaskHandle, T_FRM_ROUTING_TABLE_ENTRY *pNewEntry, RT_ENTRY Status )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 T_FRM_ROUTING_TABLE_ENTRY pEntry, pNextEntry, *pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 * delete all entries with same OldDestComHandle if a destroy command is stored
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 if ( pNewEntry->Command & RT_DESTROY )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 do
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 if ( pEntry->OldDestComHandle == pNewEntry->OldDestComHandle )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 if ( pEntry == Routing[SndTaskHandle] )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 Routing[SndTaskHandle] = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 pEntry = pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308 while ( pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 * delete destroy command for OldDestComHandle if a new command is stored
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318 do
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 if ( pEntry->OldDestComHandle == pNewEntry->OldDestComHandle )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 if ( pEntry->Command == RT_DESTROY )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 if ( pEntry == Routing[SndTaskHandle] )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 Routing[SndTaskHandle] = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 pEntry = pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 while ( pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 if ( (pEntry = Routing[SndTaskHandle]) != NULL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 do
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 if ( pEntry->SndTaskHandle == SndTaskHandle
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 && pEntry->NewDestComHandle == pNewEntry->NewDestComHandle
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 && pEntry->OldDestComHandle == pNewEntry->OldDestComHandle
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 && pEntry->MsgType == pNewEntry->MsgType )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 if ( !strcmp (pEntry->ExtDest, pNewEntry->ExtDest) )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 if ( Status == RT_DELETE )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 if ( pEntry == Routing[SndTaskHandle] )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 Routing[SndTaskHandle] = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 if ( pEntry->pNextEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 pNextEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 return RT_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 #ifndef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 pEntry->Command = pNewEntry->Command; /* modify command for old routing entry */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 pEntry->opcMask = pNewEntry->opcMask; /* set new opcMask in old routing entry */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 pEntry->opcStatus = pNewEntry->opcStatus; /* set new opcStatus in old routing entry */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 return RT_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 #ifdef _TOOLS_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 if ( ( pEntry->opcMask == pNewEntry->opcMask )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 && ( pEntry->opcStatus == pNewEntry->opcStatus ) )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 strcpy ( pEntry->ExtDest, pNewEntry->ExtDest );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 return RT_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 } while ( pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 pPrevEntry = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 do
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 pPrevEntry = pEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 if ( pNewEntry->Command & RT_DUPLICATE )/* put Duplications at the end of Duplications */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 if ( pEntry->Command & RT_DUPLICATE )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 if ( pPrevEntry == Routing[SndTaskHandle] )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 pPrevEntry = NULL;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 pPrevEntry = pEntry->pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 pEntry = pEntry->pNextEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 while ( pEntry );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443 if ( os_AllocateMemory ( SndTaskHandle, (T_VOID_STRUCT**)&pNextEntry, sizeof(T_FRM_ROUTING_TABLE_ENTRY), OS_NO_SUSPEND, ext_data_pool_handle ) == OS_TIMEOUT )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 return RT_NO_MEM;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 pNextEntry->SndTaskHandle = SndTaskHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 pNextEntry->OldDestComHandle = pNewEntry->OldDestComHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 pNextEntry->NewDestComHandle = pNewEntry->NewDestComHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 pNextEntry->OldDestTaskHandle = pNewEntry->OldDestTaskHandle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 pNextEntry->Command = pNewEntry->Command;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450 pNextEntry->MsgType = pNewEntry->MsgType;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 pNextEntry->opcMask = pNewEntry->opcMask;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 pNextEntry->opcStatus = pNewEntry->opcStatus;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 strcpy ( pNextEntry->ExtDest, pNewEntry->ExtDest );
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 if ( pEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 pEntry->pPrevEntry = pNextEntry; /* store at the beginning/in the list */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 pNextEntry->pNextEntry = NULL; /* append to the list */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 if ( pPrevEntry )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 pPrevEntry->pNextEntry = pNextEntry; /* store in the list */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 pNextEntry->pPrevEntry = pPrevEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 pNextEntry->pNextEntry = pEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 Routing[SndTaskHandle] = pNextEntry; /* store at the beginning */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 pNextEntry->pNextEntry = pEntry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 return RT_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 #if 0
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 /* not needed -> temporarily removed */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 #ifndef RUN_INT_RAM
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 \| PROJECT : GSM-PS (6147) MODULE : PF_ROUTE \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 \| STATE : code ROUTINE : rt_ModifyRouting \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 PURPOSE : handle the contents of the redirection or duplicate
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 system primitive
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 GLOBAL SHORT rt_isolate_entity ( T_HANDLE caller, char *entity )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 T_FRM_ROUTING_TABLE_ENTRY entry;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 T_HANDLE snd;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 T_HANDLE rcv;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 int read_entry = FIRST_ENTRY;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 if ( (rcv = vsi_e_handle ( caller, entity )) == VSI_ERROR )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 return RT_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 {

0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2 +------------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3 | File: route.c

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4 +------------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

7 |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

8 | This file is confidential and a trade secret of Texas

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

9 | Instruments Berlin, AG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

10 | The receipt of or possession of this file does not convey

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

11 | any rights to reproduce or disclose its contents or to

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

12 | manufacture, use, or sell anything it may describe, in

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

13 | whole, or in part, without the specific written consent of

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

14 | Texas Instruments Deutschland, AG.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

15 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

16 | Purpose : This Modul performs the filtering and routing of

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

17 | primitives for testing capabilities of the protocol stack.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

18 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

19 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

20

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

21 #ifndef __ROUTE_C__

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

22 #define __ROUTE_C__

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

23 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

24

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

25 /*==== INCLUDES ===================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

26

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

27 #include <stdio.h>

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

28 #include <string.h>

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

29

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

30 #include "gpfconf.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

31 #include "typedefs.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

32 #include "os.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

33 #include "vsi.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

34 #include "frame.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

35 #include "tools.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

36 #include "frm_defs.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

37 #include "frm_types.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

38 #include "frm_glob.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

39 #include "p_mem.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

40 #include "route.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

41 #include "frm_ext.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

42

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

43 /*==== CONSTANTS ==================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

44

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

45 /*==== TYPES ======================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

46

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

47 /*==== CONSTANTS ====================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

48

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

49 /*==== EXTERNALS =====================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

50

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

51 /* -------------- S H A R E D - BEGIN ---------------- */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

52 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53 #pragma data_seg("FRAME_SHARED")

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

54 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

55

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

56 extern OS_HANDLE ext_data_pool_handle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

57 extern T_HANDLE TestGroupHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

58 extern T_FRM_ROUTING_TABLE_ENTRY *Routing[];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

59 extern char TaskName[];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

60 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

61 extern T_lemu_SendToQueue lemu_SendToQueue_func;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

62 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

63 /*==== VARIABLES ==================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

64

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

65 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

66 T_HANDLE rt_tst_handle = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

67 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

68 extern int rt_tst_handle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

69 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

70

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

71 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

72 #pragma data_seg()

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

73 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

74 /* -------------- S H A R E D - END ---------------- */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

76 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

77 extern const T_MEM_PROPERTIES *mem;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

78 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

79

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

80 /*==== FUNCTIONS ==================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

81

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

82 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

83 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

84 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

85 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

86 | STATE : code ROUTINE : rt_Init |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

87 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

88

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

89 PURPOSE : initialize the routing table.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

90 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

91

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

92 GLOBAL SHORT rt_Init (void)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

93 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

94 USHORT i;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

95 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

96 * Initialize the routingTable

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

97 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

98 for ( i = 0; i <= MaxEntities; i++ )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

99 Routing[i] = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

100

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

101 return OS_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

102 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

103 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

104

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

105

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

106 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

107 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

108 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

109 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

110 | STATE : code ROUTINE : rt_CvrtOpcMask |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

111 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

112

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

113 PURPOSE : convert "1010101" mask to opcMask and opcStatus

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

114 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

115

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

116 LOCAL SHORT rt_CvrtToOpcMask ( char *OpcString, ULONG *opcMask, ULONG *opcStatus )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

117 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

118 unsigned int len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

119 unsigned int i;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

120 char *p;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

121

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

122 len = strlen ( OpcString );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

123 p = OpcString + len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

124

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

125 for ( i = 0; i < len; i++ )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

126 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

127 switch (*--p)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

128 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

129 case '1':

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

130 *opcMask |= (1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

131 *opcStatus |= (1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

132 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

133 case '0':

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

134 *opcMask |= (1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

135 *opcStatus &= ~((unsigned int)1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

136 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

137 case '*': /* wildcard matches */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

138 *opcMask &= ~((unsigned int)1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

139 *opcStatus &= ~((unsigned int)1<<i);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

140 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

141 default:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

142 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

143 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

144 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

145 return OS_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

146 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

147 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

148

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

149 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

150 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

151 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

152 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

153 | STATE : code ROUTINE : rt_CvrtOpcMask |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

154 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

155

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

156 PURPOSE : convert opcMask and opcStatus to "1010101"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

157 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

158 LOCAL SHORT rt_CvrtFromOpcMask ( char *OpcString, ULONG opcMask, ULONG opcStatus )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

159 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

160 signed char i;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

161 char len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

162

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

163 if ( opcMask >> 16 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

164 len = 32;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

165 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

166 len = 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

167 for ( i = len-1; i >= 0; i-- )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

168 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

169 if ( opcMask & (1<<i) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

170 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

171 if ( opcStatus & (1<<i) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

172 *OpcString = '1';

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

173 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

174 *OpcString = '0';

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

175 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

176 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

177 *OpcString = '*';

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

178 OpcString++;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

179 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

180 *(OpcString++) = ' ';

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

181 *(OpcString++) = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

182

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

183 return OS_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

184 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

185 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

186

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

187 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

188 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

189 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

190 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

191 | STATE : code ROUTINE : rt_ReadRouting |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

192 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

193

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

194 PURPOSE : reads all routings of the routing table of the task.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

195 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

196

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

197 GLOBAL SHORT rt_RouteRead ( T_HANDLE Handle, char *Buffer )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

198 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

199 T_HANDLE TstComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

200 static T_FRM_ROUTING_TABLE_ENTRY *pEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

201 char OrgReceiver[ RESOURCE_NAMELEN ];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

202 char NewReceiver[ RESOURCE_NAMELEN ];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

203 char OpcString [18];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

204 char const *pCmd;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

205 static UBYTE FirstRead = 1;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

206

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

207 if ( FirstRead )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

208 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

209 FirstRead = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

210 pEntry = Routing[Handle];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

211 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

212 if ( pEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

213 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

214 if ( pEntry->OldDestComHandle == ROUTE_ALL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

215 strcpy ( OrgReceiver, RT_ALL_TOKEN );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

216 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

217 strcpy ( OrgReceiver, pf_TaskTable[pEntry->OldDestComHandle].Name );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

218 TstComHandle = vsi_c_open ( Handle, FRM_TST_NAME );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

219 if ( pEntry->NewDestComHandle == TstComHandle )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

220 strcpy ( NewReceiver, pEntry->ExtDest );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

221 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

222 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

223 if ( pEntry->NewDestComHandle != 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

224 strcpy ( NewReceiver, pf_TaskTable[pEntry->NewDestComHandle].Name );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

225 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

226 if ( pEntry->opcMask )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

227 rt_CvrtFromOpcMask ( OpcString, pEntry->opcMask, pEntry->opcStatus );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

228 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

229 OpcString[0] = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

230

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

231 switch (pEntry->Command & RT_COMMAND_MASK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

232 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

233 case RT_DUPLICATE: pCmd = SYSPRIM_DUPLICATE_TOKEN;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

234 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

235 case RT_REDIRECT: pCmd = SYSPRIM_REDIRECT_TOKEN;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

236 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

237 case RT_DESTROY: pCmd = SYSPRIM_REDIRECT_TOKEN;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

238 strcpy ( NewReceiver, SYSPRIM_NULL_TOKEN );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

239 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

240 default: pCmd = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

241 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

242 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

243 sprintf ( Buffer, "%s %s %s %s%s", pf_TaskTable[Handle].Name, pCmd, OrgReceiver, OpcString, NewReceiver );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

244 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

245 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

246 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

247 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

248 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

249 FirstRead = 1;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

250 pEntry = Routing[Handle];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

251 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

252 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

253 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

254 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

255

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

256 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

257 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

258 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

259 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

260 | STATE : code ROUTINE : rt_RoutingEntry |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

261 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

262

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

263 PURPOSE : adds a new routing to the routing table of the task.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

264 routings with duplicates are stored in the beginning

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

265 of the table because if the primitive is redirected and

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

266 send it can not be duplicated.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

267 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

268

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

269 LOCAL SHORT rt_RoutingEntry ( T_HANDLE SndTaskHandle, T_FRM_ROUTING_TABLE_ENTRY *pNewEntry, RT_ENTRY Status )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

270 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

271 T_FRM_ROUTING_TABLE_ENTRY *pEntry, *pNextEntry, *pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

272

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

273 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

274 * delete all entries with same OldDestComHandle if a destroy command is stored

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

275 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

276 if ( pNewEntry->Command & RT_DESTROY )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

277 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

278 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

279 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

280 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

281 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

282 if ( pEntry->OldDestComHandle == pNewEntry->OldDestComHandle )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

283 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

284 if ( pEntry == Routing[SndTaskHandle] )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

285 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

286 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

287 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

288 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

289 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

290 Routing[SndTaskHandle] = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

291 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

292 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

293 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

294 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

295 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

296 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

297 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

298 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

299 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

300 pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

301 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

302 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

303 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

304 pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

305

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

306 pEntry = pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

307 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

308 while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

309 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

310 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

311 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

312 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

313 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

314 * delete destroy command for OldDestComHandle if a new command is stored

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

315 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

316 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

317 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

318 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

319 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

320 if ( pEntry->OldDestComHandle == pNewEntry->OldDestComHandle )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

321 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

322 if ( pEntry->Command == RT_DESTROY )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

323 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

324 if ( pEntry == Routing[SndTaskHandle] )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

325 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

326 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

327 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

328 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

329 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

330 Routing[SndTaskHandle] = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

331 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

332 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

333 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

334 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

335 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

336 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

337 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

338 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

339 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

340 pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

341 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

342 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

343 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

344 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

345 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

346 pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

347

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

348 pEntry = pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

349 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

350 while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

351 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

352 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

353

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

354

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

355 if ( (pEntry = Routing[SndTaskHandle]) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

356 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

357 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

358 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

359 if ( pEntry->SndTaskHandle == SndTaskHandle

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

360 && pEntry->NewDestComHandle == pNewEntry->NewDestComHandle

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

361 && pEntry->OldDestComHandle == pNewEntry->OldDestComHandle

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

362 && pEntry->MsgType == pNewEntry->MsgType )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

363 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

364 if ( !strcmp (pEntry->ExtDest, pNewEntry->ExtDest) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

365 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

366 if ( Status == RT_DELETE )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

367 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

368 if ( pEntry == Routing[SndTaskHandle] )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

369 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

370 Routing[SndTaskHandle] = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

371 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

372 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

373 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

374 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

375 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

376 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

377 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

378 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

379 if ( pEntry->pNextEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

380 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

381 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

382 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

383 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

384 pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

385 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

386 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

387 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

388 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

389 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

390 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

391 pEntry->Command = pNewEntry->Command; /* modify command for old routing entry */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

392 pEntry->opcMask = pNewEntry->opcMask; /* set new opcMask in old routing entry */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

393 pEntry->opcStatus = pNewEntry->opcStatus; /* set new opcStatus in old routing entry */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

394 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

395 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

396 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

397 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

398 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

399 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

400 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

401 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

402 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

403 if ( ( pEntry->opcMask == pNewEntry->opcMask )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

404 && ( pEntry->opcStatus == pNewEntry->opcStatus ) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

405 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

406 strcpy ( pEntry->ExtDest, pNewEntry->ExtDest );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

407 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

408 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

409 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

410 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

411 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

412 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

413 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

414 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

415 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

416 } while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

417 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

418

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

419 pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

420 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

421 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

422 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

423 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

424 pPrevEntry = pEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

425 if ( pNewEntry->Command & RT_DUPLICATE )/* put Duplications at the end of Duplications */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

426 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

427 if ( pEntry->Command & RT_DUPLICATE )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

428 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

429 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

430 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

431 if ( pPrevEntry == Routing[SndTaskHandle] )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

432 pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

433 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

434 pPrevEntry = pEntry->pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

435 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

436 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

437 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

438 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

439 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

440 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

441 while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

442 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

443 if ( os_AllocateMemory ( SndTaskHandle, (T_VOID_STRUCT**)&pNextEntry, sizeof(T_FRM_ROUTING_TABLE_ENTRY), OS_NO_SUSPEND, ext_data_pool_handle ) == OS_TIMEOUT )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

444 return RT_NO_MEM;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

445 pNextEntry->SndTaskHandle = SndTaskHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

446 pNextEntry->OldDestComHandle = pNewEntry->OldDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

447 pNextEntry->NewDestComHandle = pNewEntry->NewDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

448 pNextEntry->OldDestTaskHandle = pNewEntry->OldDestTaskHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

449 pNextEntry->Command = pNewEntry->Command;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

450 pNextEntry->MsgType = pNewEntry->MsgType;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

451 pNextEntry->opcMask = pNewEntry->opcMask;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

452 pNextEntry->opcStatus = pNewEntry->opcStatus;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

453 strcpy ( pNextEntry->ExtDest, pNewEntry->ExtDest );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

454

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

455 if ( pEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

456 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

457 pEntry->pPrevEntry = pNextEntry; /* store at the beginning/in the list */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

458 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

459 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

460 pNextEntry->pNextEntry = NULL; /* append to the list */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

461

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

462 if ( pPrevEntry )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

463 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

464 pPrevEntry->pNextEntry = pNextEntry; /* store in the list */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

465 pNextEntry->pPrevEntry = pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

466 pNextEntry->pNextEntry = pEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

467 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

468 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

469 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

470 Routing[SndTaskHandle] = pNextEntry; /* store at the beginning */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

471 pNextEntry->pNextEntry = pEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

472 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

473 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

474 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

475 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

476

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

477 #if 0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

478 /* not needed -> temporarily removed */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

479 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

480 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

481 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

482 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

483 | STATE : code ROUTINE : rt_ModifyRouting |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

484 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

485

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

486 PURPOSE : handle the contents of the redirection or duplicate

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

487 system primitive

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

488

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

489 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

490 GLOBAL SHORT rt_isolate_entity ( T_HANDLE caller, char *entity )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

491 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

492 T_FRM_ROUTING_TABLE_ENTRY entry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

493 T_HANDLE snd;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

494 T_HANDLE rcv;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

495 int read_entry = FIRST_ENTRY;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

496

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

497 if ( (rcv = vsi_e_handle ( caller, entity )) == VSI_ERROR )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

498 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

499 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

500 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

501 while ( vsi_c_get_entity_com_entry ( read_entry, rcv, &snd ) == VSI_OK )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

502 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

503 read_entry = NEXT_ENTRY;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

504 entry.SndTaskHandle = snd;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

505 entry.OldDestComHandle = rcv;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

506 entry.NewDestComHandle = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

507 entry.opcMask = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

508 entry.MsgType = RT_PRIMITIVE_TYPE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

509 entry.Command = RT_DESTROY;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

510 rt_RoutingEntry ( snd, &entry, RT_STORE );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

511 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

512

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

513 entry.SndTaskHandle = rcv;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

514 entry.OldDestComHandle = ROUTE_ALL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

515 entry.NewDestComHandle = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

516 entry.opcMask = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

517 entry.MsgType = RT_PRIMITIVE_TYPE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

518 entry.Command = RT_DESTROY;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

519 rt_RoutingEntry ( rcv, &entry, RT_STORE );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

520

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

521 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

522 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

523 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

524 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

525 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

526

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

527 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

528 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

529 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

530 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

531 | STATE : code ROUTINE : rt_ModifyRouting |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

532 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

533

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

534 PURPOSE : handle the contents of the redirection or duplicate

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

535 system primitive

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

536

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

537 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

538 GLOBAL SHORT rt_RoutingModify ( T_HANDLE SndTaskHandle, char *Command, char *RoutingString)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

539 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

540 char Token[81];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

541 char *pChar = RoutingString;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

542 T_FRM_ROUTING_TABLE_ENTRY Entry = { 0 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

543 unsigned int len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

544 T_FRM_ROUTING_TABLE_ENTRY *pEntry, *pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

545

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

546 if ( !strcmp (Command, SYSPRIM_DUPLICATE_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

547 Entry.Command = RT_DUPLICATE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

548

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

549 if ( !strcmp (Command, SYSPRIM_REDIRECT_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

550 Entry.Command = RT_REDIRECT;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

551

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

552 if ( (len = GetNextToken (pChar, Token, " #")) == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

553 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

554 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

555 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

556

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

557 if ( !strcmp (Token, RT_CLEAR_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

558 Entry.Command |= RT_CLEAR_ENTRY;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

559

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

560 if ( !strcmp (Token, RT_ALL_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

561 Entry.Command |= RT_ALL_DESTINATION;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

562

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

563 if ( Entry.Command & RT_CLEAR_ENTRY )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

564 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

565 if ( (pEntry = Routing[SndTaskHandle]) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

566 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

567 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

568 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

569 pNextEntry = (T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

570 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

571 pEntry = pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

572 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

573 while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

574 Routing[SndTaskHandle] = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

575 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

576 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

577 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

578

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

579 if ( Entry.Command & RT_ALL_DESTINATION )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

580 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

581 Entry.OldDestComHandle = ROUTE_ALL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

582 Entry.OldDestTaskHandle = ROUTE_ALL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

583 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

584 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

585 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

586 if ( ( Entry.OldDestComHandle = vsi_c_open (SndTaskHandle, Token ) ) == VSI_ERROR )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

587 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

588 Entry.OldDestTaskHandle = Entry.OldDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

589 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

590

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

591 if ( (len = GetNextToken (pChar, Token, " #")) == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

592 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

593 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

594 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

595

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

596 if ( !strcmp (Token, RT_TIMEOUT_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

597 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

598 Entry.MsgType = RT_TIMEOUT_TYPE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

599 if ( (len = GetNextToken (pChar, Token, " #")) == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

600 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

601 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

602 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

603

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

604 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

605 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

606 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

607 if ( !strcmp (Token, RT_SIGNAL_TOKEN) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

608 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

609 Entry.MsgType = RT_SIGNAL_TYPE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

610 if ( (len = GetNextToken (pChar, Token, " #")) == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

611 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

612 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

613 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

614 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

615 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

616 Entry.MsgType = RT_PRIMITIVE_TYPE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

617 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

618

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

619 if ( (Token[0] == '1') || (Token[0] == '0') || (Token[0] == '*') )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

620 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

621 rt_CvrtToOpcMask(Token, &Entry.opcMask, &Entry.opcStatus);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

622 if ( (len = GetNextToken (pChar, Token, " #")) == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

623 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

624 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

625 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

626 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

627 /* else */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

628 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

629 if (!strcmp (Token, SYSPRIM_NULL_TOKEN))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

630 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

631 if ( Entry.Command & RT_REDIRECT )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

632 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

633 Entry.Command |= RT_DESTROY; /* destroy the primitive */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

634 Entry.Command &= ~RT_REDIRECT;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

635 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

636 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

637 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

638 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

639 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

640 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

641 if ( ( Entry.NewDestComHandle = vsi_c_open (SndTaskHandle, Token ) ) == VSI_ERROR )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

642 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

643 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

644 if ( !strcmp ( FRM_PCO_NAME, Token ) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

645 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

646 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

647 if ( ( Entry.NewDestComHandle = vsi_c_open (SndTaskHandle, FRM_TST_NAME ) ) != VSI_ERROR )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

648 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

649 rt_tst_handle = Entry.NewDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

650 if ( len < RESOURCE_NAMELEN )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

651 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

652 strncpy( Entry.ExtDest, Token, RESOURCE_NAMELEN );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

653 Entry.ExtDest[RESOURCE_NAMELEN-1] = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

654 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

655 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

656 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

657 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

658 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

659 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

660

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

661 if ( Entry.Command & RT_ALL_DESTINATION )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

662 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

663 if ( (pEntry = Routing[SndTaskHandle]) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

664 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

665 int all_cleared = 1;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

666 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

667 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

668 pNextEntry = (T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

669 if ( (pEntry->NewDestComHandle == Entry.NewDestComHandle )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

670 && !strcmp(pEntry->ExtDest, Entry.ExtDest) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

671 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

672 if ( pEntry == Routing[SndTaskHandle] )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

673 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

674 Routing[SndTaskHandle] = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

675 if ( pEntry->pNextEntry != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

676 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

677 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

678 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

679 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

680 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

681 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

682 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pPrevEntry)->pNextEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

683 if ( pEntry->pNextEntry != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

684 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

685 ((T_FRM_ROUTING_TABLE_ENTRY*)pEntry->pNextEntry)->pPrevEntry = pEntry->pPrevEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

686 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

687 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

688 os_DeallocateMemory ( SndTaskHandle, (T_VOID_STRUCT*)pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

689 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

690 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

691 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

692 all_cleared = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

693 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

694 pEntry = pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

695 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

696 while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

697 if ( all_cleared == 1 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

698 Routing[SndTaskHandle] = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

699 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

700 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

701

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

702 if ( (pChar >= RoutingString+ strlen (RoutingString))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

703 || ((len = GetNextToken (pChar, Token, " #")) == 0) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

704 return ( rt_RoutingEntry(SndTaskHandle, &Entry, RT_STORE) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

705 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

706 pChar += (len+1);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

707

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

708 if ( Entry.Command & RT_CLEAR_ENTRY )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

709 return ( rt_RoutingEntry(SndTaskHandle, &Entry, RT_DELETE) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

710 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

711 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

712

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

713 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

714 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

715

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

716 #ifndef RUN_FLASH

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

717 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

718 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

719 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

720 | STATE : code ROUTINE : rt_routePrim |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

721 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

722

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

723 PURPOSE : Looks if the task have some routing rules stored and

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

724 perform the redirection or duplication.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

725

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

726 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

727

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

728 GLOBAL SHORT rt_Route ( T_HANDLE SndTaskHandle, T_HANDLE RcvComHandle, USHORT Prio, ULONG Suspend, OS_QDATA *Msg )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

729 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

730 T_FRM_ROUTING_TABLE_ENTRY *pEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

731

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

732 T_PRIM_HEADER *prim;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

733 ULONG opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

734

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

735 if ( ( pEntry = Routing[SndTaskHandle] ) != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

736 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

737 if ( pEntry->MsgType == Msg->data16 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

738 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

739 prim = (T_PRIM_HEADER*)Msg->ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

740

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

741 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

742 if (prim->opc & MEMHANDLE_OPC)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

743 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

744 P_MEMHANDLE_SDU(prim)=0x00000000;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

745 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

746 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

747

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

748 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

749 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

750 if ( SndTaskHandle == pEntry->SndTaskHandle

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

751 && ( (RcvComHandle == pEntry->OldDestComHandle) || (pEntry->OldDestComHandle == ROUTE_ALL) ) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

752 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

753 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

754 * a route for the receiver is defined. Now

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

755 * check the filter conditions

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

756 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

757 opc = ((T_PRIM_HEADER*)Msg->ptr)->opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

758 if ( (opc & pEntry->opcMask) == (pEntry->opcStatus & pEntry->opcMask) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

759 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

760 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

761 * filter matched -> redirect, duplicate or destroy

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

762 * the primitive.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

763 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

764 switch (pEntry->Command & RT_COMMAND_MASK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

765 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

766 case RT_DESTROY:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

767 /* add VSI_PPM_FREE(Msg->ptr) just to avoid the PPM warning of freeing a primitive in a queue */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

768 VSI_PPM_RCV(Msg->ptr);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

769 VSI_PPM_FREE(Msg->ptr);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

770 os_DeallocatePartition (SndTaskHandle, Msg->ptr-PPM_OFFSET );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

771 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

772

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

773 case RT_REDIRECT:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

774 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

775 if (pEntry->NewDestComHandle != rt_tst_handle)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

776 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

777 /* if not on tool side and not sending via TST -> send directly */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

778 Msg->e_id = pEntry->NewDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

779 return ( (SHORT)os_SendToQueue ( SndTaskHandle, pf_TaskTable[pEntry->NewDestComHandle].QueueHandle, OS_NORMAL, OS_SUSPEND, Msg ) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

780 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

781 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

782 /*lint -fallthrough */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

783 case RT_DUPLICATE:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

784 if (pEntry->NewDestComHandle != OS_ERROR)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

785 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

786 OS_QDATA QData;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

787 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

788 QData.len = (USHORT)(PSIZE(P2D(Msg->ptr))-sizeof(T_PRIM_HEADER));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

789 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

790 /* QData.len = 4; not needed if per reference */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

791 T_DP_HEADER *dp_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

792 #if 0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

793 P_ATTACH(P2D(prim)); /* recursivly increase use counters */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

794 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

795 prim->use_cnt++;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

796 if ( prim->dph_offset != 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

797 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

798 dp_hdr = (T_DP_HEADER*)((ULONG*)prim + prim->dph_offset);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

799 /* only increment use_cnt for dynamic primitives - not for DTI primitives */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

800 if ( dp_hdr->magic_nr == GUARD_PATTERN )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

801 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

802 do

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

803 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

804 dp_hdr->use_cnt++;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

805 } while ( (dp_hdr = (T_DP_HEADER*)dp_hdr->next) != NULL );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

806 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

807 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

808 #endif /* 0 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

809

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

810 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

811 QData.data16 = MSG_PRIMITIVE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

812 QData.ptr = Msg->ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

813

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

814 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

815 if (pEntry->NewDestComHandle != rt_tst_handle)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

816 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

817 Msg->e_id = pEntry->NewDestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

818 os_SendToQueue ( SndTaskHandle, pf_TaskTable[pEntry->NewDestComHandle].QueueHandle, OS_NORMAL, OS_SUSPEND, Msg );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

819 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

820 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

821 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

822 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

823 /* if on tool side or sending via TST -> send with sys header a.s.o */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

824 rt_ExtPrimitive ( SndTaskHandle, pEntry->NewDestComHandle, RcvComHandle, pEntry->ExtDest, &QData );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

825 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

826 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

827 if ( pEntry->Command & RT_REDIRECT )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

828 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

829 T_VOID_STRUCT *free_ptr = (T_VOID_STRUCT*)P2D(prim);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

830

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

831 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

832 if ((prim->opc & MEMHANDLE_OPC) && (mem!=NULL))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

833 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

834 if (P_MEMHANDLE(prim)!=0)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

835 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

836 mem->dealloc(P_MEMHANDLE(prim));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

837 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

838 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

839 #endif /* !_TOOLS_ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

840

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

841 vsi_free ((T_VOID_STRUCT**)&free_ptr FILE_LINE_MACRO);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

842 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

843 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

844 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

845 default:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

846 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

847 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

848 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

849 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

850 pEntry = pEntry->pNextEntry;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

851 } while ( pEntry );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

852 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

853 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

854

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

855 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

856 * send original

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

857 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

858

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

859 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

860 return ( (SHORT)os_SendToQueue ( SndTaskHandle, RcvComHandle, Prio, Suspend, Msg ) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

861 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

862 if((pf_TaskTable[RcvComHandle].Flags & USE_LEMU_QUEUE) AND

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

863 (lemu_SendToQueue_func.magic_nr == LEMU_SENDTOQUEUE_INITIALIZED))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

864 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

865 if(lemu_SendToQueue_func.plemu_SendToQueue( SndTaskHandle, RcvComHandle,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

866 pf_TaskTable[RcvComHandle].QueueHandle, Prio, Suspend, Msg )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

867 != lemu_SendToQueue_func.ret_ok )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

868 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

869 return OS_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

870 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

871 return OS_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

872 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

873 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

874 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

875 return ( (SHORT)os_SendToQueue ( SndTaskHandle, pf_TaskTable[RcvComHandle].QueueHandle, Prio, Suspend, Msg ) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

876 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

877 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

878 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

879 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

880

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

881 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

882 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

883 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

884 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

885 | STATE : code ROUTINE : rt_ExtPrimitive |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

886 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

887

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

888 PURPOSE : formats duplicated primitive to be sent to TST

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

889

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

890 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

891 void rt_ExtPrimitive ( T_HANDLE TaskHandle, T_HANDLE DestComHandle, T_HANDLE OrgDestTaskHandle, char *ExtDest, OS_QDATA *Msg )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

892 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

893 T_PRIM_HEADER *prim;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

894 #ifndef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

895 T_PRIM_HEADER *sdu_prim;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

896 #endif /* not _TOOLS_ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

897 T_PRIM_HEADER *ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

898 T_S_HEADER *s_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

899 OS_QDATA DMsg;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

900 ULONG AllocSize;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

901 LONG Status;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

902 ULONG suspend;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

903 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

904 T_S_HEADER *prim_s_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

905 unsigned int i;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

906 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

907

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

908 prim = (T_PRIM_HEADER*)Msg->ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

909 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

910 AllocSize = S_ALLOC_SIZE(Msg->len + 1); /* +1 To add LF in TIF */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

911 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

912 if ( prim->dph_offset != 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

913 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

914 T_DP_HEADER *dp_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

915

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

916 dp_hdr = (T_DP_HEADER*)((ULONG*)prim + prim->dph_offset);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

917 if ( dp_hdr->magic_nr != GUARD_PATTERN

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

918 #ifdef _TARGET_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

919 && route_desclist[TaskHandle] == TRUE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

920 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

921 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

922 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

923 rt_desclist_to_sdu ( TaskHandle, DestComHandle, prim, &sdu_prim );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

924 prim = sdu_prim;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

925 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

926 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

927

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

928 AllocSize = S_ALLOC_SIZE(4 + 1); /* only ptr to primitive */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

929 #endif /* _TOOLS_ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

930 suspend = get_suspend_state(TaskHandle,CHECK_PRIM_SUSPEND);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

931 Status = os_AllocatePartition ( TaskHandle, (T_VOID_STRUCT**)&ptr, AllocSize, suspend, TestGroupHandle );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

932 if ( Status == OS_OK || Status == OS_WAITED || Status == OS_ALLOCATED_BIGGER )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

933 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

934 DMsg.data16 = MSG_PRIMITIVE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

935 DMsg.data32 = Msg->data32;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

936 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

937 DMsg.len = AllocSize;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

938 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

939 DMsg.ptr = (T_VOID_STRUCT*)ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

940

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

941 ptr->opc = prim->opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

942 ptr->len = AllocSize;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

943 ptr->sh_offset = S_HDR_OFFSET(AllocSize - sizeof(T_S_HEADER));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

944 s_hdr = (T_S_HEADER*)((ULONG*)ptr + ptr->sh_offset);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

945 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

946 if ( prim->sh_offset == 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

947 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

948 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

949 if the primitive is sent via the TAP REDIRECT TAP ... mechanism, then the prim->sh_offset

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

950 is zero and the org_rcv is filled corresponding to the original addressed entity name.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

951 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

952 vsi_e_name ( TaskHandle, OrgDestTaskHandle, TaskName );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

953 strcpy (s_hdr->org_rcv, TaskName);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

954 strcpy (s_hdr->rcv, ExtDest);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

955 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

956 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

957 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

958 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

959 if the primitive is sent via the TAP TPORT mechanism then the original receiver is already

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

960 filled by the TAP and copied to the newly allocated primitive to be routed.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

961 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

962 prim_s_hdr = (T_S_HEADER*)((ULONG*)prim + prim->sh_offset);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

963

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

964 for (i = 0; prim_s_hdr->org_rcv[i] != 0 && i < sizeof (s_hdr->org_rcv)-1; i++)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

965 s_hdr->org_rcv[i] = prim_s_hdr->org_rcv[i];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

966 for (i = 0; prim_s_hdr->rcv[i] != 0 && i < sizeof (s_hdr->rcv)-1; i++)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

967 s_hdr->rcv[i] = prim_s_hdr->rcv[i];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

968 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

969 get_local_time (&s_hdr->time);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

970 os_GetTaskName ( TaskHandle, TaskHandle, TaskName );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

971 strcpy (s_hdr->snd, TaskName);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

972 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

973 vsi_e_name ( TaskHandle, OrgDestTaskHandle, TaskName );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

974 strcpy (s_hdr->org_rcv, TaskName);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

975 strcpy (s_hdr->rcv, ExtDest);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

976 os_GetTime(TaskHandle,&s_hdr->time);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

977 s_hdr->snd[0] = (char)(TaskHandle | HANDLE_BIT);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

978 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

979 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

980 memcpy ( (char*)P2D(ptr), P2D(Msg->ptr), Msg->len );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

981 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

982 ((T_PRIM_X*)(ptr))->prim_ptr = prim;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

983 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

984 DMsg.e_id = DestComHandle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

985 #ifdef _TOOLS_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

986 os_SendToQueue ( TaskHandle, DestComHandle, OS_NORMAL, OS_SUSPEND, &DMsg );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

987 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

988 if ((prim->opc & MEMHANDLE_OPC) && (mem!=NULL))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

989 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

990 if (P_MEMHANDLE_SDU(prim)==0x00000000)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

991 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

992 /* copy MEM-handle content into new sdu */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

993 U8 *user_data;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

994 U16 ptr_length;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

995 user_data=mem->get_user_data(P_MEMHANDLE(prim), &ptr_length);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

996

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

997 if (user_data)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

998 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

999 T_sdu *sdu=(T_sdu *)M_ALLOC(ptr_length+2*sizeof(U16));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1000

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1001 sdu->l_buf=ptr_length*8;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1002 sdu->o_buf=0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1003 memcpy(sdu->buf,user_data,ptr_length);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1004

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1005 P_MEMHANDLE_SDU(prim)=(U32)sdu;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1006 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1007 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1008 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1009 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1010 M_ATTACH((void*)P_MEMHANDLE_SDU(prim));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1011 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1012 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1013

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1014 if ( PrimAborted[TaskHandle] > 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1015 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1016 if ( vsi_o_ttrace ( 0, TC_SYSTEM, "%d %s primitive routings aborted",PrimAborted[TaskHandle], pf_TaskTable[TaskHandle].Name ) == VSI_OK )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1017 PrimAborted[TaskHandle] = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1018 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1019 if ( os_SendToQueue ( TaskHandle, pf_TaskTable[DestComHandle].QueueHandle, OS_NORMAL, suspend, &DMsg ) == OS_TIMEOUT )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1020 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1021 T_VOID_STRUCT *free_ptr = (T_VOID_STRUCT*)P2D(prim);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1022 vsi_free ((T_VOID_STRUCT**)&free_ptr FILE_LINE_MACRO);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1023 vsi_trc_free (0, (T_VOID_STRUCT**)&ptr);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1024 PrimAborted[TaskHandle]++;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1025 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1026 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1027 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1028 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1029 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1030 T_VOID_STRUCT *free_ptr = (T_VOID_STRUCT*)P2D(prim);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1031 vsi_free ((T_VOID_STRUCT**)&free_ptr FILE_LINE_MACRO);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1032 PrimAborted[TaskHandle]++;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1033 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1034 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1035 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1036

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1037 #ifndef RUN_INT_RAM

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1038 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1039 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1040 | PROJECT : GSM-PS (6147) MODULE : PF_ROUTE |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1041 | STATE : code ROUTINE : rt_desclist_to_sdu |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1042 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1043

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1044 PURPOSE : formats duplicated primitive with descriptor list into a

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1045 primitive with SDU

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1046

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1047 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1048 int rt_desclist_to_sdu ( T_HANDLE caller, T_HANDLE dst, T_PRIM_HEADER *prim, T_PRIM_HEADER **sdu_prim )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1049 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1050 T_PRIM_HEADER *ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1051 T_DP_HEADER *dp_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1052 T_M_HEADER *m_hdr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1053 T_desc3 *desc3;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1054 T_desc2 *desc2;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1055 T_desc *desc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1056 int len = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1057 int sdu_prim_size = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1058 char *fill_ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1059 USHORT *l_buf_ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1060 USHORT *o_buf_ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1061 char *sdu_data_ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1062 T_sdu *sdu = NULL;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1063 unsigned int new_opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1064 int desc_type = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1065

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1066 dp_hdr = (T_DP_HEADER*)((ULONG*)prim + prim->dph_offset);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1067 /* primitive contains descriptor list */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1068

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1069 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1070 START OF NON GENERIC CODE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1071 This code is for the phase 1 routing of primitives containing descriptor lists.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1072 It is non-generic and depends on the primitive ids defined in SAP docs.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1073 It should be removed as soon as the generic descriptor list routing is ready

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1074 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1075 switch ( prim->opc )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1076 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1077 case 0x7754: /* DTI2_DATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1078 new_opc = 0x7755; /* DTI2_DATA_TEST_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1079 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1080 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1081 case 0x3754: /* DTI2_DATA_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1082 new_opc = 0x3755; /* DTI2_DATA_TEST_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1083 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1084 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1085 case 0x6800: /* SN_DATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1086 new_opc = 0x6806; /* SN_DATA_TEST_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1087 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1088 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1089 case 0x2800: /* SN_DATA_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1090 new_opc = 0x2806; /* SN_DATA_TEST_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1091 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1092 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1093 case 0x6801: /* SN_UNITDATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1094 new_opc = 0x6807; /* SN_DATA_TEST_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1095 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1096 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1097 case 0x2801: /* SN_UNITDATA_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1098 new_opc = 0x2807; /* SN_DATA_TEST_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1099 desc_type = VSI_DESC_TYPE2 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1100 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1101 case 0x7701: /* DTI_DATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1102 new_opc = 0x7702; /* DTI_DATA_TEST_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1103 desc_type = VSI_DESC_TYPE1 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1104 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1105 case 0x3701: /* DTI_DATA_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1106 new_opc = 0x3702; /* DTI_DATA_TEST_REQ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1107 desc_type = VSI_DESC_TYPE1 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1108 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1109 case 0x80004097: /* GRLC_DATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1110 new_opc = 0x80014097; /* GRLC_DATA_IND_TEST */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1111 desc_type = VSI_DESC_TYPE1 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1112 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1113 case 0x80024097: /* GRLC_UNITDATA_IND */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1114 new_opc = 0x80034097; /* GRLC_UNITDATA_IND_TEST */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1115 desc_type = VSI_DESC_TYPE1 >> 16;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1116 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1117 default:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1118 new_opc = prim->opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1119 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1120 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1121 /* END OF NON GENERIC CODE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1122

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1123 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1124 it has to be distinguished between T_desc, T_desc2 and T_desc3 because to length information

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1125 is located at different places inside the structure

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1126 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1127 m_hdr = (T_M_HEADER*)(((T_desc_list*)dp_hdr)->first) - 1;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1128 if ( m_hdr->desc_type != 0 )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1129 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1130 desc_type = m_hdr->desc_type;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1131 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1132 if ( desc_type == (VSI_DESC_TYPE2 >> 16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1133 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1134 desc2 = (T_desc2*)(((T_desc_list2*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1135 while (desc2 != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1136 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1137 len = len + desc2->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1138 desc2 = (T_desc2 *)desc2->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1139 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1140 /* the size to be allocated for the primitive containing the sdu needs to be

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1141 root prim length + data length + sdu size minus data buffer - desc list2 size */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1142 sdu_prim_size = prim->len + len + sizeof(sdu->l_buf) + sizeof(sdu->o_buf) - sizeof(T_desc_list2);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1143 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1144 else if ( desc_type == (VSI_DESC_TYPE1 >> 16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1145 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1146 desc = (T_desc*)(((T_desc_list*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1147 while (desc != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1148 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1149 len = len + desc->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1150 desc = (T_desc *)desc->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1151 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1152 /* the size to be allocated for the primitive containing the sdu needs to be

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1153 root prim length + data length + sdu size minus data buffer - desc list size */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1154 sdu_prim_size = prim->len + len + sizeof(sdu->l_buf) + sizeof(sdu->o_buf) - sizeof(T_desc_list);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1155 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1156 else if ( desc_type == (VSI_DESC_TYPE3 >> 16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1157 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1158 /* it is assumed that type 3 is valid if not 1 or 2 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1159 desc3 = (T_desc3*)(((T_desc_list3*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1160 while (desc3 != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1161 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1162 len = len + desc3->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1163 desc3 = (T_desc3 *)desc3->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1164 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1165 /* the size to be allocated for the primitive containing the sdu needs to be

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1166 root prim length + data length + sdu size minus data buffer - desc list3 size */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1167 sdu_prim_size = prim->len + len + sizeof(sdu->l_buf) + sizeof(sdu->o_buf) - sizeof(T_desc_list3);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1168 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1169 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1170 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1171 vsi_o_ttrace ( 0, TC_SYSTEM, "unknown desc type in 0x%x, routing aborted", prim->opc );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1172 vsi_c_free ( caller, (T_VOID_STRUCT**)&prim FILE_LINE_MACRO );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1173 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1174 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1175

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1176 if ( sdu_prim_size < (int)MaxPrimPartSize )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1177 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1178 ptr = (T_PRIM_HEADER*)vsi_c_new ( caller, sdu_prim_size, new_opc FILE_LINE_MACRO );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1179 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1180 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1181 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1182 vsi_o_ttrace ( 0, TC_SYSTEM, "desclist in 0x%x too long, routing aborted", prim->opc );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1183 vsi_c_free ( caller, (T_VOID_STRUCT**)&prim FILE_LINE_MACRO );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1184 return RT_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1185 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1186 #ifdef MEMORY_SUPERVISION

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1187 vsi_ppm_send ( caller, dst, (T_PRIM_HEADER*)ptr FILE_LINE_MACRO );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1188 #endif /* MEMORY_SUPERVISION */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1189

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1190 fill_ptr = (char*)ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1191 l_buf_ptr = &((T_sdu*)((int*)fill_ptr + prim->dph_offset))->l_buf;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1192 o_buf_ptr = &((T_sdu*)((int*)fill_ptr + prim->dph_offset))->o_buf;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1193 sdu_data_ptr = (char*)&((T_sdu*)((int*)fill_ptr + prim->dph_offset))->buf;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1194

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1195 memcpy ( (char*)P2D(fill_ptr), (char*)P2D(prim), prim->len-sizeof(T_PRIM_HEADER) );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1196

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1197 *l_buf_ptr = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1198 *o_buf_ptr = 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1199

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1200 fill_ptr = sdu_data_ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1201

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1202 if ( desc_type == (VSI_DESC_TYPE2 >> 16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1203 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1204 desc2 = (T_desc2*)(((T_desc_list2*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1205 while (desc2 != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1206 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1207 *l_buf_ptr += (desc2->len*8);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1208 memcpy ( fill_ptr, (char*)(&desc2->buffer)+desc2->offset, desc2->len );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1209 fill_ptr += desc2->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1210 desc2 = (T_desc2 *)desc2->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1211 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1212 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1213 else if ( desc_type == (VSI_DESC_TYPE1 >> 16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1214 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1215 desc = (T_desc*)(((T_desc_list*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1216 while (desc != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1217 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1218 *l_buf_ptr += (desc->len*8);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1219 memcpy ( fill_ptr, (char*)(&desc->buffer), desc->len );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1220 fill_ptr += desc->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1221 desc = (T_desc *)desc->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1222 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1223 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1224 else if ( desc_type == (VSI_DESC_TYPE3 >>16) )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1225 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1226 desc3 = (T_desc3*)(((T_desc_list3*)dp_hdr)->first);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1227 while (desc3 != NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1228 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1229 *l_buf_ptr += (desc3->len*8);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1230 memcpy ( fill_ptr, (char*)(desc3->buffer)+desc3->offset, desc3->len );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1231 fill_ptr += desc3->len;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1232 desc3 = (T_desc3 *)desc3->next;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1233 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1234 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1235 vsi_c_free ( caller, (T_VOID_STRUCT**)&prim FILE_LINE_MACRO );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1236 *sdu_prim = ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1237 return RT_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1238 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1239 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1240

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1241

FreeCalypso > hg > freecalypso-citrine

annotate gpf/frame/route.c @ 0:75a11d740a02