* Added Karsten D.s patches for DBAL.
[Packages/TYPO3.CMS.git] / typo3 / alt_doc.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2004 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 * Main form rendering script
29 * By sending certain parameters to this script you can bring up a form
30 * which allows the user to edit the content of one or more database records.
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 * 94: class SC_alt_doc
44 * 167: function preInit()
45 * 219: function doProcessData()
46 * 229: function processData()
47 * 346: function init()
48 * 432: function main()
49 * 500: function printContent()
50 *
51 * SECTION: Sub-content functions, rendering specific parts of the module content.
52 * 535: function makeEditForm()
53 * 717: function makeButtonPanel()
54 * 796: function makeDocSel()
55 * 838: function makeCmenu()
56 * 859: function compileForm($panel,$docSel,$cMenu,$editForm)
57 * 921: function functionMenus()
58 * 952: function shortCutLink()
59 * 983: function tceformMessages()
60 *
61 * SECTION: Other functions
62 * 1021: function editRegularContentFromId()
63 * 1048: function compileStoreDat()
64 * 1061: function getNewIconMode($table,$key='saveDocNew')
65 * 1074: function closeDocument($code=0)
66 * 1106: function setDocument($currentDocFromHandlerMD5='',$retUrl='alt_doc_nodoc.php')
67 *
68 * TOTAL FUNCTIONS: 19
69 * (This index is automatically created/updated by the extension "extdeveval")
70 *
71 */
72
73
74 require('init.php');
75 require('template.php');
76 $LANG->includeLLFile('EXT:lang/locallang_alt_doc.xml');
77 require_once (PATH_t3lib.'class.t3lib_tceforms.php');
78 require_once (PATH_t3lib.'class.t3lib_clipboard.php');
79
80
81 t3lib_BEfunc::lockRecords();
82
83
84
85
86 /**
87 * Script Class: Drawing the editing form for editing records in TYPO3.
88 * Notice: It does NOT use tce_db.php to submit data to, rather it handles submissions itself
89 *
90 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
91 * @package TYPO3
92 * @subpackage core
93 */
94 class SC_alt_doc {
95
96 // Internal, static: GPvars:
97 var $editconf; // GPvar "edit": Is an array looking approx like [tablename][list-of-ids]=command, eg. "&edit[pages][123]=edit". See t3lib_BEfunc::editOnClick(). Value can be seen modified internally.
98 var $columnsOnly; // Commalist of fieldnames to edit. The point is IF you specify this list, only those fields will be rendered in the form. Otherwise all (available) fields in the record is shown according to the types configuration in $TCA
99 var $defVals; // Default values for fields (array with tablenames, fields etc. as keys). Can be seen modified internally.
100 var $overrideVals; // Array of values to force being set (as hidden fields). Will be set as $this->defVals IF defVals does not exist.
101 var $returnUrl; // If set, this value will be set in $this->retUrl (which is used quite many places as the return URL). If not set, "dummy.php" will be set in $this->retUrl
102 var $closeDoc; // Close-document command. Not really sure of all options...
103 var $doSave; // Quite simply, if this variable is set, then the processing of incoming data will be performed - as if a save-button is pressed. Used in the forms as a hidden field which can be set through JavaScript if the form is somehow submitted by JavaScript).
104
105 var $data; // GPvar (for processing only) : The data array from which the data comes...
106 var $mirror; // GPvar (for processing only) : ?
107 var $cacheCmd; // GPvar (for processing only) : Clear-cache cmd.
108 var $redirect; // GPvar (for processing only) : Redirect (not used???)
109 var $disableRTE; // GPvar (for processing only) : If set, the rich text editor is disabled in the forms.
110 var $returnNewPageId; // GPvar (for processing only) : Boolean: If set, then the GET var "&id=" will be added to the retUrl string so that the NEW id of something is returned to the script calling the form.
111 var $vC; // GPvar (for processing only) : Verification code, internal stuff.
112
113 var $popViewId; // GPvar (module) : ID for displaying the page in the frontend (used for SAVE/VIEW operations)
114 var $popViewId_addParams; // GPvar (module) : Additional GET vars for the link, eg. "&L=xxx"
115 var $viewUrl; // GPvar (module) : Alternative URL for viewing the frontend pages.
116 var $editRegularContentFromId; // If this is pointing to a page id it will automatically load all content elements (NORMAL column/default language) from that page into the form!
117 var $recTitle; // Alternative title for the document handler.
118 var $disHelp; // Disable help... ?
119 var $noView; // If set, then no SAVE/VIEW button is printed
120 var $returnEditConf; // If set, the $this->editconf array is returned to the calling script (used by wizard_add.php for instance)
121
122
123 // Internal, static:
124 var $doc; // Document template object
125 var $content; // Content accumulation
126
127 var $retUrl; // Return URL script, processed. This contains the script (if any) that we should RETURN TO from the alt_doc.php script IF we press the close button. Thus this variable is normally passed along from the calling script so we can properly return if needed.
128 var $R_URL_parts; // Contains the parts of the REQUEST_URI (current url). By parts we mean the result of resolving REQUEST_URI (current url) by the parse_url() function. The result is an array where eg. "path" is the script path and "query" is the parameters...
129 var $R_URL_getvars; // Contains the current GET vars array; More specifically this array is the foundation for creating the R_URI internal var (which becomes the "url of this script" to which we submit the forms etc.)
130 var $R_URI; // Set to the URL of this script including variables which is needed to re-display the form. See main()
131
132 var $storeTitle; // Is loaded with the "title" of the currently "open document" - this is used in the Document Selector box. (see makeDocSel())
133 var $storeArray; // Contains an array with key/value pairs of GET parameters needed to reach the current document displayed - used in the Document Selector box. (see compileStoreDat())
134 var $storeUrl; // Contains storeArray, but imploded into a GET parameter string (see compileStoreDat())
135 var $storeUrlMd5; // Hashed value of storeURL (see compileStoreDat())
136
137 var $docDat; // Module session data
138 var $docHandler; // An array of the "open documents" - keys are md5 hashes (see $storeUrlMd5) identifying the various documents on the GET parameter list needed to open it. The values are arrays with 0,1,2 keys with information about the document (see compileStoreDat()). The docHandler variable is stored in the $docDat session data, key "0".
139
140
141 // Internal: Related to the form rendering:
142 var $elementsData; // Array of the elements to create edit forms for.
143 var $firstEl; // Pointer to the first element in $elementsData
144 var $errorC; // Counter, used to count the number of errors (when users do not have edit permissions)
145 var $newC; // Counter, used to count the number of new record forms displayed
146 var $viewId; // Is set to the pid value of the last shown record - thus indicating which page to show when clicking the SAVE/VIEW button
147 var $viewId_addParams; // Is set to additional parameters (like "&L=xxx") if the record supports it.
148 var $modTSconfig; // Module TSconfig, loaded from main() based on the page id value of viewId
149 var $tceforms; // Contains the instance of TCEforms class.
150 var $generalPathOfForm; // Contains the root-line path of the currently edited record(s) - for display.
151
152
153 // Internal, dynamic:
154 var $dontStoreDocumentRef; // Used internally to disable the storage of the document reference (eg. new records)
155
156
157
158
159
160
161
162 /**
163 * First initialization.
164 *
165 * @return void
166 */
167 function preInit() {
168 global $BE_USER;
169
170 // Setting GPvars:
171 $this->editconf = t3lib_div::_GP('edit');
172 $this->defVals = t3lib_div::_GP('defVals');
173 $this->overrideVals = t3lib_div::_GP('overrideVals');
174 $this->columnsOnly = t3lib_div::_GP('columnsOnly');
175 $this->returnUrl = t3lib_div::_GP('returnUrl');
176 $this->closeDoc = t3lib_div::_GP('closeDoc');
177 $this->doSave = t3lib_div::_GP('doSave');
178 $this->returnEditConf = t3lib_div::_GP('returnEditConf');
179
180 // Setting override values as default if defVals does not exist.
181 if (!is_array($this->defVals) && is_array($this->overrideVals)) {
182 $this->defVals = $this->overrideVals;
183 }
184
185 // Setting return URL
186 $this->retUrl = $this->returnUrl ? $this->returnUrl : 'dummy.php';
187
188 // Make R_URL (request url) based on input GETvars:
189 $this->R_URL_parts = parse_url(t3lib_div::getIndpEnv('REQUEST_URI'));
190 $this->R_URL_getvars = t3lib_div::_GET();
191
192 // MAKE url for storing
193 $this->compileStoreDat();
194
195 // Initialize more variables.
196 $this->dontStoreDocumentRef=0;
197 $this->storeTitle='';
198
199 // Get session data for the module:
200 $this->docDat = $BE_USER->getModuleData('alt_doc.php','ses');
201 $this->docHandler = $this->docDat[0];
202
203 // If a request for closing the document has been sent, act accordingly:
204 if ($this->closeDoc>0) {
205 $this->closeDocument($this->closeDoc);
206 }
207
208 // If NO vars are sent to the script, try to read first document:
209 if (is_array($this->R_URL_getvars) && count($this->R_URL_getvars)<2 && !is_array($this->editconf)) { // Added !is_array($this->editconf) because editConf must not be set either. Anyways I can't figure out when this situation here will apply...
210 $this->setDocument($this->docDat[1]);
211 }
212 }
213
214 /**
215 * Detects, if a save command has been triggered.
216 *
217 * @return boolean True, then save the document (data submitted)
218 */
219 function doProcessData() {
220 $out = $this->doSave || isset($_POST['_savedok_x']) || isset($_POST['_saveandclosedok_x']) || isset($_POST['_savedokview_x']) || isset($_POST['_savedoknew_x']);
221 return $out;
222 }
223
224 /**
225 * Do processing of data, submitting it to TCEmain.
226 *
227 * @return void
228 */
229 function processData() {
230 global $BE_USER,$TYPO3_CONF_VARS;
231
232 // GPvars specifically for processing:
233 $this->data = t3lib_div::_GP('data');
234 $this->mirror = t3lib_div::_GP('mirror');
235 $this->cacheCmd = t3lib_div::_GP('cacheCmd');
236 $this->redirect = t3lib_div::_GP('redirect');
237 $this->disableRTE = t3lib_div::_GP('_disableRTE');
238 $this->returnNewPageId = t3lib_div::_GP('returnNewPageId');
239 $this->vC = t3lib_div::_GP('vC');
240
241 // See tce_db.php for relevate options here:
242 // Only options related to $this->data submission are included here.
243 $tce = t3lib_div::makeInstance('t3lib_TCEmain');
244 $tce->stripslashes_values=0;
245
246 // Setting default values specific for the user:
247 $TCAdefaultOverride = $BE_USER->getTSConfigProp('TCAdefaults');
248 if (is_array($TCAdefaultOverride)) {
249 $tce->setDefaultsFromUserTS($TCAdefaultOverride);
250 }
251
252 // Setting internal vars:
253 if ($BE_USER->uc['neverHideAtCopy']) { $tce->neverHideAtCopy = 1; }
254 $tce->debug=0;
255 $tce->disableRTE = $this->disableRTE;
256
257 // Loading TCEmain with data:
258 $tce->start($this->data,array());
259 if (is_array($this->mirror)) { $tce->setMirror($this->mirror); }
260
261 // If pages are being edited, we set an instruction about updating the page tree after this operation.
262 if (isset($this->data['pages'])) {
263 t3lib_BEfunc::getSetUpdateSignal('updatePageTree');
264 }
265
266
267 // Checking referer / executing
268 $refInfo=parse_url(t3lib_div::getIndpEnv('HTTP_REFERER'));
269 $httpHost = t3lib_div::getIndpEnv('TYPO3_HOST_ONLY');
270 if ($httpHost!=$refInfo['host'] && $this->vC!=$BE_USER->veriCode() && !$TYPO3_CONF_VARS['SYS']['doNotCheckReferer']) {
271 $tce->log('',0,0,0,1,"Referer host '%s' and server host '%s' did not match and veriCode was not valid either!",1,array($refInfo['host'],$httpHost));
272 debug('Error: Referer host did not match with server host.');
273 } else {
274
275 // Perform the saving operation with TCEmain:
276 $tce->process_uploads($_FILES);
277 $tce->process_datamap();
278
279 // If there was saved any new items, load them:
280 if (count($tce->substNEWwithIDs_table)) {
281
282 // Resetting editconf:
283 $this->editconf = array();
284
285 // Traverse all new records and forge the content of ->editconf so we can continue to EDIT these records!
286 foreach($tce->substNEWwithIDs_table as $nKey => $nTable) {
287 $this->editconf[$nTable][$tce->substNEWwithIDs[$nKey]]='edit';
288 if ($nTable=='pages' && $this->retUrl!='dummy.php' && $this->returnNewPageId) {
289 $this->retUrl.='&id='.$tce->substNEWwithIDs[$nKey];
290 }
291 }
292
293 // Finally, set the editconf array in the "getvars" so they will be passed along in URLs as needed.
294 $this->R_URL_getvars['edit']=$this->editconf;
295
296 // Unsetting default values since we don't need them anymore.
297 unset($this->R_URL_getvars['defVals']);
298
299 // Re-compile the store* values since editconf changed...
300 $this->compileStoreDat();
301 }
302
303 // If a document is saved and a new one is created right after.
304 if (isset($_POST['_savedoknew_x']) && is_array($this->editconf)) {
305
306 // Finding the current table:
307 reset($this->editconf);
308 $nTable=key($this->editconf);
309
310 // Finding the first id, getting the records pid+uid
311 reset($this->editconf[$nTable]);
312 $nUid=key($this->editconf[$nTable]);
313 $nRec = t3lib_BEfunc::getRecord($nTable,$nUid,'pid,uid');
314
315 // Setting a blank editconf array for a new record:
316 $this->editconf=array();
317 if ($this->getNewIconMode($nTable)=='top') {
318 $this->editconf[$nTable][$nRec['pid']]='new';
319 } else {
320 $this->editconf[$nTable][-$nRec['uid']]='new';
321 }
322
323 // Finally, set the editconf array in the "getvars" so they will be passed along in URLs as needed.
324 $this->R_URL_getvars['edit']=$this->editconf;
325
326 // Re-compile the store* values since editconf changed...
327 $this->compileStoreDat();
328 }
329
330 $tce->printLogErrorMessages(
331 isset($_POST['_saveandclosedok_x']) ?
332 $this->retUrl :
333 $this->R_URL_parts['path'].'?'.t3lib_div::implodeArrayForUrl('',$this->R_URL_getvars) // popView will not be invoked here, because the information from the submit button for save/view will be lost .... But does it matter if there is an error anyways?
334 );
335 }
336 if (isset($_POST['_saveandclosedok_x']) || $this->closeDoc<0) { // || count($tce->substNEWwithIDs)... If any new items has been save, the document is CLOSED because if not, we just get that element re-listed as new. And we don't want that!
337 $this->closeDocument(abs($this->closeDoc));
338 }
339 }
340
341 /**
342 * Initialize the normal module operation
343 *
344 * @return void
345 */
346 function init() {
347 global $BE_USER,$LANG,$BACK_PATH;
348
349 // Setting more GPvars:
350 $this->popViewId = t3lib_div::_GP('popViewId');
351 $this->popViewId_addParams = t3lib_div::_GP('popViewId_addParams');
352 $this->viewUrl = t3lib_div::_GP('viewUrl');
353 $this->editRegularContentFromId = t3lib_div::_GP('editRegularContentFromId');
354 $this->recTitle = t3lib_div::_GP('recTitle');
355 $this->disHelp = t3lib_div::_GP('disHelp');
356 $this->noView = t3lib_div::_GP('noView');
357
358 // Set other internal variables:
359 $this->R_URL_getvars['returnUrl']=$this->retUrl;
360 $this->R_URI = $this->R_URL_parts['path'].'?'.t3lib_div::implodeArrayForUrl('',$this->R_URL_getvars);
361
362 // MENU-ITEMS:
363 // If array, then it's a selector box menu
364 // If empty string it's just a variable, that'll be saved.
365 // Values NOT in this array will not be saved in the settings-array for the module.
366 $this->MOD_MENU = array(
367 'showPalettes' => '',
368 'showDescriptions' => '',
369 'disableRTE' => ''
370 );
371
372 // Setting virtual document name
373 $this->MCONF['name']='xMOD_alt_doc.php';
374
375 // CLEANSE SETTINGS
376 $this->MOD_SETTINGS = t3lib_BEfunc::getModuleData($this->MOD_MENU, t3lib_div::_GP('SET'), $this->MCONF['name']);
377
378 // Create an instance of the document template object
379 $this->doc = t3lib_div::makeInstance('mediumDoc');
380 $this->doc->bodyTagMargins['x']=5;
381 $this->doc->bodyTagMargins['y']=5;
382 $this->doc->backPath = $BACK_PATH;
383 $this->doc->docType = 'xhtml_trans';
384
385 $this->doc->form='<form action="'.htmlspecialchars($this->R_URI).'" method="post" enctype="'.$GLOBALS['TYPO3_CONF_VARS']['SYS']['form_enctype'].'" name="editform" onsubmit="return TBE_EDITOR_checkSubmit(1);">';
386
387 $this->doc->JScode = $this->doc->wrapScriptTags('
388 function jumpToUrl(URL,formEl) { //
389 if (!TBE_EDITOR_isFormChanged()) {
390 document.location = URL;
391 } else if (formEl && formEl.type=="checkbox") {
392 formEl.checked = formEl.checked ? 0 : 1;
393 }
394 }
395
396 // Object: TS:
397 function typoSetup () { //
398 this.uniqueID = "";
399 }
400 var TS = new typoSetup();
401
402 // Info view:
403 function launchView(table,uid,bP) { //
404 var backPath= bP ? bP : "";
405 var thePreviewWindow="";
406 thePreviewWindow = window.open(backPath+"show_item.php?table="+escape(table)+"&uid="+escape(uid),"ShowItem"+TS.uniqueID,"height=300,width=410,status=0,menubar=0,resizable=0,location=0,directories=0,scrollbars=1,toolbar=0");
407 if (thePreviewWindow && thePreviewWindow.focus) {
408 thePreviewWindow.focus();
409 }
410 }
411 function deleteRecord(table,id,url) { //
412 if (confirm('.$LANG->JScharCode($LANG->getLL('deleteWarning')).')) {
413 document.location = "tce_db.php?cmd["+table+"]["+id+"][delete]=1&redirect="+escape(url)+"&vC='.$BE_USER->veriCode().'&prErr=1&uPT=1";
414 }
415 return false;
416 }
417 '.(isset($_POST['_savedokview_x']) && $this->popViewId ? t3lib_BEfunc::viewOnClick($this->popViewId,'',t3lib_BEfunc::BEgetRootLine($this->popViewId),'',$this->viewUrl,$this->popViewId_addParams) : '')
418 ).$this->doc->getDynTabMenuJScode();
419
420 // Setting up the context sensitive menu:
421 $CMparts = $this->doc->getContextMenuCode();
422 $this->doc->JScode.= $CMparts[0];
423 $this->doc->bodyTagAdditions = $CMparts[1];
424 $this->doc->postCode.= $CMparts[2];
425 }
426
427 /**
428 * Main module operation
429 *
430 * @return void
431 */
432 function main() {
433 global $BE_USER,$LANG;
434
435 // Starting content accumulation:
436 $this->content='';
437 $this->content.=$this->doc->startPage('TYPO3 Edit Document');
438
439 // Begin edit:
440 if (is_array($this->editconf)) {
441
442 // Initialize TCEforms (rendering the forms)
443 $this->tceforms = t3lib_div::makeInstance('t3lib_TCEforms');
444 $this->tceforms->initDefaultBEMode();
445 $this->tceforms->doSaveFieldName = 'doSave';
446 $this->tceforms->returnUrl = $this->R_URI;
447 $this->tceforms->palettesCollapsed = !$this->MOD_SETTINGS['showPalettes'];
448 $this->tceforms->disableRTE = $this->MOD_SETTINGS['disableRTE'];
449 $this->tceforms->enableClickMenu = TRUE;
450 $this->tceforms->enableTabMenu = TRUE;
451
452 // Clipboard is initialized:
453 $this->tceforms->clipObj = t3lib_div::makeInstance('t3lib_clipboard'); // Start clipboard
454 $this->tceforms->clipObj->initializeClipboard(); // Initialize - reads the clipboard content from the user session
455
456 // Setting external variables:
457 if ($BE_USER->uc['edit_showFieldHelp']!='text' && $this->MOD_SETTINGS['showDescriptions']) $this->tceforms->edit_showFieldHelp='text';
458
459 if ($this->editRegularContentFromId) {
460 $this->editRegularContentFromId();
461 }
462
463 // Creating the editing form, wrap it with buttons, document selector etc.
464 $editForm = $this->makeEditForm();
465 if ($editForm) {
466 reset($this->elementsData);
467 $this->firstEl = current($this->elementsData);
468
469 if ($this->viewId) {
470 // Module configuration:
471 $this->modTSconfig = t3lib_BEfunc::getModTSconfig($this->viewId,'mod.xMOD_alt_doc');
472 } else $this->modTSconfig=array();
473
474 $panel = $this->makeButtonPanel();
475 $docSel = $this->makeDocSel();
476 $cMenu = $this->makeCmenu();
477
478 $formContent = $this->compileForm($panel,$docSel,$cMenu,$editForm);
479
480 $this->content.= $this->tceforms->printNeededJSFunctions_top().
481 $formContent.
482 $this->tceforms->printNeededJSFunctions();
483 $this->content.= $this->functionMenus();
484
485 // Add CSH:
486 $this->content.= t3lib_BEfunc::cshItem('xMOD_csh_corebe', 'TCEforms', $GLOBALS['BACK_PATH'],'<br/>|',FALSE,'margin-top: 20px;');
487
488 $this->content.= $this->shortCutLink();
489
490 $this->tceformMessages();
491 }
492 }
493 }
494
495 /**
496 * Outputting the accumulated content to screen
497 *
498 * @return void
499 */
500 function printContent() {
501
502 echo $this->content.$this->doc->endPage();
503 }
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524 /***************************
525 *
526 * Sub-content functions, rendering specific parts of the module content.
527 *
528 ***************************/
529
530 /**
531 * Creates the editing form with TCEforms, based on the input from GPvars.
532 *
533 * @return string HTML form elements wrapped in tables
534 */
535 function makeEditForm() {
536 global $BE_USER,$LANG,$TCA;
537
538 // Initialize variables:
539 $this->elementsData=array();
540 $this->errorC=0;
541 $this->newC=0;
542 $thePrevUid='';
543 $editForm='';
544
545 // Traverse the GPvar edit array
546 foreach($this->editconf as $table => $conf) { // Tables:
547 if (is_array($conf) && $TCA[$table] && $BE_USER->check('tables_modify',$table)) {
548
549 // Traverse the keys/comments of each table (keys can be a commalist of uids)
550 foreach($conf as $cKey => $cmd) {
551 if ($cmd=='edit' || $cmd=='new') {
552
553 // Get the ids:
554 $ids = t3lib_div::trimExplode(',',$cKey,1);
555
556 // Traverse the ids:
557 foreach($ids as $theUid) {
558
559 // Checking if the user has permissions? (Only working as a precaution, because the final permission check is always down in TCE. But it's good to notify the user on beforehand...)
560 // First, resetting flags.
561 $hasAccess = 1;
562 $deniedAccessReason = '';
563 $deleteAccess = 0;
564 $this->viewId = 0;
565
566 // If the command is to create a NEW record...:
567 if ($cmd=='new') {
568 if (intval($theUid)) { // NOTICE: the id values in this case points to the page uid onto which the record should be create OR (if the id is negativ) to a record from the same table AFTER which to create the record.
569
570 // Find parent page on which the new record reside
571 if ($theUid<0) { // Less than zero - find parent page
572 $calcPRec=t3lib_BEfunc::getRecord($table,abs($theUid));
573 $calcPRec=t3lib_BEfunc::getRecord('pages',$calcPRec['pid']);
574 } else { // always a page
575 $calcPRec=t3lib_BEfunc::getRecord('pages',abs($theUid));
576 }
577
578 // Now, calculate whether the user has access to creating new records on this position:
579 if (is_array($calcPRec)) {
580 $CALC_PERMS = $BE_USER->calcPerms($calcPRec); // Permissions for the parent page
581 if ($table=='pages') { // If pages:
582 $hasAccess = $CALC_PERMS&8 ? 1 : 0;
583 $this->viewId = $calcPRec['pid'];
584 } else {
585 $hasAccess = $CALC_PERMS&16 ? 1 : 0;
586 $this->viewId = $calcPRec['uid'];
587 }
588 }
589 }
590 $this->dontStoreDocumentRef=1; // Don't save this document title in the document selector if the document is new.
591 } else { // Edit:
592 $calcPRec = t3lib_BEfunc::getRecord($table,$theUid);
593 t3lib_BEfunc::fixVersioningPid($table,$calcPRec);
594 if (is_array($calcPRec)) {
595 if ($table=='pages') { // If pages:
596 $CALC_PERMS = $BE_USER->calcPerms($calcPRec);
597 $hasAccess = $CALC_PERMS&2 ? 1 : 0;
598 $deleteAccess = $CALC_PERMS&4 ? 1 : 0;
599 $this->viewId = $calcPRec['uid'];
600 } else {
601 $CALC_PERMS = $BE_USER->calcPerms(t3lib_BEfunc::getRecord('pages',$calcPRec['pid'])); // Fetching pid-record first.
602 $hasAccess = $CALC_PERMS&16 ? 1 : 0;
603 $deleteAccess = $CALC_PERMS&16 ? 1 : 0;
604 $this->viewId = $calcPRec['pid'];
605
606 // Adding "&L=xx" if the record being edited has a languageField with a value larger than zero!
607 if ($TCA[$table]['ctrl']['languageField'] && $calcPRec[$TCA[$table]['ctrl']['languageField']]>0) {
608 $this->viewId_addParams = '&L='.$calcPRec[$TCA[$table]['ctrl']['languageField']];
609 }
610 }
611
612 // Check internals regarding access:
613 if ($hasAccess) {
614 $hasAccess = $BE_USER->recordEditAccessInternals($table, $calcPRec);
615 $deniedAccessReason = $BE_USER->errorMsg;
616 }
617 } else $hasAccess = 0;
618 }
619
620 // AT THIS POINT we have checked the access status of the editing/creation of records and we can now proceed with creating the form elements:
621
622 if ($hasAccess) {
623 $prevPageID = is_object($trData)?$trData->prevPageID:'';
624 $trData = t3lib_div::makeInstance('t3lib_transferData');
625 $trData->addRawData = TRUE;
626 $trData->defVals = $this->defVals;
627 $trData->lockRecords=1;
628 $trData->disableRTE = $this->MOD_SETTINGS['disableRTE'];
629 $trData->prevPageID = $prevPageID;
630 $trData->fetchRecord($table,$theUid,$cmd=='new'?'new':''); // 'new'
631 reset($trData->regTableItems_data);
632 $rec = current($trData->regTableItems_data);
633 $rec['uid'] = $cmd=='new'?uniqid('NEW'):$theUid;
634 $this->elementsData[]=array(
635 'table' => $table,
636 'uid' => $rec['uid'],
637 'cmd' => $cmd,
638 'deleteAccess' => $deleteAccess
639 );
640 if ($cmd=='new') {
641 $rec['pid'] = $theUid=='prev'?$thePrevUid:$theUid;
642 }
643
644 // Now, render the form:
645 if (is_array($rec)) {
646
647 // Setting visual path / title of form:
648 $this->generalPathOfForm = $this->tceforms->getRecordPath($table,$rec);
649 if (!$this->storeTitle) {
650 $this->storeTitle = $this->recTitle ? htmlspecialchars($this->recTitle) : t3lib_BEfunc::getRecordTitle($table,$rec,1);
651 }
652
653 // Setting variables in TCEforms object:
654 $this->tceforms->hiddenFieldList = '';
655 $this->tceforms->globalShowHelp = $this->disHelp ? 0 : 1;
656 if (is_array($this->overrideVals[$table])) {
657 $this->tceforms->hiddenFieldListArr = array_keys($this->overrideVals[$table]);
658 }
659
660 // Register default language labels, if any:
661 $this->tceforms->registerDefaultLanguageData($table,$rec);
662
663 // Create form for the record (either specific list of fields or the whole record):
664 $panel = '';
665 if ($this->columnsOnly) {
666 $panel.= $this->tceforms->getListedFields($table,$rec,$this->columnsOnly);
667 } else {
668 $panel.= $this->tceforms->getMainFields($table,$rec);
669 }
670 $panel = $this->tceforms->wrapTotal($panel,$rec,$table);
671
672 // Setting the pid value for new records:
673 if ($cmd=='new') {
674 $panel.= '<input type="hidden" name="data['.$table.']['.$rec['uid'].'][pid]" value="'.$rec['pid'].'" />';
675 $this->newC++;
676 }
677
678 // Display "is-locked" message:
679 if ($lockInfo = t3lib_BEfunc::isRecordLocked($table,$rec['uid'])) {
680 $lockIcon = '
681
682 <!--
683 Warning box:
684 -->
685 <table border="0" cellpadding="0" cellspacing="0" class="warningbox">
686 <tr>
687 <td><img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/recordlock_warning3.gif','width="17" height="12"').' alt="" /></td>
688 <td>'.htmlspecialchars($lockInfo['msg']).'</td>
689 </tr>
690 </table>
691 ';
692 } else $lockIcon = '';
693
694 // Combine it all:
695 $editForm.= $lockIcon.$panel;
696 }
697
698 $thePrevUid = $rec['uid'];
699 } else {
700 $this->errorC++;
701 $editForm.=$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.noEditPermission',1).'<br /><br />'.
702 ($deniedAccessReason ? 'Reason: '.htmlspecialchars($deniedAccessReason).'<br/><br/>' : '');
703 }
704 }
705 }
706 }
707 }
708 }
709 return $editForm;
710 }
711
712 /**
713 * Create the panel of buttons for submitting the form or otherwise perform operations.
714 *
715 * @return string HTML code, comprised of images linked to various actions.
716 */
717 function makeButtonPanel() {
718 global $TCA,$LANG;
719
720 $panel='';
721
722 // Render SAVE type buttons:
723 // The action of each button is decided by its name attribute. (See doProcessData())
724 if (!$this->errorC && !$TCA[$this->firstEl['table']]['ctrl']['readOnly']) {
725
726 // SAVE button:
727 $panel.= '<input type="image" class="c-inputButton" name="_savedok"'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/savedok.gif','').' title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:rm.saveDoc',1).'" />';
728
729 // SAVE / VIEW button:
730 if ($this->viewId && !$this->noView && t3lib_extMgm::isLoaded('cms')) {
731 $panel.= '<input type="image" class="c-inputButton" name="_savedokview"'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/savedokshow.gif','').' title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:rm.saveDocShow',1).'" />';
732 }
733
734 // SAVE / NEW button:
735 if (count($this->elementsData)==1 && $this->getNewIconMode($this->firstEl['table'])) {
736 $panel.= '<input type="image" class="c-inputButton" name="_savedoknew"'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/savedoknew.gif','').' title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:rm.saveNewDoc',1).'" />';
737 }
738
739 // SAVE / CLOSE
740 $panel.= '<input type="image" class="c-inputButton" name="_saveandclosedok"'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/saveandclosedok.gif','').' title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:rm.saveCloseDoc',1).'" />';
741 }
742
743 // CLOSE button:
744 $panel.= '<a href="#" onclick="document.editform.closeDoc.value=1; document.editform.submit(); return false;">'.
745 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/closedok.gif','width="21" height="16"').' class="c-inputButton" title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:rm.closeDoc',1).'" alt="" />'.
746 '</a>';
747
748 // DELETE + UNDO buttons:
749 if (!$this->errorC && !$TCA[$this->firstEl['table']]['ctrl']['readOnly'] && count($this->elementsData)==1) {
750 if ($this->firstEl['cmd']!='new' && t3lib_div::testInt($this->firstEl['uid'])) {
751
752 // Delete:
753 if ($this->firstEl['deleteAccess'] && !$TCA[$this->firstEl['table']]['ctrl']['readOnly'] && !$this->getNewIconMode($this->firstEl['table'],'disableDelete')) {
754 $aOnClick = 'return deleteRecord(\''.$this->firstEl['table'].'\',\''.$this->firstEl['uid'].'\',unescape(\''.rawurlencode($this->retUrl).'\'));';
755 $panel.= '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.
756 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/deletedok.gif','width="21" height="16"').' class="c-inputButton" title="'.$LANG->getLL('deleteItem',1).'" alt="" />'.
757 '</a>';
758 }
759
760 // Undo:
761 $undoButton = 0;
762 $undoRes = $GLOBALS['TYPO3_DB']->exec_SELECTquery('tstamp', 'sys_history', 'tablename='.$GLOBALS['TYPO3_DB']->fullQuoteStr($this->firstEl['table'], 'sys_history').' AND recuid='.intval($this->firstEl['uid']), '', 'tstamp DESC', '1');
763 if ($undoButtonR = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($undoRes)) {
764 $undoButton = 1;
765 }
766 if ($undoButton) {
767 $aOnClick = 'document.location=\'show_rechis.php?element='.rawurlencode($this->firstEl['table'].':'.$this->firstEl['uid']).'&revert=ALL_FIELDS&sumUp=-1&returnUrl='.rawurlencode($this->R_URI).'\'; return false;';
768 $panel.= '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.
769 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/undo.gif','width="21" height="16"').' class="c-inputButton" title="'.htmlspecialchars(sprintf($LANG->getLL('undoLastChange'),t3lib_BEfunc::calcAge(time()-$undoButtonR['tstamp'],$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.minutesHoursDaysYears')))).'" alt="" />'.
770 '</a>';
771 }
772 if ($this->getNewIconMode($this->firstEl['table'],'showHistory')) {
773 $aOnClick = 'document.location=\'show_rechis.php?element='.rawurlencode($this->firstEl['table'].':'.$this->firstEl['uid']).'&returnUrl='.rawurlencode($this->R_URI).'\'; return false;';
774 $panel.= '<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.
775 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/history2.gif','width="13" height="12"').' class="c-inputButton" alt="" />'.
776 '</a>';
777 }
778
779 // If only SOME fields are shown in the form, this will link the user to the FULL form:
780 if ($this->columnsOnly) {
781 $panel.= '<a href="'.htmlspecialchars($this->R_URI.'&columnsOnly=').'">'.
782 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/edit2.gif','width="11" height="12"').' class="c-inputButton" title="'.$LANG->getLL('editWholeRecord',1).'" alt="" />'.
783 '</a>';
784 }
785 }
786 }
787 return $panel;
788 }
789
790 /**
791 * Create the selector box form element which allows to select between open documents.
792 * Can be disabled through Page TSconfig.
793 *
794 * @return string HTML <select> element (if applicable)
795 */
796 function makeDocSel() {
797 global $BE_USER,$LANG;
798
799 // Render the selector ONLY if it has not been disabled:
800 if (!$this->modTSconfig['properties']['disableDocSelector']) {
801
802 // Checking if the currently open document is stored in the list of "open documents" - if not, then add it:
803 if ((strcmp($this->docDat[1],$this->storeUrlMd5)||!isset($this->docHandler[$this->storeUrlMd5])) && !$this->dontStoreDocumentRef) {
804 $this->docHandler[$this->storeUrlMd5]=array($this->storeTitle,$this->storeArray,$this->storeUrl);
805 $BE_USER->pushModuleData('alt_doc.php',array($this->docHandler,$this->storeUrlMd5));
806 }
807
808 // Now, create the document selector box:
809 $docSel='';
810 if (is_array($this->docHandler)) {
811 $opt = array();
812 $opt[] = '<option>[ '.$LANG->getLL('openDocs',1).': ]</option>';
813
814 // Traverse the list of open documents:
815 foreach($this->docHandler as $md5k => $setupArr) {
816 $theValue = 'alt_doc.php?'.$setupArr[2].'&returnUrl='.rawurlencode($this->retUrl);
817 $opt[]='<option value="'.htmlspecialchars($theValue).'"'.(!strcmp($md5k,$this->storeUrlMd5)?' selected="selected"':'').'>'.htmlspecialchars(strip_tags(t3lib_div::htmlspecialchars_decode($setupArr[0]))).'</option>';
818 }
819
820 // Compile the selector box finally:
821 $onChange = 'if(this.options[this.selectedIndex].value && !TBE_EDITOR_isFormChanged()){document.location=(this.options[this.selectedIndex].value);}';
822 $docSel='<select name="_docSelector" onchange="'.htmlspecialchars($onChange).'">'.implode('',$opt).'</select>';
823
824 // Add CSH:
825 $docSel.=t3lib_BEfunc::cshItem('xMOD_csh_corebe', 'TCEforms_docSelector', $GLOBALS['BACK_PATH'],'', TRUE);
826 }
827 } else $docSel='';
828 return $docSel;
829 }
830
831 /**
832 * Create the selector box form element which allows to select a clear-cache operation.
833 * Can be disabled through Page TSconfig.
834 *
835 * @return string HTML <select> element (if applicable)
836 * @see template::clearCacheMenu()
837 */
838 function makeCmenu() {
839
840 // Generate the menu if NOT disabled:
841 if (!$this->modTSconfig['properties']['disableCacheSelector']) {
842 $cMenu = $this->doc->clearCacheMenu(intval($this->viewId),!$this->modTSconfig['properties']['disableDocSelector']);
843
844 // Add CSH:
845 $cMenu.=t3lib_BEfunc::cshItem('xMOD_csh_corebe', 'TCEforms_cacheSelector', $GLOBALS['BACK_PATH'],'', TRUE);
846 } else $cMenu ='';
847 return $cMenu;
848 }
849
850 /**
851 * Put together the various elements (buttons, selectors, form) into a table
852 *
853 * @param string The button panel HTML
854 * @param string Document selector HTML
855 * @param string Clear-cache menu HTML
856 * @param string HTML form.
857 * @return string Composite HTML
858 */
859 function compileForm($panel,$docSel,$cMenu,$editForm) {
860 global $LANG;
861
862
863 $formContent='';
864 $formContent.='
865
866 <!--
867 Header of the editing page.
868 Contains the buttons for saving/closing, the document selector and menu selector.
869 Shows the path of the editing operation as well.
870 -->
871 <table border="0" cellpadding="0" cellspacing="1" width="470" id="typo3-altdoc-header">
872 <tr>
873 <td nowrap="nowrap" valign="top">'.$panel.'</td>
874 <td nowrap="nowrap" valign="top" align="right">'.$docSel.$cMenu.'</td>
875 </tr>
876 <tr>
877 <td colspan="2">'.$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.path',1).': '.htmlspecialchars($this->generalPathOfForm).'</td>
878 </tr>
879 </table>
880 <img src="clear.gif" width="1" height="4" alt="" /><br />
881
882
883
884
885 <!--
886 EDITING FORM:
887 -->
888
889 '.$editForm.'
890
891
892
893 <!--
894 Saving buttons (same as in top)
895 -->
896
897 '.$panel.
898 '<input type="hidden" name="returnUrl" value="'.htmlspecialchars($this->retUrl).'" />
899 <input type="hidden" name="viewUrl" value="'.htmlspecialchars($this->viewUrl).'" />';
900
901 if ($this->returnNewPageId) {
902 $formContent.='<input type="hidden" name="returnNewPageId" value="1" />';
903 }
904 $formContent.='<input type="hidden" name="popViewId" value="'.htmlspecialchars($this->viewId).'" />';
905 if ($this->viewId_addParams) {
906 $formContent.='<input type="hidden" name="popViewId_addParams" value="'.htmlspecialchars($this->viewId_addParams).'" />';
907 }
908 $formContent.='<input type="hidden" name="closeDoc" value="0" />';
909 $formContent.='<input type="hidden" name="doSave" value="0" />';
910 $formContent.='<input type="hidden" name="_serialNumber" value="'.md5(microtime()).'" />';
911 $formContent.='<input type="hidden" name="_disableRTE" value="'.$this->tceforms->disableRTE.'" />';
912
913 return $formContent;
914 }
915
916 /**
917 * Create the checkbox buttons in the bottom of the pages.
918 *
919 * @return string HTML for function menus.
920 */
921 function functionMenus() {
922 global $BE_USER,$LANG;
923
924 $funcMenus = '';
925
926 // Show palettes:
927 $funcMenus.= '<br /><br />'.t3lib_BEfunc::getFuncCheck('','SET[showPalettes]',$this->MOD_SETTINGS['showPalettes'],'alt_doc.php',t3lib_div::implodeArrayForUrl('',array_merge($this->R_URL_getvars,array('SET'=>'')))).$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.showPalettes',1);
928
929 // Show descriptions/help texts:
930 if ($BE_USER->uc['edit_showFieldHelp']!='text') {
931 $funcMenus.= '<br />'.t3lib_BEfunc::getFuncCheck('','SET[showDescriptions]',$this->MOD_SETTINGS['showDescriptions'],'alt_doc.php',t3lib_div::implodeArrayForUrl('',array_merge($this->R_URL_getvars,array('SET'=>'')))).$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.showDescriptions',1);
932 }
933
934 // Show disable RTE checkbox:
935 if ($BE_USER->isRTE()) {
936 $funcMenus.= '<br />'.t3lib_BEfunc::getFuncCheck('','SET[disableRTE]',$this->MOD_SETTINGS['disableRTE'],'alt_doc.php',t3lib_div::implodeArrayForUrl('',array_merge($this->R_URL_getvars,array('SET'=>'')))).$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.disableRTE',1);
937 }
938
939 return '
940
941 <!--
942 Function menus (checkboxes for selecting options):
943 -->
944 '.$funcMenus;
945 }
946
947 /**
948 * Create shortcut and open-in-window link in the bottom of the page
949 *
950 * @return string
951 */
952 function shortCutLink() {
953 global $BE_USER,$LANG;
954
955 // ShortCut
956 if ($this->returnUrl!='close.html') {
957 $content.='<br /><br />';
958
959 // Shortcut:
960 if ($BE_USER->mayMakeShortcut()) {
961 $content.=$this->doc->makeShortcutIcon('returnUrl,edit,defVals,overrideVals,columnsOnly,returnNewPageId,editRegularContentFromId,disHelp,noView',implode(',',array_keys($this->MOD_MENU)),$this->MCONF['name'],1);
962 }
963
964 // Open in new window:
965 $aOnClick = 'vHWin=window.open(\''.t3lib_div::linkThisScript(array('returnUrl'=>'close.html')).'\',\''.md5($this->R_URI).'\',\''.($BE_USER->uc['edit_wideDocument']?'width=670,height=500':'width=600,height=400').',status=0,menubar=0,scrollbars=1,resizable=1\');vHWin.focus();return false;';
966 $content.='<a href="#" onclick="'.htmlspecialchars($aOnClick).'">'.
967 '<img'.t3lib_iconWorks::skinImg($this->doc->backPath,'gfx/open_in_new_window.gif','width="19" height="14"').' title="'.$LANG->sL('LLL:EXT:lang/locallang_core.php:labels.openInNewWindow',1).'" alt="" />'.
968 '</a>';
969 }
970 return '
971
972 <!--
973 Shortcut link:
974 -->
975 '.$content;
976 }
977
978 /**
979 * Reads comment messages from TCEforms and prints them in a HTML comment in the buttom of the page.
980 *
981 * @return void
982 */
983 function tceformMessages() {
984 if (count($this->tceforms->commentMessages)) {
985 $this->content.='
986
987 <!-- TCEFORM messages
988 '.htmlspecialchars(implode(chr(10),$this->tceforms->commentMessages)).'
989 -->
990
991 ';
992 }
993 }
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010 /***************************
1011 *
1012 * Other functions
1013 *
1014 ***************************/
1015
1016 /**
1017 * Function, which populates the internal editconf array with editing commands for all tt_content elements from the normal column in normal language from the page pointed to by $this->editRegularContentFromId
1018 *
1019 * @return void
1020 */
1021 function editRegularContentFromId() {
1022 if (t3lib_extMgm::isLoaded('cms')) {
1023 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
1024 'uid',
1025 'tt_content',
1026 'pid='.intval($this->editRegularContentFromId).
1027 t3lib_BEfunc::deleteClause('tt_content').
1028 ' AND colPos=0 AND sys_language_uid=0',
1029 '',
1030 'sorting'
1031 );
1032 if ($GLOBALS['TYPO3_DB']->sql_num_rows($res)) {
1033 $ecUids=array();
1034 while($ecRec = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
1035 $ecUids[]=$ecRec['uid'];
1036 }
1037 $this->editconf['tt_content'][implode(',',$ecUids)]='edit';
1038 }
1039 }
1040 }
1041
1042 /**
1043 * Populates the variables $this->storeArray, $this->storeUrl, $this->storeUrlMd5
1044 *
1045 * @return void
1046 * @see makeDocSel()
1047 */
1048 function compileStoreDat() {
1049 $this->storeArray = t3lib_div::compileSelectedGetVarsFromArray('edit,defVals,overrideVals,columnsOnly,disHelp,noView,editRegularContentFromId',$this->R_URL_getvars);
1050 $this->storeUrl = t3lib_div::implodeArrayForUrl('',$this->storeArray);
1051 $this->storeUrlMd5 = md5($this->storeUrl);
1052 }
1053
1054 /**
1055 * Function used to look for configuration of buttons in the form: Fx. disabling buttons or showing them at various positions.
1056 *
1057 * @param string The table for which the configuration may be specific
1058 * @param string The option for look for. Default is checking if the saveDocNew button should be displayed.
1059 * @return string Return value fetched from USER TSconfig
1060 */
1061 function getNewIconMode($table,$key='saveDocNew') {
1062 global $BE_USER;
1063 $TSconfig = $BE_USER->getTSConfig('options.'.$key);
1064 $output = trim(isset($TSconfig['properties'][$table]) ? $TSconfig['properties'][$table] : $TSconfig['value']);
1065 return $output;
1066 }
1067
1068 /**
1069 * Handling the closing of a document
1070 *
1071 * @param integer Close code: 0/1 will redirect to $this->retUrl, 3 will clear the docHandler (thus closing all documents) and otehr values will call setDocument with ->retUrl
1072 * @return void
1073 */
1074 function closeDocument($code=0) {
1075 global $BE_USER;
1076
1077 // If current document is found in docHandler, then unset it, possibly unset it ALL and finally, write it to the session data:
1078 if (isset($this->docHandler[$this->storeUrlMd5])) {
1079 unset($this->docHandler[$this->storeUrlMd5]);
1080 if ($code=='3') $this->docHandler=array();
1081 $BE_USER->pushModuleData('alt_doc.php',array($this->docHandler,$this->docDat[1]));
1082 }
1083
1084 // If ->returnEditConf is set, then add the current content of editconf to the ->retUrl variable: (used by other scripts, like wizard_add, to know which records was created or so...)
1085 if ($this->returnEditConf && $this->retUrl!='dummy.php') {
1086 $this->retUrl.='&returnEditConf='.rawurlencode(serialize($this->editconf));
1087 }
1088
1089 // If code is NOT set OR set to 1, then make a header location redirect to $this->retUrl
1090 if (!$code || $code==1) {
1091 Header('Location: '.t3lib_div::locationHeaderUrl($this->retUrl));
1092 exit;
1093 } else {
1094 $this->setDocument('',$this->retUrl);
1095 }
1096 }
1097
1098 /**
1099 * Redirects to the document pointed to by $currentDocFromHandlerMD5 OR $retUrl (depending on some internal calculations).
1100 * Most likely you will get a header-location redirect from this function.
1101 *
1102 * @param string Pointer to the document in the docHandler array
1103 * @param string Alternative/Default retUrl
1104 * @return void
1105 */
1106 function setDocument($currentDocFromHandlerMD5='',$retUrl='alt_doc_nodoc.php') {
1107 if (!t3lib_extMgm::isLoaded('cms') && !strcmp($retUrl,'alt_doc_nodoc.php')) return;
1108
1109 if (!$this->modTSconfig['properties']['disableDocSelector'] && is_array($this->docHandler) && count($this->docHandler)) {
1110 if (isset($this->docHandler[$currentDocFromHandlerMD5])) {
1111 $setupArr=$this->docHandler[$currentDocFromHandlerMD5];
1112 } else {
1113 reset($this->docHandler);
1114 $setupArr=current($this->docHandler);
1115 }
1116 if ($setupArr[2]) {
1117 $sParts = parse_url(t3lib_div::getIndpEnv('REQUEST_URI'));
1118 $retUrl = $sParts['path'].'?'.$setupArr[2].'&returnUrl='.rawurlencode($retUrl);
1119 }
1120 }
1121 Header('Location: '.t3lib_div::locationHeaderUrl($retUrl));
1122 exit;
1123 }
1124 }
1125
1126 // Include extension?
1127 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/alt_doc.php']) {
1128 include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/alt_doc.php']);
1129 }
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146 // Make instance:
1147 $SOBE = t3lib_div::makeInstance('SC_alt_doc');
1148
1149 // Preprocessing, storing data if submitted to
1150 $SOBE->preInit();
1151 if ($SOBE->doProcessData()) { // Checks, if a save button has been clicked (or the doSave variable is sent)
1152 require_once (PATH_t3lib.'class.t3lib_tcemain.php');
1153 $SOBE->processData();
1154 }
1155
1156 require_once (PATH_t3lib.'class.t3lib_loaddbgroup.php');
1157 require_once (PATH_t3lib.'class.t3lib_transferdata.php');
1158
1159
1160 // Main:
1161 $SOBE->init();
1162 $SOBE->main();
1163 $SOBE->printContent();
1164 ?>