/* Collection & code Copyright (c) Joseph Wolff 2007 All Rights Reserved */
/* Released under GPL; other licenses also available, see COPYING and COPYRIGHT */
/* Portions inspired by / borrowed from: Tim Morgan/1kDOM/ajax/tooltip libraries, Ben Nolan/Simon Willison/Behaviour */

// 1K DOM API
d=document;
dE=d.documentElement;
//dB=d.body; // can't set until after load!
debug=false;
function dW(t){d.writeln(t)};
function gE(e){return d.getElementById(e)};
function cE(t){return d.createElement(t||'div')};
function aC(e,p){return (p||d.body).appendChild(e)};
function eH(e){return e.offsetHeight};
function eW(e){return e.offsetWidth};
function sE(e){e.style.visibility='visible'};
function hE(e){e.style.visibility='hidden'};
function sZ(e,z){e.style.zIndex=z};
function sX(e,x){e.style.left=px(x)};
function sY(e,y){e.style.top=px(y)};
function sW(e,w){e.style.width=px(w)};
function sH(e,h){e.style.height=px(h)};
function sC(e,t,r,b,l){e.style.clip='rect('+t+' '+r+' '+b+' '+l+')'};
function wH(e,h){e.innerHTML=h};
function sB(e,b){e.style.background=b};
function aE(e,ev,f){ev=ev.replace(/^(on)?/,'on');if(!e[ev+'c'])e[ev+'c']=[];e[ev+'c'][e[ev+'c'].length]=f;if(!e[ev])e[ev]=function(v){v=v||event;if(!v.currentTarget)v.currentTarget=e;if(!v.target)v.target=v.currentTarget;for(i=0;i<e[ev+'c'].length;i++)e[ev+'c'][i](v)}};
function px(n){return(typeof n=='string')?n:n+'px'};

// ajax library
function $(e){if(typeof e=='string')e=document.getElementById(e);return e};
function collect(a,f){var n=[];for(var i=0;i<a.length;i++){var v=f(a[i]);if(v!=null)n.push(v)}return n};

ajax={};
ajax.x=function(){try{return new ActiveXObject('Msxml2.XMLHTTP')}catch(e){try{return new ActiveXObject('Microsoft.XMLHTTP')}catch(e){return new XMLHttpRequest()}}};
ajax.serialize=function(f){var g=function(n){return f.getElementsByTagName(n)};var nv=function(e){if(e.name)return encodeURIComponent(e.name)+'='+encodeURIComponent(e.value);else return ''};var i=collect(g('input'),function(i){if((i.type!='radio'&&i.type!='checkbox')||i.checked)return nv(i)});var s=collect(g('select'),nv);var t=collect(g('textarea'),nv);return i.concat(s).concat(t).join('&');};
ajax.send=function(u,f,m,a){var x=ajax.x();x.open(m,u,true);x.onreadystatechange=function(){if(x.readyState==4)f(x.responseText)};if(m=='POST')x.setRequestHeader('Content-type','application/x-www-form-urlencoded');x.setRequestHeader('Cache-Control', 'no-cache, must-revalidate');x.setRequestHeader('X_REQUESTED_WITH', 'XMLHttpRequest');x.send(a)};
//A date in the past :  header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
ajax.get=function(url,func){ajax.send(url,func,'GET')};
ajax.gets=function(url){var x=ajax.x();x.open('GET',url,false);x.setRequestHeader('X_REQUESTED_WITH', 'XMLHttpRequest');x.send(null);return x.responseText};
ajax.post=function(url,func,args){ajax.send(url,func,'POST',args)};
ajax.postupdate=function(url,elm,args){var e=$(elm);var f=function(r){e.innerHTML=r;Behaviour.apply()};ajax.post(url,f,args)};
ajax.postupdatea=function(url,elm,args){var e=$(elm);var f=function(r){e.innerHTML+=r;Behaviour.apply()};ajax.post(url,f,args)}; // appends to elm
ajax.update=function(url,elm){var e=$(elm);var f=function(r){e.innerHTML=r};ajax.get(url,f)};
ajax.submit=function(url,elm,frm){var e=$(elm);var f=function(r){e.innerHTML=r};ajax.post(url,f,ajax.serialize(frm))};
ajax.submita=function(url,elm,frm){var e=$(elm);var f=function(r){e.innerHTML+=r};ajax.post(url,f,ajax.serialize(frm))}; // appends to elm

var multupd = function (r)
{ eval ('aa='+r);
  for (var i in aa)
  { e = gE (i); 
    wH (e, aa [i]);
  }
};

ajax.submitf=function(url,frm,fnc){ajax.post(url,fnc,ajax.serialize(frm))};
ajax.submitm=function(url,frm){ajax.post(url,multupd,ajax.serialize(frm))};


// tooltip library:
// either declare a tltp item in your css, or uncomment this:
d.write('<style type="text/css">#tltp{ position:absolute; z-index:5; visibility:hidden; border:1px dotted #666; padding:2px; background-color:#ccc; font:10px Verdana,Arial,sans-serif }</style>');
//d.onmousemove=function(e){e=e||event;mX=(d.all?e.clientX+d.body.scrollLeft+d.documentElement.scrollLeft:e.pageX)-40+'px';mY=(d.all?e.clientY+d.body.scrollTop+d.documentElement.scrollTop:e.pageY)+15+'px';if(tltp&&tltp.v){sX(tltp,mX);sY(tltp,mY)}};tltp=null;
//function T(text){if(!tltp){tltp=d.createElement('div');tltp.setAttribute('id','tltp');aC(tltp)}if(text){wH(tltp,text);tltp.v=true;sX(tltp,mX);sY(tltp,mY);setTimeout("if(tltp.v)sE(tltp);if(!T.follows)tltp.v=false",T.delay*1000);}else{tltp.v=false;hE(tltp);}};

wdo={}
wdo.w=function(w) {
  w=w||window;
  if (w.innerWidth >0) return w.innerWidth;
  if (dB.offsetWidth>0) return dB.offsetWidth;
  if (dB.clientWidth>0) return dB.clientWidth;
  if (dE.clientWidth>0) return dE.clientWidth; 
}
wdo.h=function(w) {
  w=w||window;
  if (w.innerHeight>0) return w.innerHeight;
  if (dB.offsetHeight>0) return dB.offsetHeight;
  if (dB.clientHeight>0) return dB.clientHeight;
  if (dE.clientHeight>0) return dE.clientHeight; 
}

d.onmousemove=function(e)
{ e=e||event;
  dB=d.body;  // can't be set above, not valid until load is complete
  mx=(d.all?e.clientX+dB.scrollLeft+dE.scrollLeft:e.pageX);
  my=(d.all?e.clientY+dB.scrollTop+dE.scrollTop:e.pageY);

  //mX=(d.all?e.clientX+d.body.scrollLeft+d.documentElement.scrollLeft:e.pageX)-40+'px';
  //mY=(d.all?e.clientY+d.body.scrollTop+d.documentElement.scrollTop:e.pageY)+15+'px';
  //if(tltp&&tltp.v){sX(tltp,mX);sY(tltp,mY)}
};
tltp=null;


function T(text,wdth)
{ if(!tltp)
  { tltp=d.createElement('div');
    tltp.setAttribute('id','tltp');
    aC(tltp)
  }
  if(text)
  { wH(tltp,text);
    tltp.v=true;
    if (wdth) tltp.style.width = wdth;  // Or simply set it in the tltp style

    w = eW (tltp);
    h = eH (tltp);

    x = mx;
    y = my + 15;

    if (x - dB.scrollLeft + w > wdo.w())  x -= w;  
    if (y - dB.scrollTop + h > wdo.h())   y = my - 15 - h;

    if (debug)
    { text = text + wdth + ' ' + mx + ' ' + my + ' ' + x + ' ' + y + ' ' + w + ' ' + h + ' ' + wdo.w() + ' ' + wdo.h() + ' ' 
                  + dE.scrollLeft + ' ' + dE.scrollTop + ' ' + dB.scrollLeft + ' ' + dB.scrollTop;
      wH(tltp,text);
    }

    sX(tltp,x+'px');
    sY(tltp,y+'px');

    setTimeout("if(tltp.v)sE(tltp);if(!T.follows)tltp.v=false",T.delay*1000);
  }
  else
  { tltp.v=false;hE(tltp);
  }
};

T.follows=false;
T.delay=.2;



/*
   Behaviour v1.1 by Ben Nolan, June 2005. Based largely on the work
   of Simon Willison (see comments by Simon below).

   Description:
   	
   	Uses css selectors to apply javascript behaviours to enable
   	unobtrusive javascript in html documents.
   	
   Usage:   
   
	var myrules = {
		'b.someclass' : function(element){
			element.onclick = function(){
				alert(this.innerHTML);
			}
		},
		'#someid u' : function(element){
			element.onmouseover = function(){
				this.innerHTML = "BLAH!";
			}
		}
	};
	
	Behaviour.register(myrules);
	
	// Call Behaviour.apply() to re-apply the rules (if you
	// update the dom, etc).

   License:
   
   	This file is entirely BSD licensed.
   	
   More information:
   	
   	http://ripcord.co.nz/behaviour/
   
*/   

var Behaviour = {
	list : new Array,
	
	register : function(sheet){
		Behaviour.list.push(sheet);
	},
	
	start : function(){
		Behaviour.addLoadEvent(function(){
			Behaviour.apply();
		});
	},
	
	apply : function(){
		for (h=0;sheet=Behaviour.list[h];h++){
			for (selector in sheet){
				list = document.getElementsBySelector(selector);
				
				if (!list){
					continue;
				}

				for (i=0;element=list[i];i++){
					sheet[selector](element);
				}
			}
		}
	},
	
	addLoadEvent : function(func){
		var oldonload = window.onload;
		
		if (typeof window.onload != 'function') {
			window.onload = func;
		} else {
			window.onload = function() {
				oldonload();
				func();
			}
		}
	}
}

Behaviour.start();

/*
   The following code is Copyright (C) Simon Willison 2004.

   document.getElementsBySelector(selector)
   - returns an array of element objects from the current document
     matching the CSS selector. Selectors can contain element names, 
     class names and ids and can be nested. For example:
     
       elements = document.getElementsBySelect('div#main p a.external')
     
     Will return an array of all 'a' elements with 'external' in their 
     class attribute that are contained inside 'p' elements that are 
     contained inside the 'div' element which has id="main"

   New in version 0.4: Support for CSS2 and CSS3 attribute selectors:
   See http://www.w3.org/TR/css3-selectors/#attribute-selectors

   Version 0.4 - Simon Willison, March 25th 2003
   -- Works in Phoenix 0.5, Mozilla 1.3, Opera 7, Internet Explorer 6, Internet Explorer 5 on Windows
   -- Opera 7 fails 
*/

function getAllChildren(e) {
  // Returns all children of element. Workaround required for IE5/Windows. Ugh.
  return e.all ? e.all : e.getElementsByTagName('*');
}

document.getElementsBySelector = function(selector) {
  // Attempt to fail gracefully in lesser browsers
  if (!document.getElementsByTagName) {
    return new Array();
  }
  // Split selector in to tokens
  var tokens = selector.split(' ');
  var currentContext = new Array(document);
  for (var i = 0; i < tokens.length; i++) {
    token = tokens[i].replace(/^\s+/,'').replace(/\s+$/,'');;
    if (token.indexOf('#') > -1) {
      // Token is an ID selector
      var bits = token.split('#');
      var tagName = bits[0];
      var id = bits[1];
      var element = document.getElementById(id);
      if (tagName && element.nodeName.toLowerCase() != tagName) {
        // tag with that ID not found, return false
        return new Array();
      }
      // Set currentContext to contain just this element
      currentContext = new Array(element);
      continue; // Skip to next token
    }
    if (token.indexOf('.') > -1) {
      // Token contains a class selector
      var bits = token.split('.');
      var tagName = bits[0];
      var className = bits[1];
      if (!tagName) {
        tagName = '*';
      }
      // Get elements matching tag, filter them for class selector
      var found = new Array;
      var foundCount = 0;
      for (var h = 0; h < currentContext.length; h++) {
        var elements;
        if (tagName == '*') {
            elements = getAllChildren(currentContext[h]);
        } else {
            elements = currentContext[h].getElementsByTagName(tagName);
        }
        for (var j = 0; j < elements.length; j++) {
          found[foundCount++] = elements[j];
        }
      }
      currentContext = new Array;
      var currentContextIndex = 0;
      for (var k = 0; k < found.length; k++) {
        if (found[k].className && found[k].className.match(new RegExp('\\b'+className+'\\b'))) {
          currentContext[currentContextIndex++] = found[k];
        }
      }
      continue; // Skip to next token
    }
    // Code to deal with attribute selectors
    if (token.match(/^(\w*)\[(\w+)([=~\|\^\$\*]?)=?"?([^\]"]*)"?\]$/)) {
      var tagName = RegExp.$1;
      var attrName = RegExp.$2;
      var attrOperator = RegExp.$3;
      var attrValue = RegExp.$4;
      if (!tagName) {
        tagName = '*';
      }
      // Grab all of the tagName elements within current context
      var found = new Array;
      var foundCount = 0;
      for (var h = 0; h < currentContext.length; h++) {
        var elements;
        if (tagName == '*') {
            elements = getAllChildren(currentContext[h]);
        } else {
            elements = currentContext[h].getElementsByTagName(tagName);
        }
        for (var j = 0; j < elements.length; j++) {
          found[foundCount++] = elements[j];
        }
      }
      currentContext = new Array;
      var currentContextIndex = 0;
      var checkFunction; // This function will be used to filter the elements
      switch (attrOperator) {
        case '=': // Equality
          checkFunction = function(e) { return (e.getAttribute(attrName) == attrValue); };
          break;
        case '~': // Match one of space seperated words 
          checkFunction = function(e) { return (e.getAttribute(attrName).match(new RegExp('\\b'+attrValue+'\\b'))); };
          break;
        case '|': // Match start with value followed by optional hyphen
          checkFunction = function(e) { return (e.getAttribute(attrName).match(new RegExp('^'+attrValue+'-?'))); };
          break;
        case '^': // Match starts with value
          checkFunction = function(e) { return (e.getAttribute(attrName).indexOf(attrValue) == 0); };
          break;
        case '$': // Match ends with value - fails with "Warning" in Opera 7
          checkFunction = function(e) { return (e.getAttribute(attrName).lastIndexOf(attrValue) == e.getAttribute(attrName).length - attrValue.length); };
          break;
        case '*': // Match ends with value
          checkFunction = function(e) { return (e.getAttribute(attrName).indexOf(attrValue) > -1); };
          break;
        default :
          // Just test for existence of attribute
          checkFunction = function(e) { return e.getAttribute(attrName); };
      }
      currentContext = new Array;
      var currentContextIndex = 0;
      for (var k = 0; k < found.length; k++) {
        if (checkFunction(found[k])) {
          currentContext[currentContextIndex++] = found[k];
        }
      }
      // alert('Attribute Selector: '+tagName+' '+attrName+' '+attrOperator+' '+attrValue);
      continue; // Skip to next token
    }
    
    if (!currentContext[0]){
    	return;
    }
    
    // If we get here, token is JUST an element (not a class or ID selector)
    tagName = token;
    var found = new Array;
    var foundCount = 0;
    for (var h = 0; h < currentContext.length; h++) {
      var elements = currentContext[h].getElementsByTagName(tagName);
      for (var j = 0; j < elements.length; j++) {
        found[foundCount++] = elements[j];
      }
    }
    currentContext = found;
  }
  return currentContext;
}

/* That revolting regular expression explained 
/^(\w+)\[(\w+)([=~\|\^\$\*]?)=?"?([^\]"]*)"?\]$/
  \---/  \---/\-------------/    \-------/
    |      |         |               |
    |      |         |           The value
    |      |    ~,|,^,$,* or =
    |   Attribute 
   Tag
*/