Changeset 652 in Sophya for trunk/Poubelle


Ignore:
Timestamp:
Nov 25, 1999, 3:19:54 PM (26 years ago)
Author:
ansari
Message:

archediab 29

Location:
trunk/Poubelle/archediab.old
Files:
1 added
1 deleted
8 edited

Legend:

Unmodified
Added
Removed

  • trunk/Poubelle/archediab.old/archediab.sources/c/acqui_util.c

    r649 r652  
    2929if(parametr.n_per_block!=nb_per_block) {erreur("erreur nb_per_block\n");return;}
    3030if(parametr.n_max_mes_per!=nb_max_mes_per) {erreur("erreur nb_max_mes_per\n");return;}
    31 if(parametr.nb_bolo!=nb_bolo_util) {erreur("erreur nb_bolo_util\n");return;}
     31if(parametr.nb_bolo!=nb_max_bolo) {erreur("erreur nb_bolo_util\n");return;}
    3232
    3333gg->reglage=reglage_standard[0];

  • trunk/Poubelle/archediab.old/archediab.sources/c/acquisition_archeops.c

    r651 r652  
    310310*/
    311311/*
    312 for(j=0;j<nb_bolo_util;j++)     
     312for(j=0;j<parametr.nb_bolo;j++)
    313313                {
    314314                decompress_7_2((long *)blk->data_bolo[j],blk2->data_bolo[j],nb_per_block*2);
    … …  
    317317jc=0;for(j=0;j<nb_max_bolo;j++)  // jc = bolo_comprime  //   j=bolo normal
    318318                {
    319                 if( (parametr.bolo[j].bolo_code_util==bolo_normal_transmis) &&  (jc<nb_bolo_util)  )
     319                if( (parametr.bolo[j].bolo_code_util==bolo_normal_transmis) &&  (jc<parametr.nb_bolo)  )
    320320                        {
    321321                        decompress_7_2((long *)blk->data_bolo[jc],blk2->data_bolo[j],nb_per_block*2);

  • trunk/Poubelle/archediab.old/archediab.sources/c/arcunit.c

    r651 r652  
    147147return(0);
    148148}
     149
    149150
    150151

  • trunk/Poubelle/archediab.old/archediab.sources/c/tache_transputer.c

    r649 r652  
    6767register unsigned long RR;
    6868tmtc* tt=(tmtc*)tx;
    69 long lec_fifo=0         //  compteur nombre de points lut en une fois dans la fifo
     69long lec_fifo=0;                //  compteur nombre de points lut en une fois dans la fifo
    7070int max_fifo;
    7171

  • trunk/Poubelle/archediab.old/archediab.sources/choix_acquisition.h

    r649 r652  
    77//---------------------------------------------------------------------------------------
    88
     9//#define       _sans_transputer        // pour fonctionnement avec carte CTB
    910
    10 //#define _planck               //  Acquisition Planck  (carte CTB )
    11 #define _archeops               //  Acquisition Archeops (avec transputer)
    12 //#define _diabolo              //  Acquisition Diabolo
    13 
    14 //#define       transmet_data_brute     // pour test en mode planck                                     
     11//#define       transmet_data_brute     // pour test en mode sans transputer                                   
    1512
    1613//---------------------   lecture des data du telescope     -----------------------------
    … …  
    2623
    2724
    28 #ifdef _archeops        //---------   pour  Archeops    ---------------------------------
     25                //---------   pour  Archeops    ---------------------------------
     26
     27
    2928//#define Adresse_base_PCI      0x81000000      // G3 Spatial-Archeops3 optique
    3029//#define Adresse_base_PCI      0x83000000      // G3 Spatial-Archeops optique
    3130//#define Adresse_base_PCI      0x84000000      // G3 Archeops optique avec carte video
    3231#define Adresse_base_PCI        0x82000000      // G3 Archeops_2 optique avec carte video
    33 #endif
    3432
    3533
    36 
    37 #ifdef _planck          //---------   pour  Planck    -----------------------------------
    38 //#define Adresse_base_PCI      0x83000000      // G3 Archeops optique
    39 #define Adresse_base_PCI        0x81000000      // G3 Archeops optique
    40 #endif
    41 
    42 
    43 #ifdef _diabolo         //---------   pour  Diabolo    ----------------------------------
    44 #define Adresse_base_PCI        0x81000000      // power diabolo
     34                //---------   pour  Diabolo    ----------------------------------
     35//#define Adresse_base_PCI      0x81000000      // power diabolo
    4536//#define Adresse_base_PCI      0x83000000      // G3 Archeops sans optique
    4637//#define Adresse_base_PCI      0x84000000      // diabolo dans G3 Archeops avec optique
    47 #endif         
    4838
    4939//#define signe_inverse

  • trunk/Poubelle/archediab.old/archeops.c

    r651 r652  
    123123/* ---------------------- modifié les indices de bolo  le 15 septembre 1999-------------------*/
    124124
    125 param_bolo  parametr={28,24,36,88,18,
     125param_bolo  parametr={29,24,36,88,18,
    126126
    127127
    … …  
    189189
    190190
     191{ 0     , 3,10,30, 1000,  1000  ,    0 },       /*      24      */
     192
     193{ 0     , 3,10,30, 1000,  1000  ,    0 },
     194
     195{ 0     , 3,10,30, 1000,  1000  ,    0 },
     196
     197{ 0     , 3,10,30, 1000,  1000  ,    0 },
     198
     199
     200
     201{ 0     , 3,10,30, 1000,  1000  ,    0 },       /*      28      */
     202
     203{ 0     , 3,10,30, 1000,  1000  ,    0 },
     204
     205{ 0     , 3,10,30, 1000,  1000  ,    0 },
     206
     207{ 0     , 3,10,30, 1000,  1000  ,    0 },
     208
     209
     210
     211{ 0     , 3,10,30, 1000,  1000  ,    0 },       /*      32      */
     212
     213{ 0     , 3,10,30, 1000,  1000  ,    0 },
     214
     215{ 0     , 3,10,30, 1000,  1000  ,    0 },
     216
     217{ 0     , 3,10,30, 1000,  1000  ,    0 },
     218
     219
     220
    191221},
    192222
    … …  
    259289
    260290
     291{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },                      /*      24      */
     292
     293{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     294
     295{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     296
     297{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     298
     299
     300
     301{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },                      /*      28      */
     302
     303{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     304
     305{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     306
     307{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     308
     309
     310
     311{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },                      /*      32      */
     312
     313{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     314
     315{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     316
     317{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     318
     319
     320
     321{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },                      /*      36      */
     322
     323{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     324
     325{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     326
     327{ "Niente   "    , { 5000  ,  0 , 0,   0,0,0,0} },
     328
     329
     330
    261331}
    262332

  • trunk/Poubelle/archediab.old/archeops.h

    r651 r652  
    77
    88#define         _archeops
    9 #define         version_num             28
     9#define         version_num             29
    1010
    1111/*  defini ici que si l'on n'a pas inclu ecclib.h qui contient les memes definitions */
    … …  
    5353/*      - corrigée la taille du block gyroscope avec ecc                */
    5454/*      - compatible avec la generation de l'ecc dans le transputer     */
    55 /*      - mais sans ecc: trops long a calculer                          */
    56 
     55/*      - mais sans ecc: trops long a calculer 
     56/*                                                                      */
     57/*              VOL  Trapani  AVEC  VERSION  28                         */
     58/*                                                                      */
     59/*  VERSION 29:                                                         */
     60/*      - toujours  define  _archeops                                   */
     61/*      - blocks longueur variable si l'on change archeops.c            */
     62/*      - pour fonctionnement sans transputer  (CTB)                    */
     63/*              faire preceder archeops.h  de  acquisition.h            */
     64/*              qui contiendra un #define _sans_transputer              */
     65/*                                                                      */
    5766/*======================================================================*/
    5867
    … …  
    7584
    7685
    77 #ifdef  _planck
    78 #define _archeops
    79 #define _trapani
    80 #define _sans_transputer
    81 #endif
    8286
    8387#ifdef  _archeops
    … …  
    109113/*      nb_per_block    doit etre divisible par 2                                               */
    110114/*      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                 */
     115/*      parametr.nb_bolo        doit etre divisible par 2 pour archeops   (impair pour diabolo ?? )     */
     116
     117
     118#ifndef _diabolo
     119
     120#define nb_max_bolo             36      /*  nombre maxi de bolos                                */
     121/*#define nb_bolo_util          32        nombre de bolos réellement transmis                   */
    117122#define nb_per_block            36      /*  nombre de periodes entieres dans un block           */
    118123#define nb_max_mes_per          88      /*  nb de points maxi dans une periode complete         */
    119124#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
     125
     126#else
     127
    132128#define nb_max_bolo             9       /*  nombre maxi de bolos                                */
    133 #define nb_bolo_util            9       /*  nombre de bolos réellement transmis                 */
    134129#define nb_per_block            20      /*  nombre de periodes entieres dans un block           */
    135130#define nb_max_mes_per          128     /*  nb de points maxi dans une periode complete         */
    136131#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         */
     132
    145133#endif
    146134
    … …  
    152140#endif
    153141
    154 #define nb_max_nom_bolo         24      /*  nombre maxi de noms et coef bolo dans la table      */
     142
     143#define nb_max_nom_bolo         40      /*  nombre maxi de noms et coef bolo dans la table      */
    155144
    156145#define nb_sync                 4       /*  nombre de signaux de synchro                        */
    157146                                        /*  6 pour diabolo                                      */
    158147                                        /* toujours multiple de 4 pour archeops                 */
     148
    159149#define nb_element_catalog      256     /* nombre d'éléments catalog par reponse enregistreur   */
     150
    160151
    161152
    … …  
    166157#endif
    167158
    168 #define         nombre_de_regul         4
    169 #define         nombre_de_voies         6
     159
     160
     161#define         nombre_de_regul         4       /*  nombre de blocks regulation     */
     162#define         nombre_de_voies         6       /*  nombre de voies pour selectionner un groupe de bolos */
    170163#define         nb_type_blocks          20      /*  nombre de type de blocks (multiple de 4)    */
    171 #define         nb_modes_telemesure     10
     164
     165#define         nb_modes_telemesure     10      /*  cadence d'emission des blocks               */
    172166#define         nb_modes_flash           3
    173167
    … …  
    196190#define         tc_cadence3                     130
    197191#define         tc_regul                        251     /* (-5) */
    198 #define         tc_switch_dil                   250
     192#define         tc_switch_dil           250
    199193#define         tc_dac_dil                      249
    200194
    … …  
    712706
    713707/*  ---------------------   structures N° 12 :  data bolo apres compression sur 7 bit    ------ */
     708/*  --   longueur variable car nb_max_bolo est remplacé par  parametr.nb_bolo apres calcul   ------ */
     709/*  --     ATTENTION   l'ECC  calcule  est donc faux  !!!!!!                             ------ */
    714710/*  ------------------------------------------------------------------------------------------- */
    715711typedef struct                           
    … …  
    720716                                        /*      nombre de mots = nb valeurs/4 +1                */
    721717                                        /*      pour chaque bolo, un vecteur  19 mots           */
    722         unsigned int4   data_bolo[nb_bolo_util][ (nb_per_block/2) +1 ];
    723 #ifdef _ECC_LIB_H_
    724         unsigned char ecc[((((sizeof(int4)*nb_bolo_util*((nb_per_block/2) +1)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
     718        unsigned int4   data_bolo[nb_max_bolo][ (nb_per_block/2) +1 ];
     719#ifdef _ECC_LIB_H_
     720        unsigned char ecc[((((sizeof(int4)*nb_max_bolo*((nb_per_block/2) +1)+SIZE_HEAD)/ECC_DATA)+1)*ECC_SIZE)] ;
    725721#endif
    726722
Note: See TracChangeset for help on using the changeset viewer.