HG_REPOSITORIES/LPP/INSTRUMENTATION/USERS/CHUST/LFR_basic-parameters Files · file_utilities.c

version 1.2 qui règle le problème d'alignement mémoire pour BP1 (pour BP2 plus tard ...)

chust - - Load All Authors

File last commit:

r6:be100cfb14bd default


                r6:be100cfb14bd

default

Download file

             file_utilities.c
        
                    63 lines
            
             | 4.0 KiB
            
                | text/x-c
            
             |
                CLexer
            
             / file_utilities.c
          
                    History
                
                 |
                  Source
                 | Raw
                 |Copy content
                 |Copy permalink

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
      // In the frame of RPW LFR Sofware ICD Issue1 Rev8 (05/07/2013)

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
      // version 1.0: 31/07/2013

        chust
    
version 1.2 qui règle le problème d'alignement mémoire pour BP1 (pour BP2 plus tard ...)

              r6
            
      // version 1.1: 02/04/2014

      // version 1.2: 30/04/2014

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
        thomas
    
Initial commit

              r0
            
      #include <file_utilities.h>

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
      int lecture_file_sm(const char *fileName)

        thomas
    
Initial commit

              r0
            
      {

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
          int i;

        thomas
    
Initial commit

              r0
            
          FILE *infile;

        thomas
    
modification fonction lecture_file_sm()

              r1
            
          infile = fopen(fileName, "rb");  // open explicitely a binary file !!! ...

        thomas
    
Initial commit

              r0
            
          if(infile == NULL) {

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
              printf("Hello I cannot open the file! \n");

        thomas
    
Initial commit

              r0
            
              return 0;

          }

          (void) fread(compressed_spectral_matrix_f0, sizeof(compressed_spectral_matrix_f0), 1, infile);

          (void) fclose(infile);

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
          printf("size of compressed_spectral_matrix_f0 : %lu\n", sizeof(compressed_spectral_matrix_f0));

          printf("Number of bins: %d\n\n", NB_BINS_COMPRESSED_MATRIX_f0);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
        thomas
    
Initial commit

              r0
            
          printf("compressed_spectral_matrix_f0 : \n");

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
          for(i=0; i<NB_BINS_COMPRESSED_MATRIX_f0; i++){

            printf("Bin number: %d\n", i);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S11) (%.2d & --) => Re:%16.8e  Im:%16.8e\n",   1, 0,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+0], 0.);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S12) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 2, 1, 2,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+1], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+2]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S13) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 3, 3, 4,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+3], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+4]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S14) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 4, 5, 6,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+5], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+6]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S15) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 5, 7, 8,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+7], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+8]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S22) (%.2d & --) => Re:%16.8e  Im:%16.8e\n",   6, 9,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+9], 0.);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S23) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 7, 10, 11,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+10], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+11]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S24) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 8, 12, 13,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+12], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+13]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S25) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 9, 14, 15,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+14], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+15]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S33) (%.2d & --) => Re:%16.8e  Im:%16.8e\n",   10, 16,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+16], 0.);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S34) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 11, 17, 18,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+17], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+18]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S35) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 12, 19, 20,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+19], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+20]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S44) (%.2d & --) => Re:%16.8e  Im:%16.8e\n",   13, 21,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+21], 0.);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S45) (%.2d & %.2d) => Re:%16.8e  Im:%16.8e\n", 14, 22, 23,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+22], compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+23]);

        thomas
    
Basic parameters - LFR software ICD 1.8 - Version 1

              r2
            
            printf("Element %.2d (S55) (%.2d & --) => Re:%16.8e  Im:%16.8e\n",   15, 24,

        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
                   compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+24], 0.);

        thomas
    
Initial commit

              r0
            
        chust
    
version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)

              r5
            
          }

        thomas
    
Initial commit

              r0
            
          return 0;

      }

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	// In the frame of RPW LFR Sofware ICD Issue1 Rev8 (05/07/2013)
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	// version 1.0: 31/07/2013
chust version 1.2 qui règle le problème d'alignement mémoire pour BP1 (pour BP2 plus tard ...)	r6	// version 1.1: 02/04/2014
		// version 1.2: 30/04/2014
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2
thomas Initial commit	r0	#include <file_utilities.h>

thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	int lecture_file_sm(const char *fileName)
thomas Initial commit	r0	{
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	int i;
thomas Initial commit	r0
		FILE *infile;
thomas modification fonction lecture_file_sm()	r1	infile = fopen(fileName, "rb"); // open explicitely a binary file !!! ...
thomas Initial commit	r0	if(infile == NULL) {
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Hello I cannot open the file! \n");
thomas Initial commit	r0	return 0;
		}
		(void) fread(compressed_spectral_matrix_f0, sizeof(compressed_spectral_matrix_f0), 1, infile);
		(void) fclose(infile);
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	printf("size of compressed_spectral_matrix_f0 : %lu\n", sizeof(compressed_spectral_matrix_f0));
		printf("Number of bins: %d\n\n", NB_BINS_COMPRESSED_MATRIX_f0);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2
thomas Initial commit	r0	printf("compressed_spectral_matrix_f0 : \n");
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	for(i=0; i<NB_BINS_COMPRESSED_MATRIX_f0; i++){

		printf("Bin number: %d\n", i);

thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S11) (%.2d & --) => Re:%16.8e Im:%16.8e\n", 1, 0,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+0], 0.);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S12) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 2, 1, 2,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+1], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+2]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S13) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 3, 3, 4,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+3], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+4]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S14) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 4, 5, 6,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+5], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+6]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S15) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 5, 7, 8,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+7], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+8]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S22) (%.2d & --) => Re:%16.8e Im:%16.8e\n", 6, 9,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+9], 0.);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S23) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 7, 10, 11,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+10], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+11]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S24) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 8, 12, 13,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+12], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+13]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S25) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 9, 14, 15,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+14], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+15]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S33) (%.2d & --) => Re:%16.8e Im:%16.8e\n", 10, 16,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+16], 0.);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S34) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 11, 17, 18,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+17], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+18]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S35) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 12, 19, 20,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+19], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+20]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S44) (%.2d & --) => Re:%16.8e Im:%16.8e\n", 13, 21,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+21], 0.);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S45) (%.2d & %.2d) => Re:%16.8e Im:%16.8e\n", 14, 22, 23,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+22], compressed_spectral_matrix_f0[iNB_VALUES_PER_SPECTRAL_MATRIX+23]);
thomas Basic parameters - LFR software ICD 1.8 - Version 1	r2	printf("Element %.2d (S55) (%.2d & --) => Re:%16.8e Im:%16.8e\n", 15, 24,
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	compressed_spectral_matrix_f0[i*NB_VALUES_PER_SPECTRAL_MATRIX+24], 0.);
thomas Initial commit	r0
chust version 1.1 qui prends en compte les modifs de Paul (cependant question des short int à faire encore ...)	r5	}
thomas Initial commit	r0	return 0;
		}