/*    This file is a part of Calyp project
 *    Copyright (C) 2014-2021  by Joao Carreira   (jfmcarreira@gmail.com)
 *                                Luis Lucas      (luisfrlucas@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     FrameShift.cpp
 * \brief    Shift image
 */

#include "FrameShift.h"

#include <memory>

FrameShift::FrameShift()
{
  /* Module Definition */
  m_iModuleAPI = CLP_MODULE_API_2;
  m_iModuleType = CLP_FRAME_PROCESSING_MODULE;
  m_pchModuleCategory = "Utilities";
  m_pchModuleLongName = "Pixel Shift";
  m_pchModuleName = "FrameShift";
  m_pchModuleTooltip = "Shift frame horizontal and vertical";
  m_uiNumberOfFrames = 1;
  m_uiModuleRequirements = CLP_MODULE_REQUIRES_OPTIONS | CLP_MODULE_USES_KEYS;

  m_cModuleOptions.addOptions()                                                               /**/
      ( "ShiftHorizontal", m_iShiftHor, "Amount of pixels to shift in horizontal direction" ) /**/
      ( "ShiftVertical", m_iShiftVer, "Amount of pixels to shift in vertical direction" );

  m_pcProcessedFrame = NULL;
  m_iShiftHor = 0;
  m_iShiftVer = 0;
}

bool FrameShift::create( std::vector<CalypFrame*> apcFrameList )
{
  _BASIC_MODULE_API_2_CHECK_
  m_pcProcessedFrame = new CalypFrame{ apcFrameList[0]->getWidth(),
                                       apcFrameList[0]->getHeight(),
                                       apcFrameList[0]->getPelFormat(),
                                       apcFrameList[0]->getBitsPel(),
                                       apcFrameList[0]->getHasNegativeValues() };
  return true;
}

CalypFrame* FrameShift::process( std::vector<CalypFrame*> apcFrameList )
{
  ClpPel* pPelInput;
  ClpPel* pPelOut;

  m_pcProcessedFrame->reset();

  for( unsigned int ch = 0; ch < m_pcProcessedFrame->getNumberChannels(); ch++ )
  {
    unsigned int uiWidth = m_pcProcessedFrame->getWidth( ch );
    unsigned int uiHeight = m_pcProcessedFrame->getHeight( ch );

    int iShiftHor = m_iShiftHor >> ( ch > 0 ? m_pcProcessedFrame->getChromaWidthRatio() : 0 );
    int iShiftVer = m_iShiftVer >> ( ch > 0 ? m_pcProcessedFrame->getChromaHeightRatio() : 0 );

    unsigned int xStartIn = iShiftHor >= 0 ? 0 : -iShiftHor;
    unsigned int yStartIn = iShiftVer >= 0 ? 0 : -iShiftVer;

    unsigned int xStartOut = std::max( iShiftHor, 0 );
    unsigned int xEndOut = std::min( uiWidth, uiWidth + iShiftHor );

    unsigned int yStartOut = std::max( iShiftVer, 0 );
    unsigned int yEndOut = std::min( uiHeight, uiHeight + iShiftVer );

    for( unsigned int y = yStartOut, yIn = yStartIn; y < yEndOut; y++, yIn++ )
    {
      pPelInput = &( apcFrameList[0]->getPelBufferYUV()[ch][yIn][xStartIn] );
      pPelOut = &( m_pcProcessedFrame->getPelBufferYUV()[ch][y][xStartOut] );
      for( unsigned int x = xStartOut; x < xEndOut; x++ )
      {
        *pPelOut = *pPelInput;
        pPelInput++;
        pPelOut++;
      }
    }
  }
  return m_pcProcessedFrame;
}

bool FrameShift::keyPressed( enum Module_Key_Supported value )
{
  if( value == MODULE_KEY_LEFT )
  {
    m_iShiftHor -= 1;
    return true;
  }
  if( value == MODULE_KEY_RIGHT )
  {
    m_iShiftHor += 1;
    return true;
  }
  if( value == MODULE_KEY_UP )
  {
    m_iShiftVer -= 1;
    return true;
  }
  if( value == MODULE_KEY_DOWN )
  {
    m_iShiftVer += 1;
    return true;
  }

  return false;
}

void FrameShift::destroy()
{
  if( m_pcProcessedFrame )
    delete m_pcProcessedFrame;
  m_pcProcessedFrame = NULL;
}