/***************************************************************************
                          MultiArray2D_impl.h  -  description
                             -------------------
    begin                : Nov 13, 2012
    copyright            : (C) 2012 by Tomas Oberhuber
    email                : tomas.oberhuber@fjfi.cvut.cz
 ***************************************************************************/

/* See Copyright Notice in tnl/Copyright */

#pragma once

namespace TNL {
namespace Containers {   

template< typename Value, typename Device, typename Index >
MultiArray< 2, Value, Device, Index > :: MultiArray()
{
}

template< typename Value, typename Device, typename Index >
String MultiArray< 2, Value, Device, Index > :: getType()
{
   return String( "Containers::MultiArray< ") +
          String( Dimension ) +
          String( ", " ) +
          String( TNL::getType< Value >() ) +
          String( ", " ) +
          String( Device :: getDeviceType() ) +
          String( ", " ) +
          String( TNL::getType< Index >() ) +
          String( " >" );
}

template< typename Value,
          typename Device,
          typename Index >
String MultiArray< 2, Value, Device, Index > :: getTypeVirtual() const
{
   return this->getType();
};

template< typename Value,
          typename Device,
          typename Index >
String MultiArray< 2, Value, Device, Index > :: getSerializationType()
{
   return HostType::getType();
};

template< typename Value,
          typename Device,
          typename Index >
String MultiArray< 2, Value, Device, Index > :: getSerializationTypeVirtual() const
{
   return this->getSerializationType();
};

template< typename Value, typename Device, typename Index >
void MultiArray< 2, Value, Device, Index > :: setDimensions( const Index jSize,
                                                                  const Index iSize )
{
   TNL_ASSERT( iSize > 0 && jSize > 0,
              std::cerr << "iSize = " << iSize
                   << "jSize = " << jSize );

   dimensions[ 0 ] = iSize;
   dimensions[ 1 ] = jSize;
   Array< Value, Device, Index > :: setSize( iSize * jSize );
}

template< typename Value, typename Device, typename Index >
void MultiArray< 2, Value, Device, Index > :: setDimensions( const Containers::StaticVector< 2, Index >& dimensions )
{
   TNL_ASSERT( dimensions[ 0 ] > 0 && dimensions[ 1 ] > 0,
              std::cerr << "dimensions = " << dimensions );
   /****
    * Swap the dimensions in the tuple to be compatible with the previous method.
    */
   this->dimensions. x() = dimensions. y();
   this->dimensions. y() = dimensions. x();
   Array< Value, Device, Index > :: setSize( this->dimensions[ 1 ] * this->dimensions[ 0 ] );
}

template< typename Value, typename Device, typename Index >
   template< typename MultiArrayT >
void MultiArray< 2, Value, Device, Index > :: setLike( const MultiArrayT& multiArray )
{
   setDimensions( multiArray. getDimensions() );
}

template< typename Value, typename Device, typename Index >
void MultiArray< 2, Value, Device, Index >::reset()
{
   this->dimensions = Containers::StaticVector< 2, Index >( ( Index ) 0 );
   Array< Value, Device, Index >::reset();
}

template< typename Value, typename Device, typename Index >
__cuda_callable__
void MultiArray< 2, Value, Device, Index > :: getDimensions( Index& jSize, Index& iSize ) const
{
   iSize = this->dimensions[ 0 ];
   jSize = this->dimensions[ 1 ];
}

template< typename Value, typename Device, typename Index >
__cuda_callable__
const Containers::StaticVector< 2, Index >& MultiArray< 2, Value, Device, Index > :: getDimensions() const
{
   return this->dimensions;
}

template< typename Value, typename Device, typename Index >
__cuda_callable__
Index MultiArray< 2, Value, Device, Index > :: getElementIndex( const Index j, const Index i ) const
{
   TNL_ASSERT( i >= 0 && i < this->dimensions[ 0 ] && j >= 0 && j < this->dimensions[ 1 ],
              std::cerr << "i = " << i << " j = " << j << " this->dimensions[ 0 ] = " <<  this->dimensions[ 0 ]
                   << " this->dimensions[ 1 ] = " << this->dimensions[ 1 ] );
   return j * this->dimensions[ 0 ] + i;
}

template< typename Value, typename Device, typename Index >
Value MultiArray< 2, Value, Device, Index > :: getElement( const Index j, const Index i ) const
{
   return Array< Value, Device, Index > :: getElement( getElementIndex( j, i ) );
}

template< typename Value, typename Device, typename Index >
void MultiArray< 2, Value, Device, Index > :: setElement( const Index j, const Index i, Value value )
{
   Array< Value, Device, Index > :: setElement( getElementIndex( j, i ), value );
}

template< typename Value, typename Device, typename Index >
__cuda_callable__
Value& MultiArray< 2, Value, Device, Index > :: operator()( const Index j, const Index i )
{
   return Array< Value, Device, Index > :: operator[]( getElementIndex( j, i ) );
}

template< typename Value, typename Device, typename Index >
__cuda_callable__
const Value& MultiArray< 2, Value, Device, Index > :: operator()( const Index j, const Index i ) const
{
   return Array< Value, Device, Index > :: operator[]( getElementIndex( j, i ) );
}

template< typename Value, typename Device, typename Index >
   template< typename MultiArrayT >
bool MultiArray< 2, Value, Device, Index > :: operator == ( const MultiArrayT& array ) const
{
   // TODO: Static assert on dimensions
   TNL_ASSERT( this->getDimensions() == array. getDimensions(),
              std::cerr << "You are attempting to compare two arrays with different dimensions." << std::endl
                   << "First array dimensions are ( " << this->getDimensions() << " )" << std::endl
                   << "Second array dimensions are ( " << array. getDimensions() << " )" << std::endl; );
   return Array< Value, Device, Index > :: operator == ( array );
}

template< typename Value, typename Device, typename Index >
   template< typename MultiArrayT >
bool MultiArray< 2, Value, Device, Index > :: operator != ( const MultiArrayT& array ) const
{
   return ! ( (* this ) == array );
}

template< typename Value, typename Device, typename Index >
MultiArray< 2, Value, Device, Index >&
   MultiArray< 2, Value, Device, Index > :: operator = ( const MultiArray< 2, Value, Device, Index >& array )
{
   // TODO: Static assert on dimensions
   TNL_ASSERT( this->getDimensions() == array. getDimensions(),
              std::cerr << "You are attempting to assign two arrays with different dimensions." << std::endl
                   << "First array dimensions are ( " << this->getDimensions() << " )" << std::endl
                   << "Second array dimensions are ( " << array. getDimensions() << " )" << std::endl; );
   Array< Value, Device, Index > :: operator = ( array );
   return ( *this );
}

template< typename Value, typename Device, typename Index >
   template< typename MultiArrayT >
MultiArray< 2, Value, Device, Index >&
   MultiArray< 2, Value, Device, Index > :: operator = ( const MultiArrayT& array )
{
   // TODO: Static assert on dimensions
   TNL_ASSERT( this->getDimensions() == array. getDimensions(),
              std::cerr << "You are attempting to assign two arrays with different dimensions." << std::endl
                   << "First array dimensions are ( " << this->getDimensions() << " )" << std::endl
                   << "Second array dimensions are ( " << array. getDimensions() << " )" << std::endl; );
   Array< Value, Device, Index > :: operator = ( array );
   return ( *this );
}

template< typename Value, typename Device, typename Index >
bool MultiArray< 2, Value, Device, Index > :: save( File& file ) const
{
   if( ! Array< Value, Device, Index > :: save( file ) )
   {
      std::cerr << "I was not able to write the Array of MultiArray." << std::endl;
      return false;
   }
   if( ! dimensions. save( file ) )
   {
      std::cerr << "I was not able to write the dimensions of MultiArray." << std::endl;
      return false;
   }
   return true;
}

template< typename Value, typename Device, typename Index >
bool MultiArray< 2, Value, Device, Index > :: load( File& file )
{
   if( ! Array< Value, Device, Index > :: load( file ) )
   {
      std::cerr << "I was not able to read the Array of MultiArray." << std::endl;
      return false;
   }
   if( ! dimensions. load( file ) )
   {
      std::cerr << "I was not able to read the dimensions of MultiArray." << std::endl;
      return false;
   }
   return true;
}

template< typename Value, typename Device, typename Index >
bool MultiArray< 2, Value, Device, Index > :: save( const String& fileName ) const
{
   return Object :: save( fileName );
}

template< typename Value, typename Device, typename Index >
bool MultiArray< 2, Value, Device, Index > :: load( const String& fileName )
{
   return Object :: load( fileName );
}

template< typename Value, typename Device, typename Index >
std::ostream& operator << ( std::ostream& str, const MultiArray< 2, Value, Device, Index >& array )
{
   for( Index j = 0; j < array. getDimensions()[ 1 ]; j ++ )
   {
      for( Index i = 0; i < array. getDimensions()[ 0 ]; i ++ )
      {
         str << array. getElement( j, i ) << " ";
      }
      str << std::endl;
   }
   return str;
}

} // namespace Containers
} // namespace TNL
