/*
 * ul2finder
 * written by Christian Heilmann (http://icant.co.uk)
 * turns the nested list with the ID "finder" into a dynamic list
 * uses the CSS classes defined in the variables
 */
function ul2finder()
{
  // Define variables used and classes to be applied/removed
  var i,uls,als,finder;
  var parentClass='parent';
  var showClass='shown';
  var hideClass='hidden';
  var openClass='open';
  window.finderOpened = new Object();
  window.finderPrevious = null;

  // check if our finder list exists, if not, stop all activities
  finder=document.getElementById('finder');
  if(!finder){return;}

  // add the class domenabled to the body
  cssjs('add',document.body,'domenabled');

  // loop through all lists inside finder, position and hide them 
  // by applying the class hidden
  uls=finder.getElementsByTagName('ul');
  for(i=0;i<uls.length;i++)
  {
    cssjs('add',uls[i],hideClass);
  }	

  // loop through all links of inside finder
  lis=finder.getElementsByTagName('li');
  for(i=0;i<lis.length;i++)
  {
    // if the li containing the link has no nested list, skip this one
    if(!lis[i].getElementsByTagName('ul')[0])
    {
      continue;
    }
    var newa=document.createElement('a');
    newa.href='#';
    newa.appendChild(document.createTextNode(lis[i].firstChild.nodeValue));
    lis[i].replaceChild(newa,lis[i].firstChild);
    // otherwise apply the parent class
    cssjs('add',newa,parentClass);

    // setup the link
    ref = lis[i].getElementsByTagName('a')[0];
    ref.id = 'finder[' + i + ']';
    window.finderOpened[ref.id] = false;

    // if the user clicks on the link
    ref.onclick=function()
    {
      // loop through all lists inside finder
      ul = this.parentNode.getElementsByTagName('ul')[0];
      for(var i=0;i<uls.length;i++)
      {
        // check if it's connected to this link
        var found=false;
        if (isparent(ul, uls[i]) || isparent(uls[i],ul)) {
          found=true;
        }

        // hide elements
        if(!found || window.finderOpened[this.id] == true)
        {
          ref = uls[i].parentNode.getElementsByTagName('a')[0];
          if (ref != this && !isparent(uls[i],ul)) {
            window.finderOpened[ref.id] = false;
            ref.innerHTML = false;
            cssjs('add',uls[i],hideClass);
            cssjs('remove',uls[i],showClass);
            cssjs('remove',ref,openClass);
            cssjs('add',ref,parentClass);
          }
        }
      }	

      uls = this.parentNode.getElementsByTagName('ul');
      if (window.finderOpened[this.id] == false) {
        window.finderOpened[this.id] = true;
        // change the current link from parent to open 	
        // and show the current nested list 
        cssjs('remove',this,parentClass);
        cssjs('add',this,openClass);
        cssjs('add',uls[0],showClass);
      } else {
        window.finderOpened[this.id] = false;
        // change the current link from open to parent
        // and hide the current nested list 
        cssjs('add',this,parentClass);
        cssjs('remove',this,openClass);
        for(var u=0;u<uls.length;u++) {
          cssjs('remove',uls[u],showClass);
        }
      }

      // hide the previously opened element
      if (window.finderPrevious != this.id && window.finderPrevious != null) {
        previous = document.getElementById(window.finderPrevious);
        uls = previous.parentNode.getElementsByTagName('ul');
        current = this.parentNode.getElementsByTagName('ul')[0];
        if (!isparent(uls[0],current) && !isparent(current,uls[0])) {
          uls = previous.parentNode.getElementsByTagName('ul');
          window.finderOpened[previous.id] = false;
          // change the current link from open to parent
          // and hide the current nested list 
          cssjs('add',previous,parentClass);
          cssjs('remove',previous,openClass);
          for(var t=0;t<uls.length;t++) {
            cssjs('remove',uls[t],showClass);
          }
          previous.innerHTML = window.finderOpened[previous.id];
        }
      }

      window.finderPrevious = this.id;
      this.innerHTML = window.finderOpened[this.id];
      // don't follow the real HREF of the link
      return false;
    }
  }	
  function isparent(par, child) {
    if ($(child).parents().index(par) >= 0) {
      return true;
    }
    return false;
  }
  function isparent_std(par, child) {
    if (par == child) {
      return true;
    } else if (par.hasChildNodes()) {
      children = par.childNodes;
      for (var i=0;i<children.length;i++) {
        if (children[i] == child || isparent(children[i], child)) {
          return true;
        }
      }
    }
    return false;
  }
  /*
   * cssjs
   * written by Christian Heilmann (http://icant.co.uk)
   * eases the dynamic application of CSS classes via DOM
   * parameters: action a, object o and class names c1 and c2 (c2 optional)
   * actions: swap exchanges c1 and c2 in object o
   *			add adds class c1 to object o
   *			remove removes class c1 from object o
   *			check tests if class c1 is applied to object o
   * example:	cssjs('swap',document.getElementById('foo'),'bar','baz');
   */
  function cssjs(a,o,c1,c2)
  {
    switch (a){
      case 'swap':
        o.className=!cssjs('check',o,c1)?o.className.replace(c2,c1):o.className.replace(c1,c2);
        break;
      case 'add':
        if(!cssjs('check',o,c1)){o.className+=o.className?' '+c1:c1;}
        break;
      case 'remove':
        var rep=o.className.match(' '+c1)?' '+c1:c1;
        o.className=o.className.replace(rep,'');
        break;
      case 'check':
        return new RegExp('\\b'+c1+'\\b').test(o.className)
          break;
    }
  }
}

// Check if the browser supports DOM, and start the script if it does.
if(document.getElementById && document.createTextNode)
{
  window.onload=ul2finder;
}