2 /***************************************************************
5 * (c) 1999-2005 Kasper Skaarhoj (kasperYYYY@typo3.com)
8 * This script is part of the TYPO3 project. The TYPO3 project is
9 * free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * The GNU General Public License can be found at
15 * http://www.gnu.org/copyleft/gpl.html.
16 * A copy is found in the textfile GPL.txt and important notices to the license
17 * from the author is found in LICENSE.txt distributed with these scripts.
20 * This script is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
28 * Web>File: File listing
31 * Revised for TYPO3 3.6 2/2003 by Kasper Skaarhoj
33 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
36 * [CLASS/FUNCTION INDEX of SCRIPT]
40 * 77: class SC_file_list
41 * 103: function init()
42 * 130: function menuConfig()
43 * 151: function main()
44 * 295: function printContent()
47 * (This index is automatically created/updated by the extension "extdeveval")
53 require ('mod/file/list/conf.php');
55 require ('template.php');
56 $LANG->includeLLFile('EXT:lang/locallang_mod_file_list.xml');
57 require_once (PATH_t3lib
.'class.t3lib_basicfilefunc.php');
58 require_once (PATH_t3lib
.'class.t3lib_extfilefunc.php');
59 require_once (PATH_t3lib
.'class.t3lib_recordlist.php');
60 require_once (PATH_t3lib
.'class.t3lib_clipboard.php');
61 require_once ('class.file_list.inc');
62 $BE_USER->modAccess($MCONF,1);
71 * Script Class for creating the list of files in the File > Filelist module
73 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
78 var $MCONF=array(); // Module configuration
79 var $MOD_MENU=array();
80 var $MOD_SETTINGS=array();
84 var $content; // Accumulated HTML output
85 var $basicFF; // File operation object (t3lib_basicFileFunctions)
86 var $doc; // Template object
88 // Internal, static: GPvars:
89 var $id; // "id" -> the path to list.
90 var $pointer; // Pointer to listing
91 var $table; // "Table"
92 var $imagemode; // Thumbnail mode.
94 var $overwriteExistingFiles;
98 * Initialize variables, file object
99 * Incoming GET vars include id, pointer, table, imagemode
104 global $TYPO3_CONF_VARS,$FILEMOUNTS;
107 $this->id
= t3lib_div
::_GP('id');
108 $this->pointer
= t3lib_div
::_GP('pointer');
109 $this->table
= t3lib_div
::_GP('table');
110 $this->imagemode
= t3lib_div
::_GP('imagemode');
111 $this->cmd
= t3lib_div
::_GP('cmd');
112 $this->overwriteExistingFiles
= t3lib_div
::_GP('overwriteExistingFiles');
114 // Setting module name:
115 $this->MCONF
= $GLOBALS['MCONF'];
117 // File operation object:
118 $this->basicFF
= t3lib_div
::makeInstance('t3lib_basicFileFunctions');
119 $this->basicFF
->init($FILEMOUNTS,$TYPO3_CONF_VARS['BE']['fileExtensions']);
121 // Configure the "menu" - which is used internally to save the values of sorting, displayThumbs etc.
126 * Setting the menu/session variables
130 function menuConfig() {
132 // If array, then it's a selector box menu
133 // If empty string it's just a variable, that'll be saved.
134 // Values NOT in this array will not be saved in the settings-array for the module.
135 $this->MOD_MENU
= array(
138 'displayThumbs' => '',
143 $this->MOD_SETTINGS
= t3lib_BEfunc
::getModuleData($this->MOD_MENU
, t3lib_div
::_GP('SET'), $this->MCONF
['name']);
147 * Main function, creating the listing
152 global $BE_USER,$LANG,$BACK_PATH,$TYPO3_CONF_VARS,$FILEMOUNTS;
154 // Initialize the template object
155 $this->doc
= t3lib_div
::makeInstance('template');
156 $this->doc
->backPath
= $BACK_PATH;
157 $this->doc
->docType
= 'xhtml_trans';
159 // Validating the input "id" (the path, directory!) and checking it against the mounts of the user.
160 $this->id
= $this->basicFF
->is_directory($this->id
);
161 $access = $this->id
&& $this->basicFF
->checkPathAgainstMounts($this->id
.'/');
163 // There there was access to this file path, continue, make the list
166 // Create filelisting object
167 $filelist = t3lib_div
::makeInstance('fileList');
168 $filelist->backPath
= $BACK_PATH;
169 $filelist->thumbs
= $this->MOD_SETTINGS
['displayThumbs']?
1:$BE_USER->uc
['thumbnailsByDefault'];
171 // Create clipboard object and initialize that
172 $filelist->clipObj
= t3lib_div
::makeInstance('t3lib_clipboard');
173 $filelist->clipObj
->fileMode
=1;
174 $filelist->clipObj
->initializeClipboard();
176 $CB = t3lib_div
::_GET('CB');
177 if ($this->cmd
=='setCB') $CB['el'] = $filelist->clipObj
->cleanUpCBC(array_merge(t3lib_div
::_POST('CBH'),t3lib_div
::_POST('CBC')),'_FILE');
178 if (!$this->MOD_SETTINGS
['clipBoard']) $CB['setP']='normal';
179 $filelist->clipObj
->setCmd($CB);
180 $filelist->clipObj
->cleanCurrent();
181 $filelist->clipObj
->endClipboard(); // Saves
183 // If the "cmd" was to delete files from the list (clipboard thing), do that:
184 if ($this->cmd
=='delete') {
185 $items = $filelist->clipObj
->cleanUpCBC(t3lib_div
::_POST('CBC'),'_FILE',1);
187 // Make command array:
190 while(list(,$v)=each($items)) {
191 $FILE['delete'][]=array('data'=>$v);
194 // Init file processing object for deleting and pass the cmd array.
195 $fileProcessor = t3lib_div
::makeInstance('t3lib_extFileFunctions');
196 $fileProcessor->init($FILEMOUNTS, $TYPO3_CONF_VARS['BE']['fileExtensions']);
197 $fileProcessor->init_actionPerms($BE_USER->user
['fileoper_perms']);
198 $fileProcessor->dontCheckForUnique
= $this->overwriteExistingFiles ?
1 : 0;
199 $fileProcessor->start($FILE);
200 $fileProcessor->processData();
202 $fileProcessor->printLogErrorMessages();
206 // Start up filelisting object, include settings.
207 $this->pointer
= t3lib_div
::intInRange($this->pointer
,0,100000);
208 $filelist->start($this->id
,$this->pointer
,$this->MOD_SETTINGS
['sort'],$this->MOD_SETTINGS
['reverse'],$this->MOD_SETTINGS
['clipBoard']);
211 $filelist->writeTop($this->id
);
214 $filelist->generateList($this->id
,$this->table
);
217 $filelist->writeBottom();
219 // Set top JavaScript:
220 $this->doc
->JScode
=$this->doc
->wrapScriptTags('
222 if (top.fsMod) top.fsMod.recentIds["file"] = unescape("'.rawurlencode($this->id
).'");
223 function jumpToUrl(URL) { //
224 document.location = URL;
227 '.$filelist->CBfunctions() // ... and add clipboard JavaScript functions
230 // This will return content necessary for the context sensitive clickmenus to work: bodytag events, JavaScript functions and DIV-layers.
231 $CMparts=$this->doc
->getContextMenuCode();
232 $this->doc
->bodyTagAdditions
= $CMparts[1];
233 $this->doc
->JScode
.=$CMparts[0];
234 $this->doc
->postCode
.= $CMparts[2];
239 $this->content
.=$this->doc
->startPage($LANG->getLL('files'));
240 $this->content
.= '<form action="'.htmlspecialchars($filelist->listURL()).'" method="post" name="dblistForm">';
241 $this->content
.= $filelist->HTMLcode
;
242 $this->content
.= '<input type="hidden" name="cmd" /></form>';
244 // FileList Module CSH:
245 $this->content
.= t3lib_BEfunc
::cshItem('xMOD_csh_corebe', 'filelist_module', $GLOBALS['BACK_PATH'],'<br/>|');
247 if ($filelist->HTMLcode
) { // Making listing options:
252 Listing options for clipboard and thumbnails
254 <div id="typo3-listOptions">
257 // Add "display thumbnails" checkbox:
258 $this->content
.=t3lib_BEfunc
::getFuncCheck($this->id
,'SET[displayThumbs]',$this->MOD_SETTINGS
['displayThumbs'],'file_list.php','').' '.$LANG->getLL('displayThumbs',1).'<br />';
260 // Add clipboard button
261 $this->content
.=t3lib_BEfunc
::getFuncCheck($this->id
,'SET[clipBoard]',$this->MOD_SETTINGS
['clipBoard'],'file_list.php','').' '.$LANG->getLL('clipBoard',1);
266 $this->content
.= t3lib_BEfunc
::cshItem('xMOD_csh_corebe', 'filelist_options', $GLOBALS['BACK_PATH']);
270 if ($this->MOD_SETTINGS
['clipBoard']) {
271 $this->content
.=$filelist->clipObj
->printClipboard();
272 $this->content
.= t3lib_BEfunc
::cshItem('xMOD_csh_corebe', 'filelist_clipboard', $GLOBALS['BACK_PATH']);
277 if ($BE_USER->mayMakeShortcut()) {
278 $this->content
.='<br /><br />'.$this->doc
->makeShortcutIcon('pointer,id,target,table',implode(',',array_keys($this->MOD_MENU
)),$this->MCONF
['name']);
281 // Create output - no access (no warning though)
283 $this->content
.=$this->doc
->startPage($LANG->getLL('files'));
287 $this->content
.= $this->doc
->endPage();
291 * Outputting the accumulated content to screen
295 function printContent() {
301 // Include extension?
302 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['typo3/file_list.php']) {
303 include_once($TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['typo3/file_list.php']);
318 $SOBE = t3lib_div
::makeInstance('SC_file_list');
321 $SOBE->printContent();
324 if ($TYPO3_CONF_VARS['BE']['compressionLevel']) {
325 new gzip_encode($TYPO3_CONF_VARS['BE']['compressionLevel']);