/** Generated TOC

Amended to work with the change trakcer script

Stuart Langridge, July 2007, January 2009
Generate a table of contents, based on headings in the page
To place the TOC on the page, add

<div id="generated-toc"></div>

to the page where you want the TOC to appear. If this element
is not present, the TOC will not appear.

The TOC defaults to displaying all headings that are contained within
the same element as it itself is contained in (or all headings on the
page if you did not provide a generated-toc container). To override this,
provide a "highest heading" value by adding class="generate_from_h3"
(or h2, h4, etc) to the container. (If unspecified, this will display all
headings, as if class="generate_from_h1" was specified.)

The TOC defaults to operating only on headings contained within the same
element as it itself, i.e., in a page like this:
<div>
  <div>
	<div id="generated-toc"></div>
	<h1>foo</h1>
	<h2>bar</h2>
  </div>
  <h1>quux</h1>
</div>

The "quux" heading will not appear in the TOC. To override this,
add class="generate_for_page" to the container, which will process
all headings on the page wheresoever they may be.

Header content, when made into a link in the TOC, is stripped of all tags 
except those listed in ALLOWED_HEADER_ELEMENTS.

An allowed header element may be limited to only those elements carrying
a specific class by setting the element to element.classname (so 
"span.incl" will allow <span class="foo incl bar"> but not 
<span class="foo bar">). You cannot currently require more than one
simultaneous class (so span.foo.bar will not work).
*/

generated_toc = {

  ALLOWED_HEADER_ELEMENTS: ["ins.current-ins", "del.current-del", "span.hidden", "ins.past-ins", "ins.future-ins", "del.future-del", "del.past-del"],

  generate: function() {
	// Identify our TOC element, and what it applies to
	generate_from = '0';
	generate_for = 'unset';
	tocparent = document.getElementById('generated-toc');

	if (tocparent) {

		document.getElementById('generated-toc').innerHTML = '';

	  // there is a div class="generated-toc" in the document
	  // dictating where the TOC should appear
	  classes = tocparent.className.split(/\s+/);

	  //add the new utility bar stuff
	  var util = document.createElement('div');
	  util.className="utility-bar";
	  tocparent.appendChild(util);
		var kev=document.createElement('div');
		kev.className="h2icons";
		
		kev.innerHTML="<a class=\"printpage\" title=\"Click to print this page\" href=\"#\" onclick=\"window.print();return false;_gaq.push(['_trackEvent','Utility bar','Print page']);\">Print page</a><a id=\"ctl00_uxPrintPDF_uxPdfExportButton\" class=\"pdfpage\" title=\"Click to save this page as a PDF\"  href=\"javascript:__doPostBack('ctl00$uxPrintPDF$uxPdfExportButton','')\" onclick=\"_gaq.push(['_trackEvent','Utility bar','Export to  PDF']);\">Export to PDF</a>";
		util.appendChild(kev);
	  

	  for (var i=0; i<classes.length; i++) {

		// if it specifies which heading level to generate from,
		// or what level to generate for, save these specifications

		if (classes[i].match(/^generate_from_h[1-6]$/)) {

		  generate_from = classes[i].substr(classes[i].length-1,1);

		} else if (classes[i].match(/^generate_for_[a-z]+$/)) {

		  generate_for = classes[i].match(/^generate_for_([a-z])+$/)[1];

		}

	  }

	} else {

	  // They didn't specify a TOC element; exit

	  return;

	}

	// set top_node to be the element in the document under which
	// we'll be analysing headings

	if (generate_for == 'page') {

	  top_node = document.getElementsByTagName('body');

	} else {

	  // i.e., explicitly set to "parent", left blank (so "unset"),
	  // or some invalid value

	  top_node = tocparent.parentNode;

	}
	// If there isn't a specified header level to generate from, work
	// out what the first header level inside top_node is
	// and make that the specified header level

	if (generate_from == 0) {

	  first_header_found = generated_toc.findFirstHeader(top_node);

	  if (!first_header_found) {

		// there were no headers at all inside top_node!

		return;

	  } else {

		generate_from = first_header_found.toLowerCase().substr(1);

	  }

	}
	// add all levels of heading we're paying attention to to the
	// headings_to_treat dictionary, ready to be filled in later

	headings_to_treat = {"h6":''};

	for (var i=5; i>= parseInt(generate_from); i--) {

	  headings_to_treat["h" + i] = '';

	}

	// get headings. We can't say 
	// getElementsByTagName("h1" or "h2" or "h3"), etc, so get all
	// elements and filter them ourselves
	// need to use .all here because IE doesn't support gEBTN('*')

	nodes = top_node.all ? top_node.all : top_node.getElementsByTagName('*');

	// put all the headings we care about in headings

	headings = [];

	for (var i=0; i<nodes.length;i++) {
	  if (nodes[i].nodeName.toLowerCase() in headings_to_treat) {
		// if heading has class no-TOC, skip it
		if ((' ' + nodes[i].className + ' ').indexOf('no-TOC') != -1) {
		  continue;
		}
		headings.push(nodes[i]);
	  }
	}
	// make the basic elements of the TOC itself, ready to fill into
	// first, check if there's a cookie defined to save the state as open

	status = generated_toc.readCookie("generated_toc_display");

	if (status && status == "closed") {
	  display_initially = "none";
	  toggle_initially = "Quick links to content";
		var google_text = ' closed';
	} else {
	  display_initially = "block";
	  toggle_initially = "Hide quick links to content";
		var google_text = ' open';
	}

	cur_head_lvl = "h" + generate_from;
	cur_list_el = document.createElement('ul');
	cur_list_el.style.display = display_initially;
	p = document.createElement('p');
	span = document.createElement('span');
	p.className = 'hidden';
	a = document.createElement('a');
	a.href = '#aftertoc';
	a.appendChild(document.createTextNode('skip table of contents'));
	span.appendChild(a);
	p.appendChild(span);
	tocparent.appendChild(p);
	p = document.createElement('p');
	p.id = 'toggle-container'; 
	a = document.createElement('a');
	a.id = 'generated_toc_d_toggle';
	a.appendChild(document.createTextNode(toggle_initially));
	p.appendChild(a);
	a.onclick = generated_toc.wrapOpenClose(a,cur_list_el);
	//a.href='javascript:pageTracker._trackEvent("Utility bar","TOC'+google_text+'")';
	a.href="#";
	util.appendChild(p);
	util.appendChild(cur_list_el);
	//tocparent.appendChild(p);
	//tocparent.appendChild(cur_list_el);
	// now walk through our saved heading nodes

	for (var i=0; i<headings.length; i++) {
	  this_head_el = headings[i];
	  this_head_lvl = headings[i].nodeName.toLowerCase();

	  if (!this_head_el.id) {
		// if heading doesn't have an ID, give it one
		this_head_el.id = 'heading_toc_j_' + i;
		this_head_el.setAttribute('tabindex','-1');
	  }

	while(this_head_lvl > cur_head_lvl) {

	// this heading is at a lower level than the last one;
	// create additional nested lists to put it at the right level
	// get the *last* LI in the current list, and add our new UL to it

	var last_listitem_el = null;

	for (var j=0; j<cur_list_el.childNodes.length; j++) {

		if (cur_list_el.childNodes[j].nodeName.toLowerCase() == 'li') {
			last_listitem_el = cur_list_el.childNodes[j];
		}
	}

	if (!last_listitem_el) {
	  // there aren't any LIs, so create a new one to add the UL to
	  last_listitem_el = document.createElement('li');
	}

	new_list_el = document.createElement('ul');

	last_listitem_el.appendChild(new_list_el);

	cur_list_el.appendChild(last_listitem_el);

	cur_list_el = new_list_el;

	cur_head_lvl = 'h' + (parseInt(cur_head_lvl.substr(1,1)) + 1);

	  }

	  while (this_head_lvl < cur_head_lvl) {

		// this heading is at a higher level than the last one;
		// go back up the TOC to put it at the right level
		cur_list_el = cur_list_el.parentNode.parentNode;
		cur_head_lvl = 'h' + (parseInt(cur_head_lvl.substr(1,1)) - 1);

	  }

	  // create a link to this heading, and add it to the TOC
	  li = document.createElement('li');
	  a = document.createElement('a');
	  a.href = '#' + this_head_el.id;
	  var header_els = generated_toc.innerText(this_head_el);
	  for (var j=0; j<header_els.length; j++) {
		  a.appendChild(header_els[j]);
	  }

	  li.appendChild(a);
	  cur_list_el.appendChild(li);

	}

	// add an aftertoc paragraph as destination for the skip-toc link
	p = document.createElement('p');
	p.id = 'aftertoc';
	tocparent.appendChild(p);

	// go through the TOC and find all LIs that are "empty", i.e., contain
	// only ULs and no links, and give them class="missing"
	var alllis = tocparent.getElementsByTagName("li");

	for (var i=0; i<alllis.length; i++) {
	  var foundlink = false;
	  for (var j=0; j<alllis[i].childNodes.length; j++) {
		if (alllis[i].childNodes[j].nodeName.toLowerCase() == 'a') {
		  foundlink = true;
		}
	  }

	  if (!foundlink) {
		alllis[i].className = "missing";
	  } else {
		alllis[i].className = "notmissing";
	  }
	}
  },

  wrapOpenClose: function(a, cur_list_el) {

	// we return a function here so that it acts as a closure;
	// in essence the inner function, which is the event handler
	// for clicking on the toggle-toc link, remembers the a and cur_list_el
	// elements as they are when they're passed in to it.
	// This is an explicit function rather than an anonymous function
	// defined where it's called so it's easier to understand.

	return function(e) {

	  d = cur_list_el.style.display;
	  a.firstChild.nodeValue = (d == 'block' ? 'Quick' : 'Hide quick') + 'links to content';
	  a.className = (d == 'block' ? 'toggle-closed' : 'toggle-open'); 
	  cur_list_el.style.display = d == 'block' ? 'none' : 'block';
	
	// set a cookie to "open" or "closed" to save the state of the TOC
	if (cur_list_el.style.display == "block") {
		generated_toc.createCookie("generated_toc_display","open",21);
		document.getElementById('generated-toc').style.overflow='visible';
		//pageTracker._trackEvent("Utility bar","TOC closed");
		_gaq.push(["_trackEvent","Utility bar","TOC closed"]);
		} else {
		generated_toc.createCookie("generated_toc_display","closed",21);
		document.getElementById('generated-toc').style.overflow='hidden';
		//pageTracker._trackEvent("Utility bar","TOC open");
		_gaq.push(["_trackEvent","Utility bar","TOC closed"]);
	}

	if (window.event) {
		window.event.returnValue = false;
		window.event.cancelBubble = true;
	} else {
		e.preventDefault();
		e.stopPropagation();
	}

}

},


  /* cookie handling: http://www.quirksmode.org/js/cookies.html */

  createCookie: function(name,value,days) {

	if (days) {

	  var date = new Date();
	  date.setTime(date.getTime()+(days*24*60*60*1000));
	  var expires = "; expires="+date.toGMTString();

	}

	else var expires = "";
	document.cookie = name+"="+value+expires+"; path=/";

  },



  readCookie: function(name) {

	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	
	for(var i=0;i < ca.length;i++) {
	  var c = ca[i];
	  while (c.charAt(0)==' ') c = c.substring(1,c.length);
		  if (c.indexOf(nameEQ) == 0) 
			return c.substring(nameEQ.length,c.length);
			}
	return null;
  },

  eraseCookie: function(name) {
	generated_toc.createCookie(name,"",-1);
  },  

  

  innerText: function(el) {
	var ret = [];

	for (var i=0; i<el.childNodes.length; i++) {
		if (el.childNodes[i].nodeName == '#text') {
			ret[ret.length] = document.createTextNode(el.childNodes[i].nodeValue);
		} else {
			var isAllowedElement = false;
			
			for (var j=0; j<generated_toc.ALLOWED_HEADER_ELEMENTS.length; j++) {
				// check for standard allowed elements
				if (el.childNodes[i].nodeName.toLowerCase() == 
					generated_toc.ALLOWED_HEADER_ELEMENTS[j].toLowerCase()) {
					isAllowedElement = true;
					var thisNode = document.createElement(el.childNodes[i].nodeName.toLowerCase());
					var thisChildren = generated_toc.innerText(el.childNodes[i]);
					
					for (var k=0; k<thisChildren.length; k++) {
						thisNode.appendChild(thisChildren[k]);
					}
					ret[ret.length] = thisNode;
				}

				// now check for subclassed allowed elements
				if (generated_toc.ALLOWED_HEADER_ELEMENTS[j].indexOf(".") != -1) {

					// allowed element contains a dot, so permit only certain
					// subclasses

					var parts = generated_toc.ALLOWED_HEADER_ELEMENTS[j].split(".");
					var el_name = parts[0].toLowerCase();

					if (el.childNodes[i].nodeName.toLowerCase() == el_name) {
						// potentially allowed; check for classes
						var classparts = el.childNodes[i].className.split(/\s/);

						for (var l=0; l<classparts.length; l++) {
							if (parts[1].toLowerCase() == classparts[l].toLowerCase()) {
								isAllowedElement = true;
								var thisNode = document.createElement(el.childNodes[i].nodeName.toLowerCase());
								thisNode.className = classparts[l];
								var thisChildren = generated_toc.innerText(el.childNodes[i]);
								for (var k=0; k<thisChildren.length; k++) {
									thisNode.appendChild(thisChildren[k]);
								}
								ret[ret.length] = thisNode;
							}
						}
					}
				}
			}

			if (!isAllowedElement) {

				var thisChildren = generated_toc.innerText(el.childNodes[i]);
				for (var k=0; k<thisChildren.length; k++) {
					ret[ret.length] = thisChildren[k];
				}
			}
		}
	}
	return ret;
  },

  

  findFirstHeader: function(node) {
	// a recursive function which returns the first header it finds inside
	// node, or null if there are no functions inside node.

	var nn = node.nodeName.toLowerCase();
	if (nn.match(/^h[1-6]$/)) {
	  // this node is itself a header; return our name
	  return nn;
	} else {
	  for (var i=0; i<node.childNodes.length; i++) {
		var subvalue = generated_toc.findFirstHeader(node.childNodes[i]);
		// if one of the subnodes finds a header, abort the loop and return it
		if (subvalue) return subvalue;
	  }
	  // no headers in this node at all
	  return null;
	}
  },



  init: function() {

	// quit if this function has already been called
	if (arguments.callee.done) return;
	// flag this function so we don't do the same thing twice

	arguments.callee.done = true;
	generated_toc.generate();
  }

};


//(function(i) {var u =navigator.userAgent;var e=/*@cc_on!@*/false; var st =
//setTimeout;if(/webkit/i.test(u)){st(function(){var dr=document.readyState;
//if(dr=="loaded"||dr=="complete"){i()}else{st(arguments.callee,10);}},10);}
//else if((/mozilla/i.test(u)&&!/(compati)/.test(u)) || (/opera/i.test(u))){
//document.addEventListener("DOMContentLoaded",i,false); } else if(e){	 (
//function(){var t=document.createElement('doc:rdy');try{t.doScroll('left');
//i();t=null;}catch(e){st(arguments.callee,0);}})();}else{window.onload=i;}})(generated_toc.init);