/*
 # ---------------------------------------------------------------------
 #
 # 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 "bbvtkSphereList.h"
#include "bbvtkPackage.h"

#include <vtkPolyDataMapper.h>
#include <vtkProperty.h>
#include <vtkRenderWindow.h>

namespace bbvtk
{

BBTK_ADD_BLACK_BOX_TO_PACKAGE(vtk,SphereList)
BBTK_BLACK_BOX_IMPLEMENTATION(SphereList,bbtk::AtomicBlackBox);

void SphereList::Process()
{

        int iMin, iMax;
	double px = 0.0;
	double py = 0.0;
	double pz = 0.0;
	double radio;
	double spc[3];
 
	int last_valid_color_index = 0;


	if (bbGetInputRenderer()!=NULL)
	{
                // If it is not the first time Process is executed, the actors have already been created. The only thing to do is to update the opacity. 
		if (sphereActor.size() != 0)
                {
                  for (int i = 0; i < sphereActor.size(); i++)
                    sphereActor[i] -> GetProperty() -> SetOpacity( bbGetInputOpacity() );
	        }
                else
                {
                    if (bbGetInputSpacing().size()==3)
                    {
			spc[0]=bbGetInputSpacing()[0];
			spc[1]=bbGetInputSpacing()[1];
			spc[2]=bbGetInputSpacing()[2];
                    }
                    else
                    {
			spc[0]=spc[1]=spc[2]=1;
                    }

                    iMin=0;
                    iMax=bbGetInputlstPointX().size();
                    printf("EED SphereList::Process   iMax=%d \n", iMax);
                    for (int i = 0; i < iMax; i++)
                      {
                        std::cout << "CM SphereList::Process i=" <<  i  << " bbGetInputlstPointX()[i]=" << bbGetInputlstPointX()[i] << std::endl;
                        std::cout << "CM SphereList::Process i=" <<  i  << " bbGetInputlstPointY()[i]=" << bbGetInputlstPointY()[i] << std::endl;
                        std::cout << "CM SphereList::Process i=" <<  i  << " bbGetInputlstPointZ()[i]=" << bbGetInputlstPointZ()[i] << std::endl;
                      }
                    // If the vector Y or respectively the vector Z has a different size from the vector X, the position value py or respectively pz is set to 0.
                    for ( int i=iMin ; i<iMax; i=i+1 )
                    {
			px = bbGetInputlstPointX()[i]*spc[0];
			if (bbGetInputlstPointY().size() == bbGetInputlstPointX().size() )
			{
			    py = bbGetInputlstPointY()[i]*spc[1];
			}
			if (bbGetInputlstPointZ().size() == bbGetInputlstPointX().size() )
			{			
			    pz = bbGetInputlstPointZ()[i]*spc[2];
			}

			// If the number of elements in the radio list is different from the number of X coordinates, the radio value is set to 1.
			if (bbGetInputlstRadio().size() == bbGetInputlstPointX().size() )
			{
			    radio = bbGetInputlstRadio()[i];
                        }
			else
			{
                            if (bbGetInputlstRadio().size()>=1)
                            {
                                radio = bbGetInputlstRadio()[ bbGetInputlstRadio().size() - 1 ];
                            } 
                            else 
                            {
                                radio = 1.0;
                            }
			}

			// Sphere
			vtkSphereSource * newSphere =  vtkSphereSource::New();

			newSphere -> SetThetaResolution(20);
			newSphere -> SetPhiResolution(20);
			newSphere -> SetRadius(radio); 

			vtkPolyDataMapper * newMapper = vtkPolyDataMapper::New();
			newMapper -> SetInput( newSphere -> GetOutput() );
	
			vtkActor * newActor = vtkActor::New();
			sphereActor.push_back(newActor);
			newActor -> SetMapper(newMapper);
			newActor -> SetOrigin(0, 0, 0);
			
			unsigned int j = 3*i +2;
			if (j < bbGetInputColour().size() )
			{
			    newActor -> GetProperty() -> SetColor( bbGetInputColour()[3*i] , bbGetInputColour()[3*i + 1] , bbGetInputColour()[3*i + 2] );
			    last_valid_color_index = 3*i;
			}
			else
			  newActor -> GetProperty() -> SetColor( bbGetInputColour()[last_valid_color_index] , bbGetInputColour()[last_valid_color_index + 1] , bbGetInputColour()[last_valid_color_index + 2] );

			newActor -> GetProperty() -> SetOpacity( bbGetInputOpacity() );
			newActor -> SetPosition( px,py,pz );
	
			if ( bbGetInputTransform()!=NULL )
			{
				newActor->SetUserTransform( bbGetInputTransform() );
			}
	

			if (bbGetInputRenderer()!=NULL)
			{
			    bbGetInputRenderer() -> AddActor( newActor );
			}

                    } // for

                    if (sphereActor.size() != 0)
                    {
                        // Sets the output.
                        bbSetOutputActorList(sphereActor);
                    }
                    
                } // if (bbGetInputRenderer()!=NULL)

        } // if (sphereActor.size() != 0)
}

void SphereList::bbUserSetDefaultValues()
{
 
  bbSetInputRenderer(NULL);
  bbSetInputTransform(NULL);
 
  // Sets default radio to 1.
  std::vector<double> radio;
  radio.push_back(1.0);
  bbSetInputlstRadio(radio);

  // Sets default colour to red.
  std::vector<double> colour;
  colour.push_back(1.0);
  colour.push_back(0.0);
  colour.push_back(0.0);
  bbSetInputColour(colour);
	
	// Sets default spacing.
	std::vector<double> spacing;
	spacing.push_back(1.0);
	spacing.push_back(1.0);
	spacing.push_back(1.0);
	bbSetInputSpacing(spacing);
	
  bbSetInputOpacity(1.0);

}

void SphereList::bbUserInitializeProcessing()
{
 
}

void SphereList::bbUserFinalizeProcessing()
{
  
}
}
// EO namespace bbvtk