5 Utility to simulate a DATE raw data stream using a given set of raw
6 data files and a configuration file.
10 V01.00 4/05/2004 RD Created
11 V01.01 25/10/2005 RD Support added for timestamp
12 V01.02 4/04/2006 RD Support for CDH
13 V01.03 24/05/2006 RD Added "Direct disk access" option
26 #define DESCRIPTION "DATE raw data stream simulator"
30 char fileHandlerIdent[]= "@(#)""" __FILE__ """: """ DESCRIPTION \
32 """ compiled """ __DATE__ """ """ __TIME__;
34 #define DBG_BASE if ( debug > 0 )
35 #define DBG_DETAILED if ( debug > 1 )
36 #define DBG_VERBOSE if ( debug > 2 )
39 # define TRUE (0 == 0)
42 # define FALSE (0 == 1)
48 typedef enum { unknown, ldc, gdc } workingAsType;
49 typedef enum { collider, fixedTarget } workingModeType;
50 workingAsType workingAs;
51 workingModeType workingMode;
52 struct ldcDescriptorStruct {
54 struct ldcDescriptorStruct *next;
55 } *ldcsHead, *ldcsTail;
56 void *eventsHead, *eventsTail;
57 struct gdcEventDescriptorStruct {
58 struct ldcEventDescriptorStruct *head;
59 struct ldcEventDescriptorStruct *tail;
60 struct gdcEventDescriptorStruct *next;
61 struct eventHeaderStruct header;
64 struct ldcEventDescriptorStruct {
65 struct equipmentEventDescriptorStruct *head;
66 struct equipmentEventDescriptorStruct *tail;
67 struct ldcEventDescriptorStruct *next;
69 struct eventHeaderStruct header;
72 struct equipmentEventDescriptorStruct {
73 struct equipmentEventDescriptorStruct *next;
75 struct payloadDescriptorStruct *payload;
76 struct equipmentHeaderStruct header;
78 struct payloadDescriptorStruct {
79 struct payloadDescriptorStruct *next;
84 } *payloadsHead, *payloadsTail;
86 eventGdcIdType currGdcId;
87 eventLdcIdType currLdcId;
88 equipmentIdType currEquipmentId;
94 eventIdType oneEventDelta;
95 eventIdType currEventId;
99 void dumpPayload( const struct payloadDescriptorStruct *p ) {
104 if ( p->data != NULL ) {
105 for ( i = 0, c = (char *)p->data, printable = TRUE;
106 printable && i != p->size;
108 printable = isascii( *c );
111 for ( i = 0, c = (char *)p->data; i != p->size; c++, i++ ) {
117 if ( *c != '\n' ) printf( "\"\n" );
120 for ( i = 0, v = (long32 *)p->data;
123 if ( i % (4*8) == 0 ) {
124 if ( i != 0 ) printf( "\n" );
127 printf( "%08x ", *v );
133 while ( i != p->size ) {
134 printf( "%02x ", *((char *)p->data + p->size - j - 1) & 0xff );
142 } /* End of dumpPayload */
145 assert( workingAs == ldc || workingAs == gdc );
146 if ( eventsHead != NULL ) {
147 printf( "Events:\n" );
148 if ( workingAs == gdc ) {
149 struct gdcEventDescriptorStruct *gdc;
151 for ( gdc = (struct gdcEventDescriptorStruct *)eventsHead;
154 struct ldcEventDescriptorStruct *ldc;
156 printf( " GDC (%p)\n", gdc );
157 for ( ldc = gdc->head; ldc != NULL; ldc = ldc->next ) {
158 struct equipmentEventDescriptorStruct *eq;
160 printf( " LDC (%p): %d\n", ldc, ldc->id );
161 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
162 printf( " EQUIPMENT (%p): %d PAYLOAD (%p):",
167 printf( "\"%s\" (%d bytes)\n",
168 eq->payload->fileName,
170 dumpPayload( eq->payload );
175 if ( workingAs == ldc ) {
176 struct ldcEventDescriptorStruct *ldc;
178 for ( ldc = (struct ldcEventDescriptorStruct *)eventsHead;
181 struct equipmentEventDescriptorStruct *eq;
184 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
185 printf( " EQUIPMENT (%p): %d PAYLOAD (%p):",
190 printf( "\"%s\" (%d bytes)\n",
191 eq->payload->fileName,
193 dumpPayload( eq->payload );
198 printf( "Events: EMPTY\n" );
200 } /* End of dumpEvents */
202 void getLine( char *line, const int maxSize ) {
206 for ( read = 0; !feof( stdin ) && !ferror( stdin ) && read != maxSize; read++ ) {
207 if ( (line[read] = getchar()) == '\n' ) break;
209 if ( ferror( stdin ) ) {
211 "%s: failed to read configuration input errno:%d ",
216 if ( feof( stdin ) ) read--;
217 if ( read == maxSize && line[read] != '\n' ) {
219 "%s: Input line # %d too long (%d chars max)\n",
220 myName, lineNo, maxSize-1 );
225 if ( !( read == 0 && feof( stdin ) ) ) {
226 printf( "%d) [%3d] \"%s\"", lineNo, read, line );
229 for ( c = 0; c != read; c++ ) {
230 if ( line[c] == '#' ) {
237 printf( " => \"%s\"", line );
239 if ( feof( stdin ) ) printf( "<<< EOF >>>" );
240 if ( ferror( stdin ) ) printf( "<<< FERROR >>>" );
243 } /* End of getLine */
245 void handleLdc( eventLdcIdType ldcId ) {
246 struct ldcDescriptorStruct *ldc;
248 if ( ldcsHead != NULL ) {
249 for ( ldc = ldcsHead; ldc != NULL; ldc = ldc->next ) {
250 if ( ldc->id == ldcId ) {
255 if ( (ldc = (struct ldcDescriptorStruct *)malloc( sizeof( *ldc ) )) == NULL ) {
257 "%s: Failed to malloc for %d bytes (struct ldcDescriptorStruct)\n",
258 myName, (int)sizeof( *ldc ) );
263 if ( ldcsHead == NULL ) {
264 ldcsHead = ldcsTail = ldc;
266 ldcsTail->next = ldc;
270 } /* End of handleLdc */
272 void createNewEvent() {
273 assert( workingAs == ldc || workingAs == gdc );
274 if ( workingAs == ldc ) {
275 struct ldcEventDescriptorStruct *p;
277 if ( (p = (struct ldcEventDescriptorStruct *)malloc( sizeof( *p ) ))
280 "%s: failed to malloc for %d bytes (createNewEvent: struct ldcEventDescriptorStruct)",
281 myName, (int)sizeof( *p ) );
286 p->head = p->tail = NULL;
289 if ( eventsHead == NULL ) {
290 eventsHead = eventsTail = p;
292 struct ldcEventDescriptorStruct *q =
293 (struct ldcEventDescriptorStruct *)eventsTail;
299 } else if ( workingAs == gdc ) {
300 struct gdcEventDescriptorStruct *p;
302 if ( (p = (struct gdcEventDescriptorStruct *)malloc( sizeof( *p ) ))
305 "%s: failed to malloc for %d bytes (createNewEvent: struct gdcEventDescriptorStruct)",
306 myName, (int)sizeof( *p ) );
312 p->head = p->tail = NULL;
314 if ( eventsHead == NULL ) {
315 eventsHead = eventsTail = p;
317 struct gdcEventDescriptorStruct *q =
318 (struct gdcEventDescriptorStruct *)eventsTail;
324 } /* End of createNewEvent */
326 void createNewLdcEvent() {
327 struct gdcEventDescriptorStruct *gdcDesc;
328 struct ldcEventDescriptorStruct *p;
330 if ( (p = (struct ldcEventDescriptorStruct *)malloc( sizeof( *p ) ))
333 "%s: failed to malloc for %d bytes (createNewLdcEvent: struct ldcEventDescriptorStruct)",
334 myName, (int)sizeof( *p ) );
339 p->head = p->tail = NULL;
341 gdcDesc = (struct gdcEventDescriptorStruct *)eventsTail;
342 if ( gdcDesc->head == NULL ) {
343 gdcDesc->head = gdcDesc->tail = p;
345 gdcDesc->tail->next = p;
349 } /* End of createNewLdcEvent */
351 void loadBuffer( struct payloadDescriptorStruct * const payload ) {
355 if ( (f = fopen( payload->fileName, "r" )) == NULL ) {
357 "%s: line:%d payload file \"%s\" not found or not readable, errno:%d. ",
362 perror( "System-dependent error " );
365 if ( (payload->data = malloc( payload->size )) == NULL ) {
367 "%s: line:%d Failed to malloc for payload file \"%s\" size:%d errno:%d ",
373 perror( "System-dependent status " );
376 if ( (bytesRead = fread( payload->data, payload->fileSize, 1, f )) != 1 ) {
378 "%s: line:%d Failed to read payload file \"%s\" size:%d requested:1 got:%d feof:%s ferror:%s errno:%d ",
384 feof(f) ? "TRUE" : "false",
385 ferror(f) ? "TRUE" : "false",
387 perror( "System-dependent status " );
391 if ( payload->size != payload->fileSize ) {
392 memset( (char *)payload->data + payload->fileSize,
394 payload->size - payload->fileSize );
396 } /* End of loadBuffer */
398 void unloadBuffer( struct payloadDescriptorStruct * const payload ) {
399 if ( payload->data != NULL ) {
400 free( payload->data );
401 payload->data = NULL;
403 } /* End of unloadBuffer */
405 void unloadAllBuffers() {
406 struct payloadDescriptorStruct *payload;
408 for ( payload = payloadsHead; payload != NULL; payload = payload->next ) {
409 unloadBuffer( payload );
411 } /* End of unloadAllBuffers */
413 void loadPayload( const char *fileName ) {
414 struct payloadDescriptorStruct *payload;
416 for ( payload = payloadsHead; payload != NULL; payload = payload->next ) {
417 if ( strcmp( fileName, payload->fileName ) == 0 )
420 if ( payload == NULL ) {
423 if ( (payload = (struct payloadDescriptorStruct *)malloc( sizeof( *payload ) ))
426 "%s: failed to malloc for %d bytes (loadPayload/payloadDescriptorStruct)\n",
428 (int)sizeof( *payload ) );
431 if ( (payload->fileName = strdup( fileName )) == NULL ) {
433 "%s: failed to duplicate string \"%s\" (loadPaload/fileName)\n",
438 if ( (f = fopen( fileName, "r" )) == NULL ) {
440 "%s: line:%d payload file \"%s\" not found or not readable, errno:%d. ",
445 perror( "System-dependent error " );
448 if ( fseek( f, 0L, SEEK_END ) != 0 ) {
450 "%s: line:%d Failed to seek payload file \"%s\" errno:%d ",
455 perror( "System-dependent error " );
458 if ( (payload->size = ftell( f )) <= 0 ) {
460 "%s: line:%d Failed to get file \"%s\" size size:%d errno:%d ",
466 perror( "System-dependent status " );
469 payload->fileSize = payload->size;
470 while ( (payload->size & 3) != 0 ) payload->size++;
474 loadBuffer( payload );
476 payload->data = NULL;
479 payload->next = NULL;
480 if ( payloadsHead == NULL ) {
481 payloadsHead = payloadsTail = payload;
483 payloadsTail->next = payload;
484 payloadsTail = payload;
489 printf( "%d) Payload \"%s\" loaded at %p\n",
495 struct commonDataHeaderStruct *cdh =
496 (struct commonDataHeaderStruct *)payload->data;
498 printf( " CDH: blockLenght:%d=0x%08x ",
499 cdh->cdhBlockLength, cdh->cdhBlockLength );
500 if ( cdh->cdhBlockLength < sizeof( *cdh ) ) {
501 printf( "TOO SMALL (minimum:%ld=0x%08lx)\n",
502 (unsigned long)sizeof( *cdh ),
503 (unsigned long)sizeof( *cdh ) );
505 printf( "version:%d=0x%x ", cdh->cdhVersion, cdh->cdhVersion );
506 if ( cdh->cdhVersion != CDH_VERSION ) {
507 printf( "EXPECTED:%d=%x (decoding may be inaccurate) ",
508 CDH_VERSION, CDH_VERSION );
511 printf( "L1TriggerMessage:0x%x", cdh->cdhL1TriggerMessage );
512 if ( cdh->cdhL1TriggerMessage != 0 ) {
513 for ( b = 0, n = 0; b != 10; b++ ) {
514 if ( (cdh->cdhL1TriggerMessage & (1<<b)) != 0 ) {
515 if ( n++ != 0 )printf( "+" );
517 case 0: printf( "L1SwC" ); break;
518 case 1: printf( "ESR" ); break;
519 case 2: printf( "RoC1" ); break;
520 case 3: printf( "RoC2" ); break;
521 case 4: printf( "RoC3" ); break;
522 case 5: printf( "RoC4" ); break;
523 case 6: printf( "ClT" ); break;
524 default: printf( "spare %d", b+14 );
531 if ( cdh->cdhMBZ0 != 0 )
532 printf( "MBZ0:0x%x ",
537 printf( "EventId2(orbit):%d=0x%x ",
538 cdh->cdhEventId2, cdh->cdhEventId2 );
539 printf( "EventId1(bunchCrossing):%d=0x%x ",
540 cdh->cdhEventId1, cdh->cdhEventId1 );
544 if ( cdh->cdhMBZ1 != 0 )
545 printf( "MBZ1:0x%x ",
547 printf( "BlockAttributes:0x%x",
548 cdh->cdhBlockAttributes );
549 if ( cdh->cdhBlockAttributes != 0 ) {
551 for ( b = 0, n = 0; b != 8; b++ ) {
552 if ( (cdh->cdhBlockAttributes & (1<<b)) != 0 ) {
561 printf( "ParticipatingSubDetectors:0x%x ",
562 cdh->cdhParticipatingSubDetectors );
566 if ( cdh->cdhMBZ2 != 0 )
567 printf( "MBZ2:0x%x ",
569 printf( "Status/Error:0x%x", cdh->cdhStatusErrorBits );
570 if ( cdh->cdhStatusErrorBits != 0 ) {
572 for ( b = 0,n = 0; b != 16; b++ ) {
573 if ( (cdh->cdhStatusErrorBits & (1<<b)) != 0 ) {
574 if ( n++ != 0 ) printf( "+" );
576 case 0: printf( "TriggerOverLapError" ); break;
577 case 1: printf( "TriggerMissingError" ); break;
578 case 2: printf( "DataParityError" ); break;
579 case 3: printf( "ControlParityError" ); break;
580 case 4: printf( "TriggerInformationUnavailable" ); break;
581 case 5: printf( "FEEError" ); break;
582 case 6: printf( "HLTDecision" ); break;
583 case 7: printf( "HLTPayload" ); break;
584 case 8: printf( "DDGPayload" ); break;
585 default: printf( "spare %d", b );
592 printf( "MiniEventId(bunchCrossing):%d=0x%x ",
593 cdh->cdhMiniEventId, cdh->cdhMiniEventId );
597 printf( "Trigger classes: 0x(%05x-%08x)",
598 cdh->cdhTriggerClassesHigh,
599 cdh->cdhTriggerClassesLow );
600 if ( cdh->cdhTriggerClassesHigh != 0
601 || cdh->cdhTriggerClassesLow != 0 ) {
603 for ( b=0, n=0; b != 32; b++ ) {
604 if ( (cdh->cdhTriggerClassesLow & (1<<b)) != 0 ) {
605 if ( n++ != 0 ) printf( "+" );
609 for ( b=0; b != 18; b++ ) {
610 if ( (cdh->cdhTriggerClassesHigh & (1<<b)) != 0 ) {
611 if ( n++ != 0 ) printf( "+" );
612 printf( "%d", b+32 );
620 if ( cdh->cdhMBZ3 != 0 ) {
621 printf( "MBZ3:0x%x ",
624 printf( "ROI:0x(%08x-%01x)", cdh->cdhRoiHigh, cdh->cdhRoiLow );
625 if ( cdh->cdhRoiHigh != 0
626 || cdh->cdhRoiLow != 0 ) {
628 for ( b=0, n=0; b != 5; b++ ) {
629 if ( (cdh->cdhRoiLow & (1<<b)) != 0 ) {
630 if ( n++ != 0 ) printf( "+" );
634 for ( b=0; b != 32; b++ ) {
635 if ( (cdh->cdhRoiHigh & (1<<b)) != 0 ) {
636 if ( n++ != 0 ) printf( "+" );
648 printf( "%d) Payload \"%s\" already loaded at %p\n",
654 currEvent->payload = payload;
655 } /* End of loadPayload */
657 void parseEquipment( char * const line ) {
658 struct equipmentEventDescriptorStruct *equipment;
659 int payloadFound = FALSE;
664 (struct equipmentEventDescriptorStruct *)malloc( sizeof( *equipment ) )) == NULL ) {
666 "%s: filed to malloc for %d bytes (parseEquipment/equipmentEventDescriptorStruct) errno:%d ",
668 (int)sizeof( *equipment ),
673 currEvent = equipment;
676 while ( (keyword = strtok_r( p, " \t", &p )) != NULL ) {
677 DBG_VERBOSE printf( "%d) Equipment - Keyword:\"%s\"\n",
680 if ( strcasecmp( "id", keyword ) == 0 ) {
683 if ( (idNum = strtok_r( p, " \t", &p )) == NULL ) {
685 "%s: line:%d EQUIPMENT declaration, ID needed",
690 if ( sscanf( idNum, "%d", &currEquipmentId ) != 1 ) {
692 "%s: line:%d EQUIPMENT declaration, numeric ID needed (%s)",
698 DBG_VERBOSE printf( "%d) EQUIPMENT - ID:%d\n",
701 } else if ( strncasecmp( "pay", keyword, 3 ) == 0 ) {
704 if ( (fileName = strtok_r( p, " \t", &p )) == NULL ) {
706 "%s line:%d Payload without filename found\n",
711 DBG_VERBOSE printf( "%d) Equipment - Payload:\"%s\"\n",
714 if ( payloadFound ) {
716 "%s line:%d Payload with multiple filenames found\n",
721 loadPayload( fileName );
725 "%s: line:%d Equipment declaration, unknown keyword \"%s\"\n",
732 if ( !payloadFound ) {
734 "%s: line:%d Equipment without payload found\n",
740 equipment->id = currEquipmentId;
741 equipment->next = NULL;
742 if ( currLdc->head == NULL ) {
743 currLdc->head = currLdc->tail = equipment;
745 currLdc->tail->next = equipment;
746 currLdc->tail = equipment;
748 } /* End of parseEquipment */
750 void parseGdc( char * const line ) {
755 while ( (keyword = strtok_r( p, " \t", &p )) != NULL ) {
756 if ( strcasecmp( "id", keyword ) == 0 ) {
759 if ( (idNum = strtok_r( p, " \t", &p )) == NULL ) {
761 "%s: line:%d GDC declaration, ID needed",
766 if ( sscanf( idNum, "%d", &currGdcId ) != 1 ) {
768 "%s: line:%d GDC declaration, numeric ID needed (%s)",
774 DBG_VERBOSE printf( "%d) GDC - ID:%d\n",
779 "%s: line:%d GDC declaration, unknown keyword \"%s\"\n",
786 } /* End of parseGdc */
788 void parseLdc( char * const line ) {
793 while ( (keyword = strtok_r( p, " \t", &p )) != NULL ) {
794 if ( strcasecmp( "id", keyword ) == 0 ) {
797 if ( (idNum = strtok_r( p, " \t", &p )) == NULL ) {
799 "%s: line:%d LDC declaration, ID needed",
804 if ( sscanf( idNum, "%d", &currLdcId ) != 1 ) {
806 "%s: line:%d LDC declaration, numeric ID needed (%s)",
812 DBG_VERBOSE printf( "%d) LDC - ID:%d\n",
817 "%s: line:%d LDC declaration, unknown keyword \"%s\"\n",
824 } /* End of parseLdc */
829 currLdcId = HOST_ID_MIN;
830 currGdcId = HOST_ID_MIN;
832 for ( lineNo = 1; !feof( stdin ); lineNo++ ) {
833 getLine( line, sizeof(line) );
834 if ( strlen(line) != 0 ) {
838 if ( (keyword = strtok_r( line, " \t", &p )) != NULL ) {
839 DBG_VERBOSE printf( "%d) Keyword:\"%s\"\n", lineNo, keyword );
840 if ( strcasecmp( "gdc", keyword ) == 0 ) {
841 if ( workingAs != gdc && workingAs != unknown ) {
843 "%s: line:%d GDC found when working in non-GDC mode (e.g. as a LDC)\n",
850 currLdcId = HOST_ID_MIN;
853 } else if ( strcasecmp( "ldc", keyword ) == 0 ) {
854 if ( workingAs != gdc && workingAs != ldc && workingAs != unknown ) {
856 "%s: line:%d LDC found when working in non-LDC/GDC mode\n",
860 if ( workingAs == unknown ) workingAs = ldc;
862 if ( workingAs == ldc ) {
867 handleLdc( currLdcId );
871 } else if ( strncasecmp( "equ", keyword, 3 ) == 0 ) {
872 if ( workingAs == unknown
873 || (workingAs == ldc && currLdc == NULL )
874 || (workingAs == gdc && currGdc == NULL ) ) {
876 "%s: line:%d Unexpected EQUIPMENT declaration (LDC or GDC needed first)\n",
885 "%s: line:%d Parse error in \"%s\" unknown keyword\n",
893 } while ( !feof( stdin ) );
897 printf( "End of parse: %d line%s found\n",
899 lineNo != 1 ? "s" : "" );
900 printf( "Working as %s\n",
901 workingAs == gdc ? "GDC" :
902 workingAs == ldc ? "LDC" :
904 if ( workingAs == gdc ) {
905 struct ldcDescriptorStruct *ldc;
907 printf( "LDCs (%d):", numOfLdcs );
908 for ( ldc = ldcsHead; ldc != NULL; ldc = ldc->next ) {
909 printf( " %d", ldc->id );
916 if ( workingAs == ldc ) {
917 assert( ldcsHead == ldcsTail );
918 assert( ldcsTail == NULL );
921 if ( workingAs == gdc ) {
922 struct ldcDescriptorStruct *ldc;
924 assert( ldcsHead != NULL );
925 assert( ldcsTail != NULL );
926 assert( ldcsTail->next == NULL );
927 for ( ldc = ldcsHead; ldc->next != NULL; ldc = ldc->next );
928 assert ( ldc == ldcsTail );
931 if ( workingAs == unknown ) {
932 DBG_VERBOSE printf( "Empty configuration: nothing to do!\n" );
936 assert( (eventsHead == NULL && eventsTail == NULL)
937 || (eventsHead != NULL && eventsTail != NULL) );
938 } /* End of parseRules */
940 void loadTimestamp( struct eventHeaderStruct * const ev ) {
943 if ( time( &t ) == (time_t)-1 ) {
945 "%s: failed to get system time errno:%d (%s)\n",
946 myName, errno, strerror( errno ) );
949 ev->eventTimestamp = (eventTimestampType)t;
950 } /* End of loadTimestamp */
952 void initEvent( struct eventHeaderStruct * const ev ) {
953 memset( ev, 0, sizeof( *ev ) );
955 ev->eventMagic = EVENT_MAGIC_NUMBER;
956 ev->eventHeadSize = EVENT_HEAD_BASE_SIZE;
957 ev->eventVersion = EVENT_CURRENT_VERSION;
958 ev->eventRunNb = currRunNb;
959 ZERO_EVENT_ID( ev->eventId );
960 ZERO_TRIGGER_PATTERN( ev->eventTriggerPattern );
961 ZERO_DETECTOR_PATTERN( ev->eventDetectorPattern );
962 RESET_ATTRIBUTES( ev->eventTypeAttribute );
963 if ( workingMode == collider )
964 SET_SYSTEM_ATTRIBUTE( ev->eventTypeAttribute, ATTR_ORBIT_BC );
965 ev->eventLdcId = VOID_ID;
966 ev->eventGdcId = VOID_ID;
968 } /* End of initEvent */
972 // Swap the endianess of the integer value 'x'
974 return (((x & 0x000000ffU) << 24) | ((x & 0x0000ff00U) << 8) |
975 ((x & 0x00ff0000U) >> 8) | ((x & 0xff000000U) >> 24));
978 void outputEvent( const void * const ev,
983 const long32 * const v = (long32 *)ev;
984 printf( "Writing %d bytes @ %p (%d)\n", size, ev, *v );
987 // .............................Test endianess..............................
989 char* ptemp = (char*) &temp;
991 if (ptemp[0]!=1) { // Mac platform: ptemp != 1..............................................................................
992 int bufSize= size; if (bufSize > (int) sizeof(eventHeaderStruct)) { bufSize = sizeof(eventHeaderStruct); }
993 char* evTemp = (char*) malloc (bufSize);
994 memcpy(evTemp, ev, bufSize);
996 if ((bufSize % sizeof(int)) != 0) {
997 fprintf( stderr, "%s: size of the input buffer ev is not multiple of 4 (size = %d)\n", myName, bufSize);
1001 // Invert header to evTemp.....................................................
1002 int* buf = (int*) evTemp;
1003 for (int i=0; i < (int) (bufSize / sizeof(int)); i++, buf++) {
1004 int value = Swap(*buf);
1005 memcpy(evTemp + (i * sizeof(int)), &value, sizeof(int));
1008 // Write inverted header to file...............................................
1009 if ((done = fwrite( evTemp, bufSize, 1, outF )) != 1 ) {
1010 fprintf( stderr, "%s: failed to write inverted header. event size:%d bytes, errno:%d (%s)\n", myName, size, errno, strerror( errno ) );
1014 if (size > bufSize) { // Still theraw-data payload to write (but not inverted, since it is inverted eariler).............
1015 if ((done = fwrite( (char*)ev + bufSize, size - bufSize, 1, outF )) != 1 ) {
1016 fprintf( stderr, "%s: failed to write additional event size:%d bytes, errno:%d (%s)\n", myName, size, errno, strerror( errno ) );
1023 else { // Intel platform: ptemp == 1............................................................................
1024 if ((done = fwrite( ev, size, 1, outF )) != 1 ) {
1025 fprintf( stderr, "%s: failed to write event size:%d bytes, errno:%d (%s)\n", myName, size, errno, strerror( errno ) );
1029 } /* End of outputEvent */
1031 void createSorAndEor( const int sor ) {
1032 unsigned char event[ 1000 ];
1033 struct eventHeaderStruct *ev;
1034 struct eventHeaderStruct sev;
1036 assert( workingAs == ldc || workingAs == gdc );
1038 if ( !createSorEor ) return;
1039 ev = (struct eventHeaderStruct *)event;
1041 ev->eventSize = sizeof( event );
1042 ev->eventType = sor ? START_OF_RUN : END_OF_RUN;
1043 if ( workingMode == fixedTarget )
1044 LOAD_RAW_EVENT_ID( ev->eventId, 0, 0, 0 );
1046 LOAD_EVENT_ID( ev->eventId, 0, 0, 0 );
1047 SET_SYSTEM_ATTRIBUTE( ev->eventTypeAttribute, ATTR_P_START );
1049 if ( workingAs == ldc ) {
1050 currLdc = (struct ldcEventDescriptorStruct *)eventsHead;
1052 if ( workingAs == gdc ) {
1054 sev.eventGdcId = currGdcId;
1055 ev->eventGdcId = currGdcId;
1056 currGdc = (struct gdcEventDescriptorStruct *)eventsHead;
1057 currLdc = currGdc->head;
1059 ev->eventLdcId = currLdc->id;
1061 if ( workingAs == ldc ) {
1062 loadTimestamp( ev );
1063 outputEvent( ev, ev->eventSize );
1065 if ( workingAs == gdc ) {
1066 struct ldcDescriptorStruct *ldc;
1068 loadTimestamp( ev );
1070 sev.eventSize = sizeof( sev ) + numOfLdcs * ev->eventSize;
1071 sev.eventType = sor ? START_OF_RUN : END_OF_RUN ;
1072 COPY_EVENT_ID( ev->eventId, sev.eventId );
1073 COPY_SYSTEM_ATTRIBUTES( ev->eventTypeAttribute, sev.eventTypeAttribute );
1074 SET_SYSTEM_ATTRIBUTE( sev.eventTypeAttribute, ATTR_SUPER_EVENT );
1075 loadTimestamp( &sev );
1076 outputEvent( &sev, sizeof( sev ) );
1078 ev->eventGdcId = currGdcId;
1079 for ( ldc = ldcsHead; ldc != NULL; ldc = ldc->next ) {
1080 ev->eventLdcId = ldc->id;
1081 outputEvent( ev, ev->eventSize );
1085 ADD_EVENT_ID( ev->eventId, oneEventDelta );
1086 ev->eventSize = ev->eventSize / 2;
1087 ev->eventType = sor ? START_OF_RUN_FILES : END_OF_RUN_FILES;
1088 CLEAR_SYSTEM_ATTRIBUTE( ev->eventTypeAttribute, ATTR_P_START );
1089 if ( workingAs == ldc ) {
1090 loadTimestamp( ev );
1091 outputEvent( ev, ev->eventSize );
1093 if ( workingAs == gdc ) {
1094 struct ldcDescriptorStruct *ldc;
1096 loadTimestamp( ev );
1098 sev.eventSize = ev->eventSize;
1099 sev.eventType = sor ? START_OF_RUN_FILES : END_OF_RUN_FILES;
1100 COPY_EVENT_ID( ev->eventId, sev.eventId );
1101 COPY_SYSTEM_ATTRIBUTES( ev->eventTypeAttribute, sev.eventTypeAttribute );
1102 CLEAR_SYSTEM_ATTRIBUTE( sev.eventTypeAttribute, ATTR_SUPER_EVENT );
1103 outputEvent( &sev, sizeof( sev ) );
1104 outputEvent( ev, ev->eventSize - sizeof( sev ) );
1106 sev.eventSize = sizeof( sev ) + ev->eventSize;
1107 sev.eventType = sor ? START_OF_RUN_FILES : END_OF_RUN_FILES;
1108 COPY_EVENT_ID( ev->eventId, sev.eventId );
1109 COPY_SYSTEM_ATTRIBUTES( ev->eventTypeAttribute, sev.eventTypeAttribute );
1110 SET_SYSTEM_ATTRIBUTE( sev.eventTypeAttribute, ATTR_SUPER_EVENT );
1112 loadTimestamp( &sev );
1114 ev->eventGdcId = currGdcId;
1115 for ( ldc = ldcsHead; ldc != NULL; ldc = ldc->next ) {
1116 loadTimestamp( &sev );
1117 outputEvent( &sev, sizeof( sev ) );
1118 ev->eventLdcId = ldc->id;
1119 outputEvent( ev, ev->eventSize );
1123 ADD_EVENT_ID( ev->eventId, oneEventDelta );
1124 ev->eventSize = sizeof( *ev );
1125 ev->eventType = sor ? START_OF_RUN : END_OF_RUN;
1126 SET_SYSTEM_ATTRIBUTE( ev->eventTypeAttribute, ATTR_P_END );
1127 if ( workingAs == ldc ) {
1128 loadTimestamp( ev );
1129 outputEvent( ev, ev->eventSize );
1131 if ( workingAs == gdc ) {
1132 struct ldcDescriptorStruct *ldc;
1134 loadTimestamp( ev );
1136 sev.eventSize = sizeof( sev ) + numOfLdcs * ev->eventSize;
1137 sev.eventType = sor ? START_OF_RUN : END_OF_RUN;
1138 COPY_EVENT_ID( ev->eventId, sev.eventId );
1139 COPY_SYSTEM_ATTRIBUTES( ev->eventTypeAttribute, sev.eventTypeAttribute );
1140 SET_SYSTEM_ATTRIBUTE( sev.eventTypeAttribute, ATTR_SUPER_EVENT );
1141 loadTimestamp( &sev );
1143 outputEvent( &sev, sizeof( sev ) );
1145 for ( ldc = ldcsHead; ldc != NULL; ldc = ldc->next ) {
1146 ev->eventLdcId = ldc->id;
1147 outputEvent( ev, ev->eventSize );
1150 } /* End of createSorEor */
1153 createSorAndEor( TRUE );
1154 } /* End of createSor */
1157 createSorAndEor( FALSE );
1158 } /* End of createEor */
1160 void loadCdh( struct commonDataHeaderStruct * const cdh,
1161 eventIdType * const eventId ) {
1162 if ( !handleCDH ) return;
1164 if ( gotAliceTrigger ) {
1165 cdh->cdhEventId1 = EVENT_ID_GET_BUNCH_CROSSING( *eventId );
1166 cdh->cdhEventId2 = EVENT_ID_GET_ORBIT( *eventId );
1168 cdh->cdhEventId1 = 0;
1169 cdh->cdhEventId2 = EVENT_ID_GET_NB_IN_RUN( *eventId );
1171 cdh->cdhMiniEventId = cdh->cdhEventId1;
1173 void decodeCDH( struct ldcEventDescriptorStruct * const ldc,
1174 const struct payloadDescriptorStruct * const payloadDesc );
1176 void createEvent( void ) {
1177 assert( workingAs == ldc || workingAs == gdc );
1179 /* Step 1: load all buffers (if needed) and compose the GDC/LDC headers */
1180 if ( workingAs == gdc ) {
1181 struct ldcEventDescriptorStruct *ldc;
1183 for( ldc = currGdc->head; ldc != NULL; ldc = ldc->next ) {
1184 COPY_EVENT_ID( currEventId, ldc->header.eventId );
1185 loadTimestamp( &ldc->header );
1187 COPY_EVENT_ID( currEventId, currGdc->header.eventId );
1188 loadTimestamp( &currGdc->header );
1190 for( ldc = currGdc->head; ldc != NULL; ldc = ldc->next ) {
1191 struct equipmentEventDescriptorStruct *eq;
1194 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1195 if ( !bufferData ) {
1196 loadBuffer( eq->payload );
1197 if ( !currGdc->loaded ) decodeCDH( ldc, eq->payload );
1199 loadCdh( (struct commonDataHeaderStruct*)eq->payload->data,
1203 if ( !currGdc->loaded ) {
1204 for ( n = 0; n != EVENT_TRIGGER_PATTERN_WORDS; n++ )
1205 currGdc->header.eventTriggerPattern[n] |= ldc->header.eventTriggerPattern[n];
1206 for ( n = 0; n != EVENT_DETECTOR_PATTERN_WORDS; n++ )
1207 currGdc->header.eventDetectorPattern[n] |= ldc->header.eventDetectorPattern[n];
1208 for ( n = 0; n != ALL_ATTRIBUTE_WORDS; n++ )
1209 currGdc->header.eventTypeAttribute[n] |= ldc->header.eventTypeAttribute[n];
1210 currGdc->loaded = TRUE;
1213 } else if ( workingAs == ldc ) {
1214 struct equipmentEventDescriptorStruct *eq;
1216 COPY_EVENT_ID( currEventId, currLdc->header.eventId );
1217 loadTimestamp( &currLdc->header );
1219 for ( eq = currLdc->head; eq != NULL; eq = eq->next ) {
1220 if ( !bufferData ) {
1221 loadBuffer( eq->payload );
1222 if ( !currLdc->loaded ) decodeCDH( currLdc, eq->payload );
1224 loadCdh( (struct commonDataHeaderStruct*)eq->payload->data,
1226 currLdc->loaded = TRUE;
1229 ADD_EVENT_ID( currEventId, oneEventDelta );
1231 /* Step 2: output the event */
1232 if ( workingAs == gdc ) {
1233 struct ldcEventDescriptorStruct *ldc;
1235 outputEvent( &currGdc->header, sizeof( currGdc->header ) );
1237 for( ldc = currGdc->head; ldc != NULL; ldc = ldc->next ) {
1238 struct equipmentEventDescriptorStruct *eq;
1240 outputEvent( &ldc->header, sizeof( ldc->header ) );
1242 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1243 outputEvent( &eq->header, sizeof( eq->header ) );
1244 outputEvent( eq->payload->data, eq->payload->size );
1245 if ( !bufferData ) unloadBuffer( eq->payload );
1248 if ( (currGdc = currGdc->next) == NULL )
1249 currGdc = (struct gdcEventDescriptorStruct *)eventsHead;
1250 } else if ( workingAs == ldc ) {
1251 struct equipmentEventDescriptorStruct *eq;
1253 outputEvent( &currLdc->header, sizeof( currLdc->header ) );
1255 for ( eq = currLdc->head; eq != NULL; eq = eq->next ) {
1256 outputEvent( &eq->header, sizeof( eq->header ) );
1257 outputEvent( eq->payload->data, eq->payload->size );
1258 if ( !bufferData ) unloadBuffer( eq->payload );
1260 if ( (currLdc = currLdc->next) == NULL )
1261 currLdc = (struct ldcEventDescriptorStruct *)eventsHead;
1263 } /* End of createEvent */
1265 void createEvents() {
1268 currGdc = (struct gdcEventDescriptorStruct *)eventsHead;
1269 currLdc = (struct ldcEventDescriptorStruct *)eventsHead;
1274 eventNum != numOfEvents && numOfEvents != 0;
1279 } /* End of createEvents */
1283 "Usage: %s [-?][-d][-i definitionFile][-o outputFile][-# numOfEvents][-s][-F|-C]\n\
1285 -v Print version ID and exit\n\
1286 -d Enable debug (repeat for more verbosity)\n\
1287 -i definitionFile File with the description of the events to create (default: stdin)\n\
1288 -o outputFile File used to store events (default: stdout)\n\
1289 -# numOfEvents Number of events to generate (default: 1 event)\n\
1290 -s Do not generate SOR/EOR files (valid only for GDCs)\n\
1291 -F/-C Working in Fixed Target (F) or Collider (C) mode\n\
1293 -D Direct disc access (no buffering)\n",
1296 } /* End of usage */
1298 void parseArgs( int argc, char **argv ) {
1300 int inFileName = -1;
1301 int outFileName = -1;
1304 while ( arg < argc ) {
1305 if ( strcmp( "-?", argv[ arg ] ) == 0 ) {
1309 if ( strcmp( "-i", argv[ arg ] ) == 0 ) {
1310 if ( ++arg == argc ) exit( usage() );
1312 if ( freopen( argv[arg], "r", stdin ) == NULL ){
1314 "%s: failed to open input definition \"%s\" errno:%d ",
1315 myName, argv[arg], errno );
1319 } else if ( strcmp( "-v", argv[ arg ] ) == 0 ) {
1320 printf( "%s\n", fileHandlerIdent );
1322 } else if ( strcmp( "-o", argv[ arg ] ) == 0 ) {
1323 if ( ++arg == argc ) exit( usage() );
1325 } else if ( strcmp( "-#", argv[ arg ] ) == 0 ) {
1328 if ( ++arg == argc ) exit( usage() );
1329 if ( sscanf( argv[ arg ], "%d", &n ) != 1 ) exit( usage() );
1330 if ( n < 0 ) exit( usage() );
1332 } else if ( strcmp( "-s", argv[ arg ] ) == 0 ) {
1333 createSorEor = FALSE;
1334 } else if ( strcmp( "-F", argv[ arg ] ) == 0 ) {
1335 workingMode = fixedTarget;
1336 } else if ( strcmp( "-C", argv[ arg ] ) == 0 ) {
1337 workingMode = collider;
1338 } else if ( strcmp( "-d", argv[ arg ] ) == 0 ) {
1340 } else if ( strcmp( "-c", argv[ arg ] ) == 0 ) {
1342 } else if ( strcmp( "-D", argv[ arg ] ) == 0 ) {
1344 } else if ( strcmp( "-run", argv[ arg ] ) == 0 ) {
1346 if ( ++arg == argc ) exit( usage() );
1347 if ( sscanf( argv[ arg ], "%d", &runnumber ) != 1 ) exit( usage() );
1348 if ( runnumber < 0 ) exit( usage() );
1349 currRunNb = runnumber;
1351 fprintf( stderr, "%s: Unknown switch \"%s\"\n", myName, argv[argc] );
1357 if ( workingMode == fixedTarget )
1358 LOAD_RAW_EVENT_ID( oneEventDelta, 1, 0, 1 );
1360 LOAD_EVENT_ID( oneEventDelta, 0, 0, 1 );
1361 ZERO_EVENT_ID( currEventId );
1364 printf( "Configuration:\n" );
1365 printf( " Debug level: %d\n", debug );
1366 printf( " Configuration: %s\n",
1367 inFileName == -1 ? "stdin" : argv[ inFileName ] );
1368 printf( " Output: %s\n",
1369 outFileName == -1 ? "stdout" : argv[ outFileName ] );
1370 printf( " Working mode: %s\n",
1371 workingMode == fixedTarget ? "fixed target" : "collider" );
1372 printf( " Number of events: %d\n", numOfEvents );
1373 printf( " %s SOR/EOR files\n",
1374 createSorEor ? "Create" : "Do not create" );
1375 printf( " CDH handling: %s\n",
1376 handleCDH ? "enabled" : "disabled" );
1377 printf( " data buffering: %s\n",
1378 bufferData ? "enabled" : "DISABLED" );
1381 if ( outFileName == -1 ) {
1383 printf( "No more trace information from this point...\n" );
1387 if ( ( outF = fopen( argv[ outFileName ], "w" ) ) == NULL ) {
1389 "%s: failed to open output file \"%s\" for writing, errno:%d (%s)\n",
1391 argv[ outFileName ],
1393 strerror( errno ) );
1397 printf( "Output file \"%s\" opened OK for writing\n",
1398 argv[ outFileName ] );
1400 } /* End of parseArgs */
1401 void initEquipment( struct equipmentHeaderStruct * const eq ) {
1402 memset( eq, 0, sizeof( *eq ) );
1403 RESET_ATTRIBUTES( eq->equipmentTypeAttribute );
1404 eq->equipmentBasicElementSize = 4;
1405 } /* End of initEquipment */
1407 void decodeCDH( struct ldcEventDescriptorStruct * const ldc,
1408 const struct payloadDescriptorStruct * const payloadDesc ) {
1410 static struct commonDataHeaderStruct *cdhRef = NULL;
1411 struct commonDataHeaderStruct *cdh;
1412 static int softwareTriggerIndicator = FALSE;
1416 if ( payloadDesc->size < CDH_SIZE ) {
1418 "%s: payload too small got:%d CDH:%d\n",
1424 if ( (cdh = (struct commonDataHeaderStruct *)payloadDesc->data) != NULL ) {
1425 if ( cdh->cdhVersion != CDH_VERSION ) {
1427 "%s: CDH version mismatch expected:%d got:%d\n",
1433 if ( cdhRef == NULL ) {
1435 #define CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK (1<<CDH_TRIGGER_INFORMATION_UNAVAILABLE_BIT)
1436 gotAliceTrigger = (cdhRef->cdhStatusErrorBits & CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK) == 0;
1437 if ( gotAliceTrigger && workingMode == fixedTarget ) {
1439 "%s: ALICE trigger and fixed target mode are not compatible.\n\
1440 Either work in Collider mode or set the trigger unavailable status bit in the CDH.\n",
1444 if ( gotAliceTrigger ) {
1445 if ( (cdh->cdhL1TriggerMessage & 0x40) != 0 ) {
1447 "%s: CDH is a calibration trigger (unsupported) L1TriggerMessage:0x%x\n",
1448 myName, cdh->cdhL1TriggerMessage );
1451 if ( (cdh->cdhL1TriggerMessage & 0x01) != 0 ) {
1452 softwareTriggerIndicator = TRUE;
1454 if ( softwareTriggerIndicator ) {
1455 switch ((cdh->cdhL1TriggerMessage >> 2) & 0xF) {
1463 /* L1SwC bit = on, Clt bit = off, RoC[4..1] = 0xF --> END_OF_DATA */
1465 /* L1SwC bit = on, Clt bit = off, RoC[4..1] = 0xE0 --> START_OF_DATA */
1467 /* L1SwC bit = on, Clt bit = off, RoC[4] = 1, but not 0xE or 0xF
1468 --> SYSTEM_SOFTWARE_TRIGGER_EVENT */
1470 /* L1SwC bit = on, Clt bit = off, RoC[4] = 0
1471 --> DETECTOR_SOFTWARE_TRIGGER_EVENT */
1473 "%s: CDH trigger SOD/EOD/SST/DST (unsupported) \
1474 L1TriggerMessage:0x%x ALICETrigger:%s\n",
1476 cdh->cdhL1TriggerMessage,
1477 gotAliceTrigger ? "yes" : "no" );
1483 if ( (cdh->cdhStatusErrorBits & CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK) !=
1484 (cdhRef->cdhStatusErrorBits & CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK) ) {
1486 "%s: CDH coherency check failed. \
1487 Trigger information reference:%savailable current:%savailable\n",
1489 (cdhRef->cdhStatusErrorBits & CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK) == 0 ? "UN" : "",
1490 (cdh->cdhStatusErrorBits & CDH_TRIGGER_INFORMATION_UNAVAILABLE_MASK) == 0 ? "UN" : "" );
1493 if ( gotAliceTrigger ) {
1494 if ( cdhRef->cdhL1TriggerMessage != cdh->cdhL1TriggerMessage ) {
1496 "%s: CDH coherency check failed. \
1497 L1 trigger message reference:0x%x current:0x%x\n",
1499 cdhRef->cdhL1TriggerMessage,
1500 cdh->cdhL1TriggerMessage );
1503 if ( cdh->cdhParticipatingSubDetectors != cdhRef->cdhParticipatingSubDetectors ) {
1505 "%s: CDH coherency check failed. \
1506 ParticipatingSubDetectors reference:0x%x current:0x%x\n",
1508 cdhRef->cdhParticipatingSubDetectors,
1509 cdh->cdhParticipatingSubDetectors );
1512 if ( cdh->cdhTriggerClassesLow != cdhRef->cdhTriggerClassesLow
1513 || cdh->cdhTriggerClassesHigh != cdhRef->cdhTriggerClassesHigh ) {
1515 "%s: CDH coherency check failed. \
1516 TriggerClassesHigh/Low reference:0x%x-%x current:0x%x-%x\n",
1518 cdhRef->cdhTriggerClassesHigh, cdhRef->cdhTriggerClassesLow,
1519 cdh ->cdhTriggerClassesHigh, cdh ->cdhTriggerClassesLow );
1522 if ( cdh->cdhBlockLength != 0xffffffff ) {
1523 if ( (unsigned)payloadDesc->size != cdh->cdhBlockLength ) {
1525 "%s: CDH coherency check failed. \
1526 Payload size:%d (0x%08x) CDH block length:%d (0x%08x)\n",
1528 payloadDesc->size, payloadDesc->size,
1529 cdh->cdhBlockLength, cdh->cdhBlockLength );
1533 if ( cdh->cdhRoiLow != cdhRef->cdhRoiLow
1534 || cdh->cdhRoiHigh != cdhRef->cdhRoiHigh ) {
1536 "%s: CDH coherency check failed. \
1537 RoiHigh/Low reference:0x%x-%x current:0x%x-%x\n",
1539 cdhRef->cdhRoiHigh, cdhRef->cdhRoiLow,
1540 cdh ->cdhRoiHigh, cdh ->cdhRoiLow );
1544 if ( cdh->cdhMBZ0 != 0
1545 || cdh->cdhMBZ1 != 0
1546 || cdh->cdhMBZ2 != 0
1547 || cdh->cdhMBZ3 != 0 ) {
1549 "%s: CDH check failed. MBZ0:0x%x MBZ1:0x%x MBZ2:0x%x MBZ3:0x%x\n",
1551 cdh->cdhMBZ0, cdh->cdhMBZ1, cdh->cdhMBZ2, cdh->cdhMBZ3 );
1555 for ( attr = 0; attr != 8; attr++ ) {
1556 if ( (cdh->cdhBlockAttributes & (1<<attr)) != 0 ) {
1557 SET_USER_ATTRIBUTE( ldc->header.eventTypeAttribute, attr );
1560 for ( trig = 0; trig != 32; trig++ ) {
1561 if ( (cdh->cdhTriggerClassesLow & (1<<trig)) != 0 ) {
1562 SET_TRIGGER_IN_PATTERN( ldc->header.eventTriggerPattern,
1566 for ( trig = 0; trig != 18; trig++ ) {
1567 if ( (cdh->cdhTriggerClassesHigh & (1<<trig)) != 0 ) {
1568 SET_TRIGGER_IN_PATTERN( ldc->header.eventTriggerPattern,
1572 if ( gotAliceTrigger )
1573 VALIDATE_TRIGGER_PATTERN( ldc->header.eventTriggerPattern );
1576 } /* End of decodeCDH */
1579 assert( workingAs == ldc || workingAs == gdc );
1581 if ( workingAs == gdc ) {
1582 struct gdcEventDescriptorStruct *gdc;
1584 for ( gdc = (struct gdcEventDescriptorStruct *)eventsHead;
1587 struct ldcEventDescriptorStruct *ldc;
1589 initEvent( &gdc->header );
1590 gdc->header.eventSize = gdc->header.eventHeadSize;
1591 gdc->header.eventType = PHYSICS_EVENT;
1592 SET_SYSTEM_ATTRIBUTE( gdc->header.eventTypeAttribute, ATTR_SUPER_EVENT );
1593 gdc->header.eventGdcId = currGdcId;
1594 for ( ldc = gdc->head; ldc != NULL; ldc = ldc->next ) {
1595 struct equipmentEventDescriptorStruct *eq;
1597 initEvent( &ldc->header );
1598 ldc->header.eventSize = ldc->header.eventHeadSize;
1599 ldc->header.eventType = PHYSICS_EVENT;
1600 ldc->header.eventGdcId = currGdcId;
1601 ldc->header.eventLdcId = ldc->id;
1602 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1603 initEquipment( &eq->header );
1604 eq->header.equipmentId = eq->id;
1605 if ( workingMode == collider )
1606 SET_SYSTEM_ATTRIBUTE( eq->header.equipmentTypeAttribute,
1608 eq->header.equipmentSize = eq->payload->size + sizeof( eq->header );
1609 ldc->header.eventSize += eq->header.equipmentSize;
1610 decodeCDH( ldc, eq->payload );
1611 OR_ALL_ATTRIBUTES( eq->header.equipmentTypeAttribute,
1612 ldc->header.eventTypeAttribute );
1613 OR_ALL_ATTRIBUTES( eq->header.equipmentTypeAttribute,
1614 gdc->header.eventTypeAttribute );
1616 gdc->header.eventSize += ldc->header.eventSize;
1621 printf( "Headers:\n" );
1622 for ( gdc = (struct gdcEventDescriptorStruct *)eventsHead;
1625 struct ldcEventDescriptorStruct *ldc;
1627 printf( " GDC:%d size:%d vers:%08x\n",
1629 gdc->header.eventSize,
1630 gdc->header.eventVersion);
1631 for ( ldc = gdc->head; ldc != NULL; ldc = ldc->next ) {
1632 struct equipmentEventDescriptorStruct *eq;
1634 printf( " LDC:%d size:%d vers:%08x\n",
1636 ldc->header.eventSize,
1637 ldc->header.eventVersion );
1638 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1639 printf( " EQ:%d size:%d %spayload:%d\n",
1641 eq->header.equipmentSize,
1642 eq->header.equipmentSize - sizeof( struct equipmentHeaderStruct ) == (unsigned)eq->payload->size ? "" : "-ERROR",
1643 eq->payload->size );
1648 } else if ( workingAs == ldc ) {
1649 struct ldcEventDescriptorStruct *ldc;
1651 for ( ldc = (struct ldcEventDescriptorStruct *)eventsHead;
1654 struct equipmentEventDescriptorStruct *eq;
1656 initEvent( &ldc->header );
1657 ldc->header.eventSize = ldc->header.eventHeadSize;
1658 ldc->header.eventType = PHYSICS_EVENT;
1659 ldc->header.eventGdcId = VOID_ID;
1660 ldc->header.eventLdcId = ldc->id;
1661 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1662 initEquipment( &eq->header );
1663 eq->header.equipmentId = eq->id;
1664 if ( workingMode == collider )
1665 SET_SYSTEM_ATTRIBUTE( eq->header.equipmentTypeAttribute,
1667 eq->header.equipmentSize = eq->payload->size + sizeof( eq->header );
1668 ldc->header.eventSize += eq->header.equipmentSize;
1669 decodeCDH( ldc, eq->payload );
1670 OR_ALL_ATTRIBUTES( eq->header.equipmentTypeAttribute,
1671 ldc->header.eventTypeAttribute );
1675 printf( "Headers:\n" );
1676 for ( ldc = (struct ldcEventDescriptorStruct *)eventsHead;
1679 struct equipmentEventDescriptorStruct *eq;
1681 printf( " LDC:%d size:%d vers:%08x\n",
1683 ldc->header.eventSize,
1684 ldc->header.eventVersion );
1685 for ( eq = ldc->head; eq != NULL; eq = eq->next ) {
1686 printf( " EQ:%d size:%d %spayload:%d\n",
1688 eq->header.equipmentSize,
1689 eq->header.equipmentSize - sizeof( struct equipmentHeaderStruct ) == (unsigned)eq->payload->size ? "" : "-ERROR",
1690 eq->payload->size );
1695 } /* End of initEvents */
1699 workingAs = unknown;
1700 workingMode = fixedTarget;
1701 ldcsHead = ldcsTail = NULL;
1702 eventsHead = eventsTail = NULL;
1706 payloadsHead = payloadsTail = NULL;
1710 createSorEor = TRUE;
1712 gotAliceTrigger = TRUE;
1714 } /* End of initVars */
1716 int main( int argc, char **argv ) {
1718 parseArgs( argc, argv );