2 /***************************************************************
5 * (c) 1999-2010 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 * Contains class for TYPO3 clipboard for records and files
31 * Revised for TYPO3 3.6 July/2003 by Kasper Skaarhoj
34 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
37 * [CLASS/FUNCTION INDEX of SCRIPT]
41 * 97: class t3lib_clipboard
44 * 150: function initializeClipboard()
45 * 179: function lockToNormal()
46 * 196: function setCmd($cmd)
47 * 243: function setCurrentPad($padIdent)
48 * 258: function endClipboard()
49 * 271: function cleanUpCBC($CBarr,$table,$removeDeselected=0)
51 * SECTION: Clipboard HTML renderings
52 * 306: function printClipboard()
53 * 413: function printContentFromTab($pad)
54 * 487: function padTitleWrap($str,$pad)
55 * 504: function linkItemText($str,$rec,$table='')
56 * 531: function selUrlDB($table,$uid,$copy=0,$deselect=0,$baseArray=array())
57 * 547: function selUrlFile($path,$copy=0,$deselect=0,$baseArray=array())
58 * 564: function pasteUrl($table,$uid,$setRedirect=1)
59 * 581: function deleteUrl($setRedirect=1,$file=0)
60 * 598: function editUrl()
61 * 619: function removeUrl($table,$uid)
62 * 632: function confirmMsg($table,$rec,$type,$clElements)
63 * 680: function clLabel($key,$Akey='labels')
64 * 689: function exportClipElementParameters()
66 * SECTION: Helper functions
67 * 739: function removeElement($el)
68 * 751: function saveClipboard()
69 * 761: function currentMode()
70 * 771: function cleanCurrent()
71 * 798: function elFromTable($matchTable='',$pad='')
72 * 829: function isSelected($table,$uid)
73 * 843: function getSelectedRecord($table='',$uid='')
74 * 861: function isElements()
76 * SECTION: FOR USE IN tce_db.php:
77 * 902: function makePasteCmdArray($ref,$CMD)
78 * 931: function makeDeleteCmdArray($CMD)
80 * SECTION: FOR USE IN tce_file.php:
81 * 974: function makePasteCmdArray_file($ref,$FILE)
82 * 996: function makeDeleteCmdArray_file($FILE)
85 * (This index is automatically created/updated by the extension "extdeveval")
91 * TYPO3 clipboard for records and files
93 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
97 class t3lib_clipboard
{
101 * Clipboard data kept here
105 * 'tab_[x]' where x is >=1 and denotes the pad-number
106 * \ 'mode' : 'copy' means copy-mode, default = moving ('cut')
107 * \ 'el' : Array of elements:
108 * DB: keys = '[tablename]|[uid]' eg. 'tt_content:123'
109 * DB: values = 1 (basically insignificant)
110 * FILE: keys = '_FILE|[shortmd5 of path]' eg. '_FILE|9ebc7e5c74'
111 * FILE: values = The full filepath, eg. '/www/htdocs/typo3/32/dummy/fileadmin/sem1_3_examples/alternative_index.php' or 'C:/www/htdocs/typo3/32/dummy/fileadmin/sem1_3_examples/alternative_index.php'
113 * 'current' pointer to current tab (among the above...)
114 * '_setThumb' boolean: If set, file thumbnails are shown.
116 * The virtual tablename '_FILE' will always indicate files/folders. When checking for elements from eg. 'all tables' (by using an empty string) '_FILE' entries are excluded (so in effect only DB elements are counted)
119 var $clipData=array();
125 var $fileMode=0; // If set, clipboard is displaying files.
139 /*****************************************
143 ****************************************/
146 * Initialize the clipboard from the be_user session
150 function initializeClipboard() {
154 $clipData = $BE_USER->getModuleData('clipboard',$BE_USER->getTSConfigVal('options.saveClipboard')?
'':'ses');
157 $clNP = $BE_USER->getTSConfigVal('options.clipboardNumberPads');
158 if (t3lib_div
::testInt($clNP) && $clNP>=0) {
159 $this->numberTabs
= t3lib_div
::intInRange($clNP,0,20);
162 // Resets/reinstates the clipboard pads
163 $this->clipData
['normal'] = is_array($clipData['normal']) ?
$clipData['normal'] : array();
164 for ($a=1;$a<=$this->numberTabs
;$a++
) {
165 $this->clipData
['tab_'.$a] = is_array($clipData['tab_'.$a]) ?
$clipData['tab_'.$a] : array();
168 // Setting the current pad pointer ($this->current) and _setThumb (which determines whether or not do show file thumbnails)
169 $this->clipData
['current'] = $this->current
= isset($this->clipData
[$clipData['current']]) ?
$clipData['current'] : 'normal';
170 $this->clipData
['_setThumb'] = $clipData['_setThumb'];
174 * Call this method after initialization if you want to lock the clipboard to operate on the normal pad only. Trying to switch pad through ->setCmd will not work
175 * This is used by the clickmenu since it only allows operation on single elements at a time (that is the "normal" pad)
179 function lockToNormal() {
180 $this->lockToNormal
= 1;
181 $this->current
= 'normal';
185 * The array $cmd may hold various keys which notes some action to take.
186 * Normally perform only one action at a time.
187 * In scripts like db_list.php / file_list.php the GET-var CB is used to control the clipboard.
189 * Selecting / Deselecting elements
190 * Array $cmd['el'] has keys = element-ident, value = element value (see description of clipData array in header)
191 * Selecting elements for 'copy' should be done by simultaneously setting setCopyMode.
193 * @param array Array of actions, see function description
196 function setCmd($cmd) {
197 if (is_array($cmd['el'])) {
198 foreach ($cmd['el'] as $k => $v) {
199 if ($this->current
=='normal') {
200 unset($this->clipData
['normal']);
203 $this->clipData
[$this->current
]['el'][$k]=$v;
205 $this->removeElement($k);
210 // Change clipboard pad (if not locked to normal)
212 $this->setCurrentPad($cmd['setP']);
214 // Remove element (value = item ident: DB; '[tablename]|[uid]' FILE: '_FILE|[shortmd5 hash of path]'
215 if ($cmd['remove']) {
216 $this->removeElement($cmd['remove']);
219 // Remove all on current pad (value = pad-ident)
220 if ($cmd['removeAll']) {
221 $this->clipData
[$cmd['removeAll']]=array();
224 // Set copy mode of the tab
225 if (isset($cmd['setCopyMode'])) {
226 $this->clipData
[$this->current
]['mode']=$this->isElements()?
($cmd['setCopyMode']?
'copy':''):'';
229 // Toggle thumbnail display for files on/off
230 if (isset($cmd['setThumb'])) {
231 $this->clipData
['_setThumb']=$cmd['setThumb'];
237 * Setting the current pad on clipboard
239 * @param string Key in the array $this->clipData
242 function setCurrentPad($padIdent) {
243 // Change clipboard pad (if not locked to normal)
244 if (!$this->lockToNormal
&& $this->current
!=$padIdent) {
245 if (isset($this->clipData
[$padIdent])) $this->clipData
['current'] = $this->current
= $padIdent;
246 if ($this->current
!='normal' ||
!$this->isElements()) $this->clipData
[$this->current
]['mode']=''; // Setting mode to default (move) if no items on it or if not 'normal'
252 * Call this after initialization and setCmd in order to save the clipboard to the user session.
253 * The function will check if the internal flag ->changed has been set and if so, save the clipboard. Else not.
257 function endClipboard() {
258 if ($this->changed
) $this->saveClipboard();
263 * Cleans up an incoming element array $CBarr (Array selecting/deselecting elements)
265 * @param array Element array from outside ("key" => "selected/deselected")
266 * @param string $table is the 'table which is allowed'. Must be set.
267 * @param boolean $removeDeselected can be set in order to remove entries which are marked for deselection.
268 * @return array Processed input $CBarr
270 function cleanUpCBC($CBarr,$table,$removeDeselected=0) {
271 if (is_array($CBarr)) {
272 foreach ($CBarr as $k => $v) {
274 if ((string)$p[0]!=(string)$table ||
($removeDeselected && !$v)) {
293 /*****************************************
295 * Clipboard HTML renderings
297 ****************************************/
300 * Prints the clipboard
302 * @return string HTML output
304 function printClipboard() {
305 global $TBE_TEMPLATE,$LANG;
308 $elCount = count($this->elFromTable($this->fileMode?
'_FILE':''));
312 <tr class="t3-row-header">
313 <td colspan="3" nowrap="nowrap" align="center"><strong>' . $this->clLabel('clipboard', 'buttons') . '</strong></td>
316 // Button/menu header:
317 $thumb_url = t3lib_div
::linkThisScript(array('CB'=>array('setThumb'=>$this->clipData
['_setThumb']?
0:1)));
318 $rmall_url = t3lib_div
::linkThisScript(array('CB'=>array('removeAll'=>$this->current
)));
320 // Copymode Selector menu
321 $copymode_url = t3lib_div
::linkThisScript();
322 $moveLabel = htmlspecialchars($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_misc.php:moveElements'));
323 $copyLabel = htmlspecialchars($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_misc.php:copyElements'));
325 $opt[]='<option style="padding-left: 20px; background-image: url(\''.t3lib_iconWorks
::skinImg($this->backPath
, 'gfx/clip_cut.gif', '', 1).'\'); background-repeat: no-repeat;" value="" '.(($this->currentMode()=='copy')?
'':'selected="selected"').'>'.$moveLabel .'</option>';
326 $opt[]='<option style="padding-left: 20px; background-image: url(\''.t3lib_iconWorks
::skinImg($this->backPath
, 'gfx/clip_copy.gif', '', 1).'\'); background-repeat: no-repeat;" value="1" '.(($this->currentMode()=='copy')?
'selected="selected"':'').'>'.$copyLabel .'</option>';
328 $copymode_selector = ' <select name="CB[setCopyMode]" onchange="this.form.method=\'POST\'; this.form.action=\''.htmlspecialchars($copymode_url.'&CB[setCopyMode]=').'\'+(this.options[this.selectedIndex].value); this.form.submit(); return true;" >'.implode('',$opt).'</select>';
330 // Selector menu + clear button
332 $opt[]='<option value="" selected="selected">'.$this->clLabel('menu','rm').'</option>';
333 // Import / Export link:
334 if ($elCount && t3lib_extMgm
::isLoaded('impexp')) {
335 $opt[] = '<option value="'.htmlspecialchars("window.location.href='".$this->backPath
.t3lib_extMgm
::extRelPath('impexp').'app/index.php'.$this->exportClipElementParameters().'\';').'">'.$this->clLabel('export','rm').'</option>';
338 if (!$this->fileMode
&& $elCount) {
339 $opt[]='<option value="' . htmlspecialchars("window.location.href='" . $this->editUrl() . "&returnUrl='+top.rawurlencode(window.location.href);") . '">' . $this->clLabel('edit', 'rm') . '</option>';
343 if($GLOBALS['BE_USER']->jsConfirmation(4)) {
345 if(confirm(".$GLOBALS['LANG']->JScharCode(sprintf($LANG->sL('LLL:EXT:lang/locallang_core.php:mess.deleteClip'),$elCount)).")){
346 window.location.href='" . $this->deleteUrl(0, $this->fileMode ?
1 : 0) . "&redirect='+top.rawurlencode(window.location.href);
350 $js = " window.location.href='" . $this->deleteUrl(0, $this->fileMode ?
1 : 0) . "&redirect='+top.rawurlencode(window.location.href); ";
352 $opt[]='<option value="'.htmlspecialchars($js).'">'.$this->clLabel('delete','rm').'</option>';
354 $selector_menu = '<select name="_clipMenu" onchange="eval(this.options[this.selectedIndex].value);this.selectedIndex=0;">'.implode('',$opt).'</select>';
357 <tr class="typo3-clipboard-head">
358 <td nowrap="nowrap">'.
359 '<a href="'.htmlspecialchars($thumb_url).'#clip_head">'.
360 '<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/thumb_'.($this->clipData
['_setThumb']?
's':'n').'.gif','width="21" height="16"').' vspace="2" border="0" title="'.$this->clLabel('thumbmode_clip').'" alt="" />'.
363 <td width="95%" nowrap="nowrap">'.
364 $copymode_selector.' '.
368 '<a href="'.htmlspecialchars($rmall_url).'#clip_head">'.
369 t3lib_iconWorks
::getSpriteIcon('actions-document-close', array('title' => $LANG->sL('LLL:EXT:lang/locallang_core.php:buttons.clear', TRUE))) .
374 // Print header and content for the NORMAL tab:
376 <tr class="bgColor5">
377 <td colspan="3"><a href="'.htmlspecialchars(t3lib_div
::linkThisScript(array('CB'=>array('setP'=>'normal')))).'#clip_head">'.
378 t3lib_iconWorks
::getSpriteIcon('actions-view-table-' . (($this->current
== 'normal') ?
'collapse' : 'expand')) .
379 $this->padTitleWrap('Normal','normal').
382 if ($this->current
=='normal') $out=array_merge($out,$this->printContentFromTab('normal'));
384 // Print header and content for the NUMERIC tabs:
385 for ($a=1;$a<=$this->numberTabs
;$a++
) {
387 <tr class="bgColor5">
388 <td colspan="3"><a href="'.htmlspecialchars(t3lib_div
::linkThisScript(array('CB'=>array('setP'=>'tab_'.$a)))).'#clip_head">'.
389 t3lib_iconWorks
::getSpriteIcon('actions-view-table-' . (($this->current
== 'tab_' . $a) ?
'collapse' : 'expand')) .
390 $this->padTitleWrap($this->clLabel('cliptabs').$a,'tab_'.$a).
393 if ($this->current
=='tab_'.$a) $out=array_merge($out,$this->printContentFromTab('tab_'.$a));
396 // Wrap accumulated rows in a table:
397 $output = '<a name="clip_head"></a>
402 <table cellpadding="0" cellspacing="1" border="0" width="290" id="typo3-clipboard">
407 $output = '<form action="">'.$output.'</form>';
409 // Return the accumulated content:
414 * Print the content on a pad. Called from ->printClipboard()
416 * @param string Pad reference
417 * @return array Array with table rows for the clipboard.
420 function printContentFromTab($pad) {
421 global $TBE_TEMPLATE;
424 if (is_array($this->clipData
[$pad]['el'])) {
425 foreach ($this->clipData
[$pad]['el'] as $k => $v) {
427 list($table,$uid) = explode('|',$k);
428 $bgColClass = ($table=='_FILE'&&$this->fileMode
)||
($table!='_FILE'&&!$this->fileMode
) ?
'bgColor4-20' : 'bgColor4';
430 if ($table=='_FILE') { // Rendering files/directories on the clipboard:
431 if (file_exists($v) && t3lib_div
::isAllowedAbsPath($v)) {
433 $icon = is_dir($v) ?
'folder.gif' : t3lib_BEfunc
::getFileIcon(strtolower($fI['extension']));
434 $size = ' ('.t3lib_div
::formatSize(filesize($v)).'bytes)';
435 $icon = t3lib_iconWorks
::getSpriteIconForFile(is_dir($v) ?
'folder' : strtolower($fI['extension']), array('style' => 'margin: 0 20px;', 'title' => htmlspecialchars($fI['basename'] . $size)));
436 $thumb = $this->clipData
['_setThumb'] ?
(t3lib_div
::inList($GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext'],$fI['extension']) ? t3lib_BEfunc
::getThumbNail($this->backPath
.'thumbs.php',$v,' vspace="4"') : '') :'';
440 <td class="'.$bgColClass.'">'.$icon.'</td>
441 <td class="'.$bgColClass.'" nowrap="nowrap" width="95%"> '.$this->linkItemText(htmlspecialchars(t3lib_div
::fixed_lgd_cs(basename($v),$GLOBALS['BE_USER']->uc
['titleLen'])),$v).
442 ($pad=='normal'?
(' <strong>('.($this->clipData
['normal']['mode']=='copy'?
$this->clLabel('copy','cm'):$this->clLabel('cut','cm')).')</strong>'):'').' '.($thumb?
'<br />'.$thumb:'').'</td>
443 <td class="'.$bgColClass.'" align="center" nowrap="nowrap">'.
444 '<a href="#" onclick="' . htmlspecialchars('top.launchView(\'' . $v . '\', \'\'); return false;') . '">' . t3lib_iconWorks
::getSpriteIcon('actions-document-info', array('title' => $this->clLabel('info', 'cm'))) . '</a>'.
445 '<a href="' . htmlspecialchars($this->removeUrl('_FILE', t3lib_div
::shortmd5($v))) . '#clip_head">' . t3lib_iconWorks
::getSpriteIcon('actions-selection-delete', array('title' => $this->clLabel('removeItem'))) . '</a>'.
449 // If the file did not exist (or is illegal) then it is removed from the clipboard immediately:
450 unset($this->clipData
[$pad]['el'][$k]);
453 } else { // Rendering records:
454 $rec=t3lib_BEfunc
::getRecordWSOL($table,$uid);
455 if (is_array($rec)) {
458 <td class="' . $bgColClass . '">' . $this->linkItemText(t3lib_iconWorks
::getSpriteIconForRecord($table, $rec, array('style' => 'margin: 0 20px;', 'title' => htmlspecialchars(t3lib_BEfunc
::getRecordIconAltText($rec, $table)))), $rec, $table) . '</td>
459 <td class="'.$bgColClass.'" nowrap="nowrap" width="95%"> '.$this->linkItemText(htmlspecialchars(t3lib_div
::fixed_lgd_cs(t3lib_BEfunc
::getRecordTitle($table,$rec),$GLOBALS['BE_USER']->uc
['titleLen'])),$rec,$table).
460 ($pad=='normal'?
(' <strong>('.($this->clipData
['normal']['mode']=='copy'?
$this->clLabel('copy','cm'):$this->clLabel('cut','cm')).')</strong>'):'').' </td>
461 <td class="'.$bgColClass.'" align="center" nowrap="nowrap">'.
462 '<a href="#" onclick="' . htmlspecialchars('top.launchView(\'' . $table . '\', \'' . intval($uid) . '\'); return false;') . '">' . t3lib_iconWorks
::getSpriteIcon('actions-document-info', array('title' => $this->clLabel('info','cm'))) . '</a>'.
463 '<a href="' . htmlspecialchars($this->removeUrl($table, $uid)) . '#clip_head">' . t3lib_iconWorks
::getSpriteIcon('actions-selection-delete', array('title' => $this->clLabel('removeItem'))) . '</a>'.
467 $localizationData = $this->getLocalizations($table, $rec, $bgColClass, $pad);
468 if ($localizationData) {
469 $lines[] = $localizationData;
473 unset($this->clipData
[$pad]['el'][$k]);
480 if (!count($lines)) {
483 <td class="bgColor4"><img src="clear.gif" width="56" height="1" alt="" /></td>
484 <td colspan="2" class="bgColor4" nowrap="nowrap" width="95%"> <em>('.$this->clLabel('clipNoEl').')</em> </td>
488 $this->endClipboard();
494 * Gets all localizations of the current record.
496 * @param string the table
497 * @param array the current record
498 * @return string HTML table rows
500 function getLocalizations($table, $parentRec, $bgColClass, $pad) {
502 $tcaCtrl = $GLOBALS['TCA'][$table]['ctrl'];
504 if ($table != 'pages' && t3lib_BEfunc
::isTableLocalizable($table) && !$tcaCtrl['transOrigPointerTable']) {
506 $where[] = $tcaCtrl['transOrigPointerField'] . '=' . intval($parentRec['uid']);
507 $where[] = $tcaCtrl['languageField'] . '!=0';
509 if (isset($tcaCtrl['delete']) && $tcaCtrl['delete']) {
510 $where[] = $tcaCtrl['delete'] . '=0';
513 if (isset($tcaCtrl['versioningWS']) && $tcaCtrl['versioningWS']) {
514 $where[] = 't3ver_wsid=' . $parentRec['t3ver_wsid'];
517 $rows = $GLOBALS['TYPO3_DB']->exec_SELECTgetRows('*', $table, implode(' AND ', $where));
519 if (is_array($rows)) {
521 if ($pad == 'normal') {
522 $mode = ($this->clipData
['normal']['mode'] == 'copy' ?
'copy' : 'cut');
523 $modeData = ' <strong>(' . $this->clLabel($mode, 'cm') . ')</strong>';
526 foreach ($rows as $rec) {
529 <td class="' . $bgColClass . '">' .
530 t3lib_iconWorks
::getSpriteIconForRecord($table, $rec, array('style' => "margin-left: 38px;")) . '</td>
531 <td class="' . $bgColClass . '" nowrap="nowrap" width="95%"> ' . htmlspecialchars(
532 t3lib_div
::fixed_lgd_cs(t3lib_BEfunc
::getRecordTitle($table, $rec), $GLOBALS['BE_USER']->uc
['titleLen'])) .
533 $modeData . ' </td>
534 <td class="' . $bgColClass . '" align="center" nowrap="nowrap"> </td>
539 return implode('',$lines);
545 * Wraps title of pad in bold-tags and maybe the number of elements if any.
547 * @param string String (already htmlspecialchars()'ed)
548 * @param string Pad reference
549 * @return string HTML output (htmlspecialchar'ed content inside of tags.)
551 function padTitleWrap($str,$pad) {
552 $el = count($this->elFromTable($this->fileMode?
'_FILE':'',$pad));
554 return '<strong>'.$str.'</strong> ('.($pad=='normal'?
($this->clipData
['normal']['mode']=='copy'?
$this->clLabel('copy','cm'):$this->clLabel('cut','cm')):htmlspecialchars($el)).')';
556 return $GLOBALS['TBE_TEMPLATE']->dfw($str);
561 * Wraps the title of the items listed in link-tags. The items will link to the page/folder where they originate from
563 * @param string Title of element - must be htmlspecialchar'ed on beforehand.
564 * @param mixed If array, a record is expected. If string, its a path
565 * @param string Table name
568 function linkItemText($str,$rec,$table='') {
569 if (is_array($rec) && $table) {
570 if ($this->fileMode
) {
571 $str=$GLOBALS['TBE_TEMPLATE']->dfw($str);
573 $str='<a href="'.htmlspecialchars($this->backPath
.'db_list.php?id='.$rec['pid']).'">'.$str.'</a>';
575 } elseif (file_exists($rec)) {
576 if (!$this->fileMode
) {
577 $str=$GLOBALS['TBE_TEMPLATE']->dfw($str);
579 $str='<a href="'.htmlspecialchars($this->backPath
.'file_list.php?id='.dirname($rec)).'">'.$str.'</a>';
586 * Returns the select-url for database elements
588 * @param string Table name
589 * @param integer Uid of record
590 * @param boolean If set, copymode will be enabled
591 * @param boolean If set, the link will deselect, otherwise select.
592 * @param array The base array of GET vars to be sent in addition. Notice that current GET vars WILL automatically be included.
593 * @return string URL linking to the current script but with the CB array set to select the element with table/uid
595 function selUrlDB($table,$uid,$copy=0,$deselect=0,$baseArray=array()) {
596 $CB = array('el'=>array(rawurlencode($table.'|'.$uid)=>$deselect?
0:1));
597 if ($copy) $CB['setCopyMode'] = 1;
598 $baseArray['CB'] = $CB;
599 return t3lib_div
::linkThisScript($baseArray);
603 * Returns the select-url for files
605 * @param string Filepath
606 * @param boolean If set, copymode will be enabled
607 * @param boolean If set, the link will deselect, otherwise select.
608 * @param array The base array of GET vars to be sent in addition. Notice that current GET vars WILL automatically be included.
609 * @return string URL linking to the current script but with the CB array set to select the path
611 function selUrlFile($path,$copy=0,$deselect=0,$baseArray=array()) {
612 $CB=array('el'=>array(rawurlencode('_FILE|'.t3lib_div
::shortmd5($path))=>$deselect?
'':$path));
613 if ($copy) $CB['setCopyMode']=1;
614 $baseArray['CB']=$CB;
615 return t3lib_div
::linkThisScript($baseArray);
619 * pasteUrl of the element (database and file)
620 * For the meaning of $table and $uid, please read from ->makePasteCmdArray!!!
621 * The URL will point to tce_file or tce_db depending in $table
623 * @param string Tablename (_FILE for files)
624 * @param mixed "destination": can be positive or negative indicating how the paste is done (paste into / paste after)
625 * @param boolean If set, then the redirect URL will point back to the current script, but with CB reset.
628 function pasteUrl($table,$uid,$setRedirect=1) {
629 $rU = $this->backPath
.($table=='_FILE'?
'tce_file.php':'tce_db.php').'?'.
630 ($setRedirect ?
'redirect='.rawurlencode(t3lib_div
::linkThisScript(array('CB'=>''))) : '').
631 '&vC='.$GLOBALS['BE_USER']->veriCode().
633 '&CB[paste]='.rawurlencode($table.'|'.$uid).
634 '&CB[pad]='.$this->current
;
639 * deleteUrl for current pad
641 * @param boolean If set, then the redirect URL will point back to the current script, but with CB reset.
642 * @param boolean If set, then the URL will link to the tce_file.php script in the typo3/ dir.
645 function deleteUrl($setRedirect=1,$file=0) {
646 $rU = $this->backPath
.($file?
'tce_file.php':'tce_db.php').'?'.
647 ($setRedirect ?
'redirect='.rawurlencode(t3lib_div
::linkThisScript(array('CB'=>''))) : '').
648 '&vC='.$GLOBALS['BE_USER']->veriCode().
651 '&CB[pad]='.$this->current
;
656 * editUrl of all current elements
658 * Links to alt_doc.php
660 * @return string The URL to alt_doc.php with parameters.
663 $elements = $this->elFromTable(''); // all records
664 $editCMDArray=array();
665 foreach ($elements as $tP => $value) {
666 list($table,$uid) = explode('|',$tP);
667 $editCMDArray[] = '&edit['.$table.']['.$uid.']=edit';
670 $rU = $this->backPath
.'alt_doc.php?'.implode('',$editCMDArray);
675 * Returns the remove-url (file and db)
676 * for file $table='_FILE' and $uid = shortmd5 hash of path
678 * @param string Tablename
679 * @param string uid integer/shortmd5 hash
682 function removeUrl($table,$uid) {
683 return t3lib_div
::linkThisScript(array('CB'=>array('remove'=>$table.'|'.$uid)));
687 * Returns confirm JavaScript message
689 * @param string Table name
690 * @param mixed For records its an array, for files its a string (path)
691 * @param string Type-code
692 * @param array Array of selected elements
693 * @return string JavaScript "confirm" message
695 function confirmMsg($table,$rec,$type,$clElements) {
696 if($GLOBALS['BE_USER']->jsConfirmation(2)) {
697 $labelKey = 'LLL:EXT:lang/locallang_core.php:mess.'.($this->currentMode()=='copy'?
'copy':'move').($this->current
=='normal'?
'':'cb').'_'.$type;
698 $msg = $GLOBALS['LANG']->sL($labelKey);
700 if ($table=='_FILE') {
701 $thisRecTitle = basename($rec);
702 if ($this->current
=='normal') {
704 $selItem = current($clElements);
705 $selRecTitle = basename($selItem);
707 $selRecTitle=count($clElements);
711 $table=='pages' && !is_array($rec) ?
712 $GLOBALS['TYPO3_CONF_VARS']['SYS']['sitename'] :
713 t3lib_BEfunc
::getRecordTitle($table,$rec)
716 if ($this->current
=='normal') {
717 $selItem = $this->getSelectedRecord();
718 $selRecTitle=$selItem['_RECORD_TITLE'];
720 $selRecTitle=count($clElements);
725 $conf='confirm('.$GLOBALS['LANG']->JScharCode(sprintf(
727 t3lib_div
::fixed_lgd_cs($selRecTitle,30),
728 t3lib_div
::fixed_lgd_cs($thisRecTitle,30)
737 * Clipboard label - getting from "EXT:lang/locallang_core.php:"
739 * @param string Label Key
740 * @param string Alternative key to "labels"
743 function clLabel($key,$Akey='labels') {
744 return htmlspecialchars($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:'.$Akey.'.'.$key));
748 * Creates GET parameters for linking to the export module.
750 * @return string GET parameters for current clipboard content to be exported.
752 function exportClipElementParameters() {
755 $pad = $this->current
;
757 $params[] = 'tx_impexp[action]=export';
760 if (is_array($this->clipData
[$pad]['el'])) {
761 foreach ($this->clipData
[$pad]['el'] as $k => $v) {
763 list($table,$uid) = explode('|',$k);
765 if ($table=='_FILE') { // Rendering files/directories on the clipboard:
766 if (file_exists($v) && t3lib_div
::isAllowedAbsPath($v)) {
767 $params[] = 'tx_impexp['.(is_dir($v) ?
'dir' : 'file').'][]='.rawurlencode($v);
769 } else { // Rendering records:
770 $rec = t3lib_BEfunc
::getRecord($table,$uid);
771 if (is_array($rec)) {
772 $params[] = 'tx_impexp[record][]='.rawurlencode($table.':'.$uid);
779 return '?'.implode('&', $params);
789 /*****************************************
793 ****************************************/
796 * Removes element on clipboard
798 * @param string Key of element in ->clipData array
801 function removeElement($el) {
802 unset($this->clipData
[$this->current
]['el'][$el]);
807 * Saves the clipboard, no questions asked.
808 * Use ->endClipboard normally (as it checks if changes has been done so saving is necessary)
813 function saveClipboard() {
815 $BE_USER->pushModuleData('clipboard',$this->clipData
);
819 * Returns the current mode, 'copy' or 'cut'
821 * @return string "copy" or "cut"
823 function currentMode() {
824 return $this->clipData
[$this->current
]['mode']=='copy' ?
'copy' : 'cut';
828 * This traverses the elements on the current clipboard pane
829 * and unsets elements which does not exist anymore or are disabled.
833 function cleanCurrent() {
834 if (is_array($this->clipData
[$this->current
]['el'])) {
835 foreach ($this->clipData
[$this->current
]['el'] as $k => $v) {
836 list($table,$uid) = explode('|',$k);
837 if ($table!='_FILE') {
838 if (!$v ||
!is_array(t3lib_BEfunc
::getRecord($table,$uid,'uid'))) {
839 unset($this->clipData
[$this->current
]['el'][$k]);
843 if (!$v ||
!file_exists($v)) {
844 unset($this->clipData
[$this->current
]['el'][$k]);
853 * Counts the number of elements from the table $matchTable. If $matchTable is blank, all tables (except '_FILE' of course) is counted.
855 * @param string Table to match/count for.
856 * @param string $pad can optionally be used to set another pad than the current.
857 * @return array Array with keys from the CB.
859 function elFromTable($matchTable='',$pad='') {
860 $pad = $pad ?
$pad : $this->current
;
862 if (is_array($this->clipData
[$pad]['el'])) {
863 foreach ($this->clipData
[$pad]['el'] as $k => $v) {
865 list($table,$uid) = explode('|',$k);
866 if ($table!='_FILE') {
867 if ((!$matchTable ||
(string)$table==(string)$matchTable) && $GLOBALS['TCA'][$table]) {
868 $list[$k]= ($pad=='normal'?
$v:$uid);
871 if ((string)$table==(string)$matchTable) {
882 * Verifies if the item $table/$uid is on the current pad.
883 * If the pad is "normal", the mode value is returned if the element existed. Thus you'll know if the item was copy or cut moded...
885 * @param string Table name, (_FILE for files...)
886 * @param integer Element uid (path for files)
889 function isSelected($table,$uid) {
891 return $this->clipData
[$this->current
]['el'][$k] ?
($this->current
=='normal'?
$this->currentMode():1) : '';
895 * Returns item record $table,$uid if selected on current clipboard
896 * If table and uid is blank, the first element is returned.
897 * Makes sense only for DB records - not files!
899 * @param string Table name
900 * @param integer Element uid
901 * @return array Element record with extra field _RECORD_TITLE set to the title of the record...
903 function getSelectedRecord($table='',$uid='') {
904 if (!$table && !$uid) {
905 $elArr = $this->elFromTable('');
907 list($table,$uid) = explode('|',key($elArr));
909 if ($this->isSelected($table,$uid)) {
910 $selRec = t3lib_BEfunc
::getRecordWSOL($table,$uid);
911 $selRec['_RECORD_TITLE'] = t3lib_BEfunc
::getRecordTitle($table,$selRec);
917 * Reports if the current pad has elements (does not check file/DB type OR if file/DBrecord exists or not. Only counting array)
919 * @return boolean True if elements exist.
921 function isElements() {
922 return is_array($this->clipData
[$this->current
]['el']) && count($this->clipData
[$this->current
]['el']);
939 /*****************************************
941 * FOR USE IN tce_db.php:
943 ****************************************/
946 * Applies the proper paste configuration in the $cmd array send to tce_db.php.
947 * $ref is the target, see description below.
948 * The current pad is pasted
950 * $ref: [tablename]:[paste-uid].
951 * tablename is the name of the table from which elements *on the current clipboard* is pasted with the 'pid' paste-uid.
952 * No tablename means that all items on the clipboard (non-files) are pasted. This requires paste-uid to be positive though.
953 * so 'tt_content:-3' means 'paste tt_content elements on the clipboard to AFTER tt_content:3 record
954 * 'tt_content:30' means 'paste tt_content elements on the clipboard into page with id 30
955 * ':30' means 'paste ALL database elements on the clipboard into page with id 30
958 * @param string [tablename]:[paste-uid], see description
959 * @param array Command-array
960 * @return array Modified Command-array
962 function makePasteCmdArray($ref,$CMD) {
963 list($pTable,$pUid) = explode('|',$ref);
964 $pUid = intval($pUid);
966 if ($pTable ||
$pUid>=0) { // pUid must be set and if pTable is not set (that means paste ALL elements) the uid MUST be positive/zero (pointing to page id)
967 $elements = $this->elFromTable($pTable);
969 $elements = array_reverse($elements); // So the order is preserved.
970 $mode = $this->currentMode()=='copy' ?
'copy' : 'move';
972 // Traverse elements and make CMD array
973 foreach ($elements as $tP => $value) {
974 list($table,$uid) = explode('|',$tP);
975 if (!is_array($CMD[$table])) $CMD[$table]=array();
976 $CMD[$table][$uid][$mode]=$pUid;
977 if ($mode=='move') $this->removeElement($tP);
979 $this->endClipboard();
985 * Delete record entries in CMD array
987 * @param array Command-array
988 * @return array Modified Command-array
990 function makeDeleteCmdArray($CMD) {
991 $elements = $this->elFromTable(''); // all records
992 foreach ($elements as $tP => $value) {
993 list($table,$uid) = explode('|',$tP);
994 if (!is_array($CMD[$table])) $CMD[$table]=array();
995 $CMD[$table][$uid]['delete']=1;
996 $this->removeElement($tP);
998 $this->endClipboard();
1018 /*****************************************
1020 * FOR USE IN tce_file.php:
1022 ****************************************/
1025 * Applies the proper paste configuration in the $file array send to tce_file.php.
1026 * The current pad is pasted
1028 * @param string Reference to element (splitted by "|")
1029 * @param array Command-array
1030 * @return array Modified Command-array
1032 function makePasteCmdArray_file($ref,$FILE) {
1033 list($pTable,$pUid) = explode('|',$ref);
1034 $elements = $this->elFromTable('_FILE');
1035 $mode = $this->currentMode()=='copy' ?
'copy' : 'move';
1037 // Traverse elements and make CMD array
1038 foreach ($elements as $tP => $path) {
1039 $FILE[$mode][]=array('data'=>$path,'target'=>$pUid,'altName'=>1);
1040 if ($mode=='move') $this->removeElement($tP);
1042 $this->endClipboard();
1048 * Delete files in CMD array
1050 * @param array Command-array
1051 * @return array Modified Command-array
1053 function makeDeleteCmdArray_file($FILE) {
1054 $elements = $this->elFromTable('_FILE');
1055 // Traverse elements and make CMD array
1056 foreach ($elements as $tP => $path) {
1057 $FILE['delete'][]=array('data'=>$path);
1058 $this->removeElement($tP);
1060 $this->endClipboard();
1068 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_clipboard.php']) {
1069 include_once($TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_clipboard.php']);