/******************************************************************************
 *
 *  Title  : primFunc_histogramSetup.c
 *  Version 0.0,
 *
 *  Description: Histogram control primitive function.
 *  Related files:
 *
 *  Author: Lukas Tomasek, tomasekl@fzu.cz
 *
 ******************************************************************************/

/******************************************************************************
 *                              Header files                                  *
 ******************************************************************************/

#include <stdio.h>
#include "primFunc_histogramSetup.h"
#include "globalDefinitions.h"
#include "uirUtility.h"
#include "primParamsUir.h"
#include "mainUir.h"
#include <utility.h>
#include "primFunctionInit.h"
#include "RWlists.h"

/******************************************************************************
 *                              Global functions                              *
 ******************************************************************************/

/*=============================================================================
 *                              primFunction_histogramSetup()
 *=============================================================================
 *
 *
 *
 */
ERROR_ID primFunction_histogramSetup(PRIM_FUNC_OPTION funcOption, struct PRIM_TABLE *primTable, void *primitive, UINT32 inputParameter, UINT8 slotNumber){

	FILE *file;

	UINT32 paddingX[2];
	struct MSG_HEAD* primHeader=(struct MSG_HEAD*) primitive;
	UINT32 *primDataPtr=(UINT32*)((UINT32)primHeader+sizeof(struct MSG_HEAD));

	ERROR_ID errorId=SUCCESS;
	char errorMessage[200];
	int status;

	UINT32 primBodyLength;
	UINT32 primitiveId;
	struct PRIM_HISTOGRAM_SETUP_PARAMS *histogramSetup = &primTable->params.histogramSetup; 

	const int panel=global.panel.primEdit[getPrimArrayId(HISTOGRAM_SETUP)];
	UINT32 i;
	UINT32 dataLength;
	char textMessage[200];
	char errorText[100];
	UINT32 listIndex;
	int ringIndex;
	UINT32 fileSize;
	struct HOST *host;

	const unsigned int slaveNumber=inputParameter;

	struct HISTOGRAM_SETUP_OUT *histogramSetupOut;


	if(R_HISTOGRAM_SETUP!=R_HISTOGRAM_SETUP_HOST){
		ERROR_CHECK(PROGRAM_ERROR, primitive HISTOGRAM_SETUP - wrong revision number);
		return(PROGRAM_ERROR);
	}

	switch(funcOption){
		case PRIM_PANEL_TO_TABLE:

			GetCtrlVal(panel, HIST_SETP_BASE, (UINT32*) &histogramSetup->inputParams.base);
			GetCtrlVal(panel, HIST_SETP_BINNING, &histogramSetup->inputParams.nBins);
			
			//GetCtrlVal(panel, HIST_SETP_PADDING0, &histogramSetup->inputParams.padding[0]);
			//GetCtrlVal(panel, HIST_SETP_PADDING1, &histogramSetup->inputParams.padding[1]);
			GetCtrlVal(panel, HIST_SETP_OPT0, &histogramSetup->inputParams.opt[0]);
			GetCtrlVal(panel, HIST_SETP_OPT1, &histogramSetup->inputParams.opt[1]);
			GetCtrlVal(panel, HIST_SETP_OPT2, &histogramSetup->inputParams.opt[2]); 
			GetCtrlVal(panel, HIST_SETP_OPT3, &histogramSetup->inputParams.opt[3]);
			GetCtrlVal(panel, HIST_SETP_BIN_SIZE, &histogramSetup->inputParams.binSize);

			GetCtrlVal(panel, HIST_SETP_VALID_MODULES_0, &histogramSetup->inputParams.validModules[0]);
			GetCtrlVal(panel, HIST_SETP_VALID_MODULES_1, &histogramSetup->inputParams.validModules[1]);

			GetCtrlVal(panel, HIST_SETP_X_PTR, (UINT32*) &histogramSetup->inputParams.xPtr[0]);
			GetCtrlVal(panel, HIST_SETP_X_PTR_2, (UINT32*) &histogramSetup->inputParams.xPtr[1]);
			GetCtrlVal(panel, HIST_SETP_DATA_TYPE, &histogramSetup->inputParams.dataType[0]);
			GetCtrlVal(panel, HIST_SETP_DATA_TYPE_2, &histogramSetup->inputParams.dataType[1]);
			
			GetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_00, &histogramSetup->inputParams.moduleRangeMap[0][0]);
			GetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_01, &histogramSetup->inputParams.moduleRangeMap[0][1]);
			GetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_10, &histogramSetup->inputParams.moduleRangeMap[1][0]);
			GetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_11, &histogramSetup->inputParams.moduleRangeMap[1][1]);
			
			
			GetCtrlVal(panel, HIST_SETP_DEFAULT_1, &histogramSetup->default1);
//			GetCtrlVal(panel, HIST_SETP_DEFAULT_2, &histogramSetup->default2);
			
			GetCtrlVal(panel, HIST_SETP_INP_FILE_1, histogramSetup->inputFile1);
			GetCtrlVal(panel, HIST_SETP_INP_FILE_2, histogramSetup->inputFile2);			



			/* NO BREAK HERE!!!*/
		case PRIM_PARAMS_TO_TABLE:
			/* add table headers - don't set indexes!!! */
			primTable->inPrimHeader.length=SIZEOF(struct HISTOGRAM_SETUP_IN)+SIZEOF(struct MSG_HEAD);
			
			if(histogramSetup->default1)
			{
				status = getFileSize(histogramSetup->inputFile1, &fileSize);
				ERROR_CHECK(errorId, getFileSize());

				primTable->inPrimHeader.length += (fileSize + 3) / sizeof(UINT32);

				status = getFileSize(histogramSetup->inputFile2, &fileSize);
				ERROR_CHECK(errorId, getFileSize());

				primTable->inPrimHeader.length += (fileSize + 3) / sizeof(UINT32);
			
			
			}

			primTable->inPrimHeader.id=HISTOGRAM_SETUP;
			primTable->inPrimHeader.primRevision=R_HISTOGRAM_SETUP;
			primTable->replyLength=SIZEOF(struct HISTOGRAM_SETUP_OUT)+SIZEOF(struct MSG_HEAD);

	  		break;

		case PRIM_TABLE_TO_PANEL:
			if(primTable->inPrimHeader.primRevision!=R_HISTOGRAM_SETUP){
				ERROR_CHECK(PROGRAM_ERROR, primitive HISTOGRAM_SETUP - wrong revision number);
				return(PROGRAM_ERROR);
			}

			SetCtrlVal(panel, HIST_SETP_BASE, (unsigned int)histogramSetup->inputParams.base);
			SetCtrlVal(panel, HIST_SETP_BINNING, histogramSetup->inputParams.nBins);
			//SetCtrlVal(panel, HIST_SETP_PADDING0, histogramSetup->inputParams.padding[0]);
			//SetCtrlVal(panel, HIST_SETP_PADDING1, histogramSetup->inputParams.padding[1]);
			SetCtrlVal(panel, HIST_SETP_OPT0, histogramSetup->inputParams.opt[0]);
			SetCtrlVal(panel, HIST_SETP_OPT1, histogramSetup->inputParams.opt[1]);
			SetCtrlVal(panel, HIST_SETP_OPT2, histogramSetup->inputParams.opt[2]); 
			SetCtrlVal(panel, HIST_SETP_OPT3, histogramSetup->inputParams.opt[3]);
			
			if (histogramSetup->inputParams.opt[0])
			{
				status = SetCtrlVal(panel, HIST_SETP_PADDING0, 0);
				UIR_STATUS_CHECK(status, SetCtrlVal());
						
				status = SetCtrlVal(panel, HIST_SETP_PADDING1, 0);
				UIR_STATUS_CHECK(status, SetCtrlVal());
					
				status=SetCtrlAttribute(panel, HIST_SETP_PADDING0, ATTR_CTRL_MODE, VAL_INDICATOR); 
				UIR_STATUS_CHECK(status, SetCtrlAttribute());
					
				status=SetCtrlAttribute(panel, HIST_SETP_PADDING1, ATTR_CTRL_MODE, VAL_INDICATOR); 
				UIR_STATUS_CHECK(status, SetCtrlAttribute());
			}
			else
			{
				status=SetCtrlAttribute(panel, HIST_SETP_PADDING0, ATTR_CTRL_MODE, VAL_NORMAL); 
				UIR_STATUS_CHECK(status, SetCtrlAttribute());
					
				status=SetCtrlAttribute(panel, HIST_SETP_PADDING1, ATTR_CTRL_MODE, VAL_NORMAL); 
				UIR_STATUS_CHECK(status, SetCtrlAttribute());
			}
			
			
			
			SetCtrlVal(panel, HIST_SETP_BIN_SIZE, histogramSetup->inputParams.binSize);
			
			SetCtrlVal(panel, HIST_SETP_VALID_MODULES_0, histogramSetup->inputParams.validModules[0]);
			SetCtrlVal(panel, HIST_SETP_VALID_MODULES_1, histogramSetup->inputParams.validModules[1]);
			
			SetCtrlVal(panel, HIST_SETP_X_PTR, (unsigned int) histogramSetup->inputParams.xPtr[0]);
			SetCtrlVal(panel, HIST_SETP_X_PTR_2, (unsigned int) histogramSetup->inputParams.xPtr[1]);
			SetCtrlVal(panel, HIST_SETP_DATA_TYPE, histogramSetup->inputParams.dataType[0]);
			SetCtrlVal(panel, HIST_SETP_DATA_TYPE_2, histogramSetup->inputParams.dataType[1]);        


			SetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_00, histogramSetup->inputParams.moduleRangeMap[0][0]);
			SetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_01, histogramSetup->inputParams.moduleRangeMap[0][1]);
			SetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_10, histogramSetup->inputParams.moduleRangeMap[1][0]);
			SetCtrlVal(panel, HIST_SETP_MODULE_RANGE_MAP_11, histogramSetup->inputParams.moduleRangeMap[1][1]);


			if(histogramSetup->default1)
			{
				SetCtrlAttribute(panel, HIST_SETP_X_PTR, ATTR_CTRL_MODE, VAL_INDICATOR);
				SetCtrlVal(panel, HIST_SETP_X_PTR, DEFAULT);
				SetInputMode(panel, HIST_SETP_INP_FILE_1, 1);
				SetCtrlVal(panel, HIST_SETP_DEFAULT_1, histogramSetup->default1);
				SetCtrlVal(panel, HIST_SETP_INP_FILE_1, histogramSetup->inputFile1);

				SetCtrlAttribute(panel, HIST_SETP_X_PTR_2, ATTR_CTRL_MODE, VAL_INDICATOR);
				SetCtrlVal(panel, HIST_SETP_X_PTR_2, DEFAULT);
				SetInputMode(panel, HIST_SETP_INP_FILE_2, 1);
//				SetCtrlVal(panel, HIST_SETP_DEFAULT_2, histogramSetup->default2);
				SetCtrlVal(panel, HIST_SETP_INP_FILE_2, histogramSetup->inputFile2);

			
			} else {
				SetCtrlAttribute(panel, HIST_SETP_X_PTR, ATTR_CTRL_MODE, VAL_HOT);
				SetInputMode(panel, HIST_SETP_INP_FILE_1, 0);

				SetCtrlAttribute(panel, HIST_SETP_X_PTR_2, ATTR_CTRL_MODE, VAL_HOT);
				SetInputMode(panel, HIST_SETP_INP_FILE_2, 0);
			}
			
			SetCtrlVal(panel, HIST_SETP_DEFAULT_1, histogramSetup->default1);
//			SetCtrlVal(panel, HIST_SETP_DEFAULT_2, histogramSetup->default2);
			
			SetInputMode(panel, HIST_SETP_TEXTMSG_16, histogramSetup->default1);
			
			break;
		case PRIM_BUILD:
 			/* copy data */
			*(struct HISTOGRAM_SETUP_IN*)(primDataPtr) = histogramSetup->inputParams;
			
			if(histogramSetup->default1)
			{
				primDataPtr += sizeof(struct HISTOGRAM_SETUP_IN) / sizeof(UINT32);
				
				status = getFileSize(histogramSetup->inputFile1, &fileSize);
				ERROR_CHECK(errorId, getFileSize());
				
				errorId=readFromBinFile(histogramSetup->inputFile1, primDataPtr, fileSize);    
		 		ERROR_CHECK(errorId, readFromBinFile());				
				
				primDataPtr += (fileSize + 3) / sizeof(UINT32);		// integer division
			
				status = getFileSize(histogramSetup->inputFile2, &fileSize);
				ERROR_CHECK(errorId, getFileSize());
				
				errorId=readFromBinFile(histogramSetup->inputFile2, primDataPtr, fileSize);    
		 		ERROR_CHECK(errorId, readFromBinFile());				
				// check overall primitive length??
			}


 			break;

		case REP_DATA_PROCESS:
			/* process reply */
			histogramSetupOut=(struct HISTOGRAM_SETUP_OUT*)(primDataPtr);

			host=global.host[HOST_INDEX(slotNumber)];
			SetTableCellVal (host->panel.parent, ROD_HSETUP, MakePoint(1, slaveNumber+1),(unsigned int) histogramSetupOut->ctrlPtr);
			SetTableCellVal (host->panel.parent, ROD_HSETUP, MakePoint(2, slaveNumber+1),(unsigned int) histogramSetupOut->binCtrPtr);
			SetTableCellVal (host->panel.parent, ROD_HSETUP, MakePoint(3, slaveNumber+1),(unsigned int) histogramSetupOut->varRangePtr);

			break;
			
		case WRITE_TO_FILE:
	
			file=(FILE*)inputParameter;
			
			fprintf(file, "*base= 0x%X, nBins= 0x%X\n", 
				(UINT32)histogramSetup->inputParams.base, histogramSetup->inputParams.nBins);
			fprintf(file, "padding[]={ 0x%X, 0x%X }, dataType[]={ 0x%X, 0x%X }\n", 
				0, 0,
				histogramSetup->inputParams.dataType[0], histogramSetup->inputParams.dataType[1]);
			fprintf(file, "binSize= %d, opt[]={ 0x%X, 0x%X, 0x%X, 0x%X }\n", 
				histogramSetup->inputParams.binSize, histogramSetup->inputParams.opt[0], 
				histogramSetup->inputParams.opt[1], histogramSetup->inputParams.opt[2],
				histogramSetup->inputParams.opt[3]);
			fprintf(file, "validModules[]={ 0x%X, 0x%X }\n", 
				histogramSetup->inputParams.validModules[0], histogramSetup->inputParams.validModules[1]);
			fprintf(file, "moduleRangeMap[0][]={ 0x%X, 0x%X }, moduleRangeMap[1][]={ 0x%X, 0x%X }\n", 
				histogramSetup->inputParams.moduleRangeMap[0][0], histogramSetup->inputParams.moduleRangeMap[0][1],
				histogramSetup->inputParams.moduleRangeMap[1][0], histogramSetup->inputParams.moduleRangeMap[1][1]);	
			fprintf(file, "*xPtr[]={ 0x%X, 0x%X }\n", 
				(UINT32)histogramSetup->inputParams.xPtr[0], (UINT32)histogramSetup->inputParams.xPtr[1]);	
				
			fprintf(file, "inputFile1[]= %s\n", histogramSetup->inputFile1);	
			fprintf(file, "inputFile2[]= %s\n", histogramSetup->inputFile2);
  			fprintf(file, "default1= %d\n", histogramSetup->default1); 
		
			break;
			
		case READ_FROM_FILE:
		
			file=(FILE*)inputParameter;
			
			status=fscanf(file, "*base= 0x%X, nBins= 0x%X\n", 
				(UINT32*)&histogramSetup->inputParams.base, &histogramSetup->inputParams.nBins);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "padding[]={ 0x%X, 0x%X }, dataType[]={ 0x%X, 0x%X }\n", 
				(int*) &paddingX[0], (int*) &paddingX[1],
				(int*)&histogramSetup->inputParams.dataType[0], (int*)&histogramSetup->inputParams.dataType[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "binSize= %d, opt[]={ 0x%X, 0x%X, 0x%X, 0x%X }\n",
				(int*)&histogramSetup->inputParams.binSize, (int*)&histogramSetup->inputParams.opt[0], 
				(int*)&histogramSetup->inputParams.opt[1], (int*)&histogramSetup->inputParams.opt[2],
				(int*)&histogramSetup->inputParams.opt[3]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "validModules[]={ 0x%X, 0x%X }\n", 
				&histogramSetup->inputParams.validModules[0], &histogramSetup->inputParams.validModules[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "moduleRangeMap[0][]={ 0x%X, 0x%X }, moduleRangeMap[1][]={ 0x%X, 0x%X }\n", 
				&histogramSetup->inputParams.moduleRangeMap[0][0], &histogramSetup->inputParams.moduleRangeMap[0][1],
				&histogramSetup->inputParams.moduleRangeMap[1][0], &histogramSetup->inputParams.moduleRangeMap[1][1]);	
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "*xPtr[]={ 0x%X, 0x%X }\n", 
				(UINT32*)&histogramSetup->inputParams.xPtr[0], (UINT32*)&histogramSetup->inputParams.xPtr[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			
			status=readLineFromIndex(file, strlen("inputFile1[]= "), PATHNAME_LENGTH, histogramSetup->inputFile1); 
			if(status!=0) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}
			status=readLineFromIndex(file, strlen("inputFile2[]= "), PATHNAME_LENGTH, histogramSetup->inputFile2); 
			if(status!=0) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}
  			status=fscanf(file, "default1= %d\n", &histogramSetup->default1);
  			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}			
         	
			break;	
			
			
		case READ_FROM_FILE_v106:
		
			file=(FILE*)inputParameter;
			
			status=fscanf(file, "*base= 0x%X, nBins= 0x%X\n", 
				(UINT32*)&histogramSetup->inputParams.base, &histogramSetup->inputParams.nBins);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "padding[]={ 0x%X, 0x%X }, dataType[]={ 0x%X, 0x%X }\n", 
				(int*) &paddingX[0], (int*) &paddingX[1],
				(int*)&histogramSetup->inputParams.dataType[0], (int*)&histogramSetup->inputParams.dataType[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "binSize= %d, opt[0]= %d, opt[1]= %d, opt[2]= 0x%X\n",
				(int*)&histogramSetup->inputParams.binSize, (int*)&histogramSetup->inputParams.opt[0], 
				(int*)&histogramSetup->inputParams.opt[1], (int*)&histogramSetup->inputParams.opt[2]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "validModules[]={ 0x%X, 0x%X }\n", 
				&histogramSetup->inputParams.validModules[0], &histogramSetup->inputParams.validModules[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "moduleRangeMap[0][]={ 0x%X, 0x%X }, moduleRangeMap[1][]={ 0x%X, 0x%X }\n", 
				&histogramSetup->inputParams.moduleRangeMap[0][0], &histogramSetup->inputParams.moduleRangeMap[0][1],
				&histogramSetup->inputParams.moduleRangeMap[1][0], &histogramSetup->inputParams.moduleRangeMap[1][1]);	
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			status=fscanf(file, "*xPtr[]={ 0x%X, 0x%X }\n", 
				(UINT32*)&histogramSetup->inputParams.xPtr[0], (UINT32*)&histogramSetup->inputParams.xPtr[1]);
			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}		
			
			status=readLineFromIndex(file, strlen("inputFile1[]= "), PATHNAME_LENGTH, histogramSetup->inputFile1); 
			if(status!=0) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}
			status=readLineFromIndex(file, strlen("inputFile2[]= "), PATHNAME_LENGTH, histogramSetup->inputFile2); 
			if(status!=0) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}
  			status=fscanf(file, "default1= %d\n", &histogramSetup->default1);
  			if(status==-1) {ERROR_CHECK(FATAL_ERROR, Read from prim file error!); return(FATAL_ERROR);}			
         	
			break;	

		default: ;//error
 	}

	return(SUCCESS);

}

/******************************************************************************/