FreeCalypso > hg > fc-tourmaline
annotate src/g23m-gsm/alr2/alr_em.c @ 274:fa22012c4a39
CST: remove AT%Nxxxx old AEC control
This crude method of enabling and configuring AEC is not compatible
with L1_NEW_AEC, and even for the old AEC it did not support every
possible combination. It is time for this hack to go. The new and
proper way of enabling and configuring AEC is via RiViera Audio Service
audio mode facility, either audio mode files or full access write,
most directly accessible via fc-tmsh auw 12 for free experimentation.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Thu, 29 Jul 2021 18:57:36 +0000 |
parents | 3a14ee9a9843 |
children |
rev | line source |
---|---|
2
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 +----------------------------------------------------------------------------- |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 | Project : |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 | Modul : |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 +----------------------------------------------------------------------------- |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 | Copyright 2002 Texas Instruments Berlin, AG |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 | All rights reserved. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 | This file is confidential and a trade secret of Texas |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 | Instruments Berlin, AG |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 | The receipt of or possession of this file does not convey |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 | any rights to reproduce or disclose its contents or to |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 | manufacture, use, or sell anything it may describe, in |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 | whole, or in part, without the specific written consent of |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 | Texas Instruments Berlin, AG. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 +----------------------------------------------------------------------------- |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 | Purpose : This Module defines the engineering mode (EM) device driver for the |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 | G23 protocol stack. This driver is used to control all engineering |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 | mode related functions. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 +----------------------------------------------------------------------------- |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 #ifndef ALR_EM_C |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 #define ALR_EM_C |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 #define ENTITY_PL |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 /*==== INCLUDES ===================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 #include <string.h> |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 #include <stdlib.h> |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 #include <ctype.h> |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 #include "typedefs.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
33 #include "pconst.cdg" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 #include "mconst.cdg" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 #include "message.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 #include "ccdapi.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37 #include "vsi.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 #include "custom.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
39 #include "gsm.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 #include "prim.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 #include "cnf_alr.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
42 #include "mon_alr.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
43 #include "pei.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
44 #include "tok.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
45 #include "pcm.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
46 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
47 #ifdef GPRS |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
48 #include "alr_gprs.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
49 #endif |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
50 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
51 #ifdef GPRS |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
52 #ifdef _TARGET_ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
53 #include "inth/iq.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
54 #endif |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
55 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
56 * obsolete (msb / 2002-04-25) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
57 #include "armio/armio.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
58 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
59 #endif |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
60 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
61 #include "alr.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
62 #include "alr_em.h" |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
63 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
64 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
65 /*==== IMPORT =====================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
66 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
67 /*==== EXPORT =====================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
68 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
69 /*==== PRIVAT =====================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
70 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
71 /*==== VARIABLES ==================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
72 #if defined (FF_EM_MODE) AND defined (ALR) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
73 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
74 /* Event tracing flags for EM */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
75 GLOBAL BOOL alr_v[EM_MAX_ALR_EVENTS]; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
76 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
77 LOCAL UBYTE em_alr_trace_occured = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
78 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
79 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
80 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
81 These variables are used between entities. Even this is not a clean solution it is a straigth forward |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
82 way to reduce the overhead to a minimum. A clean solution would be based on an only usage of primitives |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
83 which would stress the os with no aditional advantage!! |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
84 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
85 GLOBAL volatile UBYTE em_l1_sem_buffer [EM_L1_SEM_SIZE]; /*lint -esym(765,em_l1_sem_buffer) | external could be made static | used externally */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
86 GLOBAL volatile UBYTE em_l1_sem_index = 0; /*lint -esym(765,em_l1_sem_index) | external could be made static | used externally */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
87 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
88 static T_HANDLE sem_EM_L1; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
89 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
90 #define ENTER_CRITICAL_SECTION(sem) if (alr_em_enter_critical_section(sem))return FALSE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
91 #define LEAVE_CRITICAL_SECTION(sem) if (alr_em_leave_critical_section(sem))return FALSE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
92 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
93 #endif /* FF_EM_MODE */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
94 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
95 /*==== FUNCTIONS ==================================================*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
96 #if defined (FF_EM_MODE) AND defined (ALR) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
97 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
98 LOCAL UBYTE em_l1_sem (UBYTE length, UBYTE * data); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
99 LOCAL int em_l1_sem_clear (void); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
100 LOCAL void alr_em_first_event_check (void); /*Check for ACI - Notification*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
101 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
102 static void alr_em_semaphore_err (void); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
103 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
104 #if !defined(SYST_TRACE) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
105 #define SYST_TRACE(a) vsi_o_ttrace(0, TC_SYSTEM, a); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
106 #endif /* !SYST_TRACE */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
107 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
108 static int alr_em_enter_critical_section (T_HANDLE sem); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
109 static int alr_em_leave_critical_section (T_HANDLE sem); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
110 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
111 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
112 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
113 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
114 | Function : em_init_l1_event_trace |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
115 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
116 | Description : Initialize the event tracing flags |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
117 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
118 | Parameters : |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
119 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
120 | Return : |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
121 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
122 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
123 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
124 GLOBAL void em_init_l1_event_trace(void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
125 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
126 UBYTE i; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
127 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
128 TRACE_FUNCTION("em_init_l1_event_trace ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
129 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
130 for(i=0; i<EM_MAX_ALR_EVENTS; i++) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
131 alr_v[i] = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
132 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
133 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
134 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
135 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
136 | Function : l1_em_l1_event_req |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
137 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
138 | Description : Set the event tracing flags according the bitmask |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
139 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
140 | Parameters : Primitive - Bitmask |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
141 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
142 | Return : |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
143 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
144 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
145 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
146 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
147 GLOBAL const void l1_em_l1_event_req (T_EM_L1_EVENT_REQ *em_l1_event_req) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
148 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
149 UBYTE i; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
150 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
151 TRACE_FUNCTION("l1_em_l1_event_req ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
152 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
153 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
154 * The event tracing flags are set according the bitmask. alr_v[i] are |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
155 * the flags belonging to the event number described in 8443.601 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
156 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
157 for(i=1; i<33; i++) { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
158 alr_v[i] = ((em_l1_event_req->bitmask_l1_l & (0x01<<(i-1))) > 0) ? TRUE : FALSE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
159 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
160 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
161 for(i=33; i<(EM_MAX_ALR_EVENTS); i++) { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
162 alr_v[i] = ((em_l1_event_req->bitmask_l1_h & (0x01<<(i-1))) > 0) ? TRUE : FALSE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
163 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
164 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
165 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
166 * A new event trace is generated therefor the flag is set to zero. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
167 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
168 em_alr_trace_occured = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
169 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
170 PFREE(em_l1_event_req); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
171 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
172 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
173 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
174 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
175 | Function : em_write_buffer_2 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
176 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
177 | Description : Perform buffer check and store corresponding data in it. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
178 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
179 | Parameters : Event number |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
180 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
181 | Return : TRUE/FALSE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
182 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
183 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
184 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
185 GLOBAL UBYTE em_write_buffer_2 (UBYTE event_no) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
186 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
187 UBYTE em_l1_event_buffer[2]; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
188 UBYTE em_l1_buffer_write = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
189 UBYTE length = 2; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
190 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
191 TRACE_FUNCTION("alr_em_write_buffer_2 ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
192 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
193 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
194 ACI is informed about the first event trace, used for later data processing. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
195 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
196 alr_em_first_event_check(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
197 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
198 memset(em_l1_event_buffer, 0, 2); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
199 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
200 em_l1_event_buffer[em_l1_buffer_write++] = event_no; /* Event number */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
201 em_l1_event_buffer[em_l1_buffer_write++] = length-2; /* Value length - 0 equals no data */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
202 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
203 return (em_l1_sem (length, em_l1_event_buffer)); /* Data is stored inside buffer, reset flag */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
204 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
205 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
206 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
207 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
208 | Function : em_write_buffer_3 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
209 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
210 | Description : Perform buffer check and store corresponding data in it. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
211 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
212 | Parameters : Event number, data value |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
213 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
214 | Return : TRUE/FALSE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
215 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
216 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
217 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
218 GLOBAL UBYTE em_write_buffer_3 (UBYTE event_no, UBYTE value) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
219 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
220 UBYTE em_l1_event_buffer[3]; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
221 UBYTE em_l1_buffer_write = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
222 UBYTE length = 3; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
223 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
224 TRACE_FUNCTION("alr_em_write_buffer_3 ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
225 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
226 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
227 ACI is informed about the first event trace, used for later data processing. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
228 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
229 alr_em_first_event_check(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
230 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
231 memset(em_l1_event_buffer, 0, 3); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
232 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
233 em_l1_event_buffer[em_l1_buffer_write++] = event_no; /* Event number */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
234 em_l1_event_buffer[em_l1_buffer_write++] = length-2; /* Value length - 0 equals no value */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
235 em_l1_event_buffer[em_l1_buffer_write++] = value; /* Data to be stored */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
236 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
237 return (em_l1_sem (length, em_l1_event_buffer)); /* Data is stored inside buffer, reset flag */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
238 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
239 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
240 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
241 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
242 | Function : em_write_buffer_3a |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
243 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
244 | Description : Perform buffer check and store corresponding data in it. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
245 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
246 | Parameters : Event number, data value (USHORT) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
247 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
248 | Return : TRUE/FALSE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
249 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
250 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
251 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
252 GLOBAL UBYTE em_write_buffer_3a (UBYTE event_no, USHORT value) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
253 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
254 UBYTE em_l1_event_buffer[4]; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
255 UBYTE em_l1_buffer_write = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
256 UBYTE length = 4; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
257 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
258 TRACE_FUNCTION("alr_em_write_buffer_4 ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
259 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
260 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
261 ACI is informed about the first event trace, used for later data processing. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
262 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
263 alr_em_first_event_check(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
264 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
265 memset(em_l1_event_buffer, 0, 4); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
266 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
267 em_l1_event_buffer[em_l1_buffer_write++] = event_no; /* Event number */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
268 em_l1_event_buffer[em_l1_buffer_write++] = length-2; /* Value length - 0 equals no value */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
269 em_l1_event_buffer[em_l1_buffer_write++] = (UBYTE)(value >> 8); /* Data to be stored - MSB first */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
270 em_l1_event_buffer[em_l1_buffer_write++] = (UBYTE)(value); /* LSB second */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
271 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
272 return (em_l1_sem (length, em_l1_event_buffer)); /* Data is stored inside buffer, reset flag */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
273 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
274 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
275 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
276 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
277 | Function : em_write_buffer_4 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
278 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
279 | Description : Perform buffer check and store corresponding data in it. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
280 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
281 | Parameters : Event number, data value1 & value2 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
282 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
283 | Return : TRUE/FALSE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
284 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
285 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
286 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
287 GLOBAL UBYTE em_write_buffer_4 (UBYTE event_no, UBYTE value1, UBYTE value2) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
288 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
289 UBYTE em_l1_event_buffer[4]; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
290 UBYTE em_l1_buffer_write = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
291 UBYTE length = 4; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
292 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
293 TRACE_FUNCTION("alr_em_write_buffer_4 ()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
294 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
295 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
296 ACI is informed about the first event trace, used for later data processing. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
297 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
298 alr_em_first_event_check(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
299 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
300 memset(em_l1_event_buffer, 0, 4); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
301 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
302 em_l1_event_buffer[em_l1_buffer_write++] = event_no; /* Event number */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
303 em_l1_event_buffer[em_l1_buffer_write++] = length-2; /* Value length - 0 equals no value */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
304 em_l1_event_buffer[em_l1_buffer_write++] = value1; /* Data to be stored */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
305 em_l1_event_buffer[em_l1_buffer_write++] = value2; /* Data to be stored */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
306 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
307 return (em_l1_sem (length, em_l1_event_buffer)); /* Data is stored inside buffer, reset flag */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
308 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
309 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
310 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
311 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
312 | Function : em_l1_sem_init |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
313 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
314 | Description : Initialize the semaphor for alr event traces. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
315 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
316 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
317 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
318 | Return : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
319 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
320 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
321 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
322 GLOBAL void em_l1_sem_init (void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
323 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
324 sem_EM_L1 = vsi_s_open (VSI_CALLER "EM_L1_SEM",1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
325 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
326 if (sem_EM_L1 NEQ VSI_ERROR) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
327 em_l1_sem_clear (); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
328 else |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
329 SYST_TRACE ("D1:can´t open semaphore \"EM_D1_SEM\""); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
330 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
331 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
332 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
333 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
334 | Function : em_l1_sem_exit |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
335 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
336 | Description : Close the semaphor for alr event traces. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
337 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
338 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
339 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
340 | Return : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
341 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
342 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
343 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
344 GLOBAL void em_l1_sem_exit (void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
345 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
346 if (sem_EM_L1 NEQ VSI_ERROR) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
347 vsi_s_close (VSI_CALLER sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
348 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
349 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
350 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
351 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
352 | Function : em_l1_sem_clear |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
353 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
354 | Description : Reset the index of the semaphor. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
355 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
356 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
357 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
358 | Return : UBYTE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
359 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
360 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
361 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
362 LOCAL int em_l1_sem_clear (void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
363 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
364 ENTER_CRITICAL_SECTION (sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
365 em_l1_sem_index = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
366 LEAVE_CRITICAL_SECTION (sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
367 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
368 SYST_TRACE ("L1:em_l1_sem_index cleared"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
369 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
370 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
371 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
372 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
373 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
374 | Function : em_l1_sem_reset |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
375 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
376 | Description : Clears the content of the semaphor, must called after em_l1_sem_read. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
377 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
378 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
379 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
380 | Return : UBYTE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
381 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
382 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
383 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
384 GLOBAL int em_l1_sem_reset (void) /*lint -esym(765,em_l1_sem_reset) | external could be made static | used externally */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
385 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
386 /* ENTER_CRITICAL_SECTION (sem_EM_L1); */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
387 em_l1_sem_index = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
388 LEAVE_CRITICAL_SECTION (sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
389 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
390 SYST_TRACE ("L1:em_l1_sem_index reseted"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
391 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
392 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
393 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
394 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
395 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
396 | Function : em_l1_sem_read |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
397 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
398 | Description : Reads the content of the semaphor. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
399 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
400 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
401 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
402 | Return : UBYTE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
403 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
404 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
405 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
406 GLOBAL int em_l1_sem_read (void) /*lint -esym(765,em_l1_sem_read) | external could be made static | used externally */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
407 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
408 USHORT semCount; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
409 TRACE_FUNCTION ("em_l1_sem_read()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
410 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
411 if (vsi_s_status (VSI_CALLER sem_EM_L1, &semCount) NEQ VSI_OK) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
412 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
413 alr_em_semaphore_err(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
414 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
415 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
416 if (semCount EQ 0) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
417 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
418 vsi_o_ttrace(VSI_CALLER TC_EVENT, "semCount = %d", semCount); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
419 SYST_TRACE ("semCount EQ 0"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
420 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
421 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
422 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
423 ENTER_CRITICAL_SECTION (sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
424 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
425 * The l1/alr semaphor will be read by the engineering mode via aci, |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
426 * therefore the functions em_l1_sem_read and em_l1_sem_reset are defined |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
427 * as global. To ensure that during reading only aci has access to the |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
428 * semaphor the macro LEAVE_CRITICAL_SECTION is called after the read process |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
429 * toke place - in the em_l1_sem_resest function. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
430 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
431 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
432 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
433 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
434 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
435 Return value TRUE/FALSE - TRUE keeps the event flag valid, FALSE indicates a successful flag handle |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
436 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
437 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
438 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
439 | Function : em_l1_sem |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
440 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
441 | Description : Writes the data inside the semaphor. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
442 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
443 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
444 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
445 | Return : UBYTE |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
446 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
447 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
448 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
449 LOCAL UBYTE em_l1_sem (UBYTE length, UBYTE *data) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
450 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
451 USHORT semCount; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
452 USHORT write_index; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
453 UBYTE i; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
454 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
455 TRACE_FUNCTION ("em_l1_sem()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
456 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
457 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
458 if (vsi_s_status (VSI_CALLER sem_EM_L1, &semCount) NEQ VSI_OK) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
459 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
460 alr_em_semaphore_err(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
461 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
462 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
463 if (semCount EQ 0) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
464 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
465 vsi_o_ttrace(VSI_CALLER TC_EVENT, "semCount = %d", semCount); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
466 SYST_TRACE ("semCount EQ 0"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
467 return TRUE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
468 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
469 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
470 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
471 * buffer overflow protection |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
472 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
473 if ( ((write_index = em_l1_sem_index) + length) > EM_L1_SEM_SIZE ) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
474 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
475 TRACE_FUNCTION ("alr buffer full"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
476 return FALSE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
477 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
478 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
479 ENTER_CRITICAL_SECTION(sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
480 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
481 for (i=0; i<length; i++) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
482 em_l1_sem_buffer[em_l1_sem_index++] = *(data++); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
483 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
484 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
485 LEAVE_CRITICAL_SECTION (sem_EM_L1); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
486 return FALSE; /* indicates that flag was handled */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
487 } /* endfunc em_l1_sem */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
488 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
489 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
490 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
491 | Function : alr_em_semaphore_err |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
492 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
493 | Description : Semaphor error |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
494 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
495 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
496 | Parameters : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
497 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
498 | Return : void |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
499 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
500 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
501 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
502 static void alr_em_semaphore_err (void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
503 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
504 static UCHAR out = 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
505 if (!out) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
506 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
507 out = 1; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
508 vsi_o_ttrace(VSI_CALLER TC_EVENT, "semaphore error"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
509 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
510 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
511 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
512 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
513 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
514 | Function : alr_em_enter_critical_section |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
515 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
516 | Description : Check on critical section entrance |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
517 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
518 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
519 | Parameters : Handle |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
520 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
521 | Return : -1 semaphore error |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
522 | 0 Ok. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
523 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
524 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
525 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
526 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
527 #if defined (NEW_FRAME) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
528 static int alr_em_enter_critical_section (T_HANDLE sem) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
529 #else |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
530 static int alr_em_enter_critical_section (T_VSI_SHANDLE sem) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
531 #endif /* NEW_FRAME */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
532 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
533 if (vsi_s_get (VSI_CALLER sem) NEQ VSI_OK) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
534 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
535 alr_em_semaphore_err(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
536 return -1; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
537 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
538 else |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
539 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
540 return 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
541 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
542 }/* endfunc rr_enter_critical_section */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
543 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
544 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
545 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
546 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
547 | Function : alr_em_leave_critical_section |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
548 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
549 | Description : Check on critical section exit |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
550 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
551 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
552 | Parameters : Handle |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
553 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
554 | Return : -1 semaphore error |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
555 | 0 Ok. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
556 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
557 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
558 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
559 #if defined (NEW_FRAME) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
560 static int alr_em_leave_critical_section (T_HANDLE sem) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
561 #else |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
562 static int alr_em_leave_critical_section (T_VSI_SHANDLE sem) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
563 #endif /* NEW_FRAME */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
564 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
565 if (vsi_s_release (VSI_CALLER sem) NEQ VSI_OK) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
566 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
567 alr_em_semaphore_err(); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
568 return -1; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
569 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
570 else |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
571 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
572 return 0; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
573 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
574 }/* endfunc rr_leave_critical_section */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
575 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
576 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
577 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
578 | Function : alr_em_error_cause |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
579 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
580 | Description : Check the error cause and store it in the event buffer |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
581 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
582 | Parameters : Cause |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
583 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
584 | Return : None |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
585 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
586 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
587 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
588 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
589 GLOBAL void alr_em_error_cause (UBYTE cause, USHORT arfcn) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
590 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
591 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
592 switch(cause) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
593 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
594 case CS_BCCH_READ_ERROR: |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
595 { /* Power measurement request */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
596 ALR_EM_BCCH_READ_ERROR; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
597 break; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
598 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
599 case CS_DOWN_LINK_FAIL: |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
600 { /* Downlink signalling failure */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
601 ALR_EM_DOWNLINK_FAILURE; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
602 break; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
603 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
604 case CS_NO_BCCH_AVAIL: |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
605 { /* neighbourcell BCCH not available */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
606 ALR_EM_NEIGHBOURCELL_BCCH(EM_NOT_AVAIL); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
607 break; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
608 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
609 }/*switch*/ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
610 }/* alr_em_error_cause */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
611 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
612 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
613 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
614 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
615 | Function : alr_em_first_event_check() |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
616 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
617 | Description : Checks if first EM-Event ocured |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
618 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
619 | Parameters : None |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
620 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
621 | Return : None |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
622 | |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
623 +------------------------------------------------------------------------------ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
624 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
625 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
626 /* |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
627 ACI is informed about the first event trace, used for later data processing. |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
628 */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
629 LOCAL void alr_em_first_event_check (void) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
630 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
631 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
632 TRACE_FUNCTION("alr_em_first_event_check()"); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
633 if(em_alr_trace_occured EQ 0) |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
634 { |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
635 PALLOC(em_notification, EM_DATA_IND); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
636 em_notification->entity = EM_L1; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
637 PSENDX(MMI, em_notification); |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
638 em_alr_trace_occured++; |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
639 } |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
640 }/* alr_em_first_event_check */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
641 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
642 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
643 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
644 #endif /* FF_EM_MODE */ |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
645 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
646 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
647 |
3a14ee9a9843
src/g23m-gsm: same alr2 & alr3 structure as in Selenite
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
648 #endif /* ALR_EM_C */ |