/*# ---------------------------------------------------------------------
#
# Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
#                        pour la Sant�)
# Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
# Previous Authors : Laurent Guigues, Jean-Pierre Roux
# CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
#
#  This software is governed by the CeCILL-B license under French law and
#  abiding by the rules of distribution of free software. You can  use,
#  modify and/ or redistribute the software under the terms of the CeCILL-B
#  license as circulated by CEA, CNRS and INRIA at the following URL
#  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
#  or in the file LICENSE.txt.
#
#  As a counterpart to the access to the source code and  rights to copy,
#  modify and redistribute granted by the license, users are provided only
#  with a limited warranty  and the software's author,  the holder of the
#  economic rights,  and the successive licensors  have only  limited
#  liability.
#
#  The fact that you are presently reading this means that you have had
#  knowledge of the CeCILL-B license and that you accept its terms.
# ------------------------------------------------------------------------ */

#include "FillFilter.h"
#include "creaVtk_MACROS.h"

#include <vector>



FillFilter::FillFilter() 
{
	_tolerancefill 		= 125;
	_distancefill 		= 5;
	_auxImageFill 		= NULL;
	_maxXback			= 0;
	_maxYback			= 0;
	_maxZback			= 0;
}

//---------------------------------------------------------------------------
FillFilter::~FillFilter() 
{
	if (_auxImageFill != NULL)
	{
		_auxImageFill->Delete();
	}//_auxImageFill
}

//---------------------------------------------------------------------------
void FillFilter::SetImages(vtkImageData *image,vtkImageData *image2) // virtual
{	
	baseFilterManualPaint::SetImages(image,image2);	
	if ((_maxX!=_maxXback) || (_maxY!=_maxYback) || (_maxZ!=_maxZback)) 
	{
		if (_auxImageFill != NULL)
		{
			_auxImageFill->Delete();
		}
		_auxImageFill = vtkImageData::New();
		_auxImageFill->SetDimensions(_maxX + 1, _maxY + 1, _maxZ + 1);
		_auxImageFill->SetOrigin(0, 0, 0);
		_auxImageFill->SetExtent(0, _maxX, 0, _maxY, 0, _maxZ);
//EED 2017-01-01 Migration VTK7
#if VTK_MAJOR_VERSION <= 5
		_auxImageFill->SetWholeExtent(0, _maxX, 0, _maxY, 0, _maxZ);
		_auxImageFill->SetScalarTypeToUnsignedChar();
		_auxImageFill->AllocateScalars();
#else
		_auxImageFill->AllocateScalars(VTK_UNSIGNED_CHAR,1);
#endif
	}
	unsigned char 	* ptrAuxImageFill = (unsigned char 	*)_auxImageFill->GetScalarPointer();
	memset(ptrAuxImageFill, 0, (_maxX+1) * (_maxY+1) * (_maxZ+1) );
	_maxXback=_maxX;
	_maxYback=_maxY;
	_maxZback=_maxZ;	
}




//---------------------------------------------------------------------------
void FillFilter::Run() // virtual
{
	long int ivi;
	if ((_px >= _minX) && (_px <= _maxX) && (_py >= _minY) && (_py <= _maxY)
			&& (_pz >= _minZ) && (_pz <= _maxZ)) 
	{
		this->_IMManager->BaseInitialPoint(_px, _py ,_pz);
		_graylevelbasefill 			= _image->GetScalarComponentAsDouble(_px, _py, _pz,0);
		_distbasefill 				= _distancefill * _distancefill;
		ivi 						= _px + _py*(_maxX+1) + _pz*(_maxX+1)*(_maxY+1);  // index vector image
		FillToolLoop(_px, _py, _pz, ivi);
	} //if _minX _maxX _minY _maxY _minZ _maxZ
}

//---------------------------------------------------------------------------
void FillFilter::FillToolLoop(int px, int py, int pz,long int iviA) 
{
	double difX,difY,difZ,_tmpDistfill;
	std::vector<int> lstX;
   	std::vector<int> lstY;
   	std::vector<int> lstZ;
  	std::vector<long long int> lstivi;
	lstX.push_back(px);
	lstY.push_back(py);
	lstZ.push_back(pz);
	lstivi.push_back( iviA );

	DEF_POINTER_IMAGE_VTK_CREA_set(v_image,ss_image,p_image,st_image,_image)		
	if (_image2!=NULL)
	{
		DEF_POINTER_IMAGE_VTK_CREA_set(v_image2,ss_image2,p_image2,st_image2,_image2)		
	} // if _image2

	DEF_POINTER_IMAGE_VTK_CREA(v_auxImageFill,ss_auxImageFill,p_auxImageFill,st_auxImageFill,_auxImageFill)		
	while ( lstX.size()!=0 )
	{
		// if point inside image
		if ((lstX[0] >= _minX) && (lstX[0] <= _maxX) && (lstY[0] >= _minY) && (lstY[0] <= _maxY) && (lstZ[0] >= _minZ) && (lstZ[0] <= _maxZ)) 
		{   
			difX = px-lstX[0];
			difY = py-lstY[0];
			difZ = pz-lstZ[0];
			_tmpDistfill = difX*difX + difY*difY + difZ*difZ;
			// if distance of center point
			if (_tmpDistfill<=_distbasefill)
			{
				// if point not visited
				GETVALUE2_VTK_CREA(v_auxImageFill,p_auxImageFill,st_auxImageFill,lstivi[0] );	
				if (v_auxImageFill==0)
				{ 
					// If Gray Level valid

					//EED01 
					//		_tmpiglfill 	= _image->GetScalarComponentAsDouble(px, py, pz, 0);
					GETVALUE2_VTK_CREA(_tmpiglfill,p_image,st_image,lstivi[0]) 	

					if (_image2!=NULL)
					{
						//EED01
						//			_tmpiglfill2 	= 	_image2->GetScalarComponentAsDouble(px, py, pz, 0);
						GETVALUE2_VTK_CREA(_tmpiglfill2,p_image2,st_image2,lstivi[0]) 	
					} else {
						_tmpiglfill2	=	_tmpiglfill;
					}

					float grayLBFMTOL 	= _graylevelbasefill - _tolerancefill;
					float grayLBFPTOL 	= _graylevelbasefill + _tolerancefill;
					bool isInRange 		= false;
					//DFCH
					if (_RangeMin <= grayLBFMTOL && _RangeMax >= grayLBFPTOL) {
						isInRange 		= true;
					} //fi esle
					else if (_RangeMin > grayLBFMTOL && _RangeMax >= grayLBFPTOL) {
						grayLBFMTOL 	= _RangeMin;
						isInRange 		= true;
					} //fi esle
					else if (_RangeMin <= grayLBFMTOL && _RangeMax < grayLBFPTOL) {
						grayLBFPTOL 	= _RangeMax;
						isInRange 		= true;
					} //fi esle
					else if ((_RangeMin <= _graylevelbasefill) && (_graylevelbasefill <= _RangeMax)) {
						grayLBFMTOL 	= _RangeMin;
						grayLBFPTOL 	= _RangeMax;
						isInRange 		= true;
					} //fi Range

					if (isInRange) 
					{
						_auxGrayLevelValidationFill = (_tmpiglfill != _graylevel)
								&& (_tmpiglfill2 != _graylevel)
								&& (_tmpiglfill  >= grayLBFMTOL)
								&& (_tmpiglfill  <= grayLBFPTOL)
								&& (_tmpDistfill <= _distbasefill); //DFCH
					} else {
						_auxGrayLevelValidationFill = false;
					} // if isInRange

					if (_auxGrayLevelValidationFill)  
					{

						this->_IMManager->AddModifiedPixel(lstX[0], lstY[0], lstZ[0]); //DFCH

						// Modifie image
						if (_image2!=NULL)
						{
							//				_image2->SetScalarComponentFromFloat(px, py, pz, 0,(float) _graylevel);
							SETVALUE2_VTK_CREA(_graylevel,p_image2,st_image2,lstivi[0])
						} else {
							//				_image->SetScalarComponentFromFloat(px, py, pz, 0,(float) _graylevel);
							SETVALUE2_VTK_CREA(_graylevel,p_image,st_image,lstivi[0])
						} // if _image2

						// Add neighborhood points in the list 
						if (_2D3D == 0) //2D
						{
							if (_direction == 0) // YZ
							{
								//lstX.push_back(lstX[0]+1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneColumn);
								//lstX.push_back(lstX[0]-1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneColumn);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]+1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneLine);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]-1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneLine);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]+1); lstivi.push_back( lstivi[0]+_OnePlane);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]-1); lstivi.push_back( lstivi[0]-_OnePlane);
							}
							if (_direction == 1) // XZ
							{
								lstX.push_back(lstX[0]+1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneColumn);
								lstX.push_back(lstX[0]-1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneColumn);
								// lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]+1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneLine);
								// lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]-1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneLine);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]+1); lstivi.push_back( lstivi[0]+_OnePlane);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]-1); lstivi.push_back( lstivi[0]-_OnePlane);
							}
							if (_direction == 2) // XY
							{
								lstX.push_back(lstX[0]+1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneColumn);
								lstX.push_back(lstX[0]-1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneColumn);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]+1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneLine);
								lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]-1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneLine);
								//lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]+1); lstivi.push_back( lstivi[0]+_OnePlane);
								//lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]-1); lstivi.push_back( lstivi[0]-_OnePlane);
							}
						} else { // 3D
							lstX.push_back(lstX[0]+1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneColumn);
							lstX.push_back(lstX[0]-1); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneColumn);
							lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]+1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]+_OneLine);
							lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]-1); lstZ.push_back(lstZ[0]  ); lstivi.push_back( lstivi[0]-_OneLine);
							lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]+1); lstivi.push_back( lstivi[0]+_OnePlane);
							lstX.push_back(lstX[0]  ); lstY.push_back(lstY[0]  ); lstZ.push_back(lstZ[0]-1); lstivi.push_back( lstivi[0]-_OnePlane);
						} // 2D 3D
					} // if gray level valid      _auxGrayLevelValidationFill
				} // if point not visited
				// Add point to already visited
				SETVALUE2_VTK_CREA(1,p_auxImageFill,st_auxImageFill,lstivi[0]);
			} // if distance of center point
		} // if point inside image
		// Remove point from the list
		lstX.erase( lstX.begin() );
		lstY.erase( lstY.begin() );
		lstZ.erase( lstZ.begin() );
		lstivi.erase( lstivi.begin() );
	} // while _lstX.size
}

//---------------------------------------------------------------------------
void FillFilter::SetToleranceFill(double tolerancefill) 
{
	_tolerancefill = tolerancefill;
}

//---------------------------------------------------------------------------
void FillFilter::SetDistanceFill(int distancefill) 
{
	_distancefill = distancefill;
}

//---------------------------------------------------------------------------
vtkImageData* FillFilter::GetAuxImageFill() 
{
	return _auxImageFill;
}