#include <cpExtensions/Visualization/ImageSliceActors.h>

#include <cstring>
#include <sstream>

#include <vtkAlgorithmOutput.h>
#include <vtkCamera.h>
#include <vtkCellArray.h>
#include <vtkImageData.h>
#include <vtkImageProperty.h>
#include <vtkPoints.h>
#include <vtkProperty.h>
#include <vtkRenderer.h>
#include <vtkRendererCollection.h>
#include <vtkRenderWindow.h>
#include <vtkRenderWindowInteractor.h>
#include <vtkTextProperty.h>

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
m_PlaneColors[ 3 ][ 3 ] =
{
  { 1, 0, 0 },
  { 0, 1, 0 },
  { 0, 0, 1 }
};

// -------------------------------------------------------------------------
cpExtensions::Visualization::ImageSliceActors*
cpExtensions::Visualization::ImageSliceActors::
New( )
{
  return( new Self( ) );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetAxis( int axis )
{
  this->m_ImageMapper->SetOrientation( axis );
  this->m_BlenderMapper->SetOrientation( axis );
  this->m_ImageMapper->Update( );
  this->m_BlenderMapper->Update( );
  this->SetSliceNumber( this->GetSliceNumberMinValue( ) );
  this->m_ImageActor->Modified( );
  this->m_BlenderActor->Modified( );
  this->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetInputConnection( vtkAlgorithmOutput* aout )
{
  // Get input vtkImageData
  if( aout == NULL )
    return;

  // Create mapper and actors
  this->m_ImageMapper->SetInputConnection( aout );
  this->_ConfigureInputImage( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetInputImage( vtkImageData* data )
{
  // Get input vtkImageData
  if( data == NULL )
    return;

  // Create mapper and actors
  this->m_ImageMapper->SetInputData( data );
  this->_ConfigureInputImage( );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
AddBinaryConnection(
  vtkAlgorithmOutput* aout,
  const double& r, const double& g, const double& b
  )
{
  if( aout == NULL )
    return( -1 );
  this->m_Blender->AddInputConnection( aout );
  this->_ConfigureBinaryImage( r, g, b );
  return( this->m_Blender->GetNumberOfInputPorts( ) - 1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
AddBinaryImage(
  vtkImageData* data,
  const double& r, const double& g, const double& b
  )
{
  if( data == NULL )
    return( -1 );
  this->m_Blender->AddInputData( data );
  this->_ConfigureBinaryImage( r, g, b );
  return( this->m_Blender->GetNumberOfInputPorts( ) - 1 );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
Clear( )
{
  // Unbind from container
  this->RemoveAllItems( );

  // Filters and mappers
  this->m_ImageMapper   = vtkSmartPointer< vtkImageSliceMapper >::New( );
  this->m_ImageActor    = vtkSmartPointer< vtkImageActor >::New( );
  this->m_Blender       = vtkSmartPointer< TBlender >::New( );
  this->m_BlenderMapper = vtkSmartPointer< vtkImageSliceMapper >::New( );
  this->m_BlenderLUT    = vtkSmartPointer< vtkLookupTable >::New( );
  this->m_BlenderActor  = vtkSmartPointer< vtkImageActor >::New( );

  this->m_ImageActor->SetMapper( this->m_ImageMapper );
  this->m_BlenderMapper->
    SetInputConnection( this->m_Blender->GetOutputPort( ) );

  this->m_BlenderLUT->SetNumberOfTableValues( 1 );
  this->m_BlenderLUT->SetTableRange( 0, 1 );
  this->m_BlenderLUT->SetTableValue( 0, 0, 0, 0, 0 );
  this->m_BlenderLUT->Build( );

  this->m_BlenderActor->SetMapper( this->m_BlenderMapper );
  this->m_BlenderActor->GetProperty( )->SetLookupTable( this->m_BlenderLUT );
  this->m_BlenderActor->GetProperty( )->UseLookupTableScalarRangeOn( );

  // Remove associated objects
  this->m_AssociatedSlices.clear( );

  // White cursor
  vtkSmartPointer< vtkPoints > cursor_points =
    vtkSmartPointer< vtkPoints >::New( );
  vtkSmartPointer< vtkCellArray > cursor_lines =
    vtkSmartPointer< vtkCellArray >::New( );
  cursor_points->InsertNextPoint( 0, 0, 0 );
  cursor_points->InsertNextPoint( 0, 0, 0 );
  cursor_points->InsertNextPoint( 0, 0, 0 );
  cursor_points->InsertNextPoint( 0, 0, 0 );
  cursor_lines->InsertNextCell( 2 );
  cursor_lines->InsertCellPoint( 0 );
  cursor_lines->InsertCellPoint( 1 );
  cursor_lines->InsertNextCell( 2 );
  cursor_lines->InsertCellPoint( 2 );
  cursor_lines->InsertCellPoint( 3 );

  this->m_Cursor = vtkSmartPointer< vtkPolyData >::New( );
  this->m_CursorMapper = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->m_CursorActor = vtkSmartPointer< vtkActor >::New( );

  this->m_Cursor->SetPoints( cursor_points );
  this->m_Cursor->SetLines( cursor_lines );
  this->m_CursorMapper->SetInputData( this->m_Cursor );
  this->m_CursorActor->SetMapper( this->m_CursorMapper );
  this->m_CursorActor->GetProperty( )->SetColor( 1, 1, 0 );
  this->m_CursorActor->GetProperty( )->SetLineWidth( 2 );

  // Plane intersections
  this->m_Axis1       = vtkSmartPointer< vtkPolyData >::New( );
  this->m_Axis1Mapper = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->m_Axis1Actor  = vtkSmartPointer< vtkActor >::New( );

  vtkSmartPointer< vtkPoints > h_points =
    vtkSmartPointer< vtkPoints >::New( );
  vtkSmartPointer< vtkCellArray > h_lines =
    vtkSmartPointer< vtkCellArray >::New( );
  h_points->InsertNextPoint( 0, 0, 0 );
  h_points->InsertNextPoint( 0, 0, 0 );
  h_lines->InsertNextCell( 2 );
  h_lines->InsertCellPoint( 0 );
  h_lines->InsertCellPoint( 1 );
  this->m_Axis1->SetPoints( h_points );
  this->m_Axis1->SetLines( h_lines );
  this->m_Axis1Mapper->SetInputData( this->m_Axis1 );
  this->m_Axis1Actor->SetMapper( this->m_Axis1Mapper );

  this->m_Axis2       = vtkSmartPointer< vtkPolyData >::New( );
  this->m_Axis2Mapper = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->m_Axis2Actor  = vtkSmartPointer< vtkActor >::New( );

  vtkSmartPointer< vtkPoints > v_points =
    vtkSmartPointer< vtkPoints >::New( );
  vtkSmartPointer< vtkCellArray > v_lines =
    vtkSmartPointer< vtkCellArray >::New( );
  v_points->InsertNextPoint( 0, 0, 0 );
  v_points->InsertNextPoint( 0, 0, 0 );
  v_lines->InsertNextCell( 2 );
  v_lines->InsertCellPoint( 0 );
  v_lines->InsertCellPoint( 1 );
  this->m_Axis2->SetPoints( v_points );
  this->m_Axis2->SetLines( v_lines );
  this->m_Axis2Mapper->SetInputData( this->m_Axis2 );
  this->m_Axis2Actor->SetMapper( this->m_Axis2Mapper );

  // Plane
  this->m_Plane       = vtkSmartPointer< vtkPolyData >::New( );
  this->m_PlaneMapper = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->m_PlaneActor  = vtkSmartPointer< vtkActor >::New( );

  vtkSmartPointer< vtkPoints > plane_points =
    vtkSmartPointer< vtkPoints >::New( );
  vtkSmartPointer< vtkCellArray > plane_lines =
    vtkSmartPointer< vtkCellArray >::New( );
  plane_points->InsertNextPoint( 0, 0, 0 );
  plane_points->InsertNextPoint( 0, 1, 0 );
  plane_points->InsertNextPoint( 1, 1, 0 );
  plane_points->InsertNextPoint( 1, 0, 0 );
  plane_lines->InsertNextCell( 5 );
  plane_lines->InsertCellPoint( 0 );
  plane_lines->InsertCellPoint( 1 );
  plane_lines->InsertCellPoint( 2 );
  plane_lines->InsertCellPoint( 3 );
  plane_lines->InsertCellPoint( 0 );
  this->m_Plane->SetPoints( plane_points );
  this->m_Plane->SetLines( plane_lines );

  this->m_PlaneMapper->SetInputData( this->m_Plane );
  this->m_PlaneActor->SetMapper( this->m_PlaneMapper );

  // Text actor
  this->m_TextActor = vtkSmartPointer< vtkTextActor >::New( );
  this->m_TextBuffer[ 0 ] = '\0';
  this->m_TextActor->SetTextScaleModeToNone( );
  vtkTextProperty* textprop = this->m_TextActor->GetTextProperty( );
  textprop->SetColor( 1, 1, 0 );
  textprop->SetFontFamilyToCourier( );
  textprop->SetFontSize( 18 );
  textprop->BoldOff( );
  textprop->ItalicOff( );
  textprop->ShadowOff( );
  textprop->SetJustificationToLeft( );
  textprop->SetVerticalJustificationToBottom( );
  vtkCoordinate* coord = this->m_TextActor->GetPositionCoordinate( );
  coord->SetCoordinateSystemToNormalizedViewport( );
  coord->SetValue( 0.01, 0.01 );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
AssociateSlice( Self* slice )
{
  this->m_AssociatedSlices.push_back( slice );
  this->Modified( );
}

// -------------------------------------------------------------------------
vtkInteractorStyle* cpExtensions::Visualization::ImageSliceActors::
GetStyle( )
{
  return( this->m_Style.GetPointer( ) );
}

// -------------------------------------------------------------------------
const vtkInteractorStyle* cpExtensions::Visualization::ImageSliceActors::
GetStyle( ) const
{
  return( this->m_Style.GetPointer( ) );
}

// -------------------------------------------------------------------------
vtkImageData* cpExtensions::Visualization::ImageSliceActors::
GetInputImage( )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetInput( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
const vtkImageData* cpExtensions::Visualization::ImageSliceActors::
GetInputImage( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetInput( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
PushActorsInto( vtkRenderWindow* window, bool force_style )
{
  this->m_Window = window;
  if( window == NULL )
    return;
  vtkRenderWindowInteractor* rwi = window->GetInteractor( );
  vtkRenderer* renderer = window->GetRenderers( )->GetFirstRenderer( );
  if( rwi == NULL || renderer == NULL )
    return;

  // Update style
  if( this->m_Style.GetPointer( ) != NULL && force_style )
    rwi->SetInteractorStyle( this->m_Style );

  // Update actors
  renderer->AddViewProp( this->m_ImageActor );
  renderer->AddViewProp( this->m_BlenderActor );
  if( force_style )
  {
    renderer->AddViewProp( this->m_CursorActor );
    renderer->AddViewProp( this->m_PlaneActor );
    renderer->AddViewProp( this->m_TextActor );
    renderer->AddViewProp( this->m_Axis1Actor );
    renderer->AddViewProp( this->m_Axis2Actor );

  } // fi

  // Configure camera
  vtkCamera* camera = renderer->GetActiveCamera( );
  if( camera != NULL && force_style )
  {
    // Parallel projections are better when displaying 2D images
    int axis = this->GetAxis( );
    camera->ParallelProjectionOn( );
    camera->SetFocalPoint( double( 0 ), double( 0 ), double( 0 ) );
    if( axis == 0 )
    {
      camera->SetPosition( double( 1 ), double( 0 ), double( 0 ) );
      camera->SetViewUp  ( double( 0 ), double( 0 ), double( 1 ) );
    }
    else if( axis == 1 )
    {
      camera->SetPosition( double( 0 ), double( -1 ), double( 0 ) );
      camera->SetViewUp  ( double( 0 ), double(  0 ), double( 1 ) );
    }
    else // if( axis == 2 )
    {
      camera->SetPosition( double( 0 ), double(  0 ), double( 1 ) );
      camera->SetViewUp  ( double( 0 ), double( -1 ), double( 0 ) );

    } // fi

  } // fi
  renderer->ResetCamera( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
PopActorsFrom( vtkRenderWindow* window )
{
  vtkRenderWindowInteractor* rwi = window->GetInteractor( );
  vtkRenderer* renderer = window->GetRenderers( )->GetFirstRenderer( );
  if( renderer != NULL )
  {
    renderer->RemoveViewProp( this->m_ImageActor );
    renderer->RemoveViewProp( this->m_BlenderActor );
    renderer->RemoveViewProp( this->m_CursorActor );
    renderer->RemoveViewProp( this->m_PlaneActor );
    renderer->RemoveViewProp( this->m_TextActor );
    renderer->RemoveViewProp( this->m_Axis1Actor );
    renderer->RemoveViewProp( this->m_Axis2Actor );

  } // fi
}

// -------------------------------------------------------------------------
unsigned int cpExtensions::Visualization::ImageSliceActors::
GetNumberOfImages( ) const
{
  return( this->m_Blender->GetNumberOfInputPorts( ) );
}

// -------------------------------------------------------------------------
vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetImageActor( )
{
  return( this->m_ImageActor );
}

// -------------------------------------------------------------------------
const vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetImageActor( ) const
{
  return( this->m_ImageActor );
}

// -------------------------------------------------------------------------
vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetBinaryActor( )
{
  return( this->m_BlenderActor );
}

// -------------------------------------------------------------------------
const vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetBinaryActor( ) const
{
  return( this->m_BlenderActor );
}

// -------------------------------------------------------------------------
vtkTextActor* cpExtensions::Visualization::ImageSliceActors::
GetTextActor( )
{
  return( this->m_TextActor );
}

// -------------------------------------------------------------------------
const vtkTextActor* cpExtensions::Visualization::ImageSliceActors::
GetTextActor( ) const
{
  return( this->m_TextActor );
}

// -------------------------------------------------------------------------
vtkActor* cpExtensions::Visualization::ImageSliceActors::
GetPlaneActor( )
{
  return( this->m_PlaneActor );
}

// -------------------------------------------------------------------------
const vtkActor* cpExtensions::Visualization::ImageSliceActors::
GetPlaneActor( ) const
{
  return( this->m_PlaneActor );
}

// -------------------------------------------------------------------------
vtkPlane* cpExtensions::Visualization::ImageSliceActors::
GetPlaneFunction( )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetSlicePlane( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
const vtkPlane* cpExtensions::Visualization::ImageSliceActors::
GetPlaneFunction( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetSlicePlane( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetInterpolate( bool v )
{
  if( this->m_Interpolate != v )
  {
    this->m_ImageActor->SetInterpolate( v );
    this->m_BlenderActor->SetInterpolate( v );
    this->m_Interpolate = v;
    this->Modified( );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
InterpolateOn( )
{
  this->SetInterpolate( true );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
InterpolateOff( )
{
  this->SetInterpolate( false );
}

// -------------------------------------------------------------------------
double* cpExtensions::Visualization::ImageSliceActors::
GetDisplayBounds( ) const
{
  if( this->m_ImageActor.GetPointer( ) != NULL )
    return( this->m_ImageActor->GetDisplayBounds( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
GetDisplayBounds( double bounds[ 6 ] ) const
{
  if( this->m_ImageActor.GetPointer( ) == NULL )
  {
    bounds[ 0 ] = bounds[ 2 ] = bounds[ 4 ] = double(  0 );
    bounds[ 1 ] = bounds[ 3 ] = bounds[ 5 ] = double( -1 );
  }
  else
    this->m_ImageActor->GetDisplayBounds( bounds );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
ResetCursor( )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
  {
    double pos[] =
      {
        this->m_VisibleBounds[ 0 ],
        this->m_VisibleBounds[ 2 ],
        this->m_VisibleBounds[ 4 ]
      };
    this->SetCursor( pos );
  }
  else
  {
    vtkPoints* points = this->m_Cursor->GetPoints( );
    points->SetPoint( 0, 0, 0, 0 );
    points->SetPoint( 1, 0, 0, 0 );
    points->SetPoint( 2, 0, 0, 0 );
    points->SetPoint( 3, 0, 0, 0 );
    this->m_Cursor->Modified( );
    this->m_CursorMapper->Modified( );
    this->m_CursorActor->Modified( );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetCursor( double pos[ 3 ] )
{
  if( this->m_ImageMapper.GetPointer( ) == NULL )
    return;

  // Get ordered axes
  int a0 = this->GetAxis( );
  int a1 = ( a0 + 1 ) % 3;
  int a2 = ( a0 + 2 ) % 3;
  int ma0 = a0 << 1;
  int ma1 = a1 << 1;
  int ma2 = a2 << 1;

  // Update cross
  double* bounds = this->m_VisibleBounds;
  double p0[ 3 ], p1[ 3 ], p2[ 3 ], p3[ 3 ];

  p0[ a2 ] = p1[ a2 ] = pos[ a2 ];
  p2[ a1 ] = p3[ a1 ] = pos[ a1 ];
  p0[ a0 ] = p1[ a0 ] = p2[ a0 ] = p3[ a0 ] = bounds[ ma0 ];
  p0[ a1 ] = bounds[ ma1 ];
  p1[ a1 ] = bounds[ ma1 + 1 ];
  p2[ a2 ] = bounds[ ma2 ];
  p3[ a2 ] = bounds[ ma2 + 1 ];

  vtkPoints* points = this->m_Cursor->GetPoints( );
  points->SetPoint( 0, p0 );
  points->SetPoint( 1, p1 );
  points->SetPoint( 2, p2 );
  points->SetPoint( 3, p3 );
  this->m_Cursor->Modified( );
  this->m_CursorMapper->Modified( );
  this->m_CursorActor->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
ResetAxesCursor( )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
  {
    double pos[] =
      {
        this->m_VisibleBounds[ 0 ],
        this->m_VisibleBounds[ 2 ],
        this->m_VisibleBounds[ 4 ]
      };
    this->SetAxesCursor( pos );
  }
  else
  {
    vtkPoints* points = this->m_Axis1->GetPoints( );
    points->SetPoint( 0, 0, 0, 0 );
    points->SetPoint( 1, 0, 0, 0 );
    this->m_Axis1->Modified( );
    this->m_Axis1Mapper->Modified( );
    this->m_Axis1Actor->Modified( );

    points = this->m_Axis2->GetPoints( );
    points->SetPoint( 0, 0, 0, 0 );
    points->SetPoint( 1, 0, 0, 0 );
    this->m_Axis2->Modified( );
    this->m_Axis2Mapper->Modified( );
    this->m_Axis2Actor->Modified( );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetAxesCursor( double pos[ 3 ] )
{
  if( this->m_ImageMapper.GetPointer( ) == NULL )
    return;

  // Get ordered axes
  int a0 = this->GetAxis( );
  int a1 = ( a0 + 1 ) % 3;
  int a2 = ( a0 + 2 ) % 3;
  int ma0 = a0 << 1;
  int ma1 = a1 << 1;
  int ma2 = a2 << 1;

  // Update cross
  double* bounds = this->m_VisibleBounds;
  double p0[ 3 ], p1[ 3 ], p2[ 3 ], p3[ 3 ];

  p0[ a2 ] = p1[ a2 ] = pos[ a2 ];
  p2[ a1 ] = p3[ a1 ] = pos[ a1 ];
  p0[ a0 ] = p1[ a0 ] = p2[ a0 ] = p3[ a0 ] = bounds[ ma0 ];
  p0[ a1 ] = bounds[ ma1 ];
  p1[ a1 ] = bounds[ ma1 + 1 ];
  p2[ a2 ] = bounds[ ma2 ];
  p3[ a2 ] = bounds[ ma2 + 1 ];

  vtkPoints* points1 = this->m_Axis1->GetPoints( );
  points1->SetPoint( 0, p2 );
  points1->SetPoint( 1, p3 );

  vtkPoints* points2 = this->m_Axis2->GetPoints( );
  points2->SetPoint( 0, p0 );
  points2->SetPoint( 1, p1 );

  this->m_Axis1->Modified( );
  this->m_Axis1Mapper->Modified( );
  this->m_Axis1Actor->Modified( );

  this->m_Axis2->Modified( );
  this->m_Axis2Mapper->Modified( );
  this->m_Axis2Actor->Modified( );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetMinWindow( ) const
{
  return( this->m_WLRange[ 0 ] );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetMaxWindow( ) const
{
  return( this->m_WLRange[ 1 ] );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetMinLevel( ) const
{
  return( this->m_WLRange[ 2 ] );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetMaxLevel( ) const
{
  return( this->m_WLRange[ 3 ] );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetWindow( ) const
{
  if( this->m_ImageActor.GetPointer( ) != NULL )
    return( this->m_ImageActor->GetProperty( )->GetColorWindow( ) );
  else
    return( double( 0 ) );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetLevel( ) const
{
  if( this->m_ImageActor.GetPointer( ) != NULL )
    return( this->m_ImageActor->GetProperty( )->GetColorLevel( ) );
  else
    return( double( 0 ) );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetWindow( double w )
{
  if( this->m_ImageActor.GetPointer( ) == NULL )
    return;
  double v = ( w < this->m_WLRange[ 0 ] )? this->m_WLRange[ 0 ]: w;
  v        = ( v > this->m_WLRange[ 1 ] )? this->m_WLRange[ 1 ]: v;
  this->m_ImageActor->GetProperty( )->SetColorWindow( v );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetLevel( double l )
{
  if( this->m_ImageActor.GetPointer( ) == NULL )
    return;
  double v = ( l < this->m_WLRange[ 2 ] )? this->m_WLRange[ 2 ]: l;
  v        = ( v > this->m_WLRange[ 3 ] )? this->m_WLRange[ 3 ]: v;
  this->m_ImageActor->GetProperty( )->SetColorLevel( v );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetWindowLevel( double w, double l )
{
  if( this->m_ImageActor.GetPointer( ) == NULL )
    return;
  double a = ( w < this->m_WLRange[ 0 ] )? this->m_WLRange[ 0 ]: w;
  a        = ( a > this->m_WLRange[ 1 ] )? this->m_WLRange[ 1 ]: a;
  double b = ( l < this->m_WLRange[ 2 ] )? this->m_WLRange[ 2 ]: l;
  b        = ( b > this->m_WLRange[ 3 ] )? this->m_WLRange[ 3 ]: b;
  this->m_ImageActor->GetProperty( )->SetColorWindow( a );
  this->m_ImageActor->GetProperty( )->SetColorLevel( b );
  this->UpdateText( a, b );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
ResetWindowLevel( )
{
  this->SetWindowLevel(
    this->m_WLRange[ 1 ] * double( 0.5 ),
    ( this->m_WLRange[ 3 ] + this->m_WLRange[ 2 ] ) * double( 0.5 )
    );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetAxis( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetOrientation( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumber( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetSliceNumber( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumberMinValue( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetSliceNumberMinValue( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumberMaxValue( ) const
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
    return( this->m_ImageMapper->GetSliceNumberMaxValue( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetSliceNumber( const int& slice )
{
  if( this->m_ImageMapper.GetPointer( ) == NULL )
    return;

  int axis = this->GetAxis( );
  double prev_pos = this->m_VisibleBounds[ axis << 1 ];

  // Update mappers and display bounds
  this->m_ImageMapper->SetSliceNumber( slice );
  this->m_BlenderMapper->SetSliceNumber( slice );
  this->m_ImageMapper->Modified( );
  this->m_BlenderMapper->Modified( );
  this->m_ImageActor->Modified( );
  this->m_BlenderActor->Modified( );

  // Update display extent (this isn't done automatically)
  this->m_ImageMapper->GetInput( )->GetExtent( this->m_VisibleExtent );
  this->m_VisibleExtent[ axis << 1 ] = slice;
  this->m_VisibleExtent[ ( axis << 1 ) + 1 ] = slice;
  this->m_ImageActor->SetDisplayExtent( this->m_VisibleExtent );

  // Prepare plane data
  this->m_ImageMapper->GetBounds( this->m_VisibleBounds );
  double x0[][ 3 ] =
    {
      {
        this->m_VisibleBounds[ 0 ],
        this->m_VisibleBounds[ 2 ],
        this->m_VisibleBounds[ 4 ]
      },
      {
        this->m_VisibleBounds[ 1 ],
        this->m_VisibleBounds[ 3 ],
        this->m_VisibleBounds[ 5 ]
      }
    };
  double p0[ 2 ][ 3 ];

  vtkPlane* plane = this->m_ImageMapper->GetSlicePlane( );
  plane->GeneralizedProjectPoint( x0[ 0 ], p0[ 0 ] );
  plane->GeneralizedProjectPoint( x0[ 1 ], p0[ 1 ] );

  this->m_VisibleBounds[ 0 ] = p0[ 0 ][ 0 ];
  this->m_VisibleBounds[ 1 ] = p0[ 1 ][ 0 ];
  this->m_VisibleBounds[ 2 ] = p0[ 0 ][ 1 ];
  this->m_VisibleBounds[ 3 ] = p0[ 1 ][ 1 ];
  this->m_VisibleBounds[ 4 ] = p0[ 0 ][ 2 ];
  this->m_VisibleBounds[ 5 ] = p0[ 1 ][ 2 ];
  double* bnds = this->m_VisibleBounds;

  // Configure visualization and implicit plane orientation
  this->m_PlaneActor->GetProperty( )->SetRepresentationToWireframe( );
  this->m_PlaneActor->GetProperty( )->SetLineWidth( 3 );
  vtkPoints* plane_points = this->m_Plane->GetPoints( );
  plane_points->SetPoint( 0, bnds[ 0 ], bnds[ 2 ], bnds[ 4 ] );
  plane_points->SetPoint( 2, bnds[ 1 ], bnds[ 3 ], bnds[ 5 ] );
  if( axis == 0 || axis == 2 ) // YZ, x-normal
  {
    plane_points->SetPoint( 1, bnds[ 1 ], bnds[ 2 ], bnds[ 5 ] );
    plane_points->SetPoint( 3, bnds[ 0 ], bnds[ 3 ], bnds[ 4 ] );
  }
  else if( axis == 1 ) // ZX, y-normal
  {
    plane_points->SetPoint( 1, bnds[ 0 ], bnds[ 2 ], bnds[ 5 ] );
    plane_points->SetPoint( 3, bnds[ 1 ], bnds[ 3 ], bnds[ 4 ] );

  } // fi

  // Set plane colors
  this->m_PlaneActor->GetProperty( )->
    SetColor( this->m_PlaneColors[ axis ] );
  this->m_Axis1Actor->GetProperty( )->
    SetColor( this->m_PlaneColors[ ( axis + 1 ) % 3 ] );
  this->m_Axis2Actor->GetProperty( )->
    SetColor( this->m_PlaneColors[ ( axis + 2 ) % 3 ] );

  this->m_Plane->Modified( );
  this->m_PlaneMapper->Modified( );
  this->m_PlaneActor->Modified( );

  this->m_Axis1->Modified( );
  this->m_Axis1Mapper->Modified( );
  this->m_Axis1Actor->Modified( );

  this->m_Axis2->Modified( );
  this->m_Axis2Mapper->Modified( );
  this->m_Axis2Actor->Modified( );

  // Update text
  this->UpdateText( );

  // Update lines from associated slices
  /* TODO
     auto sIt = this->m_AssociatedSlices.begin( );
     for( ; sIt != this->m_AssociatedSlices.end( ); ++sIt )
     {
     Self* slice = *sIt;
     for( unsigned int id = 0; id < slice->m_AssociatedSlices.size( ); ++id )
     {
     std::cout << id << std::endl;
     if( slice->m_AssociatedSlices[ id ] != this )
     continue;

     std::cout << "id : " << id << std::endl;

     } // rof

     } // rof
  */

  // Update camera position
  if( this->m_Window == NULL )
    return;
  vtkRenderer* renderer =
    this->m_Window->GetRenderers( )->GetFirstRenderer( );
  if( renderer == NULL )
    return;
  vtkCamera* camera = renderer->GetActiveCamera( );
  if( camera == NULL )
    return;
  double cam_pos[ 3 ];
  camera->GetPosition( cam_pos );
  cam_pos[ axis ] += this->m_VisibleBounds[ axis << 1 ] - prev_pos;
  camera->SetPosition( cam_pos );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetSlice( double* pos )
{
  vtkImageData* image = this->GetInputImage( );
  if( image == NULL )
    return;

  int ijk[ 3 ];
  double pcoords[ 3 ];
  image->ComputeStructuredCoordinates( pos, ijk, pcoords );
  this->SetSliceNumber( ijk[ this->GetAxis( ) ] );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
UpdateText( )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
  {
    char axis;
    int axId = this->m_ImageMapper->GetOrientation( );
    if     ( axId == 0 ) axis = 'X';
    else if( axId == 1 ) axis = 'Y';
    else if( axId == 2 ) axis = 'Z';

    std::sprintf(
      this->m_TextBuffer, "Axis: %c (%d)",
      axis, this->m_ImageMapper->GetSliceNumber( )
      );
  }
  else
    this->m_TextBuffer[ 0 ] = '\0';
  this->m_TextActor->SetInput( this->m_TextBuffer );
  this->m_TextActor->Modified( );
  this->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
UpdateText( double pos[ 3 ] )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
  {
    char axis;
    int axId = this->m_ImageMapper->GetOrientation( );
    if     ( axId == 0 ) axis = 'X';
    else if( axId == 1 ) axis = 'Y';
    else if( axId == 2 ) axis = 'Z';
    int slice = this->GetSliceNumber( );

    vtkImageData* image = this->GetInputImage( );
    int ijk[ 3 ];
    double pcoords[ 3 ];
    image->ComputeStructuredCoordinates( pos, ijk, pcoords );
    ijk[ axId ] = slice;

    int ext[ 6 ];
    image->GetExtent( ext );
    if(
      ext[ 0 ] <= ijk[ 0 ] && ijk[ 0 ] <= ext[ 1 ] &&
      ext[ 2 ] <= ijk[ 1 ] && ijk[ 1 ] <= ext[ 3 ] &&
      ext[ 4 ] <= ijk[ 2 ] && ijk[ 2 ] <= ext[ 5 ]
      )
    {
      int nScl = image->GetNumberOfScalarComponents( );
      std::stringstream str;
      str
        << "[" << ijk[ 0 ]
        << "," << ijk[ 1 ]
        << "," << ijk[ 2 ] << "]=(";
      str <<
        image->GetScalarComponentAsFloat( ijk[ 0 ], ijk[ 1 ], ijk[ 2 ], 0 );
      for( int n = 1; n < nScl; ++n )
        str
          << " "
          << image->GetScalarComponentAsFloat(
            ijk[ 0 ], ijk[ 1 ], ijk[ 2 ], n
            );
      str << ")";
      std::sprintf(
        this->m_TextBuffer, "Axis: %c (%d)\nPixel %s",
        axis, slice, str.str( ).c_str( )
        );

    } // fi
  }
  else
    this->m_TextBuffer[ 0 ] = '\0';
  this->m_TextActor->SetInput( this->m_TextBuffer );
  this->m_TextActor->Modified( );
  this->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
UpdateText( const double& w, const double& l )
{
  if( this->m_ImageMapper.GetPointer( ) != NULL )
  {
    char axis;
    int axId = this->m_ImageMapper->GetOrientation( );
    if     ( axId == 0 ) axis = 'X';
    else if( axId == 1 ) axis = 'Y';
    else if( axId == 2 ) axis = 'Z';

    std::sprintf(
      this->m_TextBuffer, "Axis: %c (%d)\nW/L (%.2f/%.2f)",
      axis, this->m_ImageMapper->GetSliceNumber( ), w, l
      );
  }
  else
    this->m_TextBuffer[ 0 ] = '\0';
  this->m_TextActor->SetInput( this->m_TextBuffer );
  this->m_TextActor->Modified( );
  this->Modified( );
}

// -------------------------------------------------------------------------
cpExtensions::Visualization::ImageSliceActors::
ImageSliceActors( )
  : Superclass( ),
    m_Window( NULL ),
    m_Interpolate( false )
{
  this->Clear( );
  this->_ConfigureStyle( );
}

// -------------------------------------------------------------------------
cpExtensions::Visualization::ImageSliceActors::
~ImageSliceActors( )
{
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_Render( )
{
  if( this->m_Window == NULL )
    return;
  vtkRenderer* renderer =
    this->m_Window->GetRenderers( )->GetFirstRenderer( );
  if( renderer == NULL )
    return;
  renderer->SetAllocatedRenderTime( 1e-3 );
  this->m_Window->Render( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ResetCamera( )
{
  if( this->m_Window == NULL )
    return;
  vtkRenderer* renderer =
    this->m_Window->GetRenderers( )->GetFirstRenderer( );
  if( renderer == NULL )
    return;
  renderer->ResetCamera( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ConfigureStyle( )
{
  // Connect this view with a controller
  this->m_Style = vtkSmartPointer< TStyle >::New( );
  this->m_Style->AddMouseMoveCommand( Self::_MouseMoveCommand, this );
  this->m_Style->AddMouseClickCommand( Self::_MouseClickCommand, this );
  this->m_Style->AddMouseWheelCommand( Self::_MouseWheelCommand, this );
  this->m_Style->AddKeyCommand( Self::_KeyCommand, this );
  this->m_Style->AddEnterCommand( Self::_EnterCommand, this );
  this->m_Style->AddLeaveCommand( Self::_LeaveCommand, this );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ConfigureInputImage( )
{
  this->m_ImageMapper->SetOrientation( 0 );
  this->m_ImageMapper->Update( );

  // Create actor
  this->m_ImageActor->SetInterpolate( this->m_Interpolate );
  this->m_ImageActor->Modified( );

  if( this->m_Style.GetPointer( ) != NULL )
    this->m_Style->AssociateImageActor( this->m_ImageActor );
  this->AddItem( this->m_ImageActor );

  this->SetSliceNumber( this->GetSliceNumberMinValue( ) );
  this->ResetCursor( );
  this->Modified( );

  // Reset cursors
  this->ResetCursor( );
  this->ResetAxesCursor( );

  // Update window/level ranges
  vtkImageData* data = this->GetInputImage( );
  if( data != NULL )
  {
    double r[ 2 ];
    data->GetScalarRange( r );
    this->m_WLRange[ 0 ] = double( 0 );
    this->m_WLRange[ 1 ] = r[ 1 ] - r[ 0 ];
    this->m_WLRange[ 2 ] = r[ 0 ];
    this->m_WLRange[ 3 ] = r[ 1 ];
    this->ResetWindowLevel( );

    // Configure blender
    this->m_BlenderBase = vtkSmartPointer< vtkImageData >::New( );
    this->m_BlenderBase->ShallowCopy( data );
    this->m_BlenderBase->AllocateScalars( VTK_UNSIGNED_CHAR, 1 );
    std::memset(
      this->m_BlenderBase->GetScalarPointer( ), 0,
      this->m_BlenderBase->GetActualMemorySize( )
      );
    this->m_Blender->AddInputData( this->m_BlenderBase );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ConfigureBinaryImage( const double& r, const double& g, const double& b )
{
  unsigned int nValues = this->m_BlenderLUT->GetNumberOfTableValues( );
  this->m_BlenderLUT->SetNumberOfTableValues( nValues + 1 );
  this->m_BlenderLUT->SetTableRange( 0, nValues );
  this->m_BlenderLUT->SetTableValue( nValues, r, g, b, 0.5 );
  this->m_BlenderLUT->Build( );

  this->m_BlenderLUT->Modified( );
  this->m_Blender->Modified( );
  this->m_Blender->Update( );

  this->m_BlenderMapper->Modified( );
  this->m_BlenderActor->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_MouseMoveCommand(
  void* data, const TStyle::ButtonID& btn, int* idx, double* pos,
  bool alt, bool ctr, bool sft
  )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  if( btn == TStyle::ButtonID_None )
  {
    // Just show the pixel information
    actors->SetCursor( pos );
    actors->UpdateText( pos );
    actors->_Render( );
  }
  else if( btn == TStyle::ButtonID_Left )
  {
    if( !alt && ctr && !sft )
    {
      // Show axes in current renderer
      actors->SetAxesCursor( pos );
      actors->_Render( );

      // Interactively move slices
      auto i = actors->m_SlicesCommands.begin( );
      for( ; i != actors->m_SlicesCommands.end( ); ++i )
        i->first( pos, actors->GetAxis( ), i->second );

    } // fi
  }
  else if( btn == TStyle::ButtonID_Right )
  {
    if( !alt && !ctr && sft )
    {
      // Change image window level
      double bounds[ 6 ];
      actors->m_ImageMapper->GetBounds( bounds );

      int a0 = actors->GetAxis( );
      int a1 = ( a0 + 1 ) % 3;
      int a2 = ( a0 + 2 ) % 3;
      double dx = pos[ a1 ] - actors->m_StartWindowLevelPos[ a1 ];
      double dy = pos[ a2 ] - actors->m_StartWindowLevelPos[ a2 ];
      dx /= bounds[ ( a1 << 1 ) + 1 ] - bounds[ a1 << 1 ];
      dy /= bounds[ ( a2 << 1 ) + 1 ] - bounds[ a2 << 1 ];

      dx *= actors->m_StartWindowLevel[ 0 ];
      dy *= actors->m_StartWindowLevel[ 1 ];
      dx += actors->m_StartWindowLevel[ 0 ];
      dy += actors->m_StartWindowLevel[ 1 ];
      actors->SetWindowLevel( dx, dy );
      actors->_Render( );

      // Associate objects
      auto i = actors->m_WindowLevelCommands.begin( );
      for( ; i != actors->m_WindowLevelCommands.end( ); ++i )
        i->first( dx, dy, i->second );

    } // fi

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_MouseClickCommand(
  void* data, const TStyle::ButtonID& btn, int* idx, double* pos,
  bool alt, bool ctr, bool sft
  )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  actors->m_StartWindowLevelPos[ 0 ] = pos[ 0 ];
  actors->m_StartWindowLevelPos[ 1 ] = pos[ 1 ];
  actors->m_StartWindowLevelPos[ 2 ] = pos[ 2 ];
  actors->m_StartWindowLevel[ 0 ] = actors->GetWindow( );
  actors->m_StartWindowLevel[ 1 ] = actors->GetLevel( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_MouseWheelCommand(
  void* data, const int& dir,
  bool alt, bool ctr, bool sft
  )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  if( !alt && !ctr )
  {
    int slice = actors->GetSliceNumber( ) + ( dir * ( ( sft )? 10: 1 ) );
    if( slice < actors->GetSliceNumberMinValue( ) )
      slice = actors->GetSliceNumberMinValue( );
    if( slice > actors->GetSliceNumberMaxValue( ) )
      slice = actors->GetSliceNumberMaxValue( );
    actors->SetSliceNumber( slice );
    actors->_Render( );

    auto a = actors->m_AssociatedSlices.begin( );
    for( ; a != actors->m_AssociatedSlices.end( ); ++a )
      ( *a )->SetSliceNumber( slice );

    // Associate objects
    auto i = actors->m_RenderCommands.begin( );
    for( ; i != actors->m_RenderCommands.end( ); ++i )
      i->first( i->second );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_KeyCommand( void* data, const char& key )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  switch( key )
  {
  case 'r': case 'R':
  {
    actors->_ResetCamera( );
    actors->_Render( );

    // Associate objects
    auto i = actors->m_RenderCommands.begin( );
    for( ; i != actors->m_RenderCommands.end( ); ++i )
      i->first( i->second );
  }
  break;
  case 'w': case 'W':
  {
    actors->ResetWindowLevel( );
    actors->_Render( );

    // Associate objects
    auto i = actors->m_RenderCommands.begin( );
    for( ; i != actors->m_RenderCommands.end( ); ++i )
      i->first( i->second );
  }
  break;
  default:
    break;
  } // hctiws
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_EnterCommand( void* data )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  actors->ResetCursor( );
  actors->m_CursorActor->VisibilityOn( );
  actors->_Render( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_LeaveCommand( void* data )
{
  ImageSliceActors* actors = reinterpret_cast< ImageSliceActors* >( data );
  if( actors == NULL )
    return;

  actors->ResetCursor( );
  actors->m_CursorActor->VisibilityOff( );
  actors->_Render( );
}

// eof - $RCSfile$