//-----------------------------------------------------------------------------
//
// Copyright (c) 2002 by Computors Limited. All Rights Reserved.
//
// No part of this publication or software may be reproduced, transmitted,   
// transcribed, stored in a retrieval system, or translated into any      
// language without the prior written authorization of Computors Limited. 
//
// This is a licensed product of Computors Limitied.
//
// Program    : hcattreemenu.js
// Description: Tree Menu
//
//-----------------------------------------------------------------------------

function NTreeFormat(fmt,tree) {
  this.init = function(fmt,tree) {

    // Menu Position
    this.left  = fmt[0];   
    this.top   = fmt[1];   

    // +/- Button images
    this.showB = fmt[2];
    this.clB   = fmt[3][0];
    this.exB   = fmt[3][1];
    this.iE    = fmt[3][2];
    this.Bw    = fmt[4][0];
    this.Bh    = fmt[4][1];
    this.Ew    = fmt[4][2];

    // Folder images
    this.showF = fmt[5];
    this.clF   = fmt[6][0];
    this.exF   = fmt[6][1];
    this.iF    = fmt[6][2];
    this.Fw    = fmt[7][0];
    this.Fh    = fmt[7][1];
    
    // Last Node and Parent Node images
    this.showlpn = fmt[8];
    this.lnimg   = fmt[9][0];
    this.pnimg   = fmt[9][1];
    this.lpnimgw = fmt[10][0];
    this.lpnimgh = fmt[10][1];
    
    // identation for each level
    this.ident = fmt[11];
    // tree background color ("" - transparent)
    this.back  = new NTreeBack(this.left, this.top, fmt[12], 'cls'+tree.name+'_back');
    // default style for all nodes
    this.nst   = fmt[13];
    // styles for each level of menu (default style will be used for undefined levels)
    this.nstl  = fmt[14];
    // true if only one branch can be opened at same time
    this.so    = fmt[15];
    // item pagging
    this.pg    = fmt[16][0];
    // item spacing
    this.sp    = fmt[16][1];
    
    // Text Table Width
    this.ttw   = fmt[17];
    
    // Preload Images
    if (this.showB){
      this.e = new Image();
      this.e.src = this.clB;
      this.e1 = new Image();
      this.e1.src = this.exB;
      this.e5 = new Image();
      this.e5.src = this.iE;
    }
    if (this.showF){
      this.e2 = new Image();
      this.e2.src = this.exF;
      this.e3 = new Image();
      this.e3.src = this.clF;
      this.e4 = new Image();
      this.e4.src = this.iF;
    }
    if (this.showlpn){
      this.lpi1 = new Image();
      this.lpi1.src = this.lnimg;
      this.lpi2 = new Image();
      this.lpi2.src = this.pnimg;
    }
  }
  this.nstyle = function (lvl) {
    return ( und(this.nstl[lvl]) ) ? this.nst : this.nstl[lvl];
  }
  this.idn = function (lvl) {
    var r = ( und(this.ident[lvl]) ) ? this.ident[0]*lvl : this.ident[lvl];
    return r;
  }
  this.init(fmt,tree);
}

function HCat_Tree (name,nodes,format) {
  this.name = name;
  this.fmt = new NTreeFormat(format, this);
  NTrees[this.name] = this;
  this.Nodes = new Array();
  this.rootNode = new NTreeNode(null, "", "", "", null);
  this.rootNode.treeView = this;
  
  this.selectedNode = null;
  this.maxWidth = 0;
  this.maxHeight = 0;
    this.ondraw = null; 
  this.nbn = function( nm ){
    for (var i = 0;i<this.Nodes.length;i++)
      if (this.Nodes[i].text == nm)
        return this.Nodes[i];
    return null;
  }
  this.addNode = function (node)
  {
    var parentNode = node.parentNode;
    this.Nodes = this.Nodes.concat([node]);
    node.index = this.Nodes.length - 1;
    if (parentNode == null) {
      this.rootNode.children = this.rootNode.children.concat([node]);
    }
    else
      parentNode.children = parentNode.children.concat([node]);
    return node;
  }
  this.rebuildTree = function()
  {
    var s = "";
    for (var i = 0; i < this.Nodes.length; i++) {
      s += this.Nodes[i].init();
    }
    document.write(s);
    for (var i = 0; i < this.Nodes.length; i++) {
      if (bw.ns4) {
        this.Nodes[i].el = document.layers[this.Nodes[i].id()+"d"];
        if (this.fmt.showF)
          this.Nodes[i].nf = this.Nodes[i].el.document.images[this.Nodes[i].id()+"nf"];
        if (this.fmt.showB)
          this.Nodes[i].nb = this.Nodes[i].el.document.images[this.Nodes[i].id()+"nb"];
        if (this.fmt.showlpn)
          this.Nodes[i].nb = this.Nodes[i].el.document.images[this.Nodes[i].id()+"nlp"];
      } else {
        this.Nodes[i].el = document.all? document.all[this.Nodes[i].id()+"d"] : document.getElementById(this.Nodes[i].id()+"d");    
        if (this.fmt.showB)
          this.Nodes[i].nb = document.all? document.all[this.Nodes[i].id()+"nb"] : document.getElementById(this.Nodes[i].id()+"nb");    
        if (this.fmt.showF)
          this.Nodes[i].nf = document.all? document.all[this.Nodes[i].id()+"nf"] : document.getElementById(this.Nodes[i].id()+"nf");    
        if (this.fmt.showlpn)
          this.Nodes[i].nlp = document.all? document.all[this.Nodes[i].id()+"nlp"] : document.getElementById(this.Nodes[i].id()+"nlp");    
      }
    }
  }
  
  this.draw = function()
  {
    this.currTop = this.fmt.top;
    this.maxHeight =0; this.maxWidth=0;
    for (var i = 0; i < this.rootNode.children.length; i++)
      this.rootNode.children[i].draw(true);
    this.fmt.back.resize(this.maxWidth - this.fmt.left, this.maxHeight - this.fmt.top);
    if (this.ondraw != null) this.ondraw();
  }
  
  this.updateImages = function (node) {
    var srcB = node.expanded? this.fmt.exB : this.fmt.clB;
    var srcF = node.expanded? this.fmt.exF : this.fmt.clF;
    if (node.treeView.fmt.showB && node.nb && node.nb.src != srcB) node.nb.src = srcB;
    if (node.treeView.fmt.showF && node.nf && node.nf.src != srcF) node.nf.src = node.hasChildren() ? srcF : this.fmt.iF;
  }
  
  // Expand Node
  this.expandNode = function(index) {
    var node = this.Nodes[index];
    if (!und(node) && node.hasChildren()) {
      node.expanded = !node.expanded;
      this.updateImages(node);
      if (!node.expanded) {
        node.hideChildren();
      } else {
//        if (this.fmt.so && node.parentNode == null) {

        if (this.fmt.so) {

          if (node.parentNode != null) {

            for (var i = 0; i < this.Nodes.length; i++) {
              if (this.Nodes[i] != node && this.Nodes[i].parentNode == node.parentNode) {
                this.Nodes[i].hideChildren();
//                this.Nodes[i].show(false);
//                this.Nodes[i].expanded = false;
                this.updateImages(this.Nodes[i]);
              }
            }

          } else {

            for (var i = 0; i < this.Nodes.length; i++) {
              this.Nodes[i].show(false);
              if (this.Nodes[i] != node && this.Nodes[i].parentNode == null) {
                this.Nodes[i].hideChildren();
//                this.Nodes[i].expanded = false;
                this.updateImages(this.Nodes[i]);
              }
            }
          }


          
//          while (node.parentNode != null) {
//            node.show(true);
//            node.expanded = true;
//            this.updateImages(node);
//            node = node.parentNode;
//          }
        }
      }
      this.draw();
    }
  }

  // Select Node
  this.selectNode = function(index) {
    var node = this.Nodes[index];
    if (!und(node))
      this.selectedNode = node;
    node.draw();
  }
  
  // Read Nodes
  this.readNodes = function (nodes) {
    var ind = 0;
    var par = null;
    function readOne( arr , tree) {
      if (und(arr)) return;
      var text = arr[0];
      var url = arr[1] == null? "javascript:hcat_none()": arr[1];
//      var url = arr[1] == null? "javascript:": arr[1];
      var targ = arr[2] == null? "": arr[2];
      var node = tree.addNode(new NTreeNode(tree, par, text, url, targ))
      var i = 3;
      while (!und(arr[i])) {
        par = node;
        readOne(arr[i], tree);
        i++;
      }
    }
    if (und(nodes) || und(nodes[0]) || und(nodes[0][0])) return;
    for (var i = 0; i < nodes.length; i++) {
      par = null;
      readOne(nodes[i], this);
    }
  }
  this.collapseAll = function( rd )
  {
    for (var i = 0; i < this.Nodes.length; i++){
      if (this.Nodes[i].parentNode != this.rootNode)
        this.Nodes[i].show(false);
      this.Nodes[i].expanded = false;
      this.updateImages(this.Nodes[i]);
    }
    if (rd) this.draw();
  }
  this.expandAll = function( rd )
  {
    for (var i = 0; i < this.Nodes.length; i++){
      this.Nodes[i].expanded = true;
      this.updateImages(this.Nodes[i]);
    }
    if (rd) this.draw();
  }
  this.init = function()
  {
    this.readNodes(nodes);
    this.rebuildTree();
    this.draw();
  }
  this.init();
}

function NTreeNode( treeView, parentNode , text, url, target){
  this.index = -1;
  this.treeView = treeView;
  this.parentNode = parentNode;
  this.text = text;
  this.url = url;
  this.target = target;
  this.expanded = false;
  this.children = new Array();
  this.level = function(){
    var node = this;
    var i = 0;
    while (node.parentNode != null){
      i++;
      node = node.parentNode;
    }
    return i;
  }
  this.hasChildren = function(){
    return this.children.length > 0;
  }
  this.init = function(){
    var s = "";
    if (bw.ns4) {
      s = '<layer id="'+this.id()+'d" z-index="'+this.index+10+'" visibility="hidden">'+this.getContent()+'</layer>';
    } else {
      s = '<div id="'+this.id()+'d" style="position:absolute;visibility:hidden;z-index:'+this.index+10+';">'+this.getContent()+'</div>';
    }
    return s;
  }
  this.getH = function() {return bw.ns4 ? this.el.clip.height : this.el.offsetHeight;}
  this.getW = function() {return bw.ns4 ? this.el.clip.width : this.el.offsetWidth;}
  this.id = function() {return 'nt'+this.treeView.name+this.index;}
  this.getContent = function() {
    function itemSquare(node) {
        var img = node.hasChildren() ? (node.expanded ? node.treeView.fmt.exF : node.treeView.fmt.clF) : node.treeView.fmt.iF;
        var w = node.treeView.fmt.Fw;
        var h = node.treeView.fmt.Fh;
//        return "<td valign=\"middle\" width=\""+w+"\"><img id=\""+node.id()+"nf\" name=\""+node.id()+"nf\" src=\"" + img + "\" width="+w+" height="+h+" border=0></td>\n";
        return "<td valign=\"middle\"><img id=\""+node.id()+"nf\" name=\""+node.id()+"nf\" src=\"" + img + "\" border=0></td>\n";
    }
    function buttonSquare(node) {
      var img = node.expanded ? node.treeView.fmt.exB : node.treeView.fmt.clB;
      var w = node.treeView.fmt.Bw;
      var h = node.treeView.fmt.Bh;
      return '<td valign=\"middle\" width="'+w+'"><a href="javascript:hcat_none()" onclick="javascript:NTrees[\''+node.treeView.name+'\'].expandNode('+node.index+')"><img name=\''+node.id()+'nb\' id=\''+node.id()+'nb\' src="' + img + '" width="'+w+'" height="'+h+'" border=0></a></td>\n';
//      return '<td valign=\"middle\" width="'+w+'"><a href="javascript:" onclick="javascript:NTrees[\''+node.treeView.name+'\'].expandNode('+node.index+')"><img name=\''+node.id()+'nb\' id=\''+node.id()+'nb\' src="' + img + '" width="'+w+'" height="'+h+'" border=0></a></td>\n';
    }
    function blankSquare(node,ww) {
      // Insert image and stretch to specified width
      var img = node.treeView.fmt.iE;
      return "<td width=\""+ww+"\"><img src=\"" + img + "\" width="+ww+" height=1 border=0></td>\n"
    }
    function lpnSquare(node) {
        var img = node.hasChildren() ? node.treeView.fmt.pnimg : node.treeView.fmt.lnimg;
        var w = node.treeView.fmt.lpnimgw;
        var h = node.treeView.fmt.lpnimgh;
        return "<td valign=\"middle\" width=\""+w+"\"><img id=\""+node.id()+"lpn\" name=\""+node.id()+"lpn\" src=\"" + img + "\" width="+w+" height="+h+" border=0></td>\n";
    }
  
    var s = '';
    var ll = this.level();
    s += '<table cellpadding='+this.treeView.fmt.pg+' cellspacing='+this.treeView.fmt.sp+' border=0 class="cls'+this.treeView.name+'_back'+ll+'"><tr>';
    //ident
    var idn = this.treeView.fmt.idn(ll);
    if (idn > 0) {
      s += blankSquare(this, idn);
    }
    if (this.treeView.fmt.showB) {
      s += this.hasChildren() ? buttonSquare(this) : blankSquare(this, this.treeView.fmt.Ew);
    }
    if (this.treeView.fmt.showF) {
      s += itemSquare(this);
    }
//    s += '<td width="'+this.ttw+'" nowrap=\"1\"><a class="'+this.treeView.fmt.nstyle(ll)+'" href="'+this.url+'" target="'+this.target+'" onclick="javascript:NTrees[\''+this.treeView.name+'\'].expandNode('+this.index+')">'+this.text+'</a></td>';
    s += '<td><a class="'+this.treeView.fmt.nstyle(ll)+'" href="'+this.url+'" target="'+this.target+'" onclick="javascript:NTrees[\''+this.treeView.name+'\'].expandNode('+this.index+')">'+this.text+'</a></td>';
    // Draw last node/parent node image
    if (this.treeView.fmt.showlpn) {
      s += lpnSquare(this);
    }
    s += '</tr></table>';
    return s;
  }

  this.moveTo = function( x, y ) {
    if (bw.ns4) {
      this.el.moveTo(x,y);
    } else {
      this.el.style.left=x;
      this.el.style.top=y;
    }
  }

  this.show = function(sh)
  {
    if (this.visible == sh) return;
    this.visible = sh;
    var vis = bw.ns4 ? (sh ? 'show': 'hide') : (sh ? 'visible': 'hidden');
    if (bw.ns4)
      this.el.visibility=vis;
    else
      this.el.style.visibility = vis;
  }
  
  this.hideChildren = function() {
    this.show(false);
    this.expanded = false;
    for (var i = 0; i < this.children.length; i++)
      this.children[i].hideChildren();
  }
  
  this.draw = function() {
    var ll = this.treeView.fmt.left;
    //this.treeView.fmt.idn(this.level());
    this.moveTo(this.treeView.fmt.left, this.treeView.currTop);
    if (ll+this.getW() > this.treeView.maxWidth)
      this.treeView.maxWidth = ll+this.getW();
    this.show(true);
    this.treeView.updateImages(this);
    this.treeView.currTop += this.getH();
    if (this.treeView.currTop > this.treeView.maxHeight)
      this.treeView.maxHeight = this.treeView.currTop;
    if (this.expanded && this.hasChildren() )
      for (var i = 0; i < this.children.length; i++)
        this.children[i].draw();
  }
}

function NTreeBack(aleft,atop,color,name) {
  this.left = aleft;
  this.top = atop;
  this.name = name;
  this.color = color;
  this.resize = function(w,h) {
    if (bw.ns4) {
//      this.el.resizeTo(w,h);
    } else {
//      this.el.style.width=w;
//      this.el.style.height=h;
    }
  }
  this.init = function() {
    if (bw.ns4) {
      var bgc = this.color == ""? "" : ' bgcolor="'+this.color+'" ';
      document.write('<layer '+bgc+' top="'+this.top+'" left="'+this.left+'" id="'+this.name+'" z-index="0"></layer>');
      this.el = document.layers[this.name];
    } else {
      document.write('<div id="'+this.name+'" style="background-color:'+this.color+';position:absolute;z-index:0;top:'+this.top+'px;left:'+this.left+'px"></div>');
      this.el = document.all? document.all[this.name] : document.getElementById(this.name); 
    }
  }
  this.init();
}

function hcat_none() {}

function lib_bwcheck() {
  this.ver=navigator.appVersion
  this.agent=navigator.userAgent
  this.dom=document.getElementById?1:0
  this.opera=this.agent.indexOf("Opera")>-1
  this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom && !this.opera)?1:0;
  this.ie6=(this.ver.indexOf("MSIE 6")>-1 && this.dom && !this.opera)?1:0;
  this.ie4=(document.all && !this.dom && !this.opera)?1:0;
  this.ie=this.ie4||this.ie5||this.ie6
  this.mac=this.agent.indexOf("Mac")>-1
  this.ns6=(this.dom && parseInt(this.ver) >= 5) ?1:0;
  this.ns4=(document.layers && !this.dom)?1:0;
  this.bw=(this.ie6 || this.ie5 || this.ie4 || this.ns4 || this.ns6 || this.opera);
}

function und(val) {
  return typeof(val) == 'undefined';
}

var bw = new lib_bwcheck();
var NTrees;
if (typeof(NTrees) == 'undefined') {
  NTrees = new Array();
}