2007-07-19 12:40:28 +02:00
< ? php
/**
* A WYSIWYG editor field , powered by tinymce .
* tinymce editor fields are created from < textarea > tags which are then converted with javascript .
* The { @ link Requirements } system is used to ensure that all necessary javascript is included .
2008-02-04 02:31:37 +01:00
* Caution : Only works within the CMS with a global tinymce - menubar , see { @ link CMSMain }
*
*
2008-01-09 05:18:36 +01:00
* @ package forms
* @ subpackage fields - formattedinput
2007-07-19 12:40:28 +02:00
*/
class HtmlEditorField extends TextareaField {
protected $rows ;
/**
* Construct a new HtmlEditor field
*/
2008-11-12 05:31:33 +01:00
function __construct ( $name , $title = " " , $rows = 20 , $cols = 20 , $value = " " , $form = null ) {
2007-07-19 12:40:28 +02:00
parent :: __construct ( $name , $title , $rows , $cols , $value , $form );
$this -> extraClass = 'typography' ;
}
/**
* Returns the a < textarea > field with tinymce = " true " set on it
*/
function Field () {
Requirements :: javascript ( MCE_ROOT . " tiny_mce_src.js " );
2009-01-05 07:19:48 +01:00
Requirements :: javascript ( SAPPHIRE_DIR . '/javascript/HtmlEditorField.js' );
2007-07-19 12:40:28 +02:00
// Don't allow unclosed tags - they will break the whole application ;-)
$cleanVal = $this -> value ;
$lPos = strrpos ( $cleanVal , '<' );
$rPos = strrpos ( $cleanVal , '>' );
if (( $lPos > $rPos ) || ( $rPos === false && $lPos !== false )) $cleanVal .= '>' ;
// Remove broken link classes, we'll add them now
$cleanVal = eregi_replace ( 'class="([^"]*) *broken *( [^"]*)?"' , 'class="\\1\\2"' , $cleanVal );
// Mark up broken links
$links = HTTP :: getLinksIn ( $cleanVal );
if ( $links ) {
$links = array_unique ( $links );
foreach ( $links as $link ) {
$originalLink = $link ;
$link = Director :: makeRelative ( $link );
$broken = false ;
if ( ereg ( '^([A-Za-z0-9_\-]+)/?(#.*)?$' , $link , $parts )) {
2008-11-24 00:28:16 +01:00
if ( ! DataObject :: get_one ( " SiteTree " , " \" URLSegment \" = ' $parts[1] ' " , false )) {
2007-09-15 02:05:49 +02:00
$broken = true ;
// Prevents execution timeouts if a page has 50 identical broken links by only highlighting them once
$alreadyHighlighted [ $parts [ 1 ]] = true ;
}
2007-07-19 12:40:28 +02:00
} else if ( $link [ 0 ] == '/' ) {
$broken = true ;
} else if ( ereg ( '^assets/' , $link )) {
2008-11-24 10:31:14 +01:00
if ( ! DataObject :: get_one ( " File " , " \" Filename \" = ' $link ' " , false )) {
2007-09-15 02:05:49 +02:00
$broken = true ;
}
2007-07-19 12:40:28 +02:00
}
// Add a class. Note that this might create multiple class attributes, which are stripped below
if ( $broken ) $cleanVal = eregi_replace ( " (<a)([^>]*href= \" { $originalLink } [^ \" ]* \" [^>]*>) " , '\\1 class="broken"\\2' , $cleanVal );
}
}
// Combined multiple classes into a single class
while ( eregi ( '(<a[^>]*)class="([^"]*)"([^>]*)class="([^"]*)"([^>]*>)' , $cleanVal ) )
$cleanVal = eregi_replace ( '(<a[^>]*)class="([^"]*)"([^>]*)class="([^"]*)"([^>]*>)' , '\\1class="\\2 \\4"\\3\\5' , $cleanVal );
// We can't use htmlentities as that messes with unicode
$cleanVal = str_replace ( array ( " & " , " < " , " > " ), array ( " & " , " < " , " > " ), $cleanVal );
2007-09-14 19:37:48 +02:00
// 97% instead of 100% to prevent horizontal scrollbars in IE7
2007-09-14 19:38:38 +02:00
$style = " width: 97%; height: " . ( $this -> rows * 16 ) . " px " ;
2007-07-19 12:40:28 +02:00
$class = " htmleditor " ;
$class = ( $this -> extraClass ) ? $class . " " . $this -> extraClass : $class ;
return " <textarea class= \" $class\ " rows = \ " $this->rows\ " cols = \ " $this->cols\ " style = \ " $style\ " tinymce = \ " true \" id= \" " . $this -> id () . " \" name= \" { $this -> name } \" > $cleanVal </textarea> " ;
}
/**
* This function has been created to explicit the functionnality .
*/
function setCSSClass ( $class ){
$this -> extraClass = $class ;
}
function saveInto ( $record ) {
2008-01-17 05:23:31 +01:00
if ( $record -> escapeTypeForField ( $this -> name ) != 'xml' ) {
2008-01-17 05:22:13 +01:00
user_error ( " HTMLEditorField should save into an HTMLText or HTMLVarchar field.
If you don 't, your template won' t display properly .
This changed in version 2.2 . 2 , so please update
your database field '$this->name' " ,
E_USER_WARNING
);
}
2007-07-19 12:40:28 +02:00
$content = $this -> value ;
$content = preg_replace ( '/mce_real_src="[^"]+"/i' , " " , $content );
2008-08-11 05:39:14 +02:00
$content = eregi_replace ( '(<img[^>]* )width=([0-9]+)( [^>]*>|>)' , '\\1width="\\2"\\3' , $content );
$content = eregi_replace ( '(<img[^>]* )height=([0-9]+)( [^>]*>|>)' , '\\1height="\\2"\\3' , $content );
2007-11-07 22:39:57 +01:00
$content = eregi_replace ( 'src="([^\?]*)\?r=[0-9]+"' , 'src="\\1"' , $content );
$content = eregi_replace ( 'mce_src="([^\?]*)\?r=[0-9]+"' , 'mce_src="\\1"' , $content );
2007-07-19 12:40:28 +02:00
$content = preg_replace_callback ( '/(<img[^>]* )(width="|height="|src=")([^"]+)("[^>]* )(width="|height="|src=")([^"]+)("[^>]* )(width="|height="|src=")([^"]+)("[^>]*>)/i' , " HtmlEditorField_dataValue_processImage " , $content );
// If we don't have a containing block element, add a p tag.
if ( ! ereg ( " ^[ \t \r \n ]*< " , $content )) $content = " <p> $content </p> " ;
$links = HTTP :: getLinksIn ( $content );
if ( $links ) foreach ( $links as $link ) {
$link = Director :: makeRelative ( $link );
if ( preg_match ( '/^([A-Za-z0-9_-]+)\/?(#.*)?$/' , $link , $parts ) ) {
2008-11-24 00:28:16 +01:00
$candidatePage = DataObject :: get_one ( " SiteTree " , " \" URLSegment \" = ' " . urldecode ( $parts [ 1 ] ) . " ' " , false );
2007-07-19 12:40:28 +02:00
if ( $candidatePage ) {
$linkedPages [] = $candidatePage -> ID ;
// This caused bugs in the publication script
// $candidatePage->destroy();
} else {
$record -> HasBrokenLink = 1 ;
}
} else if ( $link { 0 } == '/' ) {
$record -> HasBrokenLink = 1 ;
2008-11-24 10:31:14 +01:00
} else if ( $candidateFile = DataObject :: get_one ( " File " , " \" Filename \" = ' " . Convert :: raw2sql ( urldecode ( $link )) . " ' " , false )) {
2007-07-19 12:40:28 +02:00
$linkedFiles [] = $candidateFile -> ID ;
// $candidateFile->destroy();
}
}
2007-11-07 22:39:57 +01:00
2007-07-19 12:40:28 +02:00
$images = HTTP :: getImagesIn ( $content );
if ( $images ){
foreach ( $images as $image ) {
$image = Director :: makeRelative ( $image );
if ( substr ( $image , 0 , 7 ) == 'assets/' ) {
2008-11-24 10:31:14 +01:00
$candidateImage = DataObject :: get_one ( " File " , " \" Filename \" = ' $image ' " );
2007-07-19 12:40:28 +02:00
if ( $candidateImage ) $linkedFiles [] = $candidateImage -> ID ;
else $record -> HasBrokenFile = 1 ;
}
}
}
$fieldName = $this -> name ;
if ( $record -> ID && $record -> hasMethod ( 'LinkTracking' ) && $linkTracking = $record -> LinkTracking ()) {
2008-11-24 00:28:16 +01:00
$linkTracking -> removeByFilter ( " \" FieldName \" = ' $fieldName ' " );
2007-07-19 12:40:28 +02:00
if ( isset ( $linkedPages )) foreach ( $linkedPages as $item ) {
$linkTracking -> add ( $item , array ( " FieldName " => $fieldName ));
}
// $linkTracking->destroy();
}
if ( $record -> ID && $record -> hasMethod ( 'ImageTracking' ) && $imageTracking = $record -> ImageTracking ()) {
2008-11-24 00:28:16 +01:00
$imageTracking -> removeByFilter ( " \" FieldName \" = ' $fieldName ' " );
2007-07-19 12:40:28 +02:00
if ( isset ( $linkedFiles )) foreach ( $linkedFiles as $item ) {
$imageTracking -> add ( $item , array ( " FieldName " => $fieldName ));
}
// $imageTracking->destroy();
}
2008-03-11 02:30:36 +01:00
// Sometimes clients will double-escape %20. Fix this up with this dirty hack
$content = str_replace ( '%2520' , '%20' , $content );
2007-07-19 12:40:28 +02:00
$record -> $fieldName = $content ;
}
function rewriteLink ( $old , $new ) {
$bases [] = " " ;
$bases [] = Director :: baseURL ();
$bases [] = Director :: absoluteBaseURL ();
foreach ( $bases as $base ) {
$this -> value = ereg_replace ( " (href= \" ?) $base $old " , " \\ 1 $new " , $this -> value );
}
$this -> value = ereg_replace ( " (href= \" ?) $base $old " , " \\ 1 $new " , $this -> value );
return $this -> value ;
}
function performReadonlyTransformation () {
$field = new HtmlEditorField_readonly ( $this -> name , $this -> title , $this -> value );
$field -> setForm ( $this -> form );
$field -> dontEscape = true ;
return $field ;
}
}
2008-01-10 01:34:18 +01:00
/**
* Readonly version of an { @ link HTMLEditorField } .
* @ package forms
* @ subpackage fields - formattedinput
*/
2007-07-19 12:40:28 +02:00
class HtmlEditorField_readonly extends ReadonlyField {
function Field () {
$valforInput = $this -> value ? Convert :: raw2att ( $this -> value ) : " " ;
2007-11-07 05:17:58 +01:00
return " <span class= \" readonly typography \" id= \" " . $this -> id () . " \" > " . ( $this -> value && $this -> value != '<p></p>' ? $this -> value : '<i>(not set)</i>' ) . " </span><input type= \" hidden \" name= \" " . $this -> name . " \" value= \" " . $valforInput . " \" /> " ;
2007-07-19 12:40:28 +02:00
}
function Type () {
2007-11-06 22:01:37 +01:00
return 'htmleditorfield readonly' ;
2007-07-19 12:40:28 +02:00
}
}
/**
* Proccesses HTML images into the correct proportions from
* the regular expression evaluated on the save .
*/
function HtmlEditorField_dataValue_processImage ( $parts ) {
// The info could be in any order
$info [ $parts [ 2 ]] = $parts [ 3 ]; $partSource [ $parts [ 2 ]] = 3 ;
$info [ $parts [ 5 ]] = $parts [ 6 ]; $partSource [ $parts [ 5 ]] = 6 ;
$info [ $parts [ 8 ]] = $parts [ 9 ]; $partSource [ $parts [ 8 ]] = 9 ;
$src = Director :: makeRelative ( $info [ 'src="' ]);
2007-11-07 22:39:57 +01:00
2007-07-19 12:40:28 +02:00
if ( substr ( $src , 0 , 10 ) == '../assets/' ) $src = substr ( $src , 3 );
$width = $info [ 'width="' ];
$height = $info [ 'height="' ];
if ( ! $width || ! $height ) {
user_error ( " Can't find width/height in $text " , E_USER_ERROR );
}
// find the image inserted from the HTML editor
2007-11-07 22:39:57 +01:00
$image = Image :: find ( urldecode ( $src ));
2007-07-19 12:40:28 +02:00
2008-01-10 03:42:23 +01:00
// If we have an image, insert the resampled one into the src attribute; otherwise, leave the img src alone.
2008-11-17 23:59:17 +01:00
if ( $image && $image -> getWidth () != $width && $image -> getHeight () != $height ) {
2007-07-19 12:40:28 +02:00
// If we have an image, generate the resized image.
2008-10-29 00:20:14 +01:00
$resizedImage = $image -> getFormattedImage ( 'ResizedImage' , $width , $height );
if ( $resizedImage ) $parts [ $partSource [ 'src="' ]] = $resizedImage -> getRelativePath ();
2007-07-19 12:40:28 +02:00
}
$parts [ 0 ] = " " ;
$result = implode ( " " , $parts );
2008-01-10 03:42:23 +01:00
// Insert an empty alt tag if there isn't one
if ( strpos ( $result , " alt= " ) === false ) {
$result = substr_replace ( $result , ' alt="" />' , - 2 );
}
2007-07-19 12:40:28 +02:00
return $result ;
}
2008-01-10 01:34:18 +01:00
/**
* External toolbar for the HtmlEditorField .
* This is used by the CMS
* @ package forms
* @ subpackage fields - formattedinput
*/
2008-10-30 23:03:21 +01:00
class HtmlEditorField_Toolbar extends RequestHandler {
2007-07-19 12:40:28 +02:00
protected $controller , $name ;
function __construct ( $controller , $name ) {
2008-11-05 02:59:27 +01:00
parent :: __construct ();
2007-07-19 12:40:28 +02:00
$this -> controller = $controller ;
$this -> name = $name ;
}
function Buttons () {
return new DataObjectSet (
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " Bold " , " bold " , _t ( 'HtmlEditorField.BUTTONBOLD' , " Bold (Ctrl+B) " )),
new HtmlEditorField_button ( " Italic " , " italic " , _t ( 'HtmlEditorField.BUTTONITALIC' , " Italic (Ctrl+I) " )),
new HtmlEditorField_button ( " Underline " , " underline " , _t ( 'HtmlEditorField.BUTTONUNDERLINE' , " Underline (Ctrl+U) " )),
new HtmlEditorField_button ( " Strikethrough " , " strikethrough " , _t ( 'HtmlEditorField.BUTTONSTRIKE' , " strikethrough " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " JustifyLeft " , " justifyleft " , _t ( 'HtmlEditorField.BUTTONALIGNLEFT' , " Align left " )),
new HtmlEditorField_button ( " JustifyCenter " , " justifycenter " , _t ( 'HtmlEditorField.BUTTONALIGNCENTER' , " Align center " )),
new HtmlEditorField_button ( " JustifyRight " , " justifyright " , _t ( 'HtmlEditorField.BUTTONALIGNRIGHT' , " Align right " )),
new HtmlEditorField_button ( " JustifyFull " , " justifyfull " , _t ( 'HtmlEditorField.BUTTONALIGNJUSTIFY' , " Justify " )),
2007-07-19 12:40:28 +02:00
/* new HtmlEditorField_dropdown ( " mceSetCSSClass " , " styleSelect " , array (
" mceContentBody " => " mceContentBody " ,
)), */
new HtmlEditorField_dropdown ( " FormatBlock " , " formatSelect " , array (
2007-10-25 04:47:45 +02:00
" <p> " => _t ( 'HtmlEditorField.FORMATP' , " Paragraph " , PR_MEDIUM , '<p> tag' ),
" <h1> " => _t ( 'HtmlEditorField.FORMATH1' , " Heading 1 " , PR_MEDIUM , '<h1> tag' ),
" <h2> " => _t ( 'HtmlEditorField.FORMATH2' , " Heading 2 " , PR_MEDIUM , '<h2> tag' ),
" <h3> " => _t ( 'HtmlEditorField.FORMATH3' , " Heading 3 " , PR_MEDIUM , '<h3> tag' ),
" <h4> " => _t ( 'HtmlEditorField.FORMATH4' , " Heading 4 " , PR_MEDIUM , '<h4> tag' ),
" <h5> " => _t ( 'HtmlEditorField.FORMATH5' , " Heading 5 " , PR_MEDIUM , '<h5> tag' ),
" <h6> " => _t ( 'HtmlEditorField.FORMATH6' , " Heading 6 " , PR_MEDIUM , '<h6> tag' ),
2008-10-03 00:15:37 +02:00
" <address> " => _t ( 'HtmlEditorField.FORMATADDR' , " Address " , PR_MEDIUM , '<address> tag' ),
" <pre> " => _t ( 'HtmlEditorField.FORMATPRE' , " Preformatted " , PR_MEDIUM , '<pre> tag' ),
2007-07-19 12:40:28 +02:00
)),
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " InsertUnorderedList " , " bullist " , _t ( 'HtmlEditorField.BULLETLIST' , " Bullet-point list " )),
new HtmlEditorField_button ( " InsertOrderedList " , " numlist " , _t ( 'HtmlEditorField.OL' , " Numbered list " )),
new HtmlEditorField_button ( " Outdent " , " outdent " , _t ( 'HtmlEditorField.OUTDENT' , " Decrease outdent " )),
new HtmlEditorField_button ( " Indent " , " indent " , _t ( 'HtmlEditorField.INDENT' , " Increase indent " )),
new HtmlEditorField_button ( " inserthorizontalrule " , " hr " , _t ( 'HtmlEditorField.HR' , " Insert horizontal line " )),
new HtmlEditorField_button ( " mceCharMap " , " charmap " , _t ( 'HtmlEditorField.CHARMAP' , " Insert symbol " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_break (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " Undo " , " undo " , _t ( 'HtmlEditorField.UNDO' , " Undo (Ctrl+Z) " )),
new HtmlEditorField_button ( " Redo " , " redo " , _t ( 'HtmlEditorField.REDO' , " Redo (Ctrl+Y) " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " Cut " , " cut " , _t ( 'HtmlEditorField.CUT' , " Cut (Ctrl+X) " )),
new HtmlEditorField_button ( " Copy " , " copy " , _t ( 'HtmlEditorField.COPY' , " Copy (Ctrl+C) " )),
new HtmlEditorField_button ( " Paste " , " paste " , _t ( 'HtmlEditorField.PASTE' , " Paste (Ctrl+V) " )),
2008-01-08 01:53:54 +01:00
new HtmlEditorField_button ( " mcePasteText " , " paste:pastetext " , _t ( 'HtmlEditorField.PASTETEXT' , " Paste plain text " )),
new HtmlEditorField_button ( " mcePasteWord " , " paste:pasteword " , _t ( 'HtmlEditorField.PASTEWORD' , " Paste from Word " )),
new HtmlEditorField_button ( " mceSelectAll " , " paste:selectall " , _t ( 'HtmlEditorField.SELECTALL' , " Select All (Ctrl+A) " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " ssImage " , " image " , _t ( 'HtmlEditorField.IMAGE' , " Insert image " )),
new HtmlEditorField_button ( " ssFlash " , " flash:flash " , _t ( 'HtmlEditorField.FLASH' , " Insert flash " )),
2007-07-19 12:40:28 +02:00
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " ssLink " , " link " , _t ( 'HtmlEditorField.LINK' , " Insert/edit link for highlighted text " )),
new HtmlEditorField_button ( " unlink " , " unlink " , _t ( 'HtmlEditorField.UNLINK' , " Remove link " )),
new HtmlEditorField_button ( " mceInsertAnchor " , " anchor " , _t ( 'HtmlEditorField.ANCHOR' , " Insert/edit anchor " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " mceCodeEditor " , " code " , _t ( 'HtmlEditorField.EDITCODE' , " Edit HTML Code " )),
2007-07-19 12:40:28 +02:00
// We don't need this because tinymce is good at auto-tidying
// new HtmlEditorField_button("mceCleanup","cleanup","Clean up code"),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " mceToggleVisualAid " , " visualaid " , _t ( 'HtmlEditorField.VISUALAID' , " Show/hide guidelines " )),
2007-07-19 12:40:28 +02:00
new HtmlEditorField_separator (),
2007-10-25 04:47:45 +02:00
new HtmlEditorField_button ( " mceInsertTable " , " table:table " , _t ( 'HtmlEditorField.INSERTTABLE' , " Insert table " )),
new HtmlEditorField_button ( " mceTableInsertRowBefore " , " table:table_insert_row_before " , _t ( 'HtmlEditorField.INSERTROWBEF' , " Insert row before " )),
new HtmlEditorField_button ( " mceTableInsertRowAfter " , " table:table_insert_row_after " , _t ( 'HtmlEditorField.INSERTROWAFTER' , " Insert row after " )),
new HtmlEditorField_button ( " mceTableDeleteRow " , " table:table_delete_row " , _t ( 'HtmlEditorField.DELETEROW' , " Delete row " )),
new HtmlEditorField_button ( " mceTableInsertColBefore " , " table:table_insert_col_before " , _t ( 'HtmlEditorField.INSERTCOLBEF' , " Insert column before " )),
new HtmlEditorField_button ( " mceTableInsertColAfter " , " table:table_insert_col_after " , _t ( 'HtmlEditorField.INSERTCOLAFTER' , " Insert column after " )),
new HtmlEditorField_button ( " mceTableDeleteCol " , " table:table_delete_col " , _t ( 'HtmlEditorField.DELETECOL' , " Delete column " ))
2007-07-19 12:40:28 +02:00
);
}
/**
2008-11-04 05:12:54 +01:00
* Return a { @ link Form } instance allowing a user to
* add links in the TinyMCE content editor .
*
* @ return Form
2007-07-19 12:40:28 +02:00
*/
function LinkForm () {
2009-01-05 07:19:48 +01:00
Requirements :: javascript ( THIRDPARTY_DIR . " /behaviour.js " );
Requirements :: javascript ( THIRDPARTY_DIR . " /tiny_mce_improvements.js " );
2007-07-19 12:40:28 +02:00
$form = new Form (
$this -> controller ,
2008-08-11 01:35:11 +02:00
" { $this -> name } /LinkForm " ,
2007-07-19 12:40:28 +02:00
new FieldSet (
2008-11-04 05:12:54 +01:00
new LiteralField ( 'Heading' , '<h2><img src="cms/images/closeicon.gif" alt="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" title="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" />' . _t ( 'HtmlEditorField.LINK' , 'Link' ) . '</h2>' ),
new OptionsetField (
'LinkType' ,
_t ( 'HtmlEditorField.LINKTO' , 'Link to' ),
2007-07-19 12:40:28 +02:00
array (
2008-11-04 05:12:54 +01:00
'internal' => _t ( 'HtmlEditorField.LINKINTERNAL' , 'Page on the site' ),
'external' => _t ( 'HtmlEditorField.LINKEXTERNAL' , 'Another website' ),
'anchor' => _t ( 'HtmlEditorField.LINKANCHOR' , 'Anchor on this page' ),
'email' => _t ( 'HtmlEditorField.LINKEMAIL' , 'Email address' ),
'file' => _t ( 'HtmlEditorField.LINKFILE' , 'Download a file' ),
2007-07-19 12:40:28 +02:00
)
),
2008-11-04 05:12:54 +01:00
new TreeDropdownField ( 'internal' , _t ( 'HtmlEditorField.PAGE' , " Page " ), 'SiteTree' , 'URLSegment' , 'MenuTitle' ),
new TextField ( 'external' , _t ( 'HtmlEditorField.URL' , 'URL' ), 'http://' ),
new EmailField ( 'email' , _t ( 'HtmlEditorField.EMAIL' , 'Email address' )),
new TreeDropdownField ( 'file' , _t ( 'HtmlEditorField.FILE' , 'File' ), 'File' , 'Filename' ),
new TextField ( 'Anchor' , _t ( 'HtmlEditorField.ANCHORVALUE' , 'Anchor' )),
new TextField ( 'LinkText' , _t ( 'HtmlEditorField.LINKTEXT' , 'Link text' )),
new TextField ( 'Description' , _t ( 'HtmlEditorField.LINKDESCR' , 'Link description' )),
new CheckboxField ( 'TargetBlank' , _t ( 'HtmlEditorField.LINKOPENNEWWIN' , 'Open link in a new window?' ))
2007-07-19 12:40:28 +02:00
),
new FieldSet (
2008-11-04 05:12:54 +01:00
new FormAction ( 'insert' , _t ( 'HtmlEditorField.BUTTONINSERTLINK' , 'Insert link' )),
new FormAction ( 'remove' , _t ( 'HtmlEditorField.BUTTONREMOVELINK' , 'Remove link' ))
2007-07-19 12:40:28 +02:00
)
);
2008-11-04 05:12:54 +01:00
2007-07-19 12:40:28 +02:00
$form -> loadDataFrom ( $this );
2008-11-04 05:12:54 +01:00
2007-07-19 12:40:28 +02:00
return $form ;
}
2008-11-04 05:12:54 +01:00
/**
* Return a { @ link Form } instance allowing a user to
* add images to the TinyMCE content editor .
*
* @ return Form
*/
2007-07-19 12:40:28 +02:00
function ImageForm () {
2009-01-05 07:19:48 +01:00
Requirements :: javascript ( THIRDPARTY_DIR . " /behaviour.js " );
Requirements :: javascript ( THIRDPARTY_DIR . " /tiny_mce_improvements.js " );
Requirements :: css ( 'cms/css/TinyMCEImageEnhancement.css' );
Requirements :: javascript ( 'cms/javascript/TinyMCEImageEnhancement.js' );
2008-11-12 05:31:33 +01:00
Requirements :: javascript ( THIRDPARTY_DIR . '/SWFUpload/SWFUpload.js' );
Requirements :: javascript ( CMS_DIR . '/javascript/Upload.js' );
2007-11-07 07:28:21 +01:00
$form = new Form (
$this -> controller ,
2008-11-04 05:12:54 +01:00
" { $this -> name } /ImageForm " ,
2007-11-15 23:31:22 +01:00
new FieldSet (
2008-11-04 05:12:54 +01:00
new LiteralField ( 'Heading' , '<h2><img src="cms/images/closeicon.gif" alt="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" title="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" />' . _t ( 'HtmlEditorField.IMAGE' , 'Image' ) . '</h2>' ),
new TreeDropdownField ( 'FolderID' , _t ( 'HtmlEditorField.FOLDER' , 'Folder' ), 'Folder' ),
2007-11-15 23:31:22 +01:00
new LiteralField ( 'AddFolderOrUpload' ,
2008-11-04 05:12:54 +01:00
' < div style = " clear:both; " ></ div >< div id = " AddFolderGroup " style = " display:inline " >
< a style = " " href = " # " id = " AddFolder " class = " link " > ' . _t(' HtmlEditorField . CREATEFOLDER ',' create folder ') . ' </ a >
< input style = " display: none; margin-left: 2px; width: 94px; " id = " NewFolderName " class = " addFolder " type = " text " >
< a style = " display: none; " href = " # " id = " FolderOk " class = " link addFolder " > ' . _t(' HtmlEditorField . OK ',' ok ') . ' </ a >
< a style = " display: none; " href = " # " id = " FolderCancel " class = " link addFolder " > ' . _t(' HtmlEditorField . FOLDERCANCEL ',' cancel ') . ' </ a >
</ div >
< div id = " PipeSeparator " style = " display:inline " >|</ div >
< div id = " UploadGroup " class = " group " style = " display: inline; margin-top: 2px; " >
< a href = " # " id = " UploadFiles " class = " link " > ' . _t(' HtmlEditorField . UPLOAD ',' upload ') . ' </ a >
</ div > '
),
2008-11-13 05:55:23 +01:00
new TextField ( 'getimagesSearch' , _t ( 'HtmlEditorField.SEARCHFILENAME' , 'Search by file name' )),
2008-11-04 05:12:54 +01:00
new ThumbnailStripField ( 'Image' , 'FolderID' , 'getimages' ),
new TextField ( 'AltText' , _t ( 'HtmlEditorField.ALTTEXT' , 'Description' ), '' , 80 ),
2009-01-08 00:00:54 +01:00
new CheckboxField ( 'Caption' , _t ( 'HtmlEditorField.CAPTION' , 'Include as Caption' )),
2008-12-19 14:36:59 +01:00
new HiddenField ( 'CSSClass' , _t ( 'HtmlEditorField.CSSCLASS' , 'Alignment / style' )),
2009-01-05 04:06:57 +01:00
new LiteralField ( 'AlignmentStyle' , '<div id="ImageAligmentStyle" class="field text"><label>Alignment / style</label>' ),
2008-12-19 14:36:59 +01:00
new LiteralField ( 'AlignmentStyleLinks' , '
2009-01-05 04:06:57 +01:00
< div id = " ImageAlignmentStyles_Wrapper " >
< a id = " ImageAligmentStyle_left " href = " # " title = " '._t('HtmlEditorField.CSSCLASSLEFT', 'On the left, with text wrapping around.').' " > '. _t(' HtmlEditorField . CSSCLASSLEFT ', ' On the left , with text wrapping around . ') .' </ a >
< a id = " ImageAligmentStyle_leftAlone " href = " # " title = " '._t('HtmlEditorField.CSSCLASSLEFTALONE', 'On the left, on its own.').' " > '. _t(' HtmlEditorField . CSSCLASSLEFTALONE ', ' On the left , on its own . ') .' </ a >
< a id = " ImageAligmentStyle_right " href = " # " title = " '._t('HtmlEditorField.CSSCLASSRIGHT', 'On the right, with text wrapping around.').' " > '. _t(' HtmlEditorField . CSSCLASSRIGHT ', ' On the right , with text wrapping around . ') .' </ a >
< a id = " ImageAligmentStyle_center " href = " # " title = " '._t('HtmlEditorField.CSSCLASSCENTER', 'Centered, on its own.').' " > '. _t(' HtmlEditorField . CSSCLASSCENTER ', ' Centered , on its own . ') .' </ a >
</ div >
</ div >
2008-12-19 14:36:59 +01:00
< div class = " clear " ></ div >
' ),
2008-11-04 05:12:54 +01:00
new FieldGroup ( _t ( 'HtmlEditorField.IMAGEDIMENSIONS' , 'Dimensions' ),
new TextField ( 'Width' , _t ( 'HtmlEditorField.IMAGEWIDTHPX' , 'Width' ), 100 ),
2009-01-05 04:06:57 +01:00
new TextField ( 'Height' , " x " . _t ( 'HtmlEditorField.IMAGEHEIGHTPX' , 'Height' ), 100 )
2007-11-15 23:31:22 +01:00
)
),
2007-11-07 07:28:21 +01:00
new FieldSet (
2009-01-10 12:35:50 +01:00
new FormAction ( 'insertimage' , _t ( 'HtmlEditorField.BUTTONINSERTIMAGE' , 'Insert image' ))
2007-07-19 12:40:28 +02:00
)
);
2008-11-04 05:12:54 +01:00
2007-07-19 12:40:28 +02:00
$form -> loadDataFrom ( $this );
2008-11-04 05:12:54 +01:00
2007-07-19 12:40:28 +02:00
return $form ;
}
function FlashForm () {
2009-01-05 07:19:48 +01:00
Requirements :: javascript ( THIRDPARTY_DIR . " /behaviour.js " );
Requirements :: javascript ( THIRDPARTY_DIR . " /tiny_mce_improvements.js " );
2008-11-12 05:31:33 +01:00
Requirements :: javascript ( THIRDPARTY_DIR . '/SWFUpload/SWFUpload.js' );
Requirements :: javascript ( CMS_DIR . '/javascript/Upload.js' );
2007-11-07 07:28:21 +01:00
$form = new Form (
$this -> controller ,
2008-08-11 01:35:11 +02:00
" { $this -> name } /FlashForm " ,
2007-07-19 12:40:28 +02:00
new FieldSet (
2008-01-10 04:28:13 +01:00
new LiteralField ( 'Heading' , '<h2><img src="cms/images/closeicon.gif" alt="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" title="' . _t ( 'HtmlEditorField.CLOSE' , 'close' ) . '" />' . _t ( 'HtmlEditorField.FLASH' , 'Flash' ) . '</h2>' ),
2007-10-25 04:47:45 +02:00
new TreeDropdownField ( " FolderID " , _t ( 'HtmlEditorField.FOLDER' ), " Folder " ),
2008-11-13 05:55:23 +01:00
new TextField ( 'getflashSearch' , _t ( 'HtmlEditorField.SEARCHFILENAME' , 'Search by file name' )),
2007-07-19 12:40:28 +02:00
new ThumbnailStripField ( " Flash " , " FolderID " , " getflash " ),
2007-11-07 06:50:13 +01:00
new FieldGroup ( _t ( 'HtmlEditorField.IMAGEDIMENSIONS' , " Dimensions " ),
2007-11-08 03:08:50 +01:00
new TextField ( " Width " , _t ( 'HtmlEditorField.IMAGEWIDTHPX' , " Width " ), 100 ),
new TextField ( " Height " , " x " . _t ( 'HtmlEditorField.IMAGEHEIGHTPX' , " Height " ), 100 )
2007-11-07 06:50:13 +01:00
)
2007-07-19 12:40:28 +02:00
),
2007-11-08 03:08:50 +01:00
new FieldSet (
new FormAction ( " insertflash " , _t ( 'HtmlEditorField.BUTTONINSERTFLASH' , 'Insert Flash' ))
)
2007-07-19 12:40:28 +02:00
);
$form -> loadDataFrom ( $this );
return $form ;
}
}
/**
2008-01-10 01:34:18 +01:00
* Base class for HTML editor toolbar buttons .
* These controls are used when manually constructing a toolbar , as we do in the CMS .
* @ package forms
* @ subpackage fields - formattedinput
2007-07-19 12:40:28 +02:00
*/
class HtmlEditorField_control extends ViewableData {
protected $command ;
function Type () { return substr ( $this -> class , strrpos ( $this -> class , '_' ) + 1 ); }
function Command () { return $this -> command ; }
2008-07-11 01:29:20 +02:00
function MceRoot () {
return MCE_ROOT ;
}
2007-07-19 12:40:28 +02:00
}
2008-01-10 01:34:18 +01:00
/**
* Button on the HTML edityor toolbar .
* @ package forms
* @ subpackage fields - formattedinput
*/
2007-07-19 12:40:28 +02:00
class HtmlEditorField_button extends HtmlEditorField_control {
function __construct ( $command , $icon , $title = null ) {
$this -> title = $title ? $title : $command ;
$this -> command = $command ;
$this -> icon = $icon ;
parent :: __construct ();
}
function Command () {
return $this -> command ;
}
function Icon () {
if ( strpos ( $this -> icon , '/' ) !== false ) {
return $this -> icon ;
} else if ( strpos ( $this -> icon , ':' ) !== false ) {
list ( $plugin , $icon ) = explode ( ':' , $this -> icon , 2 );
return MCE_ROOT . 'plugins/' . $plugin . '/images/' . $icon . '.gif' ;
} else {
return MCE_ROOT . 'themes/advanced/images/' . $this -> icon . '.gif' ;
}
}
function Title () {
return $this -> title ;
}
function IDSegment () {
return $this -> icon ;
}
}
2008-01-10 01:34:18 +01:00
/**
* Separator on the HTML edityor toolbar .
* @ package forms
* @ subpackage fields - formattedinput
*/
2007-07-19 12:40:28 +02:00
class HtmlEditorField_separator extends HtmlEditorField_control {
}
2008-01-10 01:34:18 +01:00
/**
* Dropdown field on the HTML editor toolbar .
* @ package forms
* @ subpackage fields - formattedinput
*/
2007-07-19 12:40:28 +02:00
class HtmlEditorField_dropdown extends HtmlEditorField_control {
protected $options , $idSegment ;
function __construct ( $command , $idSegment , $options ) {
$this -> command = $command ;
$this -> options = $options ;
$this -> idSegment = $idSegment ;
parent :: __construct ();
}
function Options () {
$options = '' ;
foreach ( $this -> options as $k => $v ) {
$k = Convert :: raw2att ( $k );
$v = Convert :: raw2xml ( $v );
$options .= " <option value= \" $k\ " > $v </ option > \n " ;
}
return $options ;
}
function IDSegment () {
return $this -> idSegment ;
}
}
2008-01-10 01:34:18 +01:00
/**
* Line break on the HTML editor toolbar .
* @ package forms
* @ subpackage fields - formattedinput
*/
2007-07-19 12:40:28 +02:00
class HtmlEditorField_break extends HtmlEditorField_control {
}
2007-11-06 06:39:14 +01:00
?>