// meld_styles.js
// Allow for style mimicing
// RJM Programming
// October, 2016

var from_o=[];
var from_id=[];
var from_class=[];
var from_type=[];
var from_ih=[];

function ms_docgetclass(inc, intag) {
  if (document.getElementsByClassName) {
    return document.getElementsByClassName(inc);
  } else {
    var ijl;
    var anarris=[];
    var huhs=document.getElementsByTagName(intag);
    for (ijl=0; ijl<huhs.length; ijl++) {
     if (huh[ijl].className.indexOf(inc) != -1) {
      anarris.push(huhs[ijl]);
     }
    }
    return anarris;
  }
}

function copyTextareaStylingFromTo(from, toid, toclass, totype) {
    var output, onecnt=1, ione;
    if (typeof from == 'object') {
     output = from;
     //alert('object found');
    } else {
     output = document.getElementById(from);
    }
    if (output) {
     var divelem, divs=[];
     if (toid != '') {
        divelem = document.getElementById(toid);
     //alert('id to found');
     }
     if (!divelem && toclass != '') {
        if (totype != '') {
         divs=ms_docgetclass(toclass, totype);
        } else {
         divs=ms_docgetclass(toclass, '*');
        }
        onecnt=divs.length;
        if (onecnt >= 1) divelem=divs[0];
     //alert('class to found');
     }
     if (!divelem && totype != '') {
        divs=document.getElementsByTagName(totype);
        onecnt=divs.length;
        if (onecnt >= 1) divelem=divs[0];
     //alert('type to found');
     }
     if (divelem && output) { // thanks to ideas off http://stackoverflow.com/questions/12266320/copy-div-content-to-textarea-or-text-with-the-same-font-family-style
     //alert('found');
      divelem.style.fontFamily = window.getComputedStyle(output,null).fontFamily || output.style.fontFamily || output.currentStyle.getCurrentProperty('font-family');
      divelem.style.fontSize = window.getComputedStyle(output,null).fontSize || output.style.fontSize || output.currentStyle.getCurrentProperty('font-size');
      divelem.style.border = window.getComputedStyle(output,null).border || output.style.border || output.currentStyle.getCurrentProperty('border');
      divelem.style.padding = window.getComputedStyle(output,null).padding || output.style.padding || output.currentStyle.getCurrentProperty('padding');
      divelem.style.margin = window.getComputedStyle(output,null).margin || output.style.margin || output.currentStyle.getCurrentProperty('margin');
      divelem.style.overflow = window.getComputedStyle(output,null).overflow || output.style.overflow || output.currentStyle.getCurrentProperty('overflow');
     //alert('found code done');
     }
     if (onecnt > 1) {
      for (ione=1; ione<onecnt; ione++) {
       divs[ione].style.fontFamily = window.getComputedStyle(output,null).fontFamily || output.style.fontFamily || output.currentStyle.getCurrentProperty('font-family');
       divs[ione].style.fontSize = window.getComputedStyle(output,null).fontSize || output.style.fontSize || output.currentStyle.getCurrentProperty('font-size');
       divs[ione].style.border = window.getComputedStyle(output,null).border || output.style.border || output.currentStyle.getCurrentProperty('border');
       divs[ione].style.padding = window.getComputedStyle(output,null).padding || output.style.padding || output.currentStyle.getCurrentProperty('padding');
       divs[ione].style.margin = window.getComputedStyle(output,null).margin || output.style.margin || output.currentStyle.getCurrentProperty('margin');
       divs[ione].style.overflow = window.getComputedStyle(output,null).overflow || output.style.overflow || output.currentStyle.getCurrentProperty('overflow');
      }
     }
    }
}

function actonthis() {
    if (document.getElementById('s_wyl').value != '') {
      copyTextareaStylingFromTo(from_o[eval(document.getElementById('s_wyl').value)], document.getElementById('s_wywi').value, document.getElementById('s_wywc').value, document.getElementById('s_wywt').value);
    }
}

function allowfor(inih) {
   var pf=inih.split('<')[0].replace(String.fromCharCode(10),'').replace(String.fromCharCode(13),'');
   if (pf == "") {
     var stype=inih.split('<')[1].replace('>',' ').split(' ')[0];
     var afterstype=inih.split('</' + stype + '>');
     if (afterstype.length > 1) {
       pf=afterstype[1].split('<')[0].replace(String.fromCharCode(10),'').replace(String.fromCharCode(13),'');
       if (pf != "") {
         return pf + '<';
       }
     }
   }
   return inih;
}

function lookforvariety() {
    var htmluptop='<div style="background-color:orange;position:absolute;top:0;left:0;z-index:23;opacity:0.4;"><table border=1><tr><th id="wyl"><select style="width:50%;" id="s_wyl"><option value=>Please select a style from via list below ...</option></select></th><th id="wywt"><select id="s_wywt"><option value=>Optionally, please select a type criteria to ...</option></select></th><th id="wywc"><select id="s_wywc"><option value=>Optionally, please select a class criteria to ...</option></select></th><th id="wywi"><select id="s_wywi"><option value=>Optionally, please select an id criteria to ...</option></select></th><th id="wywok"><input onclick="actonthis();" type="button" value="Make Changes as You Ask"></input></th></tr></table></div>';
    var ourih, m_cnt=0, c_i, c_list=[], types_list=";", this_type="";
    document.body.innerHTML+=htmluptop;
    var the_elems=document.getElementsByTagName('*');
    for (var jone=0; jone<the_elems.length; jone++) {
      if (the_elems[jone].innerHTML) {
       ourih=allowfor(the_elems[jone].innerHTML).split('<')[0].replace(String.fromCharCode(10),'').replace(String.fromCharCode(13),'');
       this_type=the_elems[jone].outerHTML.substring(1).replace('>', ' ').split(' ')[0].toLowerCase();
       if (the_elems[jone].innerHTML != '' && ourih != '') {
         if (types_list.indexOf(';' + this_type + ';') == -1) {
           types_list+=this_type + ';';
           //alert(types_list);
           from_o.push(the_elems[jone]);
           from_type.push(this_type);
           from_ih.push(ourih);
           document.getElementById('s_wyl').innerHTML+='<option value=' + m_cnt + '>(' + this_type + ') ' + ourih + ' (' + this_type + ')</option>';
           m_cnt++;
           document.getElementById('s_wywt').innerHTML+='<option value="' + this_type + '">' + this_type + '</option>';
           if (the_elems[jone].id) {
            if (the_elems[jone].id != "") {
             document.getElementById('s_wywi').innerHTML+='<option value="' + the_elems[jone].id + '">' + the_elems[jone].id + '</option>';
             from_id.push(the_elems[jone].id);
             from_o[eval(-1 + from_o.length)]=the_elems[jone].id;
            } else {
             from_id.push('');
            }
           } else {
            from_id.push('');
           }
           if (the_elems[jone].className) {
            if (the_elems[jone].className != "") {
              from_class.push(the_elems[jone].className);
              c_list=the_elems[jone].className.split(' ');
              for (c_i=0; c_i<c_list.length; c_i++) {
                document.getElementById('s_wywc').innerHTML+='<option value="' + c_list[c_i] + '">' + c_list[c_i] + '</option>';
              }
            } else {
              from_class.push('');
            }
           } else {
            from_class.push('');
           }

         } 
       } else if (types_list.indexOf(';' + this_type + ';') == -1) {
           document.getElementById('s_wywt').innerHTML+='<option value="' + this_type + '">' + this_type + '</option>';
           types_list+=this_type + ';';
           if (the_elems[jone].id) {
            if (the_elems[jone].id != "") {
             document.getElementById('s_wywi').innerHTML+='<option value="' + the_elems[jone].id + '">' + the_elems[jone].id + '</option>';
             from_id.push(the_elems[jone].id);
             from_o[eval(-1 + from_o.length)]=the_elems[jone].id;
            }
           }
           if (the_elems[jone].className) {
            if (the_elems[jone].className != "") {
              from_class.push(the_elems[jone].className);
              c_list=the_elems[jone].className.split(' ');
              for (c_i=0; c_i<c_list.length; c_i++) {
                document.getElementById('s_wywc').innerHTML+='<option value="' + c_list[c_i] + '">' + c_list[c_i] + '</option>';
              }
            }
           }
       }
      }
    }
}

setTimeout(lookforvariety, 1000);