// cookie_get.js
// RJM Programming
// January, 2017
// Generic cookie functionality for use with games at RJM Programming

var globalcookiescount=0;
var globalcookies=[];
var divglobalthere=false;
var relevantglobalcookies=[];
var relevantglobalcookiesasoptions="";

function cookiemappingsto(tothis) {
  return tothis.replace(/\=/g,"|");
}


function cookiemappingsfrom(fromthis) {
  return fromthis.replace(/\|/g,"=");
}

function saveGlobalCookie() {
  var expiredate = new Date();
  var thename = "";
  if (document.URL.indexOf('?') != -1) {
   thename = document.URL.split('#')[0].split('?')[0].split('/')[eval(-1 + document.URL.split('#')[0].split('?')[0].split('/').length)].replace(/\./g,'~');
   thename += '_' + (expiredate.toLocaleDateString() + '-' + expiredate.toLocaleTimeString()).replace(/\//g,'-').replace(/:/g,'-').replace(/\ /g,'-');
   expiredate.setYear(expiredate.getFullYear()+1);
   if (recallRelevantGlobalCookies("?" + cookiemappingsto(document.URL.split('#')[0].split('?')[1])) == 0) {
     //deleteAllRelevantGlobalCookies('');
     document.cookie = thename + "=?" + cookiemappingsto(document.URL.split('#')[0].split('?')[1]) + ";expires=" + expiredate.toGMTString() + ';path=/';
   }
  }
}


function recallRelevantGlobalCookies(exactone) {  // thanks to http://stackoverflow.com/questions/179355/clearing-all-cookies-with-javascript
    var cnameisg, eqPos, eqn=1, cookie, cookies = document.cookie.split("; ");
    var thename = document.URL.split('#')[0].split('?')[0].split('/')[eval(-1 + document.URL.split('#')[0].split('?')[0].split('/').length)].replace(/\./g,'~') + '_';

    relevantglobalcookies=[];
    relevantglobalcookiesasoptions="";
    for (var i = 0; i < cookies.length; i++) {
        cookie = cookies[i];
        eqPos = cookie.indexOf("=");
        if (thename == '_') eqn = cookie.indexOf("=?");
        cnameisg = eqPos > -1 ? cookie.substr(0, eqPos) : cookie;
        if (cnameisg.indexOf(thename) == 0 && eqn != -1 && exactone.trim() != '') {
         if (cookie.substr(eval(1 + eqPos)) != exactone) eqn=-1; 
        }
        if (cnameisg.indexOf(thename) == 0 && eqn != -1 && cookie.length > eval(1 + eqPos)) {
          relevantglobalcookies.push(cookiemappingsfrom(cookie.substr(eval(1 + eqPos)))); 
          if (relevantglobalcookiesasoptions.length == 0) {
           relevantglobalcookiesasoptions = "<option value='" + document.URL.split('#')[0].split('?')[0] + cookiemappingsfrom(cookie.substr(eval(1 + eqPos))) + "'>" + cnameisg.substr(thename.length) + "</option>";
          } else {
           relevantglobalcookiesasoptions = relevantglobalcookiesasoptions.replace("<option ","<option value='" + document.URL.split('#')[0].split('?')[0] + cookiemappingsfrom(cookie.substr(eval(1 + eqPos))) + "'>" + cnameisg.substr(thename.length) + "</option><option ");
          }
        } 
        eqn=1;
    }
    return relevantglobalcookies.length;
}


function deleteAllRelevantGlobalCookies(exactone) {  // thanks to http://stackoverflow.com/questions/179355/clearing-all-cookies-with-javascript
    var cnameisg, eqPos, eqn=1, cookie, cookies = document.cookie.split("; ");
    var thename = document.URL.split('#')[0].split('?')[0].split('/')[eval(-1 + document.URL.split('#')[0].split('?')[0].split('/').length)].replace(/\./g,'~') + '_';
        //alert("TheName=" + thename);
    var expiredate = new Date();
    expiredate.setYear(expiredate.getFullYear()-20);
        //alert("Thename=" + thename);

    for (var i = 0; i < cookies.length; i++) {
        cookie = cookies[i];
        eqPos = cookie.indexOf("=");
        //eqn = cookie.indexOf("=?");
        cnameisg = eqPos > -1 ? cookie.substr(0, eqPos) : cookie;
        if (thename == '_') eqn = cookie.indexOf("=?");
        cnameisg = eqPos > -1 ? cookie.substr(0, eqPos) : cookie;
        if (cnameisg.indexOf(thename) == 0 && eqn != -1 && exactone.trim() != '') {
         if (cookie.substr(eval(1 + eqPos)) != exactone) eqn=-1; 
        }
        if (cnameisg.indexOf(thename) == 0 && eqn != -1) {
          //alert(cnameisg + "=;expires=" + expiredate.toGMTString() + ' where cnameisg=' + cnameisg + ' and thename=' + thename + ' and eqn=' + eqn + ' and ' + expiredate.toGMTString());
          document.cookie = cnameisg + "=;path=/;expires=" + expiredate.toGMTString();
        } 
        eqn=1;
    }
}


function deleteAllGlobalCookies() {  // thanks to http://stackoverflow.com/questions/179355/clearing-all-cookies-with-javascript
    var cnameisg, eqPos, eqn, cookie, cookies = document.cookie.split("; ");
    var expiredate = new Date();
    expiredate.setYear(expiredate.getFullYear()-20);

    for (var i = 0; i < cookies.length; i++) {
        cookie = cookies[i];
        eqPos = cookie.indexOf("=");
        eqn = cookie.indexOf("=?");
        cnameisg = eqPos > -1 ? cookie.substr(0, eqPos) : cookie;
        if (eqn != -1) {
          document.cookie = cnameisg + "=;expires=" + expiredate.toGMTString();
        } 
    }
}

function howManyGlobalCookies() {
    globalcookies = document.cookie.split("; ");
    globalcookiescount = globalcookies.length;
    if (globalcookiescount == 1) {
     if (globalcookies[0] == '') globalcookiescount--;
    }
    return globalcookiescount;
}

function lookforokconditions() {
  if (document.getElementById('dcookies_okay')) {
    divglobalthere=true;
  }
  if (document.getElementById('cookies_okay')) {
    if (document.getElementById('cookies_okay').value == '') {
      if (document.URL.indexOf('&') != -1) {
        saveGlobalCookie();
      }
      if (recallRelevantGlobalCookies('') > 0) {
        if (divglobalthere) {
         document.getElementById('dcookies_okay').style.position='absolute';
         document.getElementById('dcookies_okay').style.zIndex=56;
         document.getElementById('dcookies_okay').style.top='0px';
         document.getElementById('dcookies_okay').style.left='400px';
         document.getElementById('dcookies_okay').style.opacity=0.7;
         document.getElementById('dcookies_okay').innerHTML="<select id='cooselkies' onchange=' if (this.value.length != 0) { if (this.value.length == 1) { deleteAllRelevantGlobalCookies(\"\"); this.innerHTML=\"\"; } else { location.href=this.value; } } '><option value=>Optionally select a Cookie Game Snapshot below ...</option><option value=x>Delete All Relevant Cookies</option>" + relevantglobalcookiesasoptions + "</select>";
        }
      }
    //} else {
    }
  }
}

setTimeout(lookforokconditions, 1000);