import { tracked } from "@glimmer/tracking";
import { later } from "@ember/runloop";
import loadJSDiff from "discourse/lib/load-js-diff";
import { parseAsync } from "discourse/lib/text";

const DEFAULT_CHAR_TYPING_DELAY = 30;
const STREAMING_DIFF_TRUNCATE_THRESHOLD = 0.1;
const STREAMING_DIFF_TRUNCATE_BUFFER = 10;

export default class DiffStreamer {
  @tracked isStreaming = false;
  @tracked words = [];
  @tracked lastResultText = "";
  @tracked diff = "";
  @tracked suggestion = "";
  @tracked isDone = false;
  @tracked isThinking = false;

  typingTimer = null;
  currentWordIndex = 0;
  currentCharIndex = 0;
  jsDiff = null;

  constructor(selectedText, typingDelay) {
    this.selectedText = selectedText;
    this.typingDelay = typingDelay || DEFAULT_CHAR_TYPING_DELAY;
    this.loadJSDiff();
  }

  async loadJSDiff() {
    this.jsDiff = await loadJSDiff();
  }

  async updateResult(result, newTextKey) {
    if (!this.jsDiff) {
      await this.loadJSDiff();
    }

    const newText = result[newTextKey];
    this.isDone = !!result?.done;

    if (this.isDone) {
      this.isStreaming = false;
      this.suggestion = newText;
      this.words = [];

      if (this.typingTimer) {
        clearTimeout(this.typingTimer);
        this.typingTimer = null;
      }

      const originalDiff = this.jsDiff.diffWordsWithSpace(
        this.selectedText,
        this.suggestion
      );
      this.diff = this.#formatDiffWithTags(originalDiff, false);
      return;
    }

    if (newText.length < this.lastResultText.length) {
      this.isThinking = false;
      // reset if text got shorter (e.g., reset or new input)
      this.words = [];
      this.suggestion = "";
      this.currentWordIndex = 0;
      this.currentCharIndex = 0;
    }

    const diffText = newText.slice(this.lastResultText.length);

    if (!diffText.trim()) {
      this.lastResultText = newText;
      return;
    }

    if (await this.#isIncompleteMarkdown(diffText)) {
      this.isThinking = true;
      return;
    }

    const newWords = this.#tokenizeMarkdownAware(diffText);

    if (newWords.length > 0) {
      this.isStreaming = true;
      this.words.push(...newWords);
      if (!this.typingTimer) {
        this.#streamNextChar();
      }
    }

    this.lastResultText = newText;
  }

  reset() {
    this.diff = "";
    this.suggestion = "";
    this.lastResultText = "";
    this.words = [];
    this.currentWordIndex = 0;
    this.currentCharIndex = 0;
    this.isStreaming = false;
    if (this.typingTimer) {
      clearTimeout(this.typingTimer);
      this.typingTimer = null;
    }
  }

  async #isIncompleteMarkdown(text) {
    const tokens = await parseAsync(text);

    const hasImage = tokens.some((t) => t.type === "image");
    const hasLink = tokens.some((t) => t.type === "link_open");

    if (hasImage || hasLink) {
      return false;
    }

    const maybeUnfinishedImage =
      /!\[[^\]]*$/.test(text) || /!\[[^\]]*]\(upload:\/\/[^\s)]+$/.test(text);

    const maybeUnfinishedLink =
      /\[[^\]]*$/.test(text) || /\[[^\]]*]\([^\s)]+$/.test(text);

    return maybeUnfinishedImage || maybeUnfinishedLink;
  }

  // this is public to make testing easier
  // is makes it easier to do a "streaming diff" where we want to ensure diff
  // is focused on the beginning of the text instead of taking the entire body
  // into account.
  // This ensures that we do not make mistakes and present wildly different diffs
  // to what we would stablize on at the end of the stream.
  streamingDiff(original, suggestion) {
    const maxDiffLength = Math.floor(
      suggestion.length +
        suggestion.length * STREAMING_DIFF_TRUNCATE_THRESHOLD +
        STREAMING_DIFF_TRUNCATE_BUFFER
    );
    const head = original.slice(0, maxDiffLength);
    const tail = original.slice(maxDiffLength);

    const diffArray = this.jsDiff.diffWordsWithSpace(head, suggestion);

    if (tail.length > 0) {
      // if last in the array is added, and previous is removed then flip them
      let last = diffArray[diffArray.length - 1];
      let secondLast = diffArray[diffArray.length - 2];

      if (last.added && secondLast.removed) {
        diffArray.pop();
        diffArray.pop();
        diffArray.push(last);
        diffArray.push(secondLast);

        last = secondLast;
        secondLast = diffArray[diffArray.length - 2];
      }

      if (!last.removed) {
        last = {
          added: false,
          removed: true,
          value: "",
        };
        diffArray.push(last);
      }

      last.value = last.value + tail;
    }

    return diffArray;
  }

  async #streamNextChar() {
    if (this.currentWordIndex < this.words.length) {
      const currentToken = this.words[this.currentWordIndex];

      const nextChar = currentToken.charAt(this.currentCharIndex);
      this.suggestion += nextChar;
      this.currentCharIndex++;

      if (this.currentCharIndex >= currentToken.length) {
        this.currentWordIndex++;
        this.currentCharIndex = 0;

        const originalDiff = this.streamingDiff(
          this.selectedText,
          this.suggestion
        );

        this.diff = this.#formatDiffWithTags(originalDiff);

        if (this.currentWordIndex === 1) {
          this.diff = this.diff.replace(/^\s+/, "");
        }
      }

      this.typingTimer = later(this, this.#streamNextChar, this.typingDelay);
    } else {
      if (!this.suggestion || !this.selectedText || !this.jsDiff) {
        return;
      }

      const originalDiff = this.jsDiff.diffWordsWithSpace(
        this.selectedText,
        this.suggestion
      );

      this.typingTimer = null;
      this.diff = this.#formatDiffWithTags(originalDiff, false);
      this.isStreaming = false;
    }
  }

  #tokenizeMarkdownAware(text) {
    const tokens = [];
    let lastIndex = 0;
    const regex = /!\[[^\]]*]\(upload:\/\/[^\s)]+\)/g;

    let match;
    while ((match = regex.exec(text)) !== null) {
      const matchStart = match.index;

      if (lastIndex < matchStart) {
        const before = text.slice(lastIndex, matchStart);
        tokens.push(...(before.match(/\S+\s*|\s+/g) || []));
      }

      tokens.push(match[0]);

      lastIndex = regex.lastIndex;
    }

    if (lastIndex < text.length) {
      const rest = text.slice(lastIndex);
      tokens.push(...(rest.match(/\S+\s*|\s+/g) || []));
    }

    return tokens;
  }

  #wrapChunk(text, type) {
    if (type === "added") {
      return `<ins>${text}</ins>`;
    }
    if (type === "removed") {
      if (/^\s+$/.test(text)) {
        return "";
      }
      return `<del>${text}</del>`;
    }
    return `<span>${text}</span>`;
  }

  #formatDiffWithTags(diffArray, highlightLastWord = true) {
    const wordsWithType = [];
    diffArray.forEach((part) => {
      const tokens = part.value.match(/\S+|\s+/g) || [];
      tokens.forEach((token) => {
        wordsWithType.push({
          text: token,
          type: part.added ? "added" : part.removed ? "removed" : "unchanged",
        });
      });
    });

    let lastWordIndex = -1;
    if (highlightLastWord) {
      for (let i = wordsWithType.length - 1; i >= 0; i--) {
        if (
          wordsWithType[i].type !== "removed" &&
          /\S/.test(wordsWithType[i].text)
        ) {
          lastWordIndex = i;
          break;
        }
      }
    }

    const output = [];

    for (let i = 0; i <= lastWordIndex; i++) {
      const { text, type } = wordsWithType[i];

      if (/^\s+$/.test(text)) {
        output.push(text);
        continue;
      }

      let content = this.#wrapChunk(text, type);

      if (highlightLastWord && i === lastWordIndex) {
        content = `<mark class="highlight">${content}</mark>`;
      }

      output.push(content);
    }

    if (lastWordIndex < wordsWithType.length - 1) {
      let i = lastWordIndex + 1;
      while (i < wordsWithType.length) {
        let chunkType = wordsWithType[i].type;
        let chunkText = "";

        while (
          i < wordsWithType.length &&
          wordsWithType[i].type === chunkType
        ) {
          chunkText += wordsWithType[i].text;
          i++;
        }

        output.push(this.#wrapChunk(chunkText, chunkType));
      }
    }

    return output.join("");
  }
}