#include "UI/Shortcuts/UIQuickSlotWnd.h"

#include "Client/Mode/CGameMode.h"
#include "Client/Mode/ModeDragState.h"
#include "Client/Mode/ModeMgr.h"
#include "Client/Replay.h"
#include "Contents/Items/ItemInfo.h"
#include "Contents/MapSkyMgr.h"
#include "Contents/Skills/ClientSkills.h"
#include "Render/DX7/RenderSystemDX7.h"
#include "Resource/ResourceMgr.h"
#include "UI/Window/WindowManagerWindows.h"
#include "Client/Input/InputCharset.h"
#include "Client/Mode/ModeTooltip.h"
#include "Client/Session.h"
#include "Contents/Configuration/ServiceConfiguration.h"
#include "Contents/Hotkeys/HotkeyInfo.h"
#include "Contents/Items/ItemDescription.h"
#include "Contents/Items/ItemNaming.h"
#include "Contents/MessageTable.h"
#include "Contents/PlayerNameDictionary.h"
#include "UI/UIBasicCtrl.h"
#include "UI/Window/UINewSelectCharWnd.h"
#include "Utility/Text/FormatString.h"

// OFFSET: 0x00930EB0
// FUNCTION: fn_12696
void UIQuickSlotWnd::Slot25(int x, int y) {
  if (x > 59 && x < this->geometry.width) {
    this->UIFrameWnd::Slot25(x, y);
    return;
  }

  if (g_replayAnimationScaling != 0 || static_cast<unsigned int>(y) > 23) {
    return;
  }

  if (x > 58 && x < this->geometry.width) {
    return;
  }

  const int index = (x - 4) / 29;
  if (x > index * 29 + 30 || index == -1) {
    return;
  }

  QuickSlotPainting& painting = *this->m_painting;
  const QuickSlotEntry entry = this->m_entries[index];
  if (entry.skill) {
    CSkillInfo skill = painting.skills.Lookup(entry.id);
    if (skill.available && skill.level) {
      if (CGameMode* mode = static_cast<CGameMode*>(g_modeMgr.GetGameMode())) {
        mode->drag.BeginSkill(this->m_frameContext->windows, ResourceMgr::Instance(), 16, skill.id, skill.name, entry.count, index);
      }
    }
  } else if (entry.id != 0) {
    ITEM_INFO item = LookupClientItem(painting.inventory, static_cast<int>(entry.id), 1);
    if (item.unknown_0000[1] > 0) {
      CGameMode* mode = static_cast<CGameMode*>(g_modeMgr.GetGameMode());
      mode->drag.BeginItem(this->m_frameContext->windows, painting.descriptions, 16, item, item.quantity, -1);
    }
  }
}

// OFFSET: 0x00931920
// FUNCTION: fn_12709
void UIQuickSlotWnd::Slot28(int x, int y) {
  int index;
  if (static_cast<unsigned int>(y) <= 23 && (x <= 58 || x >= this->geometry.width)) {
    index = (x - 4) / 29;
    if (x > index * 29 + 30) {
      index = -1;
    }
  } else {
    index = -1;
  }

  if (index != this->m_selected) {
    this->m_selected = index;
    this->Invalidate();
  }

  if (this->m_selected == -1) {
    return;
  }

  int screenY = -17;
  int screenX = (x - 4) / 29 * 29 + 4;
  this->ToScreen(screenX, screenY);
  std::string text;
  QuickSlotPainting& painting = *this->m_painting;
  const std::uint32_t id = this->m_entries[this->m_selected].id;
  if (id == 0) {
    text.clear();
  } else if (this->m_entries[this->m_selected].skill) {
    LuaScript& script = *g_session.m_hotkeyScript;
    CSkillInfo skill = painting.skills.Lookup(id);
    const int level = this->m_entries[this->m_selected].count;
    const int sp = skill.UseSpAmount(script, level);
    const int ap = skill.UseApAmount(script, level);
    if (SkillUsesPercentSp(static_cast<int>(skill.id))) {
      text = SkillUseTextPercent(skill.DisplayName(script), level, sp, ap);
    } else {
      text = SkillUseTextFlat(skill.DisplayName(script), level, sp, ap);
    }
  } else {
    ITEM_INFO item = LookupClientItem(painting.inventory, static_cast<int>(id), 1);
    bool languagePrefix = false;
    WORD language = g_serverLanguage->language;
    ItemNaming naming{painting.descriptions, g_itemCardNames, *g_playerNameDictionary, languagePrefix, g_serviceType, language};
    text = static_cast<const std::string&>(FormatOwnedString(LookupMessage(183), naming.DisplayName(item, 0).c_str(), item.quantity));
  }

  if (!text.empty()) {
    reinterpret_cast<ModeTooltip*>(g_charViewMode)->Show(text.c_str(), screenX, screenY, -1, 0, 1);
  }
}

// OFFSET: 0x00932F80
// FUNCTION: fn_12722
void UIQuickSlotWnd::Slot32(int x, int y) {
  if (x > 59 && x < this->geometry.width) {
    return;
  }

  if (static_cast<unsigned int>(y) > 23) {
    return;
  }

  if (x > 58 && x < this->geometry.width) {
    return;
  }

  const int index = (x - 4) / 29;
  if (x > index * 29 + 30 || index == -1) {
    return;
  }

  const QuickSlotEntry entry = this->m_entries[index];
  if (entry.skill) {
    WindowManagerWindows& windows = this->m_frameContext->windows;
    UIWindow* detail = windows.EnsureWindow(46);
    if (detail) {
      if (*reinterpret_cast<std::uint32_t*>(reinterpret_cast<char*>(detail) + 0x104) == entry.id) {
        windows.CloseWindow(46);
      } else {
        detail->SendMsg(nullptr, 61, entry.id, 0, 0, 0);
      }
    }

    int originX = 0;
    int originY = 0;
    this->ToScreen(originX, originY);
    const int targetX = originX + x;
    int adjustment = 0;
    if (static_cast<unsigned int>(g_configuredScreenWidth - targetX) < static_cast<unsigned int>(detail->geometry.width)) {
      adjustment = detail->geometry.width - g_configuredScreenWidth + targetX;
    }

    const int rowY = 33 * (y / 33);
    if (static_cast<float>(originY) > static_cast<float>(static_cast<unsigned int>(g_configuredScreenHeight)) * g_depthAverageHalf) {
      detail->Move(originX - adjustment + x, rowY - detail->geometry.height + originY);
    } else {
      detail->Move(originX - adjustment + x, originY + 33 + rowY);
    }
  } else if (entry.id != 0) {
    ITEM_INFO item = LookupClientItem(this->m_painting->inventory, static_cast<int>(entry.id), 1);
    if (item.unknown_0000[1] > 0) {
      UIWindow* detail = this->m_frameContext->windows.EnsureWindow(12);
      detail->SendMsg(nullptr, 24, reinterpret_cast<std::intptr_t>(&item), 0, 0, 0);
    }
  }
}