/*    This file is a part of plaYUVer project
 *    Copyright (C) 2014-2015  by Luis Lucas      (luisfrlucas@gmail.com)
 *                                Joao Carreira   (jfmcarreira@gmail.com)
 *
 *    This program is free software; you can redistribute it and/or modify
 *    it under the terms of the GNU General Public License as published by
 *    the Free Software Foundation; either version 2 of the License, or
 *    (at your option) any later version.
 *
 *    This program is distributed in the hope that it will be useful,
 *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *    GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License along
 *   with this program; if not, write to the Free Software Foundation, Inc.,
 *   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

/**
 * \file     StreamHandlerPortableMap.cpp
 * \ingroup  PlaYUVerLib
 * \brief    Interface with opencv lib
 */

#include <cstdio>
#include "StreamHandlerPortableMap.h"
#include "PlaYUVerFrame.h"
#include "PlaYUVerFramePixelFormats.h"
#include "LibMemory.h"

namespace plaYUVer
{

Bool StreamHandlerPortableMap::openHandler( std::string strFilename, Bool bInput )
{
  m_bIsInput = bInput;
  m_pFile = NULL;
  m_pFile = fopen( strFilename.c_str(), bInput ? "rb" : "wb" );
  if( m_pFile == NULL )
  {
    return false;
  }
  m_strFormatName = "PGM";
  m_strCodecName = "Raw Video";
  if( m_bIsInput )
  {
    char line[101];
    do
    {
      fgets( line, 100, m_pFile );
    }
    while( line[0] == '#' );
    sscanf( line,"P%d", &m_iMagicNumber );

    do
    {
      fgets( line, 100, m_pFile );
    }
    while( line[0] == '#' );
    sscanf( line,"%d %d", &m_iWidth, &m_iHeight );

    if( m_iMagicNumber == 1 || m_iMagicNumber == 4 )
    {
      m_uiBitsPerPixel = 1;
      m_iMaxValue = 1;
      m_iPixelFormat = PlaYUVerFrame::GRAY;
    }
    else
    {
      do
      {
        fgets( line, 100, m_pFile );
      }
      while( line[0] == '#' );
      sscanf( line,"%d", &m_iMaxValue );

      m_uiBitsPerPixel = log( m_iMaxValue + 1 )/log( 2 );
      m_iPixelFormat = m_iMagicNumber == 2 || m_iMagicNumber == 5 ? PlaYUVerFrame::GRAY :  PlaYUVerFrame::RGB24;
    }
  }
  return true;
}

Void StreamHandlerPortableMap::closeHandler()
{
  if( m_pFile )
    fclose( m_pFile );

  if( m_pStreamBuffer )
    freeMem1D( m_pStreamBuffer );
}

Void StreamHandlerPortableMap::getFormat( UInt& rWidth, UInt& rHeight, Int& rInputFormat, UInt& rBitsPerPel, Int& rEndianness, Double& rFrameRate )
{
  rWidth = m_iWidth;
  rHeight = m_iHeight;
  rInputFormat = m_iPixelFormat;
  rBitsPerPel = m_uiBitsPerPixel;
  rEndianness = 0;
  rFrameRate = 1;
}

Bool StreamHandlerPortableMap::configureBuffer( PlaYUVerFrame* pcFrame )
{
  return getMem1D<Byte>( &m_pStreamBuffer, pcFrame->getBytesPerFrame() );
}


UInt64 StreamHandlerPortableMap::calculateFrameNumber()
{
  return 1;
}

Bool StreamHandlerPortableMap::seek( UInt64 iFrameNum )
{
  return true;
}

Bool StreamHandlerPortableMap::read( PlaYUVerFrame* pcFrame )
{
  UInt64 processed_bytes = fread( m_pStreamBuffer, sizeof( Byte ), m_uiNBytesPerFrame, m_pFile );
  if( processed_bytes != m_uiNBytesPerFrame )
    return false;
  pcFrame->frameFromBuffer( m_pStreamBuffer );
  return true;
}

Bool StreamHandlerPortableMap::write( PlaYUVerFrame* pcFrame )
{
  pcFrame->frameToBuffer( m_pStreamBuffer );
  UInt64 processed_bytes = fwrite( m_pStreamBuffer, sizeof( Byte ), m_uiNBytesPerFrame, m_pFile );
  if( processed_bytes != m_uiNBytesPerFrame )
    return false;
  return true;
}

}  // NAMESPACE