// combobox.js
// External Javascript to extend some HTML like combobox.html allowing for a dynamically created HTML div element "combobox" (ie. dropdown + div contenteditable=true)
// November, 2020
// Called via ...
//      <script type='text/javascript' src='combobox.js' defer></script>
//   ... or dropdown populated example as per ...
//      <script type='text/javascript' src='combobox.js?ddlist=Asia,Africa,Europe,North%20America,South%20America,Australia,Antarctica' defer></script>
 
class Droptext {
  constructor(combobox) {
    this.ele = document.createElement('div');
    this.ele.id = ('' + combobox).split(';')[0];
    if (('' + combobox).indexOf(';') != -1) {
      this.ele.setAttribute('data-dropinnards',  encodeURIComponent(('' + combobox).split(';')[1].replace('<select ','<select onchange=woit(this); ')));
      this.ele.setAttribute('data-optionval',  "<option value=''></option>");
      this.ele.setAttribute('data-focusaway',  "<input style=position:absolute;top:-200px;left:-200px; type=text value=></input>");
      this.ele.setAttribute('contenteditable', true);
      this.ele.className = "combobox";
      this.ele.title = "Can use keyboard to add options to dropdowns of this ComboBox";
      if (('' + combobox).indexOf('</select>') != -1) {
      this.ele.innerHTML = ('' + combobox).split(';')[1].split('</select>')[0].replace('<selXXect ','<select onchange=woit(this); ') + '</select>'; // + "<input style=position:absolute;top:-200px;left:-200px; type=text value=></input>"; 
      } else {
      this.ele.innerHTML = ('' + combobox).split(';')[1].replace('<selXXect ','<select onchange=woit(this); ') + '</select>'; // + "<input style=position:absolute;top:-200px;left:-200px; type=text value=></input>"; 
      }
    }
  }
  present() {
    var teo=this.ele.outerHTML.replace('><select', ' onblur=" var odiv=event.target;  var optval=event.target.getAttribute(' + "'" + 'data-optionval' + "'" + ');  var fway=event.target.getAttribute(' + "'" + 'data-focusaway' + "'" + ');  var umytype=event.target.innerHTML;  var alltogether=decodeURIComponent(event.target.getAttribute(' + "'" + 'data-dropinnards' + "'" + ')).split(String.fromCharCode(60) + ' + "'" + '/select' + "'" + ')[0]; if (umytype.trim().length == 0) {   odiv.innerHTML = decodeURIComponent(event.target.getAttribute(' + "'" + 'data-dropinnards' + "'" + ')); } else if (alltogether.indexOf(String.fromCharCode(62) + umytype + String.fromCharCode(60)) != -1) {   odiv.innerHTML = alltogether.replace(String.fromCharCode(62) + umytype + String.fromCharCode(60), ' + "' selected'" + ' + String.fromCharCode(62) + umytype + String.fromCharCode(60)) + event.target.getAttribute(' + "'" + 'data-focusaway' + "'" + ');   } else {  alltogether+=optval.replace(String.fromCharCode(39),  String.fromCharCode(39) + umytype).replace(String.fromCharCode(62), String.fromCharCode(62) + umytype);  alltogether+=String.fromCharCode(60) + ' + "'" + '/select' + "'" + ' + String.fromCharCode(62); odiv.innerHTML = fway; odiv.innerHTML = alltogether.replace(String.fromCharCode(62) + umytype + String.fromCharCode(60), ' + "' selected'" + ' + String.fromCharCode(62) + umytype + String.fromCharCode(60)) + event.target.getAttribute(' + "'" + 'data-focusaway' + "'" + '); odiv.setAttribute(' + "'" + 'data-dropinnards' + "'" + ',encodeURIComponent(alltogether)); }  " onkeypress=" event.target.setAttribute(' + "'" + 'data-sofar' + "'" + ', event.target.innerHTML); " onkeydown="  if (event.target.innerHTML.indexOf(String.fromCharCode(60)) != -1) { event.target.innerHTML=' + "''" + ';  } "><select onchange=woit(this); ');
    //var seles=teo.split('</select>');
    //if (seles.length == 1) { seles.push(''); }
    //if (seles[1].indexOf('<option') != -1) {
    //return teo.replace(seles[1].split('</div>')[0], '');
    //} else {
    return teo;
    //}
  }
}

class Contents extends Droptext {
  constructor(combobox, mod) {
    if (('' + combobox) == '') {
      var iinn=0;
      while (document.getElementById('combobox' + iinn)) {
        iinn++;
      }
      combobox = 'combobox' + iinn;
    }
    super((combobox + ';' + mod));
    this.dropinnards = mod;
  }
  show() {
    return this.present() + "<input style=position:absolute;top:-200px;left:-200px; type=text value=></input>"; // + ', it is a ' + this.dropinnards;
  }
}

function askaboutsort(iw, iwc) {
 var ioselo=null;
 var sels=[], isels=0;
 var curval='';
 var ansis='';
 var contarr=[], icont=0, incont='';
 var ris='O';
 sels=document.getElementsByTagName('select');
 for (isels=0; isels<sels.length; isels++) {
    if (('' + sels[isels].name) == ('selcombo' + iw).replace('o0','o') || ('' + sels[isels].name) == ('selcombo' + iw).replace('oJUNK0','o')) {
     ioselo=sels[isels];
     curval=ioselo.value;
    }
 }
 if (ioselo) {
   if (ioselo.outerHTML.indexOf(' data-content=') != -1) {
     contarr=decodeURIComponent(ioselo.getAttribute('data-content')).split('</option>');
     contarr.sort();
     ansis=prompt('Do you want to sort Ascending or Descending column or restore Original order ' + iwc + '? ... A or D or O', '');
   } else {
     ris='A';
     ioselo.setAttribute('data-content', encodeURIComponent(ioselo.innerHTML));
     contarr=decodeURIComponent(ioselo.getAttribute('data-content')).split('</option>');
     contarr.sort();
     ansis=prompt('Do you want to sort Ascending or Descending column ' + iwc + '? ... A or D', '');
   }
 if (ansis == null) { ansis = ''; }
 if ((ansis + ' ').toUpperCase().substring(0,1) == 'A') {
   for (icont=0; icont<contarr.length; icont++) {
     incont+=contarr[icont] + '</option>';
   }
   ioselo.innerHTML=incont;
   ioselo.value=curval;
 } else if ((ansis + ' ').toUpperCase().substring(0,1) == 'D') {
   for (icont=eval(-1 + contarr.length); icont>=0; icont--) {
     incont+=contarr[icont] + '</option>';
   }
   ioselo.innerHTML=incont;
   ioselo.value=curval;
 } else if ((ansis + ' ').toUpperCase().substring(0,1) == ris) {
   ioselo.innerHTML=decodeURIComponent(ioselo.getAttribute('data-content'));
   ioselo.value=curval;
 }
 }
}

function thprompts() {
 var wasih='';
 var ths=document.getElementsByTagName('th');
 for (var iths=0; iths<ths.length; iths++) {
   if (ths[iths].innerHTML.indexOf('<') == -1) {
     wasih=ths[iths].innerHTML;
     ths[iths].innerHTML='<a title="Click for some sorting options" style="cursor:pointer;text-decoration:none;" onclick="askaboutsort(' + iths + ",'" + wasih + "');" + '">' + wasih + '</a>';
   }
 }
}

function woit(sthis) {
if (sthis.value.indexOf(String.fromCharCode(104) + String.fromCharCode(116) + String.fromCharCode(116) + String.fromCharCode(112)) == 0) { 
 window.open(sthis.value,'_blank','top=100,left=100,width=600,height=600');  
}
if (sthis.outerHTML.indexOf(' data-content=') != -1) {
 if (decodeURIComponent(sthis.getAttribute('data-content')).replace(/\ value\=\"/g, ' value=').replace(/\ value\=\'/g, ' value=').indexOf(' value=' + sthis.value) == -1) {
  sthis.setAttribute('data-content', sthis.getAttribute('data-content') + encodeURIComponent('<option value="' + sthis.value + '">' + sthis.options[sthis.selectedIndex].text + '</option>'))
 }
}
}

var ihs, selconts=[], selcont='', mycombobox=null, obody=null, ofound=false, jiip=0, iip=0, obs=[], ihsobs=[], iqw=0, ihsuff='', isokay=true, ioff=0, alle=[], ialle=0, sparebody=null;
ihs = "";
if (document.title != document.title.trim()) {
ihsobs = (" ").split('?ddlist=');
} else {
ihsobs = (document.head.innerHTML + document.body.innerHTML).replace(/\&ddlist\=/g,'?ddlist=').split('?ddlist=');
}
if (ihsobs.length > 2) {
  ioff = -1;
  ihs = decodeURIComponent((document.head.innerHTML + document.body.innerHTML).replace('&ddlist=','?ddlist=').split('?ddlist=')[1].split('&')[0].split('"')[0].split("'")[0]); // + ',';
  if (document.URL.indexOf('ddlist=' + encodeURIComponent(ihs)) == -1 && (document.head.innerHTML + document.body.innerHTML).indexOf('?just=one') == -1) {
    if (document.URL.indexOf('?') == -1) {
      if (ihs.indexOf('/wiki/') == -1) { location.href = document.URL.split('#')[0] + '?ddlist=' + encodeURIComponent(ihs); }
      ioff = -11;
    } else {
      if (ihs.indexOf('/wiki/') == -1) { location.href = document.URL.split('#')[0] + '&ddlist=' + encodeURIComponent(ihs); }
      ioff = -11;
    }
  } else {
    document.title+=' ';
  }
} else if (ihsobs.length == 2) {
  ioff = -1;
}
for (iqw=1; iqw<=eval(ioff + eval('' + ihsobs.length)); iqw++) {
ihs="";
isokay=true;
selconts = location.search.split('ddlist=')[1] ? (ihs + decodeURIComponent(location.search.split('ddlist=')[1].split('&')[0])).split(',') : (ihs + "<select><option value=''></option><option value='Red'>Red</option><option value='Blue'>Blue</option><option value='Yellow'>Yellow</option></select>").split(',');
if ((document.head.innerHTML + document.body.innerHTML).replace(/\&ddlist\=/g,'?ddlist=').indexOf('?ddlist=') != -1) {
  ihs = decodeURIComponent((document.head.innerHTML + document.body.innerHTML).replace(/\&ddlist\=/g,'?ddlist=').split('?ddlist=')[iqw].split('&')[0].split('"')[0].split("'")[0]); // + ',';
  if (ihs.trim() != '') { selconts = ihs.split(','); }
  if (ihsobs.length > 2) {
    isokay = false;
    if (iqw > 1) {
      selconts = ihs.split(',');
    }
    if (1 == 1 || document.URL.indexOf('ddlist=' + encodeURIComponent(ihsobs[1].split('&')[0].split('"')[0].split("'")[0])) != -1) {
      isokay=true;
    }
  }
}
if (isokay) { console.log('yay ' + ioff + ' ' + ihsobs.length + ' ' + document.URL); } else {  console.log('oops ' + ioff + ' ' + ihsobs.length + ' ' + document.URL + ' versus ' + 'ddlist=' + encodeURIComponent(ihsobs[1].split('&')[0].split('"')[0].split("'")[0]));   }
if (isokay) {
thprompts();
if (selconts[0].indexOf('<select') != 0) {
 //selcont = ("<select onchange=\"if (this.value.indexOf(String.fromCharCode(104) + String.fromCharCode(116) + String.fromCharCode(116) + String.fromCharCode(112)) == 0) { window.open(this.value,'_blank','top=100,left=100,width=600,height=600');  }\" class=combobox name=selcombo" + ihsuff + ">").replace(" name=selcombo>", " name=selcombo0>");
 selcont = ("<select class=combobox name=selcombo" + ihsuff + ">").replace(" name=selcombo>", " name=selcombo0>");
 for (jiip=0; jiip<selconts.length; jiip++) {
  if (selconts[jiip].indexOf('<select') != 0) {
    if (selconts[jiip].indexOf('/wiki/') != -1) {
    if (selconts[jiip].toLowerCase().indexOf('http') != 0) {
    if (selconts[jiip].toLowerCase().indexOf('|') != -1) {
    selcont += '<option value="http://en.wikipedia.org/' + selconts[jiip].split('|')[0] + '">' + selconts[jiip].split('|')[1].replace(/\_/g,' ').replace(/\'/g,'`') + '</option>';
    } else {
    selcont += '<option value="http://en.wikipedia.org/' + selconts[jiip] + '">' + selconts[jiip].split('/')[eval(-1 + selconts[jiip].split('/').length)].replace(/\_/g,' ').replace(/\'/g,'`') + '</option>';
    }
    } else {
    selcont += '<option value="' + selconts[jiip] + '">' + selconts[jiip].split('/')[eval(-1 + selconts[jiip].split('/').length)].replace(/\_/g,' ').replace(/\'/g,'`') + '</option>';  
    }
    } else if (selconts[jiip].toLowerCase().indexOf('|') != -1) {
    selcont += '<option value="' + selconts[jiip].split('|')[0] + '">' + selconts[jiip].split('|')[1].replace(/\_/g,' ').replace(/\'/g,'`') + '</option>';
    } else {
    selcont += '<option value="' + selconts[jiip] + '">' + selconts[jiip].replace(/\'/g,'`') + '</option>';
    }
  }
 }
 //selcont = selcont.replace('<select class=', '<select onclick=woit(this); class=') + "</select>";
 selcont += "</select>";

 console.log('' + iqw + ':' + ihs + ' ' + selcont);
 //thprompts();

 if (mycombobox) {
 eval('mycombobox' + ihsuff + ' = new Contents("", selcont)');
 } else {
 mycombobox = new Contents("", selcont);
 }
} else {


 console.log('' + iqw + ';');
 //thprompts();


 if (mycombobox) {
 eval('mycombobox' + ihsuff + ' = new Contents("", selconts[0])');
 } else {
 mycombobox = new Contents("", selconts[0]);
 }
}
obody = document.body;
sparebody=null;
alle=document.getElementsByTagName('*');
for (ialle=0; ialle<alle.length; ialle++) {
  if (!sparebody && ('' + alle[ialle].innerHTML) == '' && alle[ialle].outerHTML.indexOf('></') != -1 && alle[ialle].outerHTML.indexOf('script') == -1) {
    sparebody=alle[ialle];
  }
}
if (sparebody) { 
  obody = sparebody;
} else if (document.getElementById('demo' + ihsuff)) {
  obody = document.getElementById('demo' + ihsuff);
} else {
  ofound = false;
  obs = document.getElementsByTagName('div');
  for (iip=0; iip<obs.length; iip++) {
    if (obs[iip].innerHTML == '') { 
     obody = obs[iip]; 
     ofound = true;
    }
  }
  if (!ofound) {
    obody.innerHTML += '<div style=inline-block; id=demo' + ihsuff + '></div>';
    obody = document.getElementById('demo' + ihsuff);
  }
}
eval('obody.innerHTML += mycombobox' + ihsuff + '.show()');
//thprompts();
document.title+=' ';
}
ihsuff='' + eval(0 + iqw);
}