/**
 * RetroLaunch 2012
 *
 * 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.,
 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. To contact the
 * authors: Surreal64 CE Team (http://www.emuxtras.net)
 */

#include "MenuMain.h"
#include "Font.h"
#include "RomList.h"

#include "../../console/rarch_console.h"
#include "../../general.h"

CMenuMain g_menuMain;

CMenuMain::CMenuMain()
{
   // we think that the rom list is unloaded until we know otherwise
   m_bRomListLoadedState = false;

   struct retro_system_info info;
   retro_get_system_info(&info);
   const char *id = info.library_name ? info.library_name : "Unknown";
   char core_text[256];
   snprintf(core_text, sizeof(core_text), "%s %s", id, info.library_version);
   convert_char_to_wchar(m_title, core_text, sizeof(m_title));
}

CMenuMain::~CMenuMain()
{
}

bool CMenuMain::Create()
{
   RARCH_LOG("CMenuMain::Create().");

   xdk_d3d_video_t *d3d = (xdk_d3d_video_t*)driver.video_data;
   
   width  = d3d->d3dpp.BackBufferWidth;
   //height = d3d->d3dpp.BackBufferHeight;

   // Title coords with color
   m_menuMainTitle_x = 305;
   m_menuMainTitle_y = 30;
   m_menuMainTitle_c = 0xFFFFFFFF;

   m_menuMainBG_x = 0;
   m_menuMainBG_y = 0;
   //m_menuMainBG_w = width;
   //m_menuMainBG_h = height;

   // Quick hack to properly center the romlist in 720p, 
   // it might need more work though (font size and rom selector size -> needs more memory)
   // Init rom list coords
   // Load background image
   if(width == 640)
   {
      m_menuMainBG.Create("D:\\Media\\menuMainBG.png");
      m_menuMainRomListPos_x = 100;
      m_menuMainRomListPos_y = 100;
   }
   else if(width == 1280)
   {
      m_menuMainBG.Create("D:\\Media\\menuMainBG_720p.png");
      m_menuMainRomListPos_x = 400;
      m_menuMainRomListPos_y = 150;
   }

   m_menuMainRomListSpacing = 20;

   // Load rom selector panel
   m_menuMainRomSelectPanel.Create("D:\\Media\\menuMainRomSelectPanel.png");
   m_menuMainRomSelectPanel_x = m_menuMainRomListPos_x - 5;
   m_menuMainRomSelectPanel_y = m_menuMainRomListPos_y - 2;
   m_menuMainRomSelectPanel_w = 440;
   m_menuMainRomSelectPanel_h = 20;

   m_romListSelectedRom = 0;

   //The first element in the romlist to render
   m_romListBeginRender = 0;

   //The last element in the romlist to render
   m_romListEndRender = 18;

   //The offset in the romlist
   m_romListOffset = 0;

   if(m_romListEndRender > g_romList.GetRomListSize() - 1)
      m_romListEndRender = g_romList.GetRomListSize() - 1;

   return true;
}


void CMenuMain::Render()
{
   xdk_d3d_video_t *d3d = (xdk_d3d_video_t*)driver.video_data;

   //Render background image
   m_menuMainBG.Render(m_menuMainBG_x, m_menuMainBG_y);

   //Display some text
   //Center the text (hardcoded)
   int xpos = width == 640 ? 65 : 400;
   int ypos = width == 640 ? 430 : 670;
   
   d3d->d3d_render_device->GetBackBuffer(-1, D3DBACKBUFFER_TYPE_MONO, &d3d->pFrontBuffer);
   d3d->d3d_render_device->GetBackBuffer(0, D3DBACKBUFFER_TYPE_MONO, &d3d->pBackBuffer);
   d3d->debug_font->TextOut(d3d->pFrontBuffer, L"Libretro core:", (unsigned)-1, xpos, ypos);
   d3d->debug_font->TextOut(d3d->pBackBuffer, L"Libretro core:", (unsigned)-1, xpos, ypos);
   d3d->debug_font->TextOut(d3d->pFrontBuffer, m_title, (unsigned)-1, xpos + 140, ypos);
   d3d->debug_font->TextOut(d3d->pBackBuffer, m_title, (unsigned)-1, xpos + 140, ypos);
   d3d->pFrontBuffer->Release();
   d3d->pBackBuffer->Release();

   //Begin with the rom selector panel
   //FIXME: Width/Height needs to be current Rom texture width/height (or should we just leave it at a fixed size?)
   m_menuMainRomSelectPanel.Render(m_menuMainRomSelectPanel_x, m_menuMainRomSelectPanel_y, m_menuMainRomSelectPanel_w, m_menuMainRomSelectPanel_h);

   dword dwSpacing = 0;

   for (int i = m_romListBeginRender; i <= m_romListEndRender; i++)
   {
      const wchar_t *rom_basename = g_romList.GetRomAt(i + m_romListOffset)->GetFileName();
      d3d->d3d_render_device->GetBackBuffer(-1, D3DBACKBUFFER_TYPE_MONO, &d3d->pFrontBuffer);
      d3d->d3d_render_device->GetBackBuffer(0, D3DBACKBUFFER_TYPE_MONO, &d3d->pBackBuffer);
      d3d->debug_font->TextOut(d3d->pFrontBuffer, rom_basename, (unsigned)-1, m_menuMainRomListPos_x, m_menuMainRomListPos_y + dwSpacing);
      d3d->debug_font->TextOut(d3d->pBackBuffer, rom_basename, (unsigned)-1, m_menuMainRomListPos_x, m_menuMainRomListPos_y + dwSpacing);
      d3d->pFrontBuffer->Release();
      d3d->pBackBuffer->Release();
      dwSpacing += m_menuMainRomListSpacing;
   }
}

static uint16_t old_input_state = 0;

void CMenuMain::ProcessInput()
{
   uint16_t input_state = 0;
   input_xinput.poll(NULL);

   static const struct retro_keybind *binds[MAX_PLAYERS] = {
      g_settings.input.binds[0],
      g_settings.input.binds[1],
      g_settings.input.binds[2],
      g_settings.input.binds[3],
      g_settings.input.binds[4],
      g_settings.input.binds[5],
      g_settings.input.binds[6],
      g_settings.input.binds[7],
   };

   for (unsigned i = 0; i < RARCH_FIRST_META_KEY; i++)
   {
      input_state |= input_xinput.input_state(NULL, binds, false,
         RETRO_DEVICE_JOYPAD, 0, i) ? (1 << i) : 0;
   }

   uint16_t trigger_state = input_state & ~old_input_state;

   if(trigger_state & (1 << RETRO_DEVICE_ID_JOYPAD_DOWN))
   {
      if(m_romListSelectedRom < g_romList.GetRomListSize())
      {
         if(m_menuMainRomSelectPanel_y < (m_menuMainRomListPos_y + (m_menuMainRomListSpacing * m_romListEndRender)))
	 {
            m_menuMainRomSelectPanel_y += m_menuMainRomListSpacing;
	    m_romListSelectedRom++;
	    RARCH_LOG("SELECTED ROM: %d.\n", m_romListSelectedRom);
	 }

         if(m_menuMainRomSelectPanel_y > (m_menuMainRomListPos_y + (m_menuMainRomListSpacing * (m_romListEndRender))))
	 {
            m_menuMainRomSelectPanel_y -= m_menuMainRomListSpacing;
	    m_romListSelectedRom++;
	    if(m_romListSelectedRom > g_romList.GetRomListSize() - 1)
               m_romListSelectedRom = g_romList.GetRomListSize() - 1;

	    RARCH_LOG("SELECTED ROM AFTER CORRECTION: %d.\n", m_romListSelectedRom);

	    if(m_romListSelectedRom < g_romList.GetRomListSize() - 1 && m_romListOffset < g_romList.GetRomListSize() - 1 - m_romListEndRender - 1)
            {
               m_romListOffset++;
	       RARCH_LOG("OFFSET: %d.\n", m_romListOffset);
	    }
	 }
      }
   }

   if(trigger_state & (1 << RETRO_DEVICE_ID_JOYPAD_UP))
   {
      if(m_romListSelectedRom > -1)
      {
         if(m_menuMainRomSelectPanel_y > (m_menuMainRomListPos_y - m_menuMainRomListSpacing))
	 {
            m_menuMainRomSelectPanel_y -= m_menuMainRomListSpacing;
	    m_romListSelectedRom--;
	    RARCH_LOG("SELECTED ROM: %d.\n", m_romListSelectedRom);
	 }

         if(m_menuMainRomSelectPanel_y < (m_menuMainRomListPos_y - m_menuMainRomListSpacing))
	 {
            m_menuMainRomSelectPanel_y += m_menuMainRomListSpacing;
	    m_romListSelectedRom--;
	    if(m_romListSelectedRom < 0)
               m_romListSelectedRom = 0;

	    RARCH_LOG("SELECTED ROM AFTER CORRECTION: %d.\n", m_romListSelectedRom);

	    if(m_romListSelectedRom > 0 && m_romListOffset > 0)
            {
               m_romListOffset--;
	       RARCH_LOG("OFFSET: %d.\n", m_romListOffset);
	    }
	 }
      }
   }

   // Press A to launch
   if (trigger_state & (1 << RETRO_DEVICE_ID_JOYPAD_B) || trigger_state & (1 << RETRO_DEVICE_ID_JOYPAD_START))
   {
      char rom_filename[PATH_MAX];
      convert_wchar_to_char(rom_filename, g_romList.GetRomAt(m_romListSelectedRom)->GetFileName(), sizeof(rom_filename));
      rarch_console_load_game_wrap(rom_filename, g_console.zip_extract_mode, S_DELAY_1);
   }

   if (trigger_state & (1 << RETRO_DEVICE_ID_JOYPAD_R3))
   {
      LD_LAUNCH_DASHBOARD LaunchData = { XLD_LAUNCH_DASHBOARD_MAIN_MENU };
      XLaunchNewImage( NULL, (LAUNCH_DATA*)&LaunchData );
   }
}