fc-selenite: src/gpf/tst/tst

annotate src/gpf/tst/tst_pei.c @ 112:fdecfb3bd860

.../drv_app/r2d/r2d_*.c: LCD include case fixes from Magnetite R2D is not used in Selenite, but we strive to keep the two source trees in sync as much as possible to reduce the diffs.

author	Mychaela Falconia <falcon@freecalypso.org>
date	Sat, 13 Oct 2018 16:56:22 +0000
parents	8b2a9a374324
children

rev	line source
6 8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +------------------------------------------------------------------------------
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| File: tst_pei.c
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 +------------------------------------------------------------------------------
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 \| Copyright 2004 Texas Instruments Deutschland, AG
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| All rights reserved.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \| This file is confidential and a trade secret of Texas
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| Instruments Berlin, AG
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| The receipt of or possession of this file does not convey
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| any rights to reproduce or disclose its contents or to
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| manufacture, use, or sell anything it may describe, in
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| whole, or in part, without the specific written consent of
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| Texas Instruments Deutschland, AG.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 +-----------------------------------------------------------------------------
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 \| Purpose : This Modul contains the PEI interface of TST
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 +-----------------------------------------------------------------------------
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 #ifndef __TST_PEI_C__
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 #define __TST_PEI_C__
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24 #define ENTITY_TST
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 /==== INCLUDES ===================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 #include <string.h>
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 #include <stdio.h>
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 #include <stdlib.h>
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include "frame_const.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #include <stdlib.h>
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #ifndef _TARGET_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "printtofile.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "typedefs.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "vsi.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "frame.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "pei.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "os.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "tools.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "gdi.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "os.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "frm_defs.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #include "frm_types.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 #include "frm_glob.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 #include "route.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #include "drvconf.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 #include "tstdriver.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #include "tstheader.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 #include "tst_mux.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 #include "pcon.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 #ifdef CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #include "tst_primitives.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 #ifdef _PSOS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 #include "pna.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 #include "ffs/ffs_api.h"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 /==== TYPES ======================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 #undef VSI_CALLER
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 #define VSI_CALLER TST_Handle,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 #define VSI_CALLER e_running[os_MyHandle()],
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 /==== CONSTANTS ==================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 #ifdef _VXWORKS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 #define TST_STACKSIZE 8192
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 #define TST_PRIORITY 190 /* priority (1->high, 255->low) */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #define TST_STACKSIZE 4096
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 #define TST_PRIORITY 15
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #define TST_SND_PRIORITY 15 /* priority (1->low, 255->high) */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 #define TST_RCV_PRIORITY 15 /* priority (1->low, 255->high) */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 #define TST_STACKSIZE 1024
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #define TST_PRIORITY 2
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 #define TST_SND_PRIORITY 6 /* priority (1->low, 255->high) */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #define TST_RCV_PRIORITY 7 /* priority (1->low, 255->high) */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #define TST_TIMERS 2
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #define GET_STACK_TIME_TIMER_INDEX 0
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 #define GET_STACK_TIME_TIMER_DURATION 60000
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #define TST_SYNC_TIMER_INDEX 1
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #define TST_SYNC_TIMER_DURATION 2000
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 #define TST_TIMERS 0
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #define TRACEMASKFILE "/var/dbg/tracemask"
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 #define DRV_CALLBACK_OPC 0
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 #define TR_RCV_BUF_SIZE (MAX_PRIM_PARTITION_SIZE)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 #define TR_MAX_IND (TR_RCV_BUF_SIZE-1)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 USHORT MaxEntities = MAX_ENTITIES;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 /==== EXTERNALS ==================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 extern const T_PCON_PROPERTIES *pcon;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 extern const USHORT TST_SndQueueEntries;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 extern const USHORT TST_RcvQueueEntries;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 extern const USHORT TST_SndStacksize;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 extern const USHORT TST_RcvStacksize;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 extern UBYTE FrameEnv;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 __declspec (dllimport) UBYTE SuppressOK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 extern char *str2ind_version;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 extern UBYTE SuppressOK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 #ifdef CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 static T_HANDLE hCommIDLE = VSI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 extern short idle_pei_create (T_PEI_INFO const ** info);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 extern char TaskName[];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 /==== VARIABLES ==================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 T_HANDLE TST_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 T_HANDLE RCV_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 T_HANDLE TIF_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 UBYTE TST_DrvState = TST_DRV_DISCONNECTED;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 static char const *ok_string = "OK";
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 static UBYTE frmenv;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 ULONG TR_RcvBufferSize = TR_RCV_BUF_SIZE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 ULONG TR_MaxInd = TR_MAX_IND;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 int tst_syncronized = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 int tst_message_received = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 int tst_sync_timeout_cnt = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 int tst_max_sync_timeout = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 int tst_sync_mode = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 int tst_sync_sucess = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 int tst_sync_started = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 int tst_status_received = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 T_HANDLE tst_sync_req_handle = VSI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 char sync_req_name[RESOURCE_NAMELEN];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 char sync_req_time[16];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 GLOBAL USHORT tst_task_priority = TST_PRIORITY;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 GLOBAL ULONG tst_task_stack_size = TST_STACKSIZE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 extern SHORT tst_pei_primitive (void *primitive);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 #endif /* RUN_INT_RAM */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 #ifdef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 extern T_HANDLE TST_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 extern T_HANDLE RCV_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 extern T_HANDLE TIF_Handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 extern UBYTE TST_DrvState;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 #ifdef CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 static char ctb_rcv[4];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 static U32 ctb_remaining_tick_time=0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 BOOL ctb_tick_enabled = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 BOOL ctb_sent_to_tap = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 T_HANDLE idle_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 /==== FUNCTIONS ==================================================/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 #ifndef RUN_FLASH
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 \| STATE : code ROUTINE : pei_primitive \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 SHORT tst_pei_primitive (void *primitive)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 T_PRIM_HEADER prim = (T_PRIM_HEADER)primitive;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 T_VOID_STRUCT *prim_ptr = NULL;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 SHORT ret = PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 if ( ((SAP_NR(prim->opc)==TRACE_SAP) \|\| (prim->opc==TRACE_OPC)) && (P_SHO(prim)!=0) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 prim->opc = SYS_MASK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 if ( (SAP_NR(prim->opc)!=TRACE_SAP) && (prim->opc!=TRACE_OPC) && !(prim->opc & SYS_MASK) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 prim_ptr = (T_VOID_STRUCT)(((T_PRIM_X)prim)->prim_ptr);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 VSI_PPM_RCV(prim_ptr);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 PTRACE_OUT(prim->opc );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 if ( TST_DrvState == TST_DRV_CONNECTED )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 if ( vsi_d_write ( TST_Handle, TIF_Handle, primitive, prim->len ) != VSI_OK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 ret = PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 vsi_t_sleep(TST_Handle,10);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 if ( prim_ptr != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 FREE(P2D(prim_ptr));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 vsi_trc_free (0, (T_VOID_STRUCT**)&prim);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 return ( ret );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 \| STATE : code ROUTINE : pei_init \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 LOCAL SHORT pei_init ( T_HANDLE handle )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 T_HANDLE h_pco;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 T_HANDLE entityTraceMask;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 ULONG actual;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 T_FFS_FD fd;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 T_RV_RETURN retPath;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 BOOL gotAll = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 TST_Handle = handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 while (vsi_c_open (0, FRM_RCV_NAME) < VSI_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 vsi_t_sleep(0,100);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 frmenv = (UBYTE) pf_get_frameenv ();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 if ( os_OpenQueue (0, FRM_PCO_NAME, &h_pco) == OS_OK \|\|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 os_create_extq (FRM_PCO_NAME, &h_pco) == OS_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 vsi_o_set_htrace (h_pco);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 #ifdef _DEBUG
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 fprintf (stdout,"TST: %s commH set to %d\n", FRM_PCO_NAME,h_pco);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 vsi_t_start ( handle, GET_STACK_TIME_TIMER_INDEX, GET_STACK_TIME_TIMER_DURATION );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 if ( vsi_c_open (TST_Handle, FRM_RCV_NAME) < VSI_OK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 return PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 RCV_Handle = vsi_e_handle ( TST_Handle, FRM_RCV_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 frmenv = FrameEnv;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 #ifndef _TARGET_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 initPrintToFile();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 if ( vsi_d_init ( TST_Handle ) != VSI_OK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 #ifndef _TARGET_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 printf("SYSTEM ERROR: Driver initialization failed\n");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 vsi_o_assert ( TST_Handle, OS_SYST_ERR, __FILE__, __LINE__, "SYSTEM ERROR: Testinterface driver initialization failed" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 ;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 TIF_Handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 vsi_d_setsignal ( TST_Handle, 0, DRV_SIGTYPE_READ\|DRV_SIGTYPE_CONNECT\|DRV_SIGTYPE_DISCONNECT);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 vsi_d_setconfig ( TST_Handle, 0, NULL );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 vsi_trcsuspend ( TST_Handle, TST_Handle, OS_NO_SUSPEND );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 SuppressOK = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 tst_mux_init();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 fd = ffs_open(TRACEMASKFILE, FFS_O_RDWR);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 if (fd < 0)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 // could not open nor create /var/dbg/tracemask warning
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_init: no trace mask in FFS");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 InitializeTrace();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 TraceMask[0] = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 TraceMask[0] \|= TC_SYSTEM\|TC_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 for (entityTraceMask = 0; entityTraceMask < (MaxEntities + 1); entityTraceMask++)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 actual = TraceMask[entityTraceMask];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 if (ffs_read(fd, (void*)&TraceMask[entityTraceMask], sizeof(ULONG) ) != sizeof(ULONG) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 gotAll = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 if (entityTraceMask == 0) // first element
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 TraceMask[0] = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 TraceMask[0] \|= TC_SYSTEM\|TC_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 if (actual != TraceMask[entityTraceMask])
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 // not the default trace mask, generate warning
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 if ( vsi_e_name ( 0, entityTraceMask, TaskName ) == VSI_OK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_init: FFS trace mask gave 0x%08x for %s (default 0x%08x)", TraceMask[entityTraceMask], TaskName, actual);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 ffs_close(fd);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 if (!gotAll)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_init: some trace masks can't be read from FFS");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 \| STATE : code ROUTINE : pei_exit \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 static SHORT pei_exit (void)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 T_HANDLE rcvh=vsi_p_handle (0, FRM_RCV_NAME);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 if (rcvh > VSI_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 /* exit RCV process */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 vsi_p_exit ( TST_Handle, vsi_p_handle (0, FRM_RCV_NAME));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 /* exit all drivers */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 vsi_d_exit ( TST_Handle, 0);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 \| STATE : code ROUTINE : pei_timeout \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 LOCAL SHORT pei_timeout (USHORT index)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 switch ( index )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 case GET_STACK_TIME_TIMER_INDEX:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 #if 0
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 if ( tst_message_received == 1 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 tst_drv_write ( NO_TASK, SYS_MASK, FRM_TST_NAME, (char*)SYSPRIM_GET_STACK_TIME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 vsi_t_start ( VSI_CALLER GET_STACK_TIME_TIMER_INDEX, GET_STACK_TIME_TIMER_DURATION );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 case TST_SYNC_TIMER_INDEX:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 if ( tst_sync_timeout_cnt++ >= tst_max_sync_timeout-1 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 T_HANDLE tif_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 T_VOID_STRUCT *ptr;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 tst_status_received = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 tst_sync_timeout_cnt = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 tst_sync_mode = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 tst_sync_sucess = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 tif_handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428 vsi_d_setconfig ( TST_Handle, tif_handle, DISABLE_SYNC_MODE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 vsi_t_stop ( TST_Handle, TST_SYNC_TIMER_INDEX );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 ptr = vsi_c_pnew ( sizeof(T_PRIM_HEADER)+strlen(SYSPRIM_TST_SYNC_REJ), 0x8000 FILE_LINE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 strcpy ( (char*)ptr, SYSPRIM_TST_SYNC_REJ );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 vsi_c_psend ( tst_sync_req_handle, ptr );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 if ( tst_syncronized == 0 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 T_HANDLE tif_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 tst_sync_sucess = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 tst_status_received = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 tif_handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 vsi_d_setconfig ( TST_Handle, tif_handle, ENABLE_SYNC_MODE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"TRACECLASS 0x10" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 vsi_t_sleep ( TST_Handle, 100 );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"STATUS TASK" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 vsi_t_start ( TST_Handle, TST_SYNC_TIMER_INDEX, TST_SYNC_TIMER_DURATION );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 vsi_t_sleep ( TST_Handle, 200 );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"ROUTING" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 default:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 \| STATE : code ROUTINE : pei_signal \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 LOCAL SHORT pei_signal (ULONG SignalType, void *ptr)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 * the following line of code causes a warning on tms470 compiler, that cannot be avoided
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 * without changing the PEI interface. Warning will not cause a problem
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 T_VOID_STRUCT sig_ptr = (T_VOID_STRUCT)ptr;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 T_PRIM_HEADER *prim;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 T_S_HEADER *s_hdr;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476 T_HANDLE DestTaskHandle, DestComHandle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 T_HANDLE min, max, i;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 unsigned int Length;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 ULONG Suspend, TraceMask, OldTraceMask;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 unsigned int Offset = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 char token[81];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 UBYTE FreePrim = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 SHORT ret = PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 USHORT processed = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 switch ( SignalType )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 case DRV_SIGTYPE_READ:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 VSI_PPM_RCV(sig_ptr);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 if ( (prim = ((T_PRIM_X*)sig_ptr)->prim_ptr) != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 VSI_PPM_RCV (prim);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 s_hdr = (T_S_HEADER)((ULONG)prim + prim->sh_offset);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 DestTaskHandle = vsi_e_handle ( TST_Handle, s_hdr->rcv );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 if ( DestTaskHandle == VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 if ( !strcmp ( "IRQ", s_hdr->rcv ) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 DestTaskHandle = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 OldTraceMask = TC_SYSTEM;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501 TraceMask = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	505 if ( !strcmp ( "SYST", s_hdr->rcv ) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	507 DestTaskHandle = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	508 vsi_gettracemask ( DestTaskHandle, 0, &OldTraceMask);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509 TraceMask = TC_SYSTEM;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	512 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513 OldTraceMask = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 TraceMask = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	520 /* to satisfy LINT */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	521 OldTraceMask = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	522 TraceMask = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	523 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524 if ( DestTaskHandle != VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	526 if ( prim->opc & SYS_MASK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	527 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528 Length = GetNextToken ((char*)(P2D(prim)), token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 Offset = Length+1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 if ( frmenv == ENV_STACK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532 /* Set Traceclass for non-frame tasks/HISRs */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533 if ( DestTaskHandle == 0 && !strcmp (token, SYSPRIM_TRACECLASS_TOKEN) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535 Length = GetNextToken ((char *)(P2D(prim))+Offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 TraceMask = ASCIIToHex(token, CHARS_FOR_32BIT);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 vsi_settracemask ( DestTaskHandle, 0, TraceMask\|OldTraceMask); /* it is not allowed to switch of system traces */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 sprintf ( token, "%s (%s %s)", ok_string, (char*)(P2D(prim)), s_hdr->rcv );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 if (!strcmp (token, SYSPRIM_TRC_SUSPEND))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 * set suspend for traces to SUSPEND or NO_SUSPEND
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548 Length = GetNextToken ((char *)(P2D(prim))+Offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549 Offset += (Length+1);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551 if ( !strcmp ( token, "ALL" ) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553 min = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 max = MaxEntities;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555 GetNextToken ((char *)(P2D(prim))+Offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559 min = DestTaskHandle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	560 max = min;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 if ( !strcmp ( token, "YES" ) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 Suspend = 0xffffffff;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565 Suspend = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567 for ( i = min; i <= max; i++ )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	568 vsi_trcsuspend ( TST_Handle, i, Suspend );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	569 sprintf ( token, "%s (%s %s)", ok_string, (char*)(P2D(prim)), s_hdr->rcv );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	570 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	571 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	572 else if (!strcmp (token, SYSPRIM_MEMCHECK_TOKEN))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576 * Memory Check
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578 for ( i = 1; i <= MaxEntities; i++ )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580 if ( vsi_object_info (TST_Handle, OS_OBJTASK, (USHORT)i, token, sizeof(token)) != VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	582 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	583 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	584 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	585 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	586 #ifdef CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	587 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	588 else if (!strcmp (token, SYSPRIM_TIMER_TICK_REQ))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	589 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	590 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	591 ctb_sent_to_tap = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 if(strlen(ctb_rcv)<3)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	593 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	594 strcpy(ctb_rcv, P_SND(prim));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 ctb_remaining_tick_time = P_TIME(prim); //The time parameter is sent in the time stap.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	597 /*sprintf ( token, "Requesting ticking for %d from %s", ctb_remaining_tick_time, ctb_rcv);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598 tst_drv_write ( NO_TASK, 0, NULL, token );*/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	599 PSIGNAL(hCommIDLE, IDLE_REQ, NULL);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601 else if (!strcmp (token, SYSPRIM_INT_TICK_MODE_REQ))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604 if(ctb_tick_enabled)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606 vsi_p_delete (TST_Handle,idle_handle);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	607 ctb_tick_enabled = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608 ctb_sent_to_tap = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609 sprintf ( token, "Disabling Common Timer Base");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 ctb_rcv[0]='\0';
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611 os_StartTicking();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 sprintf ( token, "Common Timer Base already disabled");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 if(!strcmp(P_SND(prim), "TAP"))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 tst_drv_write ( NO_TASK, SYS_MASK, "TAP", "INT_TICK_MODE_CNF");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 else if (!strcmp (token, SYSPRIM_EXT_TICK_MODE_REQ))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624 if(!ctb_tick_enabled)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626 if ( (idle_handle = vsi_p_create (TST_Handle, idle_pei_create, NULL, 1)) == VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 vsi_o_assert ( TST_Handle, OS_SYST_ERR, __FILE__, __LINE__, "CTB: Cannot create IDLE task" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630 vsi_p_start (TST_Handle, idle_handle);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 while ( (hCommIDLE = vsi_e_handle ( TST_Handle, "IDLE" ))<VSI_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 vsi_t_sleep(0,1000);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635 os_StopTicking();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 sprintf ( token, "Enabling Common Timer Base");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 ctb_tick_enabled = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640 sprintf ( token, "Common Timer Base already enabled");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642 if(!strcmp(P_SND(prim), "TAP"))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 char send_str[50];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 char tmp_str[8];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646 //Get process id and put in this syst primitive.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 strcpy(send_str,"EXT_TICK_MODE_CNF#");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 _itoa(os_GetProcessId(), tmp_str, 10);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649 strcat(send_str, tmp_str);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 tst_drv_write ( NO_TASK, SYS_MASK, "TAP", send_str);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 #endif //CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 #ifndef _TARGET_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657 else if (!strcmp (token, SYSPRIM_SUPPRESS_OK))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660 SuppressOK = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 else if (!strcmp (token, SYSPRIM_GET_STACK_TIME))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	665 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	666 tst_drv_write ( NO_TASK, SYS_MASK, FRM_TST_NAME, (char*)SYSPRIM_IS_STACK_TIME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	667 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	668 else if (!strcmp (token, SYSPRIM_READ_ROUTING))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	669 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	670 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	671 i = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	672 while ( rt_RouteRead ( DestTaskHandle, token ) != RT_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	673 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	674 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	675 i++;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	676 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 if ( !i )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	678 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	679 sprintf ( token, "NO %s ROUTINGS STORED", s_hdr->rcv );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	680 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	684 else if (!strcmp (token, SYSPRIM_STR2IND_VERSION))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	686 processed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687 tst_drv_write ( NO_TASK, 0, NULL, str2ind_version );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	693 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	695 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696 /* synchronization with protocol stack */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697 if ( tst_sync_mode == 1 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699 char *pos;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700 char task_status;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	701 T_VOID_STRUCT *cmd_ptr;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	703 pos = strstr ( (char*)(P2D(prim)), "Name:" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	704 if ( pos != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	705 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	706 tst_sync_started = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707 GetNextToken ((char *)(P2D(prim))+strlen("Name:"), token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	708 if ( strcmp(token,FRM_RCV_NAME) && strcmp(token,FRM_TST_NAME) && strcmp(token,"EXTR") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	709 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710 pos = strstr ( (char*)(P2D(prim)), "Stat:" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711 if ( pos != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713 tst_status_received = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714 task_status = atoi(pos+strlen("Stat:"));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715 if ( task_status != 6 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	716 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 tst_sync_sucess = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	723 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 if ( tst_sync_started == 1 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726 pos = strstr ( (char*)(P2D(prim)), "ROUTING" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	727 if ( pos != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 if ( tst_sync_sucess == 1 && tst_status_received == 1 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	730 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	731 T_HANDLE tif_handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	732 vsi_d_setconfig ( TST_Handle, tif_handle, DISABLE_SYNC_MODE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	733 vsi_t_stop ( TST_Handle, TST_SYNC_TIMER_INDEX );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	734 cmd_ptr = vsi_c_pnew ( sizeof(T_PRIM_HEADER)+strlen(SYSPRIM_TST_SYNC_CNF), 0x8000 FILE_LINE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	735 strcpy ( (char*)cmd_ptr, SYSPRIM_TST_SYNC_CNF );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	736 vsi_o_ttrace ( TST_Handle, TC_TIMER, "SYNC DONE") ;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	737 vsi_c_psend ( tst_sync_req_handle, cmd_ptr );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	738 tst_sync_mode = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	739 tst_sync_timeout_cnt = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	740 tst_syncronized = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	741 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	742 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	743 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	744 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	745 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	746 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	747 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	748 if ( processed == FALSE )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	749 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	750 if ( ( DestComHandle = vsi_c_open ( TST_Handle, s_hdr->rcv ) ) != VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	751 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	752 /* free carrier */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	753 PFREE(P2D(sig_ptr));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	754 FreePrim = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	755 vsi_c_psend (DestComHandle, (T_VOID_STRUCT*)P2D(prim) FILE_LINE_MACRO);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	756 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	757 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	758 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	759 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	760 if ( frmenv == ENV_STACK )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	761 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	762 sprintf ( token, "SYSTEM WARNING: Receiver Process '%s' unknown", s_hdr->rcv );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	763 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	764 ret = PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	765 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	766 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	767 /* free dyn_ptr if unknown receiver */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	768 FREE(P2D(prim));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	769 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	770 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	771 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	772 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	773 /* free dyn_ptr if processed in TST */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	774 FREE(P2D(prim));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	775 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	776 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	777
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	778 if ( FreePrim )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	779 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	780 /* free carrier */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	781 PFREE(P2D(sig_ptr));
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	782 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	783 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	784 case DRV_SIGTYPE_CONNECT:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	785 TST_DrvState = TST_DRV_CONNECTED;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	786 #ifndef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	787 tst_drv_write ( NO_TASK, SYS_MASK, FRM_TST_NAME, (char*)SYSPRIM_IS_STACK_TIME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	788 tst_drv_write ( NO_TASK, 0, NULL, str2ind_version );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	789 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	790 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	791 case DRV_SIGTYPE_DISCONNECT:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	792 TST_DrvState = TST_DRV_DISCONNECTED;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	793 #ifdef _PSOS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	794 /* for pSOS: send empty message to TST */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	795 if ( vsi_d_open ( TST_Handle, "SOCKET" ) != VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	796 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	797 T_QMSG Message;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	798 static T_HANDLE tst_handle = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	799
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	800 if( TST_Handle > 0 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	801 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	802 Message.MsgType = MSG_PRIMITIVE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	803 Message.Msg.Primitive.Prim = NULL;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	804 Message.Msg.Primitive.PrimLen = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	805 #ifdef MEMORY_SUPERVISION
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	806 vsi_c_send (TST_Handle, TST_Handle, &Message, __FILE__, __LINE__);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	807 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	808 vsi_c_send (TST_Handle, TST_Handle, &Message);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	809 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	810 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	811 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	812 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	813 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	814 #ifdef CTB
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	815 case IDLE_CNF:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	816 if(ctb_remaining_tick_time > 0 && ctb_tick_enabled && !ctb_sent_to_tap)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	817 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	818 os_Tick();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	819 PSIGNAL(hCommIDLE, IDLE_REQ, NULL);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	820 ctb_remaining_tick_time = ctb_remaining_tick_time-50;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	821 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	822 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	823 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	824 /*sprintf ( token, "Ticking finished - remaining time %d", ctb_remaining_tick_time);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	825 tst_drv_write ( NO_TASK, 0, NULL, token );*/
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	826 if(!strcmp(ctb_rcv, "TAP"))
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	827 tst_drv_write ( NO_TASK, SYS_MASK, FRM_TST_NAME, SYSPRIM_IS_STACK_TIME ); //Synchronize time with tools
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	828 tst_drv_write ( NO_TASK, SYS_MASK, ctb_rcv, "TIMER_TICK_CNF");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	829 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	830 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	831 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	832 default:
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	833 sprintf ( token, "Unhandled PSIGNAL");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	834 tst_drv_write ( NO_TASK, 0, NULL, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	835 break;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	836 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	837 return ( ret );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	838 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	839 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	840
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	841 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	842 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	843 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	844 \| PROJECT : GSM-GPF (8415) MODULE : TST_PEI \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	845 \| STATE : code ROUTINE : pei_config \|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	846 +--------------------------------------------------------------------+
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	847 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	848
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	849 LOCAL SHORT pei_config (char * inString)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	850 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	851 T_HANDLE drv_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	852 char token[80];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	853 unsigned int length, offset;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	854 BOOL select = 0,config = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	855 T_TST_DRV_ENTRY *tst_drv_info;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	856
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	857 length = GetNextToken (inString, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	858 offset = length+1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	859 if ( !strcmp ( token, "DRIVER") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	860 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	861 length = GetNextToken (inString+offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	862 offset += (length+1);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	863 if ( !strcmp ( token, "FLUSH") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	864 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	865 vsi_d_flush ( TST_Handle, 0 );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	866 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	867 if ( !strcmp ( token, "SELECT") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	868 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	869 select = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	870 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	871 if ( !strcmp ( token, "CONFIG") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	872 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	873 config = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	874 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	875 tst_syncronized = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	876 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	877 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	878 length = GetNextToken (inString+offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	879 offset += (length+1);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	880 if ( select )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	881 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	882 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	883 if ( !strcmp(NODRV_NAME,token) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	884 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	885 if ( tst_drv_open ( token, &tst_drv_info ) == VSI_ERROR \|\|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	886 vsi_d_create ( TST_Handle, tst_drv_info ) == VSI_ERROR)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	887 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	888 return PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	889 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	890 PrintToFile("TST: all drivers unloaded\n");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	891 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	892 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	893 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	894 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	895 /* check if driver is already loaded */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	896 if ( (drv_handle = vsi_d_open ( TST_Handle, token )) == VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	897 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	898 if ( tst_drv_open ( token, &tst_drv_info ) == VSI_ERROR \|\|
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	899 vsi_d_create ( TST_Handle, tst_drv_info ) == VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	900 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	901 return PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	902 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	903 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	904 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	905 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	906 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	907 #ifdef _DEBUG
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	908 PrintToFile("TST: keeping %s loaded\n",token);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	909 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	910 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	911 vsi_d_close( TST_Handle, drv_handle );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	912 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	913 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	914 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	915 if ( config )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	916 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	917 if ( ( drv_handle = vsi_d_open ( TST_Handle, token ) ) == VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	918 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	919 return PEI_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	920 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	921 if (vsi_d_setconfig ( TST_Handle, drv_handle, inString+offset) != VSI_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	922 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	923 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	924 char text[99];
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	925 _snprintf(text,98,"TST: Error configuring driver %s with \"%s\" :-(",token, inString+offset);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	926 vsi_o_ttrace(NO_TASK, TC_SYSTEM, text);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	927 #endif /* _TOOLS_ */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	928 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	929 vsi_d_close( TST_Handle, drv_handle );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	930 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	931 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	932 else if ( !strcmp ( token, "THIF") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	933 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	934 T_HANDLE tif_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	935 tif_handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	936 length = GetNextToken (inString+offset, token, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	937 offset += (length+1);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	938
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	939 if ( !strcmp ( token, "OPEN") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	940 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	941 vsi_d_setconfig ( TST_Handle, tif_handle, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	942 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	943 else if ( !strcmp ( token, "CLOSE") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	944 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	945 vsi_d_setconfig ( TST_Handle, tif_handle, token );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	946 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	947 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	948 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	949 else if ( !strcmp ( token, SYSPRIM_TST_SYNC_REQ) )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	950 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	951 T_HANDLE tif_handle;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	952 unsigned int len;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	953
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	954 len = GetNextToken (inString+offset, sync_req_name, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	955 offset += len;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	956 len = GetNextToken (inString+offset, sync_req_time, " #");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	957 tst_max_sync_timeout = (atoi(sync_req_time) - 1000)/TST_SYNC_TIMER_DURATION;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	958
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	959 tst_sync_req_handle = vsi_c_open ( TST_Handle, sync_req_name );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	960 if ( tst_sync_req_handle != VSI_ERROR )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	961 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	962 if ( tst_syncronized == 0 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	963 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	964 tst_sync_started = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	965 tst_status_received = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	966 tst_sync_mode = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	967 tst_sync_sucess = 1;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	968 tif_handle = vsi_d_open ( TST_Handle, (char*)TIF_NAME );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	969 vsi_d_setconfig ( TST_Handle, tif_handle, ENABLE_SYNC_MODE );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	970 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"TRACECLASS 0x10" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	971 vsi_t_sleep ( TST_Handle, 100 );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	972 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"STATUS TASK" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	973 vsi_t_start ( TST_Handle, TST_SYNC_TIMER_INDEX, TST_SYNC_TIMER_DURATION );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	974 vsi_t_sleep ( TST_Handle, 200 );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	975 tst_drv_write ( NO_TASK, SYS_MASK, FRM_RCV_NAME, (char*)"ROUTING" );
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	976 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	977 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	978 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	979 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	980 #ifdef _FF_RV_EXIST_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	981 else if ( !strcmp ( token, "TRACEMASK_IN_FFS") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	982 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	983 int amount;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	984 T_FFS_FD fd;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	985 T_FFS_RET ret;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	986 T_FFS_SIZE written;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	987 T_FFS_DIR dir;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	988 BOOL writeFailed = FALSE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	989 if (vsi_e_handle ( TST_Handle, FRM_RCV_NAME ) == e_running[os_MyHandle()]) // config prim processing only allowed in RCV, not TST!
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	990 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	991 fd = ffs_open(TRACEMASKFILE, FFS_O_RDWR \| FFS_O_CREATE \| FFS_O_TRUNC);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	992 if (fd < 0)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	993 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	994 // could not open nor create /var/dbg/tracemask warning
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	995 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: could not open/create FFS trace mask, reason is 0x%x", fd);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	996 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	997 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	998 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	999 TraceMask[0] = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1000 TraceMask[0] \|= TC_SYSTEM\|TC_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1001 amount = sizeof(ULONG) * (MaxEntities + 1);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1002 written = ffs_write(fd, (void*)&TraceMask[0], amount);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1003 if (written != amount)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1004 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1005 if (written >= 0)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1006 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1007 amount -= written;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1008 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: writing to FFS, second try");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1009 written = ffs_write(fd, (void*)&TraceMask[0], amount);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1010 if (written != amount)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1011 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1012 writeFailed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1013 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1014 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1015 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1016 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1017 writeFailed = TRUE;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1018 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1019 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1020 if (writeFailed)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1021 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1022 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: ffs_write to FFS failed with 0x%x, did open with", written, fd);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1023 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1024 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1025 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1026 if (ffs_fdatasync(fd) == EFFS_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1027 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1028 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: successfully written trace mask to FFS");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1029 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1030 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1031 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1032 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: flushing FFS trace mask failed!");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1033 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1034 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1035 ffs_close(fd);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1036 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1037 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1038 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1039 else if ( !strcmp ( token, "NO_TRACEMASK_IN_FFS") )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1040 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1041 T_FFS_RET ret;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1042
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1043 InitializeTrace();
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1044 TraceMask[0] = 0;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1045 TraceMask[0] \|= TC_SYSTEM\|TC_ERROR;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1046 if (vsi_e_handle ( TST_Handle, FRM_RCV_NAME ) == e_running[os_MyHandle()]) // config prim processing only allowed in RCV, not TST!
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1047 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1048 ret = ffs_remove(TRACEMASKFILE);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1049 if (ret != EFFS_OK)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1050 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1051 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: failed to remove FFS trace mask, reason is 0x%x", ret);
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1052 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1053 else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1054 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1055 vsi_o_ttrace(NO_TASK, TC_SYSTEM, "pei_config: successfully removed FFS trace mask");
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1056 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1057 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1058 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1059 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1060 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1061 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1062 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1063
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1064 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1065 GLOBAL SHORT tstsnd_pei_create ( T_PEI_INFO ** info)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1066 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1067 static T_PEI_INFO data =
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1068 { "TST",
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1069 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1070 pei_init,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1071 pei_exit,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1072 tst_pei_primitive,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1073 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1074 pei_timeout,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1075 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1076 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1077 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1078 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1079 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1080 pei_config,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1081 NULL
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1082 },
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1083 TST_STACKSIZE,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1084 0,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1085 TST_SND_PRIORITY,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1086 TST_TIMERS,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1087 (PASSIVE_BODY\|COPY_BY_REF\|SYSTEM_PROCESS\|TRC_NO_SUSPEND)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1088 };
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1089
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1090 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1091 data.QueueEntries = TST_QUEUE_ENTRIES;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1092 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1093 data.QueueEntries = TST_SndQueueEntries;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1094 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1095 * This way of setting the TST and RCV stacksize is chosen to keep it backwardscompatible,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1096 * i.e. not change the behavior if the stacksizes are not define in the configuration
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1097 * file xxxconst.h.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1098 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1099 if ( TST_SndStacksize > 0 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1100 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1101 data.StackSize = TST_SndStacksize;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1102 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1103 if ( pcon != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1104 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1105 data.StackSize += pcon->stack_offset;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1106 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1107 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1108 *info = &data;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1109 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1110 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1111 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1112
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1113 #ifndef RUN_INT_RAM
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1114 GLOBAL SHORT tstrcv_pei_create ( T_PEI_INFO ** info)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1115 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1116 static T_PEI_INFO data =
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1117 { "RCV",
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1118 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1119 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1120 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1121 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1122 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1123 pei_signal,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1124 NULL,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1125 pei_config,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1126 NULL
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1127 },
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1128 TST_STACKSIZE,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1129 0,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1130 TST_RCV_PRIORITY,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1131 TST_TIMERS,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1132 (PASSIVE_BODY\|COPY_BY_REF\|SYSTEM_PROCESS\|TRC_NO_SUSPEND)
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1133 };
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1134
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1135 #ifdef _TOOLS_
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1136 data.QueueEntries = TST_QUEUE_ENTRIES;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1137 #else
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1138 data.QueueEntries = TST_RcvQueueEntries;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1139 /*
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1140 * This way of setting the TST and RCV stacksize is chosen to keep it backwardscompatible,
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1141 * i.e. not change the behavior if the stacksizes are not define in the configuration
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1142 * file xxxconst.h.
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1143 */
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1144 if ( TST_RcvStacksize > 0 )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1145 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1146 data.StackSize = TST_RcvStacksize;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1147 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1148 if ( pcon != NULL )
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1149 {
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1150 data.StackSize += pcon->stack_offset;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1151 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1152 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1153 *info = &data;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1154 return PEI_OK;
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1155 }
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1156 #endif
8b2a9a374324 src/gpf: addition of Magnetite src/gpf2 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1157

FreeCalypso > hg > fc-selenite

annotate src/gpf/tst/tst_pei.c @ 112:fdecfb3bd860