FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci/cmh_phbf.c @ 438:53f32098ea36
configs/hybrid-ui: switch to the new TCS3 versions of BMI and MFW
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Mon, 22 Jan 2018 01:22:02 +0000 | 
| parents | 93999a60b835 | 
| children | 
| rev | line source | 
|---|---|
| 
3
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
3 | Project : GSM-PS (6147) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | Modul : CMH_PHBF | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
5 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
7 | All rights reserved. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
8 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
9 | This file is confidential and a trade secret of Texas | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
10 | Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
11 | The receipt of or possession of this file does not convey | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
12 | any rights to reproduce or disclose its contents or to | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
13 | manufacture, use, or sell anything it may describe, in | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
14 | whole, or in part, without the specific written consent of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
15 | Texas Instruments Berlin, AG. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
16 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
17 | Purpose : This module defines the functions used by the command | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 | handler for the phonebook management. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
20 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
21 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
22 #ifndef CMH_PHBF_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #define CMH_PHBF_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
26 #include "aci_all.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
27 /*==== INCLUDES ===================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 #include "aci_cmh.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 #include "ati_cmd.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 #include "aci_cmd.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 #ifdef FAX_AND_DATA | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 #include "aci_fd.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 #endif /* of #ifdef FAX_AND_DATA */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 #include "aci.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 #include "psa.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 #include "phb.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 #include "cmh.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 #include "cmh_phb.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 /*==== CONSTANTS ==================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
44 #define PHB_CMH_INVALID_TAG_ENTRY 0xFF /* fill up a tag */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 #define PHB_CMH_INVALID_BCD_ENTRY 0xF /* fill up a BCD number */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
46 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 #define PHB_CMH_YEAR_INVLD (255) /* invalid year */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 #define PHB_CMH_MONTH_INVLD (255) /* invalid month */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 #define PHB_CMH_DAY_INVLD (255) /* invalid day */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 #define PHB_CMH_HOUR_INVLD (255) /* invalid hour */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 #define PHB_CMH_MINUTE_INVLD (255) /* invalid minute */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 #define PHB_CMH_SECOND_INVLD (255) /* invalid second */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
53 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
54 /*==== TYPES ======================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 /*==== EXPORT =====================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 /*==== VARIABLES ==================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 /*==== FUNCTIONS ==================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
61 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
62 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
63 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
64 | STATE : code ROUTINE : cmhPHB_rplcIntnl | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
65 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
66 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 GLOBAL BOOL cmhPHB_rplcIntnl ( CHAR* inNumber, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 CHAR* outNumber, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 UBYTE inCnt ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 USHORT inIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
74 USHORT outIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
75 UBYTE actCnt = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 BOOL international = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 while ( inNumber[inIdx] NEQ '\0' ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 * international indicator "+" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 if ( inNumber[inIdx] EQ '+' AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
86 inNumber[inIdx-1] EQ '*' ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
87 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
88 if ( actCnt EQ inCnt OR inCnt EQ 0xFF ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
89 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 international = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
91 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
92 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 outNumber[outIdx++] = inNumber[inIdx]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 /* PATCH LE 12.05.00 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 * 00 is used in china as national number | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 * checked against competitor phone | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 * now ACI has the same behaviour | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 * international indicator "00" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
106 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 /* else if ( inNumber[inIdx+1] EQ '0' AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 inNumber[inIdx] EQ '0' AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
109 inNumber[inIdx-1] EQ '*' ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
110 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 if ( actCnt EQ inCnt OR inCnt EQ 0xFF ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
113 international = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
114 inIdx++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
115 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
118 outNumber[outIdx++] = inNumber[inIdx++]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
119 outNumber[outIdx++] = inNumber[inIdx]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 } */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 /* END PATCH LE 12.05.00 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
124 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 * national indicator | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 *--------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
129 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 if ( inNumber[inIdx] EQ '*' ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 actCnt++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
135 outNumber[outIdx++] = inNumber[inIdx]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
138 inIdx++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
139 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 outNumber[outIdx] = '\0'; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
143 return international; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
148 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 | STATE : code ROUTINE : cmhPHB_cvtPhbType | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
150 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
151 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 PURPOSE : This function is used to convert the type of phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 used by ACI to the type of phonebook used by phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 management. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 GLOBAL BOOL cmhPHB_cvtPhbType ( T_ACI_PB_STOR inMem, T_PHB_TYPE* outMem ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
157 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
158 switch ( inMem ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
159 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
160 case ( PB_STOR_Fd ): *outMem = FDN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 case ( PB_STOR_Ld ): *outMem = LDN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
162 case ( PB_STOR_Ed ): *outMem = ECC; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
163 case ( PB_STOR_Ad ): *outMem = ADN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 case ( PB_STOR_Bd ): *outMem = BDN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 case ( PB_STOR_Lr ): *outMem = LRN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 case ( PB_STOR_Sd ): *outMem = SDN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 case ( PB_STOR_Lm ): *outMem = LMN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 case ( PB_STOR_Ud ): *outMem = UPN; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 case ( PB_STOR_Af ): /* Not supported anymore */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 return ( FALSE ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
175 return ( TRUE ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
176 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 | STATE : code ROUTINE : cmhPHB_cvtPhbPsaType | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
182 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
183 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
184 PURPOSE : This function is used to convert the type of phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 used by phonebook management to the type of phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 used by ACI. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 GLOBAL BOOL cmhPHB_cvtPhbPsaType ( T_PHB_TYPE inMem, T_ACI_PB_STOR* outMem ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 switch ( inMem ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 case ( FDN ): *outMem = PB_STOR_Fd; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 case ( LDN ): *outMem = PB_STOR_Ld; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 case ( ECC ): *outMem = PB_STOR_Ed; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 case ( ADN ): *outMem = PB_STOR_Ad; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 case ( BDN ): *outMem = PB_STOR_Bd; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 case ( LRN ): *outMem = PB_STOR_Lr; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 case ( SDN ): *outMem = PB_STOR_Sd; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 case ( LMN ): *outMem = PB_STOR_Lm; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 case ( UPN ): *outMem = PB_STOR_Ud; break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
203 *outMem = PB_STOR_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 return ( FALSE ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 return ( TRUE ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
211 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 | STATE : code ROUTINE : cmhPHB_toaMrg | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
216 PURPOSE : This function is used to build the type of address octet | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
217 from T_ACI_TOA structure. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
218 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 GLOBAL void cmhPHB_toaMrg ( T_ACI_TOA* type, UBYTE* octet ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
220 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
221 *octet = ( ( ( type -> ton << 4 ) & 0xF0 ) + ( type -> npi & 0x0F ) ) | 0x80; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
222 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
223 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
224 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
225 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 | STATE : code ROUTINE : cmhPHB_toaDmrg | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
228 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
229 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 PURPOSE : This function is used to build the T_ACI_TOA structure | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 from the type of address octet. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 GLOBAL void cmhPHB_toaDmrg ( UBYTE octet, T_ACI_TOA* type ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 if ( octet EQ 0xFF ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 type -> ton = TON_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 type -> npi = NPI_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 type -> ton = ( octet & 0x70 ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 type -> npi = octet & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
244 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
249 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 | STATE : code ROUTINE : cmhPHB_getAdrStr | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 PURPOSE : This function is used to convert the phone number | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
254 in BCD to the phone number as a string. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
255 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 BCD Note: Two digits are stored in one byte. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
258 +-------+-------+-------+-------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
259 BCD: | 1 - 0 | 3 - 2 | F - 4 | F - F | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 +-------+-------+-------+-------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
261 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
262 STRING: "01234" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 GLOBAL CHAR cmhPHB_convertBCD2char( UBYTE bcd ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 switch ( bcd ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 case 0: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 case 1: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
271 case 2: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 case 3: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
273 case 4: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 case 5: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 case 6: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 case 7: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 case 8: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 case 9: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 return (bcd + '0'); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 case 0x0a: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 return ('*'); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 case 0x0b: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
285 return ('#'); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
286 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 case 0x0c: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
288 return (PHB_DIAL_PAUSE); /* 'P' */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 case 0x0d: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 return (PHB_DIAL_WAIT); /* 'W' */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
293 case 0x0e: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 return (PHB_EXP_DIGIT); /* 'E' */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 return ('\0'); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 GLOBAL UBYTE cmhPHB_getAdrStr ( CHAR* pStr, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
302 UBYTE maxIdx, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
303 const UBYTE* pBcd, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
304 UBYTE numDigits ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 BOOL highNibble = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 UBYTE bcdIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 UBYTE strIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
310 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 UBYTE bcd; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 char digit; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
313 BOOL ignore_next = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
314 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
315 while ( bcdIdx < numDigits AND strIdx < maxIdx ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
316 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
317 if ( highNibble ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
318 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 bcd = ( pBcd[bcdIdx] & 0xF0 ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
320 bcdIdx++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
321 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
322 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
323 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
324 bcd = pBcd[bcdIdx] & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 highNibble = ! highNibble; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
328 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
329 if(bcd EQ PHB_CMH_INVALID_BCD_ENTRY) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
330 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
331 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 digit = cmhPHB_convertBCD2char( bcd ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
335 if (ignore_next EQ TRUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
336 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 ; /* skip the digit following on an extension flag since we do not support it */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 ignore_next = FALSE; /* reset flag */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
339 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
340 else if (digit EQ PHB_EXP_DIGIT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
342 ignore_next = TRUE; /* we currently do not support Expansion Digit so skip next digit */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
343 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
344 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
345 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
346 pStr[strIdx++] = cmhPHB_convertBCD2char( bcd ); /* normal and supported digit */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
347 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
351 pStr[strIdx] = '\0'; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
352 return ( strIdx ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
353 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
355 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
356 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 | STATE : code ROUTINE : cmhPHB_getAdrBcd | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 PURPOSE : This function is used to convert the phone number | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
362 as a string to the phone number in BCD. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
363 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 STRING: "01234" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 BCD Note: Two digits are stored in one byte. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 +-------+-------+-------+-------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 BCD: | 1 - 0 | 3 - 2 | F - 4 | F - F | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 +-------+-------+-------+-------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 GLOBAL void cmhPHB_getAdrBcd ( UBYTE* pBcd, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 UBYTE* pNumDigits, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 UBYTE maxDigits, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
375 CHAR* pStr ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
376 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 BOOL highNibble = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 UBYTE bcdIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
380 UBYTE strIdx; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
381 SHORT restLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
382 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
383 UBYTE bcd; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
384 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
385 for(strIdx = 0; bcdIdx < maxDigits AND pStr[strIdx] NEQ '\0'; strIdx++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 switch ( pStr[strIdx] ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 case '0': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 case '1': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 case '2': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 case '3': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 case '4': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 case '5': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 case '6': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
396 case '7': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
397 case '8': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 case '9': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
399 bcd = pStr[strIdx] - '0'; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
400 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
402 case '*': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
403 bcd = 0x0a; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
405 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
406 case '#': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
407 bcd = 0x0b; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
408 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 case 'p': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 case 'P': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 bcd = 0x0c; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
414 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
415 case 'w': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 case 'W': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 bcd = 0x0d; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 case 'E': | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 bcd = 0x0e; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
423 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
424 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 continue; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
427 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
428 if ( highNibble ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 pBcd[bcdIdx] += ( bcd << 4 ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 bcdIdx++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
433 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
434 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
435 pBcd[bcdIdx] = bcd; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
436 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 highNibble = ! highNibble; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 * The last byte of the phone number is filled up with 'F' if | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
443 * necessary | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
444 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 if ( highNibble ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
448 pBcd[bcdIdx] += ( PHB_CMH_INVALID_BCD_ENTRY << 4 ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
449 bcdIdx++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 *pNumDigits = bcdIdx; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 * The rest of the phone number is filled up with 'FF' | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 restLen = maxDigits - bcdIdx; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 if ( restLen > 0 ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 memset ( &pBcd[bcdIdx], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 (PHB_CMH_INVALID_BCD_ENTRY << 4) + PHB_CMH_INVALID_BCD_ENTRY, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 restLen ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
466 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
467 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
468 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
469 | STATE : code ROUTINE : cmhPHB_cpyRecEntr | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
471 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
472 PURPOSE : This function is used to copy the relevant data from the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
473 T_PHB_RECORD structure to the T_ACI_PB_ENTR structure. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
474 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 GLOBAL void cmhPHB_cpyRecEntr ( T_ACI_PB_ENTR* entry, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
477 T_PHB_TYPE book, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
478 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 const T_PHB_RECORD* record ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
480 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
481 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 entry -> index = record->phy_recno; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 entry -> index = ( SHORT ) record -> index; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 cmhPHB_getAdrStr ( entry -> number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 MAX_PHB_NUM_LEN - 1, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 record -> number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 record -> len ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 cmhPHB_toaDmrg ( record -> ton_npi, &entry -> type ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 cmhPHB_getMfwTagNt ( record -> tag, record -> tag_len, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 entry -> text.data, &entry -> text.len ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 entry -> text.cs = CS_Sim; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
499 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
500 cmhPHB_cvtPhbPsaType ( book, &entry -> book ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
501 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 cmhPHB_cvtPhbPsaType ( record -> book, &entry -> book ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
505 cmhPHB_cpyPhbDateTime ( record, &entry -> dateTime ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
506 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 | STATE : code ROUTINE : cmhPHB_invldEntr | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 PURPOSE : This function is used to invalidate the elements of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 a T_ACI_PB_ENTR structure. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 GLOBAL void cmhPHB_invldEntr ( T_ACI_PB_ENTR* entry ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
519 entry -> index = ACI_NumParmNotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
520 entry -> number[0] = '\0'; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
521 entry -> type.ton = TON_Unknown; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
522 entry -> type.npi = NPI_IsdnTelephony; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 entry -> text.len = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
524 entry -> book = PB_STOR_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
525 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 cmhPHB_invldCmhDateTime ( &entry -> dateTime); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
528 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
529 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
530 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
531 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
532 | STATE : code ROUTINE : cmhPHB_getTagNt | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
535 PURPOSE : This function converts the actual tag in the format used | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
536 when storing it on the SIM into a null terminated string. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
537 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
538 GLOBAL void cmhPHB_getTagNt ( UBYTE* inTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
539 UBYTE maxInLen, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
540 CHAR* outTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 UBYTE maxOutLen ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 UBYTE i = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 while ( i < maxOutLen - 1 AND i < maxInLen AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 inTag[i] NEQ PHB_CMH_INVALID_TAG_ENTRY ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
550 * Convert from default GSM to internal GSM alphabet | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
551 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 outTag[i] = ( CHAR ) inTag[i] | 0x80; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
554 i++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
555 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
556 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
557 outTag[i] = '\0'; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
558 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
561 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
562 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 | STATE : code ROUTINE : cmhPHB_getMfwTagNt | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
565 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
566 PURPOSE : This function copy the actual tag . | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
568 GLOBAL void cmhPHB_getMfwTagNt ( const UBYTE* inTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
569 UBYTE maxInLen, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 UBYTE* outTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
571 UBYTE* maxOutLen ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
572 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 UBYTE i = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 UBYTE len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
575 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
576 if(maxInLen EQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
578 memset(outTag, 0, MAX_ALPHA_LEN); /* we need to set out tag to 0 to prevent to be recognized by UCS2 decoder */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
579 *maxOutLen = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
580 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
582 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
583 len = pb_get_entry_len(inTag, maxInLen); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 if (len >= MAX_ALPHA_LEN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 len = MAX_ALPHA_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 memcpy(outTag, inTag, len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 *maxOutLen = len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
593 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
594 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
595 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
596 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
597 | STATE : code ROUTINE : cmhPHB_getTagSim | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
598 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
599 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 PURPOSE : This function converts the actual tag as a null | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
601 terminated string in the format used when storing it on | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
602 the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
603 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 GLOBAL void cmhPHB_getTagSim ( T_ACI_PB_TEXT *inTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 UBYTE *outTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 UBYTE maxOutLen ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 UBYTE inLen = inTag->len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 UBYTE i = MINIMUM ( maxOutLen, inLen); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
610 SHORT restLen = maxOutLen - inLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
611 UBYTE j; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
613 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
614 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 * Convert from internal GSM to default GSM alphabet | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
617 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
618 for ( j = 0; j < i; j++ ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 outTag[j] = inTag->data[j] & 0x7F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 if ( restLen > 0 ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 memset ( &outTag[i], PHB_CMH_INVALID_TAG_ENTRY, restLen); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
625 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
626 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
628 | STATE : code ROUTINE : cmhPHB_getMfwTagSim | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
629 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 PURPOSE : This function converts the actual tag string in the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 format used when storing it on the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 GLOBAL void cmhPHB_getMfwTagSim ( T_ACI_PB_TEXT* inTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
635 UBYTE* outTag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
636 UBYTE* outTagLen, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 UBYTE maxOutLen ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 UBYTE i = MINIMUM ( maxOutLen, inTag->len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 SHORT restLen = maxOutLen - inTag->len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
641 UBYTE j; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
642 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
643 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
644 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
645 * Convert from internal GSM to default GSM alphabet | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
646 *----------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
648 for ( j = 0; j < i; j++ ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
649 outTag[j] = inTag->data[j]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
650 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
651 *outTagLen = i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 if ( restLen > 0 ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 memset ( &outTag[i], PHB_CMH_INVALID_TAG_ENTRY, restLen); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
658 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
659 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 | STATE : code ROUTINE : cmhPHB_invldPhbDateTime | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
662 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
663 PURPOSE : This function is used to invalidate the date and time | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
664 of a phonebook entry. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
665 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 GLOBAL void cmhPHB_invldPhbDateTime ( T_PHB_RECORD* record ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 record->v_time = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
670 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
671 /* Backward compatibility. Setting v_time to FALSE would be sufficient */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 record->time.year = PHB_CMH_YEAR_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 record->time.month = PHB_CMH_MONTH_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 record->time.day = PHB_CMH_DAY_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 record->time.hour = PHB_CMH_HOUR_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 record->time.minute = PHB_CMH_MINUTE_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
677 record->time.second = PHB_CMH_SECOND_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
678 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 record -> year = PHB_CMH_YEAR_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 record -> month = PHB_CMH_MONTH_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
681 record -> day = PHB_CMH_DAY_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
682 record -> hour = PHB_CMH_HOUR_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 record -> minute = PHB_CMH_MINUTE_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 record -> second = PHB_CMH_SECOND_INVLD; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
688 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
689 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
691 | STATE : code ROUTINE : cmhPHB_invldCmhDateTime | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
692 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 PURPOSE : This function is used to invalidate the date and time | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
695 of a phonebook entry. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
696 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 GLOBAL void cmhPHB_invldCmhDateTime ( T_ACI_VP_ABS* dateTime ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
699 dateTime -> year [0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
700 dateTime -> year [1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
701 dateTime -> month [0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
702 dateTime -> month [1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
703 dateTime -> day [0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
704 dateTime -> day [1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
705 dateTime -> hour [0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
706 dateTime -> hour [1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
707 dateTime -> minute[0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
708 dateTime -> minute[1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
709 dateTime -> second[0] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
710 dateTime -> second[1] = PHB_CMH_INVALID_BCD_ENTRY; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
711 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
712 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
713 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
714 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
715 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
716 | STATE : code ROUTINE : cmhPHB_cpyCmhDateTime | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
717 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
718 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
719 PURPOSE : This function is used to convert the date and time used | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
720 within the command handler to the format used in the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
721 phonebook management. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
722 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
723 GLOBAL void cmhPHB_cpyCmhDateTime ( const T_ACI_VP_ABS* dateTime, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
724 T_PHB_RECORD* record ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
725 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
726 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
727 record->time.year = (UBYTE)(dateTime -> year [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
728 dateTime -> year [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
729 record->time.month = (UBYTE)(dateTime -> month [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
730 dateTime -> month [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
731 record->time.day = (UBYTE)(dateTime -> day [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
732 dateTime -> day [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
733 record->time.hour = (UBYTE)(dateTime -> hour [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
734 dateTime -> hour [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
735 record->time.minute = (UBYTE)(dateTime -> minute[0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
736 dateTime -> minute[1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
737 record->time.second = (UBYTE)(dateTime -> second[0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
738 dateTime -> second[1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
739 record->v_time = (record->time.year NEQ 0xff); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
740 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
741 record -> year = (UBYTE)(dateTime -> year [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
742 dateTime -> year [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
743 record -> month = (UBYTE)(dateTime -> month [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
744 dateTime -> month [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
745 record -> day = (UBYTE)(dateTime -> day [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
746 dateTime -> day [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
747 record -> hour = (UBYTE)(dateTime -> hour [0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
748 dateTime -> hour [1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
749 record -> minute = (UBYTE)(dateTime -> minute[0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
750 dateTime -> minute[1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
751 record -> second = (UBYTE)(dateTime -> second[0] << 4) + | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
752 dateTime -> second[1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
753 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
754 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
755 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
756 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
757 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
758 | PROJECT : GSM-PS (6147) MODULE : CMH_PHBF | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
759 | STATE : code ROUTINE : cmhPHB_cpyPhbDateTime | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
760 +-------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
761 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
762 PURPOSE : This function is used to convert the date and time used | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
763 within the phonebook management to the format used in | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
764 the command handler. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
765 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
766 GLOBAL void cmhPHB_cpyPhbDateTime ( const T_PHB_RECORD* record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
767 T_ACI_VP_ABS* dateTime ) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
768 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
769 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
770 dateTime -> year [0] = ( record->time.year ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
771 dateTime -> year [1] = record->time.year & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
772 dateTime -> month [0] = ( record->time.month ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
773 dateTime -> month [1] = record->time.month & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
774 dateTime -> day [0] = ( record->time.day ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
775 dateTime -> day [1] = record->time.day & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
776 dateTime -> hour [0] = ( record->time.hour ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
777 dateTime -> hour [1] = record->time.hour & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
778 dateTime -> minute[0] = ( record->time.minute ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
779 dateTime -> minute[1] = record->time.minute & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
780 dateTime -> second[0] = ( record->time.second ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
781 dateTime -> second[1] = record->time.second & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
782 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
783 dateTime -> year [0] = ( record -> year ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
784 dateTime -> year [1] = record -> year & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
785 dateTime -> month [0] = ( record -> month ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
786 dateTime -> month [1] = record -> month & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
787 dateTime -> day [0] = ( record -> day ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
788 dateTime -> day [1] = record -> day & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
789 dateTime -> hour [0] = ( record -> hour ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
790 dateTime -> hour [1] = record -> hour & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
791 dateTime -> minute[0] = ( record -> minute ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
792 dateTime -> minute[1] = record -> minute & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
793 dateTime -> second[0] = ( record -> second ) >> 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
794 dateTime -> second[1] = record -> second & 0x0F; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
795 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
796 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
797 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
798 /*==== EOF ========================================================*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
799 | 
