// gchartgen.js
// Email functionality for H1 onclick event specifics for Google Chart work 
// RJM Programming
// Robert Metcalfe
// January 2015
// Added event functionality in July 2015

var wua = navigator.userAgent;
var wisiPad = /iPad/i.test(wua) || /iPhone OS 3_1_2/i.test(wua) || /Android/i.test(wua) || /iPhone OS 3_2_2/i.test(wua); 
var wisTouch = /touch/i.test(wua) || /Touch/i.test(wua); 
var gcadvice = ' ... To email a snapshot of this Google Chart click me.';
var wisMobile = false;
var wisWebView = false;
var toobigform = null;
var ourbae = null;
var formid = '';
var xnewfbit = '';
var divid = '';

function depends(ins) {
  if (ins == "") return wisWebView;
  return ins;
}

function getH1s(evt) {
   var rest = '', rests, restss, brest='?justmenu=justmenu';
   if (document.URL.indexOf('?') != -1) {
     rests = document.URL.split('?');
     restss = rests[1].split('&');
     if (restss[0].indexOf('title=') == -1) rest = '?' + restss[0];
     if (restss[0].indexOf('title=') == -1) brest = '?justmenu=justmenu&' + restss[0];
   }
   if (wisWebView || navigator.userAgent.match(/Android|BlackBerry|iPhone|iPad|iPod|Opera Mini|IEMobile/i)) { 
     wisWebView = wisWebView;
   } else {
     wisMobile = false;
     wisWebView = false;
   }
   if (wisWebView || (wisMobile && document.URL.indexOf("title=") != -1)) {
     if (document.body.innerHTML.indexOf("jkl" + "email") == -1) {
       document.body.innerHTML = document.body.innerHTML + "<iframe name='jklemail' id='jklemail' style='display:none;height:1px;width:1px;' src='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=' height=1 width=1></iframe><a id='email' target='jklemail' onclick=' if (toobigform != null) { toobigform.submit();  } ' title='To email a snapshot of this Google Chart click me.' style='display:inline;' href='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=&subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(depends(iftoobig('email',document.URL)).replace('?','&')) + "'>Email snapshot to: </a>&nbsp;<input id='aaltemail' name='aaltemail' type='text' value='' onblur=" + '"' + " document.getElementById('email').href=document.getElementById('email').href.replace('mt=','mt=' + this.value + '&junk=').replace('get=','mt=' + this.value + '&junk='); " + '"' + "></input>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
     }
   } else {
     if (document.body.innerHTML.indexOf("mail" + "to:") == -1 && document.body.innerHTML.indexOf(">E" + "mail") == -1) {
       document.body.innerHTML = document.body.innerHTML + "<a onclick=' if (toobigform != null) { toobigform.submit();  } ' id='email' style='display:none;' href='mail" + "to:fillin.email@address?subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(iftoobig('email',document.URL)) + "'>Email snapshot ...</a>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
       document.getElementById('email').click();
     }
   }
}

function gcinit() {
  // Listen for the 'select' event, and call my function selectHandler() when
  // the user selects something on the chart.
  // July, 2015 changes thanks to https://developers.google.com/chart/interactive/docs/basic_interactivity
//  try {
//if (chart != null) {
//alert(99);
//  google.visualization.events.addListener(chart, 'select', selectHandler);
//} else {
//alert(98);
//}
//} catch (e) {
//alert(97 + " " + e.message);
//}
     var bae = document.getElementById('bitsatend');
     var rest = '', rests, restss, brest='?justmenu=justmenu';
 document.body.style.background='-webkit-linear-gradient(top, #FFFF00, #00FFFF)'; 
 document.body.style.background='-moz-linear-gradient(top, #FFFF00, #00FFFF)'; 
     if (document.URL.indexOf('?') != -1) {
       rests = document.URL.split('?');
       restss = rests[1].split('&');
       if (restss[0].indexOf('title=') == -1) rest = '?' + restss[0];
       if (restss[0].indexOf('title=') == -1) brest = '?justmenu=justmenu&' + restss[0];
      }
      if (navigator.userAgent.match(/Android|BlackBerry|iPhone|iPad|iPod|Opera Mini|IEMobile/i)) { 
        wisMobile = true;
        wisWebView = wisWebView;
      } else {
        wisMobile = false;
        wisWebView = false;
      }
      if (navigator.userAgent.match(/Android|BlackBerry|iPhone|iPad|iPod|Opera Mini|IEMobile/i)) { // is mobile
    wisMobile = true;
        wisWebView = true;
    if (depends("") && (document.URL.replace(/justmenu/g,"").indexOf("=WebView") != -1 || document.URL.replace(/justmenu/g,"").indexOf("WebView=") != -1 || document.URL.replace(/justmenu/g,"").indexOf("=UIWebView") != -1)) { // called this way by iOS or Android WebView
         wisWebView = true;
     wisWebView = depends("");
     if (wisWebView || (wisMobile && document.URL.indexOf("&") != -1)) {
         if (navigator.userAgent.toLowerCase().indexOf("ie") != (0 - 1)) {
          aallPs = document.getElementsByTagName('a');
         } else {
          aallPs= document.getElementsByTagName('a');
         }
         for (var jj=0; jj < aallPs.length; jj++) {
           if (("*" + aallPs[jj].innerHTML).indexOf("*Another ") != -1) {
             if (wisWebView) {
             if ((aallPs[jj].href + "*").indexOf(".php*") != -1) {
               if (document.URL.indexOf("&") != -1) {
                 var huha=document.URL.split("&");
                 aallPs[jj].href = huha[0];
               } else {
                 aallPs[jj].href = document.URL;
               }
             }
             }
           } else if ((aallPs[jj].href.indexOf("http") != -1 || aallPs[jj].href.indexOf("//") != -1) && aallPs[jj].href.indexOf("rjmprogramming.com.au") == -1) {
             aallPs[jj].onclick = " alert('" + aallPs[jj].href + "'); "; 
             aallPs[jj].href = "#"; 
           }
         }
        }
        } else {
         wisWebView = false;
        }
    }
      
      if (1 == 1) {
      if (navigator.userAgent.toLowerCase().indexOf("ie") != (0 - 1)) {
       allPs = document.getElementsByTagName('h1');
      } else {
       allPs= document.getElementsByTagName('h1');
      }
      for (var j=0; j < allPs.length; j++) {
           if ((depends("") && wisWebView) || (wisMobile && document.URL.indexOf("&") != -1)) {
            if (document.body.innerHTML.indexOf("ijk" + "email") == -1) {
              if (bae != null) {
              bae.innerHTML+="&nbsp;&nbsp;<a id='zmenu' target='top' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>&nbsp;&nbsp;<iframe name='ijkemail' id='ijkemail' style='display:none;height:1px;width=1px;' src='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=' height=1 width=1></iframe><a id='remail' target='ijkemail' onclick=' if (toobigform != null) { toobigform.submit();  } ' title='To email a snapshot of this Google Chart click me.' style='display:inline;' href='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=&subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(depends(iftoobig('email',document.URL)).replace('?','&')) + "'>Email snapshot of Google Chart to: </a>&nbsp;<input id='altemail' name='altemail' type='text' value='' onblur=" + '"' + " document.getElementById('remail').href=document.getElementById('remail').href.replace('mt=','mt=' + this.value + '&junk=').replace('get=','mt=' + this.value + '&junk='); " + '"' + "></input>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
              } else {
          document.body.innerHTML = document.body.innerHTML + "&nbsp;&nbsp;<a id='zmenu' target='top' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>&nbsp;&nbsp;<iframe name='ijkemail' id='ijkemail' style='display:none;height:1px;width=1px;' src='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=' height=1 width=1></iframe><a id='remail' target='ijkemail' onclick=' if (toobigform != null) { toobigform.submit();  } ' title='To email a snapshot of this Google Chart click me.' style='display:inline;' href='http://www.rjmprogramming.com.au/PHP/webviewemail.php?get=&subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(depends(iftoobig('email',document.URL)).replace('?','&')) + "'>Email snapshot of Google Chart to: </a>&nbsp;<input id='altemail' name='altemail' type='text' value='' onblur=" + '"' + " document.getElementById('remail').href=document.getElementById('remail').href.replace('mt=','mt=' + this.value + '&junk=').replace('get=','mt=' + this.value + '&junk='); " + '"' + "></input>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
                }
            }
           } else {
          if (document.body.innerHTML.indexOf("MAIL" + "TO:") == -1 && document.body.innerHTML.indexOf(">E" + "mail") == -1) {
              if (bae != null) {
              bae.innerHTML+="&nbsp;&nbsp;<a id='zmenu' target='top' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>&nbsp;&nbsp;<a id='remail' title='To email a snapshot of this Google Chart click me.' onclick=' if (toobigform != null) { toobigform.submit();  } ' style='display:inline;' href='MAIL" + "TO:fillin.email@address?subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(depends(iftoobig('email',document.URL))) + "'>Email snapshot of Google Chart ...</a>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
              } else {
          document.body.innerHTML = document.body.innerHTML + "&nbsp;&nbsp;<a id='zmenu' target='top' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>&nbsp;&nbsp;<a id='remail' title='To email a snapshot of this Google Chart click me.' onclick=' if (toobigform != null) { toobigform.submit();  } ' style='display:inline;' href='MAIL" + "TO:fillin.email@address?subject=Google%20Chart%20Snapshot&body=" + encodeURIComponent(depends(iftoobig('email',document.URL))) + "'>Email snapshot of Google Chart ...</a>&nbsp;&nbsp;<br><iframe id='iagc' title='Google Chart menu of applications' style='width:1;height:1;' src='http://www.rjmprogramming.com.au/PHP/butsel.php" + rest + "'></iframe>";
                }
          } 
         }
           if ((wisiPad || wisTouch)) {
           allPs[j].onclick = getH1s; 
           if (allPs[j].title.indexOf(gcadvice) == -1) allPs[j].title += gcadvice; 
           } else {
           allPs[j].onclick = getH1s; 
           if (allPs[j].title.indexOf(gcadvice) == -1) allPs[j].title += gcadvice;  
           }
      }
      }
      
      if (navigator.userAgent.match(/Android|BlackBerry|iPhone|iPad|iPod|Opera Mini|IEMobile/i)) { // is mobile
          if (document.body.innerHTML.indexOf("but" + "sel." + "php") == -1) {
              if (bae != null) {
              bae+="&nbsp;&nbsp;<a target='top' id='zmenu' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>";
              } else {
              document.body.innerHTML = document.body.innerHTML + "&nbsp;&nbsp;<a target='top' id='zmenu' title='menu' style='margin-left:5px;' href='http://www.rjmprogramming.com.au/PHP/butsel.php" + brest + "'>Menu</a>";
                }
          }
          var ozmenu=document.getElementById('zmenu');
          if (ozmenu != null) {
            ozmenu.href='http://www.rjmprogramming.com.au/PHP/justmenuWebView.html';
          }
    }
}

function ourencodeURIComponent(insis) {
  var outsis=encodeURIComponent(insis), ebits;
  var kbits=insis.split('&');
  var jbits=insis.split('=');
  var altsis='';
  if (eval(kbits.length) > 1 && eval(jbits.length) > 1 && eval(kbits.length) == eval(jbits.length) && eval(jbits[0].length) > eval(kbits[0].length)) {
    altsis=encodeURIComponent(kbits[0]); 
    for (var iu=1; iu<eval(jbits.length); iu++) {
        ebits=kbits[iu].split('=');
        altsis+='&' + ebits[0] + '='; // &title=
        altsis+=encodeURIComponent(ebits[1]);  // hello 
    }
  }
  if (altsis != '') return altsis;
  return outsis;
}

function dobae() {
          ourbae = document.getElementById('bitsatend'); //divid);
          ourbae.innerHTML+=xnewfbit;
          toobigform = document.getElementById('bigemailform'); 
}

function iftoobig(modeofuse, urlin) {
  var urldata='', urldata0='';
  if (urlin.indexOf('&data') == -1) {
    var bedo=document.getElementById('bdataval');
    if (bedo != null) {
      urldata+='&data=' + bedo.value;
    }
    bedo=document.getElementById('bdata0val');
    if (bedo != null) {
      urldata0+='&data0=' + bedo.value;
    }
  }
  if (eval(eval(urlin.length) + eval(urldata.length) + eval(urldata0.length)) < 1000) { // vs 2000
    return urlin;
  } else {
    var newfbit='', vprefix='', meth='POST', qp='', fnamesuffix='', fnamesuffix0='', fdsuffix='',  fd0suffix='', fipsuffix='', fformsuffix='', fformsuffix0='';
    var ynft='isunlikelyehwot', ynft0='isunlikelyehwotzero';
    var dss, iy, ij, qns, qname='', qval='';
    var ournewf, dtis;
    divid='bitsatend';
    formid='postform';
    newfbit='';
    if (modeofuse == 'email') {
      vprefix='be';
      dtis=new Date();
      fnamesuffix='itb' + Math.floor(Math.random() * 1000) + dtis.valueOf() + '.huh';
      fformsuffix='<input type="hidden" name="bfname" id="bfname" value="' + fnamesuffix + '"></input>';
      fipsuffix='<input type="hidden" name="bipname" id="bipname" value=""></input>';
      fdsuffix='<input type="hidden" name="data" id="' + vprefix + 'data" value="' + urldata.replace('&data=','') + '"></input>';
      if (urlin.indexOf('_diff.php') != -1) fd0suffix='<input type="hidden" name="data0" id="' + vprefix + 'data0" value="' + urldata0.replace('&data=','') + '"></input>';
      meth="POST' target='iemailbig";
      if (1 == 2) divid='chart_div';
      formid='bigemailform';
      newfbit='<iframe style="display:none;" id="iemailbig" name="iemailbig" src="http://www.rjmprogramming.com.au/PHP/webviewemail.php?fget="></iframe>';
      qp='http://www.rjmprogramming.com.au/PHP/webviewemail.php';
      dtis=new Date();
      fnamesuffix0='itb' + Math.floor(Math.random() * 2000) + dtis.valueOf() + '.huh';
      fformsuffix0='<input type="hidden" name="bfname0" id="bfname0" value="' + fnamesuffix0 + '"></input>';
    }
    ourbae = document.getElementById(divid);
    ournewf = document.getElementById(formid);
    if (ourbae != null) {
     var qparts=urlin.split('?');
     if (eval(qparts.length) == 2) {
      var aparts=qparts[1].split('&');
      if (ournewf == null) {
        //var ds=document.URL.split('&data');
        var ds=urlin.split('&data');
        if (qp == '') qp=ds[0];
        if (eval(ds.length) > 1) {
         for (iy=1; iy<eval(ds.length); iy++) {
           dss=ds[iy].indexOf('&');
           if (dss != -1) qp+=ds[iy].substring(dss);
         }
        }
        if (1 == 2) newfbit+="<form style='display:none;' id='" + formid + "' method='" + meth + "' action='" + qparts[0] + "'>"; // "</form>";
        newfbit+="<form style='display:none;' id='" + formid + "' method='" + meth + "' action='" + qp + "'>"; // "</form>";
        for (ij=0; ij<aparts.length; ij++) {
         qns=aparts[ij].split('=');
         if (modeofuse == 'email' && qns[0] == 'data') {
           ynft='&data=' + qns[1];
           fdsuffix='';
         }
         if (modeofuse == 'email' && qns[0] == 'data0') {
           ynft0='&data0=' + qns[1];
           fd0suffix='';
         }
         newfbit+='<input type="hidden" name="' + qns[0] + '" value="' + (qns[1]) + '"></input>';
        }
        if (ynft0 == 'isunlikelyehwotzero' && urlin.indexOf('_diff.php') == -1) fformsuffix0='';
        newfbit+=fdsuffix + fd0suffix + fipsuffix + fformsuffix + fformsuffix0 + '<input type="submit" value="Post Long Values"></input></form>';
        if (modeofuse == 'email') {
         xnewfbit=newfbit;
         setTimeout(dobae, 300);
        } else {
          ourbae.innerHTML+=newfbit;
          ournewf = document.getElementById(formid);
        }
        if (modeofuse == 'email') {
          if (urlin.indexOf('&data') == -1 && urlin.indexOf('_diff.php') != -1) return urlin + '&data=' + fnamesuffix + '&data0=' + fnamesuffix0;
          if (urlin.indexOf('&data') == -1) return urlin + '&data=' + fnamesuffix;
          return urlin.replace(ynft, '&data=' + fnamesuffix).replace(ynft0, '&data0=' + fnamesuffix0);
        } else {
          ournewf.submit();
        }
      } else {
        for (ij=0; ij<aparts.length; ij++) {
         qns=aparts[ij].split('=');
         newfbit+='<input type="hidden" name="' + qns[0] + '" value="' + (qns[1]) + '"></input>';
        }
        if (ynft0 == 'isunlikelyehwotzero' && urlin.indexOf('_diff.php') == -1) fformsuffix0='';
        newfbit+=fdsuffix + fd0suffix + fipsuffix + fformsuffix + fformsuffix0 + '<input type="submit" value="Post Long Values"></input>';
        ournewf.innerHTML=newfbit;
        if (modeofuse == 'email') {
          toobigform=ournewf;
          if (urlin.indexOf('&data') == -1 && urlin.indexOf('_diff.php') != -1) return urlin + '&data=' + fnamesuffix + '&data0=' + fnamesuffix0;
          if (urlin.indexOf('&data') == -1) return urlin + '&data=' + fnamesuffix;
          return urlin.replace(ynft, '&data=' + fnamesuffix).replace(ynft0, '&data0=' + fnamesuffix0);
        } else {
          ournewf.submit();
        }
      }
     } else {
      return urlin;
     }
     return '#';
    } else {
     return urlin;
    }
  } 
}


setTimeout(gcinit, 2000);