// Node object
function Node(id, pid, name, url, title, target, control, iconOpen, open) {
    this.id = id;
    this.pid = pid;
    this.name = name;
    this.url = url;
    this.title = title;
    this.target = target;
    this.control = control;
    this.iconOpen = iconOpen;
    this._io = open || false;
    this._is = false;
    this._ls = false;
    this._hc = false;
    this._ai = 0;
    this._p;
};

// Tree object
function dTree(objName, RootID, Parrent) {
    this.config = {
        target                  : null,
        useControls             : true,
        folderLinks             : true,
        useSelection            : true,
        useCookies              : false,
        useLines                : false,
        useHovers               : false,
        useIcons                : false,
        useDirfertFirstStyle    : false,
        useStatusText           : true,
        closeSameLevel          : true,
        disabled                : false,
        inOrder                 : false
    }
    this.icon = {
        space               : 'img/space.gif',
        empty               : 'img/empty.gif',
        emptyHover          : 'img/empty_hover.gif',
        nlPlus              : 'img/nolines_plus.gif',
        nlMinus             : 'img/nolines_minus.gif',
        nlPlusHover         : 'img/nolines_plus_hover.gif',
        nlMinusHover        : 'img/nolines_minus_hover.gif'
    };

    this.obj = objName;
    this.aNodes = [];
    this.aIndent = [];
    this.parrent = Parrent;
    this.root = new Node(RootID);
    this.selectedNode = null;
    this.selectedFound = false;
    this.completed = false;
};

// Adds a new node to the node array
dTree.prototype.add = function(id, pid, name, url, title, target, control, iconOpen, open) {
    this.aNodes[this.aNodes.length] = new Node(id, pid, name, url, title, target, control, iconOpen, open);
};

// Open/close all nodes
dTree.prototype.openAll = function() {
    this.oAll(true);
};
dTree.prototype.closeAll = function() {
    this.oAll(false);
};

// Outputs the tree to the page
dTree.prototype.toString = function() {
    var str = '<table cellpadding="0" cellspacing="0" border="0" class="dTree"><tr><td>\n';
    if (document.getElementById) {
        if (this.config.useCookies) this.selectedNode = this.getSelected();
        str += this.addNode(this.root);
    } else str += 'Browser not supported. to view menu';
    str += '</td></tr></table>';
    if (!this.selectedFound) this.selectedNode = null;
    this.completed = true;
    //alert (str);
    return str;
};

// Creates the tree structure
dTree.prototype.addNode = function(pNode) {
    var str = '';
    var n=0;
    if (this.config.inOrder) n = pNode._ai;
    for (n; n<this.aNodes.length; n++) {
        if (this.aNodes[n].pid == pNode.id) {
            var cn = this.aNodes[n];
            cn._p = pNode;
            cn._ai = n;
            this.setCS(cn);
            if (!cn.target && this.config.target) cn.target = this.config.target;
            if (cn._hc && !cn._io && this.config.useCookies) cn._io = this.isOpen(cn.id);
            if (!this.config.folderLinks && cn._hc) cn.url = null;
            if (this.config.useSelection && cn.id == this.selectedNode && !this.selectedFound) {
                    cn._is = true;
                    this.selectedNode = n;
                    this.selectedFound = true;
            }
            str += this.node(cn, n);
            if (cn._ls) break;
        }
    }
    return str;
};

// Creates the node icon, url and text
dTree.prototype.node = function(node, nodeId) {
    var str = '';
    var tableclass = "dTreeNode";
    if (this.config.useDirfertFirstStyle) {
        if (node.pid == this.parrent) {
            tableclass = "dTreeNodeF";
        }
    }

    if (this.root.id != node.pid) {
        str += '<table cellpadding="0" cellspacing="0" border="0" class="'+ tableclass +'"><tr><td valign="top" style="white-space:nowrap;">'+this.controls(node)+'</td><td valign="top">' + this.indent(node, nodeId)+"</td>";
        str += '<td class="' + ((this.config.useSelection) ? ((node._is ? 'dTreeNodeLinkTDSel' : 'dTreeNodeLinkTD')) : 'dTreeNodeLinkTD') + '">';
        if (node.url) {
            str += '<a id="s' + this.obj + nodeId + '" class="' + ((this.config.useSelection) ? ((node._is ? 'nodeSel' : 'node')) : 'node') + '" href="' + node.url + '"';
            if (node.title) str += ' title="' + node.title + '"';
            if (node.target) str += ' target="' + node.target + '"';
            if (this.config.useHovers) str += ' onmouseover="javascript: ' + this.obj + '.ov(' + nodeId + ');" onmouseout="javascript: ' + this.obj + '.ou(' + nodeId + ');" ';
            if (this.config.useSelection && ((node._hc && this.config.folderLinks) || !node._hc))
                str += ' onclick="javascript: ' + this.obj + '.s(' + nodeId + ');"';
            str += '>';
        } else {
            if ((!this.config.folderLinks || !node.url) && node._hc && node.pid != this.root.id) {
                str += '<a  href="javascript: ' + this.obj + '.o(' + nodeId + ');"'
                if (node.title) str += ' title="' + node.title + '"';
                if (this.config.useHovers) str += ' onmouseover="javascript: ' + this.obj + '.ov(' + nodeId + ');" onmouseout="javascript: ' + this.obj + '.ou(' + nodeId + ');" ';
                str += 'class="' + ((this.config.useSelection) ? ((node._is ? 'nodeSel' : 'node')) : 'node') + '">';
            }
        }
        str += node.name;
        if (node.url || ((!this.config.folderLinks || !node.url) && node._hc) && this.root.id != node.pid) str += '</a>';
        if (node.id == "8") {
            str += '<span id="mm_new">&nbsp;</span>';
        }

        str += "</td></tr></table>\n";
    } else {
        str += '<table cellpadding="0" cellspacing="0" border="0" class="'+ tableclass +'"><tr><td valign="top" style="white-space:nowrap;">'+this.controls(node)+'</td><td valign="top">' + this.indent(node, nodeId)+"</td>";
        str += '<td class="title_white" style="padding:0px;padding-bottom: 7px;">';
        str += node.name;
        str += "</td></tr></table>\n";
    }
    if (node._hc) {
        str += '<table cellpadding="0" cellspacing="0" border="0" id="d' + this.obj + nodeId + '" class="clip" style="display:' + ((this.root.id == node.pid || node._io) ? '' : 'none') + ';">'+"\n"+'<tr>'+"\n";
        if (this.root.id != node.pid) {
            str += '<td>'+"\n";
        } else {
            str += '<td style="padding-left:20px;">'+"\n";
        }
        str += this.addNode(node);
        str += '</td>'+"\n"+'</tr>'+"\n"+'</table>';

    }
    this.aIndent.pop();
    return str;
};

dTree.prototype.controls = function (node) {
    var str = '';
    if (!this.config.useControls ) return str;
    return str;
};
// Adds the empty and line icons
dTree.prototype.indent = function(node, nodeId) {
    var str = '';
    if (this.root.id != node.pid) {
        for (var n=0; n<this.aIndent.length; n++) {
            str += '<td class="dTreeEmptyImage"><img src="' + this.icon.space + '" alt="" /></td>';
        }
        (node._ls) ? this.aIndent.push(0) : this.aIndent.push(1);
        if (node._hc) {
            str += '<td class="dTreeAction">';
            if (this.config.disabled == false)  {
                str += '<a href="javascript: ' + this.obj + '.o(' + nodeId + ');">';
            }
            str += '<img id="j' + this.obj + nodeId + '" src="';
            str += (node._io) ? this.icon.nlMinus : this.icon.nlPlus;
            str += '"';
            if (this.config.useHovers) str += ' onmouseover="javascript: ' + this.obj + '.ov(' + nodeId + ');" onmouseout="javascript: ' + this.obj + '.ou(' + nodeId + ');" ';
            str += 'alt="" />';
            if (this.config.disabled == false)  {
                str += '</a>';
            }
            str += '</td>';
        } else str += '<td class="dTreeAction"><img src="' + this.icon.empty + '" id="e' + this.obj + nodeId + '" alt="" /></td>';
    }
    return str;
};

// Checks if a node has any children and if it is the last sibling
dTree.prototype.setCS = function(node) {
    var lastId;
    for (var n=0; n<this.aNodes.length; n++) {
        if (this.aNodes[n].pid == node.id) node._hc = true;
        if (this.aNodes[n].pid == node.pid) lastId = this.aNodes[n].id;
    }
    if (lastId==node.id) node._ls = true;
};

// Returns the selected node
dTree.prototype.getSelected = function() {
    var sn = this.getCookie('cs' + this.obj);
    return (sn) ? sn : null;
};

// Highlights the selected node
dTree.prototype.s = function(id) {
    if (!this.config.useSelection) return;
    var cn = this.aNodes[id];
    if (cn._hc && !this.config.folderLinks) return;
    if (this.selectedNode != id) {
        if (this.selectedNode || this.selectedNode==0) {
            eOld = document.getElementById("s" + this.obj + this.selectedNode);
            eOld.className = "node";
            eOld.parentNode.parentNode.className = "";
        }
        if (document.getElementById("e" + this.obj + id)) {
            document.getElementById("e" + this.obj + id).src = this.icon.emptyHover;
        } else {
            document.getElementById('j' + this.obj + id).src = (this.aNodes[id]._io) ? this.icon.nlMinusHover : this.icon.nlPlusHover;
        }
        eNew = document.getElementById("s" + this.obj + id);
        eNew.className = "nodeSel";
        eNew.parentNode.parentNode.className = "dTreeNodeLinkTDSel";
        this.selectedNode = id;
        if (this.config.useCookies) this.setCookie('cs' + this.obj, cn.id);
    }
};

dTree.prototype.ov = function(id) {
    if (document.getElementById("e" + this.obj + id)) {
        document.getElementById("e" + this.obj + id).src = this.icon.emptyHover;
    } else {
    document.getElementById('j' + this.obj + id).src = (this.aNodes[id]._io) ? this.icon.nlMinusHover : this.icon.nlPlusHover;
    }
};

dTree.prototype.ou = function(id) {
     if (document.getElementById("e" + this.obj + id)) {
        document.getElementById("e" + this.obj + id).src = this.icon.empty;
    } else {
        document.getElementById('j' + this.obj + id).src = (this.aNodes[id]._io) ? this.icon.nlMinus : this.icon.nlPlus;
    }
};


// Toggle Open or close
dTree.prototype.o = function(id) {
    var cn = this.aNodes[id];
    this.nodeStatus(!cn._io, id, cn._ls);
    cn._io = !cn._io;
    if (this.config.closeSameLevel) this.closeLevel(cn);
    if (this.config.useCookies) this.updateCookie();
};

// Open or close all nodes
dTree.prototype.oAll = function(status) {
    for (var n=0; n<this.aNodes.length; n++) {
        if (this.aNodes[n]._hc && this.aNodes[n].pid != this.root.id) {
            this.nodeStatus(status, n, this.aNodes[n]._ls)
            this.aNodes[n]._io = status;
        }
    }
    if (this.config.useCookies) this.updateCookie();
};

// Opens the tree to a specific node
dTree.prototype.openTo = function(nId, bSelect, bFirst) {
    if (!bFirst) {
        for (var n=0; n<this.aNodes.length; n++) {
            if (this.aNodes[n].id == nId) {
                nId=n;
                break;
            }
        }
    }
    var cn=this.aNodes[nId];
    if (cn.pid==this.root.id || !cn._p) return;

    cn._io = true;
    cn._is = bSelect;
    if (this.completed && cn._hc) this.nodeStatus(true, cn._ai, cn._ls);
    if (this.completed && bSelect) this.s(cn._ai);
    else if (bSelect) this._sn=cn._ai;
    this.openTo(cn._p._ai, false, true);
};

// Closes all nodes on the same level as certain node
dTree.prototype.closeLevel = function(node) {
    for (var n=0; n<this.aNodes.length; n++) {
        if (this.aNodes[n].pid == node.pid && this.aNodes[n].id != node.id && this.aNodes[n]._hc) {
            this.nodeStatus(false, n, this.aNodes[n]._ls);
            this.aNodes[n]._io = false;
            //this.closeAllChildren(this.aNodes[n]);
        }
    }
}

// Change the status of a node(open or closed)
dTree.prototype.nodeStatus = function(status, id, bottom) {
    eDiv    = document.getElementById('d' + this.obj + id);
    eJoin   = document.getElementById('j' + this.obj + id);
    eJoin.src = (status)?this.icon.nlMinus:this.icon.nlPlus;
    eDiv.style.display = (status) ? '': 'none';
    var Hide   = document.getElementById('s' + this.obj + id).getAttribute("hide");
};


// If Push and pop is not implemented by the browser
if (!Array.prototype.push) {
    Array.prototype.push = function array_push() {
        for(var i=0;i<arguments.length;i++)
            this[this.length]=arguments[i];
        return this.length;
    }
};
if (!Array.prototype.pop) {
    Array.prototype.pop = function array_pop() {
        lastElement = this[this.length-1];
        this.length = Math.max(this.length-1,0);
        return lastElement;
    }
};