update address standardization for cust_location changes
[freeside.git] / rt / share / html / NoAuth / RichText / FCKeditor / editor / dialog / fck_link / fck_link.js
diff --git a/rt/share/html/NoAuth/RichText/FCKeditor/editor/dialog/fck_link/fck_link.js b/rt/share/html/NoAuth/RichText/FCKeditor/editor/dialog/fck_link/fck_link.js
deleted file mode 100644 (file)
index 1c661eb..0000000
+++ /dev/null
@@ -1,893 +0,0 @@
-/*\r
- * FCKeditor - The text editor for Internet - http://www.fckeditor.net\r
- * Copyright (C) 2003-2009 Frederico Caldeira Knabben\r
- *\r
- * == BEGIN LICENSE ==\r
- *\r
- * Licensed under the terms of any of the following licenses at your\r
- * choice:\r
- *\r
- *  - GNU General Public License Version 2 or later (the "GPL")\r
- *    http://www.gnu.org/licenses/gpl.html\r
- *\r
- *  - GNU Lesser General Public License Version 2.1 or later (the "LGPL")\r
- *    http://www.gnu.org/licenses/lgpl.html\r
- *\r
- *  - Mozilla Public License Version 1.1 or later (the "MPL")\r
- *    http://www.mozilla.org/MPL/MPL-1.1.html\r
- *\r
- * == END LICENSE ==\r
- *\r
- * Scripts related to the Link dialog window (see fck_link.html).\r
- */\r
-\r
-var dialog     = window.parent ;\r
-var oEditor = dialog.InnerDialogLoaded() ;\r
-\r
-var FCK                        = oEditor.FCK ;\r
-var FCKLang            = oEditor.FCKLang ;\r
-var FCKConfig  = oEditor.FCKConfig ;\r
-var FCKRegexLib        = oEditor.FCKRegexLib ;\r
-var FCKTools   = oEditor.FCKTools ;\r
-\r
-//#### Dialog Tabs\r
-\r
-// Set the dialog tabs.\r
-dialog.AddTab( 'Info', FCKLang.DlgLnkInfoTab ) ;\r
-\r
-if ( !FCKConfig.LinkDlgHideTarget )\r
-       dialog.AddTab( 'Target', FCKLang.DlgLnkTargetTab, true ) ;\r
-\r
-if ( FCKConfig.LinkUpload )\r
-       dialog.AddTab( 'Upload', FCKLang.DlgLnkUpload, true ) ;\r
-\r
-if ( !FCKConfig.LinkDlgHideAdvanced )\r
-       dialog.AddTab( 'Advanced', FCKLang.DlgAdvancedTag ) ;\r
-\r
-// Function called when a dialog tag is selected.\r
-function OnDialogTabChange( tabCode )\r
-{\r
-       ShowE('divInfo'         , ( tabCode == 'Info' ) ) ;\r
-       ShowE('divTarget'       , ( tabCode == 'Target' ) ) ;\r
-       ShowE('divUpload'       , ( tabCode == 'Upload' ) ) ;\r
-       ShowE('divAttribs'      , ( tabCode == 'Advanced' ) ) ;\r
-\r
-       dialog.SetAutoSize( true ) ;\r
-}\r
-\r
-//#### Regular Expressions library.\r
-var oRegex = new Object() ;\r
-\r
-oRegex.UriProtocol = /^(((http|https|ftp|news):\/\/)|mailto:)/gi ;\r
-\r
-oRegex.UrlOnChangeProtocol = /^(http|https|ftp|news):\/\/(?=.)/gi ;\r
-\r
-oRegex.UrlOnChangeTestOther = /^((javascript:)|[#\/\.])/gi ;\r
-\r
-oRegex.ReserveTarget = /^_(blank|self|top|parent)$/i ;\r
-\r
-oRegex.PopupUri = /^javascript:void\(\s*window.open\(\s*'([^']+)'\s*,\s*(?:'([^']*)'|null)\s*,\s*'([^']*)'\s*\)\s*\)\s*$/ ;\r
-\r
-// Accessible popups\r
-oRegex.OnClickPopup = /^\s*on[cC]lick="\s*window.open\(\s*this\.href\s*,\s*(?:'([^']*)'|null)\s*,\s*'([^']*)'\s*\)\s*;\s*return\s*false;*\s*"$/ ;\r
-\r
-oRegex.PopupFeatures = /(?:^|,)([^=]+)=(\d+|yes|no)/gi ;\r
-\r
-//#### Parser Functions\r
-\r
-var oParser = new Object() ;\r
-\r
-// This method simply returns the two inputs in numerical order. You can even\r
-// provide strings, as the method would parseInt() the values.\r
-oParser.SortNumerical = function(a, b)\r
-{\r
-       return parseInt( a, 10 ) - parseInt( b, 10 ) ;\r
-}\r
-\r
-oParser.ParseEMailParams = function(sParams)\r
-{\r
-       // Initialize the oEMailParams object.\r
-       var oEMailParams = new Object() ;\r
-       oEMailParams.Subject = '' ;\r
-       oEMailParams.Body = '' ;\r
-\r
-       var aMatch = sParams.match( /(^|^\?|&)subject=([^&]+)/i ) ;\r
-       if ( aMatch ) oEMailParams.Subject = decodeURIComponent( aMatch[2] ) ;\r
-\r
-       aMatch = sParams.match( /(^|^\?|&)body=([^&]+)/i ) ;\r
-       if ( aMatch ) oEMailParams.Body = decodeURIComponent( aMatch[2] ) ;\r
-\r
-       return oEMailParams ;\r
-}\r
-\r
-// This method returns either an object containing the email info, or FALSE\r
-// if the parameter is not an email link.\r
-oParser.ParseEMailUri = function( sUrl )\r
-{\r
-       // Initializes the EMailInfo object.\r
-       var oEMailInfo = new Object() ;\r
-       oEMailInfo.Address = '' ;\r
-       oEMailInfo.Subject = '' ;\r
-       oEMailInfo.Body = '' ;\r
-\r
-       var aLinkInfo = sUrl.match( /^(\w+):(.*)$/ ) ;\r
-       if ( aLinkInfo && aLinkInfo[1] == 'mailto' )\r
-       {\r
-               // This seems to be an unprotected email link.\r
-               var aParts = aLinkInfo[2].match( /^([^\?]+)\??(.+)?/ ) ;\r
-               if ( aParts )\r
-               {\r
-                       // Set the e-mail address.\r
-                       oEMailInfo.Address = aParts[1] ;\r
-\r
-                       // Look for the optional e-mail parameters.\r
-                       if ( aParts[2] )\r
-                       {\r
-                               var oEMailParams = oParser.ParseEMailParams( aParts[2] ) ;\r
-                               oEMailInfo.Subject = oEMailParams.Subject ;\r
-                               oEMailInfo.Body = oEMailParams.Body ;\r
-                       }\r
-               }\r
-               return oEMailInfo ;\r
-       }\r
-       else if ( aLinkInfo && aLinkInfo[1] == 'javascript' )\r
-       {\r
-               // This may be a protected email.\r
-\r
-               // Try to match the url against the EMailProtectionFunction.\r
-               var func = FCKConfig.EMailProtectionFunction ;\r
-               if ( func != null )\r
-               {\r
-                       try\r
-                       {\r
-                               // Escape special chars.\r
-                               func = func.replace( /([\/^$*+.?()\[\]])/g, '\\$1' ) ;\r
-\r
-                               // Define the possible keys.\r
-                               var keys = new Array('NAME', 'DOMAIN', 'SUBJECT', 'BODY') ;\r
-\r
-                               // Get the order of the keys (hold them in the array <pos>) and\r
-                               // the function replaced by regular expression patterns.\r
-                               var sFunc = func ;\r
-                               var pos = new Array() ;\r
-                               for ( var i = 0 ; i < keys.length ; i ++ )\r
-                               {\r
-                                       var rexp = new RegExp( keys[i] ) ;\r
-                                       var p = func.search( rexp ) ;\r
-                                       if ( p >= 0 )\r
-                                       {\r
-                                               sFunc = sFunc.replace( rexp, '\'([^\']*)\'' ) ;\r
-                                               pos[pos.length] = p + ':' + keys[i] ;\r
-                                       }\r
-                               }\r
-\r
-                               // Sort the available keys.\r
-                               pos.sort( oParser.SortNumerical ) ;\r
-\r
-                               // Replace the excaped single quotes in the url, such they do\r
-                               // not affect the regexp afterwards.\r
-                               aLinkInfo[2] = aLinkInfo[2].replace( /\\'/g, '###SINGLE_QUOTE###' ) ;\r
-\r
-                               // Create the regexp and execute it.\r
-                               var rFunc = new RegExp( '^' + sFunc + '$' ) ;\r
-                               var aMatch = rFunc.exec( aLinkInfo[2] ) ;\r
-                               if ( aMatch )\r
-                               {\r
-                                       var aInfo = new Array();\r
-                                       for ( var i = 1 ; i < aMatch.length ; i ++ )\r
-                                       {\r
-                                               var k = pos[i-1].match(/^\d+:(.+)$/) ;\r
-                                               aInfo[k[1]] = aMatch[i].replace(/###SINGLE_QUOTE###/g, '\'') ;\r
-                                       }\r
-\r
-                                       // Fill the EMailInfo object that will be returned\r
-                                       oEMailInfo.Address = aInfo['NAME'] + '@' + aInfo['DOMAIN'] ;\r
-                                       oEMailInfo.Subject = decodeURIComponent( aInfo['SUBJECT'] ) ;\r
-                                       oEMailInfo.Body = decodeURIComponent( aInfo['BODY'] ) ;\r
-\r
-                                       return oEMailInfo ;\r
-                               }\r
-                       }\r
-                       catch (e)\r
-                       {\r
-                       }\r
-               }\r
-\r
-               // Try to match the email against the encode protection.\r
-               var aMatch = aLinkInfo[2].match( /^(?:void\()?location\.href='mailto:'\+(String\.fromCharCode\([\d,]+\))\+'(.*)'\)?$/ ) ;\r
-               if ( aMatch )\r
-               {\r
-                       // The link is encoded\r
-                       oEMailInfo.Address = eval( aMatch[1] ) ;\r
-                       if ( aMatch[2] )\r
-                       {\r
-                               var oEMailParams = oParser.ParseEMailParams( aMatch[2] ) ;\r
-                               oEMailInfo.Subject = oEMailParams.Subject ;\r
-                               oEMailInfo.Body = oEMailParams.Body ;\r
-                       }\r
-                       return oEMailInfo ;\r
-               }\r
-       }\r
-       return false;\r
-}\r
-\r
-oParser.CreateEMailUri = function( address, subject, body )\r
-{\r
-       // Switch for the EMailProtection setting.\r
-       switch ( FCKConfig.EMailProtection )\r
-       {\r
-               case 'function' :\r
-                       var func = FCKConfig.EMailProtectionFunction ;\r
-                       if ( func == null )\r
-                       {\r
-                               if ( FCKConfig.Debug )\r
-                               {\r
-                                       alert('EMailProtection alert!\nNo function defined. Please set "FCKConfig.EMailProtectionFunction"') ;\r
-                               }\r
-                               return '';\r
-                       }\r
-\r
-                       // Split the email address into name and domain parts.\r
-                       var aAddressParts = address.split( '@', 2 ) ;\r
-                       if ( aAddressParts[1] == undefined )\r
-                       {\r
-                               aAddressParts[1] = '' ;\r
-                       }\r
-\r
-                       // Replace the keys by their values (embedded in single quotes).\r
-                       func = func.replace(/NAME/g, "'" + aAddressParts[0].replace(/'/g, '\\\'') + "'") ;\r
-                       func = func.replace(/DOMAIN/g, "'" + aAddressParts[1].replace(/'/g, '\\\'') + "'") ;\r
-                       func = func.replace(/SUBJECT/g, "'" + encodeURIComponent( subject ).replace(/'/g, '\\\'') + "'") ;\r
-                       func = func.replace(/BODY/g, "'" + encodeURIComponent( body ).replace(/'/g, '\\\'') + "'") ;\r
-\r
-                       return 'javascript:' + func ;\r
-\r
-               case 'encode' :\r
-                       var aParams = [] ;\r
-                       var aAddressCode = [] ;\r
-\r
-                       if ( subject.length > 0 )\r
-                               aParams.push( 'subject='+ encodeURIComponent( subject ) ) ;\r
-                       if ( body.length > 0 )\r
-                               aParams.push( 'body=' + encodeURIComponent( body ) ) ;\r
-                       for ( var i = 0 ; i < address.length ; i++ )\r
-                               aAddressCode.push( address.charCodeAt( i ) ) ;\r
-\r
-                       return 'javascript:void(location.href=\'mailto:\'+String.fromCharCode(' + aAddressCode.join( ',' ) + ')+\'?' + aParams.join( '&' ) + '\')' ;\r
-       }\r
-\r
-       // EMailProtection 'none'\r
-\r
-       var sBaseUri = 'mailto:' + address ;\r
-\r
-       var sParams = '' ;\r
-\r
-       if ( subject.length > 0 )\r
-               sParams = '?subject=' + encodeURIComponent( subject ) ;\r
-\r
-       if ( body.length > 0 )\r
-       {\r
-               sParams += ( sParams.length == 0 ? '?' : '&' ) ;\r
-               sParams += 'body=' + encodeURIComponent( body ) ;\r
-       }\r
-\r
-       return sBaseUri + sParams ;\r
-}\r
-\r
-//#### Initialization Code\r
-\r
-// oLink: The actual selected link in the editor.\r
-var oLink = dialog.Selection.GetSelection().MoveToAncestorNode( 'A' ) ;\r
-if ( oLink )\r
-       FCK.Selection.SelectNode( oLink ) ;\r
-\r
-window.onload = function()\r
-{\r
-       // Translate the dialog box texts.\r
-       oEditor.FCKLanguageManager.TranslatePage(document) ;\r
-\r
-       // Fill the Anchor Names and Ids combos.\r
-       LoadAnchorNamesAndIds() ;\r
-\r
-       // Load the selected link information (if any).\r
-       LoadSelection() ;\r
-\r
-       // Update the dialog box.\r
-       SetLinkType( GetE('cmbLinkType').value ) ;\r
-\r
-       // Show/Hide the "Browse Server" button.\r
-       GetE('divBrowseServer').style.display = FCKConfig.LinkBrowser ? '' : 'none' ;\r
-\r
-       // Show the initial dialog content.\r
-       GetE('divInfo').style.display = '' ;\r
-\r
-       // Set the actual uploader URL.\r
-       if ( FCKConfig.LinkUpload )\r
-               GetE('frmUpload').action = FCKConfig.LinkUploadURL ;\r
-\r
-       // Set the default target (from configuration).\r
-       SetDefaultTarget() ;\r
-\r
-       // Activate the "OK" button.\r
-       dialog.SetOkButton( true ) ;\r
-\r
-       // Select the first field.\r
-       switch( GetE('cmbLinkType').value )\r
-       {\r
-               case 'url' :\r
-                       SelectField( 'txtUrl' ) ;\r
-                       break ;\r
-               case 'email' :\r
-                       SelectField( 'txtEMailAddress' ) ;\r
-                       break ;\r
-               case 'anchor' :\r
-                       if ( GetE('divSelAnchor').style.display != 'none' )\r
-                               SelectField( 'cmbAnchorName' ) ;\r
-                       else\r
-                               SelectField( 'cmbLinkType' ) ;\r
-       }\r
-}\r
-\r
-var bHasAnchors ;\r
-\r
-function LoadAnchorNamesAndIds()\r
-{\r
-       // Since version 2.0, the anchors are replaced in the DOM by IMGs so the user see the icon\r
-       // to edit them. So, we must look for that images now.\r
-       var aAnchors = new Array() ;\r
-       var i ;\r
-       var oImages = oEditor.FCK.EditorDocument.getElementsByTagName( 'IMG' ) ;\r
-       for( i = 0 ; i < oImages.length ; i++ )\r
-       {\r
-               if ( oImages[i].getAttribute('_fckanchor') )\r
-                       aAnchors[ aAnchors.length ] = oEditor.FCK.GetRealElement( oImages[i] ) ;\r
-       }\r
-\r
-       // Add also real anchors\r
-       var oLinks = oEditor.FCK.EditorDocument.getElementsByTagName( 'A' ) ;\r
-       for( i = 0 ; i < oLinks.length ; i++ )\r
-       {\r
-               if ( oLinks[i].name && ( oLinks[i].name.length > 0 ) )\r
-                       aAnchors[ aAnchors.length ] = oLinks[i] ;\r
-       }\r
-\r
-       var aIds = FCKTools.GetAllChildrenIds( oEditor.FCK.EditorDocument.body ) ;\r
-\r
-       bHasAnchors = ( aAnchors.length > 0 || aIds.length > 0 ) ;\r
-\r
-       for ( i = 0 ; i < aAnchors.length ; i++ )\r
-       {\r
-               var sName = aAnchors[i].name ;\r
-               if ( sName && sName.length > 0 )\r
-                       FCKTools.AddSelectOption( GetE('cmbAnchorName'), sName, sName ) ;\r
-       }\r
-\r
-       for ( i = 0 ; i < aIds.length ; i++ )\r
-       {\r
-               FCKTools.AddSelectOption( GetE('cmbAnchorId'), aIds[i], aIds[i] ) ;\r
-       }\r
-\r
-       ShowE( 'divSelAnchor'   , bHasAnchors ) ;\r
-       ShowE( 'divNoAnchor'    , !bHasAnchors ) ;\r
-}\r
-\r
-function LoadSelection()\r
-{\r
-       if ( !oLink ) return ;\r
-\r
-       var sType = 'url' ;\r
-\r
-       // Get the actual Link href.\r
-       var sHRef = oLink.getAttribute( '_fcksavedurl' ) ;\r
-       if ( sHRef == null )\r
-               sHRef = oLink.getAttribute( 'href' , 2 ) || '' ;\r
-\r
-       // Look for a popup javascript link.\r
-       var oPopupMatch = oRegex.PopupUri.exec( sHRef ) ;\r
-       if( oPopupMatch )\r
-       {\r
-               GetE('cmbTarget').value = 'popup' ;\r
-               sHRef = oPopupMatch[1] ;\r
-               FillPopupFields( oPopupMatch[2], oPopupMatch[3] ) ;\r
-               SetTarget( 'popup' ) ;\r
-       }\r
-\r
-       // Accessible popups, the popup data is in the onclick attribute\r
-       if ( !oPopupMatch )\r
-       {\r
-               var onclick = oLink.getAttribute( 'onclick_fckprotectedatt' ) ;\r
-               if ( onclick )\r
-               {\r
-                       // Decode the protected string\r
-                       onclick = decodeURIComponent( onclick ) ;\r
-\r
-                       oPopupMatch = oRegex.OnClickPopup.exec( onclick ) ;\r
-                       if( oPopupMatch )\r
-                       {\r
-                               GetE( 'cmbTarget' ).value = 'popup' ;\r
-                               FillPopupFields( oPopupMatch[1], oPopupMatch[2] ) ;\r
-                               SetTarget( 'popup' ) ;\r
-                       }\r
-               }\r
-       }\r
-\r
-       // Search for the protocol.\r
-       var sProtocol = oRegex.UriProtocol.exec( sHRef ) ;\r
-\r
-       // Search for a protected email link.\r
-       var oEMailInfo = oParser.ParseEMailUri( sHRef );\r
-\r
-       if ( oEMailInfo )\r
-       {\r
-               sType = 'email' ;\r
-\r
-               GetE('txtEMailAddress').value = oEMailInfo.Address ;\r
-               GetE('txtEMailSubject').value = oEMailInfo.Subject ;\r
-               GetE('txtEMailBody').value    = oEMailInfo.Body ;\r
-       }\r
-       else if ( sProtocol )\r
-       {\r
-               sProtocol = sProtocol[0].toLowerCase() ;\r
-               GetE('cmbLinkProtocol').value = sProtocol ;\r
-\r
-               // Remove the protocol and get the remaining URL.\r
-               var sUrl = sHRef.replace( oRegex.UriProtocol, '' ) ;\r
-               sType = 'url' ;\r
-               GetE('txtUrl').value = sUrl ;\r
-       }\r
-       else if ( sHRef.substr(0,1) == '#' && sHRef.length > 1 )        // It is an anchor link.\r
-       {\r
-               sType = 'anchor' ;\r
-               GetE('cmbAnchorName').value = GetE('cmbAnchorId').value = sHRef.substr(1) ;\r
-       }\r
-       else                                    // It is another type of link.\r
-       {\r
-               sType = 'url' ;\r
-\r
-               GetE('cmbLinkProtocol').value = '' ;\r
-               GetE('txtUrl').value = sHRef ;\r
-       }\r
-\r
-       if ( !oPopupMatch )\r
-       {\r
-               // Get the target.\r
-               var sTarget = oLink.target ;\r
-\r
-               if ( sTarget && sTarget.length > 0 )\r
-               {\r
-                       if ( oRegex.ReserveTarget.test( sTarget ) )\r
-                       {\r
-                               sTarget = sTarget.toLowerCase() ;\r
-                               GetE('cmbTarget').value = sTarget ;\r
-                       }\r
-                       else\r
-                               GetE('cmbTarget').value = 'frame' ;\r
-                       GetE('txtTargetFrame').value = sTarget ;\r
-               }\r
-       }\r
-\r
-       // Get Advances Attributes\r
-       GetE('txtAttId').value                  = oLink.id ;\r
-       GetE('txtAttName').value                = oLink.name ;\r
-       GetE('cmbAttLangDir').value             = oLink.dir ;\r
-       GetE('txtAttLangCode').value    = oLink.lang ;\r
-       GetE('txtAttAccessKey').value   = oLink.accessKey ;\r
-       GetE('txtAttTabIndex').value    = oLink.tabIndex <= 0 ? '' : oLink.tabIndex ;\r
-       GetE('txtAttTitle').value               = oLink.title ;\r
-       GetE('txtAttContentType').value = oLink.type ;\r
-       GetE('txtAttCharSet').value             = oLink.charset ;\r
-\r
-       var sClass ;\r
-       if ( oEditor.FCKBrowserInfo.IsIE )\r
-       {\r
-               sClass  = oLink.getAttribute('className',2) || '' ;\r
-               // Clean up temporary classes for internal use:\r
-               sClass = sClass.replace( FCKRegexLib.FCK_Class, '' ) ;\r
-\r
-               GetE('txtAttStyle').value       = oLink.style.cssText ;\r
-       }\r
-       else\r
-       {\r
-               sClass  = oLink.getAttribute('class',2) || '' ;\r
-               GetE('txtAttStyle').value       = oLink.getAttribute('style',2) || '' ;\r
-       }\r
-       GetE('txtAttClasses').value     = sClass ;\r
-\r
-       // Update the Link type combo.\r
-       GetE('cmbLinkType').value = sType ;\r
-}\r
-\r
-//#### Link type selection.\r
-function SetLinkType( linkType )\r
-{\r
-       ShowE('divLinkTypeUrl'          , (linkType == 'url') ) ;\r
-       ShowE('divLinkTypeAnchor'       , (linkType == 'anchor') ) ;\r
-       ShowE('divLinkTypeEMail'        , (linkType == 'email') ) ;\r
-\r
-       if ( !FCKConfig.LinkDlgHideTarget )\r
-               dialog.SetTabVisibility( 'Target'       , (linkType == 'url') ) ;\r
-\r
-       if ( FCKConfig.LinkUpload )\r
-               dialog.SetTabVisibility( 'Upload'       , (linkType == 'url') ) ;\r
-\r
-       if ( !FCKConfig.LinkDlgHideAdvanced )\r
-               dialog.SetTabVisibility( 'Advanced'     , (linkType != 'anchor' || bHasAnchors) ) ;\r
-\r
-       if ( linkType == 'email' )\r
-               dialog.SetAutoSize( true ) ;\r
-}\r
-\r
-//#### Target type selection.\r
-function SetTarget( targetType )\r
-{\r
-       GetE('tdTargetFrame').style.display     = ( targetType == 'popup' ? 'none' : '' ) ;\r
-       GetE('tdPopupName').style.display       =\r
-       GetE('tablePopupFeatures').style.display = ( targetType == 'popup' ? '' : 'none' ) ;\r
-\r
-       switch ( targetType )\r
-       {\r
-               case "_blank" :\r
-               case "_self" :\r
-               case "_parent" :\r
-               case "_top" :\r
-                       GetE('txtTargetFrame').value = targetType ;\r
-                       break ;\r
-               case "" :\r
-                       GetE('txtTargetFrame').value = '' ;\r
-                       break ;\r
-       }\r
-\r
-       if ( targetType == 'popup' )\r
-               dialog.SetAutoSize( true ) ;\r
-}\r
-\r
-//#### Called while the user types the URL.\r
-function OnUrlChange()\r
-{\r
-       var sUrl = GetE('txtUrl').value ;\r
-       var sProtocol = oRegex.UrlOnChangeProtocol.exec( sUrl ) ;\r
-\r
-       if ( sProtocol )\r
-       {\r
-               sUrl = sUrl.substr( sProtocol[0].length ) ;\r
-               GetE('txtUrl').value = sUrl ;\r
-               GetE('cmbLinkProtocol').value = sProtocol[0].toLowerCase() ;\r
-       }\r
-       else if ( oRegex.UrlOnChangeTestOther.test( sUrl ) )\r
-       {\r
-               GetE('cmbLinkProtocol').value = '' ;\r
-       }\r
-}\r
-\r
-//#### Called while the user types the target name.\r
-function OnTargetNameChange()\r
-{\r
-       var sFrame = GetE('txtTargetFrame').value ;\r
-\r
-       if ( sFrame.length == 0 )\r
-               GetE('cmbTarget').value = '' ;\r
-       else if ( oRegex.ReserveTarget.test( sFrame ) )\r
-               GetE('cmbTarget').value = sFrame.toLowerCase() ;\r
-       else\r
-               GetE('cmbTarget').value = 'frame' ;\r
-}\r
-\r
-// Accessible popups\r
-function BuildOnClickPopup()\r
-{\r
-       var sWindowName = "'" + GetE('txtPopupName').value.replace(/\W/gi, "") + "'" ;\r
-\r
-       var sFeatures = '' ;\r
-       var aChkFeatures = document.getElementsByName( 'chkFeature' ) ;\r
-       for ( var i = 0 ; i < aChkFeatures.length ; i++ )\r
-       {\r
-               if ( i > 0 ) sFeatures += ',' ;\r
-               sFeatures += aChkFeatures[i].value + '=' + ( aChkFeatures[i].checked ? 'yes' : 'no' ) ;\r
-       }\r
-\r
-       if ( GetE('txtPopupWidth').value.length > 0 )   sFeatures += ',width=' + GetE('txtPopupWidth').value ;\r
-       if ( GetE('txtPopupHeight').value.length > 0 )  sFeatures += ',height=' + GetE('txtPopupHeight').value ;\r
-       if ( GetE('txtPopupLeft').value.length > 0 )    sFeatures += ',left=' + GetE('txtPopupLeft').value ;\r
-       if ( GetE('txtPopupTop').value.length > 0 )             sFeatures += ',top=' + GetE('txtPopupTop').value ;\r
-\r
-       if ( sFeatures != '' )\r
-               sFeatures = sFeatures + ",status" ;\r
-\r
-       return ( "window.open(this.href," + sWindowName + ",'" + sFeatures + "'); return false" ) ;\r
-}\r
-\r
-//#### Fills all Popup related fields.\r
-function FillPopupFields( windowName, features )\r
-{\r
-       if ( windowName )\r
-               GetE('txtPopupName').value = windowName ;\r
-\r
-       var oFeatures = new Object() ;\r
-       var oFeaturesMatch ;\r
-       while( ( oFeaturesMatch = oRegex.PopupFeatures.exec( features ) ) != null )\r
-       {\r
-               var sValue = oFeaturesMatch[2] ;\r
-               if ( sValue == ( 'yes' || '1' ) )\r
-                       oFeatures[ oFeaturesMatch[1] ] = true ;\r
-               else if ( ! isNaN( sValue ) && sValue != 0 )\r
-                       oFeatures[ oFeaturesMatch[1] ] = sValue ;\r
-       }\r
-\r
-       // Update all features check boxes.\r
-       var aChkFeatures = document.getElementsByName('chkFeature') ;\r
-       for ( var i = 0 ; i < aChkFeatures.length ; i++ )\r
-       {\r
-               if ( oFeatures[ aChkFeatures[i].value ] )\r
-                       aChkFeatures[i].checked = true ;\r
-       }\r
-\r
-       // Update position and size text boxes.\r
-       if ( oFeatures['width'] )       GetE('txtPopupWidth').value             = oFeatures['width'] ;\r
-       if ( oFeatures['height'] )      GetE('txtPopupHeight').value    = oFeatures['height'] ;\r
-       if ( oFeatures['left'] )        GetE('txtPopupLeft').value              = oFeatures['left'] ;\r
-       if ( oFeatures['top'] )         GetE('txtPopupTop').value               = oFeatures['top'] ;\r
-}\r
-\r
-//#### The OK button was hit.\r
-function Ok()\r
-{\r
-       var sUri, sInnerHtml ;\r
-       oEditor.FCKUndo.SaveUndoStep() ;\r
-\r
-       switch ( GetE('cmbLinkType').value )\r
-       {\r
-               case 'url' :\r
-                       sUri = GetE('txtUrl').value ;\r
-\r
-                       if ( sUri.length == 0 )\r
-                       {\r
-                               alert( FCKLang.DlnLnkMsgNoUrl ) ;\r
-                               return false ;\r
-                       }\r
-\r
-                       sUri = GetE('cmbLinkProtocol').value + sUri ;\r
-\r
-                       break ;\r
-\r
-               case 'email' :\r
-                       sUri = GetE('txtEMailAddress').value ;\r
-\r
-                       if ( sUri.length == 0 )\r
-                       {\r
-                               alert( FCKLang.DlnLnkMsgNoEMail ) ;\r
-                               return false ;\r
-                       }\r
-\r
-                       sUri = oParser.CreateEMailUri(\r
-                               sUri,\r
-                               GetE('txtEMailSubject').value,\r
-                               GetE('txtEMailBody').value ) ;\r
-                       break ;\r
-\r
-               case 'anchor' :\r
-                       var sAnchor = GetE('cmbAnchorName').value ;\r
-                       if ( sAnchor.length == 0 ) sAnchor = GetE('cmbAnchorId').value ;\r
-\r
-                       if ( sAnchor.length == 0 )\r
-                       {\r
-                               alert( FCKLang.DlnLnkMsgNoAnchor ) ;\r
-                               return false ;\r
-                       }\r
-\r
-                       sUri = '#' + sAnchor ;\r
-                       break ;\r
-       }\r
-\r
-       // If no link is selected, create a new one (it may result in more than one link creation - #220).\r
-       var aLinks = oLink ? [ oLink ] : oEditor.FCK.CreateLink( sUri, true ) ;\r
-\r
-       // If no selection, no links are created, so use the uri as the link text (by dom, 2006-05-26)\r
-       var aHasSelection = ( aLinks.length > 0 ) ;\r
-       if ( !aHasSelection )\r
-       {\r
-               sInnerHtml = sUri;\r
-\r
-               // Built a better text for empty links.\r
-               switch ( GetE('cmbLinkType').value )\r
-               {\r
-                       // anchor: use old behavior --> return true\r
-                       case 'anchor':\r
-                               sInnerHtml = sInnerHtml.replace( /^#/, '' ) ;\r
-                               break ;\r
-\r
-                       // url: try to get path\r
-                       case 'url':\r
-                               var oLinkPathRegEx = new RegExp("//?([^?\"']+)([?].*)?$") ;\r
-                               var asLinkPath = oLinkPathRegEx.exec( sUri ) ;\r
-                               if (asLinkPath != null)\r
-                                       sInnerHtml = asLinkPath[1];  // use matched path\r
-                               break ;\r
-\r
-                       // mailto: try to get email address\r
-                       case 'email':\r
-                               sInnerHtml = GetE('txtEMailAddress').value ;\r
-                               break ;\r
-               }\r
-\r
-               // Create a new (empty) anchor.\r
-               aLinks = [ oEditor.FCK.InsertElement( 'a' ) ] ;\r
-       }\r
-\r
-       for ( var i = 0 ; i < aLinks.length ; i++ )\r
-       {\r
-               oLink = aLinks[i] ;\r
-\r
-               if ( aHasSelection )\r
-                       sInnerHtml = oLink.innerHTML ;          // Save the innerHTML (IE changes it if it is like an URL).\r
-\r
-               oLink.href = sUri ;\r
-               SetAttribute( oLink, '_fcksavedurl', sUri ) ;\r
-\r
-               var onclick;\r
-               // Accessible popups\r
-               if( GetE('cmbTarget').value == 'popup' )\r
-               {\r
-                       onclick = BuildOnClickPopup() ;\r
-                       // Encode the attribute\r
-                       onclick = encodeURIComponent( " onclick=\"" + onclick + "\"" )  ;\r
-                       SetAttribute( oLink, 'onclick_fckprotectedatt', onclick ) ;\r
-               }\r
-               else\r
-               {\r
-                       // Check if the previous onclick was for a popup:\r
-                       // In that case remove the onclick handler.\r
-                       onclick = oLink.getAttribute( 'onclick_fckprotectedatt' ) ;\r
-                       if ( onclick )\r
-                       {\r
-                               // Decode the protected string\r
-                               onclick = decodeURIComponent( onclick ) ;\r
-\r
-                               if( oRegex.OnClickPopup.test( onclick ) )\r
-                                       SetAttribute( oLink, 'onclick_fckprotectedatt', '' ) ;\r
-                       }\r
-               }\r
-\r
-               oLink.innerHTML = sInnerHtml ;          // Set (or restore) the innerHTML\r
-\r
-               // Target\r
-               if( GetE('cmbTarget').value != 'popup' )\r
-                       SetAttribute( oLink, 'target', GetE('txtTargetFrame').value ) ;\r
-               else\r
-                       SetAttribute( oLink, 'target', null ) ;\r
-\r
-               // Let's set the "id" only for the first link to avoid duplication.\r
-               if ( i == 0 )\r
-                       SetAttribute( oLink, 'id', GetE('txtAttId').value ) ;\r
-\r
-               // Advances Attributes\r
-               SetAttribute( oLink, 'name'             , GetE('txtAttName').value ) ;\r
-               SetAttribute( oLink, 'dir'              , GetE('cmbAttLangDir').value ) ;\r
-               SetAttribute( oLink, 'lang'             , GetE('txtAttLangCode').value ) ;\r
-               SetAttribute( oLink, 'accesskey', GetE('txtAttAccessKey').value ) ;\r
-               SetAttribute( oLink, 'tabindex' , ( GetE('txtAttTabIndex').value > 0 ? GetE('txtAttTabIndex').value : null ) ) ;\r
-               SetAttribute( oLink, 'title'    , GetE('txtAttTitle').value ) ;\r
-               SetAttribute( oLink, 'type'             , GetE('txtAttContentType').value ) ;\r
-               SetAttribute( oLink, 'charset'  , GetE('txtAttCharSet').value ) ;\r
-\r
-               if ( oEditor.FCKBrowserInfo.IsIE )\r
-               {\r
-                       var sClass = GetE('txtAttClasses').value ;\r
-                       // If it's also an anchor add an internal class\r
-                       if ( GetE('txtAttName').value.length != 0 )\r
-                               sClass += ' FCK__AnchorC' ;\r
-                       SetAttribute( oLink, 'className', sClass ) ;\r
-\r
-                       oLink.style.cssText = GetE('txtAttStyle').value ;\r
-               }\r
-               else\r
-               {\r
-                       SetAttribute( oLink, 'class', GetE('txtAttClasses').value ) ;\r
-                       SetAttribute( oLink, 'style', GetE('txtAttStyle').value ) ;\r
-               }\r
-       }\r
-\r
-       // Select the (first) link.\r
-       oEditor.FCKSelection.SelectNode( aLinks[0] );\r
-\r
-       return true ;\r
-}\r
-\r
-function BrowseServer()\r
-{\r
-       OpenFileBrowser( FCKConfig.LinkBrowserURL, FCKConfig.LinkBrowserWindowWidth, FCKConfig.LinkBrowserWindowHeight ) ;\r
-}\r
-\r
-function SetUrl( url )\r
-{\r
-       GetE('txtUrl').value = url ;\r
-       OnUrlChange() ;\r
-       dialog.SetSelectedTab( 'Info' ) ;\r
-}\r
-\r
-function OnUploadCompleted( errorNumber, fileUrl, fileName, customMsg )\r
-{\r
-       // Remove animation\r
-       window.parent.Throbber.Hide() ;\r
-       GetE( 'divUpload' ).style.display  = '' ;\r
-\r
-       switch ( errorNumber )\r
-       {\r
-               case 0 :        // No errors\r
-                       alert( 'Your file has been successfully uploaded' ) ;\r
-                       break ;\r
-               case 1 :        // Custom error\r
-                       alert( customMsg ) ;\r
-                       return ;\r
-               case 101 :      // Custom warning\r
-                       alert( customMsg ) ;\r
-                       break ;\r
-               case 201 :\r
-                       alert( 'A file with the same name is already available. The uploaded file has been renamed to "' + fileName + '"' ) ;\r
-                       break ;\r
-               case 202 :\r
-                       alert( 'Invalid file type' ) ;\r
-                       return ;\r
-               case 203 :\r
-                       alert( "Security error. You probably don't have enough permissions to upload. Please check your server." ) ;\r
-                       return ;\r
-               case 500 :\r
-                       alert( 'The connector is disabled' ) ;\r
-                       break ;\r
-               default :\r
-                       alert( 'Error on file upload. Error number: ' + errorNumber ) ;\r
-                       return ;\r
-       }\r
-\r
-       SetUrl( fileUrl ) ;\r
-       GetE('frmUpload').reset() ;\r
-}\r
-\r
-var oUploadAllowedExtRegex     = new RegExp( FCKConfig.LinkUploadAllowedExtensions, 'i' ) ;\r
-var oUploadDeniedExtRegex      = new RegExp( FCKConfig.LinkUploadDeniedExtensions, 'i' ) ;\r
-\r
-function CheckUpload()\r
-{\r
-       var sFile = GetE('txtUploadFile').value ;\r
-\r
-       if ( sFile.length == 0 )\r
-       {\r
-               alert( 'Please select a file to upload' ) ;\r
-               return false ;\r
-       }\r
-\r
-       if ( ( FCKConfig.LinkUploadAllowedExtensions.length > 0 && !oUploadAllowedExtRegex.test( sFile ) ) ||\r
-               ( FCKConfig.LinkUploadDeniedExtensions.length > 0 && oUploadDeniedExtRegex.test( sFile ) ) )\r
-       {\r
-               OnUploadCompleted( 202 ) ;\r
-               return false ;\r
-       }\r
-\r
-       // Show animation\r
-       window.parent.Throbber.Show( 100 ) ;\r
-       GetE( 'divUpload' ).style.display  = 'none' ;\r
-\r
-       return true ;\r
-}\r
-\r
-function SetDefaultTarget()\r
-{\r
-       var target = FCKConfig.DefaultLinkTarget || '' ;\r
-\r
-       if ( oLink || target.length == 0 )\r
-               return ;\r
-\r
-       switch ( target )\r
-       {\r
-               case '_blank' :\r
-               case '_self' :\r
-               case '_parent' :\r
-               case '_top' :\r
-                       GetE('cmbTarget').value = target ;\r
-                       break ;\r
-               default :\r
-                       GetE('cmbTarget').value = 'frame' ;\r
-                       break ;\r
-       }\r
-\r
-       GetE('txtTargetFrame').value = target ;\r
-}\r