// details_hash.js
// RJM Programming
// September, 2020
// Hashtag navigate to an "a" tag above a "details/summary" pairing via their onclick event(s)

  var initiallynone=false;
  
  function makeDelayedHandler(f, time){ // Delay execution of event handler function "f" by "time" ms, thanks to https://stackoverflow.com/questions/3048005/document-onclick-settimeout-function-javascript-help
   return function(e){
    var ev = e || window.event;
    setTimeout(function(){
      f(ev);
    }, time);        
   };
  }

  function checkds(e) { 
   var ois = (e && e.target) || (event && event.srcElement); 
   var dpp=ois.getAttribute('data-preid').replace(/^null$/g, '').replace(/^undefined$/g, '');
   var dld=ois.getAttribute('data-lastid').replace(/^null$/g, '').replace(/^undefined$/g, '');
   if (ois.parentElement && ois.outerHTML.toLowerCase().indexOf('<summary') == 0) {
     ois=ois.parentElement;
     if (dpp.trim() == '' && dld.trim() == '') {
      dpp=ois.getAttribute('data-preid').replace(/^null$/g, '').replace(/^undefined$/g, '');
      dld=ois.getAttribute('data-lastid').replace(/^null$/g, '').replace(/^undefined$/g, '');
     }
   }
   if (('' + ois.getAttribute('open')).replace(/^null$/g, '').replace(/^undefined$/g, '').replace(/^false$/g, '') != '') {  
     location.href='#' + dpp; //ois.getAttribute('data-preid'); 
     location.href='#' + dld; //ois.getAttribute('data-lastid');
   }
  }
  
  function lookfordsa() {
    var ebefore='', fbefore='';
    var nodetails=true;
    var lasteis=null, lastid='';
    var indselems=document.getElementsByTagName('details');
    var hashtop='top';
    var bihis='';
    if (eval('' + indselems.length) > 0) {
    var inelems=document.getElementsByTagName('*');
    nodetails=false;
    if (initiallynone) { initiallynone=false; setTimeout(lookfordsa, 3000); return;   }
    bihis=document.body.innerHTML;
    
    for (var iplj=0; iplj<inelems.length; iplj++) {
      if (('' + inelems[iplj].outerHTML).toLowerCase().replace(/^null$/g, '').replace(/^undefined$/g, '').indexOf('<br') == 0) {
        lastid=lastid;
      } else if (('' + inelems[iplj].outerHTML).toLowerCase().replace(/^null$/g, '').replace(/^undefined$/g, '').indexOf('<summary') == 0) {
        nodetails=false;
        if (lasteis && lastid != '') {
          if (('' + inelems[iplj].onclick).replace(/^null$/g, '').replace(/^undefined$/g, '') == '') {
            inelems[iplj].setAttribute('data-preid', '' + hashtop.replace('#',''));
            inelems[iplj].setAttribute('data-lastid', '' + lastid);
            if (1 == 1) {
             inelems[iplj].onclick = makeDelayedHandler(checkds, 5000);
            } else {
             inelems[iplj].onclick = function(evt) { location.href='#' + evt.target.getAttribute('data-preid'); location.href='#' + evt.target.getAttribute('data-lastid'); } 
            }
            console.log('summary:' + lastid);
          }
        }
        lasteis=null;
        lastid='';
      } else if (('' + inelems[iplj].outerHTML).toLowerCase().replace(/^null$/g, '').replace(/^undefined$/g, '').indexOf('<details') == 0) {
        nodetails=false;
        if (lasteis && lastid != '') {
          if (('' + inelems[iplj].onclick).replace(/^null$/g, '').replace(/^undefined$/g, '') == '') {
            inelems[iplj].setAttribute('data-preid', '' + hashtop.replace('#',''));
            inelems[iplj].setAttribute('data-lastid', '' + lastid);
            //document.getElementById('myh1').innerHTML+=('details:' + lastid);
            if (1 == 1) {
             inelems[iplj].onclick = makeDelayedHandler(checkds, 5000);
            } else {
             inelems[iplj].onclick = function(evt) { if (('' + evt.target.getAttribute('open')).replace(/^null$/g, '').replace(/^undefined$/g, '').replace(/^false$/g, '') != '') { location.href='#' + evt.target.getAttribute('data-preid'); location.href='#' + evt.target.getAttribute('data-lastid'); } } 
            }
            //inelems[iplj].onclick = function(evt) { location.href='#' + evt.target.getAttribute('data-preid'); location.href='#' + evt.target.getAttribute('data-lastid'); } 
          }
        } else {
        if (bihis.indexOf(('' + inelems[iplj].outerHTML).replace(/^null$/g, '').replace(/^undefined$/g, '')) != -1) {
          ebefore=bihis.split(('' + inelems[iplj].outerHTML).replace(/^null$/g, '').replace(/^undefined$/g, ''))[0].replace(/\&nbsp\;/g,'');
          if ((ebefore.trim() + '~').indexOf('</a>~') != -1) {
          fbefore='<a ' + ebefore.split('<a ')[eval(-1 + ebefore.split('<a ').length)];
          if (fbefore.indexOf(' id="') != -1) {
          lastid=fbefore.split(' id="')[1].split('"')[0];
          lasteis=document.getElementById(lastid);
          if (('' + lasteis.href).indexOf('#') == 0) {
            hashtop=lasteis.href;
          }
          if (('' + inelems[iplj].onclick).replace(/^null$/g, '').replace(/^undefined$/g, '') == '') {
            inelems[iplj].setAttribute('data-preid', '' + hashtop.replace('#',''));
            inelems[iplj].setAttribute('data-lastid', '' + lastid);
            //document.getElementById('myh1').innerHTML+=('details:' + lastid);
            if (1 == 1) {
             inelems[iplj].onclick = makeDelayedHandler(checkds, 5000);
            } else {
             inelems[iplj].onclick = function(evt) { if (('' + evt.target.getAttribute('open')).replace(/^null$/g, '').replace(/^undefined$/g, '').replace(/^false$/g, '') != '') { location.href='#' + evt.target.getAttribute('data-preid'); location.href='#' + evt.target.getAttribute('data-lastid'); } } 
            }
          }
          }
        //alert('Not Here ');
          } 
        }
        }
      } else {
        if (('' + inelems[iplj].type).toLowerCase() == 'a') {
          if (('' + inelems[iplj].id) != '') {
           if (('' + inelems[iplj].href).indexOf('#') == 0) {
            hashtop=inelems[iplj].href;
            lasteis=inelems[iplj];
            lastid=inelems[iplj].id;
           } else {
            lasteis=null;
            lastid='';
           }
          }
        } else if (('' + inelems[iplj].outerHTML).replace(/^null$/g, '').replace(/^undefined$/g, '').replace(/\&nbsp\;/g, '').trim() != '') {
          //if (lasteis) { alert('lastid=' + lastid + ' and this.outerHTML=' +  inelems[iplj].outerHTML); } 
          lasteis=null;
          lastid='';
        }
      }
    }
    }
    if (nodetails) { initiallynone=true;  setTimeout(lookfordsa, 3000);   } else if (initiallynone) { initiallynone=false; setTimeout(lookfordsa, 3000);    }
  }

  setTimeout(lookfordsa, 3000);