mirror of
https://github.com/EGroupware/egroupware.git
synced 2024-11-17 13:33:15 +01:00
233 lines
8.8 KiB
Plaintext
233 lines
8.8 KiB
Plaintext
<cfcomponent output="false" displayname="FCKeditor" hint="Create an instance of the FCKeditor.">
|
|
|
|
<!---
|
|
* 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 ==
|
|
*
|
|
* ColdFusion MX integration.
|
|
* Note this CFC is created for use only with Coldfusion MX and above.
|
|
* For older version, check the fckeditor.cfm.
|
|
*
|
|
* Syntax:
|
|
*
|
|
* <cfscript>
|
|
* fckEditor = createObject("component", "fckeditor.fckeditor");
|
|
* fckEditor.instanceName="myEditor";
|
|
* fckEditor.basePath="/fckeditor/";
|
|
* fckEditor.value="<p>This is my <strong>initial</strong> html text.</p>";
|
|
* fckEditor.width="100%";
|
|
* fckEditor.height="200";
|
|
* // ... additional parameters ...
|
|
* fckEditor.create(); // create instance now.
|
|
* </cfscript>
|
|
*
|
|
* See your macromedia coldfusion mx documentation for more info.
|
|
*
|
|
* *** Note:
|
|
* Do not use path names with a "." (dot) in the name. This is a coldfusion
|
|
* limitation with the cfc invocation.
|
|
--->
|
|
|
|
<cfinclude template="fckutils.cfm">
|
|
|
|
<cffunction
|
|
name="Create"
|
|
access="public"
|
|
output="true"
|
|
returntype="void"
|
|
hint="Outputs the editor HTML in the place where the function is called"
|
|
>
|
|
<cfoutput>#CreateHtml()#</cfoutput>
|
|
</cffunction>
|
|
|
|
<cffunction
|
|
name="CreateHtml"
|
|
access="public"
|
|
output="false"
|
|
returntype="string"
|
|
hint="Retrieves the editor HTML"
|
|
>
|
|
|
|
<cfparam name="this.instanceName" type="string" />
|
|
<cfparam name="this.width" type="string" default="100%" />
|
|
<cfparam name="this.height" type="string" default="200" />
|
|
<cfparam name="this.toolbarSet" type="string" default="Default" />
|
|
<cfparam name="this.value" type="string" default="" />
|
|
<cfparam name="this.basePath" type="string" default="/fckeditor/" />
|
|
<cfparam name="this.checkBrowser" type="boolean" default="true" />
|
|
<cfparam name="this.config" type="struct" default="#structNew()#" />
|
|
|
|
<cfscript>
|
|
// display the html editor or a plain textarea?
|
|
if( isCompatible() )
|
|
return getHtmlEditor();
|
|
else
|
|
return getTextArea();
|
|
</cfscript>
|
|
|
|
</cffunction>
|
|
|
|
<cffunction
|
|
name="isCompatible"
|
|
access="private"
|
|
output="false"
|
|
returnType="boolean"
|
|
hint="Check browser compatibility via HTTP_USER_AGENT, if checkBrowser is true"
|
|
>
|
|
|
|
<cfscript>
|
|
var sAgent = lCase( cgi.HTTP_USER_AGENT );
|
|
var stResult = "";
|
|
var sBrowserVersion = "";
|
|
|
|
// do not check if argument "checkBrowser" is false
|
|
if( not this.checkBrowser )
|
|
return true;
|
|
|
|
return FCKeditor_IsCompatibleBrowser();
|
|
</cfscript>
|
|
</cffunction>
|
|
|
|
<cffunction
|
|
name="getTextArea"
|
|
access="private"
|
|
output="false"
|
|
returnType="string"
|
|
hint="Create a textarea field for non-compatible browsers."
|
|
>
|
|
<cfset var result = "" />
|
|
|
|
<cfscript>
|
|
// append unit "px" for numeric width and/or height values
|
|
if( isNumeric( this.width ) )
|
|
this.width = this.width & "px";
|
|
if( isNumeric( this.height ) )
|
|
this.height = this.height & "px";
|
|
</cfscript>
|
|
|
|
<cfscript>
|
|
result = result & "<div>" & chr(13) & chr(10);
|
|
result = result & "<textarea name=""#this.instanceName#"" rows=""4"" cols=""40"" style=""WIDTH: #this.width#; HEIGHT: #this.height#"">#HTMLEditFormat(this.value)#</textarea>" & chr(13) & chr(10);
|
|
result = result & "</div>" & chr(13) & chr(10);
|
|
</cfscript>
|
|
<cfreturn result />
|
|
</cffunction>
|
|
|
|
<cffunction
|
|
name="getHtmlEditor"
|
|
access="private"
|
|
output="false"
|
|
returnType="string"
|
|
hint="Create the html editor instance for compatible browsers."
|
|
>
|
|
<cfset var sURL = "" />
|
|
<cfset var result = "" />
|
|
|
|
<cfscript>
|
|
// try to fix the basePath, if ending slash is missing
|
|
if( len( this.basePath) and right( this.basePath, 1 ) is not "/" )
|
|
this.basePath = this.basePath & "/";
|
|
|
|
// construct the url
|
|
sURL = this.basePath & "editor/fckeditor.html?InstanceName=" & this.instanceName;
|
|
|
|
// append toolbarset name to the url
|
|
if( len( this.toolbarSet ) )
|
|
sURL = sURL & "&Toolbar=" & this.toolbarSet;
|
|
</cfscript>
|
|
|
|
<cfscript>
|
|
result = result & "<div>" & chr(13) & chr(10);
|
|
result = result & "<input type=""hidden"" id=""#this.instanceName#"" name=""#this.instanceName#"" value=""#HTMLEditFormat(this.value)#"" style=""display:none"" />" & chr(13) & chr(10);
|
|
result = result & "<input type=""hidden"" id=""#this.instanceName#___Config"" value=""#GetConfigFieldString()#"" style=""display:none"" />" & chr(13) & chr(10);
|
|
result = result & "<iframe id=""#this.instanceName#___Frame"" src=""#sURL#"" width=""#this.width#"" height=""#this.height#"" frameborder=""0"" scrolling=""no""></iframe>" & chr(13) & chr(10);
|
|
result = result & "</div>" & chr(13) & chr(10);
|
|
</cfscript>
|
|
<cfreturn result />
|
|
</cffunction>
|
|
|
|
<cffunction
|
|
name="GetConfigFieldString"
|
|
access="private"
|
|
output="false"
|
|
returnType="string"
|
|
hint="Create configuration string: Key1=Value1&Key2=Value2&... (Key/Value:HTML encoded)"
|
|
>
|
|
<cfset var sParams = "" />
|
|
<cfset var key = "" />
|
|
<cfset var fieldValue = "" />
|
|
<cfset var fieldLabel = "" />
|
|
<cfset var lConfigKeys = "" />
|
|
<cfset var iPos = "" />
|
|
|
|
<cfscript>
|
|
/**
|
|
* CFML doesn't store casesensitive names for structure keys, but the configuration names must be casesensitive for js.
|
|
* So we need to find out the correct case for the configuration keys.
|
|
* We "fix" this by comparing the caseless configuration keys to a list of all available configuration options in the correct case.
|
|
* changed 20041206 hk@lwd.de (improvements are welcome!)
|
|
*/
|
|
lConfigKeys = lConfigKeys & "CustomConfigurationsPath,EditorAreaCSS,ToolbarComboPreviewCSS,DocType";
|
|
lConfigKeys = lConfigKeys & ",BaseHref,FullPage,Debug,AllowQueryStringDebug,SkinPath";
|
|
lConfigKeys = lConfigKeys & ",PreloadImages,PluginsPath,AutoDetectLanguage,DefaultLanguage,ContentLangDirection";
|
|
lConfigKeys = lConfigKeys & ",ProcessHTMLEntities,IncludeLatinEntities,IncludeGreekEntities,ProcessNumericEntities,AdditionalNumericEntities";
|
|
lConfigKeys = lConfigKeys & ",FillEmptyBlocks,FormatSource,FormatOutput,FormatIndentator";
|
|
lConfigKeys = lConfigKeys & ",GeckoUseSPAN,StartupFocus,ForcePasteAsPlainText,AutoDetectPasteFromWord,ForceSimpleAmpersand";
|
|
lConfigKeys = lConfigKeys & ",TabSpaces,ShowBorders,SourcePopup,ToolbarStartExpanded,ToolbarCanCollapse";
|
|
lConfigKeys = lConfigKeys & ",IgnoreEmptyParagraphValue,PreserveSessionOnFileBrowser,FloatingPanelsZIndex,TemplateReplaceAll,TemplateReplaceCheckbox";
|
|
lConfigKeys = lConfigKeys & ",ToolbarLocation,ToolbarSets,EnterMode,ShiftEnterMode,Keystrokes";
|
|
lConfigKeys = lConfigKeys & ",ContextMenu,BrowserContextMenuOnCtrl,FontColors,FontNames,FontSizes";
|
|
lConfigKeys = lConfigKeys & ",FontFormats,StylesXmlPath,TemplatesXmlPath,SpellChecker,IeSpellDownloadUrl";
|
|
lConfigKeys = lConfigKeys & ",SpellerPagesServerScript,FirefoxSpellChecker,MaxUndoLevels,DisableObjectResizing,DisableFFTableHandles";
|
|
lConfigKeys = lConfigKeys & ",LinkDlgHideTarget,LinkDlgHideAdvanced,ImageDlgHideLink,ImageDlgHideAdvanced,FlashDlgHideAdvanced";
|
|
lConfigKeys = lConfigKeys & ",ProtectedTags,BodyId,BodyClass,DefaultLinkTarget,CleanWordKeepsStructure";
|
|
lConfigKeys = lConfigKeys & ",LinkBrowser,LinkBrowserURL,LinkBrowserWindowWidth,LinkBrowserWindowHeight,ImageBrowser";
|
|
lConfigKeys = lConfigKeys & ",ImageBrowserURL,ImageBrowserWindowWidth,ImageBrowserWindowHeight,FlashBrowser,FlashBrowserURL";
|
|
lConfigKeys = lConfigKeys & ",FlashBrowserWindowWidth,FlashBrowserWindowHeight,LinkUpload,LinkUploadURL,LinkUploadWindowWidth";
|
|
lConfigKeys = lConfigKeys & ",LinkUploadWindowHeight,LinkUploadAllowedExtensions,LinkUploadDeniedExtensions,ImageUpload,ImageUploadURL";
|
|
lConfigKeys = lConfigKeys & ",ImageUploadAllowedExtensions,ImageUploadDeniedExtensions,FlashUpload,FlashUploadURL,FlashUploadAllowedExtensions";
|
|
lConfigKeys = lConfigKeys & ",FlashUploadDeniedExtensions,SmileyPath,SmileyImages,SmileyColumns,SmileyWindowWidth,SmileyWindowHeight";
|
|
|
|
for( key in this.config )
|
|
{
|
|
iPos = listFindNoCase( lConfigKeys, key );
|
|
if( iPos GT 0 )
|
|
{
|
|
if( len( sParams ) )
|
|
sParams = sParams & "&";
|
|
|
|
fieldValue = this.config[key];
|
|
fieldName = listGetAt( lConfigKeys, iPos );
|
|
|
|
// set all boolean possibilities in CFML to true/false values
|
|
if( isBoolean( fieldValue) and fieldValue )
|
|
fieldValue = "true";
|
|
else if( isBoolean( fieldValue) )
|
|
fieldValue = "false";
|
|
|
|
sParams = sParams & HTMLEditFormat( fieldName ) & '=' & HTMLEditFormat( fieldValue );
|
|
}
|
|
}
|
|
return sParams;
|
|
</cfscript>
|
|
|
|
</cffunction>
|
|
|
|
</cfcomponent>
|