#include <cpExtensions/Visualization/ImageSliceActors.h>

#include <cmath>
#include <sstream>

#include <vtkAlgorithmOutput.h>
#include <vtkCamera.h>
#include <vtkCellArray.h>
#include <vtkImageData.h>
#include <vtkInformation.h>
#include <vtkPlane.h>
#include <vtkPoints.h>
#include <vtkProperty.h>
#include <vtkRenderer.h>
#include <vtkRendererCollection.h>
#include <vtkRenderWindow.h>
#include <vtkRenderWindowInteractor.h>
#include <vtkStreamingDemandDrivenPipeline.h>
#include <vtkTextProperty.h>
#include <vtkWindowLevelLookupTable.h>

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

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
AddInputConnection( vtkAlgorithmOutput* aout, int axis )
{
  vtkImageData* data = dynamic_cast< vtkImageData* >(
    aout->GetProducer( )->GetOutputDataObject( aout->GetIndex( ) )
    );
  if( data == NULL )
    return;

  vtkImageMapToColors* new_map =
    dynamic_cast< vtkImageMapToColors* >( aout->GetProducer( ) );
  if( new_map == NULL )
  {
    // Configure LUT
    this->_ConfigureNewLUT( data );
    new_map = *( this->ImageMaps.rbegin( ) );
    if( new_map != NULL )
    {
      new_map->SetInputConnection( aout );
      new_map->Update( );

    } // fi
  }
  else
    this->ImageMaps.push_back( new_map );
  
  // Create mapper and actors
  vtkSmartPointer< vtkImageSliceMapper > mapper =
    vtkSmartPointer< vtkImageSliceMapper >::New( );
  if( new_map != NULL )
    mapper->SetInputConnection( new_map->GetOutputPort( ) );
  else
    mapper->SetInputConnection( aout );
  this->SliceMappers.push_back( mapper );
  this->_ConfigureNewInput( axis );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
AddInputData( vtkImageData* data, int axis )
{
  // Configure LUT
  this->_ConfigureNewLUT( data );
  vtkImageMapToColors* new_map = *( this->ImageMaps.rbegin( ) );
  if( new_map != NULL )
  {
    new_map->SetInputData( data );
    new_map->Update( );

  } // fi

  // Create mapper and actors
  vtkSmartPointer< vtkImageSliceMapper > mapper =
    vtkSmartPointer< vtkImageSliceMapper >::New( );
  if( new_map != NULL )
    mapper->SetInputConnection( new_map->GetOutputPort( ) );
  else
    mapper->SetInputData( data );
  this->SliceMappers.push_back( mapper );
  this->_ConfigureNewInput( axis );
}

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

  // Delete all images
  this->ImageMaps.clear( );
  this->SliceMappers.clear( );
  this->ImageActors.clear( );
  this->AssociatedSlices.clear( );
  this->AssociatedActors.clear( );

  // Reconfigure unique objects
  this->Cursor        = vtkSmartPointer< vtkPolyData >::New( );
  this->CursorMapper  = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->CursorActor   = vtkSmartPointer< vtkActor >::New( );
  this->PlaneFunction = vtkSmartPointer< vtkPlane >::New( );
  this->Plane         = vtkSmartPointer< vtkPolyData >::New( );
  this->PlaneMapper   = vtkSmartPointer< vtkPolyDataMapper >::New( );
  this->TextActor     = vtkSmartPointer< vtkTextActor >::New( );
  this->PlaneActor    = vtkSmartPointer< vtkActor >::New( );
  this->TextBuffer[ 0 ] = '\0';

  // Unique objects configuration
  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_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 );
  cursor_lines->InsertNextCell( 2 );
  cursor_lines->InsertCellPoint( 4 );
  cursor_lines->InsertCellPoint( 5 );
  cursor_lines->InsertNextCell( 2 );
  cursor_lines->InsertCellPoint( 6 );
  cursor_lines->InsertCellPoint( 7 );
  this->Cursor->SetPoints( cursor_points );
  this->Cursor->SetLines( cursor_lines );
  this->CursorMapper->SetInputData( this->Cursor );
  this->CursorActor->SetMapper( this->CursorMapper );

  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->Plane->SetPoints( plane_points );
  this->Plane->SetLines( plane_lines );

  this->PlaneMapper->SetInputData( this->Plane );
  this->PlaneActor->SetMapper( this->PlaneMapper );

  this->TextActor->SetTextScaleModeToNone( );
  vtkTextProperty* textprop = this->TextActor->GetTextProperty( );
  textprop->SetColor( 1, 1, 1 );
  textprop->SetFontFamilyToCourier( );
  textprop->SetFontSize( 18 );
  textprop->BoldOff( );
  textprop->ItalicOff( );
  textprop->ShadowOff( );
  textprop->SetJustificationToLeft( );
  textprop->SetVerticalJustificationToBottom( );
  vtkCoordinate* coord = this->TextActor->GetPositionCoordinate( );
  coord->SetCoordinateSystemToNormalizedViewport( );
  coord->SetValue( 0.01, 0.01 );
}

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

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetSlicesCommand( TCursorCommand cmd, void* data )
{
  this->SlicesCommand = cmd;
  this->SlicesData = data;
  this->Modified( );
}

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

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

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

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

    } // fi

  } // fi

  if( renderer != NULL )
  {
    // Update actors
    unsigned int N = this->GetNumberOfImageActors( );
    for( unsigned int n = 0; n < N; ++n )
      renderer->AddActor( this->GetImageActor( n ) );
    renderer->AddActor( this->CursorActor );
    renderer->AddActor( this->PlaneActor );
    renderer->AddActor( this->TextActor );
    renderer->Modified( );

    // Configure camera
    vtkCamera* camera = renderer->GetActiveCamera( );
    if( camera == NULL )
      return;

    // Parallel projections are better when displaying 2D images
    if( force_style )
    {
      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( 1 ), double( 0 ) );
      }
      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( );
    rwi->Render( );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
PopActorsFrom( vtkRenderWindow* window )
{
  vtkRenderWindowInteractor* rwi = window->GetInteractor( );
  vtkRenderer* renderer = window->GetRenderers( )->GetFirstRenderer( );

  if( renderer != NULL )
  {
    // Update actors
    unsigned int N = this->GetNumberOfImageActors( );
    for( unsigned int n = 0; n < N; ++n )
      renderer->RemoveActor( this->GetImageActor( n ) );
    renderer->RemoveActor( this->CursorActor );
    renderer->RemoveActor( this->PlaneActor );
    renderer->RemoveActor( this->TextActor );
    renderer->Modified( );

  } // fi
}

// -------------------------------------------------------------------------
unsigned int cpExtensions::Visualization::ImageSliceActors::
GetNumberOfImageActors( ) const
{
  return( this->ImageActors.size( ) );
}

// -------------------------------------------------------------------------
vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetImageActor( unsigned int id )
{
  if( id < this->ImageActors.size( ) )
    return( this->ImageActors[ id ] );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
const vtkImageActor* cpExtensions::Visualization::ImageSliceActors::
GetImageActor( unsigned int id ) const
{
  if( id < this->ImageActors.size( ) )
    return( this->ImageActors[ id ] );
  else
    return( NULL );
}

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

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

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

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

// -------------------------------------------------------------------------
vtkPlane* cpExtensions::Visualization::ImageSliceActors::
GetPlaneFunction( )
{
  return( this->PlaneFunction );
}

// -------------------------------------------------------------------------
const vtkPlane* cpExtensions::Visualization::ImageSliceActors::
GetPlaneFunction( ) const
{
  return( this->PlaneFunction );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
AddActor( vtkAlgorithm* algorithm, vtkActor* actor )
{
  this->AssociatedActors.push_back( TAssociatedActor( algorithm, actor ) );
  this->AddItem( actor );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
AddActor( vtkActor* actor )
{
  this->AddActor( NULL, actor );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetInterpolate( bool v )
{
  if( this->Interpolate != v )
  {
    for( unsigned int i = 0; i < this->ImageActors.size( ); ++i )
      this->ImageActors[ i ]->SetInterpolate( v );
    this->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->ImageActors.size( ) > 0 )
    return( this->ImageActors[ 0 ]->GetDisplayBounds( ) );
  else
    return( NULL );
}

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

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
ResetCursor( )
{
  vtkPoints* points = this->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 );
  points->SetPoint( 4, 0, 0, 0 );
  points->SetPoint( 5, 0, 0, 0 );
  points->SetPoint( 6, 0, 0, 0 );
  points->SetPoint( 7, 0, 0, 0 );
  this->Cursor->Modified( );
  this->CursorMapper->Modified( );
  this->CursorActor->Modified( );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetCursor( double pos[ 3 ] )
{
  if( this->SliceMappers.size( ) == 0 )
    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;

  double bounds[ 6 ];
  this->SliceMappers[ 0 ]->GetInput( )->GetBounds( bounds );

  double
    p0[ 3 ], p1[ 3 ], p2[ 3 ], p3[ 3 ],
    p4[ 3 ], p5[ 3 ], p6[ 3 ], p7[ 3 ];

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

  vtkPoints* points = this->Cursor->GetPoints( );
  points->SetPoint( 0, p0 );
  points->SetPoint( 1, p1 );
  points->SetPoint( 2, p2 );
  points->SetPoint( 3, p3 );
  points->SetPoint( 4, p4 );
  points->SetPoint( 5, p5 );
  points->SetPoint( 6, p6 );
  points->SetPoint( 7, p7 );
  this->Cursor->Modified( );
  this->CursorMapper->Modified( );
  this->CursorActor->Modified( );
}

// -------------------------------------------------------------------------
vtkImageMapToColors* cpExtensions::Visualization::ImageSliceActors::
GetImageMap( unsigned int id )
{
  if( id < this->ImageMaps.size( ) )
    return( this->ImageMaps[ id ].GetPointer( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
const vtkImageMapToColors* cpExtensions::Visualization::ImageSliceActors::
GetImageMap( unsigned int id ) const
{
  if( id < this->ImageMaps.size( ) )
    return( this->ImageMaps[ id ].GetPointer( ) );
  else
    return( NULL );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetWindow( ) const
{
  if( this->ImageMaps.size( ) > 0 )
  {
    if( this->ImageMaps[ 0 ].GetPointer( ) != NULL )
    {
      vtkWindowLevelLookupTable* lut =
        dynamic_cast< vtkWindowLevelLookupTable* >(
          this->ImageMaps[ 0 ]->GetLookupTable( )
          );
      if( lut != NULL )
        return( lut->GetWindow( ) );
      else
        return( double( 0 ) );
    }
    else
      return( double( 0 ) );
  }
  else
    return( double( 0 ) );
}

// -------------------------------------------------------------------------
double cpExtensions::Visualization::ImageSliceActors::
GetLevel( ) const
{
  if( this->ImageMaps.size( ) > 0 )
  {
    if( this->ImageMaps[ 0 ].GetPointer( ) != NULL )
    {
      vtkWindowLevelLookupTable* lut =
        dynamic_cast< vtkWindowLevelLookupTable* >(
          this->ImageMaps[ 0 ]->GetLookupTable( )
          );
      if( lut != NULL )
        return( lut->GetLevel( ) );
      else
        return( double( 0 ) );
    }
    else
      return( double( 0 ) );
  }
  else
    return( double( 0 ) );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetWindow( double w )
{
  if( this->ImageMaps.size( ) > 0 )
  {
    if( this->ImageMaps[ 0 ].GetPointer( ) != NULL )
    {
      vtkWindowLevelLookupTable* lut =
        dynamic_cast< vtkWindowLevelLookupTable* >(
          this->ImageMaps[ 0 ]->GetLookupTable( )
          );
      if( lut != NULL )
      {
        /* TODO: Min and Max values are assigned 0!!!
           if( w < this->MinWindow )
           w = this->MinWindow;
           if( w > this->MaxWindow )
           w = this->MaxWindow;
        */
        lut->SetWindow( w );
        lut->Build( );
        this->ImageMaps[ 0 ]->Modified( );
        this->Modified( );

      } // fi

    } // fi

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetLevel( double l )
{
  if( this->ImageMaps.size( ) > 0 )
  {
    if( this->ImageMaps[ 0 ].GetPointer( ) != NULL )
    {
      vtkWindowLevelLookupTable* lut =
        dynamic_cast< vtkWindowLevelLookupTable* >(
          this->ImageMaps[ 0 ]->GetLookupTable( )
          );
      if( lut != NULL )
      {
        /* TODO: Min and Max values are assigned 0!!!
           if( l < this->MinLevel )
           l = this->MinLevel;
           if( l > this->MaxLevel )
           l = this->MaxLevel;
        */
        lut->SetLevel( l );
        lut->Build( );
        this->ImageMaps[ 0 ]->Modified( );
        this->Modified( );

      } // fi

    } // fi

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetWindowLevel( double w, double l )
{
  if( this->ImageMaps.size( ) > 0 )
  {
    if( this->ImageMaps[ 0 ].GetPointer( ) != NULL )
    {
      vtkWindowLevelLookupTable* lut =
        dynamic_cast< vtkWindowLevelLookupTable* >(
          this->ImageMaps[ 0 ]->GetLookupTable( )
          );
      if( lut != NULL )
      {
        /* TODO: Min and Max values are assigned 0!!!
           std::cout << this->MinWindow << " " << this->MaxWindow << std::endl;
           std::cout << this->MinLevel << " " << this->MaxLevel << std::endl;
           std::cout << w << " " << l << " <-> " << std::ends;
           if( w < this->MinWindow )
           w = this->MinWindow;
           if( w > this->MaxWindow )
           w = this->MaxWindow;
           if( l < this->MinLevel )
           l = this->MinLevel;
           if( l > this->MaxLevel )
           l = this->MaxLevel;
           std::cout << w << " " << l << std::endl;
        */
        lut->SetWindow( w );
        lut->SetLevel( l );
        lut->Build( );
        this->ImageMaps[ 0 ]->Modified( );
        this->Modified( );

      } // fi

    } // fi

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
ResetWindowLevel( )
{
  this->SetWindowLevel(
    this->MaxWindow,
    ( this->MaxLevel + this->MinLevel ) / double( 2 )
    );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetLookupTable( unsigned int id, vtkLookupTable* lut )
{
  if( id < this->ImageMaps.size( ) && id > 0 )
  {
    if( this->ImageMaps[ id ].GetPointer( ) != NULL )
    {
      this->ImageMaps[ id ]->SetLookupTable( lut );
      this->ImageMaps[ id ]->Modified( );
      this->Modified( );

    } // fi

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetLookupTableAsColor( unsigned int id, double r, double g, double b )
{
  static const double _0 = double( 0 );
  static const double _2 = double( 2 );
  static const double _4 = double( 4 );
  static const double _6 = double( 6 );
  static const double _OPACITY = double( 0.6 );

  // Check ID consistency
  if( id == 0 || id >= this->ImageMaps.size( ) )
    return;

  // Get image scalar range
  vtkAlgorithmOutput* aout = this->ImageMaps[ id ]->GetOutputPort( );
  vtkImageData* image = dynamic_cast< vtkImageData* >(
    aout->GetProducer( )->GetOutputDataObject( aout->GetIndex( ) )
    );
  double range[ 2 ];
  image->GetScalarRange( range );

  // Get HSV from display color
  double cmax = ( r > g )? r: g; cmax = ( b > cmax )? b: cmax;
  double cmin = ( r < g )? r: g; cmin = ( b < cmin )? b: cmin;
  double d = cmax - cmin;

  double saturation = ( std::fabs( cmax ) > _0 )? d / cmax: _0;
  double value = cmax;
  double hue = _0;
  if( d > _0 )
  {
    if( r == cmax )
      hue = std::fmod( ( g - b ) / d, _6 );
    else if( g == cmax )
      hue = ( ( b - r ) / d ) + _2;
    else if( b == cmax )
      hue = ( ( r - g ) / d ) + _4;
    hue /= _6;

  } // fi

  // Define new lookup table
  vtkSmartPointer< vtkLookupTable > lut =
    vtkSmartPointer< vtkLookupTable >::New( );
  lut->SetScaleToLinear( );
  lut->SetNanColor( _0, _0, _0, _0 );
  lut->SetTableRange( range[ 0 ], range[ 1 ] );
  lut->SetAlphaRange( _0, _OPACITY );
  lut->SetHueRange( _0, hue );
  lut->SetSaturationRange( _0, saturation );
  lut->SetValueRange( _0, value );
  lut->Build( );
  this->SetLookupTable( id, lut );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetAxis( ) const
{
  if( this->SliceMappers.size( ) > 0 )
    return( this->SliceMappers[ 0 ]->GetOrientation( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumber( ) const
{
  if( this->SliceMappers.size( ) > 0 )
    return( this->SliceMappers[ 0 ]->GetSliceNumber( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumberMinValue( ) const
{
  if( this->SliceMappers.size( ) > 0 )
    return( this->SliceMappers[ 0 ]->GetSliceNumberMinValue( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
int cpExtensions::Visualization::ImageSliceActors::
GetSliceNumberMaxValue( ) const
{
  if( this->SliceMappers.size( ) > 0 )
    return( this->SliceMappers[ 0 ]->GetSliceNumberMaxValue( ) );
  else
    return( -1 );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetSliceNumber( const int& slice )
{
  unsigned int nImages = this->SliceMappers.size( );
  if( nImages == 0 )
    return;

  // Change visualization extent
  for( unsigned int i = 0; i < nImages; ++i )
  {
    this->SliceMappers[ i ]->SetSliceNumber( slice );
    this->SliceMappers[ i ]->Modified( );
    this->ImageActors[ i ]->Modified( );
    this->SliceMappers[ i ]->Update( );

  } // rof

  // Compute plane
  vtkAlgorithm* algo = this->SliceMappers[ 0 ]->GetInputAlgorithm( );
  vtkInformation* info = algo->GetOutputInformation( 0 );
  int ext[ 6 ];
  double ori[ 3 ], spac[ 3 ], pos[ 3 ];
  info->Get( vtkStreamingDemandDrivenPipeline::WHOLE_EXTENT( ), ext );
  info->Get( vtkDataObject::ORIGIN( ), ori );
  info->Get( vtkDataObject::SPACING( ), spac );
  this->SliceMappers[ 0 ]->GetSlicePlane( )->GetOrigin( pos );

  // Prevent obscuring voxels by offsetting the plane geometry
  double xbnds[ ] =
    {
      ori[ 0 ] + ( spac[ 0 ] * double( ext[ 0 ] ) ),
      ori[ 0 ] + ( spac[ 0 ] * double( ext[ 1 ] ) )
    };
  double ybnds[ ] =
    {
      ori[ 1 ] + ( spac[ 1 ] * double( ext[ 2 ] ) ),
      ori[ 1 ] + ( spac[ 1 ] * double( ext[ 3 ] ) )
    };
  double zbnds[ ] =
    {
      ori[ 2 ] + ( spac[ 2 ] * double( ext[ 4 ] ) ),
      ori[ 2 ] + ( spac[ 2 ] * double( ext[ 5 ] ) )
    };

  if( spac[ 0 ] < double( 0 ) )
  {
    double t = xbnds[ 0 ];
    xbnds[ 0 ] = xbnds[ 1 ];
    xbnds[ 1 ] = t;

  } // fi
  if( spac[ 1 ] < double( 0 ) )
  {
    double t = ybnds[ 0 ];
    ybnds[ 0 ] = ybnds[ 1 ];
    ybnds[ 1 ] = t;

  } // fi
  if( spac[ 2 ] < double( 0 ) )
  {
    double t = zbnds[ 0 ];
    zbnds[ 0 ] = zbnds[ 1 ];
    zbnds[ 1 ] = t;

  } // fi

  // Plane function origin
  this->PlaneFunction->SetOrigin( pos );

  // Configure visualization and implicit plane orientation
  int axis = this->SliceMappers[ 0 ]->GetOrientation( );
  this->PlaneActor->GetProperty( )->SetRepresentationToWireframe( );
  this->PlaneActor->GetProperty( )->SetLineWidth( 2 );
  vtkPoints* plane_points = this->Plane->GetPoints( );
  if( axis == 0 ) // YZ, x-normal
  {
    this->PlaneFunction->SetNormal( 1, 0, 0 );
    plane_points->SetPoint( 0, pos[ 0 ], ybnds[ 0 ], zbnds[ 0 ] );
    plane_points->SetPoint( 1, pos[ 0 ], ybnds[ 1 ], zbnds[ 0 ] );
    plane_points->SetPoint( 2, pos[ 0 ], ybnds[ 1 ], zbnds[ 1 ] );
    plane_points->SetPoint( 3, pos[ 0 ], ybnds[ 0 ], zbnds[ 1 ] );
    this->PlaneActor->GetProperty( )->SetColor( 1, 0, 0 );
  }
  else if( axis == 1 ) // ZX, y-normal
  {
    this->PlaneFunction->SetNormal( 0, 1, 0 );
    plane_points->SetPoint( 0, xbnds[ 0 ], pos[ 1 ], zbnds[ 0 ] );
    plane_points->SetPoint( 1, xbnds[ 0 ], pos[ 1 ], zbnds[ 1 ] );
    plane_points->SetPoint( 2, xbnds[ 1 ], pos[ 1 ], zbnds[ 1 ] );
    plane_points->SetPoint( 3, xbnds[ 1 ], pos[ 1 ], zbnds[ 0 ] );
    this->PlaneActor->GetProperty( )->SetColor( 0, 1, 0 );
  }
  else // XY, z-normal
  {
    this->PlaneFunction->SetNormal( 0, 0, 1 );
    plane_points->SetPoint( 0, xbnds[ 0 ], ybnds[ 0 ], pos[ 2 ] );
    plane_points->SetPoint( 1, xbnds[ 1 ], ybnds[ 0 ], pos[ 2 ] );
    plane_points->SetPoint( 2, xbnds[ 1 ], ybnds[ 1 ], pos[ 2 ] );
    plane_points->SetPoint( 3, xbnds[ 0 ], ybnds[ 1 ], pos[ 2 ] );
    this->PlaneActor->GetProperty( )->SetColor( 0, 0, 1 );

  } // fi
  this->PlaneFunction->Modified( );
  this->Plane->Modified( );
  this->PlaneMapper->Modified( );
  this->PlaneActor->Modified( );

  // Prepare other actors to update
  /* TODO
     for( unsigned int i = 0; i < this->OtherActors.size( ); ++i )
     {
     if( this->OtherActors[ i ].first.GetPointer( ) != NULL )
     {
     this->OtherActors[ i ].first->Modified( );
     this->OtherActors[ i ].first->Update( );

     } // fi

     if( this->OtherActors[ i ].second.GetPointer( ) != NULL )
     {
     this->OtherActors[ i ].second->GetMapper( )->Modified( );
     this->OtherActors[ i ].second->Modified( );

     } // fi

     } // rof

     if( this->m_UpdateCommand != NULL )
     this->m_UpdateCommand( this->m_UpdateData );
  */

  // Update text
  this->UpdateText( );

  // Associated slices
  for( unsigned int i = 0; i < this->AssociatedSlices.size( ); ++i )
    if( this->AssociatedSlices[ i ]->GetAxis( ) == this->GetAxis( ) )
      this->AssociatedSlices[ i ]->SetSliceNumber( slice );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
SetSlice( double* pos )
{
  vtkImageData* image;
  if( this->ImageMaps[ 0 ] != NULL )
    image =
      dynamic_cast< vtkImageData* >( this->ImageMaps[ 0 ]->GetInput( ) );
  else
    image = this->SliceMappers[ 0 ]->GetInput( );

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

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
UpdateText( )
{
  if( this->SliceMappers.size( ) > 0 )
  {
    char axis;
    int axId = this->SliceMappers[ 0 ]->GetOrientation( );
    if     ( axId == 0 ) axis = 'X';
    else if( axId == 1 ) axis = 'Y';
    else if( axId == 2 ) axis = 'Z';

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

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

    vtkImageData* image;
    if( this->ImageMaps[ 0 ] != NULL )
      image =
        dynamic_cast< vtkImageData* >( this->ImageMaps[ 0 ]->GetInput( ) );
    else
      image = this->SliceMappers[ 0 ]->GetInput( );

    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->TextBuffer, "Axis: %c (%d)\nPixel %s",
        axis, slice, str.str( ).c_str( )
        );

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

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

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

// -------------------------------------------------------------------------
cpExtensions::Visualization::ImageSliceActors::
ImageSliceActors( )
  : Superclass( ),
    Interpolate( false )
{
  this->Clear( );

  this->SlicesCommand = NULL;

  // Connect this view with a controller
  this->Style = vtkSmartPointer< ImageInteractorStyle >::New( );
  this->Style->AssociateView( this );
  this->Style->SetMouseMoveCommand( Self::_MouseMoveCommand );
  this->Style->SetMouseClickCommand( Self::_MouseClickCommand );
  this->Style->SetMouseDoubleClickCommand( Self::_MouseDoubleClickCommand );
  this->Style->SetMouseWheelCommand( Self::_MouseWheelCommand );
  this->Style->SetKeyCommand( Self::_KeyCommand );
}

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

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ConfigureNewLUT( vtkImageData* data )
{
  // Does the new LUT is a window-level one?
  unsigned int nImgs = this->ImageMaps.size( );
  unsigned int nCmps = data->GetNumberOfScalarComponents( );

  if( nCmps > 1 )
  {
    this->ImageMaps.push_back( NULL );
    return;

  } // fi

  // Create LUT filter
  this->ImageMaps.push_back( vtkSmartPointer< vtkImageMapToColors >::New( ) );
  if( nImgs == 0 )
  {
    double range[ 2 ];
    data->GetScalarRange( range );
    vtkSmartPointer< vtkWindowLevelLookupTable > lut =
      vtkSmartPointer< vtkWindowLevelLookupTable >::New( );
    lut->SetScaleToLinear( );
    lut->SetTableRange( range );
    lut->SetWindow( range[ 1 ] - range[ 0 ] );
    lut->SetLevel( ( range[ 1 ] + range[ 0 ] ) / double( 2 ) );
    lut->Build( );
    this->ImageMaps[ 0 ]->SetLookupTable( lut );

    this->MinWindow = double( 0 );
    this->MaxWindow = range[ 1 ] - range[ 0 ];
    this->MinLevel = range[ 0 ];
    this->MaxLevel = range[ 1 ];
  }
  else
    this->SetLookupTableAsColor( nImgs, 1, 0, 0 );
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_ConfigureNewInput( int axis )
{
  unsigned int nImages = this->ImageActors.size( );

  // Configure mapper
  vtkImageSliceMapper* mapper = this->SliceMappers[ nImages ];
  if( nImages == 0 )
    mapper->SetOrientation( axis );
  else
    mapper->SetOrientation( this->SliceMappers[ 0 ]->GetOrientation( ) );
  mapper->Update( );

  // Create actor
  vtkSmartPointer< vtkImageActor > actor =
    vtkSmartPointer< vtkImageActor >::New( );
  this->ImageActors.push_back( actor );
  actor->SetMapper( mapper );
  actor->SetInterpolate( this->Interpolate );
  actor->Modified( );

  if( nImages == 0 )
  {
    this->AddItem( this->CursorActor );
    this->AddItem( this->PlaneActor );
    this->AddItem( this->TextActor );
    this->Style->AssociateImageActor( actor );

  } // fi
  this->AddItem( actor );

  if( nImages > 1 )
    this->SetSliceNumber( this->GetSliceNumber( ) );
  this->Modified( );
}

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

  if( btn == ImageInteractorStyle::ButtonID_None )
  {
    actors->UpdateText( pos );
  }
  else if( btn == ImageInteractorStyle::ButtonID_Left )
  {
    if( !alt && ctr && !sft && actors->SlicesCommand != NULL )
      actors->SlicesCommand( pos, actors->GetAxis( ), actors->SlicesData );
  }
  else if( btn == ImageInteractorStyle::ButtonID_Middle )
  {
  }
  else if( btn == ImageInteractorStyle::ButtonID_Right )
  {
    if( !alt && !ctr && sft )
    {
      double bounds[ 6 ];
      actors->SliceMappers[ 0 ]->GetBounds( bounds );

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

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

    } // fi

  } // fi
}

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

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

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

  if( btn == ImageInteractorStyle::ButtonID_Left )
  {
    if( !alt && !ctr && !sft )
      actors->SetCursor( pos );
    else if( !alt && ctr && !sft && actors->SlicesCommand != NULL )
      actors->SlicesCommand( pos, actors->GetAxis( ), actors->SlicesData );
  }
  else if( btn == ImageInteractorStyle::ButtonID_Middle )
  {
  }
  else if( btn == ImageInteractorStyle::ButtonID_Right )
  {
  } // fi
}

// -------------------------------------------------------------------------
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 && !sft )
  {
    actors->SetSliceNumber( actors->GetSliceNumber( ) + dir );
  }
  else if( !alt && !ctr && sft )
  {
    actors->SetSliceNumber( actors->GetSliceNumber( ) + ( dir * 10 ) );

  } // fi
}

// -------------------------------------------------------------------------
void cpExtensions::Visualization::ImageSliceActors::
_KeyCommand(
  void* data,
  const char& key
  )
{
}

// eof - $RCSfile$