/*
* 20041027 - file installed
* this file contains nested list collapse/expand functions;
* see comments below.
*
* on soeadm, this file is a copy of
* oec-server7:/local/apache/htdocs/javascripts/listCollapse.js
*
*/
/*********************************************************************
Nested list collapsing script written by Mark Wilton-Jones - 21/11/2003
Version 2.1.2 - this script takes existing HTML nested UL or OL lists,
and collapses them
Updated 13/02/2004 to allow links in root of expanding branch
Updated 09/09/2004 to allow state to be saved
Updated 07/10/2004 to allow page address links to be highlighted
************************************************************************
Please see http://www.howtocreate.co.uk/jslibs/ for details and a demo of
this script
Please see http://www.howtocreate.co.uk/jslibs/termsOfUse.html for terms of use
_________________________________________________________________________
You can put as many lists on the page as you like, each list may have a
different format.
To use:
_________________________________________________________________________
Inbetween the tags, put:
_________________________________________________________________________
Define the HTML. Note that to correctly nest lists, child OLs or ULs should
be children of an LI element, not direct descendents of their parent OL/UL.
The text used to expand the branch should be written between the tag
and the tag, and should only contain HTML that is permitted inside
an 'A' element. Note; Opera 7 will lose any style attributes you define in this text - use classes instead.
________________________________________________________________________
Now you need to trigger the collapsing, using tag.
If using either onload technique, you must not use any other scripts that
rely on the onload event.
compactMenu(theRootID,shouldAutoCollapse,extraHTML);
oID = string: ID of root nest element, must be a UL or OL; this will
not be collapsed, but any child
UL/OLs will be (note, if the root nest element is a UL, all child lists
should be ULs - the same is
true for OLs; if the root nest element is OL, all child lists should be OLs)
shouldAutoCollapse = bool: auto-collapse unused branches
extraHTML = string: HTML to insert to collapsible branches - usually '± '
eg 1.
eg 2.
eg 3.
stateToFromStr(theRootID);
oID = string: ID of root nest element, must be a UL or OL; returns a
string representing all expanding branches - can be used with my cookie
script to save state when unloading the page
stateToFromStr(theRootID,stringRepresentation);
oID = string: ID of root nest element, must be a UL or OL;
stringRepresentation = string: string representation of expanded branches,
as created above must be called _after_ collapsing the list - values can
be recovered from cookies using my cookie script
note: this facility will not be able to take changes in the list structure
into account - use session cookies or short-term cookies to avoid longer
term structure change problems
selfLink(theRootID,newClass,shouldExpandBranch);
theRootID = string: ID of root nest element, must be a UL or OL;
newClass = string: new class name to add to any existing class names
shouldExpandBranch = bool: expand branches to show the first matching link
allows you to highlight links to the current page that appear in the list
must be called _after_ collapsing the list
address hash and port are not included in the comparison - links containing
href="#" are always ignored
My cookie script is available on http://www.howtocreate.co.uk/jslibs/
****************************************************************/
var openLists = [], oIcount = 0;
function compactMenu(oID,oAutoCol,oPlMn) {
if( !document.getElementsByTagName || !document.childNodes || !document.createElement ) { return; }
var baseElement = document.getElementById( oID ); if( !baseElement ) { return; }
compactChildren( baseElement, 0, oID, oAutoCol, oPlMn, baseElement.tagName.toUpperCase() );
}
function compactChildren( oOb, oLev, oBsID, oCol, oPM, oT ) {
if( !oLev ) { oBsID = escape(oBsID); if( oCol ) { openLists[oBsID] = []; } }
for( var x = 0, y = oOb.childNodes; x < y.length; x++ ) { if( y[x].tagName ) {
//for each immediate LI child
var theNextUL = y[x].getElementsByTagName( oT )[0];
if( theNextUL ) {
//collapse the first UL/OL child
theNextUL.style.display = 'none';
//create a link for expanding/collapsing
var newLink = document.createElement('A');
newLink.setAttribute( 'href', '#' );
newLink.onclick = new Function( 'clickSmack(this,' + oLev + ',\'' + oBsID + '\',' + oCol + ',\'' + escape(oT) + '\');return false;' );
//wrap everything upto the child U/OL in the link
var theT = y[x].innerHTML.toUpperCase().indexOf('<'+oT);
var theA = y[x].innerHTML.toUpperCase().indexOf('= oLevel; x-=1 ) { if( openLists[oBsID][x] ) {
openLists[oBsID][x].style.display = 'none'; if( oLevel != x ) { openLists[oBsID][x] = null; }
} }
if( oThisOb == openLists[oBsID][oLevel] ) { openLists[oBsID][oLevel] = null; }
else { oThisOb.style.display = 'block'; openLists[oBsID][oLevel] = oThisOb; }
} else { oThisOb.style.display = ( oThisOb.style.display == 'block' ) ? 'none' : 'block'; }
}
function stateToFromStr(oID,oFStr) {
if( !document.getElementsByTagName || !document.childNodes || !document.createElement ) { return ''; }
var baseElement = document.getElementById( oID ); if( !baseElement ) { return ''; }
if( !oFStr && typeof(oFStr) != 'undefined' ) { return ''; } if( oFStr ) { oFStr = oFStr.split(':'); }
for( var oStr = '', l = baseElement.getElementsByTagName(baseElement.tagName), x = 0; l[x]; x++ ) {
if( oFStr && MWJisInTheArray( l[x].MWJuniqueID, oFStr ) && l[x].style.display == 'none' ) { l[x].parentNode.getElementsByTagName('a')[0].onclick(); }
else if( l[x].style.display != 'none' ) { oStr += (oStr?':':'') + l[x].MWJuniqueID; }
}
return oStr;
}
function MWJisInTheArray(oNeed,oHay) {
for( var i = 0; i < oHay.length; i++ ) {
if( oNeed == oHay[i] ) { return true; }
} return false;
}
function selfLink(oRootElement,oClass,oExpand) {
if(!document.getElementsByTagName||!document.childNodes) { return; }
oRootElement = document.getElementById(oRootElement);
for( var x = 0, y = oRootElement.getElementsByTagName('a'); y[x]; x++ ) {
if( y[x].getAttribute('href') && !y[x].href.match(/#$/) && getRealAddress(y[x]) == getRealAddress(location) ) {
y[x].className = (y[x].className?(y[x].className+' '):'') + oClass;
if( oExpand ) {
oExpand = false;
for( var oEl = y[x].parentNode, ulStr = ''; oEl != oRootElement && oEl != document.body; oEl = oEl.parentNode ) {
if( oEl.tagName && oEl.tagName == oRootElement.tagName ) { ulStr = oEl.MWJuniqueID + (ulStr?(':'+ulStr):''); } }
stateToFromStr(oRootElement.id,ulStr);
} } } }
function getRealAddress(oOb) { return oOb.protocol + oOb.hostname + ( ( typeof(oOb.pathname) == typeof(' ') && oOb.pathname.indexOf('/') != 0 ) ? '/' : '' ) + oOb.pathname + oOb.search; }