// ==UserScript==
// @name         Bing 时光机
// @namespace    http://tampermonkey.net/
// @version      1.3
// @description  随意跳转必应不同时间搜索结果
// @author       hzhbest
// @match        https://*.bing.com/search?*
// @icon         https://www.google.com/s2/favicons?sz=64&domain=bing.com
// @grant        none
// @license      GNU GPLv3
// ==/UserScript==
(function () {
'use strict';
// 根据 location.href 识别日期区间搜索行为
// https://www.bing.com/search?q=AAAA&filters=ex1%3a%22ez5_18993_19052%22
// 其中，“q=”后面是关键词，“filters=”后面是结果过滤，“ex1%3a%22ez5……%22”是日期区间的标识
// 识别搜索关键词 kw 和日期区间始末点 qiri 和 vsri
// 构建时光机框【divMain【labelTitle】【labelStart】【inputStart】【labelEnd】【inputEnd】【divBtnGo】】
// 转换 qiri 和 vsri 为日期格式（yyyy-m-d）文本 qistr 和 vsstr 并放入 inputStart 和 inputEnd 中
// 点 divBtnGo 时，补全两 input* 中的 *str 为日期格式，并转换为日期数 *ri，与 kw 重组新网址，并当前页面加载
const d0 = Date.parse('1970-1-1');
const msxd = 24 * 60 * 60 * 1000;
const units = ['天', '周', '月', '年'];
let divMain = document.body.appendChild(document.createElement('div'));
divMain.id = 'TM_Main';
setTimeout(init, 2000);
let csstxt = `
.TM_Main {position: fixed; top: 100px; left: 0px; z-index: 100000; background: #fff;
padding: 4px; border: 1px solid #ddd; font-size: 14pt; width: 115px; overflow: hidden;
transition: width 0.2s linear 3s;}
.TM_Main:hover {width: 190px; transition: width 0.2s linear 0s; box-shadow: 0 1px 12px 4px #ccc;}
.TM_Title {font-size: 15pt; font-weight: bold;}
.TM_Label {overflow: hidden; white-space: nowrap; display: block; color: #969696; padding-top: 9px;}
.TM_Input {width: 180px; font-size: larger; border-bottom: 1px solid #cecece;
border-top: none; border-left: none; border-right: none; margin-bottom: 1px;}
.TM_Input:hover {border-bottom: 2px solid #878787; margin-bottom: 0px;}
.TM_ilbox {width: 185px; padding-top: 9px;}
#TM_last, #TM_unit {display: inline;}
#TM_last {width: 40px;}
.TM_Main:hover #TM_last {width: 65px;}
#TM_unit {width: 45px; margin-left: 5px; outline: none; background: transparent;
border-bottom: 1px solid #cecece; border-top: none; border-left: none; border-right: none;}
#TM_unit:hover {border-bottom: 2px solid #878787;}
.TM_Button {margin:5px; padding: 0px 5px; width: 50px; height: 50px;
cursor: default; position: absolute; left: 120px; bottom: 3px;
text-align: center; background: #f5f5f5;}
.TM_Button:hover {outline: 2px solid #99e; background: #eef; color: black;}
.TM_Button:active {outline: 2px solid #22f; background: #cce;}
`;
addCSS(csstxt);
function init() {
let kw, qiri, vsri, arri;
let lTitle, lKword, inKword, lLast, inLast, seUnit, lStart, lEnd, inStart, inEnd, divBtnGo;
lTitle = creaElemIn('label', divMain);
lKword = creaElemIn('label', divMain);
inKword = creaElemIn('input', divMain);
let inlinebox = creaElemIn('div', divMain);
lLast = creaElemIn('label', inlinebox);
inLast = creaElemIn('input', inlinebox);
seUnit = creaElemIn('select', inlinebox);
units.forEach(unit => {
let opUnit = creaElemIn('option', seUnit);
opUnit.value = unit;
opUnit.innerHTML = unit;
});
lStart = creaElemIn('label', divMain);
inStart = creaElemIn('input', divMain);
lEnd = creaElemIn('label', divMain);
inEnd = creaElemIn('input', divMain);
divBtnGo = creaElemIn('div', divMain);
lTitle.innerHTML = "Bing时光机";
lKword.innerHTML = "搜索关键词";
lLast.innerHTML = "最近：";
lStart.innerHTML = "开始日期";
lEnd.innerHTML = "结束日期";
divBtnGo.innerHTML = "立即穿梭";
inKword.title = "在此输入关键词，跟随时光机穿梭！";
inLast.title = "在此输入数字，可用鼠标滚轮增减";
seUnit.title = "在此选择时间单位，可用鼠标滚轮切换";
inStart.title = "开始日期，可只输年份或年月，可用鼠标滚轮增减月份";
inEnd.title = "结束日期，可只输年份或年月，可用鼠标滚轮增减月份";
inKword.id = 'TM_kword';
inStart.id = 'TM_start';
inEnd.id = 'TM_end';
inLast.id = 'TM_last';
seUnit.id = 'TM_unit';
divMain.className = 'TM_Main';
lTitle.className = 'TM_Title';
lKword.className = lStart.className = lEnd.className = 'TM_Label';
lLast.className = 'TM_llast';
inKword.className = inStart.className = inEnd.className = inLast.className = 'TM_Input';
inlinebox.className = 'TM_ilbox';
inLast.value = 1;
var wheelEvt = "onwheel" in document.createElement("div") ? "wheel" : (document.onmousewheel !== undefined ? "mousewheel" : "DOMMouseScroll");	//compatibility fix for Chrome-core browsers
inLast.addEventListener(wheelEvt, changenumber);
inLast.addEventListener('input', refreshLastdate);
inLast.addEventListener('keypress', submit);
seUnit.addEventListener(wheelEvt, changeunit);
seUnit.addEventListener('change', refreshLastdate);
inStart.addEventListener(wheelEvt, changemonth);
inEnd.addEventListener(wheelEvt, changemonth);
inStart.addEventListener('blur', checkdate);
inEnd.addEventListener('blur', checkdate);
inStart.addEventListener('keypress', submit);
inEnd.addEventListener('keypress', submit);
inKword.addEventListener('keypress', submit);
divBtnGo.className = 'TM_Button';
divBtnGo.addEventListener('click', go);
kw = getkw(location.href);
inKword.value = decodeURI(kw);
arri = getds(location.href); //console.log(arri);
qiri = arri[0];
vsri = arri[1];
let edate, sdate;
if (qiri == 0 || vsri == 0) {
edate = new Date();
sdate = new Date(edate - 180 * msxd);
} else {
edate = numTOdate(vsri);
sdate = numTOdate(qiri);
}
inEnd.value = edate.getFullYear() + "-" + (edate.getMonth() + 1) + "-" + edate.getDate();
inStart.value = sdate.getFullYear() + "-" + (sdate.getMonth() + 1) + "-" + sdate.getDate();
}
function go() {	//点“穿梭”按钮后以时光机内的关键词和日期进行跳转（若关键词为空则使用当前关键词）
let inS = document.querySelector('#TM_start');
let inE = document.querySelector('#TM_end');
let inK = document.querySelector('#TM_kword');
let ednum, sdnum;
ednum = dateTOnum(fulldate(inE.value, true));//console.log(ednum);
sdnum = dateTOnum(fulldate(inS.value, false));//console.log(sdnum);
let kw = inK.value || getkw(location.href);
window.location.href = "https://www.bing.com/search?q=" + kw + "&filters=ex1%3a%22ez5_" + sdnum + "_" + ednum + "%22";
}
function changemonth(e) {
e.preventDefault();
e.stopPropagation();
let isend = (e.target.id == 'TM_end') ? true : false;
let cdate = new Date(fulldate(e.target.value, isend));
let ddate = dateUnitConv(cdate, wheelToNum(e), "月");
e.target.value = dateToStr(ddate);
}
function changenumber(e) {
e.preventDefault();
e.stopPropagation();
let c = parseInt(e.target.value);
e.target.value = wheelToNum(e, c);
refreshLastdate();
}
function refreshLastdate() {
let inS = document.querySelector('#TM_start');
let inE = document.querySelector('#TM_end');
let inL = document.querySelector('#TM_last');
let seU = document.querySelector('#TM_unit');
let cdate = new Date();
inE.value = dateToStr(cdate);
let ddate = dateUnitConv(cdate, -inL.value, seU.value);
inS.value = dateToStr(ddate);
}
function changeunit(e) {
e.preventDefault();
e.stopPropagation();
let seU = e.target;
let c = seU.selectedIndex;
c = wheelToNum(e, c);
if (c >= seU.options.length) {
c = 0;
} else if (c < 0) {
c = seU.options.length - 1;
}
seU.selectedIndex = c;
refreshLastdate();
}
function checkdate(e) {
let t = e.target;
let d = fulldate(t.value, t.id == "TM_end");
t.value = dateToStr(d);
}
function submit(e) {
if (e.which == 10 || e.which == 13) {
go();
}
}
// https://cn.bing.com/search?q=js&filters=ex1%3a%22ez5_19327_19359%22
function getkw(url) {	//从url中提取关键词
let exp = /(?<=q\=)[^&]+(?=&?)/i;
return exp.exec(url)[0];
}
function getds(url) {	//从url中提取日期数数组[qiri,vsri]
let exp = /(?<=filters\=ex1\%3a\%22ez5_)[\d_\.]+(?=\%22)/i;	//不知为啥有时候出的日期会带小数点……
let ds = exp.exec(url); console.log(ds);
if (!!ds) {
return ds[0].split("_");	//正则匹配出的是结果的“数组”，因此第一匹配结果需要是数组index 0的元素
} else {
return "0_0".split("_");
}
}
function wheelToNum(e, initval) {
console.log(e.deltaY);
let v = initval || 0;
return ((e.deltaY > 0) ? 1 : -1) + v;
}
function dateUnitConv(sdate, num, unit) {
let y = sdate.getFullYear(), m = sdate.getMonth(), d = sdate.getDate();
switch (unit) {
case "天":
return new Date(y, m, d + num);
case "周":
return new Date(y, m, d + num * 7);
case "月":
return new Date(y, m + num, d);
case "年":
return new Date(y + num, m, d);
}
}
function dateToStr(ddate) {
return ddate.getFullYear() + "-" + (ddate.getMonth() + 1) + "-" + ddate.getDate();
}
function fulldate(str, isend) {		//将文本补全为“yyyy-m-d”格式，并输出日期，其中要补全的文本必须有四位年，可缺日或缺月日，即“yyyy”、“yyyy-m”格式
let odate, oy, om, od;
let ard = str.split('-');
if (ard.length == 1) {			// 只有年的话，非结尾则输出1月1日，结尾输出12月31日
om = (isend) ? 11 : 0;
od = (isend) ? 31 : 1;
odate = new Date(parseInt(str), om, od);
} else if (ard.length == 2) {	// 只有年月的话，非结尾输出当月1日，结尾输出当月末日（下月0日）
oy = parseInt(ard[0]);
om = parseInt(ard[1]) - 1;
odate = (isend) ? new Date(oy, om + 1, 0) : new Date(oy, om, 1);
} else {
odate = Date.parse(str)		// 年月日皆有则直接输出
}
return odate;
}
function dateTOnum(odate) {	//日期转换成日数
return (odate - d0) / msxd;
}
function numTOdate(onum) {	//日数转换为日期对象
return new Date(d0 + onum * msxd);
}
function creaElemIn(tagname, destin) {
let theElem = destin.appendChild(document.createElement(tagname));
return theElem;
}
function addCSS(css) {
let stylenode = creaElemIn('style', document.getElementsByTagName('head')[0]);
stylenode.textContent = css;
stylenode.type = 'text/css';
stylenode.id = 'ali_c_toc';
}
})();