2007-07-19 12:40:05 +02:00
< ? php
2008-01-08 07:41:55 +01:00
/**
* @ package cms
2008-01-10 01:33:49 +01:00
* @ subpackage assets
2008-01-08 07:41:55 +01:00
*/
2007-07-19 12:40:05 +02:00
/**
* AssetAdmin is the 'file store' section of the CMS .
* It provides an interface for maniupating the File and Folder objects in the system .
2008-01-10 01:33:49 +01:00
* @ package cms
* @ subpackage assets
2007-07-19 12:40:05 +02:00
*/
class AssetAdmin extends LeftAndMain {
static $tree_class = " File " ;
public function Link ( $action = null ) {
if ( ! $action ) $action = " index " ;
return " admin/assets/ $action / " . $this -> currentPageID ();
}
/**
* Return fake - ID " root " if no ID is found ( needed to upload files into the root - folder )
*/
public function currentPageID () {
if ( isset ( $_REQUEST [ 'ID' ]) && is_numeric ( $_REQUEST [ 'ID' ])) {
return $_REQUEST [ 'ID' ];
} elseif ( is_numeric ( $this -> urlParams [ 'ID' ])) {
return $this -> urlParams [ 'ID' ];
} elseif ( is_numeric ( Session :: get ( " { $this -> class } .currentPage " ))) {
return Session :: get ( " { $this -> class } .currentPage " );
} else {
return " root " ;
}
}
/**
* Set up the controller , in particular , re - sync the File database with the assets folder ./
*/
function init () {
parent :: init ();
2007-10-29 03:10:59 +01:00
if ( ! file_exists ( '../assets' )) {
mkdir ( '../assets' );
}
2007-07-19 12:40:05 +02:00
// needed for MemberTableField (Requirements not determined before Ajax-Call)
Requirements :: javascript ( " sapphire/javascript/ComplexTableField.js " );
Requirements :: css ( " jsparty/greybox/greybox.css " );
Requirements :: css ( " sapphire/css/ComplexTableField.css " );
Requirements :: javascript ( " cms/javascript/AssetAdmin.js " );
Requirements :: javascript ( " cms/javascript/AssetAdmin_left.js " );
Requirements :: javascript ( " cms/javascript/AssetAdmin_right.js " );
2007-09-16 03:40:26 +02:00
2007-11-15 23:31:22 +01:00
Requirements :: javascript ( " cms/javascript/CMSMain_upload.js " );
Requirements :: javascript ( " cms/javascript/Upload.js " );
2007-09-16 03:40:26 +02:00
Requirements :: javascript ( " sapphire/javascript/Security_login.js " );
2007-11-15 23:31:22 +01:00
Requirements :: javascript ( " jsparty/SWFUpload/SWFUpload.js " );
2007-07-19 12:40:05 +02:00
// Include the right JS]
// Hayden: This didn't appear to be used at all
/* $fileList = new FileList ( " Form_EditForm_Files " , null );
$fileList -> setClick_AjaxLoad ( 'admin/assets/getfile/' , 'Form_SubForm' );
$fileList -> FieldHolder (); */
Requirements :: javascript ( " jsparty/greybox/AmiJS.js " );
Requirements :: javascript ( " jsparty/greybox/greybox.js " );
Requirements :: css ( " jsparty/greybox/greybox.css " );
2007-09-27 22:56:55 +02:00
Requirements :: css ( " cms/css/AssetAdmin.css " );
2007-07-19 12:40:05 +02:00
}
/**
* Display the upload form . Returns an iframe tag that will show admin / assets / uploadiframe .
*/
function getUploadIframe () {
return <<< HTML
< iframe name = " AssetAdmin_upload " src = " admin/assets/uploadiframe/ { $this -> urlParams [ 'ID' ] } " id = " AssetAdmin_upload " border = " 0 " style = " border-style: none; width: 100%; height: 200px " >
</ iframe >
HTML ;
}
function index () {
File :: sync ();
return array ();
}
/**
* Show the content of the upload iframe . The form is specified by a template .
*/
function uploadiframe () {
Requirements :: clear ();
Requirements :: javascript ( " jsparty/prototype.js " );
Requirements :: javascript ( " jsparty/loader.js " );
Requirements :: javascript ( " jsparty/behaviour.js " );
Requirements :: javascript ( " jsparty/prototype_improvements.js " );
Requirements :: javascript ( " jsparty/layout_helpers.js " );
Requirements :: javascript ( " cms/javascript/LeftAndMain.js " );
Requirements :: javascript ( " jsparty/multifile/multifile.js " );
Requirements :: css ( " jsparty/multifile/multifile.css " );
2007-11-02 04:01:40 +01:00
Requirements :: css ( " cms/css/typography.css " );
2007-07-19 12:40:05 +02:00
Requirements :: css ( " cms/css/layout.css " );
Requirements :: css ( " cms/css/cms_left.css " );
Requirements :: css ( " cms/css/cms_right.css " );
if ( isset ( $data [ 'ID' ]) && $data [ 'ID' ] != 'root' ) $folder = DataObject :: get_by_id ( " Folder " , $data [ 'ID' ]);
else $folder = singleton ( 'Folder' );
$canUpload = $folder -> userCanEdit ();
return array ( 'CanUpload' => $canUpload );
}
/**
* Return the form object shown in the uploadiframe .
*/
function UploadForm () {
return new Form ( $this , 'UploadForm' , new FieldSet (
new HiddenField ( " ID " , " " , $this -> currentPageID ()),
// needed because the button-action is triggered outside the iframe
new HiddenField ( " action_doUpload " , " " , " 1 " ),
2007-09-16 18:33:05 +02:00
new FileField ( " Files[0] " , _t ( 'AssetAdmin.CHOOSEFILE' , 'Choose file ' )),
2007-07-19 12:40:05 +02:00
new LiteralField ( 'UploadButton' , "
2007-09-16 18:33:05 +02:00
< input type = 'submit' value = '". _t(' AssetAdmin . UPLOAD ', ' Upload Files Listed Below '). "' name = 'action_upload' id = 'Form_UploadForm_action_upload' class = 'action' />
2007-07-19 12:40:05 +02:00
" ),
new LiteralField ( 'MultifileCode' , "
2007-09-16 18:33:05 +02:00
< p > " . _t('AssetAdmin.FILESREADY','Files ready to upload:') . " </ p >
2007-07-19 12:40:05 +02:00
< div id = 'Form_UploadForm_FilesList' ></ div >
< script >
var multi_selector = new MultiSelector ( $ ( 'Form_UploadForm_FilesList' ), null , $ ( 'Form_UploadForm_action_upload' ));
multi_selector . addElement ( $ ( 'Form_UploadForm_Files-0' ));
2007-09-16 04:36:16 +02:00
new window . top . document . CMSMain_upload ();
2007-07-19 12:40:05 +02:00
</ script >
" )
), new FieldSet (
));
}
/**
* This method processes the results of the UploadForm .
* It will save the uploaded files to / assets / and create new File objects as required .
*/
function doUpload ( $data , $form ) {
foreach ( $data [ 'Files' ] as $param => $files ) {
2007-09-16 03:40:26 +02:00
if ( ! is_array ( $files )) $files = array ( $files );
2007-07-19 12:40:05 +02:00
foreach ( $files as $key => $value ) {
$processedFiles [ $key ][ $param ] = $value ;
}
}
if ( $data [ 'ID' ] && $data [ 'ID' ] != 'root' ) $folder = DataObject :: get_by_id ( " Folder " , $data [ 'ID' ]);
else $folder = singleton ( 'Folder' );
2007-08-21 04:32:20 +02:00
$newFiles = array ();
2007-07-19 12:40:05 +02:00
$fileSizeWarnings = '' ;
2007-08-21 04:32:20 +02:00
$uploadErrors = '' ;
2007-07-19 12:40:05 +02:00
foreach ( $processedFiles as $file ) {
2007-08-21 04:32:20 +02:00
if ( $file [ 'error' ] == UPLOAD_ERR_NO_TMP_DIR ) {
$status = 'bad' ;
2008-01-10 04:28:13 +01:00
$statusMessage = _t ( 'AssetAdmin.NOTEMP' , 'There is no temporary folder for uploads. Please set upload_tmp_dir in php.ini.' );
2007-08-21 04:32:20 +02:00
break ;
}
2007-07-19 12:40:05 +02:00
if ( $file [ 'tmp_name' ]) {
2007-08-21 04:32:20 +02:00
// Workaround open_basedir problems
if ( ini_get ( " open_basedir " )) {
$newtmp = TEMP_FOLDER . '/' . $file [ 'name' ];
move_uploaded_file ( $file [ 'tmp_name' ], $newtmp );
$file [ 'tmp_name' ] = $newtmp ;
}
2007-07-19 12:40:05 +02:00
// check that the file can be uploaded and isn't too large
$extensionIndex = strripos ( $file [ 'name' ], '.' );
$extension = strtolower ( substr ( $file [ 'name' ], $extensionIndex + 1 ) );
if ( $extensionIndex !== FALSE )
list ( $maxSize , $warnSize ) = File :: getMaxFileSize ( $extension );
else
list ( $maxSize , $warnSize ) = File :: getMaxFileSize ();
// check that the file is not too large or that the current user is an administrator
if ( $this -> can ( 'AdminCMS' ) || ( File :: allowedFileType ( $extension ) && ( ! isset ( $maxsize ) || $file [ 'size' ] < $maxSize )))
$newFiles [] = $folder -> addUploadToFolder ( $file );
elseif ( ! File :: allowedFileType ( $extension ) ) {
2007-09-16 18:33:05 +02:00
$fileSizeWarnings .= " alert( ' " . sprintf ( _t ( 'AssetAdmin.ONLYADMINS' , 'Only administrators can upload %s files.' ), $extension ) . " ' ); " ;
2007-07-19 12:40:05 +02:00
} else {
if ( $file [ 'size' ] > 1048576 )
$fileSize = " " . ceil ( $file [ 'size' ] / 1048576 ) . " MB " ;
elseif ( $file [ 'size' ] > 1024 )
$fileSize = " " . ceil ( $file [ 'size' ] / 1024 ) . " KB " ;
else
$fileSize = " " . ceil ( $file [ 'size' ] ) . " B " ;
2007-09-16 18:33:05 +02:00
$fileSizeWarnings .= " alert( ' " . sprintf ( _t ( 'AssetAdmin.TOOLARGE' , " %s is too large (%s). Files of this type cannot be larger than %s " ), " \\ ' " . $file [ 'name' ] . " \\ ' " , $fileSize , $warnSize ) . " ' ); " ;
2007-07-19 12:40:05 +02:00
}
}
}
if ( $newFiles ) {
$numFiles = sizeof ( $newFiles );
2007-09-16 18:33:05 +02:00
$statusMessage = sprintf ( _t ( 'AssetAdmin.UPLOADEDX' , " Uploaded %s files " ), $numFiles ) ;
2007-07-19 12:40:05 +02:00
$status = " good " ;
2007-08-21 04:32:20 +02:00
} else if ( $status != 'bad' ) {
2007-09-16 18:33:05 +02:00
$statusMessage = _t ( 'AssetAdmin.NOTHINGTOUPLOAD' , 'There was nothing to upload' );
2007-07-19 12:40:05 +02:00
$status = " " ;
}
2007-12-13 23:03:48 +01:00
$fileIDs = array ();
$fileNames = array ();
foreach ( $newFiles as $newFile ) {
$fileIDs [] = $newFile ;
$fileObj = DataObject :: get_one ( 'File' , " `File`.ID= $newFile " );
$fileNames [] = $fileObj -> Name ;
}
$sFileIDs = implode ( ',' , $fileIDs );
$sFileNames = implode ( ',' , $fileNames );
2007-07-19 12:40:05 +02:00
echo <<< HTML
< script type = " text/javascript " >
2007-12-13 23:03:48 +01:00
/* IDs: $sFileIDs */
/* Names: $sFileNames */
2007-07-19 12:40:05 +02:00
var form = parent . document . getElementById ( 'Form_EditForm' );
form . getPageFromServer ( form . elements . ID . value );
parent . statusMessage ( " { $statusMessage } " , " { $status } " );
$fileSizeWarnings
parent . document . getElementById ( 'sitetree' ) . getTreeNodeByIdx ( " { $folder -> ID } " ) . getElementsByTagName ( 'a' )[ 0 ] . className += ' contents' ;
</ script >
HTML ;
}
/**
* Needs to be overridden to make sure an ID with value " 0 " is still valid ( rootfolder )
*/
/**
* Return the form that displays the details of a folder , including a file list and fields for editing the folder name .
*/
function getEditForm ( $id ) {
if ( $id && $id != " root " ) {
$record = DataObject :: get_by_id ( " File " , $id );
} else {
$record = singleton ( " Folder " );
}
$fileList = new AssetTableField (
$this ,
" Files " ,
" File " ,
2007-11-01 21:58:28 +01:00
array ( " Title " => _t ( 'AssetAdmin.TITLE' , " Title " ), " LinkedURL " => _t ( 'AssetAdmin.FILENAME' , " Filename " )),
2007-07-19 12:40:05 +02:00
" "
);
$fileList -> setFolder ( $record );
2007-11-01 21:58:28 +01:00
$fileList -> setPopupCaption ( _t ( 'AssetAdmin.VIEWEDITASSET' , " View/Edit Asset " ));
2007-10-02 23:34:57 +02:00
if ( $record ) {
2007-09-15 03:16:04 +02:00
$nameField = ( $id != " root " ) ? new TextField ( " Name " , " Folder Name " ) : new HiddenField ( " Name " );
2007-09-15 22:47:35 +02:00
if ( $record -> userCanEdit () ) {
2007-09-16 18:33:05 +02:00
$deleteButton = new InlineFormAction ( 'deletemarked' , _t ( 'AssetAdmin.DELSELECTED' , 'Delete selected files' ), 'delete' );
2007-09-15 22:47:35 +02:00
$deleteButton -> includeDefaultJS ( false );
} else {
$deleteButton = new HiddenField ( 'deletemarked' );
}
2007-07-19 12:40:05 +02:00
$fields = new FieldSet (
new HiddenField ( " Title " ),
new TabSet ( " Root " ,
2007-11-01 21:58:28 +01:00
new Tab ( _t ( 'AssetAdmin.FILESTAB' , " Files " ),
2007-09-15 03:15:35 +02:00
$nameField ,
2007-09-15 22:47:35 +02:00
$fileList ,
$deleteButton ,
new HiddenField ( " FileIDs " ),
new HiddenField ( " DestFolderID " )
2007-07-19 12:40:05 +02:00
),
2007-11-01 21:58:28 +01:00
new Tab ( _t ( 'AssetAdmin.DETAILSTAB' , " Details " ),
2008-01-10 04:28:13 +01:00
new ReadonlyField ( " URL " , _t ( 'AssetAdmin.URL' , 'URL' )),
2007-09-16 18:33:05 +02:00
new ReadonlyField ( " ClassName " , _t ( 'AssetAdmin.TYPE' , 'Type' )),
new ReadonlyField ( " Created " , _t ( 'AssetAdmin.CREATED' , 'First Uploaded' )),
new ReadonlyField ( " LastEdited " , _t ( 'AssetAdmin.LASTEDITED' , 'Last Updated' ))
2007-07-19 12:40:05 +02:00
),
2007-11-01 21:58:28 +01:00
new Tab ( _t ( 'AssetAdmin.UPLOADTAB' , " Upload " ),
2007-07-19 12:40:05 +02:00
new LiteralField ( " UploadIframe " ,
$this -> getUploadIframe ()
)
2008-02-07 04:36:02 +01:00
) /* This has been disabled for now because of it ' s mass memory consumption
,
2007-11-01 21:58:28 +01:00
new Tab ( _t ( 'AssetAdmin.UNUSEDFILESTAB' , " Unused files " ),
2007-10-02 23:34:57 +02:00
new LiteralField ( " UnusedAssets " ,
2007-11-05 23:08:12 +01:00
" <div id= \" UnusedAssets \" ><h2> " . _t ( 'AssetAdmin.UNUSEDFILESTITLE' , 'Unused files' ) . " </h2> "
2007-10-02 23:34:57 +02:00
),
$this -> getAssetList (),
new LiteralField ( " UnusedThumbnails " ,
" </div>
< div id = \ " UnusedThumbnails \" >
2007-11-05 23:08:12 +01:00
< h2 > " ._t('AssetAdmin.UNUSEDTHUMBNAILSTITLE', 'Unused thumbnails'). " </ h2 >
2007-11-06 03:53:40 +01:00
< button class = \ " action \" > " . _t ( 'AssetAdmin.DELETEUNUSEDTHUMBNAILS' , 'Delete unused thumbnails' ) . " </button>
2007-10-02 23:34:57 +02:00
</ div > "
)
2008-02-07 04:36:02 +01:00
) */
2007-10-02 23:34:57 +02:00
),
2007-07-19 12:40:05 +02:00
new HiddenField ( " ID " )
);
$actions = new FieldSet ();
2007-09-15 22:47:35 +02:00
// Only show save button if not 'assets' folder
if ( $record -> userCanEdit () && $id != " root " ) {
2007-07-19 12:40:05 +02:00
$actions = new FieldSet (
2007-09-16 18:33:05 +02:00
new FormAction ( 'save' , _t ( 'AssetAdmin.SAVEFOLDERNAME' , 'Save folder name' ))
2007-07-19 12:40:05 +02:00
);
}
$form = new Form ( $this , " EditForm " , $fields , $actions );
if ( $record -> ID ) {
$form -> loadDataFrom ( $record );
} else {
$form -> loadDataFrom ( array (
" ID " => " root " ,
" URL " => Director :: absoluteBaseURL () . 'assets/' ,
));
}
// @todo: These workflow features aren't really appropriate for all projects
if ( Member :: currentUser () -> _isAdmin () && project () == 'mot' ) {
2007-09-16 18:33:05 +02:00
$fields -> addFieldsToTab ( 'Root.Workflow' , new DropdownField ( " Owner " , _t ( 'AssetAdmin.OWNER' , 'Owner' ), Member :: map () ) );
$fields -> addFieldsToTab ( 'Root.Workflow' , new TreeMultiselectField ( " CanUse " , _t ( 'AssetAdmin.CONTENTUSABLEBY' , 'Content usable by' )) );
$fields -> addFieldsToTab ( 'Root.Workflow' , new TreeMultiselectField ( " CanEdit " , _t ( 'AssetAdmin.CONTENTMODBY' , 'Content modifiable by' )) );
2007-07-19 12:40:05 +02:00
}
if ( ! $record -> userCanEdit () )
$form -> makeReadonly ();
return $form ;
}
}
/**
* Perform the " move marked " action .
2007-09-15 22:47:35 +02:00
* Called and returns in same way as 'save' function
2007-07-19 12:40:05 +02:00
*/
2007-09-15 22:47:35 +02:00
public function movemarked ( $urlParams , $form ) {
2007-07-19 12:40:05 +02:00
if ( $_REQUEST [ 'DestFolderID' ] && is_numeric ( $_REQUEST [ 'DestFolderID' ])) {
$destFolderID = $_REQUEST [ 'DestFolderID' ];
$fileList = " ' " . ereg_replace ( ' *, *' , " ',' " , trim ( addslashes ( $_REQUEST [ 'FileIDs' ]))) . " ' " ;
$numFiles = 0 ;
if ( $fileList != " '' " ) {
$files = DataObject :: get ( " File " , " `File`.ID IN ( $fileList ) " );
if ( $files ) {
foreach ( $files as $file ) {
2007-09-15 22:30:54 +02:00
if ( $file instanceof Image ) {
$file -> deleteFormattedImages ();
}
2007-07-19 12:40:05 +02:00
$file -> ParentID = $destFolderID ;
$file -> write ();
$numFiles ++ ;
}
} else {
user_error ( " No files in $fileList could be found! " , E_USER_ERROR );
}
}
2007-09-15 22:47:35 +02:00
2007-09-16 18:33:05 +02:00
$message = sprintf ( _t ( 'AssetAdmin.MOVEDX' , 'Moved %s files' ), $numFiles );
2007-09-15 22:47:35 +02:00
FormResponse :: status_message ( $message , " good " );
FormResponse :: add ( " $ ('Form_EditForm').getPageFromServer( $ ('Form_EditForm_ID').value) " );
return FormResponse :: respond ();
2007-07-19 12:40:05 +02:00
} else {
user_error ( " Bad data: $_REQUEST[DestFolderID] " , E_USER_ERROR );
}
}
/**
* Perform the " delete marked " action .
2007-09-15 22:47:35 +02:00
* Called and returns in same way as 'save' function
2007-07-19 12:40:05 +02:00
*/
2007-09-15 22:47:35 +02:00
public function deletemarked ( $urlParams , $form ) {
2007-07-19 12:40:05 +02:00
$fileList = " ' " . ereg_replace ( ' *, *' , " ',' " , trim ( addslashes ( $_REQUEST [ 'FileIDs' ]))) . " ' " ;
$numFiles = 0 ;
$folderID = 0 ;
$deleteList = '' ;
$brokenPageList = '' ;
if ( $fileList != " '' " ) {
2007-12-13 22:56:37 +01:00
$files = DataObject :: get ( " File " , " `File`.ID IN ( $fileList ) " );
2007-07-19 12:40:05 +02:00
if ( $files ) {
foreach ( $files as $file ) {
2007-09-15 03:29:38 +02:00
if ( $file instanceof Image ) {
$file -> deleteFormattedImages ();
}
2007-07-19 12:40:05 +02:00
if ( ! $folderID )
$folderID = $file -> ParentID ;
// $deleteList .= "\$('Form_EditForm_Files').removeById($file->ID);\n";
$file -> delete ();
$numFiles ++ ;
}
if ( $brokenPages = Notifications :: getItems ( " BrokenLink " )) {
2007-09-16 18:33:05 +02:00
$brokenPageList = " " . _t ( 'AssetAdmin.NOWBROKEN' , " These pages now have broken links: " ) . " </ul> " ;
2007-07-19 12:40:05 +02:00
foreach ( $brokenPages as $brokenPage ) {
$brokenPageList .= " <li style="font-size: 65%"> " . $brokenPage -> Breadcrumbs ( 3 , true ) . " </li> " ;
}
$brokenPageList .= " </ul> " ;
Notifications :: notifyByEmail ( " BrokenLink " , " Page_BrokenLinkEmail " );
2007-09-14 20:12:00 +02:00
} else {
$brokenPageList = '' ;
2007-07-19 12:40:05 +02:00
}
2007-09-14 20:12:00 +02:00
$deleteList = '' ;
2007-07-19 12:40:05 +02:00
if ( $folderID ) {
$remaining = DB :: query ( " SELECT COUNT(*) FROM `File` WHERE `ParentID`= $folderID " ) -> value ();
if ( ! $remaining )
2007-09-16 18:33:05 +02:00
$deleteList .= " Element.removeClassName( \$ ('sitetree').getTreeNodeByIdx( ' $folderID ' ).getElementsByTagName('a')[0],'contents'); " ;
2007-07-19 12:40:05 +02:00
}
} else {
user_error ( " No files in $fileList could be found! " , E_USER_ERROR );
}
}
2007-09-16 18:33:05 +02:00
$message = sprintf ( _t ( 'AssetAdmin.DELETEDX' , " Deleted %s files.%s " ), $numFiles , $brokenPageList ) ;
2007-09-15 22:47:35 +02:00
FormResponse :: add ( $deleteList );
FormResponse :: status_message ( $message , " good " );
FormResponse :: add ( " $ ('Form_EditForm').getPageFromServer( $ ('Form_EditForm_ID').value) " );
return FormResponse :: respond ();
2007-07-19 12:40:05 +02:00
}
/**
* Returns the content to be placed in Form_SubForm when editing a file .
* Called using ajax .
*/
public function getfile () {
SSViewer :: setOption ( 'rewriteHashlinks' , false );
// bdc: only try to return something if user clicked on an object
if ( is_object ( $this -> getSubForm ( $this -> urlParams [ 'ID' ]))) {
return $this -> getSubForm ( $this -> urlParams [ 'ID' ]) -> formHtmlContent ();
}
else return null ;
}
/**
* Action handler for the save button on the file subform .
* Saves the file
*/
public function savefile ( $data , $form ) {
$record = DataObject :: get_by_id ( " File " , $data [ 'ID' ]);
$form -> saveInto ( $record );
$record -> write ();
$title = Convert :: raw2js ( $record -> Title );
$name = Convert :: raw2js ( $record -> Name );
2007-09-16 18:33:05 +02:00
$saved = sprintf ( _t ( 'AssetAdmin.SAVEDFILE' , 'Saved file %s' ), " # $data[ID] " );
2007-07-19 12:40:05 +02:00
echo <<< JS
2007-09-16 18:33:05 +02:00
statusMessage ( '$saved' );
2007-07-19 12:40:05 +02:00
$ ( 'record-$data[ID]' ) . getElementsByTagName ( 'td' )[ 1 ] . innerHTML = " $title " ;
$ ( 'record-$data[ID]' ) . getElementsByTagName ( 'td' )[ 2 ] . innerHTML = " $name " ;
JS ;
}
/**
* Return the entire site tree as a nested set of ULs
*/
public function SiteTreeAsUL () {
$obj = singleton ( 'Folder' );
$obj -> setMarkingFilter ( " ClassName " , " Folder " );
$obj -> markPartialTree ();
if ( $p = $this -> currentPage ()) $obj -> markToExpose ( $p );
// getChildrenAsUL is a flexible and complex way of traversing the tree
$siteTree = $obj -> getChildrenAsUL ( " " ,
' "<li id=\"record-$child->ID\" class=\"$child->class" . $child->markingClasses() . ($extraArg->isCurrentPage($child) ? " current" : "") . "\">" . ' .
' "<a href=\"" . Director::link(substr($extraArg->Link(),0,-1), "show", $child->ID) . "\" class=\"" . ($child->hasChildren() ? " contents" : "") . "\" >" . $child->Title . "</a>" ' ,
$this , true );
// Wrap the root if needs be.
$rootLink = $this -> Link () . 'show/root' ;
2007-11-06 04:57:40 +01:00
if ( ! isset ( $rootID )) $siteTree = " <ul id= \" sitetree \" class= \" tree unformatted \" ><li id= \" record-root \" class= \" Root \" ><a href= \" $rootLink\ " >< strong > http :// www . yoursite . com / assets </ strong ></ a > "
2007-07-19 12:40:05 +02:00
. $siteTree . " </li></ul> " ;
return $siteTree ;
}
/**
* Returns a subtree of items underneat the given folder .
*/
public function getsubtree () {
$obj = DataObject :: get_by_id ( " Folder " , $_REQUEST [ 'ID' ]);
$obj -> setMarkingFilter ( " ClassName " , " Folder " );
$obj -> markPartialTree ();
$results = $obj -> getChildrenAsUL ( " " ,
' "<li id=\"record-$child->ID\" class=\"$child->class" . $child->markingClasses() . ($extraArg->isCurrentPage($child) ? " current" : "") . "\">" . ' .
' "<a href=\"" . Director::link(substr($extraArg->Link(),0,-1), "show", $child->ID) . "\" >" . $child->Title . "</a>" ' ,
$this , true );
return substr ( trim ( $results ), 4 , - 5 );
}
//------------------------------------------------------------------------------------------//
// Data saving handlers
/**
* Add a new folder and return its details suitable for ajax .
*/
public function addfolder () {
$parent = ( $_REQUEST [ 'ParentID' ] && is_numeric ( $_REQUEST [ 'ParentID' ])) ? $_REQUEST [ 'ParentID' ] : 0 ;
if ( $parent ) {
$parentObj = DataObject :: get_by_id ( " File " , $parent );
if ( ! $parentObj || ! $parentObj -> ID ) $parent = 0 ;
}
$p = new Folder ();
$p -> ParentID = $parent ;
2007-09-16 18:33:05 +02:00
$p -> Title = _t ( 'AssetAdmin.NEWFOLDER' , " NewFolder " );
2007-07-19 12:40:05 +02:00
2008-01-10 04:28:13 +01:00
$p -> Name = _t ( 'AssetAdmin.NEWFOLDER' , 'NewFolder' );
2007-07-19 12:40:05 +02:00
// Get the folder to be created
if ( isset ( $parentObj -> ID )) $filename = $parentObj -> FullPath . $p -> Name ;
else $filename = '../assets/' . $p -> Name ;
// Ensure uniqueness
$i = 2 ;
$baseFilename = $filename . '-' ;
while ( file_exists ( $filename )) {
$filename = $baseFilename . $i ;
$p -> Name = $p -> Title = basename ( $filename );
$i ++ ;
}
// Actually create
2007-10-29 03:10:59 +01:00
if ( ! file_exists ( '../assets' )) {
mkdir ( '../assets' );
}
2007-07-19 12:40:05 +02:00
mkdir ( $filename );
2007-10-26 01:07:24 +02:00
chmod ( $filename , Filesystem :: $file_create_mask );
2007-07-19 12:40:05 +02:00
$p -> write ();
2007-11-12 22:47:45 +01:00
if ( isset ( $_REQUEST [ 'returnID' ])) {
return $p -> ID ;
} else {
return $this -> returnItemToUser ( $p );
}
2007-07-19 12:40:05 +02:00
}
/**
* Return the given tree item to the client .
* If called by ajax , this will be some javascript commands .
* Otherwise , it will redirect back .
*/
public function returnItemToUser ( $p ) {
if ( $_REQUEST [ 'ajax' ]) {
$parentID = ( int ) $p -> ParentID ;
return <<< JS
tree = $ ( 'sitetree' );
var newNode = tree . createTreeNode ( $p -> ID , " $p->Title " , " $p->class " );
tree . getTreeNodeByIdx ( $parentID ) . appendTreeNode ( newNode );
newNode . selectTreeNode ();
JS ;
} else {
Director :: redirectBack ();
}
}
/**
* Delete a folder
*/
public function deletefolder () {
$script = '' ;
$ids = split ( ' *, *' , $_REQUEST [ 'csvIDs' ]);
2007-09-15 03:01:49 +02:00
$script = '' ;
2007-07-19 12:40:05 +02:00
foreach ( $ids as $id ) {
if ( is_numeric ( $id )) {
$record = DataObject :: get_by_id ( $this -> stat ( 'tree_class' ), $id );
if ( ! $record )
Debug :: message ( " Record appears to be null " );
/* if ( $record -> hasMethod ( 'BackLinkTracking' )) {
$brokenPages = $record -> BackLinkTracking ();
foreach ( $brokenPages as $brokenPage ) {
$brokenPageList .= " <li style= \" font-size: 65% \" > " . $brokenPage -> Breadcrumbs ( 3 , true ) . " </li> " ;
$brokenPage -> HasBrokenLink = true ;
$notifications [ $brokenPage -> OwnerID ][] = $brokenPage ;
$brokenPage -> write ();
}
} */
$record -> delete ();
$record -> destroy ();
// DataObject::delete_by_id($this->stat('tree_class'), $id);
$script .= $this -> deleteTreeNodeJS ( $record );
}
}
/* if ( $notifications ) foreach ( $notifications as $memberID => $pages ) {
$email = new Page_BrokenLinkEmail ();
$email -> populateTemplate ( new ArrayData ( array (
" Recipient " => DataObject :: get_by_id ( " Member " , $memberID ),
" BrokenPages " => new DataObjectSet ( $pages ),
)));
$email -> debug ();
$email -> send ();
} */
2008-01-10 04:28:13 +01:00
/*
2007-07-19 12:40:05 +02:00
$s = ( sizeof ( $ids ) > 1 ) ? " s " : " " ;
$message = sizeof ( $ids ) . " folder $s deleted. " ;
//
if ( isset ( $brokenPageList )) $message .= " The following pages now have broken links:<ul> " . addslashes ( $brokenPageList ) . " </ul>Their owners have been emailed and they will fix up those pages. " ;
2008-01-10 04:28:13 +01:00
*/
$size = sizeof ( $ids );
if ( $size > 1 )
$message = $size . ' ' . _t ( 'AssetAdmin.FOLDERSDELETED' , 'folders deleted.' );
else
$message = $size . ' ' . _t ( 'AssetAdmin.FOLDERDELETED' , 'folder deleted.' );
if ( isset ( $brokenPageList ))
$message .= ' ' . _t ( 'AssetAdmin.NOWBROKEN' , 'The following pages now have broken links:' ) . '<ul>' . addslashes ( $brokenPageList ) . '</ul>' .
_t ( 'AssetAdmin.NOWBROKEN2' , 'Their owners have been emailed and they will fix up those pages.' );
2007-07-19 12:40:05 +02:00
$script .= " statusMessage(' $message '); " ;
echo $script ;
}
public function removefile (){
if ( $fileID = $this -> urlParams [ 'ID' ]){
$file = DataObject :: get_by_id ( 'File' , $fileID );
2007-09-15 23:57:11 +02:00
// Delete the temp verions of this file in assets/_resampled
if ( $file instanceof Image ) {
$file -> deleteFormattedImages ();
}
2007-07-19 12:40:05 +02:00
$file -> delete ();
$file -> destroy ();
if ( Director :: is_ajax ()) {
echo <<< JS
$ ( 'Form_EditForm_Files' ) . removeFile ( $fileID );
statusMessage ( 'removed file' , 'good' );
JS ;
} else {
Director :: redirectBack ();
}
} else {
user_error ( " AssetAdmin::removefile: Bad parameters: File= $fileID " , E_USER_ERROR );
}
}
public function save ( $urlParams , $form ) {
// Don't save the root folder - there's no database record
if ( $_REQUEST [ 'ID' ] == 'root' ) {
FormResponse :: status_message ( " Saved " , " good " );
return FormResponse :: respond ();
}
$form -> dataFieldByName ( 'Title' ) -> value = $form -> dataFieldByName ( 'Name' ) -> value ;
return parent :: save ( $urlParams , $form );
}
2007-10-02 23:34:57 +02:00
/**
* #################################
* Garbage collection .
* #################################
*/
/**
* Removes all unused thumbnails , and echos status message to user .
*
* @ returns null
*/
public function deleteUnusedThumbnails () {
foreach ( $this -> getUnusedThumbnailsArray () as $file ) {
unlink ( " ../assets/ " . $file );
}
2008-01-10 04:28:13 +01:00
echo " statusMessage(' " . _t ( 'AssetAdmin.THUMBSDELETED' , 'All unused thumbnails have been deleted' ) . " ','good') " ;
2007-10-02 23:34:57 +02:00
}
/**
* Looks for files used in system and create where clause which contains all ID ' s of files .
*
* @ returns String where clause which will work as filter .
*/
private function getUsedFilesList () {
$result = DB :: query ( " SELECT DISTINCT FileID FROM SiteTree_ImageTracking " );
$usedFiles = array ();
$where = " " ;
if ( $result -> numRecords () > 0 ) {
while ( $nextResult = $result -> next ()){
$where .= $nextResult [ 'FileID' ] . ',' ;
}
}
$classes = ClassInfo :: subclassesFor ( 'SiteTree' );
foreach ( $classes as $className ) {
$sng = singleton ( $className );
$objects = DataObject :: get ( $className );
if ( $objects !== NULL ) {
foreach ( $sng -> has_one () as $fieldName => $joinClass ) {
if ( $joinClass == 'Image' || $joinClass == 'File' ) {
foreach ( $objects as $object ) {
if ( $object -> $fieldName != NULL ) $usedFiles [] = $object -> $fieldName ;
}
} elseif ( $joinClass == 'Folder' ) {
/* foreach ( $objects as $object ) {
var_dump ( $object -> $fieldName );
} */
}
}
}
}
foreach ( $usedFiles as $file ) {
$where .= $file -> ID . ',' ;
}
if ( $where == " " ) return " (ClassName = 'File' OR ClassName = 'Image') " ;
$where = substr ( $where , 0 , strlen ( $where ) - 1 );
2007-11-07 07:35:55 +01:00
$where = " `File`.ID NOT IN ( " . $where . " ) AND (ClassName = 'File' OR ClassName = 'Image') " ;
2007-10-02 23:34:57 +02:00
return $where ;
}
/**
* Creates table for displaying unused files .
*
* @ returns AssetTableField
*/
private function getAssetList () {
$where = $this -> getUsedFilesList ();
$assetList = new AssetTableField (
$this ,
" AssetList " ,
" File " ,
2007-11-01 21:58:28 +01:00
array ( " Title " => _t ( 'AssetAdmin.TITLE' , " Title " ), " LinkedURL " => _t ( 'AssetAdmin.FILENAME' , " Filename " )),
2007-10-02 23:34:57 +02:00
" " ,
$where
);
2007-11-01 21:58:28 +01:00
$assetList -> setPopupCaption ( _t ( 'AssetAdmin.VIEWASSET' , " View Asset " ));
2007-10-02 23:34:57 +02:00
$assetList -> setPermissions ( array ( " show " , " delete " ));
$assetList -> Markable = false ;
return $assetList ;
}
/**
* Creates array containg all unused thumbnails .
* Array is created in three steps :
* 1. Scan assets folder and retrieve all thumbnails
* 2. Scan all HTMLField in system and retrieve thumbnails from them .
* 3. Count difference between two sets ( array_diff )
*
* @ returns Array
*/
private function getUnusedThumbnailsArray () {
$allThumbnails = array ();
$dirIterator = new RecursiveIteratorIterator ( new RecursiveDirectoryIterator ( '../assets' ));
foreach ( $dirIterator as $file ) {
if ( $file -> isFile ()) {
if ( strpos ( $file -> getPathname (), " _resampled " ) !== false ) {
$pathInfo = pathinfo ( $file -> getPathname ());
if ( in_array ( strtolower ( $pathInfo [ 'extension' ]), array ( 'jpeg' , 'jpg' , 'jpe' , 'png' , 'gif' ))) {
$path = str_replace ( '\\' , '/' , $file -> getPathname ());
$allThumbnails [] = substr ( $path , strpos ( $path , '/assets/' ) + 8 );
}
}
}
}
$classes = ClassInfo :: subclassesFor ( 'SiteTree' );
$usedThumbnails = array ();
foreach ( $classes as $className ) {
$sng = singleton ( $className );
$objects = DataObject :: get ( $className );
if ( $objects !== NULL ) {
foreach ( $objects as $object ) {
foreach ( $sng -> db () as $fieldName => $fieldType ) {
if ( $fieldType == 'HTMLText' ) {
$url1 = HTTP :: findByTagAndAttribute ( $object -> $fieldName , array ( " img " => " src " ));
if ( $url1 != NULL ) $usedThumbnails [] = substr ( $url1 [ 0 ], strpos ( $url1 [ 0 ], '/assets/' ) + 8 );
if ( $object -> latestPublished > 0 ) {
$object = Versioned :: get_latest_version ( $className , $object -> ID );
$url2 = HTTP :: findByTagAndAttribute ( $object -> $fieldName , array ( " img " => " src " ));
if ( $url2 != NULL ) $usedThumbnails [] = substr ( $url2 [ 0 ], strpos ( $url2 [ 0 ], '/assets/' ) + 8 );
}
}
}
}
}
}
return array_diff ( $allThumbnails , $usedThumbnails );
}
2007-11-01 21:58:28 +01:00
}
