/*

 * FCKeditor - The text editor for Internet - http://www.fckeditor.net

 * Copyright (C) 2003-2007 Frederico Caldeira Knabben

 *

 * == BEGIN LICENSE ==

 *

 * Licensed under the terms of any of the following licenses at your

 * choice:

 *

 *  - GNU General Public License Version 2 or later (the "GPL")

 *    http://www.gnu.org/licenses/gpl.html

 *

 *  - GNU Lesser General Public License Version 2.1 or later (the "LGPL")

 *    http://www.gnu.org/licenses/lgpl.html

 *

 *  - Mozilla Public License Version 1.1 or later (the "MPL")

 *    http://www.mozilla.org/MPL/MPL-1.1.html

 *

 * == END LICENSE ==

 *

 * Scripts related to the Link dialog window (see fck_link.html).

 */

var oEditor		= window.parent.InnerDialogLoaded() ;

var FCK			= oEditor.FCK ;

var FCKLang		= oEditor.FCKLang ;

var FCKConfig	= oEditor.FCKConfig ;

var FCKRegexLib	= oEditor.FCKRegexLib ;

var FCKTools	= oEditor.FCKTools ;

//#### Dialog Tabs

// Set the dialog tabs.

window.parent.AddTab( 'Info', FCKLang.DlgLnkInfoTab ) ;

if ( !FCKConfig.LinkDlgHideTarget )

	window.parent.AddTab( 'Target', FCKLang.DlgLnkTargetTab, true ) ;

if ( FCKConfig.LinkUpload )

	window.parent.AddTab( 'Upload', FCKLang.DlgLnkUpload, true ) ;

if ( !FCKConfig.LinkDlgHideAdvanced )

	window.parent.AddTab( 'Advanced', FCKLang.DlgAdvancedTag ) ;

// Function called when a dialog tag is selected.

function OnDialogTabChange( tabCode )

{

	ShowE('divInfo'		, ( tabCode == 'Info' ) ) ;

	ShowE('divTarget'	, ( tabCode == 'Target' ) ) ;

	ShowE('divUpload'	, ( tabCode == 'Upload' ) ) ;

	ShowE('divAttribs'	, ( tabCode == 'Advanced' ) ) ;

	window.parent.SetAutoSize( true ) ;

}

//#### Regular Expressions library.

var oRegex = new Object() ;

oRegex.UriProtocol = /^(((http|https|ftp|news):\/\/)|mailto:)/gi ;

oRegex.UrlOnChangeProtocol = /^(http|https|ftp|news):\/\/(?=.)/gi ;

oRegex.UrlOnChangeTestOther = /^((javascript:)|[#\/\.])/gi ;

oRegex.ReserveTarget = /^_(blank|self|top|parent)$/i ;

oRegex.PopupUri = /^javascript:void\(\s*window.open\(\s*'([^']+)'\s*,\s*(?:'([^']*)'|null)\s*,\s*'([^']*)'\s*\)\s*\)\s*$/ ;

// Accessible popups

oRegex.OnClickPopup = /^\s*on[cC]lick="\s*window.open\(\s*this\.href\s*,\s*(?:'([^']*)'|null)\s*,\s*'([^']*)'\s*\)\s*;\s*return\s*false;*\s*"$/ ;

oRegex.PopupFeatures = /(?:^|,)([^=]+)=(\d+|yes|no)/gi ;

//#### Parser Functions

var oParser = new Object() ;

oParser.ParseEMailUrl = function( emailUrl )

{

	// Initializes the EMailInfo object.

	var oEMailInfo = new Object() ;

	oEMailInfo.Address	= '' ;

	oEMailInfo.Subject	= '' ;

	oEMailInfo.Body		= '' ;

	var oParts = emailUrl.match( /^([^\?]+)\??(.+)?/ ) ;

	if ( oParts )

	{

		// Set the e-mail address.

		oEMailInfo.Address = oParts[1] ;

		// Look for the optional e-mail parameters.

		if ( oParts[2] )

		{

			var oMatch = oParts[2].match( /(^|&)subject=([^&]+)/i ) ;

			if ( oMatch ) oEMailInfo.Subject = decodeURIComponent( oMatch[2] ) ;

			oMatch = oParts[2].match( /(^|&)body=([^&]+)/i ) ;

			if ( oMatch ) oEMailInfo.Body = decodeURIComponent( oMatch[2] ) ;

		}

	}

	return oEMailInfo ;

}

oParser.CreateEMailUri = function( address, subject, body )

{

	var sBaseUri = 'mailto:' + address ;

	var sParams = '' ;

	if ( subject.length > 0 )

		sParams = '?subject=' + encodeURIComponent( subject ) ;

	if ( body.length > 0 )

	{

		sParams += ( sParams.length == 0 ? '?' : '&' ) ;

		sParams += 'body=' + encodeURIComponent( body ) ;

	}

	return sBaseUri + sParams ;

}

//#### Initialization Code

// oLink: The actual selected link in the editor.

var oLink = FCK.Selection.MoveToAncestorNode( 'A' ) ;

if ( oLink )

	FCK.Selection.SelectNode( oLink ) ;

window.onload = function()

{

	//<!-- linktonode START -->

	init();

	//<!-- linktonode END -->

	// Translate the dialog box texts.

	oEditor.FCKLanguageManager.TranslatePage(document) ;

	// Fill the Anchor Names and Ids combos.

	LoadAnchorNamesAndIds() ;

	// Load the selected link information (if any).

	LoadSelection() ;

	//<!-- linktonode START -->

	// Update the dialog box.

	//SetLinkType( GetE('cmbLinkType').value ) ;

	// Display select box with path/internal only if PathFilter is enabled

	if (FCKConfig.DrupalLinkToContentSelect) 

	{

		GetE('drupalLnkType').style.display='';

	}	

	//<!-- linktonode END -->

	// Show the initial dialog content.

	GetE('divInfo').style.display = '' ;

	// Set the actual uploader URL.

	if ( FCKConfig.LinkUpload )

		GetE('frmUpload').action = FCKConfig.LinkUploadURL ;

	// Set the default target (from configuration).

	SetDefaultTarget() ;

	// Activate the "OK" button.

	window.parent.SetOkButton( true ) ;

}

var bHasAnchors ;

function LoadAnchorNamesAndIds()

{

	// Since version 2.0, the anchors are replaced in the DOM by IMGs so the user see the icon

	// to edit them. So, we must look for that images now.

	var aAnchors = new Array() ;

	var i ;

	var oImages = oEditor.FCK.EditorDocument.getElementsByTagName( 'IMG' ) ;

	for( i = 0 ; i < oImages.length ; i++ )

	{

		if ( oImages[i].getAttribute('_fckanchor') )

			aAnchors[ aAnchors.length ] = oEditor.FCK.GetRealElement( oImages[i] ) ;

	}

	// Add also real anchors

	var oLinks = oEditor.FCK.EditorDocument.getElementsByTagName( 'A' ) ;

	for( i = 0 ; i < oLinks.length ; i++ )

	{

		if ( oLinks[i].name && ( oLinks[i].name.length > 0 ) )

			aAnchors[ aAnchors.length ] = oLinks[i] ;

	}

	var aIds = FCKTools.GetAllChildrenIds( oEditor.FCK.EditorDocument.body ) ;

	bHasAnchors = ( aAnchors.length > 0 || aIds.length > 0 ) ;

	for ( i = 0 ; i < aAnchors.length ; i++ )

	{

		var sName = aAnchors[i].name ;

		if ( sName && sName.length > 0 )

			FCKTools.AddSelectOption( GetE('cmbAnchorName'), sName, sName ) ;

	}

	for ( i = 0 ; i < aIds.length ; i++ )

	{

		FCKTools.AddSelectOption( GetE('cmbAnchorId'), aIds[i], aIds[i] ) ;

	}

	ShowE( 'divSelAnchor'	, bHasAnchors ) ;

	ShowE( 'divNoAnchor'	, !bHasAnchors ) ;

}

function LoadSelection()

{

	if ( !oLink ) return ;

	var sType = 'url' ;

	// Get the actual Link href.

	var sHRef = oLink.getAttribute( '_fcksavedurl' ) ;

	if ( sHRef == null )

		sHRef = oLink.getAttribute( 'href' , 2 ) || '' ;

	// Look for a popup javascript link.

	var oPopupMatch = oRegex.PopupUri.exec( sHRef ) ;

	if( oPopupMatch )

	{

		GetE('cmbTarget').value = 'popup' ;

		sHRef = oPopupMatch[1] ;

		FillPopupFields( oPopupMatch[2], oPopupMatch[3] ) ;

		SetTarget( 'popup' ) ;

	}

	// Accessible popups, the popup data is in the onclick attribute

	if ( !oPopupMatch ) 

	{

		var onclick = oLink.getAttribute( 'onclick_fckprotectedatt' ) ;

		if ( onclick )

		{

			// Decode the protected string

			onclick = decodeURIComponent( onclick ) ;

			oPopupMatch = oRegex.OnClickPopup.exec( onclick ) ;

			if( oPopupMatch )

			{

				GetE( 'cmbTarget' ).value = 'popup' ;

				FillPopupFields( oPopupMatch[1], oPopupMatch[2] ) ;

				SetTarget( 'popup' ) ;

			}

		}

	}

	// Search for the protocol.

	var sProtocol = oRegex.UriProtocol.exec( sHRef ) ;

	if ( sProtocol )

	{

		sProtocol = sProtocol[0].toLowerCase() ;

		GetE('cmbLinkProtocol').value = sProtocol ;

		// Remove the protocol and get the remaining URL.

		var sUrl = sHRef.replace( oRegex.UriProtocol, '' ) ;

		if ( sProtocol == 'mailto:' )	// It is an e-mail link.

		{

			sType = 'email' ;

			var oEMailInfo = oParser.ParseEMailUrl( sUrl ) ;

			GetE('txtEMailAddress').value	= oEMailInfo.Address ;

			GetE('txtEMailSubject').value	= oEMailInfo.Subject ;

			GetE('txtEMailBody').value		= oEMailInfo.Body ;

		}

		else				// It is a normal link.

		{

			sType = 'url' ;

			GetE('txtUrl').value = sUrl ;

		}

	}

	else if ( sHRef.substr(0,1) == '#' && sHRef.length > 1 )	// It is an anchor link.

	{

		sType = 'anchor' ;

		GetE('cmbAnchorName').value = GetE('cmbAnchorId').value = sHRef.substr(1) ;

	}

	else					// It is another type of link.

	{

		sType = 'url' ;

		GetE('cmbLinkProtocol').value = '' ;

		GetE('txtUrl').value = sHRef ;

	}

	if ( !oPopupMatch )

	{

		// Get the target.

		var sTarget = oLink.target ;

		if ( sTarget && sTarget.length > 0 )

		{

			if ( oRegex.ReserveTarget.test( sTarget ) )

			{

				sTarget = sTarget.toLowerCase() ;

				GetE('cmbTarget').value = sTarget ;

			}

			else

				GetE('cmbTarget').value = 'frame' ;

			GetE('txtTargetFrame').value = sTarget ;

		}

	}

	// Get Advances Attributes

	GetE('txtAttId').value			= oLink.id ;

	GetE('txtAttName').value		= oLink.name ;

	GetE('cmbAttLangDir').value		= oLink.dir ;

	GetE('txtAttLangCode').value	= oLink.lang ;

	GetE('txtAttAccessKey').value	= oLink.accessKey ;

	GetE('txtAttTabIndex').value	= oLink.tabIndex <= 0 ? '' : oLink.tabIndex ;

	GetE('txtAttTitle').value		= oLink.title ;

	GetE('txtAttContentType').value	= oLink.type ;

	GetE('txtAttCharSet').value		= oLink.charset ;

	var sClass ;

	if ( oEditor.FCKBrowserInfo.IsIE )

	{

		sClass	= oLink.getAttribute('className',2) || '' ;

		// Clean up temporary classes for internal use:

		sClass = sClass.replace( FCKRegexLib.FCK_Class, '' ) ;

		GetE('txtAttStyle').value	= oLink.style.cssText ;

	}

	else

	{

		sClass	= oLink.getAttribute('class',2) || '' ;

		GetE('txtAttStyle').value	= oLink.getAttribute('style',2) || '' ;

	}

	GetE('txtAttClasses').value	= sClass ;

	// Update the Link type combo.

	GetE('cmbLinkType').value = sType ;

}

//#### Link type selection.

function SetLinkType( linkType )

{

	ShowE('divLinkTypeUrl'		, (linkType == 'url') ) ;

	ShowE('divLinkTypeAnchor'	, (linkType == 'anchor') ) ;

	ShowE('divLinkTypeEMail'	, (linkType == 'email') ) ;

	if ( !FCKConfig.LinkDlgHideTarget )

		window.parent.SetTabVisibility( 'Target'	, (linkType == 'url') ) ;

	if ( FCKConfig.LinkUpload )

		window.parent.SetTabVisibility( 'Upload'	, (linkType == 'url') ) ;

	if ( !FCKConfig.LinkDlgHideAdvanced )

		window.parent.SetTabVisibility( 'Advanced'	, (linkType != 'anchor' || bHasAnchors) ) ;

	if ( linkType == 'email' )