function preinit()
{
	// Initialize
	tinyMCE.setWindowArg('mce_windowresize', false);
}

function init()
{
  if (tinyMCE.isMSIE) {
    tinyMCEPopup.resizeToInnerSize();
  } else {
    tinyMCEPopup.resizeToContent();
  }

  window.focus();
  loadCategories(null);
}

function insertAction()
{
	var inst = tinyMCE.getInstanceById( tinyMCE.getWindowArg( 'editor_id' ) );
	var elm = inst.getFocusElement();

	elm = tinyMCE.getParentElement( elm, "a" );

	tinyMCEPopup.execCommand( "mceBeginUndoLevel" );

	// Create new anchor elements
	if ( elm == null )
  {
    var form = document.forms['elemlist'];
    var sel_option = form.nodelist.options[form.nodelist.selectedIndex];
    if ( sel_option == null )
      return;

		var insertText = '';
		var nid = sel_option.value;
    if ( inst.selection.getSelectedText().length == 0)
    {
      insertText = sel_option.text;
      tinyMCEPopup.execCommand( "mceInsertContent", false, '<a href="' + nid + '">' + insertText + '</a>' );
		} else
		{
      if ( tinyMCE.isSafari )
    	  tinyMCEPopup.execCommand( "mceInsertContent", false, '<a href="' + nid + '">' + inst.selection.getSelectedHTML() + '</a>' );
    	else
    	  tinyMCEPopup.execCommand( "createlink", false, '' + nid );

    		var elementArray = tinyMCE.getElementsByAttributeValue( inst.getBody(), "a", "href", '' + nid );
    		for ( var i=0; i<elementArray.length; i++ )
            {
    			var elm = elementArray[i];

    			// Move cursor behind the new anchor
    			if ( tinyMCE.isGecko )
                {
    				var sp = inst.getDoc().createTextNode(" ");

    				if ( elm.nextSibling )
    					elm.parentNode.insertBefore(sp, elm.nextSibling);
    				else
    					elm.parentNode.appendChild(sp);

    				// Set range after link
    				var rng = inst.getDoc().createRange();
    				rng.setStartAfter(elm);
    				rng.setEndAfter(elm);

    				// Update selection
    				var sel = inst.getSel();
    				sel.removeAllRanges();
    				sel.addRange(rng);
    			}

    			setAllAttribs( elm );
    		}
    	} // end (getSelectedText == 0)
	} else
		setAllAttribs( elm );

	tinyMCE._setEventsEnabled( inst.getBody(), false );
	tinyMCEPopup.execCommand( "mceEndUndoLevel" );
	tinyMCEPopup.close();
}

function setAllAttribs(elm)
{
	var formObj = document.forms[0];
	var target = getSelectValue( formObj, 'nodelist' );

	// Make uri absolute
	// if ( tinyMCE.getParam( 'convert_urls' ) )
		// target = 'node/' + target;
	setAttrib( elm, 'href', convertURL( target, elm ) );

	// Refresh in old MSIE
	if ( tinyMCE.isMSIE5 )
		elm.outerHTML = elm.outerHTML;
}

function convertURL(url, node, on_save)
{
	return eval("tinyMCEPopup.windowOpener." + tinyMCE.settings['urlconverter_callback'] + "(url, node, on_save);");
}

function setAttrib(elm, attrib, value)
{
	var formObj = document.forms[0];
	var valueElm = formObj.elements[attrib.toLowerCase()];

	if (typeof(value) == "undefined" || value == null) {
		value = "";

		if (valueElm)
			value = valueElm.value;
	}

	if (value != "") {
		elm.setAttribute(attrib.toLowerCase(), value);

		if (attrib == "style")
			attrib = "style.cssText";

		if (attrib.substring(0, 2) == 'on')
			value = 'return true;' + value;

		if (attrib == "class")
			attrib = "className";

		eval('elm.' + attrib + "=value;");
	} else
		elm.removeAttribute(attrib);
}

/**
* status box
**/
function statusImg( show )
{
    var status = document.getElementById( 'statusImg' );
    if ( status == null )
    {
        return;
    }
    if ( show )
    {
        status.style.display = 'block';
    } else
    {
        status.style.display = 'none';
    }
}

/*
* functions to provide AJAX-functionality
*/
var request;

function loadCategories( obj )
{
    alert("loadCategories called");
    statusImg( true );
    var catId = '';
    var vId = '';
    if ( obj != null )
    {
        catId = obj.value;
        var fSel = document.getElementById( 'browse_sel_0_sel' );
        if ( fSel !== null )
            vId = fSel.value;
    }

    var url = tinyMCE.baseURL.substring( 0, tinyMCE.baseURL.indexOf( 'modules/' ) );
    if (url.indexOf('sites/') > -1) {
      url = url.substring(0, url.indexOf('sites/'));
    }
    url = url + 'ltc/linktonode';

    alert("tinyMCE.baseURL: " + tinyMCE.baseURL + "\nrequestURL: " + url);

    // native XMLHttpRequest object
    if (window.XMLHttpRequest)
    {
        req = new XMLHttpRequest();
        alert("XMLHttpRequest: " + req);
        req.onreadystatechange = function() {requestDone( obj );};
        var reqStr = '/';
        if ( catId != vId )
            reqStr += vId + '/';
        reqStr += catId;
        alert("send request: " + url + reqStr);
        req.open( "GET", url + reqStr, true );
        req.send( null );
    } else {
      alert("XMLHttpRequest not supported!");
    }
    statusImg( false );
}

function requestDone( obj )
{
    alert("request state: " + req.readyState);
    switch( req.readyState )
    {
        case 1:
        case 2:
        case 3:
            statusImg( true );
            break;
        case 4: // only if req is "loaded"
            alert("request status: " + req.status)
            // only if "OK"
            if (req.status == 200)
            {
                alert(req.responseText);
                results = parseJson(req.responseText);
                if ( obj == null )
                {
                    // create first select
                    createSelect( false, results );
                } else
                {
                    // create child select
                    var selected = obj.value
                    var div_sel = obj.parentNode;
                    _removeDescendant( div_sel );
                    if ( selected == -1 )
                        return;
                    if ( div_sel.nodeName != 'DIV' )
                    {
                        alert( 'wrong DOM!' );
                        return;
                    }
                    createSelect( div_sel, results );
                }
                listNodes( results );
            } else
            {
                alert(req.statusText);
            }
            statusImg( false );
        default:
    } // switch
}

/**
* creates a new select element
**/
function createSelect( parent, results )
{
    var form = document.getElementById( 'form_browse' );
    if ( !form )
    {
        alert( 'Error: form_browse not found!' );
        return;
    }
    var elemname;
    if ( parent == false )
        elemname = 'browse_sel_-1';
    else
        elemname = parent.id;
    var level = parseInt(elemname.substring( elemname.lastIndexOf( "_" )+1, elemname.length ) ) + 1;

    var elemBase = elemname.substring( 0, elemname.lastIndexOf( "_" )+1 );

    if ( results == null || results.category == null || results.category == false )
        return;
    var sel_div = document.createElement( 'div' );
    var attrs = new Array();
    attrs['name'] = elemBase + level;
    attrs['id'] = attrs['name'];
    attrs['style'] = 'display: block; margin: 1px 0; padding: 0; border: 0;';
    for ( attrName in attrs )
        sel_div.setAttribute( attrName, attrs[attrName] );

    form.insertBefore( sel_div, document.getElementById( 'dummy' ) );

    /* create <select> */
    var select = document.createElement( 'select' );
    attrs = new Array();
    attrs['size'] = 1;
    attrs['name'] = elemBase + level + '_sel';
    attrs['id'] = attrs['name'];
    for ( attrName in attrs )
        select.setAttribute( attrName, attrs[attrName] );

    // add Event-Handler
    select.onchange = function(){
            if (this.value == -1){
                _removeDescendant(this.parentNode);
                return;
            }
            loadCategories(this);
        }

    // question: how to make this translatable?
    addOption( select, '<-- select category -->', -1, true );
    addOptions( select, results );
    sel_div.appendChild( select );

    // create image (only if level > 0)
    if ( level > 0 )
    {
        var img = document.createElement( 'img' );
        attrs = new Array();
        attrs['id'] = elemname.substring( 0, elemname.lastIndexOf( "_" )+1 ) + level + '_img';
        attrs['style'] = 'margin: 0px 2px; ';
        attrs['style'] += 'border: 0; ';
        attrs['alt'] = '-';
        attrs['src'] = 'images/descendant.gif';
        for ( attrName in attrs )
            img.setAttribute( attrName, attrs[attrName] );
        // extra margin for IE
        img.style.marginLeft = String( ( parseInt( level ) - 1 ) * 14 ) + 'px';
        img.style.marginRight = '2px';

        sel_div.insertBefore( img, select );
    }
    window.resizeBy( 0, 18 );
}

function listNodes( results )
{
    var nodeList = document.getElementById( 'nodelist' );
    if ( nodeList == null)
    {
        alert( 'Fatal error: nodelist not found!' );
        return;
    }
    clearOptions( nodeList );
    if ( ( results == null ) || ( results.node == null ) || ( results.node == false ) )
    {
        addOption( nodeList, 'no documents found', -2, false );
        return;
    }
    for ( key in results.node )
    {
        addOption( nodeList, results.node[key].title, results.node[key].href, false );
    }
}

function addOptions( target, results )
{
    for ( key in results.category )
    {
        addOption( target, results.category[key].title, results.category[key].tid, false );
    }
}

function addOption( obj, txt, val, selected )
{
    var objOption = new Option( txt, val );
    obj.options.add( objOption );
	if ( selected )
	  obj.selectedIndex = obj.options.length-1;
	obj.disabled = false;
    if ( val == -2 )
	  obj.disabled = true;
}
function clearOptions( select )
{
    select.options.length = 0;
}

/**
* remove "child" elements
**/
function _removeDescendant( elem )
{
    if ( elem == false )
        return;
    var form = document.getElementById( 'form_browse' );
    if ( !form )
    {
        alert( 'Error: form_browse not found!' );
        return;
    }

    var childIndex = elem.id.substring( elem.id.lastIndexOf( "_" )+1, elem.id.length );
    childIndex = parseInt(childIndex) + 1;
    var childName = elem.id.substring( 0, elem.id.lastIndexOf( "_" )+1 ) + childIndex;
    var child = document.getElementById( childName );
    if ( child !== null )
    {
        _removeDescendant( child );
        window.resizeBy( 0, -18 );
        form.removeChild( child );
    }
}