// use_time.js
// RJM Programming
// November, 2017
// Help out use_time.htm with HTML5 time tag data

  window.onload=init;
  
  var dd, mm, yyyy, hh, minm, ss, styles="<style></style>";
  var dd2, mm2, yyyy2, hh2, minm2, ss2, lastih='';
  var tldelim='', tlurl="//www.rjmprogramming.com.au/PHP/TimelineChart/timeline_chart.php?title=Dates%20and%20Times&onclick=y&desc=Dates%20and%20Times&data="; //[~One%20to%20Two~,newDate(2017,10,9,14,27,48),newDate(2017,10,10,14,27,48)]";
  
  function sin(inn, jn) {
    var sret='';
    for (var ii=0; ii<jn; ii++) {
      sret+='0';
    }
    sret+=('' + inn);
    return sret.slice(-jn);
  }
  
  function oureval(inn) {
    var iret=0, factor=1, wleft="";
    for (var nret=eval(-1 + inn.length); nret>=0; nret--) {
      if (('' + inn).substring(nret,eval(1 + nret)) >= '0' && ('' + inn).substring(nret,eval(1 + nret)) <= '9') {
        iret+=eval(factor * eval(('' + inn).substring(nret,eval(1 + nret))));
        factor*=10;
      } else {
        if (nret >= 6) {
          wleft=inn.substring(0,eval(0 + nret)).replace('January','01').replace('February','02').replace('March','03').replace('April','04').replace('May','05').replace('June','06').replace('July','07').replace('August','08').replace('September','09').replace('October','10').replace('November','11').replace('December','12');
          if (wleft.indexOf('="') == -1 && wleft.indexOf("='") == -1) {
            if (wleft.length == 6) {
              yyyy2=eval(2000 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(2,4)));
              if (mm2 > 12) {
              dd2=mm2;
              mm2=eval(0 + eval(wleft.substring(0,2)));
              } else {
              dd2=eval(0 + eval(wleft.substring(0,2)));
              }
            } else if (wleft.length == 8) {
              dd2=eval(0 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(4,6)));
              yyyy2=eval(0 + eval(wleft.substring(0,4)));
            }
          } else if (wleft.indexOf('="') != -1) {
            wleft=wleft.split('="')[1].replace('/','').replace('/','').replace('-','').replace('-','');
            if (wleft.length == 6) {
              yyyy2=eval(2000 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(2,4)));
              if (mm2 > 12) {
              dd2=mm2;
              mm2=eval(0 + eval(wleft.substring(0,2)));
              } else {
              dd2=eval(0 + eval(wleft.substring(0,2)));
              }
            } else if (wleft.length == 8) {
              dd2=eval(0 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(4,6)));
              yyyy2=eval(0 + eval(wleft.substring(0,4)));
            }
          } else if (wleft.indexOf("='") != -1) {
            wleft=wleft.split("='")[1].replace('/','').replace('/','').replace('-','').replace('-','');
            if (wleft.length == 6) {
              yyyy2=eval(2000 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(2,4)));
              if (mm2 > 12) {
              dd2=mm2;
              mm2=eval(0 + eval(wleft.substring(0,2)));
              } else {
              dd2=eval(0 + eval(wleft.substring(0,2)));
              }
            } else if (wleft.length == 8) {
              dd2=eval(0 + eval(wleft.slice(-2)));
              mm2=eval(0 + eval(wleft.substring(4,6)));
              yyyy2=eval(0 + eval(wleft.substring(0,4)));
            }
          }
        }
        return iret;
      }
    }
    return iret;
  }
  
  function init() {
    var oh="", ih="", lastone="",last_ih="";
    var times=document.getElementsByTagName('time');
    var today = new Date();
    dd = today.getDate();
    mm = today.getMonth()+1; //January is 0!
    yyyy = today.getFullYear();
    hh = today.getHours();
    minm = today.getMinutes(); 
    ss = today.getSeconds();
    for (var iw=0; iw<times.length; iw++) {
      times[iw].onclick = function() { };
      times[iw].className+=' atime' + iw;
      oh=times[iw].outerHTML;
      ih=times[iw].innerHTML;
      dd2=dd; 
      mm2=mm;
      yyyy2=yyyy;
      hh2=hh;
      minm2=minm;
      ss2=ss;
      if (ih.split(':').length == 2 && oh.split(':').length == 2) {
        hh2=oureval(ih.split(':')[0]);
        minm2=eval(ih.split(':')[1]);
        ss2=0;
        styles=styles.replace("</style>"," .atime" + iw + ":hover::after { content: ' is " + sin(yyyy2,4) + "/" + sin(mm2,2) + "/" + sin(dd2,2) + " " + sin(hh2,2) + ":" + sin(minm2,2) + ":" + sin(ss2,2) + "'; } </style>");
      } else if (ih.split(':').length == 3 && oh.split(':').length == 3) {
        hh2=oureval(ih.split(':')[0]);
        minm2=eval(ih.split(':')[1]);
        ss2=eval(ih.split(':')[2]);
        styles=styles.replace("</style>"," .atime" + iw + ":hover::after { content: ' is " + sin(yyyy2,4) + "/" + sin(mm2,2) + "/" + sin(dd2,2) + " " + sin(hh2,2) + ":" + sin(minm2,2) + ":" + sin(ss2,2) + "'; } </style>");
      } else if (oh.split(':').length == 3) {
        hh2=oureval(oh.split(':')[0]);
        minm2=eval(oh.split(':')[1]);
        ss2=eval(oh.split(':')[2].split('"')[0].split("'")[0]);
        styles=styles.replace("</style>"," .atime" + iw + ":hover::after { content: ' is " + sin(yyyy2,4) + "/" + sin(mm2,2) + "/" + sin(dd2,2) + " " + sin(hh2,2) + ":" + sin(minm2,2) + ":" + sin(ss2,2) + "'; } </style>");
      } else if (oh.split(':').length == 2) {
        hh2=oureval(oh.split(':')[0]);
        minm2=eval(oh.split(':')[1].split('"')[0].split("'")[0]);
        ss2=0;
        styles=styles.replace("</style>"," .atime" + iw + ":hover::after { content: ' is " + sin(yyyy2,4) + "/" + sin(mm2,2) + "/" + sin(dd2,2) + " " + sin(hh2,2) + ":" + sin(minm2,2) + ":" + sin(ss2,2) + "'; } </style>");
      } else {
        styles=styles.replace("</style>"," .atime" + iw + ":hover::after { content: ' is " + sin(yyyy2,4) + "/" + sin(mm2,2) + "/" + sin(dd2,2) + " " + sin(hh2,2) + ":" + sin(minm2,2) + ":" + sin(ss2,2) + "'; } </style>");
      }
      if (eval(iw % 2) == 1) {
        if (lastone < 'newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')') {
        tlurl=tlurl.replace('%20to%20' + encodeURIComponent(ih) + '~','%20to%20' + eval(1 + iw) + '~') + tldelim + 'newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')]'; 
        } else {
        tlurl=tlurl.replace((last_ih + lastone),'~' + encodeURIComponent(ih) + '%20to%20' + encodeURIComponent(lastih) + '~,newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + '),' + lastone + ']'); 
        }
        tldelim=',';
      } else {
        last_ih='~' + encodeURIComponent(ih) + '%20to%20' + eval(2 + iw) + '~,';
        lastone='newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')';
        tlurl+=tldelim + '[~' + encodeURIComponent(ih) + '%20to%20' + eval(2 + iw) + '~,newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')'; //,newDate(2017,10,10,14,27,48)]';
        tldelim=',';
      }
      lastih=ih;
    }
    if (tlurl.indexOf('newDate') != -1 && (tlurl + '*').indexOf(']*') == -1 && ss2 < 59) {
        tlurl+=tldelim + 'newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + eval(1 + ss2) + ')]'; 
    } else if (tlurl.indexOf('newDate') != -1 && (tlurl + '*').indexOf(']*') == -1 && minm < 59) {
        tlurl+=tldelim + 'newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + eval(1 + minm2) + ',0)]'; 
    } else if (tlurl.indexOf('newDate') != -1 && (tlurl + '*').indexOf(']*') == -1) {
        tlurl=tlurl.replace('newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')','newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',58)') + tldelim + 'newDate(' + yyyy2 + ',' + eval(-1 + mm2) + ',' + dd2 + ',' + hh2 + ',' + minm2 + ',' + ss2 + ')]'; 
    }
    if (document.head.innerHTML.indexOf('?n' + 'otimeline=') != -1) {
        document.body.innerHTML+=styles;
    } else if ((location.search.split('notimeline=')[1] ? decodeURIComponent(location.search.split('notimeline=')[1]).split('&')[0] : '') == '') {
        document.body.innerHTML+='<br><iframe style="width:100%;height:700px;" src="' + tlurl + '" title="Timeline"></iframe>' + styles;
    } else {
        document.body.innerHTML+=styles;
    }
  }