//
// kscript.js
//
// dit is het KINDERscript in de hoofddirectory van de site
//


var ijkspreuk = "foekefoekerommelpot";
// door frameset te kopiëren in toverspreuk,
// kinderen testen op parent.toverspreuk == ijkspreuk


var verdieping = 0;
// moet op 1 worden gezet door kinderen in subdirs,
// 2 in subsubdirs, etc.


function posLaatstePadscheider(pad)
// retourneert laatste index van / of \ in string pad
{
   var islash = pad.lastIndexOf("/");
   var ibackslash = pad.lastIndexOf("\\");
   return islash > ibackslash ? islash : ibackslash;
}


function bestnaam(pad)
// als pad een padstring is, retourneert bestnaam het deel na de laatste
// slash of backslash (dus een lege string als pad op / of \ eindigt)
{
   var i = posLaatstePadscheider(pad);
   return pad.substring(i+1);
}


function dirbestnaam(pad)
// als pad een padstring is, retourneert dirbestnaam het deel na de 
// voorlaatste slash of backslash
{
   var i = posLaatstePadscheider(pad);
   var ouderpad = pad.substring(0,i);
   var j = posLaatstePadscheider(ouderpad);
   return pad.substring(j+1);
}


function dirnaam(pad)
// als pad een padstring is, retourneert dirnaam het deel tussen de 
// voorlaatste (back)slash en de laatste (back)slash
{
   var i = posLaatstePadscheider(pad);
   var ouderpad = pad.substring(0,i);
   var j = posLaatstePadscheider(ouderpad);
   return pad.substring(j+1,i);
}


function testparent()
// LET OP: 
// Als er subdirnivo's > 1 ontstaan, werkt de voorlaatste regel van
// testparent() niet meer goed! Het beste is dan om dirbestnaam zo
// te veralgemenen dat zij, adhv de verdieping, meteen de juiste
// string levert.
{
   if (parent.toverspreuk && parent.toverspreuk == ijkspreuk)
   {
     if (!wilframes) parent.location.replace(self.location);
   }
   else if (wilframes)
   {
      var pad = window.location.pathname;
      var prefix = "";
      for (i=0; i < verdieping; i++) prefix += "../";
      var verwijzing = verdieping == 1 ? dirbestnaam(pad) : bestnaam(pad);
      if (!verwijzing.length) {
			  verwijzing = "index.html";
			}
      location.replace(prefix + "frameset.html?dok=" + verwijzing);
   }
}


function mailbrokken () {
  var url = "ma";
  url += "ilto";
  url += ":";
  for (var i = 0; i < arguments.length; ++i) url += arguments[i];
  location.replace(url);
}

function mailto4(s1, s2, s3, s4) {
  location.replace('mailto:' + s1 + s2 + s3 + s4);
}

function mailpaul() {
  url = "mailt";
	url += "o:paul";
	url += "@v";
	url += "inkenoog.";
	url += "nl";
  location.replace(url);
}


function mailhenk() {
  url = "mailt";
	url += "o:h.bergman";
	url += "@ti";
	url += "p.";
	url += "nl";
  location.replace(url);
}


function mailjack() {
  url = "mailt";
	url += "o:jack";
	url += "@aann";
	url += "owee.my";
	url += "web.nl";
  location.replace(url);
}


function plaatsFlikje(naam, waarde, verloopdatum) 
{
   document.cookie = naam + "=" + escape(waarde)
      + ((verloopdatum == null) ? "" : ("; expires=" + verloopdatum.toGMTString()));
}


function leesFlikje(naam) 
// retourneert lege string als koekie niet gevonden, anders waarde bij naam
{
   var resultaat = "";
   var naamIs = naam + "=";
   if (document.cookie.length > 0)
   { 
      var istart = document.cookie.indexOf(naamIs);
      if (istart != -1) 
      {
         istart += naamIs.length;
         istop = document.cookie.indexOf(";", istart); 
         if (istop == -1) 
            istop = document.cookie.length;
         resultaat = unescape(document.cookie.substring(istart, istop));
      } 
   }
   return resultaat;
}


var wilframes = true;


var framesFlikje = leesFlikje("Frames1001");
if (framesFlikje == "ja")
  wilframes = true;
else if (framesFlikje == "nee")
  wilframes = false;


if (self.location.search == "?frames=nee")
  wilframes = false;
else if (self.location.search == "?frames=ja")
  wilframes = true;


testparent();