Home directory for Malawi's wwwroot
Duncan Ewan
2021-02-19 3e758c29e0fde36fc088efcfc88f9a3014432b64
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
<cfsetting enablecfoutputonly="Yes">
<!---
 * FCKeditor - The text editor for Internet - http://www.fckeditor.net
 * Copyright (C) 2003-2009 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 integration.
 * Note this module is created for use with Coldfusion 4.52 and above.
 * For a cfc version for coldfusion mx check the fckeditor.cfc.
 *
 * Syntax:
 *
 * <cfmodule name="path/to/cfc/fckeditor"
 *     instanceName="myEditor"
 *     toolbarSet="..."
 *     width="..."
 *     height="..:"
 *     value="..."
 *     config="..."
 * >
--->
<!--- ::
     *     Attribute validation
    :: --->
<cfparam name="attributes.instanceName" type="string">
<cfparam name="attributes.width"         type="string" default="100%">
<cfparam name="attributes.height"         type="string" default="200">
<cfparam name="attributes.toolbarSet"     type="string" default="Default">
<cfparam name="attributes.value"         type="string" default="">
<cfparam name="attributes.basePath"     type="string" default="/fckeditor/">
<cfparam name="attributes.checkBrowser" type="boolean" default="true">
<cfparam name="attributes.config"         type="struct" default="#structNew()#">
<cfinclude template="fckutils.cfm">
 
<!--- ::
     * check browser compatibility via HTTP_USER_AGENT, if checkBrowser is true
    :: --->
 
<cfscript>
if( attributes.checkBrowser )
{
    isCompatibleBrowser = FCKeditor_IsCompatibleBrowser();
}
else
{
    // If we should not check browser compatibility, assume true
    isCompatibleBrowser = true;
}
</cfscript>
 
<cfif isCompatibleBrowser>
 
    <!--- ::
         * show html editor area for compatible browser
        :: --->
 
    <cfscript>
        // try to fix the basePath, if ending slash is missing
        if( len( attributes.basePath) and right( attributes.basePath, 1 ) is not "/" )
            attributes.basePath = attributes.basePath & "/";
 
        // construct the url
        sURL = attributes.basePath & "editor/fckeditor.html?InstanceName=" & attributes.instanceName;
 
        // append toolbarset name to the url
        if( len( attributes.toolbarSet ) )
            sURL = sURL & "&amp;Toolbar=" & attributes.toolbarSet;
 
        // create configuration string: Key1=Value1&Key2=Value2&... (Key/Value:HTML encoded)
 
        /**
         * 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 = 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 & ",StartupFocus,ForcePasteAsPlainText,AutoDetectPasteFromWord,ForceSimpleAmpersand";
        lConfigKeys = lConfigKeys & ",TabSpaces,ShowBorders,SourcePopup,ToolbarStartExpanded,ToolbarCanCollapse";
        lConfigKeys = lConfigKeys & ",IgnoreEmptyParagraphValue,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";
 
        sConfig = "";
 
        for( key in attributes.config )
        {
            iPos = listFindNoCase( lConfigKeys, key );
            if( iPos GT 0 )
            {
                if( len( sConfig ) )
                    sConfig = sConfig & "&amp;";
 
                fieldValue = attributes.config[key];
                fieldName = listGetAt( lConfigKeys, iPos );
 
                sConfig = sConfig & urlEncodedFormat( fieldName ) & '=' & urlEncodedFormat( fieldValue );
            }
        }
    </cfscript>
 
    <cfoutput>
    <input type="hidden" id="#attributes.instanceName#" name="#attributes.instanceName#" value="#HTMLEditFormat(attributes.value)#" style="display:none" />
    <input type="hidden" id="#attributes.instanceName#___Config" value="#sConfig#" style="display:none" />
    <iframe id="#attributes.instanceName#___Frame" src="#sURL#" width="#attributes.width#" height="#attributes.height#" frameborder="0" scrolling="no"></iframe>
    </cfoutput>
 
<cfelse>
 
    <!--- ::
         * show    plain textarea for non compatible browser
        :: --->
 
    <cfscript>
        // append unit "px" for numeric width and/or height values
        if( isNumeric( attributes.width ) )
            attributes.width = attributes.width & "px";
        if( isNumeric( attributes.height ) )
            attributes.height = attributes.height & "px";
    </cfscript>
 
    <!--- Fixed Bug ##1075166. hk@lwd.de 20041206 --->
    <cfoutput>
    <textarea name="#attributes.instanceName#" rows="4" cols="40" style="WIDTH: #attributes.width#; HEIGHT: #attributes.height#">#HTMLEditFormat(attributes.value)#</textarea>
    </cfoutput>
 
</cfif>
 
<cfsetting enablecfoutputonly="No"><cfexit method="exittag">