/[PAMELA software]/rawreader/src/Main.cpp
ViewVC logotype

Annotation of /rawreader/src/Main.cpp

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.3 - (hide annotations) (download)
Sun Dec 10 12:52:43 2006 UTC (17 years, 11 months ago) by cafagna
Branch: MAIN
CVS Tags: v1r13
Changes since 1.2: +127 -88 lines 
*** empty log message ***
1 cafagna 1.1
2     #ifdef HAVE_CONFIG_H
3     #include <config.h>
4     #endif
5    
6     /***************MAIN********************************************/
7     #include "descript.h"
8     #include "flag.h"
9    
10     //mikhailov 06. 12. 2004. : initialization of global parameteres for time sync. it is used
11     //in in sort.cpp to convert OBT of Pamela to Moscow Time .
12     //this information is apdated in RunHeaderReader
13     long int RTtoMT,RT,Timesync,OBTtimesync; // Resurs time to moscow, Resurs time, ...
14    
15     void read(char [], char [], char [], char [], char [], char [],
16     char[], float [], int[], int &);
17     void verify(char [], char[], char [], char [], char [], char [], char [],
18 cafagna 1.2 char [], int[], float, int, int[]);
19 cafagna 1.1 void confluence(char [], char [], char [], char [], char [], int[]);
20     void sort(char [], char [], char [], char[], char [], int[]);
21    
22 cafagna 1.3 char MYSQL[80];
23     char database[80];
24     float YODA_flag;
25     float transmit_flag;
26     int print_flag;
27    
28 cafagna 1.1 int main(int argc, char *argv[])
29 cafagna 1.2 {
30 cafagna 1.3
31 cafagna 1.1 // char stop;
32     float IndexQ, quality[100]; /*Quality index*/
33     int real_route[64];
34     int rc=0;
35     int r_counter; /*Route counter*/
36    
37 cafagna 1.3 char MainPath[80]; /* /home/pamelaprod/rawreader/ */
38     char timesync[80];
39     char arina[80];
40 cafagna 1.1 char INF[80]; /*Full out information file name nnnnn_cln1.inf*/
41     char fni[80]; /*Full initial file name nnnnnmmm.pam*/
42     char fno[80]; /*Full out helping file name nnnnn_work.dat*/
43     char path[80]; /*Initial path*/
44 cafagna 1.3 char name[80]; /*Initial file name nnnnnmmm.pam*/
45 cafagna 1.1 char protocol[80]; /*Full out file name nnnnn_protocol.txt*/
46     char nnnnn_TMP[80]; /*Directory for processed data*/
47     char command[180]; /*DOS command*/
48     char str_del[80]; /*Delete Cln1 directory in case of good quality*/
49 cafagna 1.3 char temp[120]; /*For temporary file*/
50 cafagna 1.1 char temp1[80]; /*For temporary file*/
51     char temp2[80]; /*For temporary file*/
52     char temp3[80]; /*For temporary file*/
53     char temp4[80];
54    
55     char fni2[80]; /*Initial file mmm_nnnnn_cln1.pam*/
56     char inf2[80]; /*File name mmm_nnnnn_cln2.inf*/
57     char pam2[80]; /*File name mmm_nnnnn_cln2.pam*/
58     char name2[80]; /*Initial file name mmm_counter_nnnnn_cln1.pam*/
59     char name_ql[80]; /*File name mmm_nnnnn_ql.log*/
60     char log2[80]; /*File name mmm_nnnnn_cln2.log*/
61     char fno2[80]; /*Out help file mmm_nnnnn_work.dat*/
62     char path2[80]; /*Path for ...Temp/nnnnn_TMP/mmm/Cln2/*/
63     char mmm[80]; /*For route number*/
64     char name_route[4]; /*Route number in the file name*/
65    
66     char path3[80]; /*Path for ...Level0/nnnnn_mmm_L0/*/
67 cafagna 1.3 char exten[10]; /*Extension for the raw initial file*/
68     char temporary[80], Tymesync[80];
69 cafagna 1.1 int Rcount=0; /*Number of Routes*/
70     int packet_type[NumberPack]={0x07, 0x08, 0x09, 0x10, 0x11, 0x12, 0x13, 0x16, 0x17, 0x18, 0x19,
71     0x1A, 0x1B, 0x1C, 0x1D, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x30, 0x50, 0x51, 0x52, 0x53,
72     0x54, 0x55, 0x60, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x81, 0x82, 0x83, 0x84,
73     0x85, 0x86, 0x88, 0x89, 0x8A, 0xA1, 0xAB, 0xF0, 0xF1, 0xF2, 0xF3, 0xF4};/*PAMELA packet type code*/
74     int i, j;
75     int stop;
76    
77 cafagna 1.2 for (i=0;i<100;i++) quality[i]=0;
78     for (i=0;i<64;i++) real_route[i]=0;
79 cafagna 1.1
80     FILE *ftime_sync;
81     FILE *fff, *tmp, *tmp1, *tmp2, *tmp3, *tmp4;
82 cafagna 1.3 ifstream fpath;
83    
84     //Read parameters from the initial file
85     fpath.open("/home/pamelaprod/rawreader/bin/parameters.dat", ios::out);
86     if (!fpath) {cout<<"can not open file with input parameters \n"; exit(0);}
87     fpath.getline(MainPath, 80, '\n');
88     sscanf(MainPath,"%s",MainPath);
89     fpath.getline(timesync, 80, '\n');
90     sscanf(timesync,"%s",timesync);
91     fpath.getline(arina, 80, '\n');
92     sscanf(arina,"%s",arina);
93     fpath.getline(MYSQL, 80, '\n');
94     sscanf(MYSQL,"%s",MYSQL);
95     fpath.getline(database, 80, '\n');
96     sscanf(database,"%s",database);
97     fpath.getline(temp, 120, '\n');
98     sscanf(temp,"%f",&YODA_flag);
99     fpath.getline(temp, 120, '\n');
100     sscanf(temp,"%f",&transmit_flag);
101     fpath.getline(temp, 120, '\n');
102     sscanf(temp,"%i",&print_flag);
103    
104     /* cout<<MainPath<<"\n";
105     cout<<timesync<<"\n";
106     cout<<arina<<"\n";
107     cout<<MYSQL<<"\n";
108     cout<<database<<"\n";
109     cout<<YODA_flag<<"\n";
110     cout<<transmit_flag<<"\n";
111     cout<<print_flag<<"\n";*/
112    
113     fpath.close();
114 cafagna 1.2
115 cafagna 1.1 // mikhailov 06.12.2004
116 cafagna 1.3 ftime_sync=fopen(timesync,"r+");
117 cafagna 1.1 while(feof(ftime_sync)==0)
118 cafagna 1.2 {fscanf(ftime_sync,"%u%[ ]%u%[ ]%u%[ ]%u\n",&RTtoMT, temp, &RT, temp, &Timesync, temp, &OBTtimesync);}
119 cafagna 1.1 fclose(ftime_sync);
120     // end mikhailov
121    
122 cafagna 1.3 if (print_flag>0) cout<<"global_err="<<GLOBAL_LEN_ER<<"\n";
123 cafagna 1.1 strcpy(name,argv[2]);
124     name_route[0]=name[5];
125     name_route[1]=name[6];
126     name_route[2]=name[7];
127     name_route[3]='\0';
128 cafagna 1.2
129 cafagna 1.3 for(i=0;i<3;i++)
130     {exten[i]=name[i+9];}
131     exten[3]='\0';
132    
133     if ((strlen(argv[2])!=12)||(strncmp(exten,"pam",3)!=0)) {cout<<"WRONG RAW FILE NAME\n"; exit(0);}
134 cafagna 1.1
135 cafagna 1.3 strcpy(fni,argv[1]);
136     strcat(fni,argv[2]);
137    
138 cafagna 1.1 /**************Creation directory nnnnn**********************/
139 cafagna 1.2 strncat(strcpy(nnnnn_TMP,MainPath),argv[2],5);
140 cafagna 1.1 strcpy(temp,nnnnn_TMP);
141 cafagna 1.2 strcat(temp,"/tmp.dat");
142 cafagna 1.1
143     if ((tmp=fopen(temp,"w"))==0)
144     {
145 cafagna 1.2 strcpy(command,"mkdir ");
146 cafagna 1.1 strcat(command,nnnnn_TMP);
147     system(command);
148     }
149     else
150     {
151     printf("directory %s already exists - rewriting \n",strncat(strcpy(temp1," "),argv[2],5));
152     fclose(tmp);
153     remove(temp);
154     // exit(0);
155     }
156     /****************************************************************/
157    
158 cafagna 1.2 strcat(strncat(strcat( strcpy(INF,nnnnn_TMP),"/"),name,8),"_cln1.inf");
159     strcat(strcpy(path,nnnnn_TMP),"/");
160     strcat(strncat(strcat(strcpy(fno,nnnnn_TMP),"/"),name,8),"_work.dat");
161     strcat(strncat(strcat(strcpy(protocol,nnnnn_TMP),"/"),name,8),"_protocol.txt");
162 cafagna 1.1
163     if (VRL_HEADER>0)
164     {
165     /*Creation of directories nnnnn_TMP\mmm_counter and ...\Cln1 in filename.cpp*/
166     read(fni, fno, INF, protocol, path, name, nnnnn_TMP, quality, real_route, Rcount); ////////////////// //////////////
167     }
168     else
169     {
170     temp[0]=name[5];
171     temp[1]=name[6];
172     temp[2]=name[7];
173     temp[3]='\0';
174 cafagna 1.2 strcat(strcat(strcpy(temp1,nnnnn_TMP),"/"),temp);
175     strcat(strcpy(command,"mkdir "),temp1);
176 cafagna 1.1
177     system(command);
178 cafagna 1.2 strcat(temp1,"/Cln1");
179     strcat(strcpy(command,"mkdir "),temp1);
180 cafagna 1.1 system(command);
181     /**********Copy file to directory nnnnn_TMP\mmm\Cln1*************/
182 cafagna 1.2 strcat(strcat(strcat(strcat(strcat(strcpy(command,"cp "),fni)," "),temp1),"/"),name);
183    
184 cafagna 1.1 system(command);
185 cafagna 1.2 strcat(strcat(strcpy(temp2,temp1),"/"),name);
186     strcat(strcat(strcat(strcpy(temp3,temp1),"/"),temp),"_");
187 cafagna 1.1 strcat(strncat(temp3,name,5),"_cln1.pam");
188     rename(temp2,temp3);
189     }
190    
191 cafagna 1.3 if (CLN2_FLAG==1)
192 cafagna 1.1 {
193 cafagna 1.3 for(i=0;i<256;i++)
194     {
195     sprintf(temp4,"%03i",i);
196     sscanf(temp4,"%3s",mmm); mmm[3]='\0';
197     strcat(strcat(strcat(strcat(strcat(strcpy(temp1,nnnnn_TMP),"/"),name_route),"_"),mmm),"/tmp.dat");
198 cafagna 1.2
199 cafagna 1.3 if ((tmp1=fopen(temp1,"w"))!=0)
200 cafagna 1.1 {
201 cafagna 1.3 fclose(tmp1);
202     remove(temp1);
203     name2[0]='\0';
204     strcat(strcat(strcat(strcat(strcat(strncat(name2,name,5),"_"),name_route),"_"),mmm),"_cln1.pam");
205     if (CLN1_MEPHI==0)
206     {strcat(strcat(strcat(strcat(strcat(strcat(strcpy(fni2,nnnnn_TMP),"/"),name_route),"_"),mmm),"/Cln1/"),name2);}
207     else
208     {strcat(strcat(strncat(strcpy(fni2,""),nnnnn_TMP,strlen(nnnnn_TMP)-5),"Cln1/"),name2);}
209    
210     strcpy(temp4,path);
211     strcat(strcat(strcat(strcat(temp4,name_route),"_"),mmm),"/Cln2/tmp.dat");
212     if ((tmp4=fopen(temp4,"w"))==0)
213     {
214 cafagna 1.2 /**************Creation directory nnnnn\xxx_mmm\Cln2****************/
215 cafagna 1.3 strcat(strcat(strcat(strcat(strcat(strcat(strcpy(command,"mkdir "),nnnnn_TMP),"/"),name_route),"_"),mmm),"/Cln2");
216     system(command);
217 cafagna 1.1 /*******************************************************************/
218 cafagna 1.3 }
219     else
220     {
221     fclose(tmp4);
222     remove(temp4);
223     }
224     strcat(strcat(strcat(strcat(strcat(strcpy(path2,nnnnn_TMP),"/"),name_route),"_"),mmm),"/Cln2/");
225     strcat(strncat(strcpy(inf2,path2),name2,13),"_cln2.inf");
226     strcat(strncat(strcpy(log2,path2),name2,13),"_cln2.log");
227     strcat(strncat(strcpy(pam2,path2),name2,13),"_cln2.pam");
228     strcat(strncat(strcpy(fno2,path2),name2,13),"_work.dat");
229    
230     IndexQ=quality[i-1];
231     r_counter=i;
232     verify(fni2, inf2, log2, pam2, fno2, path2, name, name2, packet_type, IndexQ, r_counter, real_route); /////////////////////////////////
233     strcat(strcat(strcat(strcat(strcat(strcat(strcpy(fni2,nnnnn_TMP),"/"),name_route),"_"),mmm),"/Cln1/"),name2);
234     //Delete Cln1
235     if (IndexQ>0.999)
236     {strcpy(str_del,"rm -r -f ");
237     strncat(str_del,fni2,strlen(fni2)-22);
238     if (system(str_del)) cout<<"Can not delete Cln1 for counter="<<r_counter<<"\n";
239     }
240     strcat(strcat(strcat(strcat(strcat(strncat(strcpy(path3,MainPath),argv[2],5),"/"),name_route),"_"),mmm),"/packets");
241    
242     strcat(strcpy(temp2,path3),"/tmpM.dat");
243     if ((tmp2=fopen(temp2,"w"))==0)
244     {
245 cafagna 1.1 /**************Creation directory level0\nnnnn\counter_mmm\packets***************/
246 cafagna 1.3 strcat(strcpy(command,"mkdir "),path3);
247     system(command);
248 cafagna 1.1 /*******************************************************************/
249 cafagna 1.3 }
250     else
251     {
252     fclose(tmp2);
253     remove(temp2);
254     printf("directory for file %s already exists - rewriting \n",
255     strcat(strcat(strcat(strcat(strncat(strcpy(temp3," "),argv[2],5),"_"),name_route),"_"),mmm));
256     }
257     strcat(path3,"/");
258     sort(log2, pam2, path2, path3, name2, packet_type); /////////////////////////////////////
259     strcat(strncat(strcat(strcat(strcpy(name_ql,path3),mmm),"_"),argv[2],5),"_ql.log");
260     strcpy(temp3,"/home/pamelaprod/rawreader/bin/coordinate.exe");
261     if ((tmp3=fopen(temp3,"r"))==0)
262     {printf("file %s does not exist\n",temp3);}
263     else
264     {
265     fclose(tmp3);
266     strcat(strcat(strcpy(command,temp3)," "),name_ql);
267 cafagna 1.1 // system(command);
268 cafagna 1.3 }
269     }
270 cafagna 1.1 }
271     }
272    
273     return 0;
274     }
  ViewVC Help
Powered by ViewVC 1.1.23