var caltech_url_stub = '/';
//-------------------------------------------------------------

function writeInitialDiv () {	
       if (!document.all) {
          current_key = GetCookie('current_key');
          document.navbarform.current_key.value = current_key;
          last_section_id = GetCookie('last_section_id');
          document.navbarform.last_section_id.value = last_section_id;
       } else {
	if (document.navbarform) {
          current_key = document.navbarform.current_key.value;
          last_section_id = document.navbarform.last_section_id.value;
         } else {
	   current_key = null;
         }
       }
       if (current_key == null || current_key == '') {
	   writeDiv(story_content);	
       } else {
	   writeSectionContent(last_section_id);
	   document.images['navbar-'+current_key].src=image_dir +"navbar/"+current_key+"-on.gif";
	   document.images['infobar'].src=image_dir +"infobar/" + current_key + ".gif";
       }
}
//-------------------------------------------------------------

function setPageStateVariable(key,value) {
	if (!document.all) {
  		var expMinutes = 10;
  		var exp = new Date(); 
  		exp.setTime(exp.getTime() + (expMinutes*60*1000));
  		SetCookie(key,value,exp);
	}
	document.navbarform[key].value = value;
}

//-------------------------------------------------------------

function sectionIndex (section_id) {
    for (var i = 0; i < section_list.length; i++) {
	if (section_list[i][0] - section_id ==0) {
		return i;
	} 
    }			
    return -1;
}

//-------------------------------------------------------------

function sectionContent (section_id,column_width) {
    	section_index 	  = sectionIndex(section_id);
	parent_section_id = section_list[section_index][1];
    	section_label 	  = section_list[section_index][3];
    	child_id_list     = section_list[section_index][5];
	
	section_content = '<td width=' + column_width + ' align=left valign=top>' + 
	'<table width=' + column_width + ' border=0 cellspacing=0 cellpadding=0>' + 
	'<tr><td width=20 align=left><img width=10 height=29 alt=\"\" src=' + image_dir + 'top.gif></td>' +
	'<td width=' + column_width + ' valign=top><p class=\"titles\">' + section_label + '</p></td></tr>'; 
		
	for (var i = 0; i < child_id_list.length; i++) {
		child_id    = child_id_list[i];
		child_index = sectionIndex(child_id);
		child_label = section_list[child_index][3];
		child_url_p = section_list[child_index][4];
			
		section_content = section_content + '<tr>' + 
		  ' <td align=left><img width=10 height=19 alt=\"\" src=' + image_dir + 'left.gif></td> ' +
		  ' <td><a class="divlinks" ';
		
		if (admin_p == 0) {			
		   if (child_url_p == 0) {
			section_content = section_content + ' href="#" onClick="writeSectionContent(' + child_id + ',' + admin_p + ');return false;" ';
		   } else {
			section_content = section_content + ' href="' + caltech_url_stub + 'link/' + child_id + '"';
		   }
		} else {
		   if (child_url_p == 0) {
			section_content = section_content + ' href="#" onClick="writeSectionContent(' + child_id + ',' + admin_p + ');adminPopup(' + child_id + ');return false;" ';
		   } else {
			section_content = section_content + ' href="#" onClick="adminPopup(' + child_id + ');return false;" ';
		   }
    		}	

		section_content = section_content + ' onMouseOver="window.status=\'\';return true;"' + 
		' onMouseOut="window.status=\'\';return true;">' + child_label + '</a></td></tr>';	
	}

	if (column_width == 300) {
		section_content = section_content + '<tr>' +
		'<td colspan=2><img width=54 height=24 alt=\"\" src="' + image_dir + 'bottom-dot.gif" border=0><a href="#" onClick="writeSectionContent(parent_section_id);return false;" onMouseOver="window.status=\'Clear Menu\';return true;" onMouseOut="window.status=\'\';return true;"><img width=90 height=14 alt=\"clear this menu\" src="' + image_dir + 'clear-menu.gif\" border=0></a></td></tr></table></td>';
	} else {
		section_content = section_content + '<tr>' +
		'<td colspan=2 align=left><img width=49 height=23 alt=\"\" src="' + image_dir + 'bottom-arrow.gif" border=0><a href="#" onClick="resetPage(); return false;" onMouseOver="window.status=\'Clear Menu\';return true;" onMouseOut="window.status=\'\';return true;"><img width=90 height=14 alt=\"clear this menu\" src="' + image_dir + 'clear-menu.gif\" border=0></a></td>' + 
		'</tr></table></td>'; 
	}
	return section_content;
}

//-------------------------------------------------------------

function writeSectionContent (section_id) {

    setPageStateVariable('last_section_id',section_id);
    section_index = sectionIndex(section_id);
    if (section_index == -1) {
	   writeDiv(story_content);	
           return;
    }      
    level = section_list[section_index][2];	
    parent_section_id = section_list[section_index][1];
		    
    content = '<br><table width=540 border=0 cellspacing=0 cellpadding=0><tr>';

    switch (level) {
	case 1:
		content = content + sectionContent(section_id,240);
		break;
	case 2:
		content = content + sectionContent(parent_section_id,240) + sectionContent(section_id,300);
		break;
	default:
		break;
    }

    content = content + '</tr></table><p>';

    writeDiv(content);
    return true;
}

//-------------------------------------------------------------