// ==UserScript==
// @name         5chサムネイル表示他
// @description  r（文字列未選択時）:ホバー中のレスへのアンカーを記入(R:追記）　r（文字列選択時）:選択文字列を引用（R:追記）　m:ホバー中のレスの10個前以降を表示　,:ホバー中のレス以降を表示　.:ホバー中のレス以前を表示　Esc/d:書き込み欄にスクロール　F:re.Find2chで検索　y:ホバー中の画像をyandexで画像検索　l:ホバー中のレスへのリンクをコピー
// @version      0.1.6
// @run-at       document-idle
// @match        *://*.5ch.net/test/read.cgi/*
// @grant        GM_addStyle
// @grant        GM.setClipboard
// @grant        none
// @require https://code.jquery.com/jquery-3.4.1.min.js
// @require https://code.jquery.com/ui/1.12.1/jquery-ui.min.js
// @namespace https://greasyfork.org/users/181558
// @downloadURL none
// ==/UserScript==

(function() {
  const enableHoverZoom = 1; // 1:画像サムネイルのホバーズームを有効
  const DEFAULT_MAIL_ADDRESS = ""; // メールアドレス初期値　""、"sage"、その他に変更可
  const inlineImageThumbnailHeight = 65; // 画像サムネイルの縦サイズ(px)
  const inlineImageThumbnailBokashi = 0; // 画像サムネイルのぼかしの強さ（0～10くらい）
  const WAIT = performance.now() * 0.5; // ページ開始後のウエイト　不安定なときは大きくする
  const WAIT_IMAGE_EMBED_INTERVAL = 500; // 画像埋め込みの頻度(ミリ秒）
  const WAIT_VIDEO_EMBED_INTERVAL = 500; // 動画埋め込みの頻度(ミリ秒）
  const NUMBER_IMAGE_EMBED_AT_ONCE = 3; // 画像埋め込みの速度（枚数）
  const inlineImageThumbnailPreloadRadius = Math.max(window.innerHeight, 1080); // 画面外の上下何ピクセルまでを「画面内」とするか
  const DEBUG_TIMER = 0; // 1ならかかった時間を計測
  const ALTERNATIVE_THUMBNAIL = 0; // 1:別方式のサムネイル
  const CONFIRM_FOR_Y = 1; // 1:yキーでyandex検索をする時URLの確認を求める 0:求めない
  const CONFIRM_FOR_MCP = 0; // 1:M,.キーでURLの確認を求める 0:求めない

  var poppedUrl = "";
  var yandexUrl = "";

  // httpならhttpsに
  if (location.href.indexOf("http://") != -1) {
    location.href = location.href.replace(/^http:\/\//, "https://");
    return;
  }
  if (location.href.indexOf("subback.html") != -1) { return; }
  if (location.href.match(/\/\/.*\.5ch\.net\/\w*\/$/)) { return; }

  $(".mascot").attr("style", "");
  $(document.body).append('<span style="writing-mode: vertical-rl; top:2em; right:0.3em;position:fixed;z-index:-111; font-size:3em; opacity:0.5;">' + document.title + '</span>');
  $(eleget0('//ul/li[@class="menubottomnav"]/a[@class="menuitem" and text()="全部"]/../../..')).before('<span style=" margin:0 0 0 0.2em;font-size:1.5em; opacity:0.9;">' + document.title + '</span>');

  // レスにホバーしてキー入力
  $(document).on("keypress", e => {
    if (e.target.tagName == 'INPUT' || e.target.tagName == 'TEXTAREA' || e.target.getAttribute('contenteditable') == 'true') return;
    var selectedStr = window.getSelection().toString() ? ">" + window.getSelection().toString().replace(/^\r\n/, "").replace(/\r\n/g, "\r\n>").replace(/^\r\n|\r\n$/, "\r\n") : null;
    let num = getNearest('//span[@class="number"]');
    let current = location.href + ((location.href.match(/^https?:\/\/.+\.5ch\.net\/test\/read\.cgi\/\w+\/\d+$/)) ? "/" : ""); // /18246213874 で終わるとバグRう
    if ($('form>p>textarea').length) {
      if ((selectedStr && (e.key === "r" || e.key === "R"))) { // r::（文字列選択中）ホバー中のレスを引用（R::追記）
        let res = getNearest('//div[@class="message"]');
        if (num.innerText >= 2 || (num.innerText == 1 && $(window).scrollTop() < 500)) {
          $(getNearest('//div[@class="message"]/..')).effect("highlight", 500);
          floatKakikomi(">>" + num.innerText + "\r\n" +
            //            (selectedStr ? selectedStr : (res.innerText.replace(/^>.*$\n/gm, "").replace(/^(.+)$/gm, ">$1"))) + "\r\n",(e.key == "R"||e.key == "C") ); // 引用の引用をしない
            (selectedStr ? selectedStr : (res.innerText.replace(/^(.+)$/gm, ">$1"))) + "\r\n", (e.key == "R" || e.key == "C"));
          $('form>p>textarea').effect("highlight", 500);
        }
        return false;
      }
      if (e.key == "r" || e.key == "R") { // r::ホバー中のレスにアンカー　R::レスにアンカー（追記）
        if (num.innerText >= 2 || (num.innerText == 1 && $(window).scrollTop() < 500)) {
          $(getNearest('//div[@class="message"]/..')).effect("highlight", 500);
          floatKakikomi(">>" + num.innerText + "\n", e.key == "R");
          $('form>p>textarea').effect("highlight", 500);
        }
        return false;
      }
    }
    if (e.key === "m" || e.key === ",") { // ,::そのレス以降を表示 m::そのレスの10個前以降を表示
      let num = getNearest('//span[@class="number"]');
      if (num) {
        let num2 = (num.innerText) - (e.key === "m" ? 10 : 0);
        $(getNearest('//div[@class="message"]/..')).effect("highlight");
        let last = current.replace(/\/l\d+$/, "").replace(/^.*\/([0-9]{0,4})?-?([0-9n]{0,4}?$)/gm, "$2");
        let url = current.replace(/\/l\d+$/, "").replace(/\/[0-9\-]{0,4}-?[0-9n]{0,4}?$/gm, "/").replace(/(\d)$/, "$1/") + Math.max(1, num2) + "-" + last;
        if (CONFIRM_FOR_MCP && !confirm(url)) return;
        location.href = url;
      }
      return false;
    }
    if (e.key === ".") { // .::そのレス以前を表示
      let num = getNearest('//span[@class="number"]');
      if (num) {
        let num2 = (num.innerText) - (e.key === "m" ? 10 : 0);
        $(getNearest('//div[@class="message"]/..')).effect("highlight");
        if (num2 > 1) {
          let url = current.replace(/\/l\d+$/, "").replace(/(\/[0-9]{0,4})-?[0-9n]{0,4}?$/gm, "$1") + "-" + Math.max(1, num2);
          if (CONFIRM_FOR_MCP && !confirm(url)) return;
          location.href = url;
        }
      }
      return false;
    }
    if (e.key === "l") { // l::ホバー中のレスへのリンクをコピー
      if (num) {
        $(getNearest('//div[@class="message"]/..')).effect("highlight", 500);
        GM.setClipboard(document.title + "\r\n" + location.href.replace(/\/l\d+$/, "").replace(/\/[0-9\-]{0,4}-?[0-9n]{0,4}?$/gm, "/").replace(/(\d)$/, "$1/") + num.innerText);
      }
      return false;
    }
    if (e.key === "F") { // F::re.Find2chで検索
      let query = prompt("re.Find2chでキーワード検索します\n\nhttps://refind2ch.org/search?q=${キーワード}&sort=rate\n\n");
      if (query) window.open(`https://refind2ch.org/search?q=${query}&sort=rate`);
      return false;
    }
    if (e.key === "y" && yandexUrl) { // y::ホバー中の画像をyandex画像検索で検索
      if (!CONFIRM_FOR_Y || window.confirm(yandexUrl + "\n\nを開きます。よろしいですか？")) window.open(yandexUrl);
      return false;
    }
  });

  $(document).on("keydown", e => {
    if (e.target.tagName == 'INPUT' || e.target.tagName == 'TEXTAREA' || e.target.getAttribute('contenteditable') == 'true') return;
    if ($('form>p>textarea').length) {
      if (e.key == "Escape" || e.key == "d") { // Esc/d::書き込み欄にスクロール
        scrollKakikomi(false);
        return false;
      }
    }
  });

  var mousex = 0;
  var mousey = 0;
  var lastEle = "";

  document.addEventListener("mousemove", function(e) {
    mousex = e.clientX;
    mousey = e.clientY;
  }, false);

  if (enableHoverZoom) setInterval(onmove, 16.667);

  function onmove() {
    let ele = document.elementFromPoint(mousex, mousey);
    if (lastEle !== ele) {
      $('img.hzP').remove();
      poppedUrl = "";
    }
    if (ele)
      if (ele.tagName === "IMG" && lastEle !== ele) {
        poppedUrl = pe(ele);
        yandexUrl = poppedUrl.match(/\;base64\,/i) ? null : "https://yandex.com/images/search?rpt=imageview&url=" + poppedUrl;
      }
    lastEle = ele;
  }

  function pe(a) {
    var panel = a.cloneNode(true);
    if (!a) return;
    if (a.parentNode.tagName == "A" && a.parentNode.href.match(/\.png|\.jpg|\.jpeg|\.gif|\.bmp/i)) { panel.src = a.parentNode.href.replace(/https?:\/\/jump\.5ch\.net\/\?/, ""); } else { if (a.parentNode.parentNode.tagName == "A" && a.parentNode.parentNode.href.match(/\.png|\.jpg|\.jpeg|\.gif|\.bmp/i)) panel.src = a.parentNode.parentNode.href.replace(/https?:\/\/jump\.5ch\.net\/\?/, ""); }
    panel.className = "hzP";
    setSize(a, panel);
    document.body.appendChild(panel);
    panel.addEventListener('load', a => {
      setSize(a.target, a.target);
    });
    return panel.src;
  }

  function setSize(a, b) {
    let imgAspect = a.naturalWidth / a.naturalHeight;
    let clientAspect = window.innerWidth / 2 / window.innerHeight;
    let boxPos = (mousey < (window.innerHeight / 2) ? "bottom:0px;" : "top:0px;") + ((mousex < window.innerWidth / 2) ? "right:0px; " : "left:0px;");
    if (imgAspect > clientAspect) {
      b.setAttribute("style", "all:initial; width:48%;" + boxPos + " z-index:2147483647; position:fixed; margin:5px; border-radius:3px; color:#ffffff;  box-shadow:3px 3px 8px #0008; border:2px solid #fff; ");
    } else {
      b.setAttribute("style", "all:initial; height:98%;" + boxPos + " z-index:2147483647; position:fixed; margin:5px; border-radius:3px; color:#ffffff;  box-shadow:3px 3px 8px #0008; border:2px solid #fff; ");
    }
  }

  function getNearest(xpath) {
    let ele = document.elementFromPoint(mousex, mousey);
    return getEleFromParent(ele, xpath);
  }

  function getEleFromParent(ele, xpath) { // ele要素の親をさかのぼりxpathを持つ要素
    for (let i = 0; i < 9; i++) {
      var ele2 = elegeta(xpath, ele);
      if (ele2.length) return ele2[0];
      if (ele === document) return;
      ele = ele.parentNode;
    }
    return;
  }

  var resFloat = false;

  // 書き込み欄までスクロール
  function scrollKakikomi(loop = true) {
    if (resFloat) return;
    var ele = eleget0('//div[@class="formbody"]/form/p/textarea');
    if (ele) {
      var $target = $('p>input.submitbtn'),
        offset = $target.offset() || { top: 0, left: 0 },
        outerHeight = $target.outerHeight();
      $("html,body").animate({ scrollTop: (offset.top - window.innerHeight + outerHeight) });
    } else if (loop) setTimeout(scrollKakikomi, 500);
  }

  setTimeout(hNukiURLHokan, WAIT);
  setTimeout(scrollKakikomi, 1);
  setTimeout(scrollKakikomi, WAIT);

  setTimeout(() => {
    setInterval(videoUmekomi, WAIT_VIDEO_EMBED_INTERVAL);
    setInterval(imageUmekomi, WAIT_IMAGE_EMBED_INTERVAL);

    let ma = $(xa('//input[@placeholder="メールアドレス(省略可)"]'));
    ma.dblclick(() => {
      ma.val(ma.val() == "sage" ? "" : "sage");
      floatKakikomi();
    });

    // 細かい調整
    $("div.formbox").css("margin", "0");
    $('input[placeholder="メールアドレス(省略可)"]').val(DEFAULT_MAIL_ADDRESS);
    //$(eleget0('//p/input[@name="mail"]')).css("ime-mode", "inactive");
    $("form>p>textarea").click(() => {
      floatKakikomi();
    });
  }, WAIT);

  return;

  // h抜きのURLをリンクにする
  function hNukiURLHokan() {
    document.querySelectorAll("div.post").forEach(function(obj) {
      var html = obj.innerHTML;
      if (obj.innerText.match(/^ttps?:\/\//gm)) {
        var newhtml = html.replace(/[^h](ttps?:\/\/\S+)/gm, "<a referrerpolicy='no-referrer' rel='nofollow external noopener noreferrer' href=\"h$1\">$1</a>");
        obj.innerHTML = newhtml;
      }
    });
  }

  // 書き込み欄調整、クリックでフロート化
  function floatKakikomi(str = "", addMode = 0) {
    resFloat = true;
    let curRes = $("form>p>textarea").val();
    $(eleget0('//form/p/textarea[@name="MESSAGE"]')).css({ "z-index": "999", "position": "fixed", "right": "1em", "bottom": "3em" });
    $(eleget0('//input[@class="submitbtn btn"]')).css({ "z-index": "9999999", "position": "fixed", "right": "1em", "bottom": "0em" });
    str ? $("form>p>textarea").val((addMode ? curRes + ((curRes == "" || curRes.slice(-1) == "\n") ? "" : "\n") : "") + str) : 0;
    $(eleget0('//p/textarea[@name="MESSAGE" and @wrap="off"]')).css({ "width": "70%", "min-width": "900px" }).attr("wrap","on").keyup(() => {
      kakikomiStretch();
    });
    $(eleget0('//form/p/textarea[@name="MESSAGE"]')).focus();
    kakikomiStretch();
  }

  function kakikomiStretch() {
    let target = eleget0('//p/textarea[@name="MESSAGE"]');
    //target.setAttribute("rows", 3);
    if (target.value == "") target.rows = 3;
    let lineHeight = Number(target.getAttribute("rows"));
    let height = target.scrollHeight; //+12;
    let clientHeight = document.documentElement.clientHeight - 150;
    for (let i = 0; i < 90 && (height >= target.offsetHeight) && target.offsetHeight < clientHeight; i++) {
      lineHeight++;
      target.setAttribute("rows", lineHeight);
    }
  }

  function sortDescendMiddle(array) {
    return array.sort((a, b) => {
      return Math.abs(a.getBoundingClientRect().top - document.documentElement.clientHeight / 2) > Math.abs(b.getBoundingClientRect().top - document.documentElement.clientHeight / 2) ? 1 : -1
    });
  }

  // 画像と動画をインライン埋め込み
  function imageUmekomi() {

    // 画像埋め込み
    var i = 0;

    sw1("removeSysThumbs");
    for (let a of sortDescendMiddle(elegeta('//a[@imge="af"]/div[@div="thumb5ch"]'))) { if (isinscreen(a)) setTimeout((function(a) { return function() { { a.remove(); } } })(a), WAIT_IMAGE_EMBED_INTERVAL * 10 / NUMBER_IMAGE_EMBED_AT_ONCE) }
    sw2("removeSysThumbs");

    sw1("umegazo")

    for (let ele of sortDescendMiddle(elegeta('//a[not(@imge)]'))) {
      let isImg = 0;
      var url = ele.href || ($(ele).text());
      url = url.replace(/^(ttps?:\/\/)/m, "h$1");
      let urlImg = url.replace(/https?:\/\/jump\.5ch\.net\/\?/, "");
      if ($(ele).text().match(/\.jpg|\.jpeg|\.png|\.gif|\.bmp/)) { isImg = 1; } else { isImg = 0; }
      if (!isImg) ele.setAttribute("imge", "!i");
      if ((!isinscreen(ele))) continue; // 画面内に無い
      if (isImg) {
        let next = ele.children ? ele.children[0] : null;
        if (next && next.tagName === "DIV") {
          if (ALTERNATIVE_THUMBNAIL) next.outerHTML = '<br><a referrerpolicy="no-referrer" rel="nofollow external noopener noreferrer" href=' + url + ' target="_blank"><img referrerpolicy="no-referrer" src=' + urlImg + ' height="' + inlineImageThumbnailHeight + '" ' + (inlineImageThumbnailBokashi ? 'style="filter: blur(' + inlineImageThumbnailBokashi + 'px);"' : '') + '/></a>';
          ele.setAttribute("imge", "rp");
        } else {
          $(ele).after($('<br><a referrerpolicy="no-referrer" rel="nofollow external noopener noreferrer" href=' + url + ' target="_blank"><img referrerpolicy="no-referrer" src=' + urlImg + ' height="' + inlineImageThumbnailHeight + '" ' + (inlineImageThumbnailBokashi ? 'style="filter: blur(' + inlineImageThumbnailBokashi + 'px);"' : '') + '/></a>'));
          ele.setAttribute("imge", "af");
        }
        if (++i >= NUMBER_IMAGE_EMBED_AT_ONCE) break; // 一度に設定枚数ずつしかやらない
      }
    }
    sw2("umegazo")
  };

  function videoUmekomi() {
    sw1("umedouga")
    // ニコ動埋め込み（PrivacyBadger等は要Disable）
    for (let ele of sortDescendMiddle(elegeta('//a[contains(@href,"nicovideo")][not(@nde)]'))) {
      if ((!isinscreen(ele))) continue; // 画面内に無い
      let url = ele.innerText.replace(/^ttp/i, "http");
      ele.setAttribute("nde", "nde");
      let nico = url.match(/h?ttps?:\/\/www.nicovideo.jp\/watch\/(.*)/i);
      if (!nico) continue
      $(ele).after('<br><iframe referrerpolicy="no-referrer" width="312" height="176" rel="nofollow external noopener noreferrer" src="https://ext.nicovideo.jp/thumb/' + nico[1] + '" scrolling="no" style="border:solid 1px #ccc;" frameborder="0"><a referrerpolicy="no-referrer" rel="nofollow external noopener noreferrer" href="' + url + '">ニコニコ動画</a></iframe>');
      break; // 一度に１つずつしかやらない
    }
    sw2("umedouga")
    sw1("umeYT")

    // youtube埋め込み
    for (let ele of sortDescendMiddle(elegeta('//a[contains(@href,"youtube.com")][not(@yte)]|//a[contains(@href,"youtu.be")][not(@yte)]'))) {
      if ((!isinscreen(ele))) continue; // 画面内に無い
      let url = ele.innerText;
      ele.setAttribute("yte", "yte");
      var sm = (url.match(/h?ttps?:\/\/youtu\.be\/([^&?]+.*)\?t=(\d*).*$/i) || url.match(/h?ttps?:\/\/w?w?w?m?\.youtube\.com\/watch\?v=([^&]+.*)&t=(\d*).*$/i)) || url.match(/h?ttps?:\/\/youtu\.be\/([^&?]+)/i) || url.match(/h?ttps?:\/\/w?w?w?m?\.youtube\.com\/watch\?v=([^&]+)/i);
      if (!sm) continue
      $(ele).after('<p style="margin:0 0 0px;"><iframe referrerpolicy="no-referrer" src="https://www.youtube.com/embed/' + sm[1] + (sm[2] ? "?start=" + sm[2] : "") + '" id="ytplayer" type="text/html" width=320 height=180 frameborder=0></p>');
      break; // 一度に１つずつしかやらない
    };
    sw2("umeYT")
  }

  // eleはスクロール画面内に入ってる？
  function isinscreen(ele) {
    if (!ele) return;
    var eler = ele.getBoundingClientRect();
    return (eler.top > 0 - inlineImageThumbnailPreloadRadius && eler.left > 0 && eler.left < document.documentElement.clientWidth && eler.top < Math.min(window.innerHeight, document.documentElement.clientHeight) + inlineImageThumbnailPreloadRadius);
  }

  function elegeta(xpath, node = document) {
    if (!xpath) return [];
    try {
      var array = [];
      var ele = document.evaluate("." + xpath, node, null, XPathResult.UNORDERED_NODE_SNAPSHOT_TYPE, null);
      for (var i = 0; i < ele.snapshotLength; i++) array[i] = ele.snapshotItem(i);
      return array;
    } catch (e) { return []; }
  }

  function eleget0(xpath, node = document) {
    if (!xpath) return null;
    try {
      var ele = document.evaluate(xpath, node, null, XPathResult.UNORDERED_NODE_SNAPSHOT_TYPE, null);
      return ele.snapshotLength > 0 ? ele.snapshotItem(0) : "";
    } catch (e) { return null; }
  }

  function xa(xpath, node = document) {
    if (!xpath) return [];
    if (xpath.match(/^\/\//)) {
      try {
        var array = [];
        var ele = document.evaluate("." + xpath, node, null, XPathResult.UNORDERED_NODE_SNAPSHOT_TYPE, null);
        for (var i = 0; i < ele.snapshotLength; i++) array[i] = ele.snapshotItem(i);
        return array;
      } catch (e) { return []; }
    } else {
      return $(xpath);
    }
  }

  function sw1(s) {
    if (DEBUG_TIMER) console.time(s);
  }

  function sw2(s) {
    if (DEBUG_TIMER) console.timeEnd(s);
  }
})();