// macos_say_record.js
// RJM Programming
// Help get, to work, MAMP URLs like HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say%20hello%20there

 var wo_ismsr=null;
 var wmsrcd=false;
 var minusvmsr='';
 var icountmsr=0, jcountmsr=0;
 var connectionmsr=true;

 function cmgdafmsr() {
    if (event.target.outerHTML.indexOf(' data-foundcommentary=') > event.target.outerHTML.indexOf('<') && event.target.outerHTML.indexOf(' data-foundcommentary=') < event.target.outerHTML.indexOf('>')) {
     wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say' + encodeURIComponent(minusvmsr) + '%20' + encodeURIComponent(event.target.getAttribute('data-foundcommentary')), 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
     return true;
   } else if (event.target.outerHTML.indexOf(' data-commentary=') > event.target.outerHTML.indexOf('<') && event.target.outerHTML.indexOf(' data-commentary=') < event.target.outerHTML.indexOf('>')) {
     wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say' + encodeURIComponent(minusvmsr) + '%20' + encodeURIComponent(event.target.getAttribute('data-commentary')), 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
     return true;
    }   
    return false; 
 }
  
 function cmfmsr() {
   if (!cmgdafmsr()) {
   if (('' + event.target.title) != '') {
     wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say' + encodeURIComponent(minusvmsr) + '%20Title%20is%20' + encodeURIComponent(event.target.title), 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
     //alert('Title=' + String.fromCharCode(10) + event.target.title);
   } else if (('' + event.target.value).replace(/^undefined$/g,'').replace(/^null$/g,'') != '') {
     wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say' + encodeURIComponent(minusvmsr) + '%20Value%20is%20' + encodeURIComponent(event.target.value), 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
     //alert('Value=' + String.fromCharCode(10) + event.target.value);
   } else if (('' + event.target.outerHTML).indexOf('><') == -1 && ('' + event.target.outerHTML).indexOf('</') != -1) {
     wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andclose=y&docronwork=say' + encodeURIComponent(minusvmsr) + '%20InnerHTML%20is%20' + encodeURIComponent((event.target.innerText || event.target.contentWindow || event.target.contentDocument)), 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
     //alert('InnerHTML=' + String.fromCharCode(10) + event.target.innerHTML);
   } else {
     console.log('OuterHTML=' + String.fromCharCode(10) + event.target.outerHTML);
   }
   }
 }
 
 function qfmsr(invmsr) {
   minusvmsr=' -v ' + invmsr.split(String.fromCharCode(32))[1] + ' ';
   document.getElementById('msrae').click();
 }
  
 function locopencheck() {
   if (wo_ismsr) {
   //alert(10);
     if (!wo_ismsr.closed && !wmsrcd) {
       wo_ismsr.close();
       wo_ismsr=null;
       if (connectionmsr) {
       document.getElementById('msrae').title='Click here so that right click or two finger gesture around webpage performs macOS say audio commentary on target HTML elements.   If, on trying that with an underlying macOS or Mac OS X operating system maybe you need to download macos_say_record.php to MAMP Document Root.';
       document.getElementById('msrae').style.textShadow='-4px 4px 6px #ff2d95;';
       document.getElementById('msrae').style.backgroundColor='lightgreen';
       var xsmsr='<select style="display:inline-block;height:30px;width:170px;" onchange="if (this.value.trim().length != 0) {  qfmsr(this.value);   }" ';
       xsmsr+=' id="svoicecode"><option value=" ">Optionally select voice name to suit ...</option><option value="en_US Alex">Alex en_US Most people recognize me by my voice.</option><option value="en_GB Daniel">Daniel en_GB Hello, my name is Daniel. I am a British-English voice.</option><option value="en_scotland Fiona">Fiona en_scotland Hello, my name is Fiona. I am a Scottish-English voice.</option><option value="en_US Fred">Fred en_US I sure like being inside this fancy computer</option><option value="en_AU Karen">Karen en_AU Hello, my name is Karen. I am an Australian-English voice.</option><option value="en_IE Moira">Moira en_IE Hello, my name is Moira. I am an Irish-English voice.</option><option value="en_US Samantha">Samantha en_US Hello, my name is Samantha. I am an American-English voice.</option><option value="en_ZA Tessa">Tessa en_ZA Hello, my name is Tessa. I am a South African-English voice.</option><option value="en_IN Veena">Veena en_IN Hello, my name is Veena. I am an Indian-English voice.</option><option value="en_US Victoria">Victoria en_US Is not it nice to have a computer that will talk to you?</option><option value="ar_SA Maged">Maged ar_SA مرحبًا اسمي Maged. أنا عربي من السعودية.</option><option value="cs_CZ Zuzana">Zuzana cs_CZ Dobrý den, jmenuji se Zuzana. Jsem český hlas.</option><option value="da_DK Sara">Sara da_DK Hej, jeg hedder Sara. Jeg er en dansk stemme.</option><option value="de_DE Anna">Anna de_DE Hallo, ich heiße Anna und ich bin eine deutsche Stimme.</option><option value="el_GR Melina">Melina el_GR Γεια σας, ονομάζομαι Melina. Είμαι μια ελληνική φωνή.</option><option value="es_AR Diego">Diego es_AR Hola, me llamo Diego y soy una voz española.</option><option value="es_ES Jorge">Jorge es_ES Hola, me llamo Jorge y soy una voz española.</option><option value="es_MX Juan">Juan es_MX Hola, me llamo Juan y soy una voz mexicana.</option><option value="es_ES Monica">Monica es_ES Hola, me llamo Monica y soy una voz española.</option><option value="es_MX Paulina">Paulina es_MX Hola, me llamo Paulina y soy una voz mexicana.</option><option value="fi_FI Satu">Satu fi_FI Hei, minun nimeni on Satu. Olen suomalainen ääni.</option><option value="fr_CA Amelie">Amelie fr_CA Bonjour, je m’appelle Amelie. Je suis une voix canadienne.</option><option value="fr_FR Thomas">Thomas fr_FR Bonjour, je m’appelle Thomas. Je suis une voix française.</option><option value="he_IL Carmit">Carmit he_IL שלום. קוראים לי כרמית, ואני קול בשפה העברית.</option><option value="hi_IN Lekha">Lekha hi_IN नमस्कार, मेरा नाम लेखा है. मैं हिन्दी में बोलने वाली आवाज़ हूँ.</option><option value="hu_HU Mariska">Mariska hu_HU Üdvözlöm! Mariska vagyok. Én vagyok a magyar hang.</option><option value="id_ID Damayanti">Damayanti id_ID Halo, nama saya Damayanti. Saya berbahasa Indonesia.</option><option value="it_IT Alice">Alice it_IT Salve, mi chiamo Alice e sono una voce italiana.</option><option value="it_IT Luca">Luca it_IT Salve, mi chiamo Luca e sono una voce italiana.</option><option value="ja_JP Kyoko">Kyoko ja_JP こんにちは、私の名前はKyokoです。日本語の音声をお届けします。</option><option value="ko_KR Yuna">Yuna ko_KR 안녕하세요. 제 이름은 Yuna입니다. 저는 한국어 음성입니다.</option><option value="nl_BE Ellen">Ellen nl_BE Hallo, mijn naam is Ellen. Ik ben een Belgische stem.</option><option value="nl_NL Xander">Xander nl_NL Hallo, mijn naam is Xander. Ik ben een Nederlandse stem.</option><option value="pl_PL Zosia">Zosia pl_PL Witaj. Mam na imię Zosia, jestem głosem kobiecym dla języka polskiego.</option><option value="pt_PT Joana">Joana pt_PT Olá, chamo-me Joana e dou voz ao português falado em Portugal.</option><option value="pt_BR Luciana">Luciana pt_BR Olá, o meu nome é Luciana e a minha voz corresponde ao português que é falado no Brasil</option><option value="ro_RO Ioana">Ioana ro_RO Bună, mă cheamă Ioana . Sunt o voce românească.</option><option value="ru_RU Milena">Milena ru_RU Здравствуйте, меня зовут Milena. Я – русский голос системы.</option><option value="ru_RU Yuri">Yuri ru_RU Здравствуйте, меня зовут Yuri. Я – русский голос системы.</option><option value="sk_SK Laura">Laura sk_SK Ahoj. Volám sa Laura . Som hlas v slovenskom jazyku.</option><option value="sv_SE Alva">Alva sv_SE Hej, jag heter Alva. Jag är en svensk röst.</option><option value="th_TH Kanya">Kanya th_TH สวัสดีค่ะ ดิฉันชื่อKanya</option><option value="tr_TR Yelda">Yelda tr_TR Merhaba, benim adım Yelda. Ben Türkçe bir sesim.</option><option value="zh_TW Mei-Jia">Mei-Jia zh_TW 您好，我叫美佳。我說國語。</option><option value="zh_HK Sin-ji">Sin-ji zh_HK 您好，我叫 Sin-ji。我講廣東話。</option><option value="zh_CN Ting-Ting">Ting-Ting zh_CN 您好，我叫Ting-Ting。我讲中文普通话。</option></select>';
       document.getElementById('spansel').innerHTML=xsmsr;
   //alert(110);
       }
     } else {
       wo_ismsr.close();
       wo_ismsr=null;
   //alert(1110);
     }
   //} else {
   //alert(11110);
   }
 }
 
 function dostuffmsr() {
   var relstrmsr='', exctheremsr=false;
   var iels=0, jels=0, kels=0;
   var elsare=document.getElementsByTagName('*');
   //commentary_array=['.tbanner', 'Tbanner is class', '.bbanner', 'Bbanner is class'];
   for (iels=0; iels<elsare.length; iels++) {
       //console.log(typeof(commentary_array));
     exctheremsr=false;
     if (typeof(commentary_array) === 'object') {
       console.log('yes, array');
       for (jels=0; jels<commentary_array.length; jels+=2) {
         if (commentary_array[jels].trim() != '') {
           if (commentary_array[jels].trim().substring(0,1) == '.') {
             relstrmsr='';
             if (elsare[iels].outerHTML.indexOf(' class="') > elsare[iels].outerHTML.indexOf('<') && elsare[iels].outerHTML.indexOf(' class="') < elsare[iels].outerHTML.indexOf('>')) {
               relstrmsr=' ' + elsare[iels].outerHTML.split(' class="')[1].split('"')[0] + ' ';
             }
             if (relstrmsr.indexOf(' ' + commentary_array[jels].substring(1) + ' ') != -1) {
               elsare[iels].setAttribute('data-foundcommentary', commentary_array[eval(1 + eval('' + jels))]);
               elsare[iels].addEventListener("contextmenu", cmgdafmsr, false);
               exctheremsr=true;
        console.log('yes more, array');
            }
           } else if (commentary_array[jels].trim().substring(0,1) == '#') {
             relstrmsr='';
             if (elsare[iels].outerHTML.indexOf(' id="') > elsare[iels].outerHTML.indexOf('<') && elsare[iels].outerHTML.indexOf(' id="') < elsare[iels].outerHTML.indexOf('>')) {
               relstrmsr=' ' + elsare[iels].outerHTML.split(' id="')[1].split('"')[0] + ' ';
             }
             if (relstrmsr.indexOf(' ' + commentary_array[jels].substring(1) + ' ') != -1) {
               elsare[iels].setAttribute('data-foundcommentary', commentary_array[eval(1 + eval('' + jels))]);
               elsare[iels].addEventListener("contextmenu", cmgdafmsr, false);
               exctheremsr=true;
        console.log('yes more, Array');
             }
           } else {
             relstrmsr='';
             if (elsare[iels].outerHTML.indexOf(commentary_array[jels]) == 1) {
               if (elsare[iels].outerHTML.indexOf(commentary_array[jels] + ' ') == 1) {
                 elsare[iels].setAttribute('data-foundcommentary', commentary_array[eval(1 + eval('' + jels))]);
                 elsare[iels].addEventListener("contextmenu", cmgdafmsr, false);
                 exctheremsr=true;
        console.log('yes More, array');
               } else if (elsare[iels].outerHTML.indexOf(commentary_array[jels] + '>') == 1) {
                 elsare[iels].setAttribute('data-foundcommentary', commentary_array[eval(1 + eval('' + jels))]);
                 elsare[iels].addEventListener("contextmenu", cmgdafmsr, false);
                 exctheremsr=true;
        console.log('Yes more, array');
               }
             }
           }
         }
       }
     }
     if (exctheremsr || (elsare[iels].outerHTML.indexOf(' data-foundcommentary=') > elsare[iels].outerHTML.indexOf('<') && elsare[iels].outerHTML.indexOf(' data-foundcommentary=') < elsare[iels].outerHTML.indexOf('>'))) {
       iels=iels;
     } else if (elsare[iels].outerHTML.indexOf(' data-commentary=') > elsare[iels].outerHTML.indexOf('<') && elsare[iels].outerHTML.indexOf(' data-commentary=') < elsare[iels].outerHTML.indexOf('>')) {
       elsare[iels].addEventListener("contextmenu", cmgdafmsr, false);
     } else {
       elsare[iels].addEventListener("contextmenu", cmfmsr, false);
     }
   }
 }
 
 function huhmsr() {
   document.getElementById('msrae').style.display='none';
   document.getElementById('spansel').style.display='none';
 }
 
function checkmsr(iois) {
  var sfsg=false;
  if (iois != null) {
    var aconto = (iois.contentWindow || iois.contentDocument);
    //console.log(11);
    if (aconto != null) {
    //console.log(navigator.platform);
     if (iois.src.indexOf('localhost') != -1 && navigator.platform.indexOf("Mac") === 0) { sfsg=true; }
     if (!sfsg && iois.src.indexOf('localhost') != -1) {             
           wo_ismsr.close(); //document.getElementById('macos').style.display='inline-block';
           wmsrcd=true;
     }
     try {
     //if (iois.src.indexOf('/intranet_access_count.php') != -1) {  console.log('aconto=' + aconto);  }
     if (aconto.document) { aconto = aconto.document; }
     //if (iois.src.indexOf('/intranet_access_count.php') != -1) { icountmsr=(aconto.body.innerText || aconto.body.contentWindow || aconto.body.contentDocument); if (jcountmsr == 0) { jcountmsr=icountmsr;   } else if (eval(icountmsr - jcountmsr) < 2) {  connectionmsr=false;  }  console.log('icountmsr,jcountmsr=' + icountmsr + ',' + jcountmsr);  }
    //console.log(1111);
     if (aconto.body != null) {
    //console.log(2);
      if (aconto.body.innerHTML.indexOf('>') != -1) {
    //console.log(3);
       if (iois.src.indexOf(':8888/') != -1) {
    //console.log(4);
        //if (document.URL.indexOf('via=parenthtml') != -1) {
    //console.log(5);
         if (aconto.body.innerHTML.toLowerCase().indexOf('not found') == -1) {
           wo_ismsr.close(); //document.getElementById('macos').style.display='inline-block';
           wmsrcd=true;
         }
        }
       //}
      }
     }
     } catch(exxx) {
     console.log(exxx.message);
     //wo_ismsr.close(); //alert(exxx.message);
     //wmsrcd=true;
     }
    }
  }
}
 
function checkjmsr(iois) {
  var sfsg=false;
  if (iois != null) {
    var aconto = (iois.contentWindow || iois.contentDocument);
    console.log(11);
    if (aconto != null) {
    console.log(navigator.platform);
     try {
     if (iois.src.indexOf('/intranet_access_count.php') != -1) {  console.log('aconto=' + aconto);  }
     if (aconto.document) { aconto = aconto.document; }
     if (iois.src.indexOf('/intranet_access_count.php') != -1) { icountmsr=(aconto.body.innerText || aconto.body.contentWindow || aconto.body.contentDocument); if (jcountmsr == 0) { jcountmsr=icountmsr;   } else if (eval(icountmsr - jcountmsr) < 2) {  connectionmsr=false;  }  console.log('icountmsr,jcountmsr=' + icountmsr + ',' + jcountmsr);  }
    console.log(1111);
     if (aconto.body != null) {
    console.log(2);
      if (aconto.body.innerHTML.indexOf('>') != -1) {
    console.log(3);
       if (iois.src.indexOf(':8888/') != -1) {
    console.log(4);
        //if (document.URL.indexOf('via=parenthtml') != -1) {
    console.log(5);
         if (aconto.body.innerHTML.toLowerCase().indexOf('not found') == -1) {
           wo_ismsr.close(); //document.getElementById('macos').style.display='inline-block';
           wmsrcd=true;
         }
        }
       //}
      }
     }
     } catch(exxx) {
     console.log(exxx.message);
     //wo_ismsr.close(); //alert(exxx.message);
     //wmsrcd=true;
     }
    }
  }
}

 function konlmsr() {
    document.getElementById('jfh').src='//www.rjmprogramming.com.au/intranet_access_count.php?rand=' + Math.floor(Math.random() * 198767543);
    setTimeout(locopencheck, 2500);
    setTimeout(huhmsr, 29000);
 }

 function jonlmsr() {
    wo_ismsr=window.open('HTTP://localhost:8888/macos_say_record.php?andsoonclose=y&docronwork=ls', 'ifh', 'top=50,left=50,width=500,height=500'); //'_blank', 'top=50,left=50,width=500,height=500');
    setTimeout(konlmsr, 500);
 }

 function onlmsr() {
    if (document.body) {
    document.body.innerHTML+="<iframe id=ifh name=ifh onload=checkmsr(this); style=display:none; src='//www.rjmprogramming.com.au/About_Us.html'></iframe><iframe id=jfh name=jfh onload=checkjmsr(this); style=display:none; src='//www.rjmprogramming.com.au/intranet_access_count.php'></iframe><a title='Download macos_say_record.php to macOS or Mac OS X MAMP Document Root' onclick=dostuffmsr(); style='position:absolute;z-index:5643;opacity:0.5;top:0px;left:0px;background-color:yellow;' id=msrae>&#128172;</a><span id=spansel style='position:absolute;z-index:5643;opacity:0.5;top:0px;left:30px;background-color:yellow;'></span>";
    setTimeout(jonlmsr, 1900);
    } else {
    setTimeout(onlmsr, 1000);
    }
 }
 
 setTimeout(onlmsr, 2000);