source: Sophya/trunk/Poubelle/archTOI.old/archeops.h@ 315

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

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