int main(int argc, char *argv[]) { unsigned int laddr; unsigned int taddr = 0x0ed0; int stat; int inputchar=10; vmeOpenDefaultWindows(); while(1 && (inputchar==10)) { printf("Grab mutex lock\n"); vmeBusLock(); printf("Press return to unlock mutex..\n"); getchar(); vmeBusUnlock(); printf("I think it's unlocked now... return to kill it\n"); inputchar = getchar(); } CLOSE: vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { int chan=0, prescale=0, duty_mode; uint32_t read_prescale=0, read_dutymode=0; float read_dutycycle=0; if(argc!=4) return ERROR; chan = atoi(argv[1]); prescale = atoi(argv[2]); duty_mode = atoi(argv[3]); printf(" chan = %d prescale = %d\n", chan, prescale); DO(vmeOpenDefaultWindows()); DO(moInit(0xed0000,0)); DO(moConfigPrint()); DO(moGetPrescale(chan, &read_prescale)); printf("before: read_prescale = %d\n",read_prescale); DO(moSetPrescale(chan, prescale)); DO(moGetPrescale(chan, &read_prescale)); printf(" after: read_prescale = %d\n",read_prescale); DO(moConfigPrint()); DO(moGetDutyMode(chan, &read_dutymode)); DO(moGetDutyCycle(chan, &read_dutycycle)); printf(" before: read_dutymode = %d read_dutycycle = %6.3f\n", read_dutymode, read_dutycycle); DO(moSetDutyMode(chan, duty_mode)); DO(moGetDutyMode(chan, &read_dutymode)); DO(moGetDutyCycle(chan, &read_dutycycle)); printf(" after: read_dutymode = %d read_dutycycle = %6.3f\n", read_dutymode, read_dutycycle); DO(moConfigPrint()); CLOSE: vmeCloseDefaultWindows(); return OK; }
/* This routine is automatically executed just before the shared libary is unloaded. Clean up memory that was allocated */ __attribute__((destructor)) void end (void) { static int ended=0; if(ended==0) { printf("ROC Cleanup\n"); rocCleanup(); dmaPFreeAll(); vmeCloseDefaultWindows(); ended=1; } }
int main(int argc, char *argv[]) { int stat; vmeOpenDefaultWindows(); vmeBusLock(); printf("Press return to assert SYSRESET\n"); getchar(); stat = vmeSysReset(); printf("vmeSysReset returned 0x%x\n",stat); vmeBusUnlock(); vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { int stat; int slot; if(argc>1) { slot = atoi(argv[1]); if(slot<1 || slot>22) { printf("invalid slot... using 21"); slot=21; } } else slot=21; printf("\nJLAB TI Status... slot = %d\n",slot); printf("----------------------------\n"); vmeOpenDefaultWindows(); /* Set the TI structure pointer */ tiInit((slot<<19),TI_READOUT_EXT_POLL,1); tiStatus(); sdInit(); sdStatus(); CLOSE: vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { int stat; printf("\nJLAB TS Tests\n"); printf("----------------------------\n"); vmeOpenDefaultWindows(); /* Setup Address and data modes for DMA transfers * * vmeDmaConfig(addrType, dataType, sstMode); * * addrType = 0 (A16) 1 (A24) 2 (A32) * dataType = 0 (D16) 1 (D32) 2 (BLK32) 3 (MBLK) 4 (2eVME) 5 (2eSST) * sstMode = 0 (SST160) 1 (SST267) 2 (SST320) */ vmeDmaConfig(2,5,1); /* INIT dmaPList */ dmaPFreeAll(); vmeIN = dmaPCreate("vmeIN",1024,500,0); vmeOUT = dmaPCreate("vmeOUT",0,0,0); dmaPStatsAll(); dmaPReInitAll(); tsReload(); /* gefVmeSetDebugFlags(vmeHdl,0x0); */ /* Set the TS structure pointer */ tsPartInit(1,(21<<19),TS_READOUT_EXT_POLL,0); if(tsCheckAddresses()==ERROR) goto CLOSE; tsPartLoadTriggerTable(); tsPartSetBlockBufferLevel(10); tsSetBlockLevel(1); stat = tsPartIntConnect(mytsISR, 0); if (stat != OK) { printf("ERROR: tsIntConnect failed \n"); goto CLOSE; } else { printf("INFO: Attached TS Interrupt\n"); } tsSetTriggerSource(6); // Pulser = 5, GTP/Ext/FP = 6 tsSetFPInput(0); tsSetGenInput(0xffff); tsSetGTPInput(0x0); tsPartSetFPInput(1,2,3); tsPartSetExtInput(1,2,3,4,5); tsPartSetGTPInput(1,2,3,4,5); /* tsSetBusySource(TS_BUSY_LOOPBACK,1); */ tsSetBusySource(0,1); /* tsSetBlockBufferLevel(1); */ tsClockReset(); taskDelay(1); tsTrigLinkReset(); taskDelay(1); tsSyncReset(); taskDelay(1); tsStatus(); printf("Hit enter to start triggers\n"); getchar(); tsPartIntEnable(0); tsStatus(); /* #define SOFTTRIG */ #ifdef SOFTTRIG tsSetRandomTrigger(1,0x7); taskDelay(10); tsSoftTrig(1,0x1,0x700,0); #endif printf("Hit any key to Disable TID and exit.\n"); getchar(); tsStatus(); tsPrintScalers(1); tsPrintScalers(2); tsPrintScalers(3); #ifdef SOFTTRIG /* No more soft triggers */ /* tidSoftTrig(0x0,0x8888,0); */ tsSoftTrig(1,0,0x700,0); tsDisableRandomTrigger(); #endif tsPartIntDisable(); tsPartIntDisconnect(); CLOSE: vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { GEF_STATUS status; char *filename; int inputchar=10; int ch, ifa=0; unsigned int cfw=0; FILE *f; fa250Ped ped; printf("\nJLAB fadc pedestal measurement\n"); printf("----------------------------\n"); progName = argv[0]; if(argc != 2) { printf(" ERROR: Must specify one arguments\n"); Usage(); exit(-1); } else filename = argv[1]; status = vmeOpenDefaultWindows(); fadcA32Base=0x09000000; int iFlag = (DIST_ADDR)<<10; /* Sync Source */ iFlag |= (1<<0); /* P2 */ /* Trigger Source */ iFlag |= (1<<2); // VXS Input Trigger /* Clock Source */ iFlag |= (0<<5); // Internal Clock Source iFlag |= (1<<18); // Skip firmware check /* iFlag |= (1<<16); // Skip initialization */ #ifdef SKIPSS faInit((unsigned int)(FADC_ADDR),(1<<19),NFADC+2,iFlag); #else faInit((unsigned int)(FADC_ADDR),(1<<19),NFADC,iFlag); #endif fadc250Config(""); if(nfadc==0) { printf(" Unable to initialize any FADCs.\n"); goto CLOSE; } f = fopen(filename, "wt"); #ifdef NEWFORMAT for(ifa=0; ifa<nfadc; ifa++) { if(f) fprintf(f, "FADC250_SLOT %d\nFADC250_ALLCH_PED", faSlot(ifa)); for(ch=0; ch<16; ch++) { if(faMeasureChannelPedestal(faSlot(ifa), ch, &ped) != OK) { printf(" Unabled to measure pedestal on slot %d, ch %d...\n", faSlot(ifa), ch); fclose(f); goto CLOSE; } if(f) fprintf(f, " %8.3f", ped.avg); } if(f) fprintf(f, "\n"); } #else for(ifa=0; ifa<nfadc; ifa++) { for(ch=0; ch<16; ch++) { if(faMeasureChannelPedestal(faSlot(ifa), ch, &ped) != OK) { printf(" Unabled to measure pedestal on slot %d, ch %d...\n", faSlot(ifa), ch); fclose(f); goto CLOSE; } if(f) fprintf(f, "%3d %3d %8.3f %8.3f\n", faSlot(ifa),ch,ped.avg,ped.rms); } } #endif if(f) fclose(f); else printf(" Unable to open pedestal file %s\n", filename); CLOSE: status = vmeCloseDefaultWindows(); if (status != GEF_SUCCESS) { printf("vmeCloseDefaultWindows failed: code 0x%08x\n",status); return -1; } exit(0); }
int main(int argc, char *argv[]) #endif { int res=0; char firmware_filename[50]; int current_fw_version=0; #ifdef WRITESERIALNUMBER unsigned int serial_number=0; unsigned int hall_board_version=0; unsigned int firmware_version=0; #endif int inputchar=10; printf("\nJLAB Signal Distribution (SD) Firmware Update\n"); printf("------------------------------------------------\n"); #ifdef VXWORKS strncpy(bin_name,__FUNCTION__,50); #else strncpy(bin_name,argv[0],50); #ifdef WRITESERIALNUMBER if(argc<5) { printf(" ERROR: Must specify four (4) arguments\n"); Usage(); exit(-1); } else { strncpy(firmware_filename,argv[1],50); serial_number = (unsigned int) strtoll(argv[2],NULL,10)&0xffffffff; hall_board_version = (unsigned int) strtoll(argv[3],NULL,16)&0xffffffff; firmware_version = (unsigned int) strtoll(argv[4],NULL,16)&0xffffffff; } #else if(argc<2) { printf(" ERROR: Must specify two (2) arguments\n"); Usage(); exit(-1); } else { strncpy(firmware_filename,argv[1],50); } #endif #endif /* VXWORKS */ #ifdef WRITESERIALNUMBER /* Check on provided items */ if(serial_number<1 || serial_number>255) { printf(" ERROR: Invalid Serial Number (%d). Must be 1-255\n",serial_number); exit(-1); } if(hall_board_version<0x1 || hall_board_version>0xFF) { printf(" ERROR: Invalid Assigned Hall and Board Version (0x%x).\n Must be 0x01-0xFF\n" ,hall_board_version); exit(-1); } if(firmware_version<0x1 || firmware_version>0xFF) { printf(" ERROR: Firmware Version (0x%x). Must be 0x01-0xFF\n",firmware_version); exit(-1); } printf("Firmware File = %s\n",firmware_filename); printf("Serial Number (dec) = %4d\n",serial_number); printf("Assigned Hall and Board Version = 0x%02X\n",hall_board_version); printf("Firmware Version = 0x%02X\n",firmware_version); printf("\n"); printf(" Please verify these items before continuing... \n"); #else printf("Firmware File = %s\n",firmware_filename); #endif printf("\n"); #ifndef VXWORKS vmeSetQuietFlag(1); res = vmeOpenDefaultWindows(); if(res!=OK) goto CLOSE; #endif res = sdFirmwareLoadFile(firmware_filename); if(res!=OK) goto CLOSE; res = tiInit(21<<19,0,1); if(res!=OK) { /* try tsInit, instead */ res = tsInit(21<<19,0,1); if(res!=OK) goto CLOSE; } res = sdInit(SD_INIT_IGNORE_VERSION); if(res!=OK) goto CLOSE; current_fw_version = sdGetFirmwareVersion(0); printf("\n Current SD Firmware Version = 0x%x\n\n",current_fw_version); printf(" <ENTER> to continue... or q and <ENTER> to quit without update\n"); inputchar = getchar(); if((inputchar == 113) || (inputchar == 81)) { printf(" Exiting without update\n"); res=1; goto CLOSE; } res = sdFirmwareFlushFifo(); if(res!=OK) goto CLOSE; res = sdFirmwareWriteToMemory(); if(res!=OK) goto CLOSE; goto CLOSE; /* res = sdFirmwareVerifyMemory(); */ /* if(res!=OK) */ /* goto CLOSE; */ sdFirmwareFlushFifo(); #ifdef WRITESERIALNUMBER sdFirmwareWriteSpecs(0x7F0000,serial_number,hall_board_version,firmware_version); sleep(3); sdFirmwarePrintSpecs(); #endif CLOSE: sdFirmwareFreeMemory(); #ifndef VXWORKS vmeCloseDefaultWindows(); #endif printf("\n"); if(res==ERROR) printf(" ******** SD Update ended in ERROR! ******** \n"); else if (res==OK) { printf(" ++++++++ SD Update Successful! ++++++++\n"); printf(" Power Cycle to load new firmware\n"); } printf("\n"); return OK; }
int main(int argc, char *argv[]) { int status; int stat=0; char *mcs_filename; int inputchar=10; unsigned int fadc_address=0; printf("\nJLAB fADC125 firmware update\n"); printf("----------------------------\n"); progName = argv[0]; if(argc<3) { printf(" ERROR: Must specify two arguments\n"); Usage(); exit(-1); } else { mcs_filename = argv[1]; fadc_address = (unsigned int) strtoll(argv[2],NULL,16)&0xffffffff; } fa125FirmwareSetDebug(0); if(fa125FirmwareReadMcsFile(mcs_filename) != OK) { exit(-1); } vmeSetQuietFlag(0); status = vmeOpenDefaultWindows(); if(status<0) { printf(" Unable to initialize VME driver\n"); exit(-1); } int iFlag = (1<<18); /* Do not perform firmware check */ iFlag |= (2<<4); /* Internal Clock */ stat = fa125Init(fadc_address,0x0,1,iFlag); if(stat<0) { printf(" Unable to initialize FADC.\n"); goto CLOSE; } /* Should get the firmware versions here and print them out */ printf(" Will update firmware with file: \n %s\n",mcs_filename); printf(" for fADC125 with VME address = 0x%08x\n",fadc_address); printf(" <ENTER> to continue... or q and <ENTER> to quit without update\n"); inputchar = getchar(); if((inputchar == 113) || (inputchar == 81)) { printf(" Exitting without update\n"); goto CLOSE; } vmeBusLock(); fa125FirmwareSetDebug(FA125_FIRMWARE_DEBUG_MEASURE_TIMES | FA125_FIRMWARE_DEBUG_VERIFY_ERASE); if(fa125FirmwareEraseFull(0)!=OK) { vmeBusUnlock(); goto CLOSE; } if(fa125FirmwareWriteFull(0)!=OK) { vmeBusUnlock(); goto CLOSE; } vmeBusUnlock(); CLOSE: fa125FirmwarePrintTimes(); status = vmeCloseDefaultWindows(); if (status != GEF_SUCCESS) { printf("vmeCloseDefaultWindows failed: code 0x%08x\n",status); return -1; } exit(0); }
int main(int argc, char *argv[]) { int stat; printf("\nJLAB vfTDC Tests\n"); printf("----------------------------\n"); /* remexSetCmsgServer("dafarm28"); */ /* remexInit(NULL,1); */ vmeOpenDefaultWindows(); /* Setup Address and data modes for DMA transfers * * vmeDmaConfig(addrType, dataType, sstMode); * * addrType = 0 (A16) 1 (A24) 2 (A32) * dataType = 0 (D16) 1 (D32) 2 (BLK32) 3 (MBLK) 4 (2eVME) 5 (2eSST) * sstMode = 0 (SST160) 1 (SST267) 2 (SST320) */ vmeDmaConfig(2,5,1); /* INIT dmaPList */ dmaPFreeAll(); vmeIN = dmaPCreate("vmeIN",10244,500,0); vmeOUT = dmaPCreate("vmeOUT",0,0,0); dmaPStatsAll(); dmaPReInitAll(); /* gefVmeSetDebugFlags(vmeHdl,0x0); */ /* Set the TI structure pointer */ /* tiInit((2<<19),TI_READOUT_EXT_POLL,0); */ tiA32Base=0x08000000; if(tiInit(0,TI_READOUT_EXT_POLL,0)!=OK) goto CLOSE; tiCheckAddresses(); tiSetSyncEventInterval(10); tiSetEventFormat(3); char mySN[20]; printf("0x%08x\n",tiGetSerialNumber((char **)&mySN)); printf("mySN = %s\n",mySN); #ifndef DO_READOUT tiDisableDataReadout(); tiDisableA32(); #endif tiLoadTriggerTable(0); tiSetTriggerHoldoff(1,4,0); tiSetTriggerHoldoff(2,4,0); tiSetPrescale(0); tiSetBlockLevel(BLOCKLEVEL); stat = tiIntConnect(TI_INT_VEC, mytiISR, 0); if (stat != OK) { printf("ERROR: tiIntConnect failed \n"); goto CLOSE; } else { printf("INFO: Attached TI Interrupt\n"); } /* tiSetTriggerSource(TI_TRIGGER_TSINPUTS); */ tiSetTriggerSource(TI_TRIGGER_PULSER); tiEnableTSInput(0x1); /* tiSetFPInput(0x0); */ /* tiSetGenInput(0xffff); */ /* tiSetGTPInput(0x0); */ /* tiSetBusySource(TI_BUSY_LOOPBACK,1); */ tiSetBlockBufferLevel(1); tiSetFiberDelay(1,2); tiSetSyncDelayWidth(1,0x3f,1); tiSetBlockLimit(10); /*************************************************************/ /* VFTDC initialization */ /*************************************************************/ extern unsigned int vfTDCA32Base; vfTDCA32Base=0x09000000; vfTDCInit(14<<19, 1<<19, 1, VFTDC_INIT_VXS_SYNCRESET | VFTDC_INIT_VXS_TRIG | VFTDC_INIT_VXS_CLKSRC); vfTDCSetBlockLevel(0, BLOCKLEVEL); vfTDCSetWindowParamters(0, 1, 250); vfTDCStatus(0,0); printf("Hit enter to reset stuff\n"); getchar(); tiClockReset(); taskDelay(1); tiTrigLinkReset(); taskDelay(1); tiEnableVXSSignals(); int again=0; AGAIN: taskDelay(1); tiSyncReset(1); taskDelay(1); tiStatus(1); vfTDCStatus(0,0); printf("Hit enter to start triggers\n"); getchar(); tiIntEnable(0); tiStatus(1); #define SOFTTRIG #ifdef SOFTTRIG tiSetRandomTrigger(1,0x7); /* taskDelay(10); */ /* tiSoftTrig(1,0x1,0x700,0); */ #endif printf("Hit any key to Disable TID and exit.\n"); getchar(); tiStatus(1); #ifdef SOFTTRIG /* No more soft triggers */ /* tidSoftTrig(0x0,0x8888,0); */ tiSoftTrig(1,0,0x700,0); tiDisableRandomTrigger(); #endif tiIntDisable(); tiIntDisconnect(); vfTDCStatus(0,0); if(again==1) { again=0; goto AGAIN; } CLOSE: dmaPFreeAll(); vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { GEF_STATUS status; int fpga_choice, firmware_choice=0; char *mcs_filename; int inputchar=10; int ifa=0; unsigned int cfw=0; printf("\nJLAB fadc firmware update\n"); printf("----------------------------\n"); progName = argv[0]; if(argc<3) { printf(" ERROR: Must specify two arguments\n"); Usage(); exit(-1); } else { fpga_choice = atoi(argv[1]); mcs_filename = argv[2]; } if( (fpga_choice != 1) && (fpga_choice != 2) ) { printf(" ERROR: Invalid FPGA choice (%d)\n",fpga_choice); Usage(); exit(-1); } if(fadcFirmwareReadMcsFile(mcs_filename) != OK) { exit(-1); } status = vmeOpenDefaultWindows(); fadcA32Base=0x09000000; int iFlag = (DIST_ADDR)<<10; /* Sync Source */ iFlag |= (1<<0); /* P2 */ /* Trigger Source */ iFlag |= (1<<2); // VXS Input Trigger /* Clock Source */ iFlag |= (0<<5); // Internal Clock Source iFlag |= (1<<18); // Skip firmware check /* iFlag |= (1<<16); // Skip initialization */ #ifdef SKIPSS faInit((unsigned int)(FADC_ADDR),(1<<19),NFADC+2,iFlag); #else faInit((unsigned int)(FADC_ADDR),(1<<19),NFADC,iFlag); #endif if(nfadc==0) { printf(" Unable to initialize any FADCs.\n"); goto CLOSE; } for(ifa=0; ifa<nfadc; ifa++) { cfw = faGetFirmwareVersions(faSlot(ifa),0); printf("%2d: Control Firmware Version: 0x%04x Proc Firmware Version: 0x%04x\n", faSlot(ifa),cfw&0xFFFF,(cfw>>16)&0xFFFF); } printf(" Will update firmware for "); if(fpga_choice==1) { firmware_choice = FADC_FIRMWARE_FX70T; printf("FX70T (Control FPGA) "); } else if(fpga_choice==2) { firmware_choice = FADC_FIRMWARE_LX110; printf("LX110 (Processing FPGA) "); } printf(" with file: \n %s\n",mcs_filename); printf(" <ENTER> to continue... or q and <ENTER> to quit without update\n"); inputchar = getchar(); if((inputchar == 113) || (inputchar == 81)) { printf(" Exiting without update\n"); goto CLOSE; } fadcFirmwareGLoad(firmware_choice,0); goto CLOSE; CLOSE: status = vmeCloseDefaultWindows(); if (status != GEF_SUCCESS) { printf("vmeCloseDefaultWindows failed: code 0x%08x\n",status); return -1; } exit(0); }
int main(int argc, char *argv[]) { int status; unsigned int addr=0x18000000; vmeOpenDefaultWindows(); status = vmeOpenSlaveA32(addr,0x00400000); if(status != OK) { printf("%s: ERROR: failed to open slave window (%d)\n", __FUNCTION__,status); return ERROR; } dmaPUseSlaveWindow(1); /* INIT dmaPList */ dmaPFreeAll(); vmeIN = dmaPCreate("vmeIN",BUFFER_SIZE,NBUFFER,0); vmeOUT = dmaPCreate("vmeOUT",0,0,0); dmaPStatsAll(); dmaPReInitAll(); GETEVENT(vmeIN,0); /* data = (unsigned int *)a32slave_window; */ data = (unsigned int*)dma_dabufp; printf("a32slavewindow = 0x%08x\n",(unsigned int*)a32slave_window); printf("dma_dabufp = 0x%08x\n",(unsigned int*)dma_dabufp); printf("data = 0x%08x\n",(unsigned int*)data); printf("vmeDmaLocalToVmeAdrs(dma_dabufp) = 0x%08x\n", vmeDmaLocalToVmeAdrs((unsigned int)dma_dabufp)); printf("vmeDmaLocalToPhysAdrs(dma_dabufp) = 0x%08x\n", vmeDmaLocalToPhysAdrs((unsigned int)dma_dabufp)); printf("Press <Enter> to look at data\n"); getchar(); int idata=0, iter=0; int inputchar=10; while(1 && (inputchar==10)) { for(idata=0+4*8*iter; idata<4*8*(iter+1); idata++) { if((idata%4)==0) printf("\n"); printf("%5d: 0x%08x ",idata,(unsigned int)data[idata]); } iter++; printf("\n\n"); printf("<Enter> for next trigger, 1 and <Enter> to End\n"); inputchar = getchar(); printf("inputchar = %d\n",inputchar); if(inputchar==49) break; /* 1 */ if(inputchar==50) { iter=0; /* if(iter<0) iter=0; */ inputchar=10; } } status = vmeCloseA32Slave(); vmeCloseDefaultWindows(); exit(0); }
int main(int argc, char *argv[]) { int stat; printf("\nJLAB fADC250-V2 Tests\n"); printf("----------------------------\n"); /* remexSetCmsgServer("dafarm28"); */ /* remexInit(NULL,1); */ vmeOpenDefaultWindows(); /* Setup Address and data modes for DMA transfers * * vmeDmaConfig(addrType, dataType, sstMode); * * addrType = 0 (A16) 1 (A24) 2 (A32) * dataType = 0 (D16) 1 (D32) 2 (BLK32) 3 (MBLK) 4 (2eVME) 5 (2eSST) * sstMode = 0 (SST160) 1 (SST267) 2 (SST320) */ vmeDmaConfig(2,5,1); /* INIT dmaPList */ dmaPFreeAll(); vmeIN = dmaPCreate("vmeIN",MAX_EVENT_LENGTH,MAX_EVENT_POOL,0); vmeOUT = dmaPCreate("vmeOUT",0,0,0); dmaPStatsAll(); dmaPReInitAll(); /* gefVmeSetDebugFlags(vmeHdl,0x0); */ vmeSetQuietFlag(1); /* skip the errors associated with BUS Errors */ /* Setup FlexIO */ flexioInit(0xee0, FLEXIO_MODE_POLL); flexioWriteCsr(0, 0x8000); // reset flexioWriteCsr(0, 0x1); // output in vme pulse mode /* Setup output data pattern */ flexioWriteData(0, 0xeded); /* flexioWriteData(0, 0xeded); */ /* Setup fADC250 */ NFADC = 16+2; /* 16 slots + 2 (for the switch slots) */ fadcA32Base=0x09000000; /* Setup the iFlag.. flags for FADC initialization */ int iFlag=0; /* Sync Source */ iFlag |= (0<<0); /* VME */ /* Trigger Source */ iFlag |= (4<<1); /* Internal */ /* Clock Source */ iFlag |= FA_INIT_INT_CLKSRC; /* Self */ iFlag |= FA_INIT_SKIP_FIRMWARE_CHECK; /* faInit((unsigned int)(3<<19),(1<<19),NFADC,iFlag); */ faInit(0xed0000,0,1,iFlag); NFADC=nfadc; /* Redefine our NFADC with what was found from the driver */ vmeSetQuietFlag(0); /* Turn the error statements back on */ faItrigDisable(0, 1); MAXFADCWORDS = NFADC * BLOCKLEVEL * (1+2+FADC_WINDOW_WIDTH*16) + 3; printf("**************************************************\n"); printf("* Calculated MAX FADC words per block = %d\n",MAXFADCWORDS); printf("**************************************************\n"); if(NFADC>1) faEnableMultiBlock(1); if(NFADC==0) goto CLOSE; /* Additional Configuration for each module */ fadcSlotMask=0; int islot=0; for(islot=0;islot<NFADC;islot++) { FA_SLOT = fadcID[islot]; /* Grab the current module's slot number */ fadcSlotMask |= (1<<FA_SLOT); /* Add it to the mask */ /* faDataInsertAdcParameters(FA_SLOT,1); */ /* faDataSuppressTriggerTime(FA_SLOT,2); */ /* Set the internal DAC level */ faSetDAC(FA_SLOT,FADC_DAC_LEVEL,0); /* Set the threshold for data readout */ faSetThreshold(FA_SLOT,FADC_THRESHOLD,0); /* Setup option 1 processing - RAW Window Data <-- */ /* option 2 - RAW Pulse Data */ /* option 3 - Integral Pulse Data */ /* Setup 200 nsec latency (PL = 50) */ /* Setup 80 nsec Window (PTW = 20) */ /* Setup Pulse widths of 36ns (NSB(3)+NSA(6) = 9) */ /* Setup up to 1 pulse processed */ /* Setup for both ADC banks(0 - all channels 0-15) */ /* Integral Pulse Data */ faSetProcMode(FA_SLOT,faMode,FADC_WINDOW_LAT,FADC_WINDOW_WIDTH,3,6,3,0); /* Bus errors to terminate block transfers (preferred) */ faEnableBusError(FA_SLOT); /* Set the Block level */ faSetBlockLevel(FA_SLOT,BLOCKLEVEL); /* Set the individual channel pedestals for the data that is sent * to the CTP */ int ichan; for(ichan=0; ichan<16; ichan++) { faSetChannelPedestal(FA_SLOT,ichan,0); } faSetTriggerPathThreshold(FA_SLOT, 500); } /************************************************************ * * Setup Internal Triggering * * Four Modes of Operation (tmode) * 0) Table Mode * 1) Coincidence Mode * 2) Window Mode * 3) INVALID * 4) Sum Mode * * wMask = Mask of 16 channels to be enabled for Window Mode * wWidth = Width of trigger window before latching (in clocks) * cMask = Mask of 16 channels to be enabled for Coincidence Mode * sumThresh = 10-12 bit threshold for Sum trigger to be latched * tTable = pointer to trigger table (65536 values) to be loaded */ int tmode=0; unsigned int wWidth=5, wMask=0x0, cMask=0xeded, sumThresh=0, tTable[65536]; memset((char *)tTable,0,65536*sizeof(unsigned int)); tTable[0xeded] = 1; faItrigSetMode(FA_SLOT, tmode, wWidth, wMask, cMask, sumThresh, (uint32_t *)tTable); faItrigSetHBwidth(0, 2, 0xffff); faGStatus(0); /* FADC Perform some resets, status */ for(islot=0;islot<NFADC;islot++) { FA_SLOT = fadcID[islot]; /* faSetClockSource(FA_SLOT,2); */ faClear(FA_SLOT); faResetToken(FA_SLOT); faResetTriggerCount(FA_SLOT); } faGStatus(0); faItrigStatus(0,0); faItrigPrintHBinfo(0); /* Enable FADC */ for(islot=0;islot<NFADC;islot++) { FA_SLOT = fadcID[islot]; faEnableSyncSrc(FA_SLOT); } faSync(0); taskDelay(1); /* faGStatus(0); */ int pti_status; void *res; pti_status = pthread_create(&fapollthread, NULL, (void*(*)(void *)) faPoll, (void *)NULL); if(pti_status!=0) { printf("%s: ERROR: FA Polling Thread could not be started.\n", __FUNCTION__); printf("\t pthread_create returned: %d\n",pti_status); } printf("Hit enter to start triggers\n"); getchar(); faGEnable(1,0); faItrigEnable(0, 1); faItrigStatus(0,0); faStopped=0; flexioWriteCsr(0, 0x101); // send first pulse printf("Hit any key to Disable TID and exit.\n"); getchar(); vmeBusLock(); /* FADC Disable */ faGDisable(1); faStopped=1; vmeBusUnlock(); if(fapollthread) { if(pthread_cancel(fapollthread)<0) perror("pthread_cancel"); if(pthread_join(fapollthread,&res)<0) perror("pthread_join"); if (res == PTHREAD_CANCELED) printf("%s: Polling thread canceled\n",__FUNCTION__); else printf("%s: ERROR: Polling thread NOT canceled\n",__FUNCTION__); } faGStatus(0); faPrintAuxScal(0); CLOSE: dmaPFreeAll(); vmeCloseDefaultWindows(); exit(0); }