source: Sophya/trunk/Poubelle/archTOI.old/archeops_25.h@ 2939

Last change on this file since 2939 was 342, checked in by ansari, 26 years ago

archtoi 2 aout 99
File size: 33.3 KB
Line 
1
2/*======================================================================*/
3/* */
4/* archeops.h : structure de données */
5/* */
6/*======================================================================*/
7
8#define _archeops
9#define version_num 25
10
11
12/*======================================================================*/
13/* */
14/* historique des modifications */
15/* */
16/* */
17/* VERSION 24: */
18/* */
19/* - utilise le fichier archeops.c */
20/* - nb_max_bolo=24 avec nb_bolo_util=18 */
21/* - change la structure du block param */
22/* - change la structure du block dilution */
23/* */
24/* VERSION 25: */
25/* */
26/* - la compression marche */
27/* - 4 signaux synchro O.K. */
28/* - change la structure dil : contient les temperatures */
29/* */
30/* */
31/*======================================================================*/
32
33
34/*======================================================================*/
35/* --------------- parametres generaux de definition ------------- */
36/*======================================================================*/
37
38#ifndef int4
39#ifdef __alpha
40#define int4 int
41#undef programme
42#else
43#define int4 long
44#endif
45#endif
46
47#ifdef linux
48#undef programme
49#endif
50
51#ifdef _planck
52#define _archeops
53#define _trapani
54#define _sans_transputer
55#endif
56
57#ifdef _archeops
58/*#define _test_diabolo relecture des blocks fabriques avec diabolo */
59#define _trapani /* configuration prevue pour Trapani */
60/*#define _kiruna block standard prevu pour kiruna */
61#endif
62
63
64
65/*======================================================================*/
66/* -------------- valeurs des parametres dans ------------- */
67/* -------------- les différentes configurations ------------- */
68/*======================================================================*/
69/* */
70/* configuration pour Trapani : 3 bebos / 12 bolos */
71/* */
72/* bebo1 : voies 1 à 6 --> bolo 1 a 6 */
73/* bebo2 : voies 9 à 14 --> bolo 7 à 12 */
74/* */
75/* bebo6 : */
76/* voies 41 42 43 44 = carte simplifiee avec AMP01 */
77/* voies 45 et 46 = chauffage pour regulation */
78/* on ecrira plus tard le stockage des donnees simplifiees */
79/* */
80/* */
81/*======================================================================*/
82
83/* nb_per_block doit etre divisible par 2 */
84/* nb_max_bolo doit etre divisible par 2 pour archeops (impair pour diabolo ?? ) */
85/* nb_bolo_util doit etre divisible par 2 pour archeops (impair pour diabolo ?? ) */
86
87
88#ifdef _trapani
89#define nb_max_bolo 24 /* nombre maxi de bolos */
90#define nb_bolo_util 18 /* nombre de bolos réellement transmis */
91#define nb_per_block 36 /* nombre de periodes entieres dans un block */
92#define nb_max_mes_per 88 /* nb de points maxi dans une periode complete */
93#define nb_photo_diodes 46 /* nb de canaux de mesure du senseur stellaire */
94#endif
95
96#ifdef _kiruna
97#define nb_max_bolo 36 /* nombre maxi de bolos */
98#define nb_bolo_util 32 /* nombre de bolos réellement transmis */
99#define nb_per_block 36 /* nombre de periodes entieres dans un block */
100#define nb_max_mes_per 88 /* nb de points maxi dans une periode complete */
101#define nb_photo_diodes 46 /* nb de canaux de mesure du senseur stellaire */
102#endif
103
104
105#ifdef _diabolo
106#define nb_max_bolo 9 /* nombre maxi de bolos */
107#define nb_bolo_util 9 /* nombre de bolos réellement transmis */
108#define nb_per_block 20 /* nombre de periodes entieres dans un block */
109#define nb_max_mes_per 128 /* nb de points maxi dans une periode complete */
110#define nb_photo_diodes 0 /* nb de canaux de mesure du senseur stellaire */
111#endif
112
113#ifdef _test_diabolo
114#define nb_max_bolo 9 /* nombre maxi de bolos */
115#define nb_bolo_util 9 /* nombre de bolos réellement transmis */
116#define nb_per_block 20 /* nombre de periodes entieres dans un block */
117#define nb_max_mes_per 128 /* nb de points maxi dans une periode complete */
118#define nb_photo_diodes 0 /* nb de canaux de mesure du senseur stellaire */
119#endif
120
121
122#ifdef _sans_transputer
123#define nb_byte_mot 5 /* nombre d'octets dans un mot d'acquisition planck */
124#else
125#define nb_byte_mot 8 /* nombre d'octets dans un mot d'acquisition archeops */
126#endif
127
128#define nb_sync 4 /* nombre de signaux de synchro */
129 /* 6 pour diabolo */
130 /* toujours multiple de 4 pour archeops */
131#define nb_element_catalog 256 /* nombre d'éléments catalog par reponse enregistreur */
132
133
134#ifdef transmet_data_brute
135#define taille_maxi_block_archeops sizeof(block_type_data_brute)
136#else /* le plus gros des différents blocks de télémesure*/
137#define taille_maxi_block_archeops sizeof(block_type_bolo)
138#endif
139
140#define nombre_de_regul 4
141#define nombre_de_voies 6
142#define nb_type_blocks 20 /* nombre de type de blocks (multiple de 4) */
143
144
145/*======================================================================*/
146/* ------- codes de controle pour la transmission ----- */
147/*======================= télécommande ==========================*/
148/*======================================================================*/
149
150
151/* -------------- codes de reconnaissance des paquets de télécommande -------------- */
152
153#define debut_telecommande 0x23456789
154#define fin_telecommande 0x98765432
155
156/* ------------ codes de direction des commandes envoyées a l'EPLD Archeops -------------- */
157
158#define tc_dir_transputer 1
159#define tc_dir_reset_epld 3
160
161/* ------------- codes des prefix des telecommandes traités le transputer -------------- */
162
163#define tc_horloge 255 /* (-1) */
164#define tc_cadence1 128
165#define tc_cadence2 129
166#define tc_cadence3 130
167#define tc_regul 251 /* (-5) */
168#define tc_switch_dil 250
169#define tc_dac_dil 249
170
171/*======================================================================*/
172/* telecommande reduite sur 18 bit */
173/*======================================================================*/
174
175/*______________________________________________________________________________________________*/
176/* 1er mot : code de debut de telecommande reduite */
177#define tc_reduite 248
178/*______________________________________________________________________________________________*/
179/* 2eme mot: 4bit: 16 codes de direction tc2 */
180enum{tc2_reset_epld,tc2_bolo_dacV,tc2_bolo_dacI,tc2_bolo_dacT
181 ,tc2_bolo_dacL,tc2_bolo_gain,tc2_bolo_voie,tc2_horloge
182 ,tc2_regul,tc2_auto_bolo,tc2_auto_dilu,tc2_dilution}; /* 12 codes: reste 4 disponibles*/
183
184
185/*______________________________________________________________________________________________*/
186/* 3eme mot: 6bit: */
187
188/* code2=dac-gain-voie : numero de bolo */
189
190/* code2=tc2_horloge : */
191/* soit un code defini */
192/* soit le code tc3_vitesse+i avec i=0.. nb_type_block */
193enum{tc3_commande,tc3_periode,tc3_nb_mesures,tc3_temp_mort,tc3_flag,tc3_vitesse};
194/*#define tc3_suite tc3_vitesse+nb_type_block */
195
196
197/* code2=tc2_regul : */
198
199
200/* code2=tc2_auto_bolo : */
201
202
203/* code2=tc2_auto_dilu : */
204/* les valeurs des parametres d'auto_dilu ne depassent pas 128 */
205
206
207/* code2=tc2_dilution : */
208
209
210/*______________________________________________________________________________*/
211/* 4eme mot: 8bit: valeur a ecrire */
212
213
214/*======================================================================*/
215/* ------- codes de controle pour la transmission ----- */
216/*========================= télémesure ============================*/
217/*======================================================================*/
218
219/* ------- codes de reconnaissance des paquets de télémesure */
220
221#define debut_block_mesure ((int4)0x45627491)
222#define fin_block_mesure ((int4)0x83260432)
223
224
225
226
227
228/*======================================================================*/
229/* ------------------------------------------------------------------ */
230/* --------- Les formats des blocks type ARCHEOPS ------- */
231/* ------------------------------------------------------------------ */
232/*======================================================================*/
233
234
235
236/*==============================================================================================*/
237
238/* Le tableau est lut dans le desordre par le mac en lecture de la carte pci : */
239
240/* Les entiers long sont ecrits tels quels */
241/* Les short sont ecrits permuté 2 a 2 par le tansputer */
242/* Les tables char sont ecrits permuté 4 / 4 par le transputer */
243/* A la lecture dans le mac, tout est bon */
244
245
246/* --------- structures N° 0 : parametres de mesure des bolometres ------------- */
247/* ----------------------------------------------------------------------------------------- */
248
249typedef struct
250 {
251 char bolo_nom[32]; /* le nom de chaque bolometre */
252 int4 bolo_code_util; /* le code d'utilisation du bolo */
253 int4 bolo_bebo; /* le type d'acquisition: 0 pour MLPA 10 pour BEBODIFF */
254 int4 bolo_num; /* l'adresse hard du bolo */
255 int4 bolo_gain; /* le gain du preampli */
256 int4 bolo_capa; /* la valeur capa du modulateur */
257 int4 bolo_diviseur; /* le diviseur de la compensation */
258 int4 coef[7]; /* les coef pour le calcul de la température */
259 }
260 param_un_bolo;
261/* code_util des bolos */
262enum{bolo_hors_service,bolo_normal_transmis,bolo_normal_non_transmis,bolo_thermo_simplifie};
263
264
265typedef struct /* table des parametres de mesure bolometre */
266 /* cette table ne change pas (en principe) en cours de mesure */
267 {
268 int4 numero_version; /* numero de version du header archeops.h */
269 int4 n_max_bolo; /* nombre maxi de bolos (divisible par 4) */
270 int4 n_per_block; /* nombre de periodes entieres dans un block */
271 int4 n_max_mes_per; /* nb de points maxi dans une periode complete */
272
273 int4 nb_bolo; /* nombre de bolometres effectivement lut */
274 param_un_bolo bolo[nb_max_bolo];
275 }
276 param_bolo;
277
278
279
280
281/*
282 long bolo_code_util[nb_max_bolo];
283 char bolo_nom[nb_max_bolo][32];
284
285 long bolo_bebo[nb_max_bolo];
286 long bolo_num[nb_max_bolo];
287 long bolo_gain[nb_max_bolo];
288
289 long bolo_capa[nb_max_bolo];
290 long bolo_diviseur[nb_max_bolo];
291
292 long coef[nb_max_bolo][7];
293
294 long presence_bebo;
295 }
296 param_bolo;
297*/
298
299typedef struct /* La structure de transfert transputer vers mac */
300 {
301 int4 debut; /* code de reconnaissance de debut de block */
302 int4 code1; /* code1 du block */
303 int4 code2; /* code2 du block */
304
305 param_bolo param; /* les parametres de mesure des bolometres */
306
307 int4 fin; /* code de reconnaissance de fin de block */
308 }
309 block_type_param;
310
311
312
313
314/* ------------------- structures N° 1 : journal de bord --------------------- */
315/* ----------------------------------------------------------------------------------------- */
316#define long_page 10
317typedef struct
318 {
319 int4 code2; /* code de la ligne du journal */
320 /* code idem code2 debut de block : */
321 /* contient un code de commande */
322 /* et le numero du block lors de la télécommande */
323 char mot[8]; /* contenu de la ligne du journal */
324 }
325 ligne_journal;
326
327
328typedef struct
329 {
330 int4 debut; /* code de reconnaissance de debut de block */
331 int4 code1; /* code1 du block */
332 int4 code2; /* code2 du block */
333
334 ligne_journal jj[long_page]; /* block de 10 lignes de journal */
335
336 int4 fin; /* code de reconnaissance de fin de block */
337 }
338 block_type_journal;
339
340
341/* --------- structures N° 2 : reglage_bolo , regul etc.. -------- */
342/* ------------------------------------------------------------------------------------------ */
343#define bol_micro_volt(val,gain) ((1e7*(double)val)/(65536.*gain))
344/* avec gain = (double)parametr.bolo[bolo].bolo_gain*gain_ampli(reglage.bolo[bolo]) */
345
346
347/* gains 0 .. 15 pour MLPA /// gain 16..19 pour BEBO /// gain 20..22 pour BEDIF */
348#define def_gains double gains_reels[32]={1,2,4,8,10,20,40,80,100,200,400,800,1000,2000,4000,8000,0.5,2.5,10,50,0.93,3.777,18.974};
349 /* gain bediff 10->9.3 40->37.77 200->189.74 */
350
351
352/* les definitions suivantes s'appliquent a une variable de type reglage.bolo[bol] */
353#define gainbrut(aa) ((char)(((aa).mot1&0x1f)))
354#define gain_ampli(aa) gains_reels[gainbrut(aa)]
355#define phase(aa) ((char)(((aa).mot1&0x60)>>5))
356#define comm(aa) ((char)(((aa).mot1&0x80)>>7))
357#define dac_V(aa) ((int)(((aa).mot1&0xfff00)>>8) )
358#define dac_I(aa) ((int)(((aa).mot1&0xfff00000)>>20))
359
360#define voie(aa) ((char)(((aa).mot2&0xff)))
361#define dac_T(aa) ((int)(((aa).mot2&0xfff00)>>8))
362#define dac_L(aa) ((int)(((aa).mot2&0xfff00000)>>20))
363
364/*
365#define bolo_mot1(dacV,dacI,gainbrut,phase,comm) ((gainbrut)&0x1f) | (((phase)&3)<<5) | (((comm)&1)<<7) | (((dacV)&0xfff)<<8) | (((dacI)&0xfff)<<20)
366#define bolo_mot2(dacT,dacL,voie) ((voie)&0xff) | (((dacT)&0xfff)<<8) | (((dacL)&0xfff)<<20)
367*/
368
369#define bolo_mot1(dacV,dacI,gainbrut,phase,comm) (((long)(gainbrut))&0x1f) | ((((long)(phase))&3)<<5) | ((((long)(comm))&1)<<7) | ((((long)(dacV))&0xfff)<<8) | ((((long)(dacI))&0xfff)<<20)
370#define bolo_mot2(dacT,dacL,voie) (((long)(voie))&0xff) | ((((long)(dacT))&0xfff)<<8) | ((((long)(dacL))&0xfff)<<20)
371
372
373typedef struct
374 {
375 int4 mot1; /* dac1 = mot[11..0]; dac2=mot1[23..12] */
376 /* gain = mot1[27..24]; phase = mot1[31..28]; */
377 int4 mot2; /* dac3 = mot[11..0]; dac4=mot1[23..12] */
378 /* voie pour reglages auto = mot2[31..24]; */
379 }
380 reglage_un_bolo;
381
382
383
384#ifdef programme /*********** structure normale pour le mac ****************/
385
386typedef struct
387 {
388 char periode;
389 char nb_mesures;
390 char temp_mort;
391 char flag;
392 }
393 horloge;
394
395typedef struct
396 {
397 char mode; /* on_off et deglitch */
398 char num_bolo; /* numero du bolo utilisé, */
399 char voie_chauf; /* la voie de sortie chauffage */
400 char prop; /* zero dans prop -> chauffage=0; */
401 char integ;
402 char deriv;
403 short chauffage; /* valeur effective du chauffage */
404 }
405 regul_bolo; /* longueur 2 entiers long */
406
407typedef struct
408 {
409 char mode;
410 char gain;
411 char courant;
412 char delai;
413 }
414 auto_bolo; /* longueur 1 entiers long */
415
416typedef struct
417 {
418 char vanne;
419 char helium;
420 char chauffage;
421 char piles;
422 char transmission;
423 char temps_max_vanne;
424 char xx7;
425 char xx8;
426 }
427 auto_dilu; /* longueur 1 entiers long */
428
429
430
431#else /*********** structure swappée pour le transputer ****************/
432
433typedef struct
434 {
435 char flag;
436 char temp_mort;
437 char nb_mesures;
438 char periode;
439 }
440 horloge;
441
442
443typedef struct
444 {
445 char prop; /* zero dans prop -> chauffage=0; */
446 char voie_chauf; /* la voie de sortie chauffage */
447 char num_bolo; /* numero du bolo utilisé, */
448 char mode; /* on_off et deglitch */
449 short chauffage; /* valeur effective du chauffage */
450 char deriv;
451 char integ;
452 }
453 regul_bolo; /* longueur 2 entiers long */
454
455
456typedef struct
457 {
458 char delai;
459 char courant;
460 char gain;
461 char mode;
462 }
463 auto_bolo; /* longueur 1 entiers long */
464
465typedef struct
466 {
467 char piles;
468 char chauffage;
469 char helium; /* periode de mesure */
470 char vanne;
471 char xx8;
472 char xx7;
473 char temps_max_vanne;
474 char transmission;
475 }
476 auto_dilu; /* longueur 1 entiers long */
477
478
479#endif /*********** fin des structures swappées ****************/
480
481enum{regul_stop,regul_chauffage_null,regul_sans_deglitch,regul_avec_deglitch};
482
483#define bit_piles_5V 1
484#define bit_piles_15V 2
485#define bit_piles_auto 4
486
487enum{vanne_zero,vanne_rien,vanne_ferme,vanne_ouvre,vanne_auto_pression,vanne_auto_pression_piles,vanne_auto_pression_piles_temps};
488enum{trans_zero,trans_rien,trans_normal,trans_rapide,trans_lent};
489enum{helium_zero,helium_continu,helium_40s,helium_400s};
490
491
492typedef struct /* long en mot de 32 bit */
493 {
494 horloge horloge; /* 1 */
495 char vitesse[nb_type_blocks]; /* 5 */
496 reglage_un_bolo bolo[nb_max_bolo]; /* 18 * 2 = 36 */
497 auto_bolo autom[nombre_de_voies]; /* 6 * 1 6 */
498 regul_bolo regul[nombre_de_regul]; /* 4 * 2 = 8 */
499 auto_dilu dilu; /* 2 */
500 }
501 reglage_bolo; /* total 58 */
502
503
504typedef struct
505 {
506 int4 debut; /* code de reconnaissance de debut de block */
507 int4 code1; /* code1 du block */
508 int4 code2; /* code2 du block */
509 reglage_bolo reglage;
510 int4 fin; /* code de reconnaissance de fin de block */
511 }
512 block_type_reglage;
513
514/* --------------------- structures N° 3 : etat de la dilution ----------------------- */
515/* ------------------------------------------------------------------------------------------- */
516typedef struct
517 {
518 int4 debut; /* code de reconnaissance de debut de block */
519 int4 code1; /* code1 du block */
520 int4 code2; /* code2 du block */
521 int4 switch_dil;
522 int4 ADC_dil[48]; /* la lecture des 48 ADC de la carte DIL */
523 int4 DAC_dil[4]; /* les 4 dac de la carte dilution */
524 int4 DAC_sst[4]; /* les 4 dac de la carte sst */
525 int4 temperature[4]; /* valeurs lues sur cartes BEDIFF modifiees */
526/* int4 gyro_dil[3][nb_per_block*2]; les gyros (block gyros) */
527/* int4 data_dil[50]; data brutes de la dilution */
528 int4 fin; /* code de reconnaissance de fin de block */
529 }
530 block_type_dilution;
531
532
533/* signification des bit lus dans switch_dil */
534#define switch_EVF 0x00000080 /* contact fin de course vanne fermee */
535#define switch_EVO 0x00000040 /* contact fin de course vanne ouverte */
536
537/* les bit suivants sont envoyés par telecommande et relus dans switch_dil */
538#define switch_helium 0x00200000 /* 13: commande sond niveau helium */
539#define switch_pile_par_5 0x00100000 /* 12: mise en parallele des piles pour le 5V */
540#define switch_pile_par_15 0x00080000 /* 11: mise en parallele des piles pour le 15V */
541#define vanne_EVB 0x00008000 /* 7: commande vanne brooks */
542#define vanne_EVO 0x00010000 /* 8: commande vanne EVO */
543#define vanne_EVV 0x00020000 /* 9: commande vanne EVV */
544#define vanne_EVF 0x00040000 /* 10: commande vanne EVF */
545#define chauffage1 0x00004000 /* 6: chauffage 1 */
546#define chauffage2 0x00002000 /* 6: chauffage 1 */
547#define chauffage3 0x00001000 /* 6: chauffage 1 */
548#define chauffage4 0x00000800 /* 6: chauffage 1 */
549#define chauffage5 0x00000400 /* 6: chauffage 1 */
550#define chauffage6 0x00000200 /* 6: chauffage 1 */
551#define chauffage7 0x00000100 /* 0: chauffage 7 */
552
553/* position des mesures sur les multiplexeurs */
554/* J10A -> temperatures basses t_b1 t_b2,t_b3 t_b4 36 37 41 35 */
555/* J10B -> temperatures basses t_a1 t_a2,t_a3 t_a4 38 11 34 28 */
556/* J1?? -> temperatures hautes t_h1 t_h2,t_h3 t_h4 */
557
558enum{
559/* multiplex11..18:*/ t_a2 ,mul12_ ,p_haut ,p_memb ,t_h1 ,t_h4 ,t_h3 ,t_h2
560/* multiplex21..28:*/, mul21_ ,mul22 ,p_charb,p_R4 ,mul25_ ,p_C3 ,p_R3 ,t_a4
561/* multiplex31..38:*/, mul31_ ,p_C4 ,p_air ,t_a3 ,t_b4 ,t_b1 ,t_b2 ,t_a1
562/* multiplex41..48:*/, t_b3 ,d_4He ,RP_He ,mul44 ,d_3He ,j_he3 ,j_he7 ,j_he4
563/* multiplex51..58:*/, j_he5 ,j_he1 ,j_he8 ,j_he2 ,j_he6 ,pirani ,mul57 ,mul58
564/* multiplex61..68:*/, p_m18B ,p_10B ,p_m18D ,mul64 ,p_p18B ,p_10T ,p_Ch ,p_p18D
565 };
566/* reste libres : mul 12 - 21 - 22 - 25 - 31 - 44 - 57 - 58 - 64 */
567
568
569
570/* --------------------- structures N° 4 : gps ------------------------------- */
571/* ------------------------------------------------------------------------------------------- */
572
573typedef struct
574 {
575 int4 debut; /* code de reconnaissance de debut de block */
576 int4 code1; /* code1 du block */
577 int4 code2; /* code2 du block */
578
579 char gps[80]; /* les données GPS (une chaine maxi 80 cara) */
580
581 int4 fin; /* code de reconnaissance de fin de block */
582 }
583 block_type_gps;
584
585
586
587/* --------------------- structures N° 5 : tous les bolos 1 periode --------------- */
588/* ------------------------------------------------------------------------------------------- */
589typedef struct
590 {
591 int4 debut; /* code de reconnaissance de debut de block */
592 int4 code1; /* code1 du block */
593 int4 code2; /* code2 du block */
594
595 short bol_per[nb_max_bolo][nb_max_mes_per];
596
597 int4 fin; /* code de reconnaissance de fin de block */
598 }
599 block_type_une_periode;
600
601/* ---------------- structures N° 6 : signals de synchro (pour test au sol) --------------- */
602/* ------------------------------------------------------------------------------------------- */
603typedef struct
604 {
605 int4 debut; /* code de reconnaissance de debut de block */
606 int4 code1; /* code1 du block */
607 int4 code2; /* code2 du block */
608 char synchro[nb_per_block*2][nb_sync];
609
610 int4 fin; /* code de reconnaissance de fin de block */
611 }
612 block_type_synchro_sol;
613
614/* --------------------- structures N° 7 : block de données de pointage sol ----------- */
615/* ------------------------------------------------------------------------------------------- */
616typedef struct
617 {
618 int4 debut; /* code de reconnaissance de debut de block */
619 int4 code1; /* code1 du block */
620 int4 code2; /* code2 du block */
621 char comment[1024];
622 int4 fin; /* code de reconnaissance de fin de block */
623 }
624 block_type_pointage_sol;
625
626
627
628/* ------------- structures N° 8 : données brutes des bolometres ---------------------- */
629/* ------------------------------------------------------------------------------------------- */
630typedef struct
631 {
632 int4 debut; /* code de reconnaissance de debut de block */
633 int4 code1; /* code1 du block */
634 int4 code2; /* code2 du block */
635 /* pour chaque bolo, un vecteur 72 points */
636 int4 data_bolo[nb_max_bolo][nb_per_block*2];
637 /* data D.S. (en mots de 32 bits) */
638 int4 fin; /* code de reconnaissance de fin de block */
639 }
640 block_type_bolo;
641
642/* --------------------- structures N° 9 : données des gyroscopes et du magnétometre */
643/* ----------------------------------------------------------------------------------------- */
644typedef struct
645 {
646 int4 debut; /* code de reconnaissance de debut de block */
647 int4 code1; /* code1 du block */
648 int4 code2; /* code2 du block */
649 /* chaque gyro: un vecteur tde 72 valeurs */
650 int4 gyros[3][nb_per_block*2];
651 int4 magneto[3]; /* 1 bit par echantillonage soit 3*32bit>72 */
652 int4 fin; /* code de reconnaissance de fin de block */
653 }
654 block_type_gyro;
655
656/* --------------------- structures N° 10 : données senseur stellaire ----------- */
657/* ----------------------------------------------------------------------------------------- */
658typedef struct
659 {
660 int4 debut; /* code de reconnaissance de debut de block */
661 int4 code1; /* code1 du block */
662 int4 code2; /* code2 du block */
663 int4 sst[nb_per_block*2][18];
664 /* chaque mesure: un paquet de 18 mots de 32 bits */
665 int4 fin; /* code de reconnaissance de fin de block */
666 }
667 block_type_sst;
668
669/* --------------------- structures N° 11 : rien ----------- */
670/* ----------------------------------------------------------------------------------------- */
671typedef struct
672 {
673 int4 debut; /* code de reconnaissance de debut de block */
674 int4 code1; /* code1 du block */
675 int4 code2; /* code2 du block */
676 int4 fin; /* code de reconnaissance de fin de block */
677 }
678 block_type11;
679
680/* --------------------- structures N° 12 : data bolo apres compression sur 7 bit ------ */
681/* ------------------------------------------------------------------------------------------- */
682typedef struct
683 {
684 int4 debut; /* code de reconnaissance de debut de block */
685 int4 code1; /* code1 du block */
686 int4 code2; /* code2 du block */
687 /* nombre de mots = nb valeurs/4 +1 */
688 /* pour chaque bolo, un vecteur 19 mots */
689 unsigned int4 data_bolo[nb_bolo_util][ (nb_per_block/2) +1 ];
690
691 int4 fin; /* code de reconnaissance de fin de block */
692 }
693 block_type_bolo_comprime;
694
695/* --------------------- structures N° 13 : block_type_gyro_comprime ----------- */
696/* ----------------------------------------------------------------------------------------- */
697typedef struct
698 {
699 int4 debut; /* code de reconnaissance de debut de block */
700 int4 code1; /* code1 du block */
701 int4 code2; /* code2 du block */
702 /* nombre de mots = nb valeurs/4 +1 */
703 unsigned int4 gyro[3][ (nb_per_block/2) +1 ];
704 int4 fin; /* code de reconnaissance de fin de block */
705 }
706 block_type_gyro_comprime;
707
708/* --------------------- structures N° 14 : block_type_sst_comprime ----------- */
709/* ----------------------------------------------------------------------------------------- */
710typedef struct
711 {
712 int4 debut; /* code de reconnaissance de debut de block */
713 int4 code1; /* code1 du block */
714 int4 code2; /* code2 du block */
715 /* pour chaque diode, un vecteur 11 mots */
716 unsigned int4 sst[nb_photo_diodes] [(nb_per_block*2/7) +1 ];
717 int4 fin; /* code de reconnaissance de fin de block */
718 }
719 block_type_sst_comprime;
720
721
722
723/* --------------------- structures N° 15 : catalog_flash ------- */
724/* ------------------------------------------------------------------------------------------- */
725
726typedef struct /* etat de l'enregistreur */
727 {
728 int4 nb_total_catalog;
729 int4 memoire_libre;
730 int4 nb_block_erreur;
731 }status_flash;
732
733typedef struct
734 {
735 int4 debut; /* code de reconnaissance de debut de block */
736 int4 code1; /* code1 du block */
737 int4 code2; /* code2 du block */
738
739 int4 commande; /* la commande a laquelle ce catalog repond */
740 status_flash status; /* etat de l'enregistreur */
741 int4 nombre; /* */
742 int4 code[nb_element_catalog]; /* code type et numero */
743 int4 fin; /* code de reconnaissance de fin de block */
744 }
745 block_type_catalog_flash;
746
747
748/* --------------------- structures N° 16 : cmd_flash ----------- */
749/* ----------------------------------------------------------------------------------------- */
750typedef struct
751 {
752 int4 debut; /* code de reconnaissance de debut de block */
753 int4 code1; /* code1 du block */
754 int4 code2; /* code2 du block */
755 int4 commande; /* type de commande a l'enregistreur flash */
756 int4 fin; /* code de reconnaissance de fin de block */
757 }
758 block_type_cmd_flash;
759
760enum {flash_catalog_auto,flash_catalog_debut,flash_catalog_fin,flash_catalog_precedent,flash_catalog_suivant
761 ,flash_efface_tout1,flash_efface_tout2,flash_efface_tout3
762 ,flash_efface_util1,flash_efface_util2,flash_efface_util3};
763
764
765/* --------------------- structures N° 17 : block brut de données ctb pour test ------- */
766/* ------------------------------------------------------------------------------------------- */
767typedef struct
768 {
769 int4 debut; /* code de reconnaissance de debut de block */
770 int4 code1; /* code1 du block */
771 int4 code2; /* code2 du block */
772#ifdef transmet_data_brute
773 char data[nb_per_block*nb_max_mes_per*nb_byte_mot];
774#endif
775 int4 fin; /* code de reconnaissance de fin de block */
776 }
777 block_type_data_brute;
778
779/* --------------------- structures N° 18 : block vide pour l'instant ------- */
780/* ------------------------------------------------------------------------------------------- */
781typedef struct
782 {
783 int4 debut; /* code de reconnaissance de debut de block */
784 int4 code1; /* code1 du block */
785 int4 code2; /* code2 du block */
786 int4 fin; /* code de reconnaissance de fin de block */
787 }
788 block_type_18;
789
790/* --------------------- structures N° 19 : block vide pour l'instant ------- */
791/* ------------------------------------------------------------------------------------------- */
792typedef struct
793 {
794 int4 debut; /* code de reconnaissance de debut de block */
795 int4 code1; /* code1 du block */
796 int4 code2; /* code2 du block */
797 int4 fin; /* code de reconnaissance de fin de block */
798 }
799 block_type_19;
800
801
802
803/* --------- block modele (plus gros que tous les autres pour reservation memoire) ---- */
804/* ----------------------------------------------------------------------------------------- */
805
806typedef struct /* La structure de transfert transputer vers mac */
807 {
808 int4 debut; /* code de reconnaissance de debut de block */
809 int4 code1; /* code1 du block */
810 int4 code2; /* code2 du block */
811 int4 mot[(taille_maxi_block_archeops)/4];
812 int4 fin; /* code de reconnaissance de fin de block */
813 }
814 block_type_modele;
815
816
817
818
819
820/*==============================================================================================*/
821/*==============================================================================================*/
822/* -------------- définitions permettant de travailler sur les blocks Archeops ----------- */
823/*==============================================================================================*/
824/*==============================================================================================*/
825
826
827
828enum {block_param,block_journal,block_reglage,block_dilution,
829 block_gps,block_une_periode,block_synchro_sol,block_pointage_sol,
830 block_bolo,block_gyro,block_sst,block_11,
831 block_bolo_comprime,block_gyro_comprime,block_sst_comprime,block_catalog_flash,
832 block_cmd_flash,block_data_brute,block_18,block_19};
833
834
835#define def_nom_block char nom_block[nb_type_blocks][32]={"block_param","block_journal","block_reglage","block_dilution",\
836 "block_gps","block_une_periode","block_synchro_sol","block_pointage_sol",\
837 "block_bolo","block_gyro","block_sst","block_11",\
838 "block_bolo_comprime","block_gyro_comprime","block_sst_comprime","block_catalog_flash",\
839 "block_cmd_flash","block_data_brute","",""};
840
841
842#define def_long_block int long_block[nb_type_blocks]={sizeof(block_type_param),sizeof(block_type_journal),sizeof(block_type_reglage),sizeof(block_type_dilution),\
843 sizeof(block_type_gps),sizeof(block_type_une_periode),sizeof(block_type_synchro_sol),sizeof(block_type_pointage_sol),\
844 sizeof(block_type_bolo),sizeof(block_type_gyro),sizeof(block_type_sst),sizeof(block_type11),\
845 sizeof(block_type_bolo_comprime),sizeof(block_type_gyro_comprime),sizeof(block_type_sst_comprime),sizeof(block_type_catalog_flash),\
846 sizeof(block_type_cmd_flash),sizeof(block_type_data_brute),sizeof(block_type_18),sizeof(block_type_19)};
847
848
849
850
851
852/* le code du block contient 8 bit de type */
853/* 24 bit pour le numero du block(horloge locale) */
854/* 12 bit pour la longueur du block (en octet) */
855/* 16 bit pour la somme de test de la validité du block */
856
857/* les define suivants doivent etre utilisés pour tester le type des blocks et les verifier */
858
859
860#define longueur_block(_bk) ( (int) ((_bk)->code1>>16) & 0xffff )
861#define somme_block(_bk) ( (int) (_bk)->code1 & 0xffff )
862
863#define type_block(_bk) ( (int) ((_bk)->code2>>24) & 0xff )
864#define numero_block(_bk) ( (int) (_bk)->code2 & 0xffffff )
865
866/* ce define cree le mot de controle de somme des blocks et de les verifier a la reception */
867
868
869/*==============================================================================================*/
870/*==============================================================================================*/
871/* ----------------- fonctions utilitaires de gestion des blocks Archeops ---------------- */
872/*==============================================================================================*/
873/*==============================================================================================*/
874
875
876/* -------------------------------------------------------------------------------------------- */
877/* les fonctions suivantes sont des utilitaires permettant la gestion des blocks archeops */
878/* il faut inclure une seule fois le header archeops.h précéde de : */
879/* #define utilitaires_de_block_archeops */
880/* -------------------------------------------------------------------------------------------- */
881
882
883/* ---------------------------- prototypes des fonctions ------------------------------ */
884/* -------------------------------------------------------------------------------------------- */
885
886
887/* cette fonction calcule le code de somme pour le controle de parité des blocks */
888
889int calcul_somme_block(block_type_modele* blk,int longueur);
890
891
892
893
894
895/* cette fonction est a apeller lors de la création d'un block apres l'avoir rempli */
896/* elle permet de creer tous les mots de controle du block */
897
898void valide_block(block_type_modele* blk,int type,int block_num);
899
900
901
902/* cette fonction est a apeller pour vérifier la validité d'un block */
903/* elle retourne 0 si le block est correct et sinon, un code d'erreur */
904/* la seconde fonction sort les erreurs a l'ecran */
905
906int verifie_block(block_type_modele* blk);
907int verifie_block_printf(block_type_modele* blk);
908
909enum {block_correct,block_type_inconnu,block_longueur_erreur,block_somme_erreur
910 ,block_debut_erreur,block_fin_erreur};
911
912/* cette fonction transforme un char (sur 8 bit) en double avec une echelle logarythmique */
913/* elle est en particulier utilisée pour calculer les coef de la regul */
914
915double val_double(char x);
916
917/* cette fonction transforme un char (sur 8 bit) en entier long (echelle logarythmique) */
918/* elle est en particulier utilisée pour fixer le courant sur les bolometres */
919
920unsigned long val_long(char x);
921
922int new_val_dac(int a,char code);
923
924
Note: See TracBrowser for help on using the repository browser.