source: Sophya/trunk/Poubelle/archediab.old/archeops.h@ 637

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

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