#include "Client/Input/InputCharset.h"
#include "Client/Input/Language.h"
#include "Network/TextEncoding.h"
#include "UI/Edit/UIEditCtrl.h"

#include <algorithm>
#include <cstdint>
#include <cstring>

// OFFSET: 0x00862FB0
// FUNCTION: fn_10905
void UIEditCtrl::Synchronize() {
  const int previousCursor = this->cursor;
  g_serverLanguage->CopyDisplayText(this->text);
  g_serverLanguage->Selection(this->anchor, this->cursor);
  this->Trim();
  const auto length = static_cast<std::uint32_t>(this->text.size());
  bool clamped = false;

  if (static_cast<std::uint32_t>(this->cursor) > length || static_cast<std::uint32_t>(this->anchor) > length) {
    this->anchor = static_cast<int>(std::min(static_cast<std::uint32_t>(this->anchor), length));
    this->cursor = static_cast<int>(std::min(static_cast<std::uint32_t>(this->cursor), length));
    g_serverLanguage->Select(this->anchor, this->cursor);
    clamped = true;
  }

  if (this->cursor == 0) {
    this->firstVisible = 0;
    return;
  }

  const auto selection =
    static_cast<std::uint32_t>(std::max(g_serverLanguage->cursor, g_serverLanguage->anchor)) - static_cast<std::uint32_t>(std::min(g_serverLanguage->cursor, g_serverLanguage->anchor));

  if (selection >= length) {
    this->firstVisible = 0;
  }

  const auto measure = [&](const char* text, unsigned bytes) { return this->TextWidth(text, bytes, 0, 12, 0, 0); };
  const int available = this->geometry.width - 7;

  if (this->cursor > previousCursor || clamped) {
    const int before = this->firstVisible == 0 ? 0 : measure(this->text.c_str(), static_cast<unsigned>(this->firstVisible));
    const int position = measure(this->text.c_str(), static_cast<unsigned>(this->cursor)) + 3 - before;

    if (position > available) {
      const char* end = this->text.c_str() + this->text.size();
      const char* next = CharNextExA(static_cast<WORD>(g_textCodePage), this->text.c_str(), 0);

      while (measure(next, 0) + 3 > available && next < end) {
        next = CharNextExA(static_cast<WORD>(g_textCodePage), next, 0);
      }

      const auto tail = static_cast<std::uint32_t>(std::strlen(next));
      const int candidate = this->firstVisible + this->cursor - previousCursor;
      this->firstVisible = static_cast<int>(std::min(static_cast<std::uint32_t>(this->cursor) - tail, static_cast<std::uint32_t>(candidate)));
    }
  } else if (this->cursor < previousCursor) {
    if (measure(this->text.c_str(), static_cast<unsigned>(this->cursor)) + 3 < available && this->firstVisible > this->cursor) {
      this->firstVisible += this->cursor - previousCursor;
    }

    this->firstVisible = std::max(this->firstVisible, 0);
  }
}