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

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

archediab 29
File size: 35.7 KB
RevLine 
[637]1
2/*======================================================================*/
3/* */
4/* archeops.h : structure de données */
5/* */
6/*======================================================================*/
7
8#define _archeops
[649]9#define version_num 28
[637]10
[649]11/* defini ici que si l'on n'a pas inclu ecclib.h qui contient les memes definitions */
12#ifndef _ECC_LIB_H_
[645]13#define ECC_TOTAL 255
14#define ECC_DATA 239 /* Nb de bytes de data encodes */
15#define ECC_SIZE (ECC_TOTAL-ECC_DATA) /* Nb de bytes encodeurs */
16#define SIZE_HEAD sizeof(int4)*3 /* 3 mots d'entete de blocs */
17#endif
[649]18
[637]19/*======================================================================*/
20/* */
21/* historique des modifications */
22/* */
23/* */
24/* VERSION 24: */
25/* */
26/* - utilise le fichier archeops.c */
27/* - nb_max_bolo=24 avec nb_bolo_util=18 */
[639]28/* - change la structure du block param */
[637]29/* - change la structure du block dilution */
30/* */
[639]31/* VERSION 25: */
32/* */
33/* - la compression marche */
34/* - 4 signaux synchro O.K. */
35/* - change la structure dil : contient les temperatures */
[637]36/* */
[643]37/* VERSION 26: */
38/* */
39/* - int4 pour compatibilité toutes machines */
[645]40/* */
41/* VERSION 27: */
42/* - ajout dans chaque block-type d'une structure "ecc" dont la */
43/* taille est adaptee a la taille du bloc: */
44/* on ajoute 16 bytes servant a la correction d'erreur */
45/* pour chaque paquet de 241 bytes de donnees. */
46/* les bytes d'ECC sont calcules avant envoi sur la ligne */
47/* telemesure. */
48/* Ils peuvent servir a l'arrivee pour verifier et corriger quand */
49/* c'est possible les donnees. On peut corriger au maximu 7 bytes */
50/* erronnes. */
51/* */
[649]52/* VERSION 28: */
53/* - corrigée la taille du block gyroscope avec ecc */
54/* - compatible avec la generation de l'ecc dans le transputer */
55/* - mais sans ecc: trops long a calculer */
56
[637]57/*======================================================================*/
58
59
60/*======================================================================*/
61/* --------------- parametres generaux de definition ------------- */
62/*======================================================================*/
[639]63#ifndef int4
64#ifdef __alpha
65#define int4 int
66#undef programme
67#else
68#define int4 long
69#endif
70#endif
71
72#ifdef linux
73#undef programme
74#endif
75
[643]76
[637]77#ifdef _planck
78#define _archeops
79#define _trapani
80#define _sans_transputer
81#endif
82
83#ifdef _archeops
84/*#define _test_diabolo relecture des blocks fabriques avec diabolo */
85#define _trapani /* configuration prevue pour Trapani */
86/*#define _kiruna block standard prevu pour kiruna */
87#endif
88
89
90
91/*======================================================================*/
92/* -------------- valeurs des parametres dans ------------- */
93/* -------------- les différentes configurations ------------- */
94/*======================================================================*/
95/* */
96/* configuration pour Trapani : 3 bebos / 12 bolos */
97/* */
98/* bebo1 : voies 1 à 6 --> bolo 1 a 6 */
99/* bebo2 : voies 9 à 14 --> bolo 7 à 12 */
100/* */
101/* bebo6 : */
102/* voies 41 42 43 44 = carte simplifiee avec AMP01 */
103/* voies 45 et 46 = chauffage pour regulation */
104/* on ecrira plus tard le stockage des donnees simplifiees */
105/* */
106/* */
107/*======================================================================*/
108
109/* nb_per_block doit etre divisible par 2 */
110/* nb_max_bolo doit etre divisible par 2 pour archeops (impair pour diabolo ?? ) */
111/* nb_bolo_util doit etre divisible par 2 pour archeops (impair pour diabolo ?? ) */
112
113
114#ifdef _trapani
115#define nb_max_bolo 24 /* nombre maxi de bolos */
116#define nb_bolo_util 18 /* nombre de bolos réellement transmis */
117#define nb_per_block 36 /* nombre de periodes entieres dans un block */
118#define nb_max_mes_per 88 /* nb de points maxi dans une periode complete */
119#define nb_photo_diodes 46 /* nb de canaux de mesure du senseur stellaire */
120#endif
121
122#ifdef _kiruna
123#define nb_max_bolo 36 /* nombre maxi de bolos */
124#define nb_bolo_util 32 /* nombre de bolos réellement transmis */
125#define nb_per_block 36 /* nombre de periodes entieres dans un block */
126#define nb_max_mes_per 88 /* nb de points maxi dans une periode complete */
127#define nb_photo_diodes 46 /* nb de canaux de mesure du senseur stellaire */
128#endif
129
130
131#ifdef _diabolo
132#define nb_max_bolo 9 /* nombre maxi de bolos */
133#define nb_bolo_util 9 /* nombre de bolos réellement transmis */
134#define nb_per_block 20 /* nombre de periodes entieres dans un block */
135#define nb_max_mes_per 128 /* nb de points maxi dans une periode complete */
136#define nb_photo_diodes 0 /* nb de canaux de mesure du senseur stellaire */
137#endif
138
139#ifdef _test_diabolo
140#define nb_max_bolo 9 /* nombre maxi de bolos */
141#define nb_bolo_util 9 /* nombre de bolos réellement transmis */
142#define nb_per_block 20 /* nombre de periodes entieres dans un block */
143#define nb_max_mes_per 128 /* nb de points maxi dans une periode complete */
144#define nb_photo_diodes 0 /* nb de canaux de mesure du senseur stellaire */
145#endif
146
147
148#ifdef _sans_transputer
149#define nb_byte_mot 5 /* nombre d'octets dans un mot d'acquisition planck */
150#else
151#define nb_byte_mot 8 /* nombre d'octets dans un mot d'acquisition archeops */
152#endif
153
[643]154#define nb_max_nom_bolo 24 /* nombre maxi de noms et coef bolo dans la table */
155
[639]156#define nb_sync 4 /* nombre de signaux de synchro */
157 /* 6 pour diabolo */
158 /* toujours multiple de 4 pour archeops */
[637]159#define nb_element_catalog 256 /* nombre d'éléments catalog par reponse enregistreur */
160
161
162#ifdef transmet_data_brute
163#define taille_maxi_block_archeops sizeof(block_type_data_brute)
164#else /* le plus gros des différents blocks de télémesure*/
165#define taille_maxi_block_archeops sizeof(block_type_bolo)
166#endif
167
168#define nombre_de_regul 4
169#define nombre_de_voies 6
170#define nb_type_blocks 20 /* nombre de type de blocks (multiple de 4) */
[643]171#define nb_modes_telemesure 10
172#define nb_modes_flash 3
[637]173
174/*======================================================================*/
175/* ------- codes de controle pour la transmission ----- */
176/*======================= télécommande ==========================*/
177/*======================================================================*/
178
179
180/* -------------- codes de reconnaissance des paquets de télécommande -------------- */
181
182#define debut_telecommande 0x23456789
183#define fin_telecommande 0x98765432
184
185/* ------------ codes de direction des commandes envoyées a l'EPLD Archeops -------------- */
186
187#define tc_dir_transputer 1
188#define tc_dir_reset_epld 3
[649]189#define tc_dir_reset_trp 4
[637]190
191/* ------------- codes des prefix des telecommandes traités le transputer -------------- */
192
193#define tc_horloge 255 /* (-1) */
194#define tc_cadence1 128
195#define tc_cadence2 129
196#define tc_cadence3 130
197#define tc_regul 251 /* (-5) */
198#define tc_switch_dil 250
199#define tc_dac_dil 249
200
201/*======================================================================*/
202/* telecommande reduite sur 18 bit */
203/*======================================================================*/
204
205/*______________________________________________________________________________________________*/
206/* 1er mot : code de debut de telecommande reduite */
207#define tc_reduite 248
208/*______________________________________________________________________________________________*/
209/* 2eme mot: 4bit: 16 codes de direction tc2 */
210enum{tc2_reset_epld,tc2_bolo_dacV,tc2_bolo_dacI,tc2_bolo_dacT
211 ,tc2_bolo_dacL,tc2_bolo_gain,tc2_bolo_voie,tc2_horloge
[649]212 ,tc2_regul,tc2_auto_bolo,tc2_auto_dilu,tc2_dilution
213 ,tc2_raz_fet,tc2_reset}; /* 13 codes: reste 3 disponibles*/
[637]214
215
216/*______________________________________________________________________________________________*/
217/* 3eme mot: 6bit: */
218
219/* code2=dac-gain-voie : numero de bolo */
220
221/* code2=tc2_horloge : */
222/* soit un code defini */
[649]223enum{tc3_commande,tc3_periode,tc3_nb_mesures,tc3_temp_mort,tc3_flag};
[637]224
225
226/* code2=tc2_regul : */
227
228
229/* code2=tc2_auto_bolo : */
230
231
232/* code2=tc2_auto_dilu : */
233/* les valeurs des parametres d'auto_dilu ne depassent pas 128 */
234
235
[649]236/* code2=tc2_dilution : commandes setbit,clrbit */
237enum{tc3_clr_bit_dil,tc3_set_bit_dil,tc3_fet_raz};
[637]238
[649]239/* code2=tc2_reset : commandes setbit,clrbit */
240#define tc3_reset 13
241#define tc4_reset 73
[637]242
243/*______________________________________________________________________________*/
244/* 4eme mot: 8bit: valeur a ecrire */
245
246
247/*======================================================================*/
248/* ------- codes de controle pour la transmission ----- */
249/*========================= télémesure ============================*/
250/*======================================================================*/
251
252/* ------- codes de reconnaissance des paquets de télémesure */
253
[643]254#define debut_block_mesure 0x45627491
255#define fin_block_mesure 0x83260432
[637]256
257
258
259
260
261/*======================================================================*/
262/* ------------------------------------------------------------------ */
263/* --------- Les formats des blocks type ARCHEOPS ------- */
264/* ------------------------------------------------------------------ */
265/*======================================================================*/
266
267
268
269/*==============================================================================================*/
270
271/* Le tableau est lut dans le desordre par le mac en lecture de la carte pci : */
272
273/* Les entiers long sont ecrits tels quels */
274/* Les short sont ecrits permuté 2 a 2 par le tansputer */
275/* Les tables char sont ecrits permuté 4 / 4 par le transputer */
276/* A la lecture dans le mac, tout est bon */
277
278
279/* --------- structures N° 0 : parametres de mesure des bolometres ------------- */
280/* ----------------------------------------------------------------------------------------- */
281
282typedef struct
283 {
[643]284 int4 numero_nom_coef; /* le numero pour retrouver le nom et les coef */
[639]285 int4 bolo_code_util; /* le code d'utilisation du bolo */
[643]286 int4 bolo_bebo; /* l'acquisition: 0 pour MLPA 10 pour BEBODIFF*/
[639]287 int4 bolo_num; /* l'adresse hard du bolo */
288 int4 bolo_gain; /* le gain du preampli */
289 int4 bolo_capa; /* la valeur capa du modulateur */
290 int4 bolo_diviseur; /* le diviseur de la compensation */
[643]291 }
292 param_un_bolo;
293
294
295typedef struct
296 {
297 char bolo_nom[32]; /* le nom de chaque bolometre */
[639]298 int4 coef[7]; /* les coef pour le calcul de la température */
[637]299 }
[643]300 nom_et_coef_bolo;
301
302
303
[637]304/* code_util des bolos */
305enum{bolo_hors_service,bolo_normal_transmis,bolo_normal_non_transmis,bolo_thermo_simplifie};
306
307
308typedef struct /* table des parametres de mesure bolometre */
309 /* cette table ne change pas (en principe) en cours de mesure */
310 {
[639]311 int4 numero_version; /* numero de version du header archeops.h */
312 int4 n_max_bolo; /* nombre maxi de bolos (divisible par 4) */
313 int4 n_per_block; /* nombre de periodes entieres dans un block */
314 int4 n_max_mes_per; /* nb de points maxi dans une periode complete */
[637]315
[639]316 int4 nb_bolo; /* nombre de bolometres effectivement lut */
[637]317 param_un_bolo bolo[nb_max_bolo];
[643]318 nom_et_coef_bolo nom_coef[nb_max_nom_bolo]; /* nombre de nom et coef bolo */
[637]319 }
320 param_bolo;
321
322
323
324
325/*
[643]326 int4 bolo_code_util[nb_max_bolo];
[637]327 char bolo_nom[nb_max_bolo][32];
328
[643]329 int4 bolo_bebo[nb_max_bolo];
330 int4 bolo_num[nb_max_bolo];
331 int4 bolo_gain[nb_max_bolo];
[637]332
[643]333 int4 bolo_capa[nb_max_bolo];
334 int4 bolo_diviseur[nb_max_bolo];
[637]335
[643]336 int4 coef[nb_max_bolo][7];
[637]337
[643]338 int4 presence_bebo;
[637]339 }
340 param_bolo;
341*/
342
343typedef struct /* La structure de transfert transputer vers mac */
344 {
[639]345 int4 debut; /* code de reconnaissance de debut de block */
346 int4 code1; /* code1 du block */
347 int4 code2; /* code2 du block */
[637]348
349 param_bolo param; /* les parametres de mesure des bolometres */
[649]350#ifdef _ECC_LIB_H_
[645]351 unsigned char ecc[((((sizeof( param_bolo)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]352#endif
[639]353 int4 fin; /* code de reconnaissance de fin de block */
[637]354 }
355 block_type_param;
356
357
358
359
360/* ------------------- structures N° 1 : journal de bord --------------------- */
361/* ----------------------------------------------------------------------------------------- */
362#define long_page 10
363typedef struct
364 {
[639]365 int4 code2; /* code de la ligne du journal */
[637]366 /* code idem code2 debut de block : */
367 /* contient un code de commande */
368 /* et le numero du block lors de la télécommande */
369 char mot[8]; /* contenu de la ligne du journal */
370 }
371 ligne_journal;
372
373
374typedef struct
375 {
[639]376 int4 debut; /* code de reconnaissance de debut de block */
377 int4 code1; /* code1 du block */
378 int4 code2; /* code2 du block */
[637]379
380 ligne_journal jj[long_page]; /* block de 10 lignes de journal */
[649]381#ifdef _ECC_LIB_H_
[645]382 unsigned char ecc[((((sizeof(ligne_journal)*long_page+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]383#endif
[637]384
[639]385 int4 fin; /* code de reconnaissance de fin de block */
[637]386 }
387 block_type_journal;
388
389
390/* --------- structures N° 2 : reglage_bolo , regul etc.. -------- */
391/* ------------------------------------------------------------------------------------------ */
392
393
394/* les definitions suivantes s'appliquent a une variable de type reglage.bolo[bol] */
395#define gainbrut(aa) ((char)(((aa).mot1&0x1f)))
396#define phase(aa) ((char)(((aa).mot1&0x60)>>5))
397#define comm(aa) ((char)(((aa).mot1&0x80)>>7))
398#define dac_V(aa) ((int)(((aa).mot1&0xfff00)>>8) )
399#define dac_I(aa) ((int)(((aa).mot1&0xfff00000)>>20))
400
401#define voie(aa) ((char)(((aa).mot2&0xff)))
402#define dac_T(aa) ((int)(((aa).mot2&0xfff00)>>8))
403#define dac_L(aa) ((int)(((aa).mot2&0xfff00000)>>20))
404
405/*
406#define bolo_mot1(dacV,dacI,gainbrut,phase,comm) ((gainbrut)&0x1f) | (((phase)&3)<<5) | (((comm)&1)<<7) | (((dacV)&0xfff)<<8) | (((dacI)&0xfff)<<20)
407#define bolo_mot2(dacT,dacL,voie) ((voie)&0xff) | (((dacT)&0xfff)<<8) | (((dacL)&0xfff)<<20)
408*/
409
410#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)
411#define bolo_mot2(dacT,dacL,voie) (((long)(voie))&0xff) | ((((long)(dacT))&0xfff)<<8) | ((((long)(dacL))&0xfff)<<20)
412
413
414typedef struct
415 {
[639]416 int4 mot1; /* dac1 = mot[11..0]; dac2=mot1[23..12] */
[637]417 /* gain = mot1[27..24]; phase = mot1[31..28]; */
[639]418 int4 mot2; /* dac3 = mot[11..0]; dac4=mot1[23..12] */
[637]419 /* voie pour reglages auto = mot2[31..24]; */
420 }
421 reglage_un_bolo;
422
423
424
425#ifdef programme /*********** structure normale pour le mac ****************/
426
427typedef struct
428 {
429 char periode;
430 char nb_mesures;
431 char temp_mort;
432 char flag;
433 }
434 horloge;
435
436typedef struct
437 {
438 char mode; /* on_off et deglitch */
439 char num_bolo; /* numero du bolo utilisé, */
440 char voie_chauf; /* la voie de sortie chauffage */
441 char prop; /* zero dans prop -> chauffage=0; */
442 char integ;
443 char deriv;
444 short chauffage; /* valeur effective du chauffage */
445 }
[643]446 regul_bolo; /* longueur 2 entiers int4 */
[637]447
448typedef struct
449 {
450 char mode;
451 char gain;
452 char courant;
453 char delai;
454 }
[643]455 auto_bolo; /* longueur 1 entiers int4 */
[637]456
457typedef struct
458 {
459 char vanne;
460 char helium;
461 char chauffage;
462 char piles;
463 char transmission;
464 char temps_max_vanne;
465 char xx7;
466 char xx8;
467 }
[643]468 auto_dilu; /* longueur 1 entiers int4 */
[637]469
470
471
472#else /*********** structure swappée pour le transputer ****************/
473
474typedef struct
475 {
476 char flag;
477 char temp_mort;
478 char nb_mesures;
479 char periode;
480 }
481 horloge;
482
483
484typedef struct
485 {
486 char prop; /* zero dans prop -> chauffage=0; */
487 char voie_chauf; /* la voie de sortie chauffage */
488 char num_bolo; /* numero du bolo utilisé, */
489 char mode; /* on_off et deglitch */
490 short chauffage; /* valeur effective du chauffage */
491 char deriv;
492 char integ;
493 }
[643]494 regul_bolo; /* longueur 2 entiers int4 */
[637]495
496
497typedef struct
498 {
499 char delai;
500 char courant;
501 char gain;
502 char mode;
503 }
[643]504 auto_bolo; /* longueur 1 entiers int4 */
[637]505
506typedef struct
507 {
508 char piles;
509 char chauffage;
510 char helium; /* periode de mesure */
511 char vanne;
512 char xx8;
513 char xx7;
514 char temps_max_vanne;
515 char transmission;
516 }
[643]517 auto_dilu; /* longueur 1 entiers int4 */
[637]518
519
520#endif /*********** fin des structures swappées ****************/
521
[649]522enum{regul_stop,regul_chauffage_null,regul_sans_deglitch,regul_avec_deglitch,stop_moteur,moteur_direct_p,moteur_regul_p,moteur_direct_m,moteur_regul_m};
[637]523
524#define bit_piles_5V 1
525#define bit_piles_15V 2
526#define bit_piles_auto 4
527
[643]528enum{vanne_zero,vanne_rien,vanne_ferme,vanne_ouvre,vanne_auto_pression,vanne_auto_P_T};
529/*enum{trans_zero,trans_rien,trans_normal,trans_rapide,trans_lent};*/
[639]530enum{helium_zero,helium_continu,helium_40s,helium_400s};
[637]531
532
[643]533typedef struct /* int4 en mot de 32 bit */
[637]534 {
535 horloge horloge; /* 1 */
536 reglage_un_bolo bolo[nb_max_bolo]; /* 18 * 2 = 36 */
537 auto_bolo autom[nombre_de_voies]; /* 6 * 1 6 */
538 regul_bolo regul[nombre_de_regul]; /* 4 * 2 = 8 */
539 auto_dilu dilu; /* 2 */
540 }
541 reglage_bolo; /* total 58 */
542
543
544typedef struct
545 {
[639]546 int4 debut; /* code de reconnaissance de debut de block */
547 int4 code1; /* code1 du block */
548 int4 code2; /* code2 du block */
[637]549 reglage_bolo reglage;
[649]550#ifdef _ECC_LIB_H_
[645]551 unsigned char ecc[((((sizeof(reglage_bolo)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]552#endif
[639]553 int4 fin; /* code de reconnaissance de fin de block */
[637]554 }
555 block_type_reglage;
556
557/* --------------------- structures N° 3 : etat de la dilution ----------------------- */
558/* ------------------------------------------------------------------------------------------- */
559typedef struct
560 {
[639]561 int4 debut; /* code de reconnaissance de debut de block */
562 int4 code1; /* code1 du block */
563 int4 code2; /* code2 du block */
564 int4 switch_dil;
565 int4 ADC_dil[48]; /* la lecture des 48 ADC de la carte DIL */
566 int4 DAC_dil[4]; /* les 4 dac de la carte dilution */
567 int4 DAC_sst[4]; /* les 4 dac de la carte sst */
568 int4 temperature[4]; /* valeurs lues sur cartes BEDIFF modifiees */
569/* int4 gyro_dil[3][nb_per_block*2]; les gyros (block gyros) */
570/* int4 data_dil[50]; data brutes de la dilution */
[649]571#ifdef _ECC_LIB_H_
[645]572 unsigned char ecc[((((sizeof(int4)*64+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]573#endif
[639]574 int4 fin; /* code de reconnaissance de fin de block */
[637]575 }
576 block_type_dilution;
577
578
579/* --------------------- structures N° 4 : gps ------------------------------- */
580/* ------------------------------------------------------------------------------------------- */
581
[645]582#define GPS_DATA 80
[637]583typedef struct
584 {
[639]585 int4 debut; /* code de reconnaissance de debut de block */
586 int4 code1; /* code1 du block */
587 int4 code2; /* code2 du block */
[637]588
[645]589 char gps[GPS_DATA]; /* les données GPS (une chaine maxi 80 cara) */
[649]590#ifdef _ECC_LIB_H_
[645]591 unsigned char ecc[((((GPS_DATA+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]592#endif
[637]593
[639]594 int4 fin; /* code de reconnaissance de fin de block */
[637]595 }
596 block_type_gps;
597
598
599
600/* --------------------- structures N° 5 : tous les bolos 1 periode --------------- */
601/* ------------------------------------------------------------------------------------------- */
602typedef struct
603 {
[639]604 int4 debut; /* code de reconnaissance de debut de block */
605 int4 code1; /* code1 du block */
606 int4 code2; /* code2 du block */
[637]607
608 short bol_per[nb_max_bolo][nb_max_mes_per];
[649]609#ifdef _ECC_LIB_H_
[645]610 unsigned char ecc[((((sizeof(short)*nb_max_bolo*nb_max_mes_per+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]611#endif
[637]612
[639]613 int4 fin; /* code de reconnaissance de fin de block */
[637]614 }
615 block_type_une_periode;
616
617/* ---------------- structures N° 6 : signals de synchro (pour test au sol) --------------- */
618/* ------------------------------------------------------------------------------------------- */
619typedef struct
620 {
[639]621 int4 debut; /* code de reconnaissance de debut de block */
622 int4 code1; /* code1 du block */
623 int4 code2; /* code2 du block */
624 char synchro[nb_per_block*2][nb_sync];
[649]625#ifdef _ECC_LIB_H_
[645]626 unsigned char ecc[((((nb_per_block*nb_sync*2+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]627#endif
[637]628
[639]629 int4 fin; /* code de reconnaissance de fin de block */
[637]630 }
631 block_type_synchro_sol;
632
633/* --------------------- structures N° 7 : block de données de pointage sol ----------- */
634/* ------------------------------------------------------------------------------------------- */
635typedef struct
636 {
[639]637 int4 debut; /* code de reconnaissance de debut de block */
638 int4 code1; /* code1 du block */
639 int4 code2; /* code2 du block */
[637]640 char comment[1024];
[649]641#ifdef _ECC_LIB_H_
[645]642 unsigned char ecc[((((1024+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]643#endif
[639]644 int4 fin; /* code de reconnaissance de fin de block */
[637]645 }
646 block_type_pointage_sol;
647
648
649
650/* ------------- structures N° 8 : données brutes des bolometres ---------------------- */
651/* ------------------------------------------------------------------------------------------- */
652typedef struct
653 {
[639]654 int4 debut; /* code de reconnaissance de debut de block */
655 int4 code1; /* code1 du block */
656 int4 code2; /* code2 du block */
[637]657 /* pour chaque bolo, un vecteur 72 points */
[639]658 int4 data_bolo[nb_max_bolo][nb_per_block*2];
[637]659 /* data D.S. (en mots de 32 bits) */
[649]660#ifdef _ECC_LIB_H_
[645]661 unsigned char ecc[((((sizeof(int4)*nb_max_bolo*nb_per_block*2+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]662#endif
[639]663 int4 fin; /* code de reconnaissance de fin de block */
[637]664 }
665 block_type_bolo;
666
[649]667/* --------------------- structures N° 9 : données des gyroscopes */
[637]668/* ----------------------------------------------------------------------------------------- */
669typedef struct
670 {
[639]671 int4 debut; /* code de reconnaissance de debut de block */
672 int4 code1; /* code1 du block */
673 int4 code2; /* code2 du block */
[637]674 /* chaque gyro: un vecteur tde 72 valeurs */
[643]675 int4 gyro[3][nb_per_block*2];
[649]676#ifdef _ECC_LIB_H_
677 unsigned char ecc[((((sizeof(int4)*3*nb_per_block*2+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
678#endif
[639]679 int4 fin; /* code de reconnaissance de fin de block */
[637]680 }
681 block_type_gyro;
682
683/* --------------------- structures N° 10 : données senseur stellaire ----------- */
684/* ----------------------------------------------------------------------------------------- */
685typedef struct
686 {
[639]687 int4 debut; /* code de reconnaissance de debut de block */
688 int4 code1; /* code1 du block */
689 int4 code2; /* code2 du block */
690 int4 sst[nb_per_block*2][18];
[637]691 /* chaque mesure: un paquet de 18 mots de 32 bits */
[649]692#ifdef _ECC_LIB_H_
[645]693 unsigned char ecc[((((sizeof(int4)*nb_per_block*2*18+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]694#endif
[639]695 int4 fin; /* code de reconnaissance de fin de block */
[637]696 }
697 block_type_sst;
698
699/* --------------------- structures N° 11 : rien ----------- */
700/* ----------------------------------------------------------------------------------------- */
701typedef struct
702 {
[639]703 int4 debut; /* code de reconnaissance de debut de block */
704 int4 code1; /* code1 du block */
705 int4 code2; /* code2 du block */
[649]706#ifdef _ECC_LIB_H_
[645]707 unsigned char ecc[((((SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]708#endif
[639]709 int4 fin; /* code de reconnaissance de fin de block */
[637]710 }
711 block_type11;
712
713/* --------------------- structures N° 12 : data bolo apres compression sur 7 bit ------ */
714/* ------------------------------------------------------------------------------------------- */
715typedef struct
716 {
[639]717 int4 debut; /* code de reconnaissance de debut de block */
718 int4 code1; /* code1 du block */
719 int4 code2; /* code2 du block */
[637]720 /* nombre de mots = nb valeurs/4 +1 */
721 /* pour chaque bolo, un vecteur 19 mots */
[639]722 unsigned int4 data_bolo[nb_bolo_util][ (nb_per_block/2) +1 ];
[649]723#ifdef _ECC_LIB_H_
[645]724 unsigned char ecc[((((sizeof(int4)*nb_bolo_util*((nb_per_block/2) +1)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]725#endif
[637]726
[639]727 int4 fin; /* code de reconnaissance de fin de block */
[637]728 }
729 block_type_bolo_comprime;
730
731/* --------------------- structures N° 13 : block_type_gyro_comprime ----------- */
732/* ----------------------------------------------------------------------------------------- */
733typedef struct
734 {
[639]735 int4 debut; /* code de reconnaissance de debut de block */
736 int4 code1; /* code1 du block */
737 int4 code2; /* code2 du block */
[637]738 /* nombre de mots = nb valeurs/4 +1 */
[639]739 unsigned int4 gyro[3][ (nb_per_block/2) +1 ];
[649]740#ifdef _ECC_LIB_H_
[645]741 unsigned char ecc[((((sizeof(int4)*3*((nb_per_block/2) +1)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]742#endif
[639]743 int4 fin; /* code de reconnaissance de fin de block */
[637]744 }
745 block_type_gyro_comprime;
746
747/* --------------------- structures N° 14 : block_type_sst_comprime ----------- */
748/* ----------------------------------------------------------------------------------------- */
749typedef struct
750 {
[639]751 int4 debut; /* code de reconnaissance de debut de block */
752 int4 code1; /* code1 du block */
753 int4 code2; /* code2 du block */
[637]754 /* pour chaque diode, un vecteur 11 mots */
[639]755 unsigned int4 sst[nb_photo_diodes] [(nb_per_block*2/7) +1 ];
[649]756#ifdef _ECC_LIB_H_
[645]757 unsigned char ecc[((((sizeof(int4)*nb_photo_diodes*((nb_per_block*2/7) +1)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]758#endif
[639]759 int4 fin; /* code de reconnaissance de fin de block */
[637]760 }
761 block_type_sst_comprime;
762
763
[643]764/* --------------------- structures N° 15 : block_type_status_flash -------*/
765/* ---------------------------------------------------------------- */
[637]766
[643]767/*
768** Quelque soit la commande, l'enregistreur renvoie toujours le meme type
769de bloc comprenant la commande, un mot d'erreur eventuel et le status.
[637]770
[643]771** L'enregistreur ne prend jamais l'initiative d'envoyer un bloc de status
772(sauf dans le cas ci-dessous).
[637]773
[643]774** Au reset, le controleur est un peu lent a demarrer (quelques secondes).
775Pour que tu puisse savoir quand il est pret, je propose de t'envoyer un
776bloc de type "block_type_status_flash" des que je suis pret (comme si tu
777avais envoye un bloc "block_type_cmd_flash" avec la commande
778"FLASH_STATUS_REQUEST"
[637]779
[643]780*/
[637]781
[643]782typedef struct {/* etat de l'enregistreur */
783 int4 nb_total_blocks ;
784 int4 memoire_libre ;
785 int4 nb_block_erreur ;
786} status_flash;
[637]787
[643]788typedef struct {
789 unsigned int4 debut ;
790 unsigned int4 code1 ;
791 unsigned int4 code2 ;
[637]792
[643]793 int4 commande; /* la commande a laquelle ce bloc repond */
794 int4 erreur ; /* Si la commande a induit une erreur */
795 status_flash status ; /* etat de l'enregistreur */
[649]796#ifdef _ECC_LIB_H_
[645]797 unsigned char ecc[((((sizeof(int4)*2 + sizeof(status_flash)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]798#endif
[645]799
[643]800 unsigned int4 fin ; /* code de reconnaissance de fin de block */
801} block_type_status_flash ;
[637]802
[643]803/* --------------------- structures N° 16 : block_type_cmd_flash ---------*/
804/* ------------------------------------------------------------------ */
805typedef struct {
806 unsigned int4 debut ;
807 unsigned int4 code1 ;
808 unsigned int4 code2 ;
809
810 int4 commande; /* type de commande a l'enregistreur flash */
[649]811#ifdef _ECC_LIB_H_
[645]812 unsigned char ecc[((((sizeof(int4)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]813#endif
[643]814
815 int4 fin; /* code de reconnaissance de fin de block */
816} block_type_cmd_flash;
817
818/* Commands from Transputer to Recorder */
819enum {
820 FLASH_STATUS_REQUEST,
821 FLASH_EFFACE_TOUT1, FLASH_EFFACE_TOUT2, FLASH_EFFACE_TOUT3,
822 FLASH_EFFACE_UTIL1, FLASH_EFFACE_UTIL2, FLASH_EFFACE_UTIL3
823} ;
824
825/* Errors from Recorder to Transputer.
826 Pending question: what to do in case of FLASH_ERASE_END_ERROR ?
827*/
828
829enum {
830 FLASH_STATUS_OK, /* Pas d'erreur */
831 FLASH_BAD_SEQUENCE, /* Mauvaise sequence d'effacement */
832 FLASH_ERASE_START, /* Debut d'effacement */
833 FLASH_ERASE_END_OK, /* Fin d'effacement OK */
834 FLASH_ERASE_END_ERROR /* Erreur pendant l'effacement */
835} ;
836
837
[637]838/* --------------------- structures N° 17 : block brut de données ctb pour test ------- */
839/* ------------------------------------------------------------------------------------------- */
840typedef struct
841 {
[639]842 int4 debut; /* code de reconnaissance de debut de block */
843 int4 code1; /* code1 du block */
844 int4 code2; /* code2 du block */
[637]845#ifdef transmet_data_brute
846 char data[nb_per_block*nb_max_mes_per*nb_byte_mot];
[649]847#ifdef _ECC_LIB_H_
[645]848 unsigned char ecc[((((nb_per_block*nb_max_mes_per*nb_byte_mot+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]849#endif
[645]850#else
[649]851#ifdef _ECC_LIB_H_
[645]852 unsigned char ecc[((((SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[637]853#endif
[649]854#endif
[639]855 int4 fin; /* code de reconnaissance de fin de block */
[637]856 }
857 block_type_data_brute;
858
859/* --------------------- structures N° 18 : block vide pour l'instant ------- */
860/* ------------------------------------------------------------------------------------------- */
861typedef struct
862 {
[639]863 int4 debut; /* code de reconnaissance de debut de block */
864 int4 code1; /* code1 du block */
865 int4 code2; /* code2 du block */
[649]866#ifdef _ECC_LIB_H_
[645]867 unsigned char ecc[((((SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]868#endif
[639]869 int4 fin; /* code de reconnaissance de fin de block */
[637]870 }
871 block_type_18;
872
873/* --------------------- structures N° 19 : block vide pour l'instant ------- */
874/* ------------------------------------------------------------------------------------------- */
875typedef struct
876 {
[639]877 int4 debut; /* code de reconnaissance de debut de block */
878 int4 code1; /* code1 du block */
879 int4 code2; /* code2 du block */
[649]880#ifdef _ECC_LIB_H_
[645]881 unsigned char ecc[((((SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]882#endif
[639]883 int4 fin; /* code de reconnaissance de fin de block */
[637]884 }
885 block_type_19;
886
887
888
889/* --------- block modele (plus gros que tous les autres pour reservation memoire) ---- */
890/* ----------------------------------------------------------------------------------------- */
891
892typedef struct /* La structure de transfert transputer vers mac */
893 {
[639]894 int4 debut; /* code de reconnaissance de debut de block */
895 int4 code1; /* code1 du block */
896 int4 code2; /* code2 du block */
897 int4 mot[(taille_maxi_block_archeops)/4];
[649]898#ifdef _ECC_LIB_H_
[645]899 unsigned char ecc[((((sizeof(int4)*(taille_maxi_block_archeops/4)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
[649]900#endif
[639]901 int4 fin; /* code de reconnaissance de fin de block */
[637]902 }
903 block_type_modele;
904
905
906
907
908
909/*==============================================================================================*/
910/*==============================================================================================*/
911/* -------------- définitions permettant de travailler sur les blocks Archeops ----------- */
912/*==============================================================================================*/
913/*==============================================================================================*/
914
915
916
917enum {block_param,block_journal,block_reglage,block_dilution,
918 block_gps,block_une_periode,block_synchro_sol,block_pointage_sol,
919 block_bolo,block_gyro,block_sst,block_11,
[643]920 block_bolo_comprime,block_gyro_comprime,block_sst_comprime,block_status_flash,
[637]921 block_cmd_flash,block_data_brute,block_18,block_19};
922
923
924#define def_nom_block char nom_block[nb_type_blocks][32]={"block_param","block_journal","block_reglage","block_dilution",\
925 "block_gps","block_une_periode","block_synchro_sol","block_pointage_sol",\
926 "block_bolo","block_gyro","block_sst","block_11",\
[643]927 "block_bolo_comprime","block_gyro_comprime","block_sst_comprime","block_status_flash",\
[637]928 "block_cmd_flash","block_data_brute","",""};
929
930
931#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),\
932 sizeof(block_type_gps),sizeof(block_type_une_periode),sizeof(block_type_synchro_sol),sizeof(block_type_pointage_sol),\
933 sizeof(block_type_bolo),sizeof(block_type_gyro),sizeof(block_type_sst),sizeof(block_type11),\
[643]934 sizeof(block_type_bolo_comprime),sizeof(block_type_gyro_comprime),sizeof(block_type_sst_comprime),sizeof(block_type_status_flash),\
[637]935 sizeof(block_type_cmd_flash),sizeof(block_type_data_brute),sizeof(block_type_18),sizeof(block_type_19)};
936
937
938
939
940
941/* le code du block contient 8 bit de type */
942/* 24 bit pour le numero du block(horloge locale) */
943/* 12 bit pour la longueur du block (en octet) */
944/* 16 bit pour la somme de test de la validité du block */
945
946/* les define suivants doivent etre utilisés pour tester le type des blocks et les verifier */
947
948
949#define longueur_block(_bk) ( (int) ((_bk)->code1>>16) & 0xffff )
950#define somme_block(_bk) ( (int) (_bk)->code1 & 0xffff )
951
952#define type_block(_bk) ( (int) ((_bk)->code2>>24) & 0xff )
953#define numero_block(_bk) ( (int) (_bk)->code2 & 0xffffff )
954
955/* ce define cree le mot de controle de somme des blocks et de les verifier a la reception */
956
957
958/*==============================================================================================*/
959/*==============================================================================================*/
960/* ----------------- fonctions utilitaires de gestion des blocks Archeops ---------------- */
961/*==============================================================================================*/
962/*==============================================================================================*/
963
964
965/* -------------------------------------------------------------------------------------------- */
966/* les fonctions suivantes sont des utilitaires permettant la gestion des blocks archeops */
967/* il faut inclure une seule fois le header archeops.h précéde de : */
968/* #define utilitaires_de_block_archeops */
969/* -------------------------------------------------------------------------------------------- */
970
971
972/* ---------------------------- prototypes des fonctions ------------------------------ */
973/* -------------------------------------------------------------------------------------------- */
974
975
976/* cette fonction calcule le code de somme pour le controle de parité des blocks */
977
978int calcul_somme_block(block_type_modele* blk,int longueur);
979
980
981
982
983
984/* cette fonction est a apeller lors de la création d'un block apres l'avoir rempli */
985/* elle permet de creer tous les mots de controle du block */
986
987void valide_block(block_type_modele* blk,int type,int block_num);
988
989
990
991/* cette fonction est a apeller pour vérifier la validité d'un block */
992/* elle retourne 0 si le block est correct et sinon, un code d'erreur */
993/* la seconde fonction sort les erreurs a l'ecran */
994
995int verifie_block(block_type_modele* blk);
996int verifie_block_printf(block_type_modele* blk);
997
998enum {block_correct,block_type_inconnu,block_longueur_erreur,block_somme_erreur
999 ,block_debut_erreur,block_fin_erreur};
1000
1001/* cette fonction transforme un char (sur 8 bit) en double avec une echelle logarythmique */
1002/* elle est en particulier utilisée pour calculer les coef de la regul */
1003
1004double val_double(char x);
1005
[643]1006/* cette fonction transforme un char (sur 8 bit) en entier int4 (echelle logarythmique) */
[637]1007/* elle est en particulier utilisée pour fixer le courant sur les bolometres */
1008
[643]1009unsigned int4 val_long(char x);
[637]1010
1011int new_val_dac(int a,char code);
1012
1013
Note: See TracBrowser for help on using the repository browser.