typo3/class.browse_links.php

   1 <?php
   2 /***************************************************************
   3 *  Copyright notice
   4 *
   5 *  (c) 1999-2008 Kasper Skaarhoj (kasperYYYY@typo3.com)
   6 *  All rights reserved
   7 *
   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.
  13 *
  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.
  18 *
  19 *
  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.
  24 *
  25 *  This copyright notice MUST APPEAR in all copies of the script!
  26 ***************************************************************/
  27 /**
  28  * Displays the page/file tree for browsing database records or files.
  29  * Used from TCEFORMS an other elements
  30  * In other words: This is the ELEMENT BROWSER!
  31  *
  32  * $Id$
  33  * Revised for TYPO3 3.6 November/2003 by Kasper Skaarhoj
  34  * XHTML compliant
  35  *
  36  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
  37  */
  38 /**
  39  * [CLASS/FUNCTION INDEX of SCRIPT]
  40  *
  41  *
  42  *
  43  *  155: class TBE_browser_recordList extends localRecordList
  44  *  163:     function TBE_browser_recordList ()
  45  *  175:     function listURL($altId='',$table=-1,$exclList='')
  46  *  194:     function ext_addP()
  47  *  211:     function linkWrapItems($table,$uid,$code,$row)
  48  *  244:     function linkWrapTable($table,$code)
  49  *
  50  *
  51  *  261: class localPageTree extends t3lib_browseTree
  52  *  268:     function localPageTree()
  53  *  284:     function wrapTitle($title,$v,$ext_pArrPages='')
  54  *  299:     function printTree($treeArr='')
  55  *  350:     function ext_isLinkable($doktype,$uid)
  56  *  364:     function PM_ATagWrap($icon,$cmd,$bMark='')
  57  *  381:     function wrapIcon($icon,$row)
  58  *
  59  *
  60  *  400: class rtePageTree extends localPageTree
  61  *
  62  *
  63  *  417: class TBE_PageTree extends localPageTree
  64  *  426:     function ext_isLinkable($doktype,$uid)
  65  *  438:     function wrapTitle($title,$v,$ext_pArrPages)
  66  *
  67  *
  68  *  464: class localFolderTree extends t3lib_folderTree
  69  *  473:     function localFolderTree()
  70  *  485:     function wrapTitle($title,$v)
  71  *  500:     function ext_isLinkable($v)
  72  *  517:     function PM_ATagWrap($icon,$cmd,$bMark='')
  73  *  532:     function printTree($treeArr='')
  74  *
  75  *
  76  *  599: class rteFolderTree extends localFolderTree
  77  *
  78  *
  79  *  615: class TBE_FolderTree extends localFolderTree
  80  *  624:     function ext_isLinkable($v)
  81  *  637:     function wrapTitle($title,$v)
  82  *
  83  *
  84  *  658: class browse_links
  85  *  764:     function init()
  86  * 1034:     function processSessionData($data)
  87  *
  88  *              SECTION: Main functions
  89  * 1077:     function main_rte($wiz=0)
  90  * 1379:     function main_db()
  91  * 1424:     function main_file()
  92  *
  93  *              SECTION: Record listing
  94  * 1534:     function expandPage()
  95  * 1615:     function TBE_expandPage($tables)
  96  *
  97  *              SECTION: File listing
  98  * 1708:     function expandFolder($expandFolder=0,$extensionList='')
  99  * 1778:     function TBE_expandFolder($expandFolder=0,$extensionList='',$noThumbs=0)
 100  * 1801:     function fileList($files, $folderName='', $noThumbs=0)
 101  * 1918:     function TBE_dragNDrop($expandFolder=0,$extensionList='')
 102  *
 103  *              SECTION: Miscellaneous functions
 104  * 2046:     function isWebFolder($folder)
 105  * 2057:     function checkFolder($folder)
 106  * 2070:     function barheader($str)
 107  * 2087:     function getMsgBox($in_msg,$icon='icon_note')
 108  * 2111:     function printCurrentUrl($str)
 109  * 2131:     function parseCurUrl($href,$siteUrl)
 110  * 2193:     function uploadForm($path)
 111  * 2247:     function createFolder($path)
 112  *
 113  * TOTAL FUNCTIONS: 39
 114  * (This index is automatically created/updated by the extension "extdeveval")
 115  *
 116  */
 117
 118 require_once (PATH_t3lib.'class.t3lib_browsetree.php');
 119 require_once (PATH_t3lib.'class.t3lib_foldertree.php');
 120 require_once (PATH_t3lib.'class.t3lib_stdgraphic.php');
 121 require_once (PATH_t3lib.'class.t3lib_basicfilefunc.php');
 122
 123
 124         // Include classes
 125 require_once (PATH_t3lib.'class.t3lib_page.php');
 126 require_once (PATH_t3lib.'class.t3lib_recordlist.php');
 127 require_once (PATH_typo3.'/class.db_list.inc');
 128 require_once (PATH_typo3.'/class.db_list_extra.inc');
 129 require_once (PATH_t3lib.'/class.t3lib_pagetree.php');
 130
 131
 132
 133
 134
 135
 136
 137
 138
 139
 140
 141
 142
 143
 144
 145
 146
 147
 148
 149 /**
 150  * Local version of the record list.
 151  *
 152  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 153  * @package TYPO3
 154  * @subpackage core
 155  */
 156 class TBE_browser_recordList extends localRecordList {
 157         var $thisScript = 'browse_links.php';
 158
 159         /**
 160          * Initializes the script path
 161          *
 162          * @return      void
 163          */
 164         function TBE_browser_recordList () {
 165                 $this->thisScript = t3lib_div::getIndpEnv('SCRIPT_NAME');
 166         }
 167
 168         /**
 169          * Creates the URL for links
 170          *
 171          * @param       mixed           If not blank string, this is used instead of $this->id as the id value.
 172          * @param       string          If this is "-1" then $this->table is used, otherwise the value of the input variable.
 173          * @param       string          Commalist of fields NOT to pass as parameters (currently "sortField" and "sortRev")
 174          * @return      string          Query-string for URL
 175          */
 176         function listURL($altId='',$table=-1,$exclList='')      {
 177                 return $this->thisScript.
 178                         '?id='.(strcmp($altId,'')?$altId:$this->id).
 179                         '&table='.rawurlencode($table==-1?$this->table:$table).
 180                         ($this->thumbs?'&imagemode='.$this->thumbs:'').
 181                         ($this->searchString?'&search_field='.rawurlencode($this->searchString):'').
 182                         ($this->searchLevels?'&search_levels='.rawurlencode($this->searchLevels):'').
 183                         ((!$exclList || !t3lib_div::inList($exclList,'sortField')) && $this->sortField?'&sortField='.rawurlencode($this->sortField):'').
 184                         ((!$exclList || !t3lib_div::inList($exclList,'sortRev')) && $this->sortRev?'&sortRev='.rawurlencode($this->sortRev):'').
 185                                 // extra:
 186                         $this->ext_addP()
 187                         ;
 188         }
 189
 190         /**
 191          * Returns additional, local GET parameters to include in the links of the record list.
 192          *
 193          * @return      string
 194          */
 195         function ext_addP()     {
 196                 $str = '&act='.$GLOBALS['SOBE']->browser->act.
 197                                 '&mode='.$GLOBALS['SOBE']->browser->mode.
 198                                 '&expandPage='.$GLOBALS['SOBE']->browser->expandPage.
 199                                 '&bparams='.rawurlencode($GLOBALS['SOBE']->browser->bparams);
 200                 return $str;
 201         }
 202
 203         /**
 204          * Returns the title (based on $code) of a record (from table $table) with the proper link around (that is for "pages"-records a link to the level of that record...)
 205          *
 206          * @param       string          Table name
 207          * @param       integer         UID (not used here)
 208          * @param       string          Title string
 209          * @param       array           Records array (from table name)
 210          * @return      string
 211          */
 212         function linkWrapItems($table,$uid,$code,$row)  {
 213                 global $TCA, $BACK_PATH;
 214
 215                 if (!$code) {
 216                         $code = '<i>['.$GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:labels.no_title',1).']</i>';
 217                 } else {
 218                         $code = htmlspecialchars(t3lib_div::fixed_lgd_cs($code,$this->fixedL));
 219                 }
 220
 221                 $title = t3lib_BEfunc::getRecordTitle($table,$row,FALSE,TRUE);
 222                 $ficon = t3lib_iconWorks::getIcon($table,$row);
 223                 $aOnClick = "return insertElement('".$table."', '".$row['uid']."', 'db', ".t3lib_div::quoteJSvalue($title).", '', '', '".$ficon."');";
 224                 $ATag = '<a href="#" onclick="'.$aOnClick.'">';
 225                 $ATag_alt = substr($ATag,0,-4).',\'\',1);">';
 226                 $ATag_e = '</a>';
 227
 228                 return $ATag.
 229                                 '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/plusbullet2.gif','width="18" height="16"').' title="'.$GLOBALS['LANG']->getLL('addToList',1).'" alt="" />'.
 230                                 $ATag_e.
 231                                 $ATag_alt.
 232                                 $code.
 233                                 $ATag_e;
 234         }
 235
 236         /**
 237          * Local version that sets allFields to true to support userFieldSelect
 238          *
 239          * @return      void
 240          * @see fieldSelectBox
 241          */
 242         function generateList() {
 243                 $this->allFields = true;
 244                 parent::generateList();
 245         }
 246 }
 247
 248
 249
 250
 251
 252
 253 /**
 254  * Class which generates the page tree
 255  *
 256  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 257  * @package TYPO3
 258  * @subpackage core
 259  */
 260 class localPageTree extends t3lib_browseTree {
 261
 262         /**
 263          * Constructor. Just calling init()
 264          *
 265          * @return      void
 266          */
 267         function localPageTree() {
 268                 $this->thisScript = t3lib_div::getIndpEnv('SCRIPT_NAME');
 269
 270                 $this->init();
 271
 272                 $this->clause = ' AND doktype!=255'.$this->clause;
 273         }
 274
 275         /**
 276          * Wrapping the title in a link, if applicable.
 277          *
 278          * @param       string          Title, (must be ready for output, that means it must be htmlspecialchars()'ed).
 279          * @param       array           The record
 280          * @param       boolean         (Ignore)
 281          * @return      string          Wrapping title string.
 282          */
 283         function wrapTitle($title,$v,$ext_pArrPages='') {
 284                 if ($this->ext_isLinkable($v['doktype'],$v['uid']))     {
 285                         $aOnClick = "return link_typo3Page('".$v['uid']."');";
 286                         return '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.$title.'</a>';
 287                 } else {
 288                         return '<span style="color: #666666;">'.$title.'</span>';
 289                 }
 290         }
 291
 292         /**
 293          * Create the page navigation tree in HTML
 294          *
 295          * @param       array           Tree array
 296          * @return      string          HTML output.
 297          */
 298         function printTree($treeArr='') {
 299                 global $BACK_PATH;
 300                 $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
 301                 if (!is_array($treeArr))        $treeArr=$this->tree;
 302
 303                 $out='';
 304                 $c=0;
 305
 306                 foreach($treeArr as $k => $v)   {
 307                         $c++;
 308                         $bgColorClass = ($c+1)%2 ? 'bgColor' : 'bgColor-10';
 309                         if ($GLOBALS['SOBE']->browser->curUrlInfo['act']=='page' && $GLOBALS['SOBE']->browser->curUrlInfo['pageid']==$v['row']['uid'] && $GLOBALS['SOBE']->browser->curUrlInfo['pageid'])       {
 310                                 $arrCol='<td><img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/blinkarrow_right.gif','width="5" height="9"').' class="c-blinkArrowR" alt="" /></td>';
 311                                 $bgColorClass='bgColor4';
 312                         } else {
 313                                 $arrCol='<td></td>';
 314                         }
 315
 316                         $aOnClick = 'return jumpToUrl(\''.$this->thisScript.'?act='.$GLOBALS['SOBE']->browser->act.'&mode='.$GLOBALS['SOBE']->browser->mode.'&expandPage='.$v['row']['uid'].'\');';
 317                         $cEbullet = $this->ext_isLinkable($v['row']['doktype'],$v['row']['uid']) ?
 318                                                 '<a href="#" onclick="'.htmlspecialchars($aOnClick).'"><img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/arrowbullet.gif','width="18" height="16"').' alt="" /></a>' :
 319                                                 '';
 320                         $out.='
 321                                 <tr class="'.$bgColorClass.'">
 322                                         <td nowrap="nowrap"'.($v['row']['_CSSCLASS'] ? ' class="'.$v['row']['_CSSCLASS'].'"' : '').'>'.
 323                                         $v['HTML'].
 324                                         $this->wrapTitle($this->getTitleStr($v['row'],$titleLen),$v['row'],$this->ext_pArrPages).
 325                                         '</td>'.
 326                                         $arrCol.
 327                                         '<td>'.$cEbullet.'</td>
 328                                 </tr>';
 329                 }
 330                 $out='
 331
 332
 333                         <!--
 334                                 Navigation Page Tree:
 335                         -->
 336                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-tree">
 337                                 '.$out.'
 338                         </table>';
 339                 return $out;
 340         }
 341
 342         /**
 343          * Returns true if a doktype can be linked.
 344          *
 345          * @param       integer         Doktype value to test
 346          * @param       integer         uid to test.
 347          * @return      boolean
 348          */
 349         function ext_isLinkable($doktype,$uid)  {
 350                 if ($uid && $doktype<199)       {
 351                         return true;
 352                 }
 353         }
 354
 355         /**
 356          * Wrap the plus/minus icon in a link
 357          *
 358          * @param       string          HTML string to wrap, probably an image tag.
 359          * @param       string          Command for 'PM' get var
 360          * @param       boolean         If set, the link will have a anchor point (=$bMark) and a name attribute (=$bMark)
 361          * @return      string          Link-wrapped input string
 362          */
 363         function PM_ATagWrap($icon,$cmd,$bMark='')      {
 364                 if ($bMark)     {
 365                         $anchor = '#'.$bMark;
 366                         $name=' name="'.$bMark.'"';
 367                 }
 368                 $aOnClick = "return jumpToUrl('".$this->thisScript.'?PM='.$cmd."','".$anchor."');";
 369
 370                 return '<a href="#"'.$name.' onclick="'.htmlspecialchars($aOnClick).'">'.$icon.'</a>';
 371         }
 372
 373         /**
 374          * Wrapping the image tag, $icon, for the row, $row
 375          *
 376          * @param       string          The image tag for the icon
 377          * @param       array           The row for the current element
 378          * @return      string          The processed icon input value.
 379          */
 380         function wrapIcon($icon,$row)   {
 381                 return $this->addTagAttributes($icon,' title="id='.$row['uid'].'"');
 382         }
 383 }
 384
 385
 386
 387
 388
 389
 390
 391
 392 /**
 393  * Page tree for the RTE - totally the same, no changes needed. (Just for the sake of beauty - or confusion... :-)
 394  *
 395  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 396  * @package TYPO3
 397  * @subpackage core
 398  */
 399 class rtePageTree extends localPageTree {
 400 }
 401
 402
 403
 404
 405
 406
 407
 408
 409 /**
 410  * For TBE record browser
 411  *
 412  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 413  * @package TYPO3
 414  * @subpackage core
 415  */
 416 class TBE_PageTree extends localPageTree {
 417
 418         /**
 419          * Returns true if a doktype can be linked (which is always the case here).
 420          *
 421          * @param       integer         Doktype value to test
 422          * @param       integer         uid to test.
 423          * @return      boolean
 424          */
 425         function ext_isLinkable($doktype,$uid)  {
 426                 return true;
 427         }
 428
 429         /**
 430          * Wrapping the title in a link, if applicable.
 431          *
 432          * @param       string          Title, ready for output.
 433          * @param       array           The record
 434          * @param       boolean         If set, pages clicked will return immediately, otherwise reload page.
 435          * @return      string          Wrapping title string.
 436          */
 437         function wrapTitle($title,$v,$ext_pArrPages)    {
 438                 if ($ext_pArrPages)     {
 439                         $ficon=t3lib_iconWorks::getIcon('pages',$v);
 440                         $onClick = "return insertElement('pages', '".$v['uid']."', 'db', ".t3lib_div::quoteJSvalue($v['title']).", '', '', '".$ficon."','',1);";
 441                 } else {
 442                         $onClick = htmlspecialchars('return jumpToUrl(\''.$this->thisScript.'?act='.$GLOBALS['SOBE']->browser->act.'&mode='.$GLOBALS['SOBE']->browser->mode.'&expandPage='.$v['uid'].'\');');
 443                 }
 444                 return '<a href="#" onclick="'.$onClick.'">'.$title.'</a>';
 445         }
 446 }
 447
 448
 449
 450
 451
 452
 453
 454
 455 /**
 456  * Base extension class which generates the folder tree.
 457  * Used directly by the RTE.
 458  *
 459  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 460  * @package TYPO3
 461  * @subpackage core
 462  */
 463 class localFolderTree extends t3lib_folderTree {
 464         var $ext_IconMode=1;
 465
 466
 467         /**
 468          * Initializes the script path
 469          *
 470          * @return      void
 471          */
 472         function localFolderTree() {
 473                 $this->thisScript = t3lib_div::getIndpEnv('SCRIPT_NAME');
 474                 $this->t3lib_folderTree();
 475         }
 476
 477         /**
 478          * Wrapping the title in a link, if applicable.
 479          *
 480          * @param       string          Title, ready for output.
 481          * @param       array           The "record"
 482          * @return      string          Wrapping title string.
 483          */
 484         function wrapTitle($title,$v)   {
 485                 if ($this->ext_isLinkable($v))  {
 486                         $aOnClick = 'return jumpToUrl(\''.$this->thisScript.'?act='.$GLOBALS['SOBE']->browser->act.'&mode='.$GLOBALS['SOBE']->browser->mode.'&expandFolder='.rawurlencode($v['path']).'\');';
 487                         return '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.$title.'</a>';
 488                 } else {
 489                         return '<span class="typo3-dimmed">'.$title.'</span>';
 490                 }
 491         }
 492
 493         /**
 494          * Returns true if the input "record" contains a folder which can be linked.
 495          *
 496          * @param       array           Array with information about the folder element. Contains keys like title, uid, path, _title
 497          * @return      boolean         True is returned if the path is found in the web-part of the server and is NOT a recycler or temp folder
 498          */
 499         function ext_isLinkable($v)     {
 500                 $webpath=t3lib_BEfunc::getPathType_web_nonweb($v['path']);      // Checking, if the input path is a web-path.
 501                 if (strstr($v['path'],'_recycler_') || strstr($v['path'],'_temp_') || $webpath!='web')  {
 502                         return 0;
 503                 }
 504                 return 1;
 505         }
 506
 507         /**
 508          * Wrap the plus/minus icon in a link
 509          *
 510          * @param       string          HTML string to wrap, probably an image tag.
 511          * @param       string          Command for 'PM' get var
 512          * @param       boolean         If set, the link will have a anchor point (=$bMark) and a name attribute (=$bMark)
 513          * @return      string          Link-wrapped input string
 514          * @access private
 515          */
 516         function PM_ATagWrap($icon,$cmd,$bMark='')      {
 517                 if ($bMark)     {
 518                         $anchor = '#'.$bMark;
 519                         $name=' name="'.$bMark.'"';
 520                 }
 521                 $aOnClick = 'return jumpToUrl(\''.$this->thisScript.'?PM='.$cmd.'\',\''.$anchor.'\');';
 522                 return '<a href="#"'.$name.' onclick="'.htmlspecialchars($aOnClick).'">'.$icon.'</a>';
 523         }
 524
 525         /**
 526          * Create the folder navigation tree in HTML
 527          *
 528          * @param       mixed           Input tree array. If not array, then $this->tree is used.
 529          * @return      string          HTML output of the tree.
 530          */
 531         function printTree($treeArr='') {
 532                 global $BACK_PATH;
 533                 $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
 534
 535                 if (!is_array($treeArr))        $treeArr=$this->tree;
 536
 537                 $out='';
 538                 $c=0;
 539
 540                         // Preparing the current-path string (if found in the listing we will see a red blinking arrow).
 541                 if (!$GLOBALS['SOBE']->browser->curUrlInfo['value'])    {
 542                         $cmpPath='';
 543                 } else if (substr(trim($GLOBALS['SOBE']->browser->curUrlInfo['info']),-1)!='/') {
 544                         $cmpPath=PATH_site.dirname($GLOBALS['SOBE']->browser->curUrlInfo['info']).'/';
 545                 } else {
 546                         $cmpPath=PATH_site.$GLOBALS['SOBE']->browser->curUrlInfo['info'];
 547                 }
 548
 549                         // Traverse rows for the tree and print them into table rows:
 550                 foreach($treeArr as $k => $v)   {
 551                         $c++;
 552                         $bgColorClass=($c+1)%2 ? 'bgColor' : 'bgColor-10';
 553
 554                                 // Creating blinking arrow, if applicable:
 555                         if (($GLOBALS['SOBE']->browser->curUrlInfo['act'] == 'file' || $GLOBALS['SOBE']->browser->curUrlInfo['act'] == 'folder') && $cmpPath == $v['row']['path']) {
 556                                 $arrCol='<td><img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/blinkarrow_right.gif','width="5" height="9"').' class="c-blinkArrowR" alt="" /></td>';
 557                                 $bgColorClass='bgColor4';
 558                         } else {
 559                                 $arrCol='<td></td>';
 560                         }
 561                                 // Create arrow-bullet for file listing (if folder path is linkable):
 562                         $aOnClick = 'return jumpToUrl(\''.$this->thisScript.'?act='.$GLOBALS['SOBE']->browser->act.'&mode='.$GLOBALS['SOBE']->browser->mode.'&expandFolder='.rawurlencode($v['row']['path']).'\');';
 563                         $cEbullet = $this->ext_isLinkable($v['row']) ? '<a href="#" onclick="'.htmlspecialchars($aOnClick).'"><img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/arrowbullet.gif','width="18" height="16"').' alt="" /></a>' : '';
 564
 565                                 // Put table row with folder together:
 566                         $out.='
 567                                 <tr class="'.$bgColorClass.'">
 568                                         <td nowrap="nowrap">'.$v['HTML'].$this->wrapTitle(t3lib_div::fixed_lgd_cs($v['row']['title'],$titleLen),$v['row']).'</td>
 569                                         '.$arrCol.'
 570                                         <td>'.$cEbullet.'</td>
 571                                 </tr>';
 572                 }
 573
 574                 $out='
 575
 576                         <!--
 577                                 Folder tree:
 578                         -->
 579                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-tree">
 580                                 '.$out.'
 581                         </table>';
 582                 return $out;
 583         }
 584 }
 585
 586
 587
 588
 589
 590
 591 /**
 592  * Folder tree for the RTE - totally the same, no changes needed. (Just for the sake of beauty - or confusion... :-)
 593  *
 594  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 595  * @package TYPO3
 596  * @subpackage core
 597  */
 598 class rteFolderTree extends localFolderTree {
 599 }
 600
 601
 602
 603
 604
 605
 606
 607 /**
 608  * For TBE File Browser
 609  *
 610  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 611  * @package TYPO3
 612  * @subpackage core
 613  */
 614 class TBE_FolderTree extends localFolderTree {
 615         var $ext_noTempRecyclerDirs=0;          // If file-drag mode is set, temp and recycler folders are filtered out.
 616
 617         /**
 618          * Returns true if the input "record" contains a folder which can be linked.
 619          *
 620          * @param       array           Array with information about the folder element. Contains keys like title, uid, path, _title
 621          * @return      boolean         True is returned if the path is NOT a recycler or temp folder AND if ->ext_noTempRecyclerDirs is not set.
 622          */
 623         function ext_isLinkable($v)     {
 624                 if ($this->ext_noTempRecyclerDirs && (substr($v['path'],-7)=='_temp_/' || substr($v['path'],-11)=='_recycler_/'))       {
 625                         return 0;
 626                 } return 1;
 627         }
 628
 629         /**
 630          * Wrapping the title in a link, if applicable.
 631          *
 632          * @param       string          Title, ready for output.
 633          * @param       array           The 'record'
 634          * @return      string          Wrapping title string.
 635          */
 636         function wrapTitle($title,$v)   {
 637                 if ($this->ext_isLinkable($v))  {
 638                         $aOnClick = 'return jumpToUrl(\''.$this->thisScript.'?act='.$GLOBALS['SOBE']->browser->act.'&mode='.$GLOBALS['SOBE']->browser->mode.'&expandFolder='.rawurlencode($v['path']).'\');';
 639                         return '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.$title.'</a>';
 640                 } else {
 641                         return '<span class="typo3-dimmed">'.$title.'</span>';
 642                 }
 643         }
 644 }
 645
 646
 647
 648
 649
 650 /**
 651  * class for the Element Browser window.
 652  *
 653  * @author      Kasper Skaarhoj <kasperYYYY@typo3.com>
 654  * @package TYPO3
 655  * @subpackage core
 656  */
 657 class browse_links {
 658
 659                 // Internal, static:
 660         var $siteURL;                   // Current site URL (Frontend)
 661         var $thisScript;                // the script to link to
 662         var $thisConfig;                // RTE specific TSconfig
 663         var $setTarget;                 // Target (RTE specific)
 664         var $setClass;                  // CSS Class (RTE specific)
 665         var $setTitle;                  // title (RTE specific)
 666         var $doc;                       // Backend template object
 667         var $elements = array();        // Holds information about files
 668
 669                 // GPvars:      (Input variables from outside)
 670         /**
 671          * The mode determines the main kind of output from the element browser.
 672          * There are these options for values: rte, db, file, filedrag, wizard.
 673          * "rte" will show the link selector for the Rich Text Editor (see main_rte())
 674          * "db" will allow you to browse for pages or records in the page tree (for TCEforms, see main_db())
 675          * "file"/"filedrag" will allow you to browse for files or folders in the folder mounts (for TCEforms, main_file())
 676          * "wizard" will allow you to browse for links (like "rte") which are passed back to TCEforms (see main_rte(1))
 677          *
 678          * @see main()
 679          */
 680         var $mode;
 681
 682         /**
 683          * Link selector action.
 684          * page,file,url,mail,spec are allowed values.
 685          * These are only important with the link selector function and in that case they switch between the various menu options.
 686          */
 687         var $act;
 688
 689         /**
 690          * When you click a page title/expand icon to see the content of a certain page, this value will contain that value (the ID of the expanded page). If the value is NOT set, then it will be restored from the module session data (see main(), mode="db")
 691          */
 692         var $expandPage;
 693
 694         /**
 695          * When you click a folder name/expand icon to see the content of a certain file folder, this value will contain that value (the path of the expanded file folder). If the value is NOT set, then it will be restored from the module session data (see main(), mode="file"/"filedrag"). Example value: "/www/htdocs/typo3/32/3dsplm/fileadmin/css/"
 696          */
 697         var $expandFolder;
 698
 699
 700
 701         /**
 702          * TYPO3 Element Browser, wizard mode parameters. There is a heap of parameters there, better debug() them out if you need something... :-)
 703          */
 704         var $P;
 705
 706         /**
 707          * Active with TYPO3 Element Browser: Contains the name of the form field for which this window opens - thus allows us to make references back to the main window in which the form is.
 708          * Example value: "data[pages][39][bodytext]|||tt_content|" or "data[tt_content][NEW3fba56fde763d][image]|||gif,jpg,jpeg,tif,bmp,pcx,tga,png,pdf,ai|"
 709          *
 710          * Values:
 711          * 0: form field name reference, eg. "data[tt_content][123][image]"
 712          * 1: htlmArea RTE parameters: editorNo:contentTypo3Language:contentTypo3Charset
 713          * 2: RTE config parameters: RTEtsConfigParams
 714          * 3: allowed types. Eg. "tt_content" or "gif,jpg,jpeg,tif,bmp,pcx,tga,png,pdf,ai"
 715          * 4: IRRE uniqueness: target level object-id to perform actions/checks on, eg. "data[79][tt_address][1][<field>][<foreign_table>]"
 716          * 5: IRRE uniqueness: name of function in opener window that checks if element is already used, eg. "inline.checkUniqueElement"
 717          * 6: IRRE uniqueness: name of function in opener window that performs some additional(!) action, eg. "inline.setUniqueElement"
 718          * 7: IRRE uniqueness: name of function in opener window that performs action instead of using addElement/insertElement, eg. "inline.importElement"
 719          *
 720          * $pArr = explode('|',$this->bparams);
 721          * $formFieldName = $pArr[0];
 722          * $allowedTablesOrFileTypes = $pArr[3];
 723          */
 724         var $bparams;
 725
 726         /**
 727          * Used with the Rich Text Editor.
 728          * Example value: "tt_content:NEW3fba58c969f5c:bodytext:23:text:23:"
 729          */
 730         var $RTEtsConfigParams;
 731
 732
 733
 734
 735         /**
 736          * Plus/Minus icon value. Used by the tree class to open/close notes on the trees.
 737          */
 738         var $PM;
 739
 740         /**
 741          * Pointer, used when browsing a long list of records etc.
 742          */
 743         var $pointer;
 744
 745
 746
 747
 748         /**
 749          * Used with the link selector: Contains the GET input information about the CURRENT link in the RTE/TCEform field. This consists of "href", "target" and "title" keys. This information is passed around in links.
 750          */
 751         var $curUrlArray;
 752
 753         /**
 754          * Used with the link selector: Contains a processed version of the input values from curUrlInfo. This is splitted into pageid, content element id, label value etc. This is used for the internal processing of that information.
 755          */
 756         var $curUrlInfo;
 757
 758         /**
 759          * array which holds hook objects (initialised in init() )
 760          */
 761         protected $hookObjects = array();
 762
 763
 764         /**
 765          * object for t3lib_basicFileFunctions
 766          */
 767         public $fileProcessor;
 768
 769
 770         /**
 771          * Constructor:
 772          * Initializes a lot of variables, setting JavaScript functions in header etc.
 773          *
 774          * @return      void
 775          */
 776         function init() {
 777                 global $BE_USER,$BACK_PATH;
 778
 779                         // Main GPvars:
 780                 $this->pointer           = t3lib_div::_GP('pointer');
 781                 $this->bparams           = t3lib_div::_GP('bparams');
 782                 $this->P                 = t3lib_div::_GP('P');
 783                 $this->RTEtsConfigParams = t3lib_div::_GP('RTEtsConfigParams');
 784                 $this->expandPage        = t3lib_div::_GP('expandPage');
 785                 $this->expandFolder      = t3lib_div::_GP('expandFolder');
 786                 $this->PM                = t3lib_div::_GP('PM');
 787
 788                         // Find "mode"
 789                 $this->mode = t3lib_div::_GP('mode');
 790                 if (!$this->mode)       {
 791                         $this->mode = 'rte';
 792                 }
 793                         // Creating backend template object:
 794                 $this->doc = t3lib_div::makeInstance('template');
 795                 $this->doc->backPath = $GLOBALS['BACK_PATH'];
 796                         // Load the Prototype library and browse_links.js
 797                 $this->doc->loadJavascriptLib('contrib/prototype/prototype.js');
 798                 $this->doc->loadJavascriptLib('js/browse_links.js');
 799
 800                         // init hook objects:
 801                 $this->hookObjects = array();
 802                 if (is_array($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['typo3/class.browse_links.php']['browseLinksHook'])) {
 803                         foreach($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['typo3/class.browse_links.php']['browseLinksHook'] as $classData) {
 804                                 $processObject = &t3lib_div::getUserObj($classData);
 805
 806                                 if(!($processObject instanceof t3lib_browseLinksHook)) {
 807                                         throw new UnexpectedValueException('$processObject must implement interface t3lib_browseLinksHook', 1195039394);
 808                                 }
 809
 810                                 $parameters = array();
 811                                 $processObject->init($this, $parameters);
 812                                 $this->hookObjects[] = $processObject;
 813                         }
 814                 }
 815
 816                         // Site URL
 817                 $this->siteURL = t3lib_div::getIndpEnv('TYPO3_SITE_URL');       // Current site url
 818
 819                         // the script to link to
 820                 $this->thisScript = t3lib_div::getIndpEnv('SCRIPT_NAME');
 821
 822                         // init fileProcessor
 823                 $this->fileProcessor = t3lib_div::makeInstance('t3lib_basicFileFunctions');
 824                 $this->fileProcessor->init($GLOBALS['FILEMOUNTS'], $GLOBALS['TYPO3_CONF_VARS']['BE']['fileExtensions']);
 825
 826
 827                         // CurrentUrl - the current link url must be passed around if it exists
 828                 if ($this->mode == 'wizard')    {
 829                         $currentLinkParts = t3lib_div::trimExplode(' ',$this->P['currentValue']);
 830                         $initialCurUrlArray = array (
 831                                 'href'   => $currentLinkParts[0],
 832                                 'target' => $currentLinkParts[1],
 833                                 'class'  => $currentLinkParts[2],
 834                                 'title'  => $currentLinkParts[3],
 835                         );
 836                         $this->curUrlArray = (is_array(t3lib_div::_GP('curUrl'))) ?
 837                                 array_merge($initialCurUrlArray, t3lib_div::_GP('curUrl')) :
 838                                 $initialCurUrlArray;
 839                         $this->curUrlInfo = $this->parseCurUrl($this->siteURL.'?id='.$this->curUrlArray['href'], $this->siteURL);
 840                         if ($this->curUrlInfo['pageid'] == 0 && $this->curUrlArray['href']) { // pageid == 0 means that this is not an internal (page) link
 841                                 if (file_exists(PATH_site.rawurldecode($this->curUrlArray['href'])))    { // check if this is a link to a file
 842                                         if (t3lib_div::isFirstPartOfStr($this->curUrlArray['href'], PATH_site)) {
 843                                                 $currentLinkParts[0] = substr($this->curUrlArray['href'], strlen(PATH_site));
 844                                         }
 845                                         $this->curUrlInfo = $this->parseCurUrl($this->siteURL.$this->curUrlArray['href'], $this->siteURL);
 846                                 } elseif (strstr($this->curUrlArray['href'], '@')) { // check for email link
 847                                         if (t3lib_div::isFirstPartOfStr($this->curUrlArray['href'], 'mailto:')) {
 848                                                 $currentLinkParts[0] = substr($this->curUrlArray['href'], 7);
 849                                         }
 850                                         $this->curUrlInfo = $this->parseCurUrl('mailto:'.$this->curUrlArray['href'], $this->siteURL);
 851                                 } else { // nothing of the above. this is an external link
 852                                         if(strpos($this->curUrlArray['href'], '://') === false) {
 853                                                 $currentLinkParts[0] = 'http://' . $this->curUrlArray['href'];
 854                                         }
 855                                         $this->curUrlInfo = $this->parseCurUrl($currentLinkParts[0], $this->siteURL);
 856                                 }
 857                         } elseif (!$this->curUrlArray['href']) {
 858                                 $this->curUrlInfo = array();
 859                                 $this->act = 'page';
 860                         } else {
 861                                 $this->curUrlInfo = $this->parseCurUrl($this->siteURL.'?id='.$this->curUrlArray['href'], $this->siteURL);
 862                         }
 863                 } else {
 864                         $this->curUrlArray = t3lib_div::_GP('curUrl');
 865                         if ($this->curUrlArray['all'])  {
 866                                 $this->curUrlArray=t3lib_div::get_tag_attributes($this->curUrlArray['all']);
 867                         }
 868                         $this->curUrlInfo=$this->parseCurUrl($this->curUrlArray['href'],$this->siteURL);
 869                 }
 870
 871                         // Determine nature of current url:
 872                 $this->act=t3lib_div::_GP('act');
 873                 if (!$this->act)        {
 874                         $this->act=$this->curUrlInfo['act'];
 875                 }
 876
 877                         // Rich Text Editor specific configuration:
 878                 $addPassOnParams='';
 879                 if ((string)$this->mode == 'rte')       {
 880                         $RTEtsConfigParts = explode(':',$this->RTEtsConfigParams);
 881                         $addPassOnParams.='&RTEtsConfigParams='.rawurlencode($this->RTEtsConfigParams);
 882                         $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE',t3lib_BEfunc::getPagesTSconfig($RTEtsConfigParts[5]));
 883                         $this->thisConfig = t3lib_BEfunc::RTEsetup($RTEsetup['properties'],$RTEtsConfigParts[0],$RTEtsConfigParts[2],$RTEtsConfigParts[4]);
 884                 }
 885
 886                         // Initializing the target value (RTE)
 887                 $this->setTarget = ($this->curUrlArray['target'] != '-') ? $this->curUrlArray['target'] : '';
 888                 if ($this->thisConfig['defaultLinkTarget'] && !isset($this->curUrlArray['target']))     {
 889                         $this->setTarget=$this->thisConfig['defaultLinkTarget'];
 890                 }
 891
 892                         // Initializing the class value (RTE)
 893                 $this->setClass = ($this->curUrlArray['class'] != '-') ? $this->curUrlArray['class'] : '';
 894
 895                         // Initializing the title value (RTE)
 896                 $this->setTitle = ($this->curUrlArray['title'] != '-') ? $this->curUrlArray['title'] : '';
 897
 898                         // BEGIN accumulation of header JavaScript:
 899                 $JScode = '
 900                                 // This JavaScript is primarily for RTE/Link. jumpToUrl is used in the other cases as well...
 901                         var add_href="'.($this->curUrlArray['href']?'&curUrl[href]='.rawurlencode($this->curUrlArray['href']):'').'";
 902                         var add_target="'.($this->setTarget?'&curUrl[target]='.rawurlencode($this->setTarget):'').'";
 903                         var add_class="'.($this->setClass ? '&curUrl[class]='.rawurlencode($this->setClass) : '').'";
 904                         var add_title="'.($this->setTitle?'&curUrl[title]='.rawurlencode($this->setTitle):'').'";
 905                         var add_params="'.($this->bparams?'&bparams='.rawurlencode($this->bparams):'').'";
 906
 907                         var cur_href="'.($this->curUrlArray['href']?$this->curUrlArray['href']:'').'";
 908                         var cur_target="'.($this->setTarget?$this->setTarget:'').'";
 909                         var cur_class = "'.($this->setClass ? $this->setClass : '-').'";
 910                         var cur_title="'.($this->setTitle?$this->setTitle:'').'";
 911
 912                         function browse_links_setTarget(target) {       //
 913                                 cur_target=target;
 914                                 add_target="&curUrl[target]="+escape(target);
 915                         }
 916                         function browse_links_setClass(cssClass) {   //
 917                                 cur_class = cssClass;
 918                                 add_class = "&curUrl[class]=" + escape(cssClass);
 919                         }
 920                         function browse_links_setTitle(title)   {       //
 921                                 cur_title=title;
 922                                 add_title="&curUrl[title]="+escape(title);
 923                         }
 924                         function browse_links_setValue(value) { //
 925                                 cur_href=value;
 926                                 add_href="&curUrl[href]="+value;
 927                         }
 928                 ';
 929
 930                 if ($this->mode == 'wizard')    {       // Functions used, if the link selector is in wizard mode (= TCEforms fields)
 931                         unset($this->P['fieldChangeFunc']['alert']);
 932                         reset($this->P['fieldChangeFunc']);
 933                         $update='';
 934                         while(list($k,$v)=each($this->P['fieldChangeFunc']))    {
 935                                 $update.= '
 936                                 window.opener.'.$v;
 937                         }
 938
 939                         $P2=array();
 940                         $P2['itemName']=$this->P['itemName'];
 941                         $P2['formName']=$this->P['formName'];
 942                         $P2['fieldChangeFunc']=$this->P['fieldChangeFunc'];
 943                         $P2['params']['allowedExtensions']=$this->P['params']['allowedExtensions'];
 944                         $P2['params']['blindLinkOptions']=$this->P['params']['blindLinkOptions'];
 945                         $addPassOnParams.=t3lib_div::implodeArrayForUrl('P',$P2);
 946
 947                         $JScode.='
 948                                 function link_typo3Page(id,anchor)      {       //
 949                                         updateValueInMainForm(id + (anchor ? anchor : ""));
 950                                         close();
 951                                         return false;
 952                                 }
 953                                 function link_folder(folder)    {       //
 954                                         updateValueInMainForm(folder);
 955                                         close();
 956                                         return false;
 957                                 }
 958                                 function link_current() {       //
 959                                         if (cur_href!="http://" && cur_href!="mailto:") {
 960                                                 returnBeforeCleaned = cur_href;
 961                                                 if (returnBeforeCleaned.substr(0, 7) == "http://") {
 962                                                         returnToMainFormValue = returnBeforeCleaned.substr(7);
 963                                                 } else if (returnBeforeCleaned.substr(0, 7) == "mailto:") {
 964                                                         if (returnBeforeCleaned.substr(0, 14) == "mailto:mailto:") {
 965                                                                 returnToMainFormValue = returnBeforeCleaned.substr(14);
 966                                                         } else {
 967                                                                 returnToMainFormValue = returnBeforeCleaned.substr(7);
 968                                                         }
 969                                                 } else {
 970                                                         returnToMainFormValue = returnBeforeCleaned;
 971                                                 }
 972                                                 updateValueInMainForm(returnToMainFormValue);
 973                                                 close();
 974                                         }
 975                                         return false;
 976                                 }
 977                                 function checkReference()       {       //
 978                                         if (window.opener && window.opener.document && window.opener.document.'.$this->P['formName'].' && window.opener.document.'.$this->P['formName'].'["'.$this->P['itemName'].'"] ) {
 979                                                 return window.opener.document.'.$this->P['formName'].'["'.$this->P['itemName'].'"];
 980                                         } else {
 981                                                 close();
 982                                         }
 983                                 }
 984                                 function updateValueInMainForm(input)   {       //
 985                                         var field = checkReference();
 986                                         if (field)      {
 987                                                 if (cur_target == "" && (cur_title != "" || cur_class != "-")) {
 988                                                         cur_target = "-";
 989                                                 }
 990                                                 if (cur_title == "" && cur_class == "-") {
 991                                                         cur_class = "";
 992                                                 }
 993                                                 input = input + " " + cur_target + " " + cur_class + " " + cur_title;
 994                                                 field.value = input;
 995                                                 '.$update.'
 996                                         }
 997                                 }
 998                         ';
 999                 } else {        // Functions used, if the link selector is in RTE mode:
1000                         $JScode.='
1001                                 function link_typo3Page(id,anchor)      {       //
1002                                         var theLink = \''.$this->siteURL.'?id=\'+id+(anchor?anchor:"");
1003                                         self.parent.parent.renderPopup_addLink(theLink, cur_target, cur_class, cur_title);
1004                                         return false;
1005                                 }
1006                                 function link_folder(folder)    {       //
1007                                         var theLink = \''.$this->siteURL.'\'+folder;
1008                                         self.parent.parent.renderPopup_addLink(theLink, cur_target, cur_class, cur_title);
1009                                         return false;
1010                                 }
1011                                 function link_spec(theLink)     {       //
1012                                         self.parent.parent.renderPopup_addLink(theLink, cur_target, cur_class, cur_title);
1013                                         return false;
1014                                 }
1015                                 function link_current() {       //
1016                                         if (cur_href!="http://" && cur_href!="mailto:") {
1017                                                 self.parent.parent.renderPopup_addLink(cur_href, cur_target, cur_class, cur_title);
1018                                         }
1019                                         return false;
1020                                 }
1021                         ';
1022                 }
1023
1024                         // General "jumpToUrl" function:
1025                 $JScode.='
1026                         function jumpToUrl(URL,anchor)  {       //
1027                                 var add_act = URL.indexOf("act=")==-1 ? "&act='.$this->act.'" : "";
1028                                 var add_mode = URL.indexOf("mode=")==-1 ? "&mode='.$this->mode.'" : "";
1029                                 var theLocation = URL + add_act + add_mode + add_href + add_target + add_class + add_title + add_params'.($addPassOnParams?'+"'.$addPassOnParams.'"':'').'+(anchor?anchor:"");
1030                                 window.location.href = theLocation;
1031                                 return false;
1032                         }
1033                 ';
1034
1035
1036                 /**
1037                  * Splits parts of $this->bparams
1038                  * @see $bparams
1039                  */
1040                 $pArr = explode('|',$this->bparams);
1041
1042                         // This is JavaScript especially for the TBE Element Browser!
1043                 $formFieldName = 'data['.$pArr[0].']['.$pArr[1].']['.$pArr[2].']';
1044
1045                         // insertElement - Call check function (e.g. for uniqueness handling):
1046                 if ($pArr[4] && $pArr[5]) {
1047                         $JScodeCheck = '
1048                                         // Call a check function in the opener window (e.g. for uniqueness handling):
1049                                 if (parent.window.opener) {
1050                                         var res = parent.window.opener.'.$pArr[5].'("'.addslashes($pArr[4]).'",table,uid,type);
1051                                         if (!res.passed) {
1052                                                 if (res.message) alert(res.message);
1053                                                 performAction = false;
1054                                         }
1055                                 } else {
1056                                         alert("Error - reference to main window is not set properly!");
1057                                         parent.close();
1058                                 }
1059                         ';
1060                 }
1061                         // insertElement - Call helper function:
1062                 if ($pArr[4] && $pArr[6]) {
1063                         $JScodeHelper = '
1064                                                 // Call helper function to manage data in the opener window:
1065                                         if (parent.window.opener) {
1066                                                 parent.window.opener.'.$pArr[6].'("'.addslashes($pArr[4]).'",table,uid,type,"'.addslashes($pArr[0]).'");
1067                                         } else {
1068                                                 alert("Error - reference to main window is not set properly!");
1069                                                 parent.close();
1070                                         }
1071                         ';
1072                 }
1073                         // insertElement - perform action commands:
1074                 if ($pArr[4] && $pArr[7]) {
1075                                 // Call user defined action function:
1076                         $JScodeAction = '
1077                                         if (parent.window.opener) {
1078                                                 parent.window.opener.'.$pArr[7].'("'.addslashes($pArr[4]).'",table,uid,type);
1079                                                 focusOpenerAndClose(close);
1080                                         } else {
1081                                                 alert("Error - reference to main window is not set properly!");
1082                                                 parent.close();
1083                                         }
1084                         ';
1085                 } else if ($pArr[0] && !$pArr[1] && !$pArr[2]) {
1086                         $JScodeAction = '
1087                                         addElement(filename,table+"_"+uid,fp,close);
1088                         ';
1089                 } else {
1090                         $JScodeAction = '
1091                                         if (setReferences()) {
1092                                                 parent.window.opener.group_change("add","'.$pArr[0].'","'.$pArr[1].'","'.$pArr[2].'",elRef,targetDoc);
1093                                         } else {
1094                                                 alert("Error - reference to main window is not set properly!");
1095                                         }
1096                                         focusOpenerAndClose(close);
1097                         ';
1098                 }
1099
1100                 $JScode.='
1101                         var elRef="";
1102                         var targetDoc="";
1103
1104                         function launchView(url)        {       //
1105                                 var thePreviewWindow="";
1106                                 thePreviewWindow = window.open("'.$BACK_PATH.'show_item.php?table="+url,"ShowItem","height=300,width=410,status=0,menubar=0,resizable=0,location=0,directories=0,scrollbars=1,toolbar=0");
1107                                 if (thePreviewWindow && thePreviewWindow.focus) {
1108                                         thePreviewWindow.focus();
1109                                 }
1110                         }
1111                         function setReferences()        {       //
1112                                 if (parent.window.opener && parent.window.opener.content && parent.window.opener.content.document.editform && parent.window.opener.content.document.editform["'.$formFieldName.'"]) {
1113                                         targetDoc = parent.window.opener.content.document;
1114                                         elRef = targetDoc.editform["'.$formFieldName.'"];
1115                                         return true;
1116                                 } else {
1117                                         return false;
1118                                 }
1119                         }
1120                         function insertElement(table, uid, type, filename,fp,filetype,imagefile,action, close)  {       //
1121                                 var performAction = true;
1122                                 '.$JScodeCheck.'
1123                                         // Call performing function and finish this action:
1124                                 if (performAction) {
1125                                                 '.$JScodeHelper.$JScodeAction.'
1126                                 }
1127                                 return false;
1128                         }
1129                         function addElement(elName,elValue,altElValue,close)    {       //
1130                                 if (parent.window.opener && parent.window.opener.setFormValueFromBrowseWin)     {
1131                                         parent.window.opener.setFormValueFromBrowseWin("'.$pArr[0].'",altElValue?altElValue:elValue,elName);
1132                                         focusOpenerAndClose(close);
1133                                 } else {
1134                                         alert("Error - reference to main window is not set properly!");
1135                                         parent.close();
1136                                 }
1137                         }
1138                         function focusOpenerAndClose(close)     {       //
1139                                 BrowseLinks.focusOpenerAndClose(close);
1140                         }
1141                 ';
1142
1143                         // Finally, add the accumulated JavaScript to the template object:
1144                 $this->doc->JScode.= $this->doc->wrapScriptTags($JScode);
1145
1146                         // Debugging:
1147                 if (FALSE) debug(array(
1148                         'pointer' => $this->pointer,
1149                         'act' => $this->act,
1150                         'mode' => $this->mode,
1151                         'curUrlInfo' => $this->curUrlInfo,
1152                         'curUrlArray' => $this->curUrlArray,
1153                         'P' => $this->P,
1154                         'bparams' => $this->bparams,
1155                         'RTEtsConfigParams' => $this->RTEtsConfigParams,
1156                         'expandPage' => $this->expandPage,
1157                         'expandFolder' => $this->expandFolder,
1158                         'PM' => $this->PM,
1159                 ),'Internal variables of Script Class:');
1160         }
1161
1162
1163         /**
1164          * Session data for this class can be set from outside with this method.
1165          * Call after init()
1166          *
1167          * @param       array           Session data array
1168          * @return      array           Session data and boolean which indicates that data needs to be stored in session because it's changed
1169          */
1170         function processSessionData($data) {
1171                 $store = false;
1172
1173                 switch((string)$this->mode)     {
1174                         case 'db':
1175                                 if (isset($this->expandPage))   {
1176                                         $data['expandPage']=$this->expandPage;
1177                                         $store = true;
1178                                 } else {
1179                                         $this->expandPage=$data['expandPage'];
1180                                 }
1181                         break;
1182                         case 'file':
1183                         case 'filedrag':
1184                         case 'folder':
1185                                 if (isset($this->expandFolder)) {
1186                                         $data['expandFolder']=$this->expandFolder;
1187                                         $store = true;
1188                                 } else {
1189                                         $this->expandFolder=$data['expandFolder'];
1190                                 }
1191                         break;
1192                 }
1193
1194                 return array($data, $store);
1195         }
1196
1197
1198
1199
1200         /******************************************************************
1201          *
1202          * Main functions
1203          *
1204          ******************************************************************/
1205
1206         /**
1207          * Rich Text Editor (RTE) link selector (MAIN function)
1208          * Generates the link selector for the Rich Text Editor.
1209          * Can also be used to select links for the TCEforms (see $wiz)
1210          *
1211          * @param       boolean         If set, the "remove link" is not shown in the menu: Used for the "Select link" wizard which is used by the TCEforms
1212          * @return      string          Modified content variable.
1213          */
1214         function main_rte($wiz=0)       {
1215                 global $LANG, $BACK_PATH;
1216
1217                         // Starting content:
1218                 $content=$this->doc->startPage('RTE link');
1219
1220                         // Initializing the action value, possibly removing blinded values etc:
1221                 $allowedItems = array_diff(
1222                         explode(',','page,file,folder,url,mail,spec'),
1223                         t3lib_div::trimExplode(',',$this->thisConfig['blindLinkOptions'],1)
1224                 );
1225                 $allowedItems = array_diff(
1226                         $allowedItems,
1227                         t3lib_div::trimExplode(',',$this->P['params']['blindLinkOptions'])
1228                 );
1229
1230                         //call hook for extra options
1231                 foreach($this->hookObjects as $hookObject) {
1232                         $allowedItems = $hookObject->addAllowedItems($allowedItems);
1233                 }
1234
1235                 reset($allowedItems);
1236                 if (!in_array($this->act,$allowedItems))        $this->act = current($allowedItems);
1237
1238                         // Making menu in top:
1239                 $menuDef = array();
1240                 if (!$wiz)      {
1241                         $menuDef['removeLink']['isActive'] = $this->act=='removeLink';
1242                         $menuDef['removeLink']['label'] = $LANG->getLL('removeLink',1);
1243                         $menuDef['removeLink']['url'] = '#';
1244                         $menuDef['removeLink']['addParams'] = 'onclick="self.parent.parent.renderPopup_unLink();return false;"';
1245                 }
1246                 if (in_array('page',$allowedItems)) {
1247                         $menuDef['page']['isActive'] = $this->act=='page';
1248                         $menuDef['page']['label'] = $LANG->getLL('page',1);
1249                         $menuDef['page']['url'] = '#';
1250                         $menuDef['page']['addParams'] = 'onclick="jumpToUrl(\'?act=page\');return false;"';
1251                 }
1252                 if (in_array('file',$allowedItems)){
1253                         $menuDef['file']['isActive'] = $this->act=='file';
1254                         $menuDef['file']['label'] = $LANG->getLL('file',1);
1255                         $menuDef['file']['url'] = '#';
1256                         $menuDef['file']['addParams'] = 'onclick="jumpToUrl(\'?act=file\');return false;"';
1257                 }
1258                 if (in_array('folder',$allowedItems)){
1259                         $menuDef['folder']['isActive']  = $this->act == 'folder';
1260                         $menuDef['folder']['label']     = $LANG->getLL('folder', 1);
1261                         $menuDef['folder']['url']       = '#';
1262                         $menuDef['folder']['addParams'] = 'onclick="jumpToUrl(\'?act=folder\');return false;"';
1263                 }
1264                 if (in_array('url',$allowedItems)) {
1265                         $menuDef['url']['isActive'] = $this->act=='url';
1266                         $menuDef['url']['label'] = $LANG->getLL('extUrl',1);
1267                         $menuDef['url']['url'] = '#';
1268                         $menuDef['url']['addParams'] = 'onclick="jumpToUrl(\'?act=url\');return false;"';
1269                 }
1270                 if (in_array('mail',$allowedItems)) {
1271                         $menuDef['mail']['isActive'] = $this->act=='mail';
1272                         $menuDef['mail']['label'] = $LANG->getLL('email',1);
1273                         $menuDef['mail']['url'] = '#';
1274                         $menuDef['mail']['addParams'] = 'onclick="jumpToUrl(\'?act=mail\');return false;"';
1275                 }
1276                 if (is_array($this->thisConfig['userLinks.']) && in_array('spec',$allowedItems)) {
1277                         $menuDef['spec']['isActive'] = $this->act=='spec';
1278                         $menuDef['spec']['label'] = $LANG->getLL('special',1);
1279                         $menuDef['spec']['url'] = '#';
1280                         $menuDef['spec']['addParams'] = 'onclick="jumpToUrl(\'?act=spec\');return false;"';
1281                 }
1282
1283                         // call hook for extra options
1284                 foreach($this->hookObjects as $hookObject) {
1285                         $menuDef = $hookObject->modifyMenuDefinition($menuDef);
1286                 }
1287
1288                 $content .= $this->doc->getTabMenuRaw($menuDef);
1289
1290                         // Adding the menu and header to the top of page:
1291                 $content.=$this->printCurrentUrl($this->curUrlInfo['info']).'<br />';
1292
1293                         // Depending on the current action we will create the actual module content for selecting a link:
1294                 switch($this->act)      {
1295                         case 'mail':
1296                                 $extUrl='
1297
1298                         <!--
1299                                 Enter mail address:
1300                         -->
1301                                         <form action="" name="lurlform" id="lurlform">
1302                                                 <table border="0" cellpadding="2" cellspacing="1" id="typo3-linkMail">
1303                                                         <tr>
1304                                                                 <td style="width: 96px;">' . $GLOBALS['LANG']->getLL('emailAddress', 1) . ':</td>
1305                                                                 <td><input type="text" name="lemail"'.$this->doc->formWidth(20).' value="'.htmlspecialchars($this->curUrlInfo['act']=='mail'?$this->curUrlInfo['info']:'').'" /> '.
1306                                                                         '<input type="submit" value="' . $GLOBALS['LANG']->getLL('setLink', 1) . '" onclick="browse_links_setTarget(\'\');browse_links_setValue(\'mailto:\'+document.lurlform.lemail.value); return link_current();" /></td>
1307                                                         </tr>
1308                                                 </table>
1309                                         </form>';
1310                                 $content.=$extUrl;
1311                         break;
1312                         case 'url':
1313                                 $extUrl='
1314
1315                         <!--
1316                                 Enter External URL:
1317                         -->
1318                                         <form action="" name="lurlform" id="lurlform">
1319                                                 <table border="0" cellpadding="2" cellspacing="1" id="typo3-linkURL">
1320                                                         <tr>
1321                                                                 <td style="width: 96px;">URL:</td>
1322                                                                 <td><input type="text" name="lurl"'.$this->doc->formWidth(30).' value="'.htmlspecialchars($this->curUrlInfo['act']=='url'?$this->curUrlInfo['info']:'http://').'" /> '.
1323                                                                         '<input type="submit" value="' . $GLOBALS['LANG']->getLL('setLink', 1) . '" onclick="browse_links_setValue(document.lurlform.lurl.value); return link_current();" /></td>
1324                                                         </tr>
1325                                                 </table>
1326                                         </form>';
1327                                 $content.=$extUrl;
1328                         break;
1329                         case 'file':
1330                         case 'folder':
1331                                 $foldertree             = t3lib_div::makeInstance('rteFolderTree');
1332                                 $foldertree->thisScript = $this->thisScript;
1333                                 $tree                   = $foldertree->getBrowsableTree();
1334
1335                                 if (!$this->curUrlInfo['value'] || $this->curUrlInfo['act'] != $this->act)      {
1336                                         $cmpPath = '';
1337                                 } elseif (substr(trim($this->curUrlInfo['info']), -1) != '/')   {
1338                                         $cmpPath = PATH_site.dirname($this->curUrlInfo['info']).'/';
1339                                         if (!isset($this->expandFolder)) {
1340                                                 $this->expandFolder = $cmpPath;
1341                                         }
1342                                 } else {
1343                                         $cmpPath = PATH_site.$this->curUrlInfo['info'];
1344                                         if (!isset($this->expandFolder) && $this->curUrlInfo['act'] == 'folder') {
1345                                                 $this->expandFolder = $cmpPath;
1346                                         }
1347                                 }
1348
1349                                 list(, , $specUid) = explode('_', $this->PM);
1350                                 $files = $this->expandFolder(
1351                                         $foldertree->specUIDmap[$specUid],
1352                                         $this->P['params']['allowedExtensions']
1353                                 );
1354                                 $content.= '
1355
1356                         <!--
1357                                 Wrapper table for folder tree / file/folder list:
1358                         -->
1359                                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-linkFiles">
1360                                                 <tr>
1361                                                         <td class="c-wCell" valign="top">'.$this->barheader($GLOBALS['LANG']->getLL('folderTree').':').$tree.'</td>
1362                                                         <td class="c-wCell" valign="top">'.$files.'</td>
1363                                                 </tr>
1364                                         </table>
1365                                         ';
1366                         break;
1367                         case 'spec':
1368                                 if (is_array($this->thisConfig['userLinks.']))  {
1369                                         $subcats=array();
1370                                         $v=$this->thisConfig['userLinks.'];
1371                                         reset($v);
1372                                         while(list($k2)=each($v))       {
1373                                                 $k2i = intval($k2);
1374                                                 if (substr($k2,-1)=='.' && is_array($v[$k2i.'.']))      {
1375
1376                                                                 // Title:
1377                                                         $title = trim($v[$k2i]);
1378                                                         if (!$title)    {
1379                                                                 $title=$v[$k2i.'.']['url'];
1380                                                         } else {
1381                                                                 $title=$LANG->sL($title);
1382                                                         }
1383                                                                 // Description:
1384                                                         $description=$v[$k2i.'.']['description'] ? $LANG->sL($v[$k2i.'.']['description'],1).'<br />' : '';
1385
1386                                                                 // URL + onclick event:
1387                                                         $onClickEvent='';
1388                                                         if (isset($v[$k2i.'.']['target']))      $onClickEvent.="browse_links_setTarget('".$v[$k2i.'.']['target']."');";
1389                                                         $v[$k2i.'.']['url'] = str_replace('###_URL###',$this->siteURL,$v[$k2i.'.']['url']);
1390                                                         if (substr($v[$k2i.'.']['url'],0,7)=='http://' || substr($v[$k2i.'.']['url'],0,7)=='mailto:')   {
1391                                                                 $onClickEvent.="cur_href=unescape('".rawurlencode($v[$k2i.'.']['url'])."');link_current();";
1392                                                         } else {
1393                                                                 $onClickEvent.="link_spec(unescape('".$this->siteURL.rawurlencode($v[$k2i.'.']['url'])."'));";
1394                                                         }
1395
1396                                                                 // Link:
1397                                                         $A=array('<a href="#" onclick="'.htmlspecialchars($onClickEvent).'return false;">','</a>');
1398
1399                                                                 // Adding link to menu of user defined links:
1400                                                         $subcats[$k2i]='
1401                                                                 <tr>
1402                                                                         <td class="bgColor4">'.$A[0].'<strong>'.htmlspecialchars($title).($this->curUrlInfo['info']==$v[$k2i.'.']['url']?'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/blinkarrow_right.gif','width="5" height="9"').' class="c-blinkArrowR" alt="" />':'').'</strong><br />'.$description.$A[1].'</td>
1403                                                                 </tr>';
1404                                                 }
1405                                         }
1406
1407                                                 // Sort by keys:
1408                                         ksort($subcats);
1409
1410                                                 // Add menu to content:
1411                                         $content.= '
1412
1413                         <!--
1414                                 Special userdefined menu:
1415                         -->
1416                                                 <table border="0" cellpadding="1" cellspacing="1" id="typo3-linkSpecial">
1417                                                         <tr>
1418                                                                 <td class="bgColor5" class="c-wCell" valign="top"><strong>'.$LANG->getLL('special',1).'</strong></td>
1419                                                         </tr>
1420                                                         '.implode('',$subcats).'
1421                                                 </table>
1422                                                 ';
1423                                 }
1424                         break;
1425                         case 'page':
1426                                 $pagetree = t3lib_div::makeInstance('rtePageTree');
1427                                 $pagetree->thisScript = $this->thisScript;
1428                                 $tree=$pagetree->getBrowsableTree();
1429                                 $cElements = $this->expandPage();
1430                                 $content.= '
1431
1432                         <!--
1433                                 Wrapper table for page tree / record list:
1434                         -->
1435                                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-linkPages">
1436                                                 <tr>
1437                                                         <td class="c-wCell" valign="top">'.$this->barheader($GLOBALS['LANG']->getLL('pageTree').':').$tree.'</td>
1438                                                         <td class="c-wCell" valign="top">'.$cElements.'</td>
1439                                                 </tr>
1440                                         </table>
1441                                         ';
1442                         break;
1443                         default:
1444                                         //call hook
1445                                 foreach($this->hookObjects as $hookObject) {
1446                                         $content .= $hookObject->getTab($this->act);
1447                                 }
1448                         break;
1449                 }
1450
1451                 $content .= '
1452
1453                         <!--
1454                                 Selecting class for link:
1455                         -->
1456                                 <form action="" name="lclassform" id="lclassform">
1457                                         <table border="0" cellpadding="2" cellspacing="1" id="typo3-linkClass">
1458                                                 <tr>
1459                                                         <td style="width: 96px;">' . $GLOBALS['LANG']->getLL('class', 1) . '</td>
1460                                                         <td><input type="text" name="lclass" onchange="browse_links_setClass(this.value);" value="' . htmlspecialchars($this->setClass) . '"' . $this->doc->formWidth(10) . ' /></td>
1461                                                 </tr>
1462                                         </table>
1463                                 </form>
1464
1465                         <!--
1466                                 Selecting title for link:
1467                         -->
1468                                 <form action="" name="ltitleform" id="ltitleform">
1469                                         <table border="0" cellpadding="2" cellspacing="1" id="typo3-linkTitle">
1470                                                 <tr>
1471                                                         <td style="width: 96px;">' . $GLOBALS['LANG']->getLL('title', 1) . '</td>
1472                                                         <td><input type="text" name="ltitle" onchange="browse_links_setTitle(this.value);" value="' . htmlspecialchars($this->setTitle) . '"' . $this->doc->formWidth(10) . ' /></td>
1473                                                 </tr>
1474                                         </table>
1475                                 </form>
1476 ';
1477
1478                         // Target:
1479                 if ($this->act!='mail') {
1480                         $ltarget='
1481
1482
1483
1484                         <!--
1485                                 Selecting target for link:
1486                         -->
1487                                 <form action="" name="ltargetform" id="ltargetform">
1488                                         <table border="0" cellpadding="2" cellspacing="1" id="typo3-linkTarget">
1489                                                 <tr>
1490                                                         <td>'.$GLOBALS['LANG']->getLL('target',1).':</td>
1491                                                         <td><input type="text" name="ltarget" onchange="browse_links_setTarget(this.value);" value="' . htmlspecialchars($this->setTarget) . '"' . $this->doc->formWidth(10) . ' /></td>
1492                                                         <td>
1493                                                                 <select name="ltarget_type" onchange="browse_links_setTarget(this.options[this.selectedIndex].value);document.ltargetform.ltarget.value=this.options[this.selectedIndex].value;this.selectedIndex=0;">
1494                                                                         <option></option>
1495                                                                         <option value="_top">'.$GLOBALS['LANG']->getLL('top',1).'</option>
1496                                                                         <option value="_blank">'.$GLOBALS['LANG']->getLL('newWindow',1).'</option>
1497                                                                 </select>
1498                                                         </td>
1499                                                         <td>';
1500                         if (($this->curUrlInfo['act'] == 'page' || $this->curUrlInfo['act'] == 'file' || $this->curUrlInfo['act'] == 'folder') && $this->curUrlArray['href'] && $this->curUrlInfo['act'] == $this->act) {
1501                                 $ltarget.='
1502                                                         <input type="submit" value="'.$GLOBALS['LANG']->getLL('update',1).'" onclick="return link_current();" />';
1503                         }
1504
1505                         $selectJS = '
1506                                 if (document.ltargetform.popup_width.options[document.ltargetform.popup_width.selectedIndex].value>0 && document.ltargetform.popup_height.options[document.ltargetform.popup_height.selectedIndex].value>0)     {
1507                                         document.ltargetform.ltarget.value = document.ltargetform.popup_width.options[document.ltargetform.popup_width.selectedIndex].value+"x"+document.ltargetform.popup_height.options[document.ltargetform.popup_height.selectedIndex].value;
1508                                         browse_links_setTarget(document.ltargetform.ltarget.value);
1509                                         browse_links_setClass(document.lclassform.lclass.value);
1510                                         browse_links_setTitle(document.ltitleform.ltitle.value);
1511                                         document.ltargetform.popup_width.selectedIndex=0;
1512                                         document.ltargetform.popup_height.selectedIndex=0;
1513                                 }
1514                         ';
1515
1516                         $ltarget.='             </td>
1517                                                 </tr>
1518                                                 <tr>
1519                                                         <td>'.$GLOBALS['LANG']->getLL('target_popUpWindow',1).':</td>
1520                                                         <td colspan="3">
1521                                                                 <select name="popup_width" onchange="'.htmlspecialchars($selectJS).'">
1522                                                                         <option value="0">'.$GLOBALS['LANG']->getLL('target_popUpWindow_width',1).'</option>
1523                                                                         <option value="300">300</option>
1524                                                                         <option value="400">400</option>
1525                                                                         <option value="500">500</option>
1526                                                                         <option value="600">600</option>
1527                                                                         <option value="700">700</option>
1528                                                                         <option value="800">800</option>
1529                                                                 </select>
1530                                                                 x
1531                                                                 <select name="popup_height" onchange="'.htmlspecialchars($selectJS).'">
1532                                                                         <option value="0">'.$GLOBALS['LANG']->getLL('target_popUpWindow_height',1).'</option>
1533                                                                         <option value="200">200</option>
1534                                                                         <option value="300">300</option>
1535                                                                         <option value="400">400</option>
1536                                                                         <option value="500">500</option>
1537                                                                         <option value="600">600</option>
1538                                                                 </select>
1539                                                         </td>
1540                                                 </tr>
1541                                         </table>
1542                                 </form>';
1543
1544                                 // Add "target selector" box to content:
1545                         $content.=$ltarget;
1546
1547                                 // Add some space
1548                         $content.='<br /><br />';
1549                 }
1550
1551                         // End page, return content:
1552                 $content.= $this->doc->endPage();
1553                 $content = $this->doc->insertStylesAndJS($content);
1554                 return $content;
1555         }
1556
1557         /**
1558          * TYPO3 Element Browser: Showing a page tree and allows you to browse for records
1559          *
1560          * @return      string          HTML content for the module
1561          */
1562         function main_db()      {
1563
1564                         // Starting content:
1565                 $content=$this->doc->startPage('TBE record selector');
1566
1567                         // Init variable:
1568                 $pArr = explode('|',$this->bparams);
1569
1570                         // Making the browsable pagetree:
1571                 $pagetree = t3lib_div::makeInstance('TBE_PageTree');
1572                 $pagetree->thisScript=$this->thisScript;
1573                 $pagetree->ext_pArrPages = !strcmp($pArr[3],'pages')?1:0;
1574                 $pagetree->ext_showNavTitle = $GLOBALS['BE_USER']->getTSConfigVal('options.pageTree.showNavTitle');
1575                 $pagetree->addField('nav_title');
1576                 $tree=$pagetree->getBrowsableTree();
1577
1578                         // Making the list of elements, if applicable:
1579                 $cElements = $this->TBE_expandPage($pArr[3]);
1580
1581                         // Putting the things together, side by side:
1582                 $content.= '
1583
1584                         <!--
1585                                 Wrapper table for page tree / record list:
1586                         -->
1587                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-EBrecords">
1588                                 <tr>
1589                                         <td class="c-wCell" valign="top">'.$this->barheader($GLOBALS['LANG']->getLL('pageTree').':').$tree.'</td>
1590                                         <td class="c-wCell" valign="top">'.$cElements.'</td>
1591                                 </tr>
1592                         </table>
1593                         ';
1594
1595                         // Add some space
1596                 $content.='<br /><br />';
1597
1598                         // End page, return content:
1599                 $content.= $this->doc->endPage();
1600                 $content = $this->doc->insertStylesAndJS($content);
1601                 return $content;
1602         }
1603
1604         /**
1605          * TYPO3 Element Browser: Showing a folder tree, allowing you to browse for files.
1606          *
1607          * @return      string          HTML content for the module
1608          */
1609         function main_file()    {
1610                 global $BE_USER;
1611
1612                         // Starting content:
1613                 $content.=$this->doc->startPage('TBE file selector');
1614
1615                         // Init variable:
1616                 $pArr = explode('|',$this->bparams);
1617
1618                         // Create upload/create folder forms, if a path is given:
1619                 $path=$this->expandFolder;
1620                 if (!$path || !@is_dir($path))  {
1621                                 // The closest TEMP-path is found
1622                         $path = $this->fileProcessor->findTempFolder().'/';
1623                 }
1624                 if ($path!='/' && @is_dir($path)) {
1625                         $uploadForm=$this->uploadForm($path);
1626                         $createFolder=$this->createFolder($path);
1627                 } else {
1628                         $createFolder='';
1629                         $uploadForm='';
1630                 }
1631                 if ($BE_USER->getTSConfigVal('options.uploadFieldsInTopOfEB'))  $content.=$uploadForm;
1632
1633                         // Getting flag for showing/not showing thumbnails:
1634                 $noThumbs = $GLOBALS['BE_USER']->getTSConfigVal('options.noThumbsInEB');
1635
1636                 if (!$noThumbs) {
1637                                 // MENU-ITEMS, fetching the setting for thumbnails from File>List module:
1638                         $_MOD_MENU = array('displayThumbs' => '');
1639                         $_MCONF['name']='file_list';
1640                         $_MOD_SETTINGS = t3lib_BEfunc::getModuleData($_MOD_MENU, t3lib_div::_GP('SET'), $_MCONF['name']);
1641                         $addParams = '&act='.$this->act.'&mode='.$this->mode.'&expandFolder='.rawurlencode($path).'&bparams='.rawurlencode($this->bparams);
1642                         $thumbNailCheck = t3lib_BEfunc::getFuncCheck('','SET[displayThumbs]',$_MOD_SETTINGS['displayThumbs'],$this->thisScript,$addParams,'id="checkDisplayThumbs"').' <label for="checkDisplayThumbs">'.$GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_mod_file_list.php:displayThumbs',1).'</label>';
1643                 } else {
1644                         $thumbNailCheck='';
1645                 }
1646                 $noThumbs = $noThumbs ? $noThumbs : !$_MOD_SETTINGS['displayThumbs'];
1647
1648                         // Create folder tree:
1649                 $foldertree = t3lib_div::makeInstance('TBE_FolderTree');
1650                 $foldertree->thisScript=$this->thisScript;
1651                 $foldertree->ext_noTempRecyclerDirs = ($this->mode == 'filedrag');
1652                 $tree=$foldertree->getBrowsableTree();
1653
1654                 list(,,$specUid) = explode('_',$this->PM);
1655
1656                 if ($this->mode=='filedrag')    {
1657                         $files = $this->TBE_dragNDrop($foldertree->specUIDmap[$specUid],$pArr[3]);
1658                 } else {
1659                         $files = $this->TBE_expandFolder($foldertree->specUIDmap[$specUid],$pArr[3],$noThumbs);
1660                 }
1661
1662                         // Putting the parts together, side by side:
1663                 $content.= '
1664
1665                         <!--
1666                                 Wrapper table for folder tree / file list:
1667                         -->
1668                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-EBfiles">
1669                                 <tr>
1670                                         <td class="c-wCell" valign="top">'.$this->barheader($GLOBALS['LANG']->getLL('folderTree').':').$tree.'</td>
1671                                         <td class="c-wCell" valign="top">'.$files.'</td>
1672                                 </tr>
1673                         </table>
1674                         ';
1675                 $content.= $thumbNailCheck;
1676
1677                         // Adding create folder + upload forms if applicable:
1678                 if (!$BE_USER->getTSConfigVal('options.uploadFieldsInTopOfEB')) $content.=$uploadForm;
1679                 if ($BE_USER->isAdmin() || $BE_USER->getTSConfigVal('options.createFoldersInEB'))       $content.=$createFolder;
1680
1681                         // Add some space
1682                 $content.='<br /><br />';
1683
1684                         // Setup indexed elements:
1685                 $this->doc->JScode.= $this->doc->wrapScriptTags('BrowseLinks.addElements(' . json_encode($this->elements) . ');');
1686                         // Ending page, returning content:
1687                 $content.= $this->doc->endPage();
1688                 $content = $this->doc->insertStylesAndJS($content);
1689
1690                 return $content;
1691         }
1692
1693         /**
1694          * TYPO3 Element Browser: Showing a folder tree, allowing you to browse for folders.
1695          *
1696          * @return      string          HTML content for the module
1697          */
1698         function main_folder() {
1699                 global $BE_USER;
1700
1701                         // Starting content:
1702                 $content = $this->doc->startPage('TBE folder selector');
1703
1704                         // Init variable:
1705                 $parameters = explode('|', $this->bparams);
1706
1707
1708                 $path = $this->expandFolder;
1709                 if (!$path || !@is_dir($path)) {
1710                                 // The closest TEMP-path is found
1711                         $path = $this->fileProcessor->findTempFolder().'/';
1712                 }
1713                 if ($path != '/' && @is_dir($path)) {
1714                         $createFolder = $this->createFolder($path);
1715                 } else {
1716                         $createFolder='';
1717                 }
1718
1719                         // Create folder tree:
1720                 $foldertree                         = t3lib_div::makeInstance('TBE_FolderTree');
1721                 $foldertree->thisScript             = $this->thisScript;
1722                 $foldertree->ext_noTempRecyclerDirs = ($this->mode == 'filedrag');
1723                 $tree                                = $foldertree->getBrowsableTree(false);
1724
1725                 list(, , $specUid) = explode('_', $this->PM);
1726
1727                 if($this->mode == 'filedrag') {
1728                         $folders = $this->TBE_dragNDrop(
1729                                 $foldertree->specUIDmap[$specUid],
1730                                 $parameters[3]
1731                         );
1732                 } else {
1733                         $folders = $this->TBE_expandSubFolders($foldertree->specUIDmap[$specUid]);
1734                 }
1735
1736                         // Putting the parts together, side by side:
1737                 $content.= '
1738
1739                         <!--
1740                                 Wrapper table for folder tree / folder list:
1741                         -->
1742                         <table border="0" cellpadding="0" cellspacing="0" id="typo3-EBfiles">
1743                                 <tr>
1744                                         <td class="c-wCell" valign="top">'.$this->barheader($GLOBALS['LANG']->getLL('folderTree').':').$tree.'</td>
1745                                         <td class="c-wCell" valign="top">'.$folders.'</td>
1746                                 </tr>
1747                         </table>
1748                         ';
1749
1750                         // Adding create folder if applicable:
1751                 if($BE_USER->isAdmin() || $BE_USER->getTSConfigVal('options.createFoldersInEB')) {
1752                         $content .= $createFolder;
1753                 }
1754
1755                         // Add some space
1756                 $content .= '<br /><br />';
1757
1758                         // Ending page, returning content:
1759                 $content.= $this->doc->endPage();
1760                 $content = $this->doc->insertStylesAndJS($content);
1761
1762                 return $content;
1763         }
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781         /******************************************************************
1782          *
1783          * Record listing
1784          *
1785          ******************************************************************/
1786         /**
1787          * For RTE: This displays all content elements on a page and lets you create a link to the element.
1788          *
1789          * @return      string          HTML output. Returns content only if the ->expandPage value is set (pointing to a page uid to show tt_content records from ...)
1790          */
1791         function expandPage()   {
1792                 global $BE_USER, $BACK_PATH;
1793
1794                 $out='';
1795                 $expPageId = $this->expandPage;         // Set page id (if any) to expand
1796
1797                         // If there is an anchor value (content element reference) in the element reference, then force an ID to expand:
1798                 if (!$this->expandPage && $this->curUrlInfo['cElement'])        {
1799                         $expPageId = $this->curUrlInfo['pageid'];       // Set to the current link page id.
1800                 }
1801
1802                         // Draw the record list IF there is a page id to expand:
1803                 if ($expPageId && t3lib_div::testInt($expPageId) && $BE_USER->isInWebMount($expPageId)) {
1804
1805                                 // Set header:
1806                         $out.=$this->barheader($GLOBALS['LANG']->getLL('contentElements').':');
1807
1808                                 // Create header for listing, showing the page title/icon:
1809                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
1810                         $mainPageRec = t3lib_BEfunc::getRecordWSOL('pages',$expPageId);
1811                         $picon = t3lib_iconWorks::getIconImage('pages', $mainPageRec, $BACK_PATH, '');
1812                         $picon.= htmlspecialchars(t3lib_div::fixed_lgd_cs($mainPageRec['title'],$titleLen));
1813                         $out.=$picon.'<br />';
1814
1815                                 // Look up tt_content elements from the expanded page:
1816                         $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
1817                                                         'uid,header,hidden,starttime,endtime,fe_group,CType,colpos,bodytext',
1818                                                         'tt_content',
1819                                                         'pid='.intval($expPageId).
1820                                                                 t3lib_BEfunc::deleteClause('tt_content').
1821                                                                 t3lib_BEfunc::versioningPlaceholderClause('tt_content'),
1822                                                         '',
1823                                                         'colpos,sorting'
1824                                                 );
1825                         $cc = $GLOBALS['TYPO3_DB']->sql_num_rows($res);
1826
1827                                 // Traverse list of records:
1828                         $c=0;
1829                         while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res))       {
1830                                 $c++;
1831                                 $icon=t3lib_iconWorks::getIconImage('tt_content',$row,$BACK_PATH,'');
1832                                 if ($this->curUrlInfo['act']=='page' && $this->curUrlInfo['cElement']==$row['uid'])     {
1833                                         $arrCol='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/blinkarrow_left.gif','width="5" height="9"').' class="c-blinkArrowL" alt="" />';
1834                                 } else {
1835                                         $arrCol='';
1836                                 }
1837                                         // Putting list element HTML together:
1838                                 $out.='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/join'.($c==$cc?'bottom':'').'.gif','width="18" height="16"').' alt="" />'.
1839                                                 $arrCol.
1840                                                 '<a href="#" onclick="return link_typo3Page(\''.$expPageId.'\',\'#'.$row['uid'].'\');">'.
1841                                                 $icon.
1842                                                 htmlspecialchars(t3lib_div::fixed_lgd_cs($row['header'],$titleLen)).
1843                                                 '</a><br />';
1844
1845                                         // Finding internal anchor points:
1846                                 if (t3lib_div::inList('text,textpic', $row['CType']))   {
1847                                         $split = preg_split('/(<a[^>]+name=[\'"]?([^"\'>[:space:]]+)[\'"]?[^>]*>)/i', $row['bodytext'], -1, PREG_SPLIT_DELIM_CAPTURE);
1848
1849                                         foreach($split as $skey => $sval)       {
1850                                                 if (($skey%3)==2)       {
1851                                                                 // Putting list element HTML together:
1852                                                         $sval = substr($sval,0,100);
1853                                                         $out.='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/line.gif','width="18" height="16"').' alt="" />'.
1854                                                                         '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/join'.($skey+3>count($split)?'bottom':'').'.gif','width="18" height="16"').' alt="" />'.
1855                                                                         '<a href="#" onclick="return link_typo3Page(\''.$expPageId.'\',\'#'.rawurlencode($sval).'\');">'.
1856                                                                         htmlspecialchars(' <A> '.$sval).
1857                                                                         '</a><br />';
1858                                                 }
1859                                         }
1860                                 }
1861                         }
1862                 }
1863                 return $out;
1864         }
1865
1866         /**
1867          * For TYPO3 Element Browser: This lists all content elements from the given list of tables
1868          *
1869          * @param       string          Commalist of tables. Set to "*" if you want all tables.
1870          * @return      string          HTML output.
1871          */
1872         function TBE_expandPage($tables)        {
1873                 global $TCA,$BE_USER, $BACK_PATH;
1874
1875                 $out='';
1876                 if ($this->expandPage>=0 && t3lib_div::testInt($this->expandPage) && $BE_USER->isInWebMount($this->expandPage)) {
1877
1878                                 // Set array with table names to list:
1879                         if (!strcmp(trim($tables),'*')) {
1880                                 $tablesArr = array_keys($TCA);
1881                         } else {
1882                                 $tablesArr = t3lib_div::trimExplode(',',$tables,1);
1883                         }
1884                         reset($tablesArr);
1885
1886                                 // Headline for selecting records:
1887                         $out.=$this->barheader($GLOBALS['LANG']->getLL('selectRecords').':');
1888
1889                                 // Create the header, showing the current page for which the listing is. Includes link to the page itself, if pages are amount allowed tables.
1890                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
1891                         $mainPageRec = t3lib_BEfunc::getRecordWSOL('pages',$this->expandPage);
1892                         $ATag='';
1893                         $ATag_e='';
1894                         $ATag2='';
1895                         if (in_array('pages',$tablesArr))       {
1896                                 $ficon=t3lib_iconWorks::getIcon('pages',$mainPageRec);
1897                                 $ATag="<a href=\"#\" onclick=\"return insertElement('pages', '".$mainPageRec['uid']."', 'db', ".t3lib_div::quoteJSvalue($mainPageRec['title']).", '', '', '".$ficon."','',1);\">";
1898                                 $ATag2="<a href=\"#\" onclick=\"return insertElement('pages', '".$mainPageRec['uid']."', 'db', ".t3lib_div::quoteJSvalue($mainPageRec['title']).", '', '', '".$ficon."','',0);\">";
1899                                 $ATag_alt=substr($ATag,0,-4).",'',1);\">";
1900                                 $ATag_e='</a>';
1901                         }
1902                         $picon=t3lib_iconWorks::getIconImage('pages',$mainPageRec,$BACK_PATH,'');
1903                         $pBicon=$ATag2?'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/plusbullet2.gif','width="18" height="16"').' alt="" />':'';
1904                         $pText=htmlspecialchars(t3lib_div::fixed_lgd_cs($mainPageRec['title'],$titleLen));
1905                         $out.=$picon.$ATag2.$pBicon.$ATag_e.$ATag.$pText.$ATag_e.'<br />';
1906
1907                                 // Initialize the record listing:
1908                         $id = $this->expandPage;
1909                         $pointer = t3lib_div::intInRange($this->pointer,0,100000);
1910                         $perms_clause = $GLOBALS['BE_USER']->getPagePermsClause(1);
1911                         $pageinfo = t3lib_BEfunc::readPageAccess($id,$perms_clause);
1912                         $table='';
1913
1914                                 // Generate the record list:
1915                         $dblist = t3lib_div::makeInstance('TBE_browser_recordList');
1916                         $dblist->thisScript=$this->thisScript;
1917                         $dblist->backPath = $GLOBALS['BACK_PATH'];
1918                         $dblist->thumbs = 0;
1919                         $dblist->calcPerms = $GLOBALS['BE_USER']->calcPerms($pageinfo);
1920                         $dblist->noControlPanels=1;
1921                         $dblist->clickMenuEnabled=0;
1922                         $dblist->tableList=implode(',',$tablesArr);
1923
1924                         $dblist->start($id,t3lib_div::_GP('table'),$pointer,
1925                                 t3lib_div::_GP('search_field'),
1926                                 t3lib_div::_GP('search_levels'),
1927                                 t3lib_div::_GP('showLimit')
1928                         );
1929                         $dblist->setDispFields();
1930                         $dblist->generateList();
1931                         $dblist->writeBottom();
1932
1933                                 //      Add the HTML for the record list to output variable:
1934                         $out.=$dblist->HTMLcode;
1935
1936                                 // Add support for fieldselectbox in singleTableMode
1937                         if ($dblist->table) {
1938                                 $out.= $dblist->fieldSelectBox($dblist->table);
1939                         }
1940
1941                         $out.=$dblist->getSearchBox();
1942                 }
1943
1944                         // Return accumulated content:
1945                 return $out;
1946         }
1947
1948
1949         /**
1950          * Render list of folders inside a folder.
1951          *
1952          * @param       string          string of the current folder
1953          * @return      string          HTML output
1954          */
1955         function TBE_expandSubFolders($expandFolder=0) {
1956                 $content = '';
1957
1958                 $expandFolder = $expandFolder ?
1959                         $expandFolder :
1960                         $this->expandFolder;
1961
1962                 if($expandFolder && $this->checkFolder($expandFolder)) {
1963                         if(t3lib_div::isFirstPartOfStr($expandFolder, PATH_site)) {
1964                                 $rootFolder = substr($expandFolder, strlen(PATH_site));
1965                         }
1966
1967                         $folders = array();
1968
1969                                 // Listing the folders:
1970                         $folders = t3lib_div::get_dirs($expandFolder);
1971                         if(count($folders) > 0) {
1972                                 foreach($folders as $index => $folder) {
1973                                         $folders[$index] = $rootFolder.$folder.'/';
1974                                 }
1975                         }
1976                         $content.= $this->folderList($rootFolder, $folders);
1977                 }
1978
1979                         // Return accumulated content for folderlisting:
1980                 return $content;
1981         }
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993         /******************************************************************
1994          *
1995          * File listing
1996          *
1997          ******************************************************************/
1998         /**
1999          * For RTE: This displays all files from folder. No thumbnails shown
2000          *
2001          * @param       string          The folder path to expand
2002          * @param       string          List of fileextensions to show
2003          * @return      string          HTML output
2004          */
2005         function expandFolder($expandFolder=0,$extensionList='')        {
2006                 global $BACK_PATH;
2007
2008                 $expandFolder = $expandFolder ? $expandFolder : $this->expandFolder;
2009                 $out='';
2010                 if ($expandFolder && $this->checkFolder($expandFolder)) {
2011
2012                                 // Create header for filelisting:
2013                         $out.=$this->barheader($GLOBALS['LANG']->getLL('files').':');
2014
2015                                 // Prepare current path value for comparison (showing red arrow)
2016                         if (!$this->curUrlInfo['value'])        {
2017                                 $cmpPath='';
2018                         } else {
2019                                 $cmpPath=PATH_site.$this->curUrlInfo['info'];
2020                         }
2021
2022
2023                                 // Create header element; The folder from which files are listed.
2024                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
2025                         $picon='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/i/_icon_webfolders.gif','width="18" height="16"').' alt="" />';
2026                         $picon.=htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($expandFolder),$titleLen));
2027                         $picon='<a href="#" onclick="return link_folder(\''.t3lib_div::rawUrlEncodeFP(substr($expandFolder,strlen(PATH_site))).'\');">'.$picon.'</a>';
2028                         if ($this->curUrlInfo['act'] == 'folder' && $cmpPath == $expandFolder)  {
2029                                 $out.= '<img'.t3lib_iconWorks::skinImg($BACK_PATH, 'gfx/blinkarrow_left.gif', 'width="5" height="9"') . ' class="c-blinkArrowL" alt="" />';
2030                         }
2031                         $out.=$picon.'<br />';
2032
2033                                 // Get files from the folder:
2034                         if ($this->mode == 'wizard' && $this->act == 'folder') {
2035                                 $files = t3lib_div::get_dirs($expandFolder);
2036                         } else {
2037                                 $files = t3lib_div::getFilesInDir($expandFolder, $extensionList, 1, 1); // $extensionList='', $prependPath=0, $order='')
2038                         }
2039
2040                         $c=0;
2041                         $cc=count($files);
2042                         if (is_array($files))   {
2043                                 foreach($files as $filepath)    {
2044                                         $c++;
2045                                         $fI=pathinfo($filepath);
2046
2047                                         if ($this->mode == 'wizard' && $this->act == 'folder') {
2048                                                 $filepath = $expandFolder.$filepath.'/';
2049                                                 $icon = '<img' . t3lib_iconWorks::skinImg($BACK_PATH, 'gfx/i/_icon_webfolders.gif', 'width="18" height="16"') . ' alt="" />';
2050                                         } else {
2051                                                         // File icon:
2052                                                 $icon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
2053
2054                                                         // Get size and icon:
2055                                                 $size = ' (' . t3lib_div::formatSize(filesize($filepath)) . 'bytes)';
2056                                                 $icon = '<img' . t3lib_iconWorks::skinImg($BACK_PATH, 'gfx/fileicons/' . $icon . '', 'width="18" height="16"') . ' title="' . htmlspecialchars($fI['basename'] . $size) . '" alt="" />';
2057                                         }
2058
2059                                                 // If the listed file turns out to be the CURRENT file, then show blinking arrow:
2060                                         if (($this->curUrlInfo['act'] == 'file' || $this->curUrlInfo['act'] == 'folder') && $cmpPath == $filepath) {
2061                                                 $arrCol='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/blinkarrow_left.gif','width="5" height="9"').' class="c-blinkArrowL" alt="" />';
2062                                         } else {
2063                                                 $arrCol='';
2064                                         }
2065
2066                                                 // Put it all together for the file element:
2067                                         $out.='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/ol/join'.($c==$cc?'bottom':'').'.gif','width="18" height="16"').' alt="" />'.
2068                                                         $arrCol.
2069                                                         '<a href="#" onclick="return link_folder(\''.t3lib_div::rawUrlEncodeFP(substr($filepath,strlen(PATH_site))).'\');">'.
2070                                                         $icon.
2071                                                         htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($filepath),$titleLen)).
2072                                                         '</a><br />';
2073                                 }
2074                         }
2075                 }
2076                 return $out;
2077         }
2078
2079         /**
2080          * For TYPO3 Element Browser: Expand folder of files.
2081          *
2082          * @param       string          The folder path to expand
2083          * @param       string          List of fileextensions to show
2084          * @param       boolean         Whether to show thumbnails or not. If set, no thumbnails are shown.
2085          * @return      string          HTML output
2086          */
2087         function TBE_expandFolder($expandFolder=0,$extensionList='',$noThumbs=0)        {
2088                 global $LANG;
2089
2090                 $expandFolder = $expandFolder ? $expandFolder : $this->expandFolder;
2091                 $out='';
2092                 if ($expandFolder && $this->checkFolder($expandFolder)) {
2093                                 // Listing the files:
2094                         $files = t3lib_div::getFilesInDir($expandFolder,$extensionList,1,1);    // $extensionList="",$prependPath=0,$order='')
2095                         $out.= $this->fileList($files, $expandFolder, $noThumbs);
2096                 }
2097
2098                         // Return accumulated content for filelisting:
2099                 return $out;
2100         }
2101
2102         /**
2103          * Render list of files.
2104          *
2105          * @param       array           List of files. See t3lib_div::getFilesInDir
2106          * @param       string          If set a header with a folder icon and folder name are shown
2107          * @param       boolean         Whether to show thumbnails or not. If set, no thumbnails are shown.
2108          * @return      string          HTML output
2109          */
2110         function fileList($files, $folderName='', $noThumbs=0) {
2111                 global $LANG, $BACK_PATH;
2112
2113                 $out='';
2114
2115                         // Listing the files:
2116                 if (is_array($files))   {
2117
2118                                 // Create headline (showing number of files):
2119                         $filesCount = count($files);
2120                         $out.=$this->barheader(sprintf($GLOBALS['LANG']->getLL('files').' (%s):', $filesCount));
2121                         $out.=$this->getBulkSelector($filesCount);
2122
2123                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
2124
2125                                 // Create the header of current folder:
2126                         if($folderName) {
2127                                 $picon='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/i/_icon_webfolders.gif','width="18" height="16"').' alt="" />';
2128                                 $picon.=htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($folderName),$titleLen));
2129                                 $out.=$picon.'<br />';
2130                         }
2131
2132                                 // Init graphic object for reading file dimensions:
2133                         $imgObj = t3lib_div::makeInstance('t3lib_stdGraphic');
2134                         $imgObj->init();
2135                         $imgObj->mayScaleUp=0;
2136                         $imgObj->tempPath=PATH_site.$imgObj->tempPath;
2137
2138                                 // Traverse the file list:
2139                         $lines=array();
2140                         foreach($files as $filepath)    {
2141                                 $fI=pathinfo($filepath);
2142
2143                                         // Thumbnail/size generation:
2144                                 if (t3lib_div::inList(strtolower($GLOBALS['TYPO3_CONF_VARS']['GFX']['imagefile_ext']),strtolower($fI['extension'])) && !$noThumbs)      {
2145                                         $imgInfo = $imgObj->getImageDimensions($filepath);
2146                                         $pDim = $imgInfo[0].'x'.$imgInfo[1].' pixels';
2147                                         $clickIcon = t3lib_BEfunc::getThumbNail($BACK_PATH.'thumbs.php',$filepath,'hspace="5" vspace="5" border="1"');
2148                                 } else {
2149                                         $clickIcon = '';
2150                                         $pDim = '';
2151                                 }
2152
2153                                         // Create file icon:
2154                                 $ficon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
2155                                 $size=' ('.t3lib_div::formatSize(filesize($filepath)).'bytes'.($pDim?', '.$pDim:'').')';
2156                                 $icon = '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/fileicons/'.$ficon,'width="18" height="16"').' title="'.htmlspecialchars($fI['basename'].$size).'" class="absmiddle" alt="" />';
2157
2158                                         // Create links for adding the file:
2159                                 if (strstr($filepath,',') || strstr($filepath,'|'))     {       // In case an invalid character is in the filepath, display error message:
2160                                         $eMsg = $LANG->JScharCode(sprintf($LANG->getLL('invalidChar'),', |'));
2161                                         $ATag = $ATag_alt = "<a href=\"#\" onclick=\"alert(".$eMsg.");return false;\">";
2162                                         $bulkCheckBox = '';
2163                                 } else {        // If filename is OK, just add it:
2164                                         $filesIndex = count($this->elements);
2165                                         $this->elements['file_'.$filesIndex] = array(
2166                                                 'md5' => t3lib_div::shortMD5($filepath),
2167                                                 'type' => 'file',
2168                                                 'fileName' => $fI['basename'],
2169                                                 'filePath' => $filepath,
2170                                                 'fileExt' => $fI['extension'],
2171                                                 'fileIcon' => $ficon,
2172                                         );
2173                                         $ATag = "<a href=\"#\" onclick=\"return BrowseLinks.File.insertElement('file_$filesIndex');\">";
2174                                         $ATag_alt = substr($ATag,0,-4).",1);\">";
2175                                         $bulkCheckBox = '<input type="checkbox" class="typo3-bulk-item" name="file_'.$filesIndex.'" value="0" /> ';
2176                                 }
2177                                 $ATag_e='</a>';
2178
2179                                         // Create link to showing details about the file in a window:
2180                                 $Ahref = $BACK_PATH.'show_item.php?table='.rawurlencode($filepath).'&returnUrl='.rawurlencode(t3lib_div::getIndpEnv('REQUEST_URI'));
2181                                 $ATag2='<a href="'.htmlspecialchars($Ahref).'">';
2182                                 $ATag2_e='</a>';
2183
2184                                         // Combine the stuff:
2185                                 $filenameAndIcon=$bulkCheckBox.$ATag_alt.$icon.htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($filepath),$titleLen)).$ATag_e;
2186
2187                                         // Show element:
2188                                 if ($pDim)      {               // Image...
2189                                         $lines[]='
2190                                                 <tr class="bgColor4">
2191                                                         <td nowrap="nowrap">'.$filenameAndIcon.'&nbsp;</td>
2192                                                         <td>'.$ATag.'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/plusbullet2.gif','width="18" height="16"').' title="'.$LANG->getLL('addToList',1).'" alt="" />'.$ATag_e.'</td>
2193                                                         <td nowrap="nowrap">'.($ATag2.'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/zoom2.gif','width="12" height="12"').' title="'.$LANG->getLL('info',1).'" alt="" /> '.$LANG->getLL('info',1).$ATag2_e).'</td>
2194                                                         <td nowrap="nowrap">&nbsp;'.$pDim.'</td>
2195                                                 </tr>';
2196                                         $lines[]='
2197                                                 <tr>
2198                                                         <td colspan="4">'.$ATag_alt.$clickIcon.$ATag_e.'</td>
2199                                                 </tr>';
2200                                 } else {
2201                                         $lines[]='
2202                                                 <tr class="bgColor4">
2203                                                         <td nowrap="nowrap">'.$filenameAndIcon.'&nbsp;</td>
2204                                                         <td>'.$ATag.'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/plusbullet2.gif','width="18" height="16"').' title="'.$LANG->getLL('addToList',1).'" alt="" />'.$ATag_e.'</td>
2205                                                         <td nowrap="nowrap">'.($ATag2.'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/zoom2.gif','width="12" height="12"').' title="'.$LANG->getLL('info',1).'" alt="" /> '.$LANG->getLL('info',1).$ATag2_e).'</td>
2206                                                         <td>&nbsp;</td>
2207                                                 </tr>';
2208                                 }
2209                                 $lines[]='
2210                                                 <tr>
2211                                                         <td colspan="3"><img src="clear.gif" width="1" height="3" alt="" /></td>
2212                                                 </tr>';
2213                         }
2214
2215                                 // Wrap all the rows in table tags:
2216                         $out.='
2217
2218
2219
2220                 <!--
2221                         File listing
2222                 -->
2223                                 <table border="0" cellpadding="0" cellspacing="1" id="typo3-fileList">
2224                                         '.implode('',$lines).'
2225                                 </table>';
2226                 }
2227                         // Return accumulated content for filelisting:
2228                 return $out;
2229         }
2230
2231         /**
2232          * Render list of folders.
2233          *
2234          * @param       array           List of folders. See t3lib_div::get_dirs
2235          * @param       string          If set a header with a folder icon and folder name are shown
2236          * @return      string          HTML output
2237          */
2238         function folderList($baseFolder, $folders) {
2239                 global $LANG, $BACK_PATH;
2240
2241                 $content = '';
2242
2243                         // Create headline (showing number of folders):
2244                 $content.=$this->barheader(
2245                         sprintf($GLOBALS['LANG']->getLL('folders').' (%s):',count($folders))
2246                 );
2247
2248                 $titleLength = intval($GLOBALS['BE_USER']->uc['titleLen']);
2249
2250                         // Create the header of current folder:
2251                 if($baseFolder) {
2252                         if (strstr($baseFolder, ',') || strstr($baseFolder, '|'))       {
2253                                         // In case an invalid character is in the filepath, display error message:
2254                                 $errorMessage     = $LANG->JScharCode(sprintf($LANG->getLL('invalidChar'),', |'));
2255                                 $aTag = $aTag_alt = "<a href=\"#\" onclick=\"alert(".$errorMessage.");return false;\">";
2256                         } else {
2257                                         // If foldername is OK, just add it:
2258                                 $aTag = "<a href=\"#\" onclick=\"return insertElement('','".rawurlencode($baseFolder)."', 'folder', '".rawurlencode($baseFolder)."', unescape('".rawurlencode($baseFolder)."'), '".$fI['extension']."', '".$ficon."');\">";
2259                                 $aTag_alt = substr($aTag,0,-4).",'',1);\">";
2260                         }
2261                         $aTag_e = '</a>';
2262
2263                                 // add the foder icon
2264                         $folderIcon = $aTag_alt;
2265                         $folderIcon.= '<img'.t3lib_iconWorks::skinImg(
2266                                 $BACK_PATH,
2267                                 'gfx/i/_icon_webfolders.gif','width="18" height="16"'
2268                         ).' alt="" />';
2269                         $folderIcon.= htmlspecialchars(
2270                                 t3lib_div::fixed_lgd_cs(basename($baseFolder),$titleLength)
2271                         );
2272                         $folderIcon.= $aTag_e;
2273
2274                         $content.=$folderIcon.'<br />';
2275                 }
2276
2277                         // Listing the folders:
2278                 if(is_array($folders)) {
2279                         if(count($folders) > 0) {
2280                                         // Traverse the folder list:
2281                                 $lines = array();
2282                                 foreach($folders as $folderPath)        {
2283                                         $pathInfo = pathinfo($folderPath);
2284
2285                                                 // Create folder icon:
2286                                         $icon = '<img src="clear.gif" width="16" height="16" alt="" /><img'.t3lib_iconWorks::skinImg($BACK_PATH, 'gfx/i/_icon_webfolders.gif','width="16" height="16"').' title="'.htmlspecialchars($pathInfo['basename'].$size).'" class="absmiddle" alt="" />';
2287
2288                                                 // Create links for adding the folder:
2289                                         if($this->P['itemName'] != '' && $this->P['formName'] != '') {
2290                                                 $aTag = "<a href=\"#\" onclick=\"return set_folderpath(unescape('".rawurlencode($folderPath)."'));\">";
2291                                         } else {
2292                                                 $aTag = "<a href=\"#\" onclick=\"return insertElement('','".rawurlencode($folderPath)."', 'folder', '".rawurlencode($folderPath)."', unescape('".rawurlencode($folderPath)."'), '".$pathInfo['extension']."', '".$ficon."');\">";
2293                                         }
2294
2295                                         if (strstr($folderPath,',') || strstr($folderPath,'|')) {
2296                                                         // In case an invalid character is in the filepath, display error message:
2297                                                 $errorMessage     = $LANG->JScharCode(sprintf($LANG->getLL('invalidChar'),', |'));
2298                                                 $aTag = $aTag_alt = "<a href=\"#\" onclick=\"alert(".$errorMessage.");return false;\">";
2299                                         } else {
2300                                                         // If foldername is OK, just add it:
2301                                                 $aTag_alt = substr($aTag,0,-4).",'',1);\">";
2302                                         }
2303                                         $aTag_e='</a>';
2304
2305                                                 // Combine icon and folderpath:
2306                                         $foldernameAndIcon = $aTag_alt.$icon.htmlspecialchars(
2307                                                 t3lib_div::fixed_lgd_cs(basename($folderPath),$titleLength)
2308                                         ).$aTag_e;
2309
2310                                         if($this->P['itemName'] != '') {
2311                                                 $lines[] = '
2312                                                         <tr class="bgColor4">
2313                                                                 <td nowrap="nowrap">'.$foldernameAndIcon.'&nbsp;</td>
2314                                                                 <td>&nbsp;</td>
2315                                                         </tr>';
2316                                         } else {
2317                                                 $lines[] = '
2318                                                         <tr class="bgColor4">
2319                                                                 <td nowrap="nowrap">'.$foldernameAndIcon.'&nbsp;</td>
2320                                                                 <td>'.$aTag.'<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/plusbullet2.gif','width="18" height="16"').' title="'.$LANG->getLL('addToList',1).'" alt="" />'.$aTag_e.'</td>
2321                                                                 <td>&nbsp;</td>
2322                                                         </tr>';
2323                                         }
2324
2325                                         $lines[] = '
2326                                                         <tr>
2327                                                                 <td colspan="3"><img src="clear.gif" width="1" height="3" alt="" /></td>
2328                                                         </tr>';
2329                                 }
2330                         }
2331
2332                                 // Wrap all the rows in table tags:
2333                         $content.='
2334
2335                 <!--
2336                         Folder listing
2337                 -->
2338                                 <table border="0" cellpadding="0" cellspacing="1" id="typo3-folderList">
2339                                         '.implode('', $lines).'
2340                                 </table>';
2341                 }
2342
2343                         // Return accumulated content for folderlisting:
2344                 return $content;
2345         }
2346
2347         /**
2348          * For RTE: This displays all IMAGES (gif,png,jpg) (from extensionList) from folder. Thumbnails are shown for images.
2349          * This listing is of images located in the web-accessible paths ONLY - the listing is for drag-n-drop use in the RTE
2350          *
2351          * @param       string          The folder path to expand
2352          * @param       string          List of fileextensions to show
2353          * @return      string          HTML output
2354          */
2355         function TBE_dragNDrop($expandFolder=0,$extensionList='')       {
2356                 global $BACK_PATH;
2357
2358                 $expandFolder = $expandFolder ? $expandFolder : $this->expandFolder;
2359                 $out='';
2360                 if ($expandFolder && $this->checkFolder($expandFolder)) {
2361                         if ($this->isWebFolder($expandFolder))  {
2362
2363                                         // Read files from directory:
2364                                 $files = t3lib_div::getFilesInDir($expandFolder,$extensionList,1,1);    // $extensionList="",$prependPath=0,$order='')
2365                                 if (is_array($files))   {
2366                                         $out.=$this->barheader(sprintf($GLOBALS['LANG']->getLL('files').' (%s):',count($files)));
2367
2368                                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
2369                                         $picon='<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/i/_icon_webfolders.gif','width="18" height="16"').' alt="" />';
2370                                         $picon.=htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($expandFolder),$titleLen));
2371                                         $out.=$picon.'<br />';
2372
2373                                                 // Init row-array:
2374                                         $lines=array();
2375
2376                                                 // Add "drag-n-drop" message:
2377                                         $lines[]='
2378                                                 <tr>
2379                                                         <td colspan="2">'.$this->getMsgBox($GLOBALS['LANG']->getLL('findDragDrop')).'</td>
2380                                                 </tr>';
2381
2382                                                 // Traverse files:
2383                                         while(list(,$filepath)=each($files))    {
2384                                                 $fI = pathinfo($filepath);
2385
2386                                                         // URL of image:
2387                                                 $iurl = $this->siteURL.t3lib_div::rawurlencodeFP(substr($filepath,strlen(PATH_site)));
2388
2389                                                         // Show only web-images
2390                                                 if (t3lib_div::inList('gif,jpeg,jpg,png',strtolower($fI['extension']))) {
2391                                                         $imgInfo = @getimagesize($filepath);
2392                                                         $pDim = $imgInfo[0].'x'.$imgInfo[1].' pixels';
2393
2394                                                         $ficon = t3lib_BEfunc::getFileIcon(strtolower($fI['extension']));
2395                                                         $size=' ('.t3lib_div::formatSize(filesize($filepath)).'bytes'.($pDim?', '.$pDim:'').')';
2396                                                         $icon = '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/fileicons/'.$ficon,'width="18" height="16"').' class="absmiddle" title="'.htmlspecialchars($fI['basename'].$size).'" alt="" />';
2397                                                         $filenameAndIcon=$icon.htmlspecialchars(t3lib_div::fixed_lgd_cs(basename($filepath),$titleLen));
2398
2399                                                         if (t3lib_div::_GP('noLimit'))  {
2400                                                                 $maxW=10000;
2401                                                                 $maxH=10000;
2402                                                         } else {
2403                                                                 $maxW=380;
2404                                                                 $maxH=500;
2405                                                         }
2406                                                         $IW = $imgInfo[0];
2407                                                         $IH = $imgInfo[1];
2408                                                         if ($IW>$maxW)  {
2409                                                                 $IH=ceil($IH/$IW*$maxW);
2410                                                                 $IW=$maxW;
2411                                                         }
2412                                                         if ($IH>$maxH)  {
2413                                                                 $IW=ceil($IW/$IH*$maxH);
2414                                                                 $IH=$maxH;
2415                                                         }
2416
2417                                                                 // Make row:
2418                                                         $lines[]='
2419                                                                 <tr class="bgColor4">
2420                                                                         <td nowrap="nowrap">'.$filenameAndIcon.'&nbsp;</td>
2421                                                                         <td nowrap="nowrap">'.
2422                                                                         ($imgInfo[0]!=$IW ? '<a href="'.htmlspecialchars(t3lib_div::linkThisScript(array('noLimit'=>'1'))).'">'.
2423                                                                                                                 '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/icon_warning2.gif','width="18" height="16"').' title="'.$GLOBALS['LANG']->getLL('clickToRedrawFullSize',1).'" alt="" />'.
2424                                                                                                                 '</a>':'').
2425                                                                         $pDim.'&nbsp;</td>
2426                                                                 </tr>';
2427
2428                                                         $lines[]='
2429                                                                 <tr>
2430                                                                         <td colspan="2"><img src="'.$iurl.'" width="'.$IW.'" height="'.$IH.'" border="1" alt="" /></td>
2431                                                                 </tr>';
2432                                                         $lines[]='
2433                                                                 <tr>
2434                                                                         <td colspan="2"><img src="clear.gif" width="1" height="3" alt="" /></td>
2435                                                                 </tr>';
2436                                                 }
2437                                         }
2438
2439                                                 // Finally, wrap all rows in a table tag:
2440                                         $out.='
2441
2442
2443                         <!--
2444                                 File listing / Drag-n-drop
2445                         -->
2446                                                 <table border="0" cellpadding="0" cellspacing="1" id="typo3-dragBox">
2447                                                         '.implode('',$lines).'
2448                                                 </table>';
2449                                 }
2450                         } else {
2451                                         // Print this warning if the folder is NOT a web folder:
2452                                 $out.=$this->barheader($GLOBALS['LANG']->getLL('files'));
2453                                 $out.=$this->getMsgBox($GLOBALS['LANG']->getLL('noWebFolder'),'icon_warning2');
2454                         }
2455                 }
2456                 return $out;
2457         }
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470         /******************************************************************
2471          *
2472          * Miscellaneous functions
2473          *
2474          ******************************************************************/
2475
2476
2477         /**
2478          * Verifies that a path is a web-folder:
2479          *
2480          * @param       string          Absolute filepath
2481          * @return      boolean         If the input path is found in PATH_site then it returns true.
2482          */
2483         function isWebFolder($folder)   {
2484                 $folder = ereg_replace('\/$','',$folder).'/';
2485                 return t3lib_div::isFirstPartOfStr($folder,PATH_site) ? TRUE : FALSE;
2486         }
2487
2488         /**
2489          * Checks, if a path is within the mountpoints of the backend user
2490          *
2491          * @param       string          Absolute filepath
2492          * @return      boolean         If the input path is found in the backend users filemounts, then return true.
2493          */
2494         function checkFolder($folder)   {
2495                 return $this->fileProcessor->checkPathAgainstMounts(ereg_replace('\/$', '', $folder) . '/') ? true : false;
2496         }
2497
2498         /**
2499          * Checks, if a path is within a read-only mountpoint of the backend user
2500          *
2501          * @param       string          Absolute filepath
2502          * @return      boolean         If the input path is found in the backend users filemounts and if the filemount is of type readonly, then return true.
2503          */
2504         function isReadOnlyFolder($folder) {
2505                 return ($GLOBALS['FILEMOUNTS'][$this->fileProcessor->checkPathAgainstMounts(ereg_replace('\/$', '', $folder) . '/')]['type'] == 'readonly');
2506         }
2507
2508         /**
2509          * Prints a 'header' where string is in a tablecell
2510          *
2511          * @param       string          The string to print in the header. The value is htmlspecialchars()'ed before output.
2512          * @return      string          The header HTML (wrapped in a table)
2513          */
2514         function barheader($str)        {
2515                 return '
2516
2517                         <!--
2518                                 Bar header:
2519                         -->
2520                         <h3 class="bgColor5">'.htmlspecialchars($str).'</h3>
2521                         ';
2522         }
2523
2524         /**
2525          * Displays a message box with the input message
2526          *
2527          * @param       string          Input message to show (will be htmlspecialchars()'ed inside of this function)
2528          * @param       string          Icon filename body from gfx/ (default is "icon_note") - meant to allow change to warning type icons...
2529          * @return      string          HTML for the message (wrapped in a table).
2530          */
2531         function getMsgBox($in_msg,$icon='icon_note')   {
2532                 global $BACK_PATH;
2533
2534                 $msg = '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/'.$icon.'.gif','width="18" height="16"').' alt="" />'.htmlspecialchars($in_msg);
2535                 $msg = '
2536
2537                         <!--
2538                                 Message box:
2539                         -->
2540                         <table cellspacing="0" class="bgColor4" id="typo3-msgBox">
2541                                 <tr>
2542                                         <td>'.$msg.'</td>
2543                                 </tr>
2544                         </table>
2545                         ';
2546                 return $msg;
2547         }
2548
2549         /**
2550          * For RTE/link: This prints the 'currentUrl'
2551          *
2552          * @param       string          URL value.  The value is htmlspecialchars()'ed before output.
2553          * @return      string          HTML content, wrapped in a table.
2554          */
2555         function printCurrentUrl($str)  {
2556                 return '
2557
2558                         <!--
2559                                 Print current URL
2560                         -->
2561                         <table border="0" cellpadding="0" cellspacing="0" class="bgColor5" id="typo3-curUrl">
2562                                 <tr>
2563                                         <td>'.$GLOBALS['LANG']->getLL('currentLink',1).': '.htmlspecialchars(rawurldecode($str)).'</td>
2564                                 </tr>
2565                         </table>';
2566         }
2567
2568         /**
2569          * For RTE/link: Parses the incoming URL and determines if it's a page, file, external or mail address.
2570          *
2571          * @param       string          HREF value tp analyse
2572          * @param       string          The URL of the current website (frontend)
2573          * @return      array           Array with URL information stored in assoc. keys: value, act (page, file, spec, mail), pageid, cElement, info
2574          */
2575         function parseCurUrl($href,$siteUrl)    {
2576                 $href = trim($href);
2577                 if ($href)      {
2578                         $info=array();
2579
2580                                 // Default is "url":
2581                         $info['value']=$href;
2582                         $info['act']='url';
2583
2584                         $specialParts = explode('#_SPECIAL',$href);
2585                         if (count($specialParts)==2)    {       // Special kind (Something RTE specific: User configurable links through: "userLinks." from ->thisConfig)
2586                                 $info['value']='#_SPECIAL'.$specialParts[1];
2587                                 $info['act']='spec';
2588                         } elseif (t3lib_div::isFirstPartOfStr($href,$siteUrl))  {       // If URL is on the current frontend website:
2589                                 $rel = substr($href,strlen($siteUrl));
2590                                 if (file_exists(PATH_site.rawurldecode($rel)))  {       // URL is a file, which exists:
2591                                         $info['value']=rawurldecode($rel);
2592                                         if (@is_dir(PATH_site . $info['value'])) {
2593                                                 $info['act'] = 'folder';
2594                                         } else {
2595                                                 $info['act'] = 'file';
2596                                         }
2597                                 } else {        // URL is a page (id parameter)
2598                                         $uP=parse_url($rel);
2599                                         if (!trim($uP['path'])) {
2600                                                 $pp = explode('id=',$uP['query']);
2601                                                 $parameters = explode('&', $pp[1]);
2602                                                 $id = array_shift($parameters);
2603                                                 if ($id)        {
2604                                                                 // Checking if the id-parameter is an alias.
2605                                                         if (!t3lib_div::testInt($id))   {
2606                                                                 list($idPartR) = t3lib_BEfunc::getRecordsByField('pages','alias',$id);
2607                                                                 $id=intval($idPartR['uid']);
2608                                                         }
2609
2610                                                         $pageRow = t3lib_BEfunc::getRecordWSOL('pages',$id);
2611                                                         $titleLen=intval($GLOBALS['BE_USER']->uc['titleLen']);
2612                                                         $info['value']=$GLOBALS['LANG']->getLL('page',1)." '".htmlspecialchars(t3lib_div::fixed_lgd_cs($pageRow['title'],$titleLen))."' (ID:".$id.($uP['fragment']?', #'.$uP['fragment']:'').')';
2613                                                         $info['pageid']=$id;
2614                                                         $info['cElement']=$uP['fragment'];
2615                                                         $info['act']='page';
2616                                                         $info['query'] = $parameters[0]?'&'.implode('&', $parameters):'';
2617                                                 }
2618                                         }
2619                                 }
2620                         } else {        // Email link:
2621                                 if (strtolower(substr($href,0,7))=='mailto:')   {
2622                                         $info['value']=trim(substr($href,7));
2623                                         $info['act']='mail';
2624                                 }
2625                         }
2626                         $info['info'] = $info['value'];
2627                 } else {        // NO value inputted:
2628                         $info=array();
2629                         $info['info']=$GLOBALS['LANG']->getLL('none');
2630                         $info['value']='';
2631                         $info['act']='page';
2632                 }
2633
2634                         // let the hook have a look
2635                 foreach($this->hookObjects as $hookObject) {
2636                         $info = $hookObject->parseCurrentUrl($href, $siteUrl, $info);
2637                 }
2638
2639                 return $info;
2640         }
2641
2642         /**
2643          * For TBE: Makes an upload form for uploading files to the filemount the user is browsing.
2644          * The files are uploaded to the tce_file.php script in the core which will handle the upload.
2645          *
2646          * @param       string          Absolute filepath on server to which to upload.
2647          * @return      string          HTML for an upload form.
2648          */
2649         function uploadForm($path)      {
2650                 global $BACK_PATH;
2651
2652                 if ($this->isReadOnlyFolder($path)) return '';
2653
2654                         // Read configuration of upload field count
2655                 $userSetting = $GLOBALS['BE_USER']->getTSConfigVal('options.folderTree.uploadFieldsInLinkBrowser');
2656                 $count = isset($userSetting) ? $userSetting : 3;
2657                 if ($count === '0') {
2658                         return '';
2659                 }
2660                 $count = intval($count) == 0 ? 3 : intval($count);
2661
2662                         // Create header, showing upload path:
2663                 $header = t3lib_div::isFirstPartOfStr($path,PATH_site)?substr($path,strlen(PATH_site)):$path;
2664                 $code=$this->barheader($GLOBALS['LANG']->getLL('uploadImage').':');
2665                 $code.='
2666
2667                         <!--
2668                                 Form, for uploading files:
2669                         -->
2670                         <form action="'.$BACK_PATH.'tce_file.php" method="post" name="editform" enctype="'.$GLOBALS['TYPO3_CONF_VARS']['SYS']['form_enctype'].'">
2671                                 <table border="0" cellpadding="0" cellspacing="3" id="typo3-uplFiles">
2672                                         <tr>
2673                                                 <td><strong>'.$GLOBALS['LANG']->getLL('path',1).':</strong> '.htmlspecialchars($header).'</td>
2674                                         </tr>
2675                                         <tr>
2676                                                 <td>';
2677
2678                         // Traverse the number of upload fields (default is 3):
2679                 for ($a=1;$a<=$count;$a++)      {
2680                         $code.='<input type="file" name="upload_'.$a.'"'.$this->doc->formWidth(35).' size="50" />
2681                                 <input type="hidden" name="file[upload]['.$a.'][target]" value="'.htmlspecialchars($path).'" />
2682                                 <input type="hidden" name="file[upload]['.$a.'][data]" value="'.$a.'" /><br />';
2683                 }
2684
2685                         // Make footer of upload form, including the submit button:
2686                 $redirectValue = $this->thisScript.'?act='.$this->act.'&mode='.$this->mode.'&expandFolder='.rawurlencode($path).'&bparams='.rawurlencode($this->bparams);
2687                 $code.='<input type="hidden" name="redirect" value="'.htmlspecialchars($redirectValue).'" />'.
2688                                 '<input type="submit" name="submit" value="'.$GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:file_upload.php.submit',1).'" />';
2689
2690                 $code.='
2691                         <div id="c-override">
2692                                 <input type="checkbox" name="overwriteExistingFiles" id="overwriteExistingFiles" value="1" /> <label for="overwriteExistingFiles">'.$GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_misc.xml:overwriteExistingFiles',1).'</label>
2693                         </div>
2694                 ';
2695
2696
2697                 $code.='</td>
2698                                         </tr>
2699                                 </table>
2700                         </form>';
2701
2702                 return $code;
2703         }
2704
2705         /**
2706          * For TBE: Makes a form for creating new folders in the filemount the user is browsing.
2707          * The folder creation request is sent to the tce_file.php script in the core which will handle the creation.
2708          *
2709          * @param       string          Absolute filepath on server in which to create the new folder.
2710          * @return      string          HTML for the create folder form.
2711          */
2712         function createFolder($path)    {
2713                 global $BACK_PATH;
2714
2715                 if ($this->isReadOnlyFolder($path)) return '';
2716
2717                         // Don't show Folder-create form if it's denied
2718                 if ($GLOBALS['BE_USER']->getTSConfigVal('options.folderTree.hideCreateFolder')) {
2719                         return '';
2720                 }
2721                         // Create header, showing upload path:
2722                 $header = t3lib_div::isFirstPartOfStr($path,PATH_site)?substr($path,strlen(PATH_site)):$path;
2723                 $code=$this->barheader($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:file_newfolder.php.pagetitle').':');
2724                 $code.='
2725
2726                         <!--
2727                                 Form, for creating new folders:
2728                         -->
2729                         <form action="'.$BACK_PATH.'tce_file.php" method="post" name="editform2">
2730                                 <table border="0" cellpadding="0" cellspacing="3" id="typo3-crFolder">
2731                                         <tr>
2732                                                 <td><strong>'.$GLOBALS['LANG']->getLL('path',1).':</strong> '.htmlspecialchars($header).'</td>
2733                                         </tr>
2734                                         <tr>
2735                                                 <td>';
2736
2737                         // Create the new-folder name field:
2738                 $a=1;
2739                 $code.='<input'.$this->doc->formWidth(20).' type="text" name="file[newfolder]['.$a.'][data]" />'.
2740                                 '<input type="hidden" name="file[newfolder]['.$a.'][target]" value="'.htmlspecialchars($path).'" />';
2741
2742                         // Make footer of upload form, including the submit button:
2743                 $redirectValue = $this->thisScript.'?act='.$this->act.'&mode='.$this->mode.'&expandFolder='.rawurlencode($path).'&bparams='.rawurlencode($this->bparams);
2744                 $code.='<input type="hidden" name="redirect" value="'.htmlspecialchars($redirectValue).'" />'.
2745                                 '<input type="submit" name="submit" value="'.$GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.php:file_newfolder.php.submit',1).'" />';
2746
2747                 $code.='</td>
2748                                         </tr>
2749                                 </table>
2750                         </form>';
2751
2752                 return $code;
2753         }
2754
2755         /**
2756          * Get the HTML data required for a bulk selection of files of the TYPO3 Element Browser.
2757          *
2758          * @param       integer         $filesCount: Number of files currently displayed
2759          * @return      string          HTML data required for a bulk selection of files - if $filesCount is 0, nothing is returned
2760          */
2761         function getBulkSelector($filesCount) {
2762                 if ($filesCount) {
2763                         $labelToggleSelection = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_browse_links.php:toggleSelection',1);
2764                         $labelImportSelection = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_browse_links.php:importSelection',1);
2765
2766                         $out = $this->doc->spacer(15).'<div>' .
2767                                         '<a href="#" onclick="BrowseLinks.Selector.toggle()">' .
2768                                                 '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/clip_select.gif','width="12" height="12"').' title="'.$labelToggleSelection.'" alt="" /> ' .
2769                                                 $labelToggleSelection.'</a>'.$this->doc->spacer(5) .
2770                                         '<a href="#" onclick="BrowseLinks.Selector.handle()">' .
2771                                                 '<img'.t3lib_iconWorks::skinImg($BACK_PATH,'gfx/import.gif','width="12" height="12"').' title="'.$labelImportSelection.'" alt="" /> ' .
2772                                                 $labelImportSelection.'</a>' .
2773                                 '</div>'.$this->doc->spacer(15);
2774                 }
2775                 return $out;
2776         }
2777 }
2778
2779
2780 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/class.browse_links.php'])    {
2781         include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/class.browse_links.php']);
2782 }
2783
2784 ?>