var bspCurMenu = null;
var bspIgnoreClick = null;

var ie5=document.all && document.getElementById;
var ns6=document.getElementById&&!document.all;
var onKeydownSaved = document.onkeydown;


function findPosX(obj) {
  var curleft = 0;
  if (obj.offsetParent) {
    do {
      curleft += obj.offsetLeft;
    } while (obj = obj.offsetParent);
  }
  return curleft;
}

function findPosY(obj) {
  var curtop = 0;
  if (obj.offsetParent) {
    do {
      curtop += obj.offsetTop;
    } while (obj = obj.offsetParent);
  }
  return curtop;
}

function callUrlWithKey(ev,keycode,url) {
  if (ev.keyCode == keycode) {
    window.location=url;
  }
}

function bspMenuCountEntries(obj) {
  var draggedIndex=0;
  for (var n=0;n<obj.childNodes.length;n++) {
    if (obj.childNodes[n].className == "bspMenuItem") {
      draggedIndex++;
    }
  }
  return draggedIndex;
}

function bspMenuClose(obj) {
  obj.style.visibility = "hidden";
  obj.setAttribute("arrowCurser",0);
  obj.setAttribute("openedWithKey",0);
  for (var n=0; n < obj.childNodes.length; n++) {
    if (obj.childNodes[n].className == "bspMenuItem") {
      obj.childNodes[n].style.backgroundColor="";
      obj.childNodes[n].style.color="black";
      window.status='';
    }
  }
  document.onkeydown = onKeydownSaved;
  return;
}

function bspMenuSetCursor(obj, index) {
  var draggedIndex=0;
  for (var n=0;n<obj.childNodes.length;n++) {
    if (obj.childNodes[n].className == "bspMenuItem") {
      if (draggedIndex == index) {
        obj.childNodes[n].style.backgroundColor="highlight";
        obj.childNodes[n].style.color="white";
      } else {
        obj.childNodes[n].style.backgroundColor="";
        obj.childNodes[n].style.color="black";
        window.status='';
      }
      draggedIndex++;
    }
  }
  obj.setAttribute("arrowCurser", index);
}

function bspMenuKeyAction(currObj,ev,menuID) {
  var arrowIndex    = currObj.getAttribute("arrowCurser");
  var openedWithKey = currObj.getAttribute("openedWithKey");
  var maxEntries    = currObj.getAttribute("maxEntries");

  if (openedWithKey == 0) {
    return;
  }

  if (ev.keyCode == 13) {
    var draggedIndex=0;
    var searchIndex=0;
    for (searchIndex=0; searchIndex < currObj.childNodes.length;searchIndex++) {
      if (currObj.childNodes[searchIndex].className == "bspMenuItem") {
        if (draggedIndex == arrowIndex) {
         break;
        }
        draggedIndex++;
      }
    }
    if (searchIndex == currObj.childNodes.length) return;
    
    bspMenuClose(currObj);
    var urlStr = currObj.childNodes[searchIndex].getAttribute("url");
    var addParam = ''
    if (menuID != null && menuID != '' && urlStr != null && urlStr.substr(0,11) != "javascript:") {
      addParam = "&lastControlID=" + menuID;
    }
    
    if (currObj.childNodes[searchIndex].getAttribute("target")) {
      window.open(urlStr, 
                  currObj.childNodes[searchIndex].getAttribute("target"));
    } else if (urlStr) {
      window.location = urlStr + addParam;
    }
    return;
  }

  var changed = false;
  if (ev.keyCode == 40 && arrowIndex < (maxEntries-1)) {
    arrowIndex++;
    changed = true;
  }
  if (ev.keyCode == 38 && arrowIndex > 0 ) {
    arrowIndex--;
    changed = true;
  }
  if (changed == false) return;

  bspMenuSetCursor(currObj, arrowIndex);
}

function bspMenuMainAction(menuId,ev,srcObj,altKey) { 
  var posX = findPosX(srcObj);
  var posY = findPosY(srcObj);

  var curobj=ie5? ev.srcElement : ev.target;
  var curMenu = document.getElementById(menuId);
  var openedWithKey = curMenu.getAttribute("openedWithKey");

  if (ev.keyCode == 9) {
    return;
  }

  if (ev.keyCode == 27) {
    return bspMenuClose(curMenu);
  }

  if ((ev.keyCode == 13 && openedWithKey == 0) || (altKey != null && ev.keyCode == altKey)) {
    curMenu.style.left = posX + srcObj.offsetWidth - 5;
    curMenu.style.top  = posY + srcObj.offsetHeight - 5;

    curMenu.style.visibility="visible";
    curMenu.setAttribute("openedWithKey", 1);
    bspMenuSetCursor(curMenu, 0);
    
    bspIgnoreClick = curobj;
    bspCurMenu = curMenu;
    
    document.onkeydown=stoppScroll;
    return false;
  } else if (ev.keyCode == 40 || ev.keyCode == 38 || ev.keyCode == 13) {
    return bspMenuKeyAction(curMenu,ev,menuId);
  }

  if (ev.type=="click") {
    if (document.body.scrollLeft != null) {
      posX -= document.body.scrollLeft;
      posY -= document.body.scrollTop;
    } else if(window.pageXOffset != null) {
      posX -= window.pageXOffset;
      posY -= window.pageYOffset;
    }
    if (ev.clientY < posY || (ev.clientY > (posY + srcObj.offsetHeight)) ||
      ev.clientX < posX || (ev.clientX > (posX + srcObj.offsetWidth))) {
      return;
    }
    return bspMenuShow(menuId,ev);
  }
}

function stoppScroll (e) {
  var e = e || window.event;
  if(window.captureEvents) {
    var taste = e.which;
  } else {
    var taste = e.keyCode;
  }
  if(taste==38 || taste==40) {   
    if(e.preventDefault)
      e.preventDefault();
    else
      e.returnValue=false;
  }
}



function bspMenuHighlight(e){
    var curobj=ie5? event.srcElement : e.target;
    if (curobj.className=="bspMenuItem" || ns6&&curobj.parentNode.className=="bspMenuItem"){
	if (ns6&&curobj.parentNode.className=="bspMenuItem")
	    curobj=curobj.parentNode;
	curobj.style.backgroundColor="highlight";
	curobj.style.color="white";
    }
}

function bspMenuUnHighlight(e){
    var curobj=ie5? event.srcElement : e.target;
    if (curobj.className=="bspMenuItem" || ns6&&curobj.parentNode.className=="bspMenuItem"){
	if (ns6&&curobj.parentNode.className == "bspMenuItem")
	    curobj=curobj.parentNode;
	curobj.style.backgroundColor="";
	curobj.style.color="black";
	window.status='';
    }
}

function bspMenuSelect(e,menuID){
    var addParam = '';
    var curobj=ie5? event.srcElement : e.target;
    if (menuID != null && menuID != '') {
      addParam = "&lastControlID=" + menuID;
    }
    if (curobj.className=="bspMenuItem" || ns6&&curobj.parentNode.className=="bspMenuItem"){
	if (ns6&&curobj.parentNode.className == "bspMenuItem")
	    curobj=curobj.parentNode;
	if (curobj.getAttribute("url")) {
	    if (curobj.getAttribute("target"))
		window.open(curobj.getAttribute("url"),curobj.getAttribute("target"));
	    else
		window.location=curobj.getAttribute("url") + addParam;
	}
	else bspMenuHide(e,0);
    }
}

function bspMenuHide(e,force){
    var curobj=ie5? event.srcElement : e.target;

    //alert("bspHideMenu("+bspCurMenu+") - Object"+ curobj);

    if (force || ((bspIgnoreClick != curobj) && (bspCurMenu != null))){
	bspCurMenu.style.visibility = "hidden";
	bspCurMenu = null;
    }
    bspIgnoreClick = null;
}


function bspMenuShow(menuId,e) {
    var curobj=ie5? event.srcElement : e.target;
    var evtype=ie5? event.type : e.type;
    var offsetY=(evtype=="mouseover")?10:0;
    var offsetX=(evtype=="mouseover")?10:0;

    if (bspCurMenu != null)
	bspCurMenu.style.visibility="hidden";
    bspCurMenu = document.getElementById(menuId);

    var rightedge=ie5? document.body.clientWidth-event.clientX : window.innerWidth-e.clientX;
    var bottomedge=ie5? document.body.clientHeight-event.clientY : window.innerHeight-e.clientY;

    if (rightedge<bspCurMenu.offsetWidth)
	bspCurMenu.style.left=ie5? document.body.scrollLeft+event.clientX-bspCurMenu.offsetWidth : window.pageXOffset+e.clientX-bspCurMenu.offsetWidth-offsetX;
    else
	bspCurMenu.style.left=ie5? document.body.scrollLeft+event.clientX : window.pageXOffset+e.clientX+offsetX;

    if (bottomedge-offsetY<bspCurMenu.offsetHeight)
	bspCurMenu.style.top=ie5? document.body.scrollTop+event.clientY-bspCurMenu.offsetHeight : window.pageYOffset+e.clientY-bspCurMenu.offsetHeight-offsetY;
    else
	bspCurMenu.style.top=ie5? document.body.scrollTop+event.clientY : window.pageYOffset+e.clientY+offsetY;

    bspCurMenu.style.visibility="visible";
    bspIgnoreClick = curobj;

    //alert("bspShowMenu("+bspCurMenu+") - Object: "+ curobj + "type: "+evtype+" offset:"+offsetY);

    return false;
}



function initializeMenu(menuId,bspMenuParentId) {
    if (menuId != null)
    var bspMenu = document.getElementById(menuId);
    if (bspMenu == null) return;

    bspMenu.setAttribute("arrowCurser", 0);
    bspMenu.setAttribute("openedWithKey", 0);
    bspMenu.setAttribute("maxEntries", bspMenuCountEntries(bspMenu));
    bspMenu.setAttribute("menuObjID", bspMenuParentId);
    if (bspMenuParentId != null)
    var bspMenuParent = document.getElementById(bspMenuParentId);

    if (bspMenu == null || bspMenuParent == null) return;

    function bspIMenuShow(e) {

	if (bspCurMenu != null)
	    bspCurMenu.style.visibility="hidden";
	bspCurMenu = bspMenu;

	//alert("bspIShowMenu("+bspCurMenu+")");

	var rightedge=ie5? document.body.clientWidth-event.clientX : window.innerWidth-e.clientX;
	var bottomedge=ie5? document.body.clientHeight-event.clientY : window.innerHeight-e.clientY;

	if (rightedge<bspCurMenu.offsetWidth)
	    bspCurMenu.style.left=ie5? document.body.scrollLeft+event.clientX-bspCurMenu.offsetWidth : window.pageXOffset+e.clientX-bspCurMenu.offsetWidth;
	else
	    bspCurMenu.style.left=ie5? document.body.scrollLeft+event.clientX : window.pageXOffset+e.clientX;

	if (bottomedge<bspCurMenu.offsetHeight)
	    bspCurMenu.style.top=ie5? document.body.scrollTop+event.clientY-bspCurMenu.offsetHeight : window.pageYOffset+e.clientY-bspCurMenu.offsetHeight;
	else
	    bspCurMenu.style.top=ie5? document.body.scrollTop+event.clientY : window.pageYOffset+e.clientY;

	bspCurMenu.style.visibility="visible";
	return false;
    }
    bspMenuParent.oncontextmenu = bspIMenuShow;
    // bspMenuParent.onClick = bspIMenuShow;
}

function restoreMenuFocus(lastControlID) {
  if (lastControlID != '') {
    var lastUsedControl=document.getElementById(lastControlID);
    if (lastUsedControl != null) {
      var linkID = lastUsedControl.getAttribute("menuObjID");
      if (linkID != null && linkID != '') {
	var obj = document.getElementById(linkID);
	if (obj != null) obj.focus();
      }
    }
  }
}