calo/unpacking/testcrc.c

/***************************************************************
 *
 * routine read_ev: routine to extract an event information 
 * from file acquired with Pamela acquisition programs
 *
 * June 2002
 *
 ***************************************************************/
/*
 * include needed system headers
 */
#include <stdio.h>       /* include standard i/o library */
#include <stdlib.h>      /* include standard library */
#include <string.h>      /* include string library */
#include <unistd.h>      /* include unix standard library */
#include <sys/types.h>   /* */
#include <sys/stat.h>    /* */
#include <fcntl.h>       /* */
#include <errno.h>       /* error simbol definitions */
#include <time.h>        /* system time definitions */
#include <math.h>        /* math library */
#include "CRC.h"
//extern "C" {  
 extern struct {
     unsigned char buffer[16];
    } header_; 

    void data2ntp_();
    //Struct per il passaggio di dati da e verso la chiamata fortran
//}

void testcrc_(unsigned char *crc, int *error)
{
    int i,j;
    unsigned char ubuffer;
    unsigned char calcrc;
    unsigned char buff2[16];
    *error = 1; 

    j = 0;
    for (i = 0; i < 16; i++){
        //      memcpy(&ubuffer<<i, header_.buffer[i], sizeof(header_.buffer));
        if ( i < 8 ) {
            memcpy(&buff2[7-i], &header_.buffer[i], sizeof(header_.buffer[i]));
        } else {
            j++;
            memcpy(&buff2[16-j], &header_.buffer[i], sizeof(unsigned char));
        }
    }
    //    for (i = 0; i < 16; i++){
    //printf("%i : buff2  %X\n",i,buff2[i]);
    //}
    
    calcrc=CM_Compute_CRC16(0, &buff2, 15);

    //printf("%X = %X ? \n",calcrc,*crc);
    
    if ((unsigned char)calcrc == (unsigned char)*crc) *error = 0;

}
1	/***************************************************************
2	*
3	* routine read_ev: routine to extract an event information
4	* from file acquired with Pamela acquisition programs
5	*
6	* June 2002
7	*
8	***************************************************************/
9	/*
10	* include needed system headers
11	*/
12	#include <stdio.h> /* include standard i/o library */
13	#include <stdlib.h> /* include standard library */
14	#include <string.h> /* include string library */
15	#include <unistd.h> /* include unix standard library */
16	#include <sys/types.h> /* */
17	#include <sys/stat.h> /* */
18	#include <fcntl.h> /* */
19	#include <errno.h> /* error simbol definitions */
20	#include <time.h> /* system time definitions */
21	#include <math.h> /* math library */
22	#include "CRC.h"
23	//extern "C" {
24	extern struct {
25	unsigned char buffer[16];
26	} header_;
27
28	void data2ntp_();
29	//Struct per il passaggio di dati da e verso la chiamata fortran
30	//}
31
32	void testcrc_(unsigned char crc, int error)
33	{
34	int i,j;
35	unsigned char ubuffer;
36	unsigned char calcrc;
37	unsigned char buff2[16];
38	*error = 1;
39
40	j = 0;
41	for (i = 0; i < 16; i++){
42	// memcpy(&ubuffer<<i, header_.buffer[i], sizeof(header_.buffer));
43	if ( i < 8 ) {
44	memcpy(&buff2[7-i], &header_.buffer[i], sizeof(header_.buffer[i]));
45	} else {
46	j++;
47	memcpy(&buff2[16-j], &header_.buffer[i], sizeof(unsigned char));
48	}
49	}
50	// for (i = 0; i < 16; i++){
51	//printf("%i : buff2 %X\n",i,buff2[i]);
52	//}
53
54	calcrc=CM_Compute_CRC16(0, &buff2, 15);
55
56	//printf("%X = %X ? \n",calcrc,*crc);
57
58	if ((unsigned char)calcrc == (unsigned char)crc) error = 0;
59
60	}