#include "MacheteFilter.h"

#include <cpPlugins/Interface/DataObject.h>
#include <cpPlugins/Interface/Image.h>
#include <cpPlugins/Interface/Mesh.h>

#include <cpExtensions/Interaction/ImageInteractorStyle.h>

#include <itkPlaneSpatialObject.h>
#include <itkPoint.h>
#include <itkSpatialObjectToImageFilter.h>
#include <itkVector.h>

#include <vtkInteractorStyleSwitch.h>
#include <vtkPlaneWidget.h>
#include <vtkRenderWindowInteractor.h>

// -------------------------------------------------------------------------
cpPlugins::BasicFilters::MacheteFilter::
DialogResult cpPlugins::BasicFilters::MacheteFilter::
ExecConfigurationDialog( QWidget* parent )
{
  typedef cpExtensions::Interaction::ImageInteractorStyle _TImageStyle;

  // Choose a valid 3D interactor
  vtkRenderWindowInteractor* iren = NULL;
  auto iIt = this->m_Interactors.begin( );
  for( ; iIt != this->m_Interactors.end( ) && iren == NULL; ++iIt )
  {
    _TImageStyle* istyle =
      dynamic_cast< _TImageStyle* >(
        ( *iIt )->GetInteractorStyle( )
        );
    if( istyle == NULL )
      iren = *iIt;
    
  } // rof
  if( iren == NULL )
    return( Self::DialogResult_Cancel );

  // Get bounding box
  double bbox[ 6 ];
  cpPlugins::Interface::Image* image =
    this->GetInput< cpPlugins::Interface::Image >( "Input" );
  bool input_found = false;
  if( image != NULL )
  {
    image->GetVTK< vtkImageData >( )->GetBounds( bbox );
    input_found = true;

  } // fi
  cpPlugins::Interface::Mesh* mesh =
    this->GetInput< cpPlugins::Interface::Mesh >( "Input" );
  if( mesh != NULL )
  {
    mesh->GetVTK< vtkPolyData >( )->GetBounds( bbox );
    input_found = true;

  } // fi
  if( !input_found )
    return( Self::DialogResult_Cancel );

  // Create plane widget
  if( this->m_PlaneWidget != NULL )
    this->m_PlaneWidget->Delete( );
  this->m_PlaneWidget = vtkPlaneWidget::New( );
  this->m_PlaneWidget->NormalToXAxisOn( );
  this->m_PlaneWidget->SetCenter(
    ( bbox[ 1 ] + bbox[ 0 ] ) * double( 0.5 ),
    ( bbox[ 3 ] + bbox[ 2 ] ) * double( 0.5 ),
    ( bbox[ 5 ] + bbox[ 4 ] ) * double( 0.5 )
    );
  this->m_PlaneWidget->SetOrigin(
    ( bbox[ 1 ] + bbox[ 0 ] ) * double( 0.5 ),
    bbox[ 2 ],
    bbox[ 4 ]
    );
  this->m_PlaneWidget->SetPoint1(
    ( bbox[ 1 ] + bbox[ 0 ] ) * double( 0.5 ),
    bbox[ 3 ],
    bbox[ 4 ]
    );
  this->m_PlaneWidget->SetPoint2(
    ( bbox[ 1 ] + bbox[ 0 ] ) * double( 0.5 ),
    bbox[ 2 ],
    bbox[ 5 ]
    );
  this->m_PlaneWidget->SetResolution( 15 );
  this->m_PlaneWidget->SetRepresentationToWireframe( );
  this->m_PlaneWidget->SetInteractor( iren );
  this->m_PlaneWidget->PlaceWidget( );
  this->m_PlaneWidget->On( );

  return( Self::DialogResult_Modal );
}

// -------------------------------------------------------------------------
cpPlugins::BasicFilters::MacheteFilter::
MacheteFilter( )
  : Superclass( ),
    m_PlaneWidget( NULL )
{
  this->_AddInput( "Input" );
  this->_MakeOutput< cpPlugins::Interface::DataObject >( "Output" );

  itk::Point< double, 3 > center;
  itk::Vector< double, 3 > normal;

  center.Fill( double( 0 ) );
  normal.Fill( double( 0 ) );
  normal[ 0 ] = double( 1 );

  this->m_Parameters->ConfigureAsPoint( "PlaneCenter", 3, center );
  this->m_Parameters->ConfigureAsVector( "PlaneNormal", 3, normal );
}

// -------------------------------------------------------------------------
cpPlugins::BasicFilters::MacheteFilter::
~MacheteFilter( )
{
  if( this->m_PlaneWidget != NULL )
    this->m_PlaneWidget->Delete( );
}

// -------------------------------------------------------------------------
std::string cpPlugins::BasicFilters::MacheteFilter::
_GenerateData( )
{
  cpPlugins::Interface::Image* image =
    this->GetInput< cpPlugins::Interface::Image >( "Input" );
  if( image != NULL )
    return( this->_FromImage( image ) );
  cpPlugins::Interface::Mesh* mesh =
    this->GetInput< cpPlugins::Interface::Mesh >( "Input" );
  if( mesh == NULL )
    return( this->_FromMesh( mesh ) );
  return( "MacheteFilter: No valid input." );
}

// -------------------------------------------------------------------------
std::string cpPlugins::BasicFilters::MacheteFilter::
_FromImage( cpPlugins::Interface::Image* image )
{
  itk::DataObject* itk_image = NULL;
  std::string r = "";
  cpPlugins_Image_Demangle_AllScalarTypes( 2, image, itk_image, r, _RealImage );
  else cpPlugins_Image_Demangle_AllScalarTypes( 3, image, itk_image, r, _RealImage );
  else r = "MacheteFilter: Input image type not supported.";
  return( r );
}

// -------------------------------------------------------------------------
std::string cpPlugins::BasicFilters::MacheteFilter::
_FromMesh( cpPlugins::Interface::Mesh* mesh )
{
  return( "" );
}

#include <itkImageFileWriter.h>

// -------------------------------------------------------------------------
template< class I >
std::string cpPlugins::BasicFilters::MacheteFilter::
_RealImage( itk::DataObject* dobj )
{
  typedef typename I::PixelType                         _TPixel;
  typedef itk::PlaneSpatialObject< I::ImageDimension >  _TPlane;
  typedef itk::SpatialObjectToImageFilter< _TPlane, I > _TMaskFilter;

  I* image = dynamic_cast< I* >( dobj );

  typename _TMaskFilter::Pointer mask = _TMaskFilter::New( );
  mask->SetDirection( image->GetDirection( ) );
  mask->SetOrigin( image->GetOrigin( ) );
  mask->SetSize( image->GetRequestedRegion( ).GetSize( ) );
  mask->SetSpacing( image->GetSpacing( ) );
  mask->SetInsideValue( _TPixel( 1 ) );
  mask->SetOutsideValue( _TPixel( 0 ) );

  typename itk::ImageFileWriter< I >::Pointer w = 
    itk::ImageFileWriter< I >::New( );
  w->SetInput( mask->GetOutput( ) );
  w->SetFileName( "mask.mhd" );
  w->Update( );
}

// eof - $RCSfile$