@@ -1,46 +1,46 | |||
|
1 | 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes" ?> |
|
2 | 2 | <CodeBlocks_layout_file> |
|
3 | 3 | <ActiveTarget name="Debug" /> |
|
4 | 4 | <File name="../header/ccsds_types.h" open="0" top="0" tabpos="3"> |
|
5 |
<Cursor position=" |
|
|
5 | <Cursor position="1196" topLine="121" /> | |
|
6 | 6 | </File> |
|
7 |
<File name="../header/fsw_init.h" open="0" top="0" tabpos=" |
|
|
8 |
<Cursor position=" |
|
|
7 | <File name="../header/fsw_init.h" open="0" top="0" tabpos="4"> | |
|
8 | <Cursor position="232" topLine="0" /> | |
|
9 | 9 | </File> |
|
10 | 10 | <File name="../header/fsw_misc.h" open="0" top="0" tabpos="3"> |
|
11 |
<Cursor position="2 |
|
|
11 | <Cursor position="292" topLine="0" /> | |
|
12 | 12 | </File> |
|
13 |
<File name="../header/fsw_params.h" open="0" top="0" tabpos=" |
|
|
14 |
<Cursor position="1 |
|
|
13 | <File name="../header/fsw_params.h" open="0" top="0" tabpos="2"> | |
|
14 | <Cursor position="1815" topLine="53" /> | |
|
15 | 15 | </File> |
|
16 | 16 | <File name="../header/fsw_processing.h" open="0" top="0" tabpos="0"> |
|
17 |
<Cursor position=" |
|
|
17 | <Cursor position="576" topLine="0" /> | |
|
18 | 18 | </File> |
|
19 | 19 | <File name="../header/grlib_regs.h" open="0" top="0" tabpos="4"> |
|
20 |
<Cursor position=" |
|
|
20 | <Cursor position="1318" topLine="36" /> | |
|
21 | 21 | </File> |
|
22 | 22 | <File name="../header/tc_handler.h" open="0" top="0" tabpos="4"> |
|
23 |
<Cursor position=" |
|
|
23 | <Cursor position="658" topLine="36" /> | |
|
24 | 24 | </File> |
|
25 |
<File name="../header/wf_handler.h" open="0" top="0" tabpos=" |
|
|
26 |
<Cursor position=" |
|
|
25 | <File name="../header/wf_handler.h" open="0" top="0" tabpos="3"> | |
|
26 | <Cursor position="732" topLine="7" /> | |
|
27 | 27 | </File> |
|
28 |
<File name="../src/fsw_globals.c" open=" |
|
|
29 |
<Cursor position=" |
|
|
28 | <File name="../src/fsw_globals.c" open="0" top="0" tabpos="5"> | |
|
29 | <Cursor position="663" topLine="18" /> | |
|
30 | 30 | </File> |
|
31 |
<File name="../src/fsw_init.c" open=" |
|
|
32 |
<Cursor position=" |
|
|
31 | <File name="../src/fsw_init.c" open="0" top="0" tabpos="1"> | |
|
32 | <Cursor position="3984" topLine="98" /> | |
|
33 | 33 | </File> |
|
34 | 34 | <File name="../src/fsw_misc.c" open="0" top="0" tabpos="2"> |
|
35 |
<Cursor position=" |
|
|
35 | <Cursor position="1183" topLine="46" /> | |
|
36 | 36 | </File> |
|
37 | 37 | <File name="../src/fsw_processing.c" open="0" top="0" tabpos="4"> |
|
38 |
<Cursor position=" |
|
|
38 | <Cursor position="79" topLine="0" /> | |
|
39 | 39 | </File> |
|
40 |
<File name="../src/tc_handler.c" open="0" top="0" tabpos=" |
|
|
41 |
<Cursor position="5 |
|
|
40 | <File name="../src/tc_handler.c" open="0" top="0" tabpos="3"> | |
|
41 | <Cursor position="22195" topLine="58" /> | |
|
42 | 42 | </File> |
|
43 |
<File name="../src/wf_handler.c" open=" |
|
|
44 |
<Cursor position="5 |
|
|
43 | <File name="../src/wf_handler.c" open="0" top="0" tabpos="2"> | |
|
44 | <Cursor position="5903" topLine="117" /> | |
|
45 | 45 | </File> |
|
46 | 46 | </CodeBlocks_layout_file> |
|
1 | NO CONTENT: modified file, binary diff hidden |
@@ -1,199 +1,220 | |||
|
1 | 1 | #ifndef CCSDS_H_INCLUDED |
|
2 | 2 | #define CCSDS_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #define CCSDS_TELEMETRY_HEADER_LENGTH 16+4 |
|
5 | 5 | #define CCSDS_TM_PKT_MAX_SIZE 4412 |
|
6 | 6 | #define CCSDS_TELECOMMAND_HEADER_LENGTH 10+4 |
|
7 | 7 | #define CCSDS_TC_PKT_MAX_SIZE 50 // size of the TC_LFR_UPDATE_INFO packet |
|
8 | 8 | #define CCSDS_TC_TM_PACKET_OFFSET 7 |
|
9 | 9 | #define CCSDS_PROCESS_ID 76 |
|
10 | 10 | #define CCSDS_PACKET_CATEGORY 12 |
|
11 | 11 | #define CCSDS_NODE_ADDRESS 0xfe |
|
12 | 12 | // |
|
13 | 13 | #define CCSDS_DESTINATION_ID_GROUND 0x00 |
|
14 | 14 | #define CCSDS_DESTINATION_ID 0x01 |
|
15 | 15 | #define CCSDS_DESTINATION_ID_DPU 0x01 |
|
16 | 16 | // |
|
17 | 17 | #define CCSDS_PROTOCOLE_ID 0x02 |
|
18 | 18 | #define CCSDS_USER_APP 0x00 |
|
19 | 19 | |
|
20 | 20 | #define SIZE_TM_LFR_TC_EXE_NOT_IMPLEMENTED 24 |
|
21 | 21 | #define SIZE_TM_LFR_TC_EXE_CORRUPTED 32 |
|
22 | 22 | |
|
23 | 23 | #define ILLEGAL_APID 0 |
|
24 | 24 | #define WRONG_LEN_PACKET 1 |
|
25 | 25 | #define INCOR_CHECKSUM 2 |
|
26 | 26 | #define ILL_TYPE 3 |
|
27 | 27 | #define ILL_SUBTYPE 4 |
|
28 | 28 | #define WRONG_APP_DATA 5 |
|
29 | 29 | #define WRONG_CMD_CODE 6 |
|
30 | 30 | #define CCSDS_TM_VALID 7 |
|
31 | // | |
|
32 | #define TC_NOT_EXE 40000 | |
|
33 | #define WRONG_SRC_ID 40001 | |
|
34 |
#define |
|
|
35 | #define FAIL_DETECTED 40003 | |
|
36 | #define NOT_ALLOWED 40004 | |
|
37 | #define CORRUPTED 40005 | |
|
31 | ||
|
32 | // TC TYPES | |
|
33 | #define TC_TYPE_GEN 181 | |
|
34 | #define TC_TYPE_TIME 9 | |
|
35 | ||
|
36 | // TC SUBTYPES | |
|
37 | #define TC_SUBTYPE_RESET 1 | |
|
38 | #define TC_SUBTYPE_LOAD_COMM 11 | |
|
39 | #define TC_SUBTYPE_LOAD_NORM 13 | |
|
40 | #define TC_SUBTYPE_LOAD_BURST 19 | |
|
41 | #define TC_SUBTYPE_LOAD_SBM1 25 | |
|
42 | #define TC_SUBTYPE_LOAD_SBM2 27 | |
|
43 | #define TC_SUBTYPE_DUMP 31 | |
|
44 | #define TC_SUBTYPE_ENTER 41 | |
|
45 | #define TC_SUBTYPE_UPDT_INFO 51 | |
|
46 | #define TC_SUBTYPE_EN_CAL 61 | |
|
47 | #define TC_SUBTYPE_DIS_CAL 63 | |
|
48 | #define TC_SUBTYPE_UPDT_TIME 129 | |
|
38 | 49 | |
|
39 | // // TC SUBTYPES | |
|
40 |
#define TC_ |
|
|
41 |
#define TC_ |
|
|
42 |
#define TC_ |
|
|
43 |
#define TC_ |
|
|
44 |
#define TC_ |
|
|
45 |
#define TC_ |
|
|
46 |
#define TC_ |
|
|
47 |
#define TC_ |
|
|
48 |
#define TC_ |
|
|
49 |
#define TC_ |
|
|
50 |
#define TC_ |
|
|
51 |
#define TC_ |
|
|
50 | // TC LEN | |
|
51 | #define TC_LEN_RESET 12 | |
|
52 | #define TC_LEN_LOAD_COMM 14 | |
|
53 | #define TC_LEN_LOAD_NORM 20 | |
|
54 | #define TC_LEN_LOAD_BURST 14 | |
|
55 | #define TC_LEN_LOAD_SBM1 14 | |
|
56 | #define TC_LEN_LOAD_SBM2 14 | |
|
57 | #define TC_LEN_DUMP 12 | |
|
58 | #define TC_LEN_ENTER 20 | |
|
59 | #define TC_LEN_UPDT_INFO 48 | |
|
60 | #define TC_LEN_EN_CAL 12 | |
|
61 | #define TC_LEN_DIS_CAL 12 | |
|
62 | #define TC_LEN_UPDT_TIME 18 | |
|
63 | ||
|
64 | // TM TYPES | |
|
65 | #define TM_TYPE_LFR_SCIENCE 21 | |
|
66 | ||
|
67 | // TM SUBTYPES | |
|
68 | #define TM_SUBTYPE_EXE_OK 7 | |
|
69 | #define TM_SUBTYPE_EXE_NOK 8 | |
|
70 | #define TM_SUBTYPE_HK 25 | |
|
71 | #define TM_SUBTYPE_SCIENCE 3 | |
|
72 | #define TM_SUBTYPE_LFR_SCIENCE 3 | |
|
52 | 73 | |
|
53 | 74 | #define SID_DEFAULT 0 |
|
54 | 75 | #define SID_HK 1 |
|
55 | 76 | #define SID_EXE_INC 5 |
|
56 | 77 | #define SID_NOT_EXE 40000 |
|
57 | 78 | #define SID_NOT_IMP 40002 |
|
58 | 79 | #define SID_EXE_ERR 40003 |
|
59 | 80 | #define SID_EXE_CORR 40005 |
|
60 | 81 | |
|
61 | 82 | #define SID_NORM_SWF_F0 3 |
|
62 | 83 | #define SID_NORM_SWF_F1 4 |
|
63 | 84 | #define SID_NORM_SWF_F2 5 |
|
64 | 85 | #define SID_NORM_CWF_F3 1 |
|
65 | 86 | #define SID_BURST_CWF_F2 2 |
|
66 | 87 | #define SID_SBM1_CWF_F1 24 |
|
67 | 88 | #define SID_SBM2_CWF_F2 25 |
|
68 | 89 | #define SID_NORM_ASM_F0 11 |
|
69 | 90 | #define SID_NORM_ASM_F1 12 |
|
70 | 91 | #define SID_NORM_ASM_F2 13 |
|
71 | 92 | #define SID_NORM_BP1_F0 14 |
|
72 | 93 | #define SID_NORM_BP1_F1 15 |
|
73 | 94 | #define SID_NORM_BP1_F2 16 |
|
74 | 95 | #define SID_NORM_BP2_F0 19 |
|
75 | 96 | #define SID_NORM_BP2_F1 20 |
|
76 | 97 | #define SID_NORM_BP2_F2 21 |
|
77 | 98 | #define SID_BURST_BP1_F0 17 |
|
78 | 99 | #define SID_BURST_BP2_F0 22 |
|
79 | 100 | #define SID_BURST_BP1_F1 18 |
|
80 | 101 | #define SID_BURST_BP2_F1 23 |
|
81 | 102 | #define SID_SBM1_BP1_F0 28 |
|
82 | 103 | #define SID_SBM1_BP2_F0 31 |
|
83 | 104 | #define SID_SBM2_BP1_F0 29 |
|
84 | 105 | #define SID_SBM2_BP2_F0 32 |
|
85 | 106 | #define SID_SBM1_BP1_F1 30 |
|
86 | 107 | #define SID_SBM1_BP2_F1 33 |
|
87 | 108 | |
|
88 | 109 | // LENGTH (BYTES) |
|
89 | 110 | #define LENGTH_TM_LFR_HK 126 |
|
90 | 111 | #define LENGTH_TM_LFR_TC_EXE_MAX 32 |
|
91 | 112 | #define LENGTH_TM_LFR_SCIENCE_NORMAL_WF_MAX 4102 |
|
92 | 113 | // |
|
93 | 114 | #define TM_LEN_EXE 20 - CCSDS_TC_TM_PACKET_OFFSET |
|
94 | 115 | #define TM_LEN_NOT_EXE 26 - CCSDS_TC_TM_PACKET_OFFSET |
|
95 | 116 | #define TM_LEN_NOT_IMP 24 - CCSDS_TC_TM_PACKET_OFFSET |
|
96 | 117 | #define TM_LEN_EXE_ERR 24 - CCSDS_TC_TM_PACKET_OFFSET |
|
97 | 118 | #define TM_LEN_EXE_CORR 32 - CCSDS_TC_TM_PACKET_OFFSET |
|
98 | 119 | #define TM_HEADER_LEN 16 |
|
99 | 120 | |
|
100 | 121 | #define LEN_TM_LFR_HK 126 + 4 |
|
101 | 122 | #define LEN_TM_LFR_TC_EXE_NOT_IMP 24 +4 |
|
102 | 123 | |
|
103 | 124 | #define TM_LEN_SCI_NORM_SWF_340 340 * 12 + 6 + 10 - 1 |
|
104 | 125 | #define TM_LEN_SCI_NORM_SWF_8 8 * 12 + 6 + 10 - 1 |
|
105 | 126 | |
|
106 | 127 | enum TM_TYPE{ |
|
107 | 128 | TM_LFR_TC_EXE_OK, |
|
108 | 129 | TM_LFR_TC_EXE_ERR, |
|
109 | 130 | TM_LFR_HK, |
|
110 | 131 | TM_LFR_SCI, |
|
111 | 132 | TM_LFR_SCI_SBM, |
|
112 | 133 | TM_LFR_PAR_DUMP |
|
113 | 134 | }; |
|
114 | 135 | |
|
115 | 136 | struct TMHeader_str |
|
116 | 137 | { |
|
117 | 138 | volatile unsigned char targetLogicalAddress; |
|
118 | 139 | volatile unsigned char protocolIdentifier; |
|
119 | 140 | volatile unsigned char reserved; |
|
120 | 141 | volatile unsigned char userApplication; |
|
121 | 142 | volatile unsigned char packetID[2]; |
|
122 | 143 | volatile unsigned char packetSequenceControl[2]; |
|
123 | 144 | volatile unsigned char packetLength[2]; |
|
124 | 145 | volatile unsigned char dataFieldHeader[10]; |
|
125 | 146 | }; |
|
126 | 147 | typedef struct TMHeader_str TMHeader_t; |
|
127 | 148 | |
|
128 | 149 | struct Packet_TM_LFR_HK_str |
|
129 | 150 | { |
|
130 | 151 | volatile unsigned char targetLogicalAddress; |
|
131 | 152 | volatile unsigned char protocolIdentifier; |
|
132 | 153 | volatile unsigned char reserved; |
|
133 | 154 | volatile unsigned char userApplication; |
|
134 | 155 | volatile unsigned char packetID[2]; |
|
135 | 156 | volatile unsigned char packetSequenceControl[2]; |
|
136 | 157 | volatile unsigned char packetLength[2]; |
|
137 | 158 | volatile unsigned char dataFieldHeader[10]; |
|
138 | 159 | volatile unsigned char data[LENGTH_TM_LFR_HK - 10 + 1]; |
|
139 | 160 | }; |
|
140 | 161 | typedef struct Packet_TM_LFR_HK_str Packet_TM_LFR_HK_t; |
|
141 | 162 | |
|
142 | 163 | struct Packet_TM_LFR_TC_EXE_str |
|
143 | 164 | { |
|
144 | 165 | volatile unsigned char targetLogicalAddress; |
|
145 | 166 | volatile unsigned char protocolIdentifier; |
|
146 | 167 | volatile unsigned char reserved; |
|
147 | 168 | volatile unsigned char userApplication; |
|
148 | 169 | volatile unsigned char packetID[2]; |
|
149 | 170 | volatile unsigned char packetSequenceControl[2]; |
|
150 | 171 | volatile unsigned char packetLength[2]; |
|
151 | 172 | volatile unsigned char dataFieldHeader[10]; |
|
152 | 173 | volatile unsigned char data[LENGTH_TM_LFR_TC_EXE_MAX - 10 + 1]; |
|
153 | 174 | }; |
|
154 | 175 | typedef struct Packet_TM_LFR_TC_EXE_str Packet_TM_LFR_TC_EXE_t; |
|
155 | 176 | |
|
156 | 177 | struct Packet_TM_LFR_SCIENCE_NORMAL_WF_str |
|
157 | 178 | { |
|
158 | 179 | volatile unsigned char targetLogicalAddress; |
|
159 | 180 | volatile unsigned char protocolIdentifier; |
|
160 | 181 | volatile unsigned char reserved; |
|
161 | 182 | volatile unsigned char userApplication; |
|
162 | 183 | volatile unsigned char packetID[2]; |
|
163 | 184 | volatile unsigned char packetSequenceControl[2]; |
|
164 | 185 | volatile unsigned char packetLength[2]; |
|
165 | 186 | volatile unsigned char dataFieldHeader[10]; |
|
166 | 187 | volatile unsigned char auxiliaryHeader[6]; |
|
167 | 188 | volatile unsigned char data[LENGTH_TM_LFR_SCIENCE_NORMAL_WF_MAX - 10 + 1]; |
|
168 | 189 | }; |
|
169 | 190 | typedef struct Packet_TM_LFR_SCIENCE_NORMAL_WF_str Packet_TM_LFR_SCIENCE_NORMAL_WF_t; |
|
170 | 191 | |
|
171 | 192 | struct ExtendedTMHeader_str |
|
172 | 193 | { |
|
173 | 194 | volatile unsigned char targetLogicalAddress; |
|
174 | 195 | volatile unsigned char protocolIdentifier; |
|
175 | 196 | volatile unsigned char reserved; |
|
176 | 197 | volatile unsigned char userApplication; |
|
177 | 198 | volatile unsigned char packetID[2]; |
|
178 | 199 | volatile unsigned char packetSequenceControl[2]; |
|
179 | 200 | volatile unsigned char packetLength[2]; |
|
180 | 201 | volatile unsigned char dataFieldHeader[10]; |
|
181 | 202 | volatile unsigned char auxiliaryHeader[6]; |
|
182 | 203 | }; |
|
183 | 204 | typedef struct ExtendedTMHeader_str ExtendedTMHeader_t; |
|
184 | 205 | |
|
185 | 206 | struct ccsdsTelecommandPacket_str |
|
186 | 207 | { |
|
187 | 208 | //unsigned char targetLogicalAddress; // removed by the grspw module |
|
188 | 209 | volatile unsigned char protocolIdentifier; |
|
189 | 210 | volatile unsigned char reserved; |
|
190 | 211 | volatile unsigned char userApplication; |
|
191 | 212 | volatile unsigned char packetID[2]; |
|
192 | 213 | volatile unsigned char packetSequenceControl[2]; |
|
193 | 214 | volatile unsigned char packetLength[2]; |
|
194 | 215 | volatile unsigned char dataFieldHeader[4]; |
|
195 | 216 | volatile unsigned char dataAndCRC[CCSDS_TC_PKT_MAX_SIZE-10]; |
|
196 | 217 | }; |
|
197 | 218 | typedef struct ccsdsTelecommandPacket_str ccsdsTelecommandPacket_t; |
|
198 | 219 | |
|
199 | 220 | #endif // CCSDS_H_INCLUDED |
@@ -1,60 +1,60 | |||
|
1 | 1 | #ifndef FSW_RTEMS_H_INCLUDED |
|
2 | 2 | #define FSW_RTEMS_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #include <errno.h> |
|
5 | 5 | #include <fcntl.h> |
|
6 | 6 | #include <stdio.h> |
|
7 | 7 | #include <stdlib.h> |
|
8 | 8 | |
|
9 | 9 | #include <grspw.h> |
|
10 | 10 | #include <apbuart.h> |
|
11 | 11 | |
|
12 | 12 | #include <fsw_params.h> |
|
13 | 13 | #include <fsw_misc.h> |
|
14 | 14 | #include <fsw_processing.h> |
|
15 | 15 | #include <tc_handler.h> |
|
16 | 16 | #include <wf_handler.h> |
|
17 | 17 | #include <grlib_regs.h> |
|
18 | 18 | |
|
19 | extern int sched_yield(); | |
|
19 | extern int sched_yield( void ); | |
|
20 | 20 | extern int errno; |
|
21 | 21 | extern rtems_id Task_id[ ]; /* array of task ids */ |
|
22 | 22 | extern rtems_name Task_name[ ]; /* array of task names */ |
|
23 | 23 | extern rtems_name misc_name[ ]; /* arry of miscellaneous names for rtems objects */ |
|
24 | 24 | extern int fdSPW; // grspw file descriptor |
|
25 | 25 | extern int fdUART; // uart file descriptor |
|
26 | 26 | |
|
27 | 27 | void timecode_irq_handler(void *pDev, void *regs, int minor, unsigned int tc); |
|
28 | 28 | |
|
29 | 29 | // MODE PARAMETERS |
|
30 | 30 | extern struct param_norm_str param_norm; |
|
31 | 31 | extern struct param_burst_str param_burst; |
|
32 | 32 | extern struct param_sbm1_str param_sbm1; |
|
33 | 33 | extern struct param_sbm2_str param_sbm2; |
|
34 | 34 | extern unsigned char param_common[]; |
|
35 | 35 | |
|
36 | 36 | // RTEMS TASKS |
|
37 | 37 | rtems_task Init( rtems_task_argument argument); /* forward declaration needed */ |
|
38 | 38 | rtems_task recv_task(rtems_task_argument argument); |
|
39 | 39 | rtems_task spiq_task(rtems_task_argument argument); |
|
40 | 40 | rtems_task stat_task(rtems_task_argument argument); |
|
41 | 41 | rtems_task wfrm_task(rtems_task_argument argument); |
|
42 | int create_names(); | |
|
43 | int create_all_tasks(); | |
|
44 | int start_all_tasks(); | |
|
45 | int create_message_queue(); | |
|
42 | int create_names( void ); | |
|
43 | int create_all_tasks( void ); | |
|
44 | int start_all_tasks( void ); | |
|
45 | int create_message_queue( void ); | |
|
46 | 46 | |
|
47 | 47 | // OTHER functions |
|
48 | void init_default_mode_parameters(); | |
|
48 | void init_default_mode_parameters( void ); | |
|
49 | 49 | |
|
50 | int configure_spw_link(); | |
|
50 | int configure_spw_link( void ); | |
|
51 | 51 | void configure_spacewire_set_NP(unsigned char val, unsigned int regAddr); // No Port force |
|
52 | 52 | void configure_spacewire_set_RE(unsigned char val, unsigned int regAddr); // RMAP Enable |
|
53 | 53 | |
|
54 | extern int rtems_cpu_usage_report(); | |
|
55 | extern int rtems_cpu_usage_reset(); | |
|
56 | void print_statistics(spw_stats *); | |
|
54 | extern int rtems_cpu_usage_report( void ); | |
|
55 | extern int rtems_cpu_usage_reset( void ); | |
|
56 | ||
|
57 | 57 | rtems_status_code write_spw(spw_ioctl_pkt_send* spw_ioctl_send); |
|
58 | 58 | void (*grspw_timecode_callback) (void *pDev, void *regs, int minor, unsigned int tc); |
|
59 | 59 | |
|
60 | 60 | #endif // FSW_RTEMS_CONFIG_H_INCLUDED |
@@ -1,28 +1,28 | |||
|
1 | 1 | #ifndef FSW_MISC_H_INCLUDED |
|
2 | 2 | #define FSW_MISC_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #include <rtems.h> |
|
5 | 5 | #include <stdio.h> |
|
6 | 6 | |
|
7 | 7 | #include <fsw_init.h> |
|
8 | 8 | #include <fsw_params.h> |
|
9 | 9 | #include <grlib_regs.h> |
|
10 | 10 | #include <grspw.h> |
|
11 | 11 | #include <ccsds_types.h> |
|
12 | 12 | |
|
13 |
rtems_name HK_name; |
|
|
14 |
rtems_id HK_id; |
|
|
13 | rtems_name HK_name; // name of the HK rate monotonic | |
|
14 | rtems_id HK_id; // id of the HK rate monotonic period | |
|
15 | 15 | |
|
16 | 16 | int configure_timer(gptimer_regs_t *gptimer_regs, unsigned char timer, unsigned int clock_divider, |
|
17 | 17 | unsigned char interrupt_level, rtems_isr (*timer_isr)() ); |
|
18 | 18 | void print_statistics(spw_stats *stats); |
|
19 | 19 | |
|
20 | 20 | // SERIAL LINK |
|
21 | int send_console_outputs_on_serial_port(); | |
|
21 | int send_console_outputs_on_serial_port( void ); | |
|
22 | 22 | int set_apbuart_scaler_reload_register(unsigned int regs, unsigned int value); |
|
23 | 23 | |
|
24 | 24 | // RTEMS TASKS |
|
25 | 25 | rtems_task stat_task(rtems_task_argument argument); |
|
26 | 26 | rtems_task hous_task(rtems_task_argument argument); |
|
27 | 27 | |
|
28 | 28 | #endif // FSW_MISC_H_INCLUDED |
@@ -1,106 +1,104 | |||
|
1 | 1 | #ifndef FSW_RTEMS_CONFIG_H_INCLUDED |
|
2 | 2 | #define FSW_RTEMS_CONFIG_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #define GRSPW_DEVICE_NAME "/dev/grspw0" |
|
5 | 5 | #define UART_DEVICE_NAME "/dev/console" |
|
6 | 6 | |
|
7 | 7 | //********** |
|
8 | 8 | // LFR MODES |
|
9 | 9 | #define LFR_MODE_STANDBY 0 |
|
10 | 10 | #define LFR_MODE_NORMAL 1 |
|
11 | 11 | #define LFR_MODE_BURST 2 |
|
12 | 12 | #define LFR_MODE_SBM1 3 |
|
13 | 13 | #define LFR_MODE_SBM2 4 |
|
14 | 14 | |
|
15 | 15 | //***************************** |
|
16 | 16 | // APB REGISTERS BASE ADDRESSES |
|
17 | 17 | #define REGS_ADDR_APBUART 0x80000100 |
|
18 | 18 | #define REGS_ADDR_GPTIMER 0x80000300 |
|
19 | 19 | #define REGS_ADDR_GRSPW 0x80000500 |
|
20 | 20 | #define REGS_ADDR_TIME_MANAGEMENT 0x80000600 |
|
21 | 21 | #define REGS_ADDR_SPECTRAL_MATRICES 0x80000700 |
|
22 | #define REGS_ADDR_WAVEFORM_PICKER 0x80000f20 | |
|
22 | 23 | |
|
23 | 24 | #define APBUART_CTRL_REG_MASK_DB 0xfffff7ff |
|
24 | 25 | #define APBUART_SCALER_RELOAD_VALUE 0x00000050 // 25 MHz => about 38400 |
|
25 | 26 | |
|
26 | 27 | //********** |
|
27 | 28 | // IRQ LINES |
|
28 | 29 | #define IRQ_SM 9 |
|
29 | 30 | #define IRQ_SPARC_SM 0x19 // see sparcv8.pdf p.76 for interrupt levels |
|
30 | 31 | #define IRQ_WF 10 |
|
31 | 32 | #define IRQ_SPARC_WF 0x1a // see sparcv8.pdf p.76 for interrupt levels |
|
32 | 33 | #define IRQ_TIME1 12 |
|
33 | 34 | #define IRQ_SPARC_TIME1 0x1c // see sparcv8.pdf p.76 for interrupt levels |
|
34 | 35 | #define IRQ_TIME2 13 |
|
35 | 36 | #define IRQ_SPARC_TIME2 0x1d // see sparcv8.pdf p.76 for interrupt levels |
|
37 | #define IRQ_WAVEFORM_PICKER 14 | |
|
38 | #define IRQ_SPARC_WAVEFORM_PICKER 0x1e // see sparcv8.pdf p.76 for interrupt levels | |
|
36 | 39 | |
|
37 | 40 | //***** |
|
38 | 41 | // TIME |
|
39 | 42 | #define CLKDIV_SM_SIMULATOR 9999 |
|
40 | 43 | #define CLKDIV_WF_SIMULATOR 9999999 |
|
41 | 44 | #define TIMER_SM_SIMULATOR 1 |
|
42 | 45 | #define TIMER_WF_SIMULATOR 2 |
|
43 | 46 | #define HK_PERIOD 100 // 100 * 10ms => 1sec |
|
44 | 47 | |
|
45 | 48 | //****** |
|
46 | 49 | // RTEMS |
|
47 | 50 | #define TASKID_RECV 1 |
|
48 | 51 | #define TASKID_ACTN 2 |
|
49 | 52 | #define TASKID_SPIQ 3 |
|
50 | 53 | #define TASKID_SMIQ 4 |
|
51 | 54 | #define TASKID_STAT 5 |
|
52 | 55 | #define TASKID_AVF0 6 |
|
53 | 56 | #define TASKID_BPF0 7 |
|
54 | 57 | #define TASKID_WFRM 8 |
|
55 | 58 | #define TASKID_DUMB 9 |
|
56 | 59 | #define TASKID_HOUS 10 |
|
57 | 60 | |
|
58 | 61 | #define ACTION_MSG_QUEUE_COUNT 10 |
|
59 | 62 | |
|
60 | 63 | //******* |
|
61 | 64 | // MACROS |
|
62 | #define PRINT_TASK_STATISTICS | |
|
63 | #define PRINT_MESSAGES_ON_CONSOLE // enable or disable the printf instructions | |
|
64 | 65 | #ifdef PRINT_MESSAGES_ON_CONSOLE |
|
65 | 66 | #define PRINTF(x) printf(x); |
|
66 | 67 | #define PRINTF1(x,y) printf(x,y); |
|
67 | 68 | #define PRINTF2(x,y,z) printf(x,y,z); |
|
68 | 69 | #else |
|
69 | 70 | #define PRINTF(x) ; |
|
70 | 71 | #define PRINTF1(x,y) ; |
|
71 | 72 | #define PRINTF2(x,y,z) ; |
|
72 | 73 | #endif |
|
73 | 74 | |
|
74 | 75 | #define NB_SAMPLES_PER_SNAPSHOT 2048 |
|
76 | #define TIME_OFFSET 2 | |
|
77 | #define WAVEFORM_EXTENDED_HEADER_OFFSET 22 | |
|
75 | 78 | #define NB_BYTES_SWF_BLK 2 * 6 |
|
76 | 79 | #define NB_WORDS_SWF_BLK 3 |
|
77 | 80 | |
|
78 | 81 | struct param_norm_str{ |
|
79 | 82 | unsigned int sy_lfr_n_swf_l; // length of the snapshots |
|
80 | 83 | unsigned int sy_lfr_n_swf_p; // time between two snapshots |
|
81 | 84 | unsigned int sy_lfr_n_asm_p; // time between two asm |
|
82 | 85 | unsigned char sy_lfr_n_bp_p0; // timebetween two products BP1 set |
|
83 | 86 | unsigned char sy_lfr_n_bp_p1; // time between two products BP2 set |
|
84 | 87 | }; |
|
85 | 88 | |
|
86 | 89 | struct param_burst_str{ |
|
87 | 90 | unsigned char sy_lfr_b_bp_p0; // timebetween two products BP1 set |
|
88 | 91 | unsigned char sy_lfr_b_bp_p1; // time between two products BP2 set |
|
89 | 92 | }; |
|
90 | 93 | |
|
91 | 94 | struct param_sbm1_str{ |
|
92 | 95 | unsigned char sy_lfr_s1_bp_p0; // timebetween two products BP1 set |
|
93 | 96 | unsigned char sy_lfr_s1_bp_p1; // time between two products BP2 set |
|
94 | 97 | }; |
|
95 | 98 | |
|
96 | 99 | struct param_sbm2_str{ |
|
97 | 100 | unsigned char sy_lfr_s2_bp_p0; // timebetween two products BP1 set |
|
98 | 101 | unsigned char sy_lfr_s2_bp_p1; // time between two products BP2 set |
|
99 | 102 | }; |
|
100 | 103 | |
|
101 | extern volatile int wf_snap_f0[ ]; // 24576 bytes | |
|
102 | extern volatile int wf_snap_f1[ ]; // 24576 bytes | |
|
103 | extern volatile int wf_snap_f2[ ]; // 24576 bytes | |
|
104 | extern volatile int wf_cont_f3[ ]; // 24576 bytes | |
|
105 | ||
|
106 | 104 | #endif // FSW_RTEMS_CONFIG_H_INCLUDED |
@@ -1,45 +1,66 | |||
|
1 | 1 | #ifndef FSW_RTEMS_PROCESSING_H_INCLUDED |
|
2 | 2 | #define FSW_RTEMS_PROCESSING_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #define NB_BINS_spec_mat 128 |
|
5 | 5 | #define NB_VALUES_PER_spec_mat 25 |
|
6 | 6 | #define TOTAL_SIZE_SPEC_MAT NB_BINS_spec_mat * NB_VALUES_PER_spec_mat |
|
7 | 7 | #define NB_BINS_COMPRESSED_MATRIX_f0 11 |
|
8 | 8 | #define SIZE_COMPRESSED_spec_mat_f1 13 |
|
9 | 9 | #define SIZE_COMPRESSED_spec_mat_f2 12 |
|
10 | 10 | #define TOTAL_SIZE_COMPRESSED_MATRIX_f0 NB_BINS_COMPRESSED_MATRIX_f0 * NB_VALUES_PER_spec_mat |
|
11 | 11 | #define NB_AVERAGE_NORMAL_f0 96*4 |
|
12 | 12 | #define NB_SM_TO_RECEIVE_BEFORE_AVF0 8 |
|
13 | 13 | |
|
14 | 14 | #include <rtems.h> |
|
15 | 15 | #include <grlib_regs.h> |
|
16 | 16 | #include <fsw_params.h> |
|
17 | #include <stdio.h> | |
|
18 | #include <stdlib.h> | |
|
19 | #include <leon.h> | |
|
17 | 20 | |
|
18 | 21 | struct BP1_str{ |
|
19 | 22 | volatile unsigned char PE[2]; |
|
20 | 23 | volatile unsigned char PB[2]; |
|
21 | 24 | volatile unsigned char V0; |
|
22 | 25 | volatile unsigned char V1; |
|
23 | 26 | volatile unsigned char V2_ELLIP_DOP; |
|
24 | 27 | volatile unsigned char SZ; |
|
25 | 28 | volatile unsigned char VPHI; |
|
26 | 29 | }; |
|
27 | 30 | typedef struct BP1_str BP1_t; |
|
28 | 31 | |
|
32 | extern volatile int spec_mat_f0_a[ ]; | |
|
33 | extern volatile int spec_mat_f0_b[ ]; | |
|
34 | extern volatile int spec_mat_f0_c[ ]; | |
|
35 | extern volatile int spec_mat_f0_d[ ]; | |
|
36 | extern volatile int spec_mat_f0_e[ ]; | |
|
37 | extern volatile int spec_mat_f0_f[ ]; | |
|
38 | extern volatile int spec_mat_f0_g[ ]; | |
|
39 | extern volatile int spec_mat_f0_h[ ]; | |
|
40 | extern float averaged_spec_mat_f0[ ]; | |
|
41 | extern float compressed_spec_mat_f0[ ]; | |
|
42 | extern unsigned char LFR_BP1_F0[ ]; | |
|
43 | ||
|
44 | extern BP1_t data_BP1[ ]; | |
|
45 | ||
|
46 | extern rtems_id Task_id[ ]; /* array of task ids */ | |
|
47 | ||
|
48 | extern spectral_matrices_regs_t *spectral_matrices_regs; | |
|
49 | ||
|
29 | 50 | // ISR |
|
30 | 51 | rtems_isr spectral_matrices_isr( rtems_vector_number vector ); |
|
31 | 52 | |
|
32 | 53 | // RTEMS TASKS |
|
33 | 54 | rtems_task spw_bppr_task(rtems_task_argument argument); |
|
34 | 55 | rtems_task avf0_task(rtems_task_argument argument); |
|
35 | 56 | rtems_task bpf0_task(rtems_task_argument argument); |
|
36 | 57 | rtems_task smiq_task(rtems_task_argument argument); // added to test the spectral matrix simulator |
|
37 | 58 | |
|
38 | 59 | rtems_task spw_bppr_task_rate_monotonic(rtems_task_argument argument); |
|
39 | 60 | void matrix_average(volatile int *spec_mat, float *averaged_spec_mat); |
|
40 | 61 | void matrix_compression(float *averaged_spec_mat, unsigned char fChannel, float *compressed_spec_mat); |
|
41 | 62 | void matrix_reset(float *averaged_spec_mat); |
|
42 | 63 | void BP1_set(float * compressed_spec_mat, unsigned char nb_bins_compressed_spec_mat, unsigned char * LFR_BP1); |
|
43 | 64 | void BP2_set(float * compressed_spec_mat, unsigned char nb_bins_compressed_spec_mat); |
|
44 | 65 | |
|
45 | 66 | #endif // FSW_RTEMS_PROCESSING_H_INCLUDED |
@@ -1,48 +1,64 | |||
|
1 | 1 | #ifndef GRLIBREGS_H_INCLUDED |
|
2 | 2 | #define GRLIBREGS_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #define NB_GPTIMER 3 |
|
5 | 5 | |
|
6 | 6 | struct apbuart_regs_str{ |
|
7 | 7 | volatile unsigned int data; |
|
8 | 8 | volatile unsigned int status; |
|
9 | 9 | volatile unsigned int ctrl; |
|
10 | 10 | volatile unsigned int scaler; |
|
11 | 11 | volatile unsigned int fifoDebug; |
|
12 | 12 | }; |
|
13 | 13 | |
|
14 | 14 | struct timer_regs_str |
|
15 | 15 | { |
|
16 | 16 | volatile unsigned int counter; |
|
17 | 17 | volatile unsigned int reload; |
|
18 | 18 | volatile unsigned int ctrl; |
|
19 | 19 | volatile unsigned int unused; |
|
20 | 20 | }; |
|
21 | 21 | typedef struct timer_regs_str timer_regs_t; |
|
22 | 22 | |
|
23 | 23 | struct gptimer_regs_str |
|
24 | 24 | { |
|
25 | 25 | volatile unsigned int scaler_value; |
|
26 | 26 | volatile unsigned int scaler_reload; |
|
27 | 27 | volatile unsigned int conf; |
|
28 | 28 | volatile unsigned int unused0; |
|
29 | 29 | timer_regs_t timer[NB_GPTIMER]; |
|
30 | 30 | }; |
|
31 | 31 | typedef struct gptimer_regs_str gptimer_regs_t; |
|
32 | 32 | |
|
33 | 33 | struct spectral_matrices_regs_str{ |
|
34 | 34 | volatile int ctrl; |
|
35 | 35 | volatile int address0; |
|
36 | 36 | volatile int address1; |
|
37 | 37 | }; |
|
38 | 38 | typedef struct spectral_matrices_regs_str spectral_matrices_regs_t; |
|
39 | 39 | |
|
40 | 40 | struct time_management_regs_str{ |
|
41 | 41 | volatile int ctrl; // bit 0 forces the load of the coarse_time_load value and resets the fine_time |
|
42 | 42 | volatile int coarse_time_load; |
|
43 | 43 | volatile int coarse_time; |
|
44 | 44 | volatile int fine_time; |
|
45 | 45 | }; |
|
46 | 46 | typedef struct time_management_regs_str time_management_regs_t; |
|
47 | 47 | |
|
48 | struct waveform_picker_regs_str{ | |
|
49 | volatile int data_shaping; // 0x00 00 *** R1 R0 SP1 SP0 BW | |
|
50 | volatile int burst_enable; // 0x04 01 *** burst f2, f1, f0 enable f3, f2, f1, f0 | |
|
51 | volatile int addr_data_f0; // 0x08 10 *** | |
|
52 | volatile int addr_data_f1; // 0x0c 11 *** | |
|
53 | volatile int addr_data_f2; // 0x10 100 *** | |
|
54 | volatile int addr_data_f3; // 0x14 101 *** | |
|
55 | volatile int status; // 0x18 110 *** | |
|
56 | volatile int delta_snapshot; // 0x1c 111 *** | |
|
57 | volatile int delta_f2_f1; // 0x20 0000 *** | |
|
58 | volatile int delta_f2_f0; // 0x24 0001 *** | |
|
59 | volatile int nb_burst_available;// 0x28 0010 *** | |
|
60 | volatile int nb_snapshot_param; // 0x2c 0011 *** | |
|
61 | }; | |
|
62 | typedef struct waveform_picker_regs_str waveform_picker_regs_t; | |
|
63 | ||
|
48 | 64 | #endif // GRLIBREGS_H_INCLUDED |
@@ -1,70 +1,65 | |||
|
1 | 1 | #ifndef TC_HANDLER_H_INCLUDED |
|
2 | 2 | #define TC_HANDLER_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #include <rtems.h> |
|
5 | 5 | #include <bsp.h> // for the LEON_Unmask_interrupt function |
|
6 | 6 | #include <stdio.h> |
|
7 | 7 | #include <unistd.h> // for the read call |
|
8 | 8 | #include <sys/ioctl.h> // for the ioctl call |
|
9 | 9 | #include <ccsds_types.h> |
|
10 | 10 | #include <grspw.h> |
|
11 | 11 | #include <fsw_init.h> |
|
12 | 12 | |
|
13 | 13 | extern int fdSPW; |
|
14 | 14 | extern rtems_name misc_name[ ]; |
|
15 | 15 | extern rtems_name misc_id[ ]; |
|
16 | 16 | extern rtems_id Task_id[ ]; // array of task ids |
|
17 | 17 | // MODE PARAMETERS |
|
18 | 18 | extern struct param_norm_str param_norm; |
|
19 | 19 | extern struct param_sbm1_str param_sbm1; |
|
20 | 20 | extern struct param_sbm2_str param_sbm2; |
|
21 | 21 | extern time_management_regs_t *time_management_regs; |
|
22 | extern waveform_picker_regs_t *waveform_picker_regs; | |
|
23 | extern gptimer_regs_t *gptimer_regs; | |
|
22 | 24 | extern unsigned char param_common[]; |
|
23 | 25 | |
|
24 | unsigned char currentTC_LEN_RCV[2]; // SHALL be equal to the current TC packet estimated packet length field | |
|
25 | unsigned char currentTC_COMPUTED_CRC[2]; | |
|
26 | unsigned int currentTC_LEN_RCV_AsUnsignedInt; | |
|
27 | unsigned int currentTM_length; | |
|
28 | unsigned char currentTC_processedFlag; | |
|
29 | ||
|
30 | 26 | //**** |
|
31 | 27 | // ISR |
|
32 | 28 | rtems_isr commutation_isr1( rtems_vector_number vector ); |
|
33 | 29 | rtems_isr commutation_isr2( rtems_vector_number vector ); |
|
34 | 30 | |
|
35 | 31 | //********************** |
|
36 | 32 | // GENERAL USE FUNCTIONS |
|
37 |
|
|
|
38 | void initLookUpTableForCRC(); | |
|
33 | void initLookUpTableForCRC( void ); | |
|
39 | 34 | void GetCRCAsTwoBytes(unsigned char* data, unsigned char* crcAsTwoBytes, unsigned int sizeOfData); |
|
40 | 35 | |
|
41 | 36 | //********************* |
|
42 | 37 | // ACCEPTANCE FUNCTIONS |
|
43 | 38 | unsigned char acceptTM(ccsdsTelecommandPacket_t * TMPacket, unsigned int tc_len_recv); |
|
44 | 39 | |
|
45 | 40 | unsigned char TM_build_header( enum TM_TYPE tm_type, unsigned int packetLength, |
|
46 | 41 | unsigned int coarseTime, unsigned int fineTime, TMHeader_t *TMHeader); |
|
47 | 42 | unsigned char TM_build_data(ccsdsTelecommandPacket_t *TC, char* data, unsigned int SID, unsigned char *computed_CRC); |
|
48 | 43 | int TC_checker(ccsdsTelecommandPacket_t *TC, unsigned int TC_LEN_RCV); |
|
49 | 44 | |
|
50 | 45 | //*********** |
|
51 | 46 | // RTEMS TASK |
|
52 | 47 | rtems_task recv_task( rtems_task_argument unused ); |
|
53 | 48 | rtems_task actn_task( rtems_task_argument unused ); |
|
54 | 49 | rtems_task dumb_task( rtems_task_argument unused ); |
|
55 | int create_message_queue(); | |
|
50 | int create_message_queue( void ); | |
|
56 | 51 | |
|
57 | 52 | //*********** |
|
58 | 53 | // TC ACTIONS |
|
59 | 54 | int action_default(ccsdsTelecommandPacket_t *TC); |
|
60 | 55 | int action_default_alt(ccsdsTelecommandPacket_t *TC); |
|
61 | 56 | int send_tm_lfr_tc_exe_success(ccsdsTelecommandPacket_t *TC); |
|
62 | 57 | // |
|
63 | 58 | int action_load_norm(ccsdsTelecommandPacket_t *TC); |
|
64 | 59 | int action_enter(ccsdsTelecommandPacket_t *TC); |
|
65 | 60 | int action_updt_time(ccsdsTelecommandPacket_t *TC); |
|
66 | 61 | |
|
67 | 62 | #endif // TC_HANDLER_H_INCLUDED |
|
68 | 63 | |
|
69 | 64 | |
|
70 | 65 |
@@ -1,25 +1,37 | |||
|
1 | 1 | #ifndef WF_HANDLER_H_INCLUDED |
|
2 | 2 | #define WF_HANDLER_H_INCLUDED |
|
3 | 3 | |
|
4 | 4 | #include <rtems.h> |
|
5 | 5 | #include <fsw_params.h> |
|
6 | 6 | #include <grspw.h> |
|
7 | 7 | #include <grlib_regs.h> |
|
8 | 8 | #include <ccsds_types.h> |
|
9 | 9 | #include <stdio.h> |
|
10 | 10 | #include <fsw_init.h> |
|
11 | #include <math.h> | |
|
12 | ||
|
13 | #define pi 3.1415 | |
|
11 | 14 | |
|
12 | 15 | //#include <sys/ioctl.h> |
|
13 | 16 | |
|
14 | 17 | extern rtems_id Task_id[]; /* array of task ids */ |
|
15 | 18 | extern int fdSPW; |
|
19 | extern volatile int wf_snap_f0[ ]; | |
|
20 | extern volatile int wf_snap_f1[ ]; | |
|
21 | extern volatile int wf_snap_f2[ ]; | |
|
22 | extern volatile int wf_cont_f3[ ]; | |
|
23 | extern waveform_picker_regs_t *waveform_picker_regs; | |
|
16 | 24 | |
|
17 | 25 | rtems_isr waveforms_isr( rtems_vector_number vector ); |
|
26 | rtems_isr waveforms_simulator_isr( rtems_vector_number vector ); | |
|
18 | 27 | rtems_task wfrm_task(rtems_task_argument argument); |
|
19 | 28 | |
|
20 | 29 | //****************** |
|
21 | 30 | // general functions |
|
22 | void init_waveforms(); | |
|
23 | int buil_value(int value1, int value0); | |
|
31 | void init_waveforms( void ); | |
|
32 | void reset_waveforms( void ); | |
|
33 | void send_waveform( ExtendedTMHeader_t *header, volatile int *waveform, unsigned int sid, spw_ioctl_pkt_send *spw_ioctl_send); | |
|
34 | void init_waveform_picker_regs(); | |
|
35 | int build_value(int value1, int value0); | |
|
24 | 36 | |
|
25 | 37 | #endif // WF_HANDLER_H_INCLUDED |
@@ -1,48 +1,52 | |||
|
1 | 1 | #include <fsw_processing.h> |
|
2 | 2 | #include <rtems.h> |
|
3 | 3 | #include <ccsds_types.h> |
|
4 | 4 | |
|
5 | 5 | // RTEMS GLOBAL VARIABLES |
|
6 | 6 | rtems_name misc_name[5]; |
|
7 | 7 | rtems_name misc_id[5]; |
|
8 | 8 | rtems_id Task_id[15]; /* array of task ids */ |
|
9 | 9 | rtems_name Task_name[15]; /* array of task names */ |
|
10 | int fdSPW; | |
|
11 | int fdUART; | |
|
10 | int fdSPW = 0; | |
|
11 | int fdUART = 0; | |
|
12 | ||
|
13 | spectral_matrices_regs_t *spectral_matrices_regs = NULL; | |
|
12 | 14 | |
|
13 | 15 | // APB CONFIGURATION REGISTERS |
|
14 | 16 | time_management_regs_t *time_management_regs = (time_management_regs_t*) REGS_ADDR_TIME_MANAGEMENT; |
|
17 | waveform_picker_regs_t *waveform_picker_regs = (waveform_picker_regs_t*) REGS_ADDR_WAVEFORM_PICKER; | |
|
18 | gptimer_regs_t *gptimer_regs = (gptimer_regs_t *) REGS_ADDR_GPTIMER; | |
|
15 | 19 | |
|
16 | 20 | // WAVEFORMS GLOBAL VARIABLES |
|
17 |
volatile int wf_snap_f0[ NB_SAMPLES_PER_SNAPSHOT * NB_ |
|
|
18 |
volatile int wf_snap_f1[ NB_SAMPLES_PER_SNAPSHOT * NB_ |
|
|
19 |
volatile int wf_snap_f2[ NB_SAMPLES_PER_SNAPSHOT * NB_ |
|
|
20 |
volatile int wf_cont_f3[ NB_SAMPLES_PER_SNAPSHOT * NB_ |
|
|
21 | volatile int wf_snap_f0[ 2 * NB_SAMPLES_PER_SNAPSHOT * NB_WORDS_SWF_BLK + 2]; // 2048 * 3 * 4 + 2 * 4 = 24576 + 8 bytes | |
|
22 | volatile int wf_snap_f1[ 2 * NB_SAMPLES_PER_SNAPSHOT * NB_WORDS_SWF_BLK + 2]; // 2048 * 3 * 4 + 2 * 4 = 24576 + 8 bytes | |
|
23 | volatile int wf_snap_f2[ 2 * NB_SAMPLES_PER_SNAPSHOT * NB_WORDS_SWF_BLK + 2]; // 2048 * 3 * 4 + 2 * 4 = 24576 + 8 bytes | |
|
24 | volatile int wf_cont_f3[ 2 * NB_SAMPLES_PER_SNAPSHOT * NB_WORDS_SWF_BLK + 2]; // 2048 * 3 * 4 + 2 * 4 = 24576 + 8 bytes | |
|
21 | 25 | |
|
22 | 26 | // SPECTRAL MATRICES GLOBAL VARIABLES |
|
23 | 27 | volatile int spec_mat_f0_a[ TOTAL_SIZE_SPEC_MAT ]; |
|
24 | 28 | volatile int spec_mat_f0_b[ TOTAL_SIZE_SPEC_MAT ]; |
|
25 | 29 | volatile int spec_mat_f0_c[ TOTAL_SIZE_SPEC_MAT ]; |
|
26 | 30 | volatile int spec_mat_f0_d[ TOTAL_SIZE_SPEC_MAT ]; |
|
27 | 31 | volatile int spec_mat_f0_e[ TOTAL_SIZE_SPEC_MAT ]; |
|
28 | 32 | volatile int spec_mat_f0_f[ TOTAL_SIZE_SPEC_MAT ]; |
|
29 | 33 | volatile int spec_mat_f0_g[ TOTAL_SIZE_SPEC_MAT ]; |
|
30 | 34 | volatile int spec_mat_f0_h[ TOTAL_SIZE_SPEC_MAT ]; |
|
31 | 35 | // |
|
32 | 36 | float averaged_spec_mat_f0[ TOTAL_SIZE_SPEC_MAT ]; |
|
33 | 37 | float compressed_spec_mat_f0[ TOTAL_SIZE_COMPRESSED_MATRIX_f0 ]; |
|
34 | 38 | |
|
35 | 39 | // MODE PARAMETERS |
|
36 | 40 | struct param_norm_str param_norm; |
|
37 | 41 | struct param_burst_str param_burst; |
|
38 | 42 | struct param_sbm1_str param_sbm1; |
|
39 | 43 | struct param_sbm2_str param_sbm2; |
|
40 | 44 | unsigned char param_common[2]; |
|
41 | 45 | |
|
42 | 46 | // HK PACKETS |
|
43 | 47 | Packet_TM_LFR_HK_t housekeeping_packet; |
|
44 | 48 | |
|
45 | 49 | // BASIC PARAMETERS GLOBAL VARIABLES |
|
46 | 50 | unsigned char LFR_BP1_F0[ NB_BINS_COMPRESSED_MATRIX_f0 * 9 ]; |
|
47 | 51 | BP1_t data_BP1[ NB_BINS_COMPRESSED_MATRIX_f0 ]; |
|
48 | 52 |
@@ -1,373 +1,414 | |||
|
1 | 1 | //************************* |
|
2 | 2 | // GPL reminder to be added |
|
3 | 3 | //************************* |
|
4 | 4 | |
|
5 | 5 | #include <rtems.h> |
|
6 | 6 | |
|
7 | 7 | /* configuration information */ |
|
8 | 8 | |
|
9 | 9 | #define CONFIGURE_INIT |
|
10 | 10 | |
|
11 | 11 | #include <bsp.h> /* for device driver prototypes */ |
|
12 | 12 | |
|
13 | 13 | /* configuration information */ |
|
14 | 14 | |
|
15 | 15 | #define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER |
|
16 | 16 | #define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER |
|
17 | 17 | |
|
18 | 18 |
#define CONFIGURE_MAXIMUM_TASKS |
|
19 | 19 | #define CONFIGURE_RTEMS_INIT_TASKS_TABLE |
|
20 | 20 |
#define CONFIGURE_EXTRA_TASK_STACKS |
|
21 | 21 | #define CONFIGURE_LIBIO_MAXIMUM_FILE_DESCRIPTORS 32 |
|
22 | 22 |
#define CONFIGURE_INIT_TASK_PRIORITY |
|
23 | 23 | #define CONFIGURE_MAXIMUM_DRIVERS 16 |
|
24 | 24 | #define CONFIGURE_MAXIMUM_PERIODS 5 |
|
25 | 25 | #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES 1 |
|
26 | 26 | |
|
27 | 27 | #include <rtems/confdefs.h> |
|
28 | 28 | |
|
29 | 29 | /* If --drvmgr was enabled during the configuration of the RTEMS kernel */ |
|
30 | 30 | #ifdef RTEMS_DRVMGR_STARTUP |
|
31 | 31 | #ifdef LEON3 |
|
32 | 32 | /* Add Timer and UART Driver */ |
|
33 | 33 | #ifdef CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER |
|
34 | 34 | #define CONFIGURE_DRIVER_AMBAPP_GAISLER_GPTIMER |
|
35 | 35 | #endif |
|
36 | 36 | #ifdef CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER |
|
37 | 37 | #define CONFIGURE_DRIVER_AMBAPP_GAISLER_APBUART |
|
38 | 38 | #endif |
|
39 | 39 | #endif |
|
40 | 40 | #define CONFIGURE_DRIVER_AMBAPP_GAISLER_GRSPW /* GRSPW Driver */ |
|
41 | 41 | #include <drvmgr/drvmgr_confdefs.h> |
|
42 | 42 | #endif |
|
43 | 43 | |
|
44 | 44 | #include <fsw_init.h> |
|
45 | 45 | #include <fsw_config.c> |
|
46 | 46 | |
|
47 | char *link_status(int status); | |
|
48 | ||
|
49 | 47 | char *lstates[6] = {"Error-reset", |
|
50 | 48 | "Error-wait", |
|
51 | 49 | "Ready", |
|
52 | 50 | "Started", |
|
53 | 51 | "Connecting", |
|
54 | 52 | "Run" |
|
55 | 53 | }; |
|
56 | 54 | |
|
57 | 55 | rtems_task Init( rtems_task_argument ignored ) |
|
58 | 56 | { |
|
59 | 57 | rtems_status_code status; |
|
60 | 58 | rtems_isr_entry old_isr_handler; |
|
61 | 59 | |
|
62 | 60 | PRINTF("\n\n\n\n\n") |
|
63 | 61 | PRINTF("***************************\n") |
|
64 | 62 | PRINTF("** START Flight Software **\n") |
|
65 | 63 | PRINTF("***************************\n") |
|
66 | 64 | PRINTF("\n\n") |
|
67 | 65 | |
|
68 | 66 | //send_console_outputs_on_serial_port(); |
|
69 | 67 | set_apbuart_scaler_reload_register(REGS_ADDR_APBUART, APBUART_SCALER_RELOAD_VALUE); |
|
70 | 68 | |
|
71 | 69 | initLookUpTableForCRC(); // in tc_handler.h |
|
72 | 70 | init_default_mode_parameters(); |
|
73 | 71 | create_message_queue(); |
|
74 | 72 | |
|
75 | 73 | create_names(); |
|
76 | 74 | create_all_tasks(); |
|
77 | 75 | start_all_tasks(); |
|
78 | 76 | |
|
79 | 77 | grspw_timecode_callback = &timecode_irq_handler; |
|
80 | 78 | |
|
81 | 79 | configure_spw_link(); |
|
82 | 80 | |
|
83 | init_waveforms(); | |
|
84 | ||
|
81 | //**************************** | |
|
82 | // Spectral Matrices simulator | |
|
85 | 83 | configure_timer((gptimer_regs_t*) REGS_ADDR_GPTIMER, TIMER_SM_SIMULATOR, CLKDIV_SM_SIMULATOR, |
|
86 | 84 | IRQ_SPARC_SM, spectral_matrices_isr ); |
|
85 | ||
|
86 | //********** | |
|
87 | // WAVEFORMS | |
|
88 | // simulator | |
|
89 | ||
|
90 | #ifdef GSA | |
|
87 | 91 | configure_timer((gptimer_regs_t*) REGS_ADDR_GPTIMER, TIMER_WF_SIMULATOR, CLKDIV_WF_SIMULATOR, |
|
88 | IRQ_SPARC_WF, waveforms_isr ); | |
|
92 | IRQ_SPARC_WF, waveforms_simulator_isr ); | |
|
93 | #else | |
|
94 | // configure the registers of the waveform picker | |
|
95 | init_waveform_picker_regs(); | |
|
96 | // configure the waveform picker interrupt service routine | |
|
97 | status = rtems_interrupt_catch( waveforms_isr, | |
|
98 | IRQ_SPARC_WAVEFORM_PICKER, | |
|
99 | &old_isr_handler) ; | |
|
100 | LEON_Mask_interrupt( IRQ_WAVEFORM_PICKER ); | |
|
101 | #endif | |
|
89 | 102 | |
|
103 | //********** | |
|
104 | ||
|
105 | //***************************************** | |
|
90 | 106 | // irq handling of the time management unit |
|
91 | 107 | status = rtems_interrupt_catch( commutation_isr1, |
|
92 | 108 | IRQ_SPARC_TIME1, |
|
93 | 109 | &old_isr_handler) ; // see sparcv8.pdf p.76 for interrupt levels |
|
94 | if (status==RTEMS_SUCCESSFUL) | |
|
110 | if (status==RTEMS_SUCCESSFUL) { | |
|
95 | 111 | PRINTF("OK *** commutation_isr1 *** rtems_interrupt_catch successfullly configured\n") |
|
112 | } | |
|
96 | 113 | |
|
97 | 114 | status = rtems_interrupt_catch( commutation_isr2, |
|
98 | 115 | IRQ_SPARC_TIME2, |
|
99 | 116 | &old_isr_handler) ; // see sparcv8.pdf p.76 for interrupt levels |
|
100 | if (status==RTEMS_SUCCESSFUL) | |
|
117 | if (status==RTEMS_SUCCESSFUL) { | |
|
101 | 118 | PRINTF("OK *** commutation_isr2 *** rtems_interrupt_catch successfullly configured\n") |
|
119 | } | |
|
102 | 120 | |
|
103 | 121 | LEON_Unmask_interrupt( IRQ_TIME1 ); |
|
104 | 122 | LEON_Unmask_interrupt( IRQ_TIME2 ); |
|
105 | 123 | |
|
124 | #ifdef GSA | |
|
125 | if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
126 | printf("in INIT *** Error sending event to WFRM\n"); | |
|
127 | } | |
|
128 | #endif | |
|
129 | ||
|
106 | 130 | status = rtems_task_delete(RTEMS_SELF); |
|
131 | ||
|
107 | 132 | } |
|
108 | 133 | |
|
109 | 134 | rtems_task spiq_task(rtems_task_argument unused) |
|
110 | 135 | { |
|
111 | 136 | rtems_event_set event_out; |
|
112 | struct grspw_regs_str *grspw_regs; | |
|
113 | grspw_regs = (struct grspw_regs_str *) REGS_ADDR_GRSPW; | |
|
114 | 137 | rtems_status_code status; |
|
115 | 138 | |
|
116 |
while( |
|
|
139 | while(true){ | |
|
117 | 140 | PRINTF("in SPIQ *** Waiting for SPW_LINKERR_EVENT\n") |
|
118 | 141 | rtems_event_receive(SPW_LINKERR_EVENT, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an SPW_LINKERR_EVENT |
|
119 | 142 | |
|
120 | if (rtems_task_suspend(Task_id[TASKID_RECV])!=RTEMS_SUCCESSFUL) // suspend RECV task | |
|
143 | if (rtems_task_suspend(Task_id[TASKID_RECV])!=RTEMS_SUCCESSFUL) { // suspend RECV task | |
|
121 | 144 | PRINTF("in SPIQ *** Error suspending RECV Task\n") |
|
122 | if (rtems_task_suspend(Task_id[TASKID_HOUS])!=RTEMS_SUCCESSFUL) // suspend HOUS task | |
|
145 | } | |
|
146 | if (rtems_task_suspend(Task_id[TASKID_HOUS])!=RTEMS_SUCCESSFUL) { // suspend HOUS task | |
|
123 | 147 | PRINTF("in SPIQ *** Error suspending HOUS Task\n") |
|
148 | } | |
|
124 | 149 | |
|
125 | 150 | configure_spw_link(); |
|
126 | 151 | |
|
127 | 152 | status = rtems_task_restart( Task_id[TASKID_HOUS], 1 ); |
|
128 | if (status!=RTEMS_SUCCESSFUL) | |
|
153 | if (status!=RTEMS_SUCCESSFUL) { | |
|
129 | 154 | PRINTF1("in SPIQ *** Error restarting HOUS Task *** code %d\n", status) |
|
155 | } | |
|
130 | 156 | |
|
131 | if (rtems_task_restart(Task_id[TASKID_RECV], 1)!=RTEMS_SUCCESSFUL) // restart RECV task | |
|
157 | if (rtems_task_restart(Task_id[TASKID_RECV], 1)!=RTEMS_SUCCESSFUL) { // restart RECV task | |
|
132 | 158 | PRINTF("in SPIQ *** Error restarting RECV Task\n") |
|
133 | 159 | } |
|
134 | 160 | } |
|
161 | } | |
|
135 | 162 | |
|
136 | 163 | void init_default_mode_parameters() |
|
137 | 164 | { |
|
138 | 165 | // COMMON PARAMETERS |
|
139 | 166 | param_common[0] = 0x00; |
|
140 | 167 | param_common[1] = 0x10; // default value 0 0 0 1 0 0 0 0 |
|
141 | 168 | // NORMAL MODE |
|
142 | 169 | param_norm.sy_lfr_n_swf_l = 2048; // nb sample |
|
143 | 170 | param_norm.sy_lfr_n_swf_p = 300; // sec |
|
144 | 171 | param_norm.sy_lfr_n_asm_p = 3600; // sec |
|
145 | 172 | param_norm.sy_lfr_n_bp_p0 = 4; // sec |
|
146 | 173 | param_norm.sy_lfr_n_bp_p1 = 20; // sec |
|
147 | 174 | // BURST MODE |
|
148 | 175 | param_burst.sy_lfr_b_bp_p0 = 1; // sec |
|
149 | 176 | param_burst.sy_lfr_b_bp_p1 = 5; // sec |
|
150 | 177 | // SBM1 MODE |
|
151 | 178 | param_sbm1.sy_lfr_s1_bp_p0 = 1; // sec |
|
152 | 179 | param_sbm1.sy_lfr_s1_bp_p1 = 1; // sec |
|
153 | 180 | // SBM2 MODE |
|
154 | 181 | param_sbm2.sy_lfr_s2_bp_p0 = 1; // sec |
|
155 | 182 | param_sbm2.sy_lfr_s2_bp_p0 = 5; // sec |
|
156 | 183 | } |
|
157 | 184 | |
|
158 | int create_names() | |
|
185 | int create_names( void ) | |
|
159 | 186 | { |
|
160 | 187 | // task names |
|
161 | 188 | Task_name[TASKID_RECV] = rtems_build_name( 'R', 'E', 'C', 'V' ); |
|
162 | 189 | Task_name[TASKID_ACTN] = rtems_build_name( 'A', 'C', 'T', 'N' ); |
|
163 | 190 | Task_name[TASKID_SPIQ] = rtems_build_name( 'S', 'P', 'I', 'Q' ); |
|
164 | 191 | Task_name[TASKID_SMIQ] = rtems_build_name( 'S', 'M', 'I', 'Q' ); |
|
165 | 192 | Task_name[TASKID_STAT] = rtems_build_name( 'S', 'T', 'A', 'T' ); |
|
166 | 193 | Task_name[TASKID_AVF0] = rtems_build_name( 'A', 'V', 'F', '0' ); |
|
167 | 194 | Task_name[TASKID_BPF0] = rtems_build_name( 'B', 'P', 'F', '0' ); |
|
168 | 195 | Task_name[TASKID_WFRM] = rtems_build_name( 'W', 'F', 'R', 'M' ); |
|
169 | 196 | Task_name[TASKID_DUMB] = rtems_build_name( 'D', 'U', 'M', 'B' ); |
|
170 | 197 | Task_name[TASKID_HOUS] = rtems_build_name( 'H', 'O', 'U', 'S' ); |
|
171 | 198 | |
|
172 | 199 | // rate monotonic period name |
|
173 | 200 | HK_name = rtems_build_name( 'H', 'O', 'U', 'S' ); |
|
174 | 201 | |
|
175 | 202 | return 0; |
|
176 | 203 | } |
|
177 | 204 | |
|
178 | int create_all_tasks() | |
|
205 | int create_all_tasks( void ) | |
|
179 | 206 | { |
|
180 | 207 | rtems_status_code status; |
|
181 | 208 | |
|
182 | 209 | // RECV |
|
183 | 210 | status = rtems_task_create( |
|
184 | 211 | Task_name[TASKID_RECV], 200, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
185 | 212 | RTEMS_DEFAULT_MODES, |
|
186 | 213 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_RECV] |
|
187 | 214 | ); |
|
188 | 215 | // ACTN |
|
189 | 216 | status = rtems_task_create( |
|
190 | 217 | Task_name[TASKID_ACTN], 50, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
191 | 218 | RTEMS_DEFAULT_MODES, |
|
192 | 219 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_ACTN] |
|
193 | 220 | ); |
|
194 | 221 | // SPIQ |
|
195 | 222 | status = rtems_task_create( |
|
196 | 223 | Task_name[TASKID_SPIQ], 5, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
197 | 224 | RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT, |
|
198 | 225 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_SPIQ] |
|
199 | 226 | ); |
|
200 | 227 | // SMIQ |
|
201 | 228 | status = rtems_task_create( |
|
202 | 229 | Task_name[TASKID_SMIQ], 10, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
203 | 230 | RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT, |
|
204 | 231 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_SMIQ] |
|
205 | 232 | ); |
|
206 | 233 | // STAT |
|
207 | 234 | status = rtems_task_create( |
|
208 | 235 | Task_name[TASKID_STAT], 150, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
209 | 236 | RTEMS_DEFAULT_MODES, |
|
210 | 237 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_STAT] |
|
211 | 238 | ); |
|
212 | 239 | // AVF0 |
|
213 | 240 | status = rtems_task_create( |
|
214 | 241 | Task_name[TASKID_AVF0], 50, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
215 | 242 | RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT, |
|
216 | 243 | RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_AVF0] |
|
217 | 244 | ); |
|
218 | 245 | // BPF0 |
|
219 | 246 | status = rtems_task_create( |
|
220 | 247 | Task_name[TASKID_BPF0], 50, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
221 | 248 | RTEMS_DEFAULT_MODES, |
|
222 | 249 | RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_BPF0] |
|
223 | 250 | ); |
|
224 | 251 | // WFRM |
|
225 | 252 | status = rtems_task_create( |
|
226 | 253 | Task_name[TASKID_WFRM], 100, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
227 | 254 | RTEMS_DEFAULT_MODES, |
|
228 | 255 | RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_WFRM] |
|
229 | 256 | ); |
|
230 | 257 | // DUMB |
|
231 | 258 | status = rtems_task_create( |
|
232 | 259 | Task_name[TASKID_DUMB], 200, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
233 | 260 | RTEMS_DEFAULT_MODES, |
|
234 | 261 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_DUMB] |
|
235 | 262 | ); |
|
236 | 263 | // HOUS |
|
237 | 264 | status = rtems_task_create( |
|
238 | 265 | Task_name[TASKID_HOUS], 199, RTEMS_MINIMUM_STACK_SIZE * 2, |
|
239 | 266 | RTEMS_DEFAULT_MODES, |
|
240 | 267 | RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_HOUS] |
|
241 | 268 | ); |
|
242 | 269 | |
|
243 | 270 | return 0; |
|
244 | 271 | } |
|
245 | 272 | |
|
246 | int start_all_tasks() | |
|
273 | int start_all_tasks( void ) | |
|
247 | 274 | { |
|
248 | 275 | rtems_status_code status; |
|
249 | 276 | |
|
250 | 277 | status = rtems_task_start( Task_id[TASKID_SPIQ], spiq_task, 1 ); |
|
251 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_SPIQ\n") | |
|
278 | if (status!=RTEMS_SUCCESSFUL) { | |
|
279 | PRINTF("In INIT *** Error starting TASK_SPIQ\n") | |
|
280 | } | |
|
252 | 281 | |
|
253 | 282 | status = rtems_task_start( Task_id[TASKID_RECV], recv_task, 1 ); |
|
254 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_RECV\n") | |
|
283 | if (status!=RTEMS_SUCCESSFUL) { | |
|
284 | PRINTF("In INIT *** Error starting TASK_RECV\n") | |
|
285 | } | |
|
255 | 286 | |
|
256 | 287 | status = rtems_task_start( Task_id[TASKID_ACTN], actn_task, 1 ); |
|
257 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_ACTN\n") | |
|
288 | if (status!=RTEMS_SUCCESSFUL) { | |
|
289 | PRINTF("In INIT *** Error starting TASK_ACTN\n") | |
|
290 | } | |
|
258 | 291 | |
|
259 | 292 | status = rtems_task_start( Task_id[TASKID_SMIQ], smiq_task, 1 ); |
|
260 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_BPPR\n") | |
|
293 | if (status!=RTEMS_SUCCESSFUL) { | |
|
294 | PRINTF("In INIT *** Error starting TASK_BPPR\n") | |
|
295 | } | |
|
261 | 296 | |
|
262 | 297 | status = rtems_task_start( Task_id[TASKID_STAT], stat_task, 1 ); |
|
263 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_STAT\n") | |
|
298 | if (status!=RTEMS_SUCCESSFUL) { | |
|
299 | PRINTF("In INIT *** Error starting TASK_STAT\n") | |
|
300 | } | |
|
264 | 301 | |
|
265 | 302 | status = rtems_task_start( Task_id[TASKID_AVF0], avf0_task, 1 ); |
|
266 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_AVF0\n") | |
|
303 | if (status!=RTEMS_SUCCESSFUL) { | |
|
304 | PRINTF("In INIT *** Error starting TASK_AVF0\n") | |
|
305 | } | |
|
267 | 306 | |
|
268 | 307 | status = rtems_task_start( Task_id[TASKID_BPF0], bpf0_task, 1 ); |
|
269 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_BPF0\n") | |
|
308 | if (status!=RTEMS_SUCCESSFUL) { | |
|
309 | PRINTF("In INIT *** Error starting TASK_BPF0\n") | |
|
310 | } | |
|
270 | 311 | |
|
271 | 312 | status = rtems_task_start( Task_id[TASKID_WFRM], wfrm_task, 1 ); |
|
272 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_WFRM\n") | |
|
313 | if (status!=RTEMS_SUCCESSFUL) { | |
|
314 | PRINTF("In INIT *** Error starting TASK_WFRM\n") | |
|
315 | } | |
|
273 | 316 | |
|
274 | 317 | status = rtems_task_start( Task_id[TASKID_DUMB], dumb_task, 1 ); |
|
275 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_DUMB\n") | |
|
318 | if (status!=RTEMS_SUCCESSFUL) { | |
|
319 | PRINTF("In INIT *** Error starting TASK_DUMB\n") | |
|
320 | } | |
|
276 | 321 | |
|
277 | 322 | status = rtems_task_start( Task_id[TASKID_HOUS], hous_task, 1 ); |
|
278 | if (status!=RTEMS_SUCCESSFUL) PRINTF("In INIT *** Error starting TASK_HOUS\n") | |
|
323 | if (status!=RTEMS_SUCCESSFUL) { | |
|
324 | PRINTF("In INIT *** Error starting TASK_HOUS\n") | |
|
325 | } | |
|
279 | 326 | |
|
280 | 327 | return 0; |
|
281 | 328 | } |
|
282 | 329 | |
|
283 | int configure_spw_link() | |
|
330 | int configure_spw_link( void ) | |
|
284 | 331 | { |
|
285 | 332 | rtems_status_code status; |
|
286 | 333 | |
|
287 | 334 | close(fdSPW); // close the device if it is already open |
|
288 | 335 | PRINTF("OK *** in configure_spw_link *** try to open "GRSPW_DEVICE_NAME"\n") |
|
289 | 336 | fdSPW = open(GRSPW_DEVICE_NAME, O_RDWR); // open the device. the open call reset the hardware |
|
290 | 337 | if (fdSPW<0) PRINTF("ERR *** in configure_spw_link *** Error opening"GRSPW_DEVICE_NAME"\n") |
|
291 | 338 | while(ioctl(fdSPW, SPACEWIRE_IOCTRL_START, 0) != RTEMS_SUCCESSFUL){ |
|
292 | 339 | PRINTF(".") |
|
293 | 340 | fflush(stdout); |
|
294 | 341 | close(fdSPW); // close the device |
|
295 | 342 | fdSPW = open(GRSPW_DEVICE_NAME, O_RDWR); // open the device. the open call reset the hardware |
|
296 | 343 | if (fdSPW<0) PRINTF("ERR *** In configure_spw_link *** Error opening"GRSPW_DEVICE_NAME"\n") |
|
297 | 344 | rtems_task_wake_after(100); |
|
298 | 345 | } |
|
299 | 346 | |
|
300 | 347 | PRINTF("OK *** In configure_spw_link *** "GRSPW_DEVICE_NAME" opened and started successfully\n") |
|
301 | 348 | |
|
302 | 349 | configure_spacewire_set_NP(1, REGS_ADDR_GRSPW); // No Port force |
|
303 | 350 | configure_spacewire_set_RE(1, REGS_ADDR_GRSPW); // the dedicated call seems to break the no port force configuration |
|
304 | 351 | |
|
305 | 352 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_RXBLOCK, 1); // sets the blocking mode for reception |
|
306 | 353 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_RXBLOCK\n") |
|
307 | 354 | // |
|
308 | 355 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_EVENT_ID, Task_id[TASKID_SPIQ]); // sets the task ID to which an event is sent when a |
|
309 | 356 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_EVENT_ID\n") // link-error interrupt occurs |
|
310 | 357 | // |
|
311 | 358 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_DISABLE_ERR, 1); // automatic link-disabling due to link-error interrupts |
|
312 | 359 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_DISABLE_ERR\n") |
|
313 | 360 | // |
|
314 | 361 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_LINK_ERR_IRQ, 1); // sets the link-error interrupt bit |
|
315 | 362 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_LINK_ERR_IRQ\n") |
|
316 | 363 | // |
|
317 |
status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_TXBLOCK_ON_FULL, |
|
|
364 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_TXBLOCK_ON_FULL, 0); // transmission blocks on full | |
|
318 | 365 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_TXBLOCK_ON_FULL\n") |
|
319 | 366 | // |
|
320 | 367 | status = ioctl(fdSPW, SPACEWIRE_IOCTRL_SET_TCODE_CTRL, 0x0909); |
|
321 | 368 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_TCODE_CTRL,\n") |
|
322 | 369 | |
|
323 | 370 | PRINTF("OK *** in configure_spw_link *** "GRSPW_DEVICE_NAME" configured successfully\n") |
|
324 | 371 | |
|
325 | 372 | return RTEMS_SUCCESSFUL; |
|
326 | 373 | } |
|
327 | 374 | |
|
328 | void configure_spacewire_set_NP(unsigned char val, unsigned int regAddr) // No Port force | |
|
375 | void configure_spacewire_set_NP(unsigned char val, unsigned int regAddr) // [N]o [P]ort force | |
|
329 | 376 | { |
|
330 | unsigned int *spwptr; | |
|
331 | spwptr = (unsigned int*) regAddr; | |
|
332 | if (val == 1) | |
|
333 | { | |
|
377 | unsigned int *spwptr = (unsigned int*) regAddr; | |
|
378 | ||
|
379 | if (val == 1) { | |
|
334 | 380 | *spwptr = *spwptr | 0x00100000; // [NP] set the No port force bit |
|
335 | 381 | } |
|
336 | if (val== 0) | |
|
337 | { | |
|
382 | if (val== 0) { | |
|
338 | 383 | *spwptr = *spwptr & 0xffdfffff; |
|
339 | 384 | } |
|
340 | 385 | } |
|
341 | 386 | |
|
342 | void configure_spacewire_set_RE(unsigned char val, unsigned int regAddr) // RMAP Enable | |
|
387 | void configure_spacewire_set_RE(unsigned char val, unsigned int regAddr) // [R]MAP [E]nable | |
|
343 | 388 | { |
|
344 | unsigned int *spwptr; | |
|
345 | spwptr = (unsigned int*) regAddr; | |
|
389 | unsigned int *spwptr = (unsigned int*) regAddr; | |
|
390 | ||
|
346 | 391 | if (val == 1) |
|
347 | 392 | { |
|
348 |
*spwptr = *spwptr | 0x00010000; // [ |
|
|
393 | *spwptr = *spwptr | 0x00010000; // [RE] set the RMAP Enable bit | |
|
349 | 394 | } |
|
350 | 395 | if (val== 0) |
|
351 | 396 | { |
|
352 | 397 | *spwptr = *spwptr & 0xfffdffff; |
|
353 | 398 | } |
|
354 | 399 | } |
|
355 | 400 | |
|
356 | char *link_status(int status){ | |
|
357 | return lstates[status]; | |
|
358 | } | |
|
359 | ||
|
360 | 401 | rtems_status_code write_spw(spw_ioctl_pkt_send* spw_ioctl_send) |
|
361 | 402 | { |
|
362 | 403 | rtems_status_code status; |
|
363 | 404 | status = ioctl( fdSPW, SPACEWIRE_IOCTRL_SEND, spw_ioctl_send ); |
|
364 | if (status!=RTEMS_SUCCESSFUL) printf("In write_spw *** Error SPACEWIRE_IOCTRL_SEND\n"); | |
|
365 | 405 | return status; |
|
366 | 406 | } |
|
367 | 407 | |
|
368 | 408 | void timecode_irq_handler(void *pDev, void *regs, int minor, unsigned int tc) |
|
369 | 409 | { |
|
370 |
if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_ |
|
|
410 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_1 ) != RTEMS_SUCCESSFUL) { | |
|
371 | 411 | printf("In timecode_irq_handler *** Error sending event to DUMB\n"); |
|
372 | 412 | } |
|
413 | } | |
|
373 | 414 |
@@ -1,158 +1,156 | |||
|
1 | 1 | #include <fsw_misc.h> |
|
2 | 2 | #include <fsw_params.h> |
|
3 | 3 | |
|
4 | 4 | extern rtems_id Task_id[]; /* array of task ids */ |
|
5 | 5 | extern int fdSPW; |
|
6 | 6 | extern TMHeader_t housekeeping_header; |
|
7 | 7 | extern char housekeeping_data[]; |
|
8 | 8 | extern Packet_TM_LFR_HK_t housekeeping_packet; |
|
9 | 9 | |
|
10 | 10 | int configure_timer(gptimer_regs_t *gptimer_regs, unsigned char timer, unsigned int clock_divider, |
|
11 | 11 | unsigned char interrupt_level, rtems_isr (*timer_isr)() ) |
|
12 | 12 | { // configure the timer for the waveforms simulation |
|
13 | 13 | rtems_status_code status; |
|
14 | 14 | rtems_isr_entry old_isr_handler; |
|
15 | 15 | |
|
16 | 16 | status = rtems_interrupt_catch( timer_isr, interrupt_level, &old_isr_handler) ; // see sparcv8.pdf p.76 for interrupt levels |
|
17 | 17 | //if (status==RTEMS_SUCCESSFUL) PRINTF("In configure_timer_for_wf_simulation *** rtems_interrupt_catch successfullly configured\n") |
|
18 | 18 | |
|
19 | 19 | gptimer_regs->timer[timer].reload = clock_divider; // base clock frequency is 1 MHz |
|
20 | 20 | gptimer_regs->timer[timer].ctrl = gptimer_regs->timer[timer].ctrl | 0x00000010; // clear pending IRQ if any |
|
21 | 21 | gptimer_regs->timer[timer].ctrl = gptimer_regs->timer[timer].ctrl | 0x00000004; // LD load value from the reload register |
|
22 | 22 | gptimer_regs->timer[timer].ctrl = gptimer_regs->timer[timer].ctrl | 0x00000001; // EN enable the timer |
|
23 | 23 | gptimer_regs->timer[timer].ctrl = gptimer_regs->timer[timer].ctrl | 0x00000002; // RS restart |
|
24 | 24 | gptimer_regs->timer[timer].ctrl = gptimer_regs->timer[timer].ctrl | 0x00000008; // IE interrupt enable |
|
25 | 25 | |
|
26 | 26 | return 1; |
|
27 | 27 | } |
|
28 | 28 | |
|
29 | 29 | void print_statistics(spw_stats *stats) |
|
30 | 30 | { |
|
31 | 31 | //printf(" ******** STATISTICS ******** \n"); |
|
32 | 32 | printf("Transmit link errors: %i\n", stats->tx_link_err); |
|
33 | 33 | printf("Receiver RMAP header CRC errors: %i\n", stats->rx_rmap_header_crc_err); |
|
34 | 34 | printf("Receiver RMAP data CRC errors: %i\n", stats->rx_rmap_data_crc_err); |
|
35 | 35 | printf("Receiver EEP errors: %i\n", stats->rx_eep_err); |
|
36 | 36 | printf("Receiver truncation errors: %i\n", stats->rx_truncated); |
|
37 | 37 | printf("Parity errors: %i\n", stats->parity_err); |
|
38 | 38 | printf("Escape errors: %i\n", stats->escape_err); |
|
39 | 39 | printf("Credit errors: %i\n", stats->credit_err); |
|
40 | 40 | printf("Disconnect errors: %i\n", stats->disconnect_err); |
|
41 | 41 | printf("Write synchronization errors: %i\n", stats->write_sync_err); |
|
42 | 42 | printf("Early EOP/EEP: %i\n", stats->early_ep); |
|
43 | 43 | printf("Invalid Node Address: %i\n", stats->invalid_address); |
|
44 | 44 | printf("Packets transmitted: %i\n", stats->packets_sent); |
|
45 | 45 | printf("Packets received: %i\n", stats->packets_received); |
|
46 | 46 | } |
|
47 | 47 | |
|
48 | int send_console_outputs_on_serial_port() // Send the console outputs on the serial port | |
|
48 | int send_console_outputs_on_serial_port( void ) // Send the console outputs on the serial port | |
|
49 | 49 | { |
|
50 | struct apbuart_regs_str *apbuart_regs; | |
|
50 | struct apbuart_regs_str *apbuart_regs = (struct apbuart_regs_str *) REGS_ADDR_APBUART; | |
|
51 | 51 | |
|
52 | apbuart_regs = (struct apbuart_regs_str *) REGS_ADDR_APBUART; | |
|
53 | 52 | apbuart_regs->ctrl = apbuart_regs->ctrl & APBUART_CTRL_REG_MASK_DB; |
|
54 | 53 | PRINTF("\n\n\n\n\nIn INIT *** Now the console is on port COM1\n") |
|
55 | 54 | |
|
56 | 55 | return 0; |
|
57 | 56 | } |
|
58 | 57 | |
|
59 | 58 | int set_apbuart_scaler_reload_register(unsigned int regs, unsigned int value) |
|
60 | 59 | { |
|
61 | struct apbuart_regs_str *apbuart_regs; | |
|
60 | struct apbuart_regs_str *apbuart_regs = (struct apbuart_regs_str *) regs; | |
|
62 | 61 | |
|
63 | apbuart_regs = (struct apbuart_regs_str *) regs; | |
|
64 | 62 | apbuart_regs->scaler = value; |
|
65 | 63 | PRINTF1("OK *** COM port scaler reload register set to %x\n", value) |
|
66 | 64 | |
|
67 | 65 | return 0; |
|
68 | 66 | } |
|
69 | 67 | |
|
70 | 68 | //************ |
|
71 | 69 | // RTEMS TASKS |
|
72 | 70 | |
|
73 | 71 | rtems_task stat_task(rtems_task_argument argument) |
|
74 | 72 | { |
|
75 | 73 | int i; |
|
76 | 74 | int j; |
|
77 | 75 | i = 0; |
|
78 | 76 | j = 0; |
|
79 | 77 | PRINTF("in STAT *** \n") |
|
80 | 78 | while(1){ |
|
81 | 79 | rtems_task_wake_after(1000); |
|
82 | 80 | PRINTF1("%d\n", j) |
|
83 | 81 | if (i == 2) { |
|
84 | 82 | #ifdef PRINT_TASK_STATISTICS |
|
85 | 83 | rtems_cpu_usage_report(); |
|
86 | 84 | rtems_cpu_usage_reset(); |
|
87 | 85 | #endif |
|
88 | 86 | i = 0; |
|
89 | 87 | } |
|
90 | 88 | else i++; |
|
91 | 89 | j++; |
|
92 | 90 | } |
|
93 | 91 | } |
|
94 | 92 | |
|
95 | 93 | rtems_task hous_task(rtems_task_argument argument) |
|
96 | 94 | { |
|
97 | PRINTF("in HOUS ***\n") | |
|
98 | ||
|
99 | 95 | int result; |
|
100 | 96 | rtems_status_code status; |
|
101 | 97 | |
|
102 | if (rtems_rate_monotonic_ident( HK_name, &HK_id)!=RTEMS_SUCCESSFUL) | |
|
103 | { | |
|
98 | PRINTF("in HOUS ***\n") | |
|
99 | ||
|
100 | if (rtems_rate_monotonic_ident( HK_name, &HK_id)!=RTEMS_SUCCESSFUL) { | |
|
104 | 101 | status = rtems_rate_monotonic_create( HK_name, &HK_id ); |
|
105 | if( status != RTEMS_SUCCESSFUL ) | |
|
102 | if( status != RTEMS_SUCCESSFUL ) { | |
|
106 | 103 | PRINTF1( "rtems_rate_monotonic_create failed with status of %d\n", status ) |
|
107 | 104 | } |
|
105 | } | |
|
108 | 106 | |
|
109 | 107 | housekeeping_packet.targetLogicalAddress = CCSDS_DESTINATION_ID; |
|
110 | 108 | housekeeping_packet.protocolIdentifier = 0x02; |
|
111 | 109 | housekeeping_packet.reserved = 0x00; |
|
112 | 110 | housekeeping_packet.userApplication = 0x00; |
|
113 | 111 | housekeeping_packet.packetID[0] = 0x0c; |
|
114 | 112 | housekeeping_packet.packetID[1] = 0xc4; |
|
115 | 113 | housekeeping_packet.packetSequenceControl[0] = 0xc0; |
|
116 | 114 | housekeeping_packet.packetSequenceControl[1] = 0x00; |
|
117 | 115 | housekeeping_packet.packetLength[0] = 0x00; |
|
118 | 116 | housekeeping_packet.packetLength[1] = 0x77; |
|
119 | 117 | housekeeping_packet.dataFieldHeader[0] = 0x10; |
|
120 | 118 | housekeeping_packet.dataFieldHeader[1] = 0x03; |
|
121 | 119 | housekeeping_packet.dataFieldHeader[2] = 0x19; |
|
122 | 120 | housekeeping_packet.dataFieldHeader[3] = 0x00; |
|
123 | 121 | |
|
124 | 122 | status = rtems_rate_monotonic_cancel(HK_id); |
|
125 | 123 | if( status != RTEMS_SUCCESSFUL ) |
|
126 | 124 | PRINTF1( "ERR *** in HOUS *** rtems_rate_monotonic_cancel(HK_id) ***code: %d\n", status ) |
|
127 | 125 | else |
|
128 | 126 | PRINTF("OK *** in HOUS *** rtems_rate_monotonic_cancel(HK_id)\n") |
|
129 | 127 | |
|
130 | 128 | while(1){ // launch the rate monotonic task |
|
131 | 129 | status = rtems_rate_monotonic_period( HK_id, HK_PERIOD ); |
|
132 | 130 | if ( status != RTEMS_SUCCESSFUL ){ |
|
133 | 131 | PRINTF1( "ERR *** in HOUS *** rtems_rate_monotonic_period *** code %d\n", status); |
|
134 | 132 | } |
|
135 | 133 | else |
|
136 | 134 | { |
|
137 | 135 | housekeeping_packet.dataFieldHeader[4] = (unsigned char) (time_management_regs->coarse_time>>24); |
|
138 | 136 | housekeeping_packet.dataFieldHeader[5] = (unsigned char) (time_management_regs->coarse_time>>16); |
|
139 | 137 | housekeeping_packet.dataFieldHeader[6] = (unsigned char) (time_management_regs->coarse_time>>8); |
|
140 | 138 | housekeeping_packet.dataFieldHeader[7] = (unsigned char) (time_management_regs->coarse_time); |
|
141 | 139 | housekeeping_packet.dataFieldHeader[8] = (unsigned char) (time_management_regs->fine_time>>8); |
|
142 | 140 | housekeeping_packet.dataFieldHeader[9] = (unsigned char) (time_management_regs->fine_time); |
|
143 | 141 | housekeeping_packet.data[0] = CCSDS_DESTINATION_ID_DPU; |
|
144 | 142 | result = write ( fdSPW, &housekeeping_packet, LEN_TM_LFR_HK); |
|
145 | 143 | if (result==-1) |
|
146 | 144 | { |
|
147 | 145 | PRINTF("ERR *** in HOUS *** HK send\n"); |
|
148 | 146 | } |
|
149 | 147 | } |
|
150 | 148 | } |
|
151 | 149 | |
|
152 | 150 | PRINTF("in HOUS *** deleting task\n") |
|
153 | 151 | |
|
154 | 152 | status = rtems_task_delete( RTEMS_SELF ); // should not return |
|
155 | 153 | printf( "rtems_task_delete returned with status of %d.\n", status ); |
|
156 | 154 | exit( 1 ); |
|
157 | 155 | } |
|
158 | 156 |
@@ -1,406 +1,361 | |||
|
1 | 1 | #include <fsw_processing.h> |
|
2 | 2 | #include <math.h> |
|
3 | #include <stdio.h> | |
|
4 | #include <stdlib.h> | |
|
5 | #include <leon.h> | |
|
6 | 3 | |
|
7 | // TOTAL = 32 coefficients * 4 = 128 octets * 3 * 12 = 4608 octets | |
|
8 | // SX 12 coefficients | |
|
9 | float k14_sx_re = 1; | |
|
10 | float k14_sx_im = 1; | |
|
11 | float k15_sx_re = 1; | |
|
12 | float k15_sx_im = 1; | |
|
13 | float k24_sx_re = 1; | |
|
14 | float k24_sx_im = 1; | |
|
15 | float k25_sx_re = 1; | |
|
16 | float k25_sx_im = 1; | |
|
17 | float k34_sx_re = 1; | |
|
18 | float k34_sx_im = 1; | |
|
19 | float k35_sx_re = 1; | |
|
20 | float k35_sx_im = 1; | |
|
21 | // NY 8 coefficients | |
|
22 | float k24_ny_re = 1; | |
|
23 | float k24_ny_im = 1; | |
|
24 | float k25_ny_re = 1; | |
|
25 | float k25_ny_im = 1; | |
|
26 | float k34_ny_re = 1; | |
|
27 | float k34_ny_im = 1; | |
|
28 | float k35_ny_re = 1; | |
|
29 | float k35_ny_im = 1; | |
|
30 | // NZ 8 coefficients | |
|
31 | float k24_nz_re = 1; | |
|
32 | float k24_nz_im = 1; | |
|
33 | float k25_nz_re = 1; | |
|
34 | float k25_nz_im = 1; | |
|
35 | float k34_nz_re = 1; | |
|
36 | float k34_nz_im = 1; | |
|
37 | float k35_nz_re = 1; | |
|
38 | float k35_nz_im = 1; | |
|
39 | // PE 4 coefficients | |
|
40 | float k44_pe = 1; | |
|
41 | float k55_pe = 1; | |
|
42 | float k45_pe_re = 1; | |
|
43 | float k45_pe_im = 1; | |
|
44 | ||
|
45 | float alpha_M = M_PI/4; | |
|
46 | ||
|
47 | extern volatile int spec_mat_f0_a[ ]; | |
|
48 | extern volatile int spec_mat_f0_b[ ]; | |
|
49 | extern volatile int spec_mat_f0_c[ ]; | |
|
50 | extern volatile int spec_mat_f0_d[ ]; | |
|
51 | extern volatile int spec_mat_f0_e[ ]; | |
|
52 | extern volatile int spec_mat_f0_f[ ]; | |
|
53 | extern volatile int spec_mat_f0_g[ ]; | |
|
54 | extern volatile int spec_mat_f0_h[ ]; | |
|
55 | extern float averaged_spec_mat_f0[ ]; | |
|
56 | extern float compressed_spec_mat_f0[ ]; | |
|
57 | extern unsigned char LFR_BP1_F0[ ]; | |
|
58 | ||
|
59 | extern BP1_t data_BP1[ ]; | |
|
60 | ||
|
61 | extern rtems_id Task_id[ ]; /* array of task ids */ | |
|
62 | ||
|
63 | spectral_matrices_regs_t *spectral_matrices_regs; | |
|
4 | #include <fsw_processing_globals.c> | |
|
64 | 5 | |
|
65 | 6 | //*********************************************************** |
|
66 | 7 | // Interrupt Service Routine for spectral matrices processing |
|
67 | 8 | rtems_isr spectral_matrices_isr( rtems_vector_number vector ) |
|
68 | 9 | { |
|
69 | if (rtems_event_send( Task_id[TASKID_SMIQ], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) | |
|
10 | if (rtems_event_send( Task_id[TASKID_SMIQ], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
70 | 11 | printf("in spectral_matrices_isr *** Error sending event to AVF0\n"); |
|
71 | 12 | } |
|
13 | } | |
|
72 | 14 | |
|
73 | 15 | //************ |
|
74 | 16 | // RTEMS TASKS |
|
75 | 17 | rtems_task smiq_task(rtems_task_argument argument) // process the Spectral Matrices IRQ |
|
76 | 18 | { |
|
77 | 19 | rtems_event_set event_out; |
|
78 | gptimer_regs_t *gptimer_regs; | |
|
79 | gptimer_regs = (gptimer_regs_t *) REGS_ADDR_GPTIMER; | |
|
80 | 20 | unsigned char nb_interrupt_f0 = 0; |
|
81 | 21 | |
|
82 | 22 | PRINTF("in SMIQ *** \n") |
|
83 | 23 | |
|
84 | 24 | while(1){ |
|
85 | 25 | rtems_event_receive(RTEMS_EVENT_0, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an RTEMS_EVENT0 |
|
86 | 26 | nb_interrupt_f0 = nb_interrupt_f0 + 1; |
|
87 | 27 | if (nb_interrupt_f0 == (NB_SM_TO_RECEIVE_BEFORE_AVF0-1) ){ |
|
88 | 28 | if (rtems_event_send( Task_id[TASKID_AVF0], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) |
|
89 | 29 | printf("in SMIQ *** Error sending event to AVF0\n"); |
|
90 | 30 | nb_interrupt_f0 = 0; |
|
91 | 31 | } |
|
92 | 32 | } |
|
93 | 33 | } |
|
94 | 34 | |
|
95 | 35 | rtems_task spw_bppr_task(rtems_task_argument argument) |
|
96 | 36 | { |
|
97 | 37 | rtems_status_code status; |
|
98 | 38 | rtems_event_set event_out; |
|
99 |
static int |
|
|
39 | static int Nb_average_f0 = 0; | |
|
100 | 40 | //static int nb_average_f1 = 0; |
|
101 | 41 | //static int nb_average_f2 = 0; |
|
102 | 42 | |
|
103 | while(1) | |
|
104 | ||
|
105 | 43 | spectral_matrices_regs = (struct spectral_matrices_regs_str *) REGS_ADDR_SPECTRAL_MATRICES; |
|
106 | 44 | spectral_matrices_regs->address0 = (volatile int) spec_mat_f0_a; |
|
107 | 45 | spectral_matrices_regs->address1 = (volatile int) spec_mat_f0_b; |
|
108 | 46 | |
|
109 | 47 | printf("in BPPR ***\n"); |
|
110 | 48 | |
|
111 |
while( |
|
|
49 | while(true){ // wait for an event to begin with the processing | |
|
112 | 50 | status = rtems_event_receive(RTEMS_EVENT_0, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); |
|
113 | 51 | if (status == RTEMS_SUCCESSFUL){ |
|
114 | 52 | if ((spectral_matrices_regs->ctrl & 0x00000001)==1){ |
|
115 | 53 | matrix_average(spec_mat_f0_a, averaged_spec_mat_f0); |
|
116 | 54 | spectral_matrices_regs->ctrl = spectral_matrices_regs->ctrl & 0xfffffffe; |
|
117 | 55 | //printf("f0_a\n"); |
|
118 |
|
|
|
56 | Nb_average_f0++; | |
|
119 | 57 | } |
|
120 | 58 | if (((spectral_matrices_regs->ctrl>>1) & 0x00000001)==1){ |
|
121 | 59 | matrix_average(spec_mat_f0_b, compressed_spec_mat_f0); |
|
122 | 60 | spectral_matrices_regs->ctrl = spectral_matrices_regs->ctrl & 0xfffffffd; |
|
123 | 61 | //printf("f0_b\n"); |
|
124 |
|
|
|
62 | Nb_average_f0++; | |
|
125 | 63 | } |
|
126 |
if ( |
|
|
64 | if (Nb_average_f0 == NB_AVERAGE_NORMAL_f0) { | |
|
127 | 65 | matrix_compression(averaged_spec_mat_f0, 0, compressed_spec_mat_f0); |
|
128 | 66 | //printf("f0 compressed\n"); |
|
129 |
|
|
|
67 | Nb_average_f0 = 0; | |
|
130 | 68 | matrix_reset(averaged_spec_mat_f0); |
|
131 | 69 | } |
|
132 | 70 | } |
|
133 | 71 | } |
|
134 | 72 | } |
|
135 | 73 | |
|
136 | 74 | rtems_task avf0_task(rtems_task_argument argument){ |
|
137 | 75 | int i; |
|
138 | 76 | static int nb_average; |
|
139 | 77 | rtems_event_set event_out; |
|
140 | 78 | rtems_status_code status; |
|
141 | 79 | |
|
142 | 80 | spectral_matrices_regs = (struct spectral_matrices_regs_str *) REGS_ADDR_SPECTRAL_MATRICES; |
|
143 | 81 | spectral_matrices_regs->address0 = (volatile int) spec_mat_f0_a; |
|
144 | 82 | spectral_matrices_regs->address1 = (volatile int) spec_mat_f0_b; |
|
145 | 83 | |
|
146 | 84 | nb_average = 0; |
|
147 | 85 | |
|
148 | 86 | PRINTF("in AVFO *** \n") |
|
149 | 87 | |
|
150 | 88 | while(1){ |
|
151 | 89 | rtems_event_receive(RTEMS_EVENT_0, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an RTEMS_EVENT0 |
|
152 | 90 | for(i=0; i<TOTAL_SIZE_SPEC_MAT; i++){ |
|
153 | 91 | averaged_spec_mat_f0[i] = averaged_spec_mat_f0[i] + spec_mat_f0_a[i] |
|
154 | 92 | + spec_mat_f0_b[i] |
|
155 | 93 | + spec_mat_f0_c[i] |
|
156 | 94 | + spec_mat_f0_d[i] |
|
157 | 95 | + spec_mat_f0_e[i] |
|
158 | 96 | + spec_mat_f0_f[i] |
|
159 | 97 | + spec_mat_f0_g[i] |
|
160 | 98 | + spec_mat_f0_h[i]; |
|
161 | 99 | } |
|
162 | 100 | spectral_matrices_regs->ctrl = spectral_matrices_regs->ctrl & 0xfffffffe; // reset the appropriate bit in the register |
|
163 | 101 | nb_average = nb_average + NB_SM_TO_RECEIVE_BEFORE_AVF0; |
|
164 | 102 | if (nb_average == NB_AVERAGE_NORMAL_f0) { |
|
165 | 103 | nb_average = 0; |
|
166 | 104 | status = rtems_event_send( Task_id[7], RTEMS_EVENT_0 ); // sending an event to the task 7, BPF0 |
|
167 | if (status != RTEMS_SUCCESSFUL) printf("iN TASK AVF0 *** Error sending RTEMS_EVENT_0, code %d\n", status); | |
|
105 | if (status != RTEMS_SUCCESSFUL) { | |
|
106 | printf("iN TASK AVF0 *** Error sending RTEMS_EVENT_0, code %d\n", status); | |
|
107 | } | |
|
168 | 108 | } |
|
169 | 109 | } |
|
170 | 110 | } |
|
171 | 111 | |
|
172 | 112 | rtems_task bpf0_task(rtems_task_argument argument){ |
|
173 | 113 | rtems_event_set event_out; |
|
174 | 114 | |
|
175 | 115 | PRINTF("in BPFO *** \n") |
|
176 | 116 | |
|
177 | 117 | while(1){ |
|
178 | 118 | rtems_event_receive(RTEMS_EVENT_0, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an RTEMS_EVENT0 |
|
179 | 119 | matrix_compression(averaged_spec_mat_f0, 0, compressed_spec_mat_f0); |
|
180 | 120 | BP1_set(compressed_spec_mat_f0, NB_BINS_COMPRESSED_MATRIX_f0, LFR_BP1_F0); |
|
181 | 121 | //PRINTF("IN TASK BPF0 *** Matrix compressed, parameters calculated\n") |
|
182 | 122 | } |
|
183 | 123 | } |
|
184 | 124 | |
|
185 | 125 | //***************************** |
|
186 | 126 | // Spectral matrices processing |
|
187 | 127 | void matrix_average(volatile int *spec_mat, float *averaged_spec_mat) |
|
188 | 128 | { |
|
189 | 129 | int i; |
|
190 | 130 | for(i=0; i<TOTAL_SIZE_SPEC_MAT; i++){ |
|
191 | 131 | averaged_spec_mat[i] = averaged_spec_mat[i] + spec_mat_f0_a[i] |
|
192 | 132 | + spec_mat_f0_b[i] |
|
193 | 133 | + spec_mat_f0_c[i] |
|
194 | 134 | + spec_mat_f0_d[i] |
|
195 | 135 | + spec_mat_f0_e[i] |
|
196 | 136 | + spec_mat_f0_f[i] |
|
197 | 137 | + spec_mat_f0_g[i] |
|
198 | 138 | + spec_mat_f0_h[i]; |
|
199 | 139 | } |
|
200 | 140 | } |
|
201 | 141 | |
|
202 | 142 | void matrix_reset(float *averaged_spec_mat) |
|
203 | 143 | { |
|
204 | 144 | int i; |
|
205 | 145 | for(i=0; i<TOTAL_SIZE_SPEC_MAT; i++){ |
|
206 | 146 | averaged_spec_mat_f0[i] = 0; |
|
207 | 147 | } |
|
208 | 148 | } |
|
209 | 149 | |
|
210 | 150 | void matrix_compression(float *averaged_spec_mat, unsigned char fChannel, float *compressed_spec_mat) |
|
211 | 151 | { |
|
212 |
int i |
|
|
152 | int i; | |
|
153 | int j; | |
|
213 | 154 | switch (fChannel){ |
|
214 | 155 | case 0: |
|
215 | 156 | for(i=0;i<NB_BINS_COMPRESSED_MATRIX_f0;i++){ |
|
216 | j = 17 + i * 8; | |
|
157 | j = 17 + (i * 8); | |
|
217 | 158 | compressed_spec_mat[i] = (averaged_spec_mat[j] |
|
218 | 159 | + averaged_spec_mat[j+1] |
|
219 | 160 | + averaged_spec_mat[j+2] |
|
220 | 161 | + averaged_spec_mat[j+3] |
|
221 | 162 | + averaged_spec_mat[j+4] |
|
222 | 163 | + averaged_spec_mat[j+5] |
|
223 | 164 | + averaged_spec_mat[j+6] |
|
224 | 165 | + averaged_spec_mat[j+7])/(8*NB_AVERAGE_NORMAL_f0); |
|
225 | 166 | } |
|
226 | 167 | break; |
|
227 | 168 | case 1: |
|
228 | 169 | // case fChannel = f1 to be completed later |
|
229 | 170 | break; |
|
230 | 171 | case 2: |
|
231 | 172 | // case fChannel = f1 to be completed later |
|
232 | 173 | break; |
|
233 | 174 | default: |
|
234 | 175 | break; |
|
235 | 176 | } |
|
236 | 177 | } |
|
237 | 178 | |
|
238 | 179 | void BP1_set(float * compressed_spec_mat, unsigned char nb_bins_compressed_spec_mat, unsigned char * LFR_BP1){ |
|
239 |
int i |
|
|
180 | int i; | |
|
181 | int j; | |
|
240 | 182 | unsigned char tmp_u_char; |
|
241 | unsigned char * pt_char; | |
|
183 | unsigned char * pt_char = NULL; | |
|
242 | 184 | float PSDB, PSDE; |
|
243 |
float NVEC_V0 |
|
|
185 | float NVEC_V0; | |
|
186 | float NVEC_V1; | |
|
187 | float NVEC_V2; | |
|
244 | 188 | //float significand; |
|
245 | 189 | //int exponent; |
|
246 |
float aux |
|
|
247 |
float |
|
|
248 | float nebx_re = 0, nebx_im = 0; | |
|
249 | float ny = 0, nz = 0; | |
|
190 | float aux; | |
|
191 | float tr_SB_SB; | |
|
192 | float tmp; | |
|
193 | float sx_re; | |
|
194 | float sx_im; | |
|
195 | float nebx_re = 0; | |
|
196 | float nebx_im = 0; | |
|
197 | float ny = 0; | |
|
198 | float nz = 0; | |
|
250 | 199 | float bx_bx_star = 0; |
|
251 | 200 | for(i=0; i<nb_bins_compressed_spec_mat; i++){ |
|
252 | 201 | //============================================== |
|
253 | 202 | // BP1 PSD == B PAR_LFR_SC_BP1_PE_FL0 == 16 bits |
|
254 | 203 | PSDB = compressed_spec_mat[i*30] // S11 |
|
255 | + compressed_spec_mat[i*30+10] // S22 | |
|
256 | + compressed_spec_mat[i*30+18]; // S33 | |
|
204 | + compressed_spec_mat[(i*30) + 10] // S22 | |
|
205 | + compressed_spec_mat[(i*30) + 18]; // S33 | |
|
257 | 206 | //significand = frexp(PSDB, &exponent); |
|
258 | 207 | pt_char = (unsigned char*) &PSDB; |
|
259 | LFR_BP1[i*9+2] = pt_char[0]; // bits 31 downto 24 of the float | |
|
260 | LFR_BP1[i*9+3] = pt_char[1]; // bits 23 downto 16 of the float | |
|
208 | LFR_BP1[(i*9) + 2] = pt_char[0]; // bits 31 downto 24 of the float | |
|
209 | LFR_BP1[(i*9) + 3] = pt_char[1]; // bits 23 downto 16 of the float | |
|
261 | 210 | //============================================== |
|
262 | 211 | // BP1 PSD == E PAR_LFR_SC_BP1_PB_FL0 == 16 bits |
|
263 |
PSDE = compressed_spec_mat[i*30+24] * |
|
|
264 |
+ compressed_spec_mat[i*30+28] * |
|
|
265 |
+ compressed_spec_mat[i*30+26] * |
|
|
266 |
- compressed_spec_mat[i*30+27] * |
|
|
212 | PSDE = compressed_spec_mat[(i*30) + 24] * K44_pe // S44 | |
|
213 | + compressed_spec_mat[(i*30) + 28] * K55_pe // S55 | |
|
214 | + compressed_spec_mat[(i*30) + 26] * K45_pe_re // S45 | |
|
215 | - compressed_spec_mat[(i*30) + 27] * K45_pe_im; // S45 | |
|
267 | 216 | pt_char = (unsigned char*) &PSDE; |
|
268 | LFR_BP1[i*9+0] = pt_char[0]; // bits 31 downto 24 of the float | |
|
269 | LFR_BP1[i*9+1] = pt_char[1]; // bits 23 downto 16 of the float | |
|
217 | LFR_BP1[(i*9) + 0] = pt_char[0]; // bits 31 downto 24 of the float | |
|
218 | LFR_BP1[(i*9) + 1] = pt_char[1]; // bits 23 downto 16 of the float | |
|
270 | 219 | //============================================================================== |
|
271 | 220 | // BP1 normal wave vector == PAR_LFR_SC_BP1_NVEC_V0_F0 == 8 bits |
|
272 | 221 | // == PAR_LFR_SC_BP1_NVEC_V1_F0 == 8 bits |
|
273 | 222 | // == PAR_LFR_SC_BP1_NVEC_V2_F0 == 1 bits |
|
274 | 223 | tmp = sqrt( |
|
275 | compressed_spec_mat[i*30+3]*compressed_spec_mat[i*30+3] //Im S12 | |
|
276 | +compressed_spec_mat[i*30+5]*compressed_spec_mat[i*30+5] //Im S13 | |
|
277 | +compressed_spec_mat[i*30+13]*compressed_spec_mat[i*30+13] //Im S23 | |
|
224 | compressed_spec_mat[(i*30) + 3]*compressed_spec_mat[(i*30) + 3] //Im S12 | |
|
225 | +compressed_spec_mat[(i*30) + 5]*compressed_spec_mat[(i*30) + 5] //Im S13 | |
|
226 | +compressed_spec_mat[(i*30) + 13]*compressed_spec_mat[(i*30) + 13] //Im S23 | |
|
278 | 227 | ); |
|
279 | NVEC_V0 = compressed_spec_mat[i*30+13] / tmp; // Im S23 | |
|
280 | NVEC_V1 = -compressed_spec_mat[i*30+5] / tmp; // Im S13 | |
|
281 | NVEC_V2 = compressed_spec_mat[i*30+3] / tmp; // Im S12 | |
|
282 | LFR_BP1[i*9+4] = (char) (NVEC_V0*127); | |
|
283 | LFR_BP1[i*9+5] = (char) (NVEC_V1*127); | |
|
228 | NVEC_V0 = compressed_spec_mat[(i*30) + 13] / tmp; // Im S23 | |
|
229 | NVEC_V1 = -compressed_spec_mat[(i*30) + 5] / tmp; // Im S13 | |
|
230 | NVEC_V2 = compressed_spec_mat[(i*30) + 3] / tmp; // Im S12 | |
|
231 | LFR_BP1[(i*9) + 4] = (char) (NVEC_V0*127); | |
|
232 | LFR_BP1[(i*9) + 5] = (char) (NVEC_V1*127); | |
|
284 | 233 | pt_char = (unsigned char*) &NVEC_V2; |
|
285 | LFR_BP1[i*9+6] = pt_char[0] & 0x80; // extract the sign of NVEC_V2 | |
|
234 | LFR_BP1[(i*9) + 6] = pt_char[0] & 0x80; // extract the sign of NVEC_V2 | |
|
286 | 235 | //======================================================= |
|
287 | 236 | // BP1 ellipticity == PAR_LFR_SC_BP1_ELLIP_F0 == 4 bits |
|
288 | 237 | aux = 2*tmp / PSDB; // compute the ellipticity |
|
289 | 238 | tmp_u_char = (unsigned char) (aux*(16-1)); // convert the ellipticity |
|
290 | 239 | LFR_BP1[i*9+6] = LFR_BP1[i*9+6] | ((tmp_u_char&0x0f)<<3); // keeps 4 bits of the resulting unsigned char |
|
291 | 240 | //============================================================== |
|
292 | 241 | // BP1 degree of polarization == PAR_LFR_SC_BP1_DOP_F0 == 3 bits |
|
293 | 242 | for(j = 0; j<NB_VALUES_PER_spec_mat;j++){ |
|
294 | 243 | tr_SB_SB = compressed_spec_mat[i*30] * compressed_spec_mat[i*30] |
|
295 | + compressed_spec_mat[i*30+10] * compressed_spec_mat[i*30+10] | |
|
296 | + compressed_spec_mat[i*30+18] * compressed_spec_mat[i*30+18] | |
|
297 | + 2 * compressed_spec_mat[i*30+2] * compressed_spec_mat[i*30+2] | |
|
298 | + 2 * compressed_spec_mat[i*30+3] * compressed_spec_mat[i*30+3] | |
|
299 | + 2 * compressed_spec_mat[i*30+4] * compressed_spec_mat[i*30+4] | |
|
300 | + 2 * compressed_spec_mat[i*30+5] * compressed_spec_mat[i*30+5] | |
|
301 | + 2 * compressed_spec_mat[i*30+12] * compressed_spec_mat[i*30+12] | |
|
302 | + 2 * compressed_spec_mat[i*30+13] * compressed_spec_mat[i*30+13]; | |
|
244 | + compressed_spec_mat[(i*30) + 10] * compressed_spec_mat[(i*30) + 10] | |
|
245 | + compressed_spec_mat[(i*30) + 18] * compressed_spec_mat[(i*30) + 18] | |
|
246 | + 2 * compressed_spec_mat[(i*30) + 2] * compressed_spec_mat[(i*30) + 2] | |
|
247 | + 2 * compressed_spec_mat[(i*30) + 3] * compressed_spec_mat[(i*30) + 3] | |
|
248 | + 2 * compressed_spec_mat[(i*30) + 4] * compressed_spec_mat[(i*30) + 4] | |
|
249 | + 2 * compressed_spec_mat[(i*30) + 5] * compressed_spec_mat[(i*30) + 5] | |
|
250 | + 2 * compressed_spec_mat[(i*30) + 12] * compressed_spec_mat[(i*30) + 12] | |
|
251 | + 2 * compressed_spec_mat[(i*30) + 13] * compressed_spec_mat[(i*30) + 13]; | |
|
303 | 252 | } |
|
304 | 253 | aux = PSDB*PSDB; |
|
305 | 254 | tmp = sqrt( abs( ( 3*tr_SB_SB - aux ) / ( 2 * aux ) ) ); |
|
306 | 255 | tmp_u_char = (unsigned char) (NVEC_V0*(8-1)); |
|
307 | LFR_BP1[i*9+6] = LFR_BP1[i*9+6] | (tmp_u_char & 0x07); // keeps 3 bits of the resulting unsigned char | |
|
256 | LFR_BP1[(i*9) + 6] = LFR_BP1[(i*9) + 6] | (tmp_u_char & 0x07); // keeps 3 bits of the resulting unsigned char | |
|
308 | 257 | //======================================================================================= |
|
309 | 258 | // BP1 x-component of the normalized Poynting flux == PAR_LFR_SC_BP1_SZ_F0 == 8 bits (7+1) |
|
310 |
sx_re = compressed_spec_mat[i*30+20] * |
|
|
311 |
+ compressed_spec_mat[i*30+6] * |
|
|
312 |
+ compressed_spec_mat[i*30+8] * |
|
|
313 |
+ compressed_spec_mat[i*30+14] * |
|
|
314 |
+ compressed_spec_mat[i*30+16] * |
|
|
315 |
+ compressed_spec_mat[i*30+22] * |
|
|
316 |
sx_im = compressed_spec_mat[i*30+21] * |
|
|
317 |
+ compressed_spec_mat[i*30+7] * |
|
|
318 |
+ compressed_spec_mat[i*30+9] * |
|
|
319 |
+ compressed_spec_mat[i*30+15] * |
|
|
320 |
+ compressed_spec_mat[i*30+17] * |
|
|
321 |
+ compressed_spec_mat[i*30+23] * |
|
|
322 | LFR_BP1[i*9+7] = ((unsigned char) (sx_re * 128)) & 0x7f; // cf DOC for the compression | |
|
323 | if ( abs(sx_re) > abs(sx_im) ) | |
|
324 | LFR_BP1[i*9+7] = LFR_BP1[i*9+1] | (0x80); // extract the sector of sx | |
|
325 |
|
|
|
326 | LFR_BP1[i*9+7] = LFR_BP1[i*9+1] & (0x7f); // extract the sector of sx | |
|
259 | sx_re = compressed_spec_mat[(i*30) + 20] * K34_sx_re | |
|
260 | + compressed_spec_mat[(i*30) + 6] * K14_sx_re | |
|
261 | + compressed_spec_mat[(i*30) + 8] * K15_sx_re | |
|
262 | + compressed_spec_mat[(i*30) + 14] * K24_sx_re | |
|
263 | + compressed_spec_mat[(i*30) + 16] * K25_sx_re | |
|
264 | + compressed_spec_mat[(i*30) + 22] * K35_sx_re; | |
|
265 | sx_im = compressed_spec_mat[(i*30) + 21] * K34_sx_im | |
|
266 | + compressed_spec_mat[(i*30) + 7] * K14_sx_im | |
|
267 | + compressed_spec_mat[(i*30) + 9] * K15_sx_im | |
|
268 | + compressed_spec_mat[(i*30) + 15] * K24_sx_im | |
|
269 | + compressed_spec_mat[(i*30) + 17] * K25_sx_im | |
|
270 | + compressed_spec_mat[(i*30) + 23] * K35_sx_im; | |
|
271 | LFR_BP1[(i*9) + 7] = ((unsigned char) (sx_re * 128)) & 0x7f; // cf DOC for the compression | |
|
272 | if ( abs(sx_re) > abs(sx_im) ) { | |
|
273 | LFR_BP1[(i*9) + 7] = LFR_BP1[(i*9) + 1] | (0x80); // extract the sector of sx | |
|
274 | } | |
|
275 | else { | |
|
276 | LFR_BP1[(i*9) + 7] = LFR_BP1[(i*9) + 1] & (0x7f); // extract the sector of sx | |
|
277 | } | |
|
327 | 278 | //====================================================================== |
|
328 | 279 | // BP1 phase velocity estimator == PAR_LFR_SC_BP1_VPHI_F0 == 8 bits (7+1) |
|
329 |
ny = sin( |
|
|
280 | ny = sin(Alpha_M)*NVEC_V1 + cos(Alpha_M)*NVEC_V2; | |
|
330 | 281 | nz = NVEC_V0; |
|
331 |
bx_bx_star = cos( |
|
|
332 |
+ sin( |
|
|
333 |
- 2 * sin( |
|
|
334 |
nebx_re = ny * (compressed_spec_mat[i*30+14] * |
|
|
335 |
+compressed_spec_mat[i*30+16] * |
|
|
336 |
+compressed_spec_mat[i*30+20] * |
|
|
337 |
+compressed_spec_mat[i*30+22] * |
|
|
338 |
+ nz * (compressed_spec_mat[i*30+14] * |
|
|
339 |
+compressed_spec_mat[i*30+16] * |
|
|
340 |
+compressed_spec_mat[i*30+20] * |
|
|
341 |
+compressed_spec_mat[i*30+22] * |
|
|
342 |
nebx_im = ny * (compressed_spec_mat[i*30+15]* |
|
|
343 |
+compressed_spec_mat[i*30+17] * |
|
|
344 |
+compressed_spec_mat[i*30+21] * |
|
|
345 |
+compressed_spec_mat[i*30+23] * |
|
|
346 |
+ nz * (compressed_spec_mat[i*30+15] * |
|
|
347 |
+compressed_spec_mat[i*30+17] * |
|
|
348 |
+compressed_spec_mat[i*30+21] * |
|
|
349 |
+compressed_spec_mat[i*30+23] * |
|
|
282 | bx_bx_star = cos(Alpha_M) * cos(Alpha_M) * compressed_spec_mat[i*30+10] // re S22 | |
|
283 | + sin(Alpha_M) * sin(Alpha_M) * compressed_spec_mat[i*30+18] // re S33 | |
|
284 | - 2 * sin(Alpha_M) * cos(Alpha_M) * compressed_spec_mat[i*30+12]; // re S23 | |
|
285 | nebx_re = ny * (compressed_spec_mat[(i*30) + 14] * K24_ny_re | |
|
286 | +compressed_spec_mat[(i*30) + 16] * K25_ny_re | |
|
287 | +compressed_spec_mat[(i*30) + 20] * K34_ny_re | |
|
288 | +compressed_spec_mat[(i*30) + 22] * K35_ny_re) | |
|
289 | + nz * (compressed_spec_mat[(i*30) + 14] * K24_nz_re | |
|
290 | +compressed_spec_mat[(i*30) + 16] * K25_nz_re | |
|
291 | +compressed_spec_mat[(i*30) + 20] * K34_nz_re | |
|
292 | +compressed_spec_mat[(i*30) + 22] * K35_nz_re); | |
|
293 | nebx_im = ny * (compressed_spec_mat[(i*30) + 15]*K24_ny_re | |
|
294 | +compressed_spec_mat[(i*30) + 17] * K25_ny_re | |
|
295 | +compressed_spec_mat[(i*30) + 21] * K34_ny_re | |
|
296 | +compressed_spec_mat[(i*30) + 23] * K35_ny_re) | |
|
297 | + nz * (compressed_spec_mat[(i*30) + 15] * K24_nz_im | |
|
298 | +compressed_spec_mat[(i*30) + 17] * K25_nz_im | |
|
299 | +compressed_spec_mat[(i*30) + 21] * K34_nz_im | |
|
300 | +compressed_spec_mat[(i*30) + 23] * K35_nz_im); | |
|
350 | 301 | tmp = nebx_re / bx_bx_star; |
|
351 | LFR_BP1[i*9+8] = ((unsigned char) (tmp * 128)) & 0x7f; // cf DOC for the compression | |
|
352 | if ( abs(nebx_re) > abs(nebx_im) ) | |
|
353 | LFR_BP1[i*9+8] = LFR_BP1[i*9+8] | (0x80); // extract the sector of nebx | |
|
354 |
|
|
|
355 | LFR_BP1[i*9+8] = LFR_BP1[i*9+8] & (0x7f); // extract the sector of nebx | |
|
302 | LFR_BP1[(i*9) + 8] = ((unsigned char) (tmp * 128)) & 0x7f; // cf DOC for the compression | |
|
303 | if ( abs(nebx_re) > abs(nebx_im) ) { | |
|
304 | LFR_BP1[(i*9) + 8] = LFR_BP1[(i*9) + 8] | (0x80); // extract the sector of nebx | |
|
305 | } | |
|
306 | else { | |
|
307 | LFR_BP1[(i*9) + 8] = LFR_BP1[(i*9) + 8] & (0x7f); // extract the sector of nebx | |
|
308 | } | |
|
356 | 309 | } |
|
357 | 310 | |
|
358 | 311 | } |
|
359 | 312 | |
|
360 | 313 | void BP2_set(float * compressed_spec_mat, unsigned char nb_bins_compressed_spec_mat){ |
|
361 | 314 | // BP2 autocorrelation |
|
362 |
int i |
|
|
315 | int i; | |
|
316 | int aux = 0; | |
|
317 | ||
|
363 | 318 | for(i = 0; i<nb_bins_compressed_spec_mat; i++){ |
|
364 | 319 | // S12 |
|
365 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[i*30+10]); | |
|
366 | compressed_spec_mat[i*30+2] = compressed_spec_mat[i*30+2] / aux; | |
|
367 | compressed_spec_mat[i*30+3] = compressed_spec_mat[i*30+3] / aux; | |
|
320 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[(i*30) + 10]); | |
|
321 | compressed_spec_mat[(i*30) + 2] = compressed_spec_mat[(i*30) + 2] / aux; | |
|
322 | compressed_spec_mat[(i*30) + 3] = compressed_spec_mat[(i*30) + 3] / aux; | |
|
368 | 323 | // S13 |
|
369 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[i*30+18]); | |
|
370 | compressed_spec_mat[i*30+4] = compressed_spec_mat[i*30+4] / aux; | |
|
371 | compressed_spec_mat[i*30+5] = compressed_spec_mat[i*30+5] / aux; | |
|
324 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[(i*30) + 18]); | |
|
325 | compressed_spec_mat[(i*30) + 4] = compressed_spec_mat[(i*30) + 4] / aux; | |
|
326 | compressed_spec_mat[(i*30) + 5] = compressed_spec_mat[(i*30) + 5] / aux; | |
|
372 | 327 | // S23 |
|
373 | aux = sqrt(compressed_spec_mat[i*30+12]*compressed_spec_mat[i*30+18]); | |
|
374 | compressed_spec_mat[i*30+12] = compressed_spec_mat[i*30+12] / aux; | |
|
375 | compressed_spec_mat[i*30+13] = compressed_spec_mat[i*30+13] / aux; | |
|
328 | aux = sqrt(compressed_spec_mat[i*30+12]*compressed_spec_mat[(i*30) + 18]); | |
|
329 | compressed_spec_mat[(i*30) + 12] = compressed_spec_mat[(i*30) + 12] / aux; | |
|
330 | compressed_spec_mat[(i*30) + 13] = compressed_spec_mat[(i*30) + 13] / aux; | |
|
376 | 331 | // S45 |
|
377 | aux = sqrt(compressed_spec_mat[i*30+24]*compressed_spec_mat[i*30+28]); | |
|
378 | compressed_spec_mat[i*30+26] = compressed_spec_mat[i*30+26] / aux; | |
|
379 | compressed_spec_mat[i*30+27] = compressed_spec_mat[i*30+27] / aux; | |
|
332 | aux = sqrt(compressed_spec_mat[i*30+24]*compressed_spec_mat[(i*30) + 28]); | |
|
333 | compressed_spec_mat[(i*30) + 26] = compressed_spec_mat[(i*30) + 26] / aux; | |
|
334 | compressed_spec_mat[(i*30) + 27] = compressed_spec_mat[(i*30) + 27] / aux; | |
|
380 | 335 | // S14 |
|
381 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[i*30+24]); | |
|
382 | compressed_spec_mat[i*30+6] = compressed_spec_mat[i*30+6] / aux; | |
|
383 | compressed_spec_mat[i*30+7] = compressed_spec_mat[i*30+7] / aux; | |
|
336 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[(i*30) +24]); | |
|
337 | compressed_spec_mat[(i*30) + 6] = compressed_spec_mat[(i*30) + 6] / aux; | |
|
338 | compressed_spec_mat[(i*30) + 7] = compressed_spec_mat[(i*30) + 7] / aux; | |
|
384 | 339 | // S15 |
|
385 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[i*30+28]); | |
|
386 | compressed_spec_mat[i*30+8] = compressed_spec_mat[i*30+8] / aux; | |
|
387 | compressed_spec_mat[i*30+9] = compressed_spec_mat[i*30+9] / aux; | |
|
340 | aux = sqrt(compressed_spec_mat[i*30]*compressed_spec_mat[(i*30) + 28]); | |
|
341 | compressed_spec_mat[(i*30) + 8] = compressed_spec_mat[(i*30) + 8] / aux; | |
|
342 | compressed_spec_mat[(i*30) + 9] = compressed_spec_mat[(i*30) + 9] / aux; | |
|
388 | 343 | // S24 |
|
389 | aux = sqrt(compressed_spec_mat[i*10]*compressed_spec_mat[i*30+24]); | |
|
390 | compressed_spec_mat[i*30+14] = compressed_spec_mat[i*30+14] / aux; | |
|
391 | compressed_spec_mat[i*30+15] = compressed_spec_mat[i*30+15] / aux; | |
|
344 | aux = sqrt(compressed_spec_mat[i*10]*compressed_spec_mat[(i*30) + 24]); | |
|
345 | compressed_spec_mat[(i*30) + 14] = compressed_spec_mat[(i*30) + 14] / aux; | |
|
346 | compressed_spec_mat[(i*30) + 15] = compressed_spec_mat[(i*30) + 15] / aux; | |
|
392 | 347 | // S25 |
|
393 | aux = sqrt(compressed_spec_mat[i*10]*compressed_spec_mat[i*30+28]); | |
|
394 | compressed_spec_mat[i*30+16] = compressed_spec_mat[i*30+16] / aux; | |
|
395 | compressed_spec_mat[i*30+17] = compressed_spec_mat[i*30+17] / aux; | |
|
348 | aux = sqrt(compressed_spec_mat[i*10]*compressed_spec_mat[(i*30) + 28]); | |
|
349 | compressed_spec_mat[(i*30) + 16] = compressed_spec_mat[(i*30) + 16] / aux; | |
|
350 | compressed_spec_mat[(i*30) + 17] = compressed_spec_mat[(i*30) + 17] / aux; | |
|
396 | 351 | // S34 |
|
397 | aux = sqrt(compressed_spec_mat[i*18]*compressed_spec_mat[i*30+24]); | |
|
398 | compressed_spec_mat[i*30+20] = compressed_spec_mat[i*30+20] / aux; | |
|
399 | compressed_spec_mat[i*30+21] = compressed_spec_mat[i*30+21] / aux; | |
|
352 | aux = sqrt(compressed_spec_mat[i*18]*compressed_spec_mat[(i*30) + 24]); | |
|
353 | compressed_spec_mat[(i*30) + 20] = compressed_spec_mat[(i*30) + 20] / aux; | |
|
354 | compressed_spec_mat[(i*30) + 21] = compressed_spec_mat[(i*30) + 21] / aux; | |
|
400 | 355 | // S35 |
|
401 | aux = sqrt(compressed_spec_mat[i*18]*compressed_spec_mat[i*30+28]); | |
|
402 | compressed_spec_mat[i*30+22] = compressed_spec_mat[i*30+22] / aux; | |
|
403 | compressed_spec_mat[i*30+23] = compressed_spec_mat[i*30+23] / aux; | |
|
356 | aux = sqrt(compressed_spec_mat[i*18]*compressed_spec_mat[(i*30) + 28]); | |
|
357 | compressed_spec_mat[(i*30) + 22] = compressed_spec_mat[(i*30) + 22] / aux; | |
|
358 | compressed_spec_mat[(i*30) + 23] = compressed_spec_mat[(i*30) + 23] / aux; | |
|
404 | 359 | } |
|
405 | 360 | } |
|
406 | 361 |
@@ -1,582 +1,711 | |||
|
1 | 1 | #include <tc_handler.h> |
|
2 | 2 | #include <fsw_params.h> |
|
3 | 3 | |
|
4 | char *errorCCSDSMsg[8] = { "ILLEGAL_APID 0", | |
|
5 | "WRONG_LEN_PACKET 1", | |
|
6 | "INCOR_CHECKSUM 2", | |
|
7 |
|
|
|
8 |
|
|
|
9 | "WRONG_APP_DATA 5", | |
|
10 | "WRONG_CMD_CODE 6", | |
|
11 | "CCSDS_TM_VALID 7" | |
|
4 | char *DumbMessages[5] = {"default", | |
|
5 | "timecode_irq_handler", | |
|
6 | "waveforms_isr", | |
|
7 | "", | |
|
8 | "" | |
|
12 | 9 | }; |
|
13 | 10 | |
|
11 | unsigned char currentTC_LEN_RCV[2]; // SHALL be equal to the current TC packet estimated packet length field | |
|
12 | unsigned char currentTC_COMPUTED_CRC[2]; | |
|
13 | unsigned int currentTC_LEN_RCV_AsUnsignedInt; | |
|
14 | unsigned int currentTM_length; | |
|
15 | unsigned char currentTC_processedFlag; | |
|
16 | ||
|
17 | unsigned int lookUpTableForCRC[256]; | |
|
18 | ||
|
14 | 19 | //********************** |
|
15 | 20 | // GENERAL USE FUNCTIONS |
|
16 | 21 | unsigned int Crc_opt( unsigned char D, unsigned int Chk) |
|
17 | 22 | { |
|
18 | 23 | return(((Chk << 8) & 0xff00)^lookUpTableForCRC [(((Chk >> 8)^D) & 0x00ff)]); |
|
19 | 24 | } |
|
20 | 25 | |
|
21 | void initLookUpTableForCRC() | |
|
26 | void initLookUpTableForCRC( void ) | |
|
22 | 27 | { |
|
23 |
unsigned int i |
|
|
28 | unsigned int i; | |
|
29 | unsigned int tmp; | |
|
30 | ||
|
24 | 31 | for (i=0; i<256; i++) |
|
25 | 32 | { |
|
26 | 33 | tmp = 0; |
|
27 |
if((i & 1) != 0) |
|
|
28 |
|
|
|
29 | if((i & 4) != 0) tmp = tmp ^ 0x4084; | |
|
30 |
if((i & |
|
|
31 |
|
|
|
32 | if((i & 32) != 0) tmp = tmp ^ 0x2462; | |
|
33 |
if((i & |
|
|
34 |
|
|
|
34 | if((i & 1) != 0) { | |
|
35 | tmp = tmp ^ 0x1021; | |
|
36 | } | |
|
37 | if((i & 2) != 0) { | |
|
38 | tmp = tmp ^ 0x2042; | |
|
39 | } | |
|
40 | if((i & 4) != 0) { | |
|
41 | tmp = tmp ^ 0x4084; | |
|
42 | } | |
|
43 | if((i & 8) != 0) { | |
|
44 | tmp = tmp ^ 0x8108; | |
|
45 | } | |
|
46 | if((i & 16) != 0) { | |
|
47 | tmp = tmp ^ 0x1231; | |
|
48 | } | |
|
49 | if((i & 32) != 0) { | |
|
50 | tmp = tmp ^ 0x2462; | |
|
51 | } | |
|
52 | if((i & 64) != 0) { | |
|
53 | tmp = tmp ^ 0x48c4; | |
|
54 | } | |
|
55 | if((i & 128) != 0) { | |
|
56 | tmp = tmp ^ 0x9188; | |
|
57 | } | |
|
35 | 58 | lookUpTableForCRC[i] = tmp; |
|
36 | 59 | } |
|
37 | 60 | } |
|
38 | 61 | |
|
39 | 62 | void GetCRCAsTwoBytes(unsigned char* data, unsigned char* crcAsTwoBytes, unsigned int sizeOfData) |
|
40 | 63 | { |
|
41 | 64 | unsigned int Chk; |
|
42 | 65 | int j; |
|
43 | 66 | Chk = 0xffff; // reset the syndrom to all ones |
|
44 | 67 | for (j=0; j<sizeOfData; j++) { |
|
45 | 68 | Chk = Crc_opt(data[j], Chk); |
|
46 | 69 | } |
|
47 | 70 | crcAsTwoBytes[0] = (unsigned char) (Chk >> 8); |
|
48 | 71 | crcAsTwoBytes[1] = (unsigned char) (Chk & 0x00ff); |
|
49 | 72 | } |
|
50 | 73 | |
|
51 | 74 | //********************* |
|
52 | 75 | // ACCEPTANCE FUNCTIONS |
|
53 | 76 | int TC_checker(ccsdsTelecommandPacket_t *TC, unsigned int tc_len_recv) |
|
54 | 77 | { |
|
78 | int ret = 0; | |
|
55 | 79 | rtems_status_code status; |
|
56 | 80 | spw_ioctl_pkt_send spw_ioctl_send; |
|
57 | 81 | TMHeader_t TM_header; |
|
58 | 82 | unsigned int code = 0; |
|
59 | 83 | unsigned char computed_CRC[2]; |
|
60 | 84 | char data[ TM_LEN_EXE_CORR + CCSDS_TC_TM_PACKET_OFFSET - TM_HEADER_LEN ]; |
|
61 | 85 | |
|
62 | 86 | GetCRCAsTwoBytes( (unsigned char*) TC->packetID, computed_CRC, tc_len_recv + 5 ); |
|
63 | 87 | code = acceptTM( TC, tc_len_recv ) ; |
|
64 | 88 | if ( (code == 0) | (code == 1) | (code == 2) |
|
65 | 89 | | (code == 3) | (code == 4) | (code == 5) ) |
|
66 | 90 | { // generate TM_LFR_TC_EXE_CORRUPTED |
|
67 | 91 | // BUILD HEADER |
|
68 | 92 | TM_build_header( TM_LFR_TC_EXE_ERR, TM_LEN_EXE_CORR, 0, 0, &TM_header); |
|
69 | 93 | // BUILD DATA |
|
70 | 94 | TM_build_data( TC, data, SID_EXE_CORR, computed_CRC); |
|
71 | 95 | // PREPARE TM SENDING |
|
72 | 96 | spw_ioctl_send.hlen = TM_HEADER_LEN + 4; // + 4 is for the protocole extra header |
|
73 | 97 | spw_ioctl_send.hdr = (char*) &TM_header; |
|
74 | 98 | spw_ioctl_send.dlen = 16; |
|
75 | 99 | spw_ioctl_send.data = data; |
|
76 | 100 | // SEND PACKET |
|
77 | 101 | write_spw(&spw_ioctl_send); |
|
78 | 102 | } |
|
79 | 103 | else { // send valid TC to the action launcher |
|
80 | 104 | status = rtems_message_queue_send( misc_id[0], TC, tc_len_recv + CCSDS_TC_TM_PACKET_OFFSET + 3); |
|
81 |
ret |
|
|
105 | ret = -1; | |
|
82 | 106 | } |
|
83 |
return |
|
|
107 | return ret; | |
|
84 | 108 | } |
|
85 | 109 | |
|
86 | 110 | unsigned char acceptTM(ccsdsTelecommandPacket_t * TMPacket, unsigned int TC_LEN_RCV) |
|
87 | 111 | { |
|
112 | unsigned char ret = 0; | |
|
88 | 113 | unsigned char pid = 0; |
|
89 | 114 | unsigned char category = 0; |
|
90 | 115 | unsigned int length = 0; |
|
91 | 116 | unsigned char packetType = 0; |
|
92 | 117 | unsigned char packetSubtype = 0; |
|
93 | unsigned char * CCSDSContent; | |
|
118 | unsigned char * CCSDSContent = NULL; | |
|
94 | 119 | |
|
95 | 120 | // APID check *** APID on 2 bytes |
|
96 | 121 | pid = ((TMPacket->packetID[0] & 0x07)<<4) + ( (TMPacket->packetID[1]>>4) & 0x0f ); // PID = 11 *** 7 bits xxxxx210 7654xxxx |
|
97 | 122 | category = (TMPacket->packetID[1] & 0x0f); // PACKET_CATEGORY = 12 *** 4 bits xxxxxxxx xxxx3210 |
|
98 | if (pid!=CCSDS_PROCESS_ID) return ILLEGAL_APID; | |
|
99 | if (category!=CCSDS_PACKET_CATEGORY) return ILLEGAL_APID; | |
|
100 | ||
|
101 | // packet length check | |
|
102 | length = TMPacket->packetLength[0] * 256 + TMPacket->packetLength[1]; | |
|
103 | if (length != TC_LEN_RCV ) return WRONG_LEN_PACKET; // LEN RCV != SIZE FIELD | |
|
104 | if (length >= CCSDS_TC_PKT_MAX_SIZE) return WRONG_LEN_PACKET; // check that the packet does not exceed the MAX size | |
|
105 | ||
|
123 | length = (TMPacket->packetLength[0] * 256) + TMPacket->packetLength[1]; | |
|
106 | 124 | packetType = TMPacket->dataFieldHeader[1]; |
|
107 | 125 | packetSubtype = TMPacket->dataFieldHeader[2]; |
|
108 | // service type, subtype and packet length check | |
|
109 | if (packetType == 181){ | |
|
126 | ||
|
127 | if (pid!=CCSDS_PROCESS_ID) { | |
|
128 | ret = ILLEGAL_APID; | |
|
129 | } | |
|
130 | else if (category!=CCSDS_PACKET_CATEGORY) { | |
|
131 | ret = ILLEGAL_APID; | |
|
132 | } | |
|
133 | else if (length != TC_LEN_RCV ) { // packet length check | |
|
134 | ret = WRONG_LEN_PACKET; // LEN RCV != SIZE FIELD | |
|
135 | } | |
|
136 | else if (length >= CCSDS_TC_PKT_MAX_SIZE) { | |
|
137 | ret = WRONG_LEN_PACKET; // check that the packet does not exceed the MAX size | |
|
138 | } | |
|
139 | else if (packetType == TC_TYPE_GEN){ // service type, subtype and packet length check | |
|
110 | 140 | switch(packetSubtype){ //subtype, autorized values are 3, 20, 21, 24, 27, 28, 30, 40, 50, 60, 61 |
|
111 |
case |
|
|
112 |
if (length!=( |
|
|
113 | break; | |
|
114 |
|
|
|
115 | if (length!=(14-CCSDS_TC_TM_PACKET_OFFSET)) return WRONG_LEN_PACKET; | |
|
141 | case TC_SUBTYPE_RESET: | |
|
142 | if (length!=(TC_LEN_RESET-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
143 | ret = WRONG_LEN_PACKET; | |
|
144 | } | |
|
145 | else { | |
|
146 | ret = CCSDS_TM_VALID; | |
|
147 | } | |
|
116 | 148 | break; |
|
117 |
case |
|
|
118 |
if (length!=( |
|
|
149 | case TC_SUBTYPE_LOAD_COMM: | |
|
150 | if (length!=(TC_LEN_LOAD_COMM-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
151 | ret = WRONG_LEN_PACKET; | |
|
152 | } | |
|
153 | else { | |
|
154 | ret = CCSDS_TM_VALID; | |
|
155 | } | |
|
119 | 156 | break; |
|
120 |
case |
|
|
121 |
if (length!=( |
|
|
157 | case TC_SUBTYPE_LOAD_NORM: | |
|
158 | if (length!=(TC_LEN_LOAD_NORM-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
159 | ret = WRONG_LEN_PACKET; | |
|
160 | } | |
|
161 | else { | |
|
162 | ret = CCSDS_TM_VALID; | |
|
163 | } | |
|
122 | 164 | break; |
|
123 |
case |
|
|
124 |
if (length!=( |
|
|
165 | case TC_SUBTYPE_LOAD_BURST: | |
|
166 | if (length!=(TC_LEN_LOAD_BURST-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
167 | ret = WRONG_LEN_PACKET; | |
|
168 | } | |
|
169 | else { | |
|
170 | ret = CCSDS_TM_VALID; | |
|
171 | } | |
|
125 | 172 | break; |
|
126 |
case |
|
|
127 |
if (length!=(1 |
|
|
173 | case TC_SUBTYPE_LOAD_SBM1: | |
|
174 | if (length!=(TC_LEN_LOAD_SBM1-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
175 | ret = WRONG_LEN_PACKET; | |
|
176 | } | |
|
177 | else { | |
|
178 | ret = CCSDS_TM_VALID; | |
|
179 | } | |
|
128 | 180 | break; |
|
129 |
case |
|
|
130 |
if (length!=( |
|
|
181 | case TC_SUBTYPE_LOAD_SBM2: | |
|
182 | if (length!=(TC_LEN_LOAD_SBM2-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
183 | ret = WRONG_LEN_PACKET; | |
|
184 | } | |
|
185 | else { | |
|
186 | ret = CCSDS_TM_VALID; | |
|
187 | } | |
|
131 | 188 | break; |
|
132 |
case |
|
|
133 |
if (length!=( |
|
|
189 | case TC_SUBTYPE_DUMP: | |
|
190 | if (length!=(TC_LEN_DUMP-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
191 | ret = WRONG_LEN_PACKET; | |
|
192 | } | |
|
193 | else { | |
|
194 | ret = CCSDS_TM_VALID; | |
|
195 | } | |
|
134 | 196 | break; |
|
135 |
case |
|
|
136 |
if (length!=( |
|
|
197 | case TC_SUBTYPE_ENTER: | |
|
198 | if (length!=(TC_LEN_ENTER-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
199 | ret = WRONG_LEN_PACKET; | |
|
200 | } | |
|
201 | else { | |
|
202 | ret = CCSDS_TM_VALID; | |
|
203 | } | |
|
204 | break; | |
|
205 | case TC_SUBTYPE_UPDT_INFO: | |
|
206 | if (length!=(TC_LEN_UPDT_INFO-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
207 | ret = WRONG_LEN_PACKET; | |
|
208 | } | |
|
209 | else { | |
|
210 | ret = CCSDS_TM_VALID; | |
|
211 | } | |
|
137 | 212 | break; |
|
138 |
case |
|
|
139 |
if (length!=( |
|
|
213 | case TC_SUBTYPE_EN_CAL: | |
|
214 | if (length!=(TC_LEN_EN_CAL-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
215 | ret = WRONG_LEN_PACKET; | |
|
216 | } | |
|
217 | else { | |
|
218 | ret = CCSDS_TM_VALID; | |
|
219 | } | |
|
140 | 220 | break; |
|
141 |
case |
|
|
142 |
if (length!=( |
|
|
221 | case TC_SUBTYPE_DIS_CAL: | |
|
222 | if (length!=(TC_LEN_DIS_CAL-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
223 | ret = WRONG_LEN_PACKET; | |
|
224 | } | |
|
225 | else { | |
|
226 | ret = CCSDS_TM_VALID; | |
|
227 | } | |
|
143 | 228 | break; |
|
144 | 229 | default: |
|
145 |
ret |
|
|
230 | ret = ILL_SUBTYPE; | |
|
146 | 231 | break; |
|
147 | 232 |
|
|
148 | 233 | } |
|
149 |
else if (packetType == |
|
|
150 |
if (packetSubtype!= |
|
|
151 | if (length!=(18-CCSDS_TC_TM_PACKET_OFFSET)) return WRONG_LEN_PACKET; | |
|
234 | else if (packetType == TC_TYPE_TIME){ | |
|
235 | if (packetSubtype!=TC_SUBTYPE_UPDT_TIME) { | |
|
236 | ret = ILL_SUBTYPE; | |
|
237 | } | |
|
238 | else if (length!=(TC_LEN_UPDT_TIME-CCSDS_TC_TM_PACKET_OFFSET)) { | |
|
239 | ret = WRONG_LEN_PACKET; | |
|
152 | 240 | } |
|
153 | else return ILL_TYPE; | |
|
241 | else { | |
|
242 | ret = CCSDS_TM_VALID; | |
|
243 | } | |
|
244 | } | |
|
245 | else { | |
|
246 | ret = ILL_TYPE; | |
|
247 | } | |
|
154 | 248 | |
|
155 | 249 | // source ID check // Source ID not documented in the ICD |
|
156 | 250 | |
|
157 | 251 | // packet error control, CRC check |
|
158 | 252 | CCSDSContent = (unsigned char*) TMPacket->packetID; |
|
159 | 253 | GetCRCAsTwoBytes(CCSDSContent, currentTC_COMPUTED_CRC, length + CCSDS_TC_TM_PACKET_OFFSET - 2); // 2 CRC bytes removed from the calculation of the CRC |
|
160 |
if (currentTC_COMPUTED_CRC[0] != CCSDSContent[length + CCSDS_TC_TM_PACKET_OFFSET -2]) |
|
|
161 | if (currentTC_COMPUTED_CRC[1] != CCSDSContent[length + CCSDS_TC_TM_PACKET_OFFSET -1]) return INCOR_CHECKSUM; | |
|
254 | if (currentTC_COMPUTED_CRC[0] != CCSDSContent[length + CCSDS_TC_TM_PACKET_OFFSET -2]) { | |
|
255 | ret = INCOR_CHECKSUM; | |
|
256 | } | |
|
257 | else if (currentTC_COMPUTED_CRC[1] != CCSDSContent[length + CCSDS_TC_TM_PACKET_OFFSET -1]) { | |
|
258 | ret = INCOR_CHECKSUM; | |
|
259 | } | |
|
260 | else { | |
|
261 | ret = CCSDS_TM_VALID; | |
|
262 | } | |
|
162 | 263 | |
|
163 | return CCSDS_TM_VALID; | |
|
264 | return ret; | |
|
164 | 265 | } |
|
165 | 266 | |
|
166 | 267 | unsigned char TM_build_header( enum TM_TYPE tm_type, unsigned int packetLength, |
|
167 | 268 | unsigned int coarseTime, unsigned int fineTime, TMHeader_t *TMHeader) |
|
168 | 269 | { |
|
169 | 270 | TMHeader->targetLogicalAddress = CCSDS_DESTINATION_ID; |
|
170 | 271 | TMHeader->protocolIdentifier = 0x02; |
|
171 | 272 | TMHeader->reserved = 0x00; |
|
172 | 273 | TMHeader->userApplication = 0x00; |
|
173 | 274 | TMHeader->packetID[0] = 0x0c; |
|
174 | 275 | TMHeader->packetSequenceControl[0] = 0xc0; |
|
175 | 276 | TMHeader->packetSequenceControl[1] = 0x00; |
|
176 | 277 | TMHeader->packetLength[0] = (unsigned char) (packetLength>>8); |
|
177 | 278 | TMHeader->packetLength[1] = (unsigned char) packetLength; |
|
178 | 279 | TMHeader->dataFieldHeader[0] = 0x10; |
|
179 | 280 | TMHeader->dataFieldHeader[3] = CCSDS_DESTINATION_ID; |
|
180 | 281 | switch (tm_type){ |
|
181 | 282 | case(TM_LFR_TC_EXE_OK): |
|
182 | 283 | TMHeader->packetID[1] = 0xc1; |
|
183 | 284 | TMHeader->dataFieldHeader[1] = 1; // type |
|
184 | 285 | TMHeader->dataFieldHeader[2] = 7; // subtype |
|
185 | 286 | break; |
|
186 | 287 | case(TM_LFR_TC_EXE_ERR): |
|
187 | 288 | TMHeader->packetID[1] = 0xc1; |
|
188 | 289 | TMHeader->dataFieldHeader[1] = 1; // type |
|
189 | 290 | TMHeader->dataFieldHeader[2] = 8; // subtype |
|
190 | 291 | break; |
|
191 | 292 | case(TM_LFR_HK): |
|
192 | 293 | TMHeader->packetID[1] = 0xc4; |
|
193 | 294 | TMHeader->dataFieldHeader[1] = 3; // type |
|
194 | 295 | TMHeader->dataFieldHeader[2] = 25; // subtype |
|
195 | 296 | break; |
|
196 | 297 | case(TM_LFR_SCI): |
|
197 | 298 | TMHeader->packetID[1] = 0xcc; |
|
198 | 299 | TMHeader->dataFieldHeader[1] = 21; // type |
|
199 | 300 | TMHeader->dataFieldHeader[2] = 3; // subtype |
|
200 | 301 | break; |
|
201 | 302 | case(TM_LFR_SCI_SBM): |
|
202 | 303 | TMHeader->packetID[1] = 0xfc; |
|
203 | 304 | TMHeader->dataFieldHeader[1] = 21; // type |
|
204 | 305 | TMHeader->dataFieldHeader[2] = 3; // subtype |
|
205 | 306 | break; |
|
206 | 307 | case(TM_LFR_PAR_DUMP): |
|
207 | 308 | TMHeader->packetID[1] = 0xc9; |
|
208 | 309 | TMHeader->dataFieldHeader[1] = 181; // type |
|
209 | 310 | TMHeader->dataFieldHeader[2] = 31; // subtype |
|
210 | 311 | break; |
|
211 | 312 | default: |
|
212 | 313 | return 0; |
|
213 | 314 | } |
|
214 | 315 | TMHeader->dataFieldHeader[4] = (unsigned char) (time_management_regs->coarse_time>>24); |
|
215 | 316 | TMHeader->dataFieldHeader[5] = (unsigned char) (time_management_regs->coarse_time>>16); |
|
216 | 317 | TMHeader->dataFieldHeader[6] = (unsigned char) (time_management_regs->coarse_time>>8); |
|
217 | 318 | TMHeader->dataFieldHeader[7] = (unsigned char) (time_management_regs->coarse_time); |
|
218 | 319 | TMHeader->dataFieldHeader[8] = (unsigned char) (time_management_regs->fine_time>>8); |
|
219 | 320 | TMHeader->dataFieldHeader[9] = (unsigned char) (time_management_regs->fine_time); |
|
220 | 321 | return 1; |
|
221 | 322 | } |
|
222 | 323 | |
|
223 | 324 | unsigned char TM_build_header_bis( enum TM_TYPE tm_type, unsigned int packetLength, |
|
224 | 325 | unsigned int coarseTime, unsigned int fineTime, Packet_TM_LFR_TC_EXE_t *packet) |
|
225 | 326 | { |
|
226 | 327 | |
|
227 | 328 | packet->targetLogicalAddress = CCSDS_DESTINATION_ID; |
|
228 | 329 | packet->protocolIdentifier = 0x02; |
|
229 | 330 | packet->reserved = 0x00; |
|
230 | 331 | packet->userApplication = 0x00; |
|
231 | 332 | packet->packetID[0] = 0x0c; |
|
232 | 333 | packet->packetSequenceControl[0] = 0xc0; |
|
233 | 334 | packet->packetSequenceControl[1] = 0x00; |
|
234 | 335 | packet->packetLength[0] = (unsigned char) (packetLength>>8); |
|
235 | 336 | packet->packetLength[1] = (unsigned char) packetLength; |
|
236 | 337 | packet->dataFieldHeader[0] = 0x10; |
|
237 | 338 | packet->dataFieldHeader[3] = CCSDS_DESTINATION_ID; |
|
238 | 339 | switch (tm_type){ |
|
239 | 340 | case(TM_LFR_TC_EXE_OK): |
|
240 | 341 | packet->packetID[1] = 0xc1; |
|
241 | 342 | packet->dataFieldHeader[1] = 1; // type |
|
242 | 343 | packet->dataFieldHeader[2] = 7; // subtype |
|
243 | 344 | break; |
|
244 | 345 | case(TM_LFR_TC_EXE_ERR): |
|
245 | 346 | packet->packetID[1] = 0xc1; |
|
246 | 347 | packet->dataFieldHeader[1] = 1; // type |
|
247 | 348 | packet->dataFieldHeader[2] = 8; // subtype |
|
248 | 349 | break; |
|
249 | 350 | case(TM_LFR_HK): |
|
250 | 351 | packet->packetID[1] = 0xc4; |
|
251 | 352 | packet->dataFieldHeader[1] = 3; // type |
|
252 | 353 | packet->dataFieldHeader[2] = 25; // subtype |
|
253 | 354 | break; |
|
254 | 355 | case(TM_LFR_SCI): |
|
255 | 356 | packet->packetID[1] = 0xcc; |
|
256 | 357 | packet->dataFieldHeader[1] = 21; // type |
|
257 | 358 | packet->dataFieldHeader[2] = 3; // subtype |
|
258 | 359 | break; |
|
259 | 360 | case(TM_LFR_SCI_SBM): |
|
260 | 361 | packet->packetID[1] = 0xfc; |
|
261 | 362 | packet->dataFieldHeader[1] = 21; // type |
|
262 | 363 | packet->dataFieldHeader[2] = 3; // subtype |
|
263 | 364 | break; |
|
264 | 365 | case(TM_LFR_PAR_DUMP): |
|
265 | 366 | packet->packetID[1] = 0xc9; |
|
266 | 367 | packet->dataFieldHeader[1] = 181; // type |
|
267 | 368 | packet->dataFieldHeader[2] = 31; // subtype |
|
268 | 369 | break; |
|
269 | 370 | default: |
|
270 | 371 | return 0; |
|
271 | 372 | } |
|
272 | 373 | packet->dataFieldHeader[4] = (unsigned char) (time_management_regs->coarse_time>>24); |
|
273 | 374 | packet->dataFieldHeader[5] = (unsigned char) (time_management_regs->coarse_time>>16); |
|
274 | 375 | packet->dataFieldHeader[6] = (unsigned char) (time_management_regs->coarse_time>>8); |
|
275 | 376 | packet->dataFieldHeader[7] = (unsigned char) (time_management_regs->coarse_time); |
|
276 | 377 | packet->dataFieldHeader[8] = (unsigned char) (time_management_regs->fine_time>>8); |
|
277 | 378 | packet->dataFieldHeader[9] = (unsigned char) (time_management_regs->fine_time); |
|
278 | 379 | return 1; |
|
279 | 380 | } |
|
280 | 381 | |
|
281 | 382 | unsigned char TM_build_data(ccsdsTelecommandPacket_t *TC, char* data, unsigned int SID, unsigned char *computed_CRC) |
|
282 | 383 | { |
|
283 | 384 | unsigned int packetLength; |
|
284 | packetLength = TC->packetLength[0] * 256 + TC->packetLength[1]; | |
|
385 | packetLength = (TC->packetLength[0] * 256) + TC->packetLength[1]; | |
|
285 | 386 | switch (SID){ |
|
286 | 387 | case (SID_NOT_EXE): |
|
287 | 388 | break; |
|
288 | 389 | case (SID_NOT_IMP): |
|
289 | 390 | data[0] = 0x9c; |
|
290 | 391 | data[1] = 0x42; |
|
291 | 392 | data[2] = TC->packetID[0]; |
|
292 | 393 | data[3] = TC->packetID[1]; |
|
293 | 394 | data[4] = TC->packetSequenceControl[0]; |
|
294 | 395 | data[5] = TC->packetSequenceControl[1]; |
|
295 | 396 | data[6] = TC->dataFieldHeader[1]; // type |
|
296 | 397 | data[7] = TC->dataFieldHeader[2]; // subtype |
|
297 | 398 | break; |
|
298 | 399 | case (SID_EXE_ERR): |
|
299 | 400 | break; |
|
300 | 401 | case (SID_EXE_CORR): |
|
301 | 402 | data[0] = 0x9c; |
|
302 | 403 | data[1] = 0x45; |
|
303 | 404 | data[2] = TC->packetID[0]; |
|
304 | 405 | data[3] = TC->packetID[1]; |
|
305 | 406 | data[4] = TC->packetSequenceControl[0]; |
|
306 | 407 | data[5] = TC->packetSequenceControl[1]; |
|
307 | 408 | data[6] = TC->dataFieldHeader[1]; // type |
|
308 | 409 | data[7] = TC->dataFieldHeader[2]; // subtype |
|
309 | 410 | data[8] = currentTC_LEN_RCV[0]; |
|
310 | 411 | data[9] = currentTC_LEN_RCV[1]; |
|
311 | 412 | data[10] = TC->packetLength[0]; |
|
312 | 413 | data[11] = TC->packetLength[1]; |
|
313 | 414 | data[12] = TC->dataAndCRC[packetLength]; |
|
314 | 415 | data[13] = TC->dataAndCRC[packetLength+1]; |
|
315 | 416 | data[14] = computed_CRC[0]; |
|
316 | 417 | data[15] = computed_CRC[1]; |
|
317 | 418 | break; |
|
318 | 419 | default: |
|
319 | 420 | return 0; |
|
320 | 421 | } |
|
321 | 422 | return 1; |
|
322 | 423 | } |
|
323 | 424 | |
|
324 | int create_message_queue() | |
|
425 | int create_message_queue( void ) | |
|
325 | 426 | { |
|
326 | 427 | rtems_status_code status; |
|
327 | 428 | misc_name[0] = rtems_build_name( 'Q', 'U', 'E', 'U' ); |
|
328 | 429 | status = rtems_message_queue_create( misc_name[0], ACTION_MSG_QUEUE_COUNT, CCSDS_TC_PKT_MAX_SIZE, |
|
329 | 430 | RTEMS_FIFO | RTEMS_LOCAL, &misc_id[0] ); |
|
330 | if (status!=RTEMS_SUCCESSFUL) PRINTF("in create_message_queue *** error creating message queue\n") | |
|
431 | if (status!=RTEMS_SUCCESSFUL) { | |
|
432 | PRINTF("in create_message_queue *** error creating message queue\n") | |
|
433 | } | |
|
331 | 434 | |
|
332 | 435 | return 0; |
|
333 | 436 | } |
|
334 | 437 | |
|
335 | 438 | //*********** |
|
336 | 439 | // RTEMS TASK |
|
337 | 440 | rtems_task recv_task( rtems_task_argument unused ) |
|
338 | 441 | { |
|
339 | 442 | int len = 0; |
|
340 | 443 | unsigned int i = 0; |
|
341 | 444 | unsigned int data_length = 0; |
|
342 | 445 | ccsdsTelecommandPacket_t currentTC; |
|
343 | 446 | char data[100]; |
|
344 | 447 | |
|
345 | 448 | for(i=0; i<100; i++) data[i] = 0; |
|
346 | 449 | |
|
347 | 450 | PRINTF("in RECV *** \n") |
|
348 | 451 | |
|
349 | 452 | while(1) |
|
350 | 453 | { |
|
351 | 454 | len = read(fdSPW, (char*) ¤tTC, CCSDS_TC_PKT_MAX_SIZE); // the call to read is blocking |
|
352 | 455 | if (len == -1){ // error during the read call |
|
353 | 456 | PRINTF("In RECV *** last read call returned -1\n") |
|
354 | if (rtems_event_send( Task_id[3], SPW_LINKERR_EVENT ) != RTEMS_SUCCESSFUL) | |
|
457 | if (rtems_event_send( Task_id[3], SPW_LINKERR_EVENT ) != RTEMS_SUCCESSFUL) { | |
|
355 | 458 | PRINTF("IN RECV *** Error: rtems_event_send SPW_LINKERR_EVENT\n") |
|
356 | if (rtems_task_suspend(RTEMS_SELF) != RTEMS_SUCCESSFUL) | |
|
459 | } | |
|
460 | if (rtems_task_suspend(RTEMS_SELF) != RTEMS_SUCCESSFUL) { | |
|
357 | 461 | PRINTF("In RECV *** Error: rtems_task_suspend(RTEMS_SELF)\n") |
|
358 | 462 | } |
|
463 | } | |
|
359 | 464 | else { |
|
360 | 465 | PRINTF1("Got pck of length %d\n", len+1) |
|
361 | 466 | currentTC_LEN_RCV[0] = 0x00; |
|
362 | currentTC_LEN_RCV[1] = (unsigned char) len - CCSDS_TC_TM_PACKET_OFFSET - 3; // build the corresponding packet size field | |
|
363 | currentTC_LEN_RCV_AsUnsignedInt = (unsigned int) len - CCSDS_TC_TM_PACKET_OFFSET - 3; // => -3 is for Prot ID, Reserved and User App bytes | |
|
467 | currentTC_LEN_RCV[1] = (unsigned char) (len - CCSDS_TC_TM_PACKET_OFFSET - 3); // build the corresponding packet size field | |
|
468 | currentTC_LEN_RCV_AsUnsignedInt = (unsigned int) (len - CCSDS_TC_TM_PACKET_OFFSET - 3); // => -3 is for Prot ID, Reserved and User App bytes | |
|
364 | 469 | // CHECK THE TC AND BUILD THE APPROPRIATE TM |
|
365 | 470 | data_length = TC_checker(¤tTC, currentTC_LEN_RCV_AsUnsignedInt); |
|
366 | 471 | if (data_length!=-1) |
|
367 | 472 | { |
|
368 | 473 | } |
|
369 | 474 | } |
|
370 | 475 | } |
|
371 | 476 | } |
|
372 | 477 | |
|
373 | 478 | rtems_task actn_task( rtems_task_argument unused ) |
|
374 | 479 | { |
|
375 | 480 | int result = 0; |
|
376 | 481 | rtems_status_code status; // RTEMS status code |
|
377 | 482 | ccsdsTelecommandPacket_t TC; // TC sent to the ACTN task |
|
378 | 483 | size_t size; // size of the incoming TC packet |
|
379 | 484 | unsigned char subtype = 0; // subtype of the current TC packet |
|
380 | 485 | |
|
381 | 486 | PRINTF("in ACTN *** \n") |
|
382 | 487 | |
|
383 | 488 | while(1) |
|
384 | 489 | { |
|
385 | 490 | status = rtems_message_queue_receive(misc_id[0], (char*) &TC, &size, |
|
386 | 491 | RTEMS_WAIT, RTEMS_NO_TIMEOUT); |
|
387 | 492 | if (status!=RTEMS_SUCCESSFUL) PRINTF1("in task ACTN *** error receiving a message, code %d \n", status) |
|
388 | 493 | else |
|
389 | 494 | { |
|
390 | 495 | subtype = TC.dataFieldHeader[2]; |
|
391 | 496 | switch(subtype) |
|
392 | 497 | { |
|
393 | 498 | case TC_SUBTYPE_RESET: |
|
394 | 499 | result = action_default( &TC ); |
|
395 | 500 | break; |
|
396 | 501 | // |
|
397 | 502 | case TC_SUBTYPE_LOAD_COMM: |
|
398 | 503 | result = action_default( &TC ); |
|
399 | 504 | break; |
|
400 | 505 | // |
|
401 | 506 | case TC_SUBTYPE_LOAD_NORM: |
|
402 | 507 | result = action_load_norm( &TC ); |
|
403 | 508 | send_tm_lfr_tc_exe_success( &TC ); |
|
404 | 509 | break; |
|
405 | 510 | // |
|
406 | 511 | case TC_SUBTYPE_LOAD_BURST: |
|
407 | 512 | result = action_default( &TC ); |
|
408 | 513 | break; |
|
409 | 514 | // |
|
410 | 515 | case TC_SUBTYPE_LOAD_SBM1: |
|
411 | 516 | result = action_default( &TC ); |
|
412 | 517 | break; |
|
413 | 518 | // |
|
414 | 519 | case TC_SUBTYPE_LOAD_SBM2: |
|
415 | 520 | result = action_default( &TC ); |
|
416 | 521 | break; |
|
417 | 522 | // |
|
418 | 523 | case TC_SUBTYPE_DUMP: |
|
419 | 524 | result = action_default( &TC ); |
|
420 | 525 | break; |
|
421 | 526 | // |
|
422 | 527 | case TC_SUBTYPE_ENTER: |
|
423 | 528 | result = action_enter( &TC ); |
|
424 | 529 | send_tm_lfr_tc_exe_success( &TC ); |
|
425 | 530 | break; |
|
426 | 531 | // |
|
427 | 532 | case TC_SUBTYPE_UPDT_INFO: |
|
428 | 533 | result = action_default( &TC ); |
|
429 | 534 | break; |
|
430 | 535 | // |
|
431 | 536 | case TC_SUBTYPE_EN_CAL: |
|
432 | 537 | result = action_default( &TC ); |
|
433 | 538 | break; |
|
434 | 539 | // |
|
435 | 540 | case TC_SUBTYPE_DIS_CAL: |
|
436 | 541 | result = action_default( &TC ); |
|
437 | 542 | break; |
|
438 | 543 | // |
|
439 | 544 | case TC_SUBTYPE_UPDT_TIME: |
|
440 | 545 | result = action_updt_time( &TC ); |
|
441 | 546 | send_tm_lfr_tc_exe_success( &TC ); |
|
442 | 547 | break; |
|
443 | 548 | // |
|
444 | 549 | default: |
|
445 | 550 | break; |
|
446 | 551 | } |
|
447 | 552 | } |
|
448 | 553 | } |
|
449 | 554 | } |
|
450 | 555 | |
|
451 | 556 | rtems_task dumb_task( rtems_task_argument unused ) |
|
452 | 557 | { |
|
453 | unsigned int coarse_time; | |
|
454 | unsigned int fine_time; | |
|
558 | unsigned int coarse_time = 0; | |
|
559 | unsigned int fine_time = 0; | |
|
560 | unsigned int indice = 0; | |
|
561 | unsigned int shiftedIndice = 0; | |
|
455 | 562 | rtems_event_set event_out; |
|
456 | 563 | |
|
457 | 564 | PRINTF("in DUMB *** \n") |
|
458 | 565 | |
|
459 | 566 | while(1){ |
|
460 |
rtems_event_receive(RTEMS_EVENT_ |
|
|
567 | rtems_event_receive(RTEMS_EVENT_1, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an RTEMS_EVENT0 | |
|
568 | indice = 0; | |
|
569 | shiftedIndice = (unsigned int) event_out; | |
|
570 | while(!(shiftedIndice & 0x0001)) | |
|
571 | { | |
|
572 | shiftedIndice = shiftedIndice >> 1; | |
|
573 | indice++; | |
|
574 | } | |
|
461 | 575 | coarse_time = time_management_regs->coarse_time; |
|
462 | 576 | fine_time = time_management_regs->fine_time; |
|
463 |
printf("in DUMB *** coarse |
|
|
577 | printf("in DUMB *** time = coarse: %x, fine: %x, %s\n", coarse_time, fine_time, DumbMessages[indice]); | |
|
464 | 578 | } |
|
465 | 579 | } |
|
466 | 580 | |
|
467 | 581 | //*********** |
|
468 | 582 | // TC ACTIONS |
|
469 | 583 | |
|
470 | 584 | int action_default(ccsdsTelecommandPacket_t *TC) |
|
471 | 585 | { |
|
472 | 586 | Packet_TM_LFR_TC_EXE_t packet; |
|
473 | 587 | |
|
474 | 588 | TM_build_header_bis( TM_LFR_TC_EXE_ERR, TM_LEN_NOT_IMP, |
|
475 | 589 | time_management_regs->coarse_time, time_management_regs->fine_time, &packet); |
|
476 | 590 | |
|
477 | 591 | packet.data[0] = 0x9c; |
|
478 | 592 | packet.data[1] = 0x42; |
|
479 | 593 | packet.data[2] = TC->packetID[0]; |
|
480 | 594 | packet.data[3] = TC->packetID[1]; |
|
481 | 595 | packet.data[4] = TC->packetSequenceControl[0]; |
|
482 | 596 | packet.data[5] = TC->packetSequenceControl[1]; |
|
483 | 597 | packet.data[6] = TC->dataFieldHeader[1]; // type |
|
484 | 598 | packet.data[7] = TC->dataFieldHeader[2]; // subtype |
|
485 | 599 | |
|
486 | 600 | // SEND DATA |
|
487 | if (write ( fdSPW, &packet, LEN_TM_LFR_TC_EXE_NOT_IMP)==-1) | |
|
601 | if (write ( fdSPW, &packet, LEN_TM_LFR_TC_EXE_NOT_IMP)==-1) { | |
|
488 | 602 | PRINTF("ERR *** in action_default *** send TM packet\n"); |
|
603 | } | |
|
489 | 604 | |
|
490 | 605 | return 0; |
|
491 | 606 | } |
|
492 | 607 | |
|
493 | 608 | int action_enter(ccsdsTelecommandPacket_t *TC) |
|
494 | 609 | { |
|
495 | 610 | unsigned char lfr_mode = TC->dataAndCRC[1]; |
|
496 | 611 | printf("enter mode %d\n", lfr_mode); |
|
497 | 612 | switch(lfr_mode) |
|
498 | 613 | { |
|
499 | 614 | case(LFR_MODE_STANDBY): |
|
500 | 615 | LEON_Mask_interrupt( IRQ_WF ); |
|
501 | 616 | LEON_Mask_interrupt( IRQ_SM ); |
|
617 | LEON_Mask_interrupt( IRQ_WAVEFORM_PICKER ); | |
|
618 | waveform_picker_regs->burst_enable = 0x00; | |
|
502 | 619 | break; |
|
503 | 620 | case(LFR_MODE_NORMAL): |
|
621 | ||
|
622 | #ifdef GSA | |
|
504 | 623 | LEON_Unmask_interrupt( IRQ_WF ); |
|
505 | LEON_Unmask_interrupt( IRQ_SM ); | |
|
624 | #else | |
|
625 | LEON_Clear_interrupt( IRQ_WAVEFORM_PICKER ); | |
|
626 | LEON_Unmask_interrupt( IRQ_WAVEFORM_PICKER ); | |
|
627 | waveform_picker_regs->burst_enable = 0x07; | |
|
628 | waveform_picker_regs->status = 0x00; | |
|
629 | #endif | |
|
630 | ||
|
506 | 631 | break; |
|
507 | 632 | case(LFR_MODE_BURST): |
|
508 | 633 | break; |
|
509 | 634 | case(LFR_MODE_SBM1): |
|
510 | 635 | break; |
|
511 | 636 | case(LFR_MODE_SBM2): |
|
512 | 637 | break; |
|
638 | default: | |
|
639 | break; | |
|
513 | 640 | } |
|
514 | 641 | return 0; |
|
515 | 642 | } |
|
516 | 643 | |
|
517 | 644 | int action_load_norm(ccsdsTelecommandPacket_t *TC) |
|
518 | 645 | { |
|
519 | param_norm.sy_lfr_n_swf_l = TC->dataAndCRC[0] * 256 + TC->dataAndCRC[1]; | |
|
520 | param_norm.sy_lfr_n_swf_p = TC->dataAndCRC[2] * 256 + TC->dataAndCRC[3]; | |
|
521 | param_norm.sy_lfr_n_asm_p = TC->dataAndCRC[4] * 256 + TC->dataAndCRC[5]; | |
|
646 | param_norm.sy_lfr_n_swf_l = (TC->dataAndCRC[0] * 256) + TC->dataAndCRC[1]; | |
|
647 | param_norm.sy_lfr_n_swf_p = (TC->dataAndCRC[2] * 256) + TC->dataAndCRC[3]; | |
|
648 | param_norm.sy_lfr_n_asm_p = (TC->dataAndCRC[4] * 256) + TC->dataAndCRC[5]; | |
|
522 | 649 | param_norm.sy_lfr_n_bp_p0 = TC->dataAndCRC[6]; |
|
523 | 650 | param_norm.sy_lfr_n_bp_p1 = TC->dataAndCRC[7]; |
|
524 | 651 | /*printf("sy_lfr_n_ => swf_l %d, swf_p %d, asm_p %d, bsp_p0 %d, bsp_p1 %d\n", |
|
525 | 652 | param_norm.sy_lfr_n_swf_l, param_norm.sy_lfr_n_swf_p, |
|
526 | 653 | param_norm.sy_lfr_n_asm_p, param_norm.sy_lfr_n_bp_p0, param_norm.sy_lfr_n_bp_p1);*/ |
|
527 | 654 | return 0; |
|
528 | 655 | } |
|
529 | 656 | |
|
530 | 657 | int action_updt_time(ccsdsTelecommandPacket_t *TC) |
|
531 | 658 | { |
|
532 | 659 | time_management_regs->coarse_time_load = (TC->dataAndCRC[0] << 24) |
|
533 | 660 | + (TC->dataAndCRC[1] << 16) |
|
534 | 661 | + (TC->dataAndCRC[2] << 8) |
|
535 | 662 | + TC->dataAndCRC[3]; |
|
536 | 663 | //time_management_regs->ctrl = time_management_regs->ctrl | 1; |
|
537 | 664 | return 0; |
|
538 | 665 | } |
|
539 | 666 | |
|
540 | 667 | int send_tm_lfr_tc_exe_success(ccsdsTelecommandPacket_t *TC) |
|
541 | 668 | { |
|
542 | 669 | TMHeader_t TM_header; |
|
543 | 670 | char data[4]; |
|
544 | 671 | spw_ioctl_pkt_send spw_ioctl_send; |
|
545 | 672 | |
|
546 | 673 | TM_build_header( TM_LFR_TC_EXE_OK, TM_LEN_EXE, |
|
547 | 674 | time_management_regs->coarse_time, time_management_regs->fine_time, &TM_header); |
|
548 | 675 | |
|
549 | 676 | data[0] = TC->packetID[0]; |
|
550 | 677 | data[1] = TC->packetID[1]; |
|
551 | 678 | data[2] = TC->packetSequenceControl[0]; |
|
552 | 679 | data[3] = TC->packetSequenceControl[1]; |
|
553 | 680 | |
|
554 | 681 | // filling the structure for the spacewire transmission |
|
555 | 682 | spw_ioctl_send.hlen = TM_HEADER_LEN + 3; // + 4 is for the protocole extra header |
|
556 | 683 | spw_ioctl_send.hdr = (char*) &TM_header; |
|
557 | 684 | spw_ioctl_send.dlen = 3; |
|
558 | 685 | spw_ioctl_send.data = data; |
|
559 | 686 | |
|
560 | 687 | // SEND DATA |
|
561 | 688 | write_spw(&spw_ioctl_send); |
|
562 | 689 | |
|
563 | 690 | return 0; |
|
564 | 691 | } |
|
565 | 692 | |
|
566 | 693 | //*************************** |
|
567 | 694 | // Interrupt Service Routines |
|
568 | 695 | rtems_isr commutation_isr1( rtems_vector_number vector ) |
|
569 | 696 | { |
|
570 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) | |
|
697 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
571 | 698 | printf("In commutation_isr1 *** Error sending event to DUMB\n"); |
|
572 | 699 | } |
|
700 | } | |
|
573 | 701 | |
|
574 | 702 | rtems_isr commutation_isr2( rtems_vector_number vector ) |
|
575 | 703 | { |
|
576 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) | |
|
704 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
577 | 705 | printf("In commutation_isr2 *** Error sending event to DUMB\n"); |
|
578 | 706 | } |
|
707 | } | |
|
579 | 708 | |
|
580 | 709 | |
|
581 | 710 | |
|
582 | 711 |
@@ -1,176 +1,309 | |||
|
1 | 1 | #include <wf_handler.h> |
|
2 | 2 | |
|
3 | 3 | rtems_isr waveforms_isr( rtems_vector_number vector ) |
|
4 | 4 | { |
|
5 | if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) | |
|
5 | if ( (waveform_picker_regs->burst_enable & 0x7) == 0x0 ){// if no channel is enable | |
|
6 | if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 ) != RTEMS_SUCCESSFUL) { | |
|
7 | printf("In timecode_irq_handler *** Error sending event to DUMB\n"); | |
|
8 | } | |
|
9 | } | |
|
10 | else { | |
|
11 | if ( (waveform_picker_regs->status & 0x7) == 0x7 ){ // f2 f1 and f0 are full | |
|
12 | waveform_picker_regs->burst_enable = 0x00; | |
|
13 | if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
6 | 14 | printf("In waveforms_isr *** Error sending event to WFRM\n"); |
|
7 | 15 | } |
|
16 | } | |
|
17 | } | |
|
18 | } | |
|
8 | 19 | |
|
9 | rtems_task wfrm_task(rtems_task_argument argument) | |
|
20 | rtems_isr waveforms_simulator_isr( rtems_vector_number vector ) | |
|
10 | 21 | { |
|
11 | unsigned int length; | |
|
12 | unsigned int i = 0; | |
|
22 | if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) { | |
|
23 | printf("In waveforms_isr *** Error sending event to WFRM\n"); | |
|
24 | } | |
|
25 | } | |
|
26 | ||
|
27 | rtems_task wfrm_task(rtems_task_argument argument) //used with the waveform picker VHDL IP | |
|
28 | { | |
|
13 | 29 | spw_ioctl_pkt_send spw_ioctl_send; |
|
14 | 30 | rtems_event_set event_out; |
|
15 | gptimer_regs_t *gptimer_regs; | |
|
16 | gptimer_regs = (gptimer_regs_t *) REGS_ADDR_GPTIMER; | |
|
17 | 31 | ExtendedTMHeader_t header; |
|
18 | 32 | |
|
19 | 33 | header.targetLogicalAddress = CCSDS_DESTINATION_ID; |
|
20 | 34 | header.protocolIdentifier = CCSDS_PROTOCOLE_ID; |
|
21 | 35 | header.reserved = 0x00; |
|
22 | 36 | header.userApplication = CCSDS_USER_APP; |
|
23 | 37 | header.packetID[0] = 0x0c; |
|
24 | 38 | header.packetID[1] = 0xcc; |
|
25 | 39 | header.packetSequenceControl[0] = 0x00; |
|
26 | 40 | header.packetSequenceControl[1] = 0x00; |
|
27 | 41 | header.packetLength[0] = 0x00; |
|
28 | 42 | header.packetLength[1] = 0x00; |
|
29 | 43 | header.dataFieldHeader[0] = 0x10; |
|
30 |
header.dataFieldHeader[1] = |
|
|
31 |
header.dataFieldHeader[2] = |
|
|
44 | header.dataFieldHeader[1] = TM_TYPE_LFR_SCIENCE; // service type | |
|
45 | header.dataFieldHeader[2] = TM_SUBTYPE_LFR_SCIENCE; // service subtype | |
|
32 | 46 | header.dataFieldHeader[3] = CCSDS_DESTINATION_ID_GROUND; |
|
33 | 47 | |
|
34 | 48 | header.auxiliaryHeader[0] = 0x00; |
|
35 | 49 | header.auxiliaryHeader[1] = 0x1f; |
|
36 | 50 | header.auxiliaryHeader[2] = 0x07; // PKT_CNT |
|
37 | 51 | header.auxiliaryHeader[3] = 0x00; // PKT_NR |
|
38 | 52 | header.auxiliaryHeader[4] = 0x00; // BLK_NR MSB |
|
39 | 53 | header.auxiliaryHeader[5] = 0x00; // BLK_NR LSB |
|
40 | 54 | |
|
41 | 55 | // BUILD THE PACKET HEADER |
|
42 | 56 | spw_ioctl_send.hlen = TM_HEADER_LEN + 4 + 6; // + 4 is for the protocole extra header, + 6 is for the auxiliary header |
|
43 | 57 | spw_ioctl_send.hdr = (char*) &header; |
|
44 | 58 | |
|
59 | init_waveforms(); | |
|
60 | ||
|
45 | 61 |
PRINTF("in WFRM *** |
|
46 | 62 | |
|
47 | 63 | while(1){ |
|
64 | ||
|
48 | 65 | rtems_event_receive(RTEMS_EVENT_0, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an RTEMS_EVENT0 |
|
66 | PRINTF("in WFRM *** send wfrm\n") | |
|
49 | 67 | header.dataFieldHeader[4] = (unsigned char) (time_management_regs->coarse_time>>24); |
|
50 | 68 | header.dataFieldHeader[5] = (unsigned char) (time_management_regs->coarse_time>>16); |
|
51 | 69 | header.dataFieldHeader[6] = (unsigned char) (time_management_regs->coarse_time>>8); |
|
52 | 70 | header.dataFieldHeader[7] = (unsigned char) (time_management_regs->coarse_time); |
|
53 | 71 | header.dataFieldHeader[8] = (unsigned char) (time_management_regs->fine_time>>8); |
|
54 | 72 | header.dataFieldHeader[9] = (unsigned char) (time_management_regs->fine_time); |
|
55 | for (i=0; i<7; i++) // send F0 | |
|
56 | { | |
|
57 | header.auxiliaryHeader[3] = (unsigned char) i+1; // PKT_NR | |
|
58 | // BUILD THE DATA | |
|
59 | if (i==6) { | |
|
60 | spw_ioctl_send.dlen = 8 * NB_BYTES_SWF_BLK; | |
|
61 | length = TM_LEN_SCI_NORM_SWF_8; | |
|
62 | header.auxiliaryHeader[4] = 0x00; // BLK_NR MSB | |
|
63 | header.auxiliaryHeader[5] = 0x08; // BLK_NR LSB | |
|
64 | } | |
|
65 | else { | |
|
66 | spw_ioctl_send.dlen = 340 * NB_BYTES_SWF_BLK; | |
|
67 | length = TM_LEN_SCI_NORM_SWF_340; | |
|
68 | header.auxiliaryHeader[4] = 0x01; // BLK_NR MSB | |
|
69 | header.auxiliaryHeader[5] = 0x54; // BLK_NR LSB | |
|
70 | } | |
|
71 | spw_ioctl_send.data = (char*) &wf_snap_f0[i * 340 * NB_BYTES_SWF_BLK]; | |
|
72 | // BUILD THE HEADER | |
|
73 | header.packetLength[0] = (unsigned char) (length>>8); | |
|
74 | header.packetLength[1] = (unsigned char) (length); | |
|
75 | header.auxiliaryHeader[0] = SID_NORM_SWF_F0; // SID | |
|
76 | // SEND PACKET | |
|
77 | write_spw(&spw_ioctl_send); | |
|
78 | } | |
|
79 | for (i=0; i<7; i++) // send F1 | |
|
80 | { | |
|
81 | header.auxiliaryHeader[3] = (unsigned char) i+1; // PKT_NR | |
|
82 | // BUILD THE DATA | |
|
83 | if (i==6) { | |
|
84 | spw_ioctl_send.dlen = 8 * NB_BYTES_SWF_BLK; | |
|
85 | length = TM_LEN_SCI_NORM_SWF_8; | |
|
86 | header.auxiliaryHeader[4] = 0x00; // BLK_NR MSB | |
|
87 | header.auxiliaryHeader[5] = 0x08; // BLK_NR LSB | |
|
88 | } | |
|
89 | else { | |
|
90 | spw_ioctl_send.dlen = 340 * NB_BYTES_SWF_BLK; | |
|
91 | length = TM_LEN_SCI_NORM_SWF_340; | |
|
92 | header.auxiliaryHeader[4] = 0x01; // BLK_NR MSB | |
|
93 | header.auxiliaryHeader[5] = 0x54; // BLK_NR LSB | |
|
94 | } | |
|
95 | spw_ioctl_send.data = (char*) &wf_snap_f1[i * 340 * NB_BYTES_SWF_BLK]; | |
|
96 | // BUILD THE HEADER | |
|
97 | header.packetLength[0] = (unsigned char) (length>>8); | |
|
98 | header.packetLength[1] = (unsigned char) (length); | |
|
99 | header.auxiliaryHeader[0] = SID_NORM_SWF_F1; // SID | |
|
100 | // SEND PACKET | |
|
101 | write_spw(&spw_ioctl_send); | |
|
102 | } | |
|
103 | for (i=0; i<7; i++) // send F2 | |
|
104 | { | |
|
105 | header.auxiliaryHeader[3] = (unsigned char) i+1; // PKT_NR | |
|
106 | // BUILD THE DATA | |
|
107 | if (i==6) { | |
|
108 | spw_ioctl_send.dlen = 8 * NB_BYTES_SWF_BLK; | |
|
109 | length = TM_LEN_SCI_NORM_SWF_8; | |
|
110 | header.auxiliaryHeader[4] = 0x00; // BLK_NR MSB | |
|
111 | header.auxiliaryHeader[5] = 0x08; // BLK_NR LSB | |
|
112 | } | |
|
113 | else { | |
|
114 | spw_ioctl_send.dlen = 340 * NB_BYTES_SWF_BLK; | |
|
115 | length = TM_LEN_SCI_NORM_SWF_340; | |
|
116 | header.auxiliaryHeader[4] = 0x01; // BLK_NR MSB | |
|
117 | header.auxiliaryHeader[5] = 0x54; // BLK_NR LSB | |
|
118 | } | |
|
119 | spw_ioctl_send.data = (char*) &wf_snap_f2[i * 340 * NB_BYTES_SWF_BLK]; | |
|
120 | // BUILD THE HEADER | |
|
121 | header.packetLength[0] = (unsigned char) (length>>8); | |
|
122 | header.packetLength[1] = (unsigned char) (length); | |
|
123 | header.auxiliaryHeader[0] = SID_NORM_SWF_F2; // SID | |
|
124 | // SEND PACKET | |
|
125 | write_spw(&spw_ioctl_send); | |
|
126 | } | |
|
73 | ||
|
74 | //*************** | |
|
75 | // send snapshots | |
|
76 | // F0 | |
|
77 | send_waveform( &header, wf_snap_f0, SID_NORM_SWF_F0, &spw_ioctl_send); | |
|
78 | // F1 | |
|
79 | send_waveform( &header, wf_snap_f1, SID_NORM_SWF_F1, &spw_ioctl_send); | |
|
80 | // F2 | |
|
81 | send_waveform( &header, wf_snap_f2, SID_NORM_SWF_F2, &spw_ioctl_send); | |
|
82 | ||
|
83 | #ifdef GSA | |
|
127 | 84 | // irq processed, reset the related register of the timer unit |
|
128 | 85 | gptimer_regs->timer[2].ctrl = gptimer_regs->timer[2].ctrl | 0x00000010; |
|
86 | #else | |
|
87 | // irq processed, reset the related register of the waveform picker | |
|
88 | waveform_picker_regs->status = 0x00; | |
|
89 | waveform_picker_regs->burst_enable = 0x07; | |
|
90 | #endif | |
|
91 | ||
|
129 | 92 | } |
|
130 | 93 | } |
|
131 | 94 | |
|
132 | 95 | //****************** |
|
133 | 96 | // general functions |
|
134 | void init_waveforms() | |
|
97 | void init_waveforms( void ) | |
|
98 | { | |
|
99 | int i = 0; | |
|
100 | int aux1 = 0; | |
|
101 | int aux2 = 0; | |
|
102 | int val1 = 0; | |
|
103 | int val2 = 0; | |
|
104 | int val3 = 0; | |
|
105 | int val4 = 0; | |
|
106 | int amplitude1 = pow(2, 10); | |
|
107 | static int delta_phi = 0; | |
|
108 | ||
|
109 | for (i=0; i< NB_SAMPLES_PER_SNAPSHOT; i++) | |
|
110 | { | |
|
111 | aux1 = (int) (amplitude1 * cos((2*pi*i)/2048 + (delta_phi*pi)/180)); | |
|
112 | aux2 = (int) (amplitude1 * sin((2*pi*i)/2048 + (delta_phi*pi)/180)); | |
|
113 | val1 = build_value(aux1, aux2); | |
|
114 | val2 = build_value(i, 2*i); | |
|
115 | val3 = build_value(-aux1, -aux2); | |
|
116 | val4 = build_value(-i, -2*i); | |
|
117 | //*** | |
|
118 | // F0 | |
|
119 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET ] = 0x88887777; // | |
|
120 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET ] = 0x22221111; // | |
|
121 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET ] = 0x44443333; // | |
|
122 | ||
|
123 | //*** | |
|
124 | // F1 | |
|
125 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET ] = val1; | |
|
126 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET ] = val2; | |
|
127 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET ] = 0xaaaa0000; | |
|
128 | ||
|
129 | //*** | |
|
130 | // F2 | |
|
131 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET ] = val1; | |
|
132 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET ] = val2; | |
|
133 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET ] = 0xaaaa0000; | |
|
134 | ||
|
135 | //*** | |
|
136 | // F3 | |
|
137 | //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 0 ] = val1; | |
|
138 | //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 1 ] = val2; | |
|
139 | //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 2 ] = 0xaaaa0000; | |
|
140 | } | |
|
141 | ||
|
142 | delta_phi = delta_phi + 10; | |
|
143 | ||
|
144 | } | |
|
145 | ||
|
146 | void init_waveform_header( ExtendedTMHeader_t * header, unsigned int sid ) | |
|
147 | { | |
|
148 | ||
|
149 | header->targetLogicalAddress = CCSDS_DESTINATION_ID; | |
|
150 | header->protocolIdentifier = CCSDS_PROTOCOLE_ID; | |
|
151 | header->reserved = 0x00; | |
|
152 | header->userApplication = CCSDS_USER_APP; | |
|
153 | header->packetID[0] = 0x0c; | |
|
154 | header->packetID[1] = 0xcc; | |
|
155 | header->packetSequenceControl[0] = 0x00; | |
|
156 | header->packetSequenceControl[1] = 0x00; | |
|
157 | header->packetLength[0] = 0x00; | |
|
158 | header->packetLength[1] = 0x00; | |
|
159 | header->dataFieldHeader[0] = 0x10; | |
|
160 | header->dataFieldHeader[1] = TM_TYPE_LFR_SCIENCE; // service type | |
|
161 | header->dataFieldHeader[2] = TM_SUBTYPE_LFR_SCIENCE; // service subtype | |
|
162 | header->dataFieldHeader[3] = CCSDS_DESTINATION_ID_GROUND; | |
|
163 | ||
|
164 | header->auxiliaryHeader[0] = sid; | |
|
165 | header->auxiliaryHeader[1] = 0x1f; | |
|
166 | header->auxiliaryHeader[2] = 0x07; // PKT_CNT | |
|
167 | header->auxiliaryHeader[3] = 0x00; // PKT_NR | |
|
168 | header->auxiliaryHeader[4] = 0x00; // BLK_NR MSB | |
|
169 | header->auxiliaryHeader[5] = 0x00; // BLK_NR LSB | |
|
170 | } | |
|
171 | ||
|
172 | void reset_waveforms( void ) | |
|
135 | 173 | { |
|
136 | 174 | int i = 0; |
|
137 | 175 | |
|
138 | 176 | for (i=0; i< NB_SAMPLES_PER_SNAPSHOT; i++) |
|
139 | 177 | { |
|
140 |
wf_snap_f0[ i* NB_WORDS_SWF_BLK + 0 ] = |
|
|
141 |
wf_snap_f0[ i* NB_WORDS_SWF_BLK + 1 ] = |
|
|
142 |
wf_snap_f0[ i* NB_WORDS_SWF_BLK + 2 ] = |
|
|
143 | wf_snap_f1[ i* NB_WORDS_SWF_BLK + 0 ] = buil_value( i, 2*i ); // v and 1 | |
|
144 | wf_snap_f1[ i* NB_WORDS_SWF_BLK + 1 ] = buil_value( i, 2*i ); // e2 and b1 | |
|
145 | wf_snap_f1[ i* NB_WORDS_SWF_BLK + 2 ] = buil_value( i, 2*i ); // b2 and b3 | |
|
146 |
wf_snap_f |
|
|
147 |
wf_snap_f |
|
|
148 |
wf_snap_f |
|
|
149 | wf_cont_f3[ i* NB_WORDS_SWF_BLK + 0 ] = buil_value( i, 2*i ); // v and 1 | |
|
150 | wf_cont_f3[ i* NB_WORDS_SWF_BLK + 1 ] = buil_value( i, 2*i ); // e2 and b1 | |
|
151 | wf_cont_f3[ i* NB_WORDS_SWF_BLK + 2 ] = buil_value( i, 2*i ); // b2 and b3 | |
|
178 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x10002000; | |
|
179 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0x20001000; | |
|
180 | wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x40008000; | |
|
181 | ||
|
182 | //*** | |
|
183 | // F1 | |
|
184 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x1000f000; | |
|
185 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0xf0001000; | |
|
186 | wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x40008000; | |
|
187 | ||
|
188 | //*** | |
|
189 | // F2 | |
|
190 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x40008000; | |
|
191 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0x20001000; | |
|
192 | wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x10002000; | |
|
193 | ||
|
194 | //*** | |
|
195 | // F3 | |
|
196 | /*wf_cont_f3[ i* NB_WORDS_SWF_BLK + 0 ] = build_value( i, i ); // v and 1 | |
|
197 | wf_cont_f3[ i* NB_WORDS_SWF_BLK + 1 ] = build_value( i, i ); // e2 and b1 | |
|
198 | wf_cont_f3[ i* NB_WORDS_SWF_BLK + 2 ] = build_value( i, i ); // b2 and b3*/ | |
|
152 | 199 | } |
|
153 | 200 | } |
|
154 | 201 | |
|
155 | int buil_value(int value1, int value0) | |
|
202 | void send_waveform( ExtendedTMHeader_t *header, volatile int *waveform, | |
|
203 | unsigned int sid, spw_ioctl_pkt_send *spw_ioctl_send) | |
|
204 | { | |
|
205 | unsigned int i = 0; | |
|
206 | unsigned int length = 0; | |
|
207 | rtems_status_code status; | |
|
208 | ||
|
209 | for (i=0; i<7; i++) // send waveform | |
|
210 | { | |
|
211 | header->auxiliaryHeader[3] = (unsigned char) i+1; // PKT_NR | |
|
212 | // BUILD THE DATA | |
|
213 | if (i==6) { | |
|
214 | spw_ioctl_send->dlen = 8 * NB_BYTES_SWF_BLK; | |
|
215 | length = TM_LEN_SCI_NORM_SWF_8; | |
|
216 | header->auxiliaryHeader[4] = 0x00; // BLK_NR MSB | |
|
217 | header->auxiliaryHeader[5] = 0x08; // BLK_NR LSB | |
|
218 | } | |
|
219 | else { | |
|
220 | spw_ioctl_send->dlen = 340 * NB_BYTES_SWF_BLK; | |
|
221 | length = TM_LEN_SCI_NORM_SWF_340; | |
|
222 | header->auxiliaryHeader[4] = 0x01; // BLK_NR MSB | |
|
223 | header->auxiliaryHeader[5] = 0x54; // BLK_NR LSB | |
|
224 | } | |
|
225 | if (sid == SID_NORM_SWF_F0) { | |
|
226 | spw_ioctl_send->data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) + (1 * TIME_OFFSET) ]; | |
|
227 | } | |
|
228 | else if (sid == SID_NORM_SWF_F1) { | |
|
229 | spw_ioctl_send->data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) + (1 * TIME_OFFSET) ]; | |
|
230 | } | |
|
231 | else if (sid == SID_NORM_SWF_F2) { | |
|
232 | spw_ioctl_send->data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) + (0 * TIME_OFFSET) ]; | |
|
233 | } | |
|
234 | else { | |
|
235 | spw_ioctl_send->data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) ]; | |
|
236 | } | |
|
237 | // BUILD THE HEADER | |
|
238 | header->packetLength[0] = (unsigned char) (length>>8); | |
|
239 | header->packetLength[1] = (unsigned char) (length); | |
|
240 | header->auxiliaryHeader[0] = sid; // SID | |
|
241 | // SEND PACKET | |
|
242 | status = write_spw(spw_ioctl_send); | |
|
243 | if (status != RTEMS_SUCCESSFUL) { | |
|
244 | while (true) { | |
|
245 | if (status != RTEMS_SUCCESSFUL) { | |
|
246 | status = write_spw(spw_ioctl_send); | |
|
247 | //PRINTF1("%d", i) | |
|
248 | sched_yield(); | |
|
249 | } | |
|
250 | else { | |
|
251 | //PRINTF("\n") | |
|
252 | break; | |
|
253 | } | |
|
254 | } | |
|
255 | } | |
|
256 | } | |
|
257 | } | |
|
258 | ||
|
259 | int build_value(int value1, int value0) | |
|
156 | 260 | { |
|
157 | 261 | int aux = 0; |
|
158 | 262 | int aux1 = 0; |
|
159 | 263 | int aux0 = 0; |
|
264 | int value1_aux = 0; | |
|
265 | int value0_aux = 0; | |
|
266 | ||
|
267 | value1_aux = value1; | |
|
268 | value0_aux = value0; | |
|
269 | ||
|
160 | 270 | //****** |
|
161 | 271 | // B3 B2 |
|
162 | aux1 = ( (int) ( (char) (value1 >> 8) ) << 8 ) | |
|
163 | + ( (int) ( (char) (value1 ) ) ); | |
|
272 | if (value1_aux > 8191) value1_aux = 8191; | |
|
273 | if (value1_aux < -8192) value1_aux = -8192; | |
|
274 | aux1 = ( (int) ( ( (unsigned char) (value1_aux / 256 ) ) << 8 ) ) | |
|
275 | + ( (int) ( (unsigned char) (value1_aux ) ) ); | |
|
164 | 276 | |
|
165 | 277 | //****** |
|
166 | 278 | // B1 B0 |
|
167 | aux0 = ( (int) ( (char) (value0 >> 8) ) << 8 ) | |
|
168 | + ( (int) ( (char) (value0 ) ) ); | |
|
279 | if (value0_aux > 8191) value0_aux = 8191; | |
|
280 | if (value0_aux < -8192) value0_aux = -8192; | |
|
281 | aux0 = ( (int) ( ( (unsigned char) (value0_aux / 256) ) << 8 ) ) | |
|
282 | + ( (int) ( (unsigned char) (value0_aux ) ) ); | |
|
169 | 283 | |
|
170 | 284 | aux = (aux1 << 16) + aux0; |
|
171 | 285 | |
|
172 | 286 | return aux; |
|
173 | 287 | } |
|
174 | 288 | |
|
289 | void init_waveform_picker_regs() | |
|
290 | { // 1 1 0 0 0 BW = 0 => BIAS_WORKS | |
|
291 | waveform_picker_regs->data_shaping = 0x18; // R1 R0 SP1 SP0 BW | |
|
292 | waveform_picker_regs->burst_enable = 0x00; // burst f2, f1, f0 enable f3, f2, f1, f0 | |
|
293 | waveform_picker_regs->addr_data_f0 = (int) (wf_snap_f0); // | |
|
294 | waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1); // | |
|
295 | waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2); // | |
|
296 | waveform_picker_regs->addr_data_f3 = (int) (wf_cont_f3); // | |
|
297 | waveform_picker_regs->status = 0x00; // | |
|
298 | waveform_picker_regs->delta_snapshot = 0x5; // max 2 bytes | |
|
299 | waveform_picker_regs->delta_f2_f1 = 0xffff; // max 4 bytes | |
|
300 | waveform_picker_regs->delta_f2_f0 = 0x17c00; // max 5 bytes | |
|
301 | waveform_picker_regs->nb_burst_available = 0x180; // max 3 bytes, size of the buffer in burst (1 burst = 16 x 4 octets) | |
|
302 | waveform_picker_regs->nb_snapshot_param = 0x7ff; // max 3 octets, 2048 - 1 | |
|
303 | //waveform_picker_regs->delta_snapshot = 0x2; // max 2 bytes, = period / 2 | |
|
304 | //waveform_picker_regs->delta_f2_f1 = 0x2d00; // max 4 bytes | |
|
305 | //waveform_picker_regs->delta_f2_f0 = 0x2f80; // max 5 bytes | |
|
306 | //waveform_picker_regs->nb_burst_available = 0x30; // max 3 bytes, size of the buffer in burst (1 burst = 16 x 4 octets) | |
|
307 | //waveform_picker_regs->nb_snapshot_param = 0xff; // max 3 octets, 256 - 1 | |
|
308 | } | |
|
175 | 309 | |
|
176 |
General Comments 0
You need to be logged in to leave comments.
Login now