Updated copyright notices to show "2004"
[Packages/TYPO3.CMS.git] / typo3 / wizard_add.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 1999-2004 Kasper Skaarhoj (kasper@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 * Wizard to add new records to a group/select TCEform formfield
29 *
30 * $Id$
31 * Revised for TYPO3 3.6 November/2003 by Kasper Skaarhoj
32 *
33 * @author Kasper Skaarhoj <kasper@typo3.com>
34 */
35 /**
36 * [CLASS/FUNCTION INDEX of SCRIPT]
37 *
38 *
39 *
40 * 75: class SC_wizard_add
41 * 104: function init()
42 * 157: function main()
43 *
44 * TOTAL FUNCTIONS: 2
45 * (This index is automatically created/updated by the extension "extdeveval")
46 *
47 */
48
49
50 $BACK_PATH='';
51 require ('init.php');
52 require ('template.php');
53 include ('sysext/lang/locallang_wizards.php');
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68 /**
69 * Script Class for adding new items to a group/select field. Performs proper redirection as needed.
70 *
71 * @author Kasper Skaarhoj <kasper@typo3.com>
72 * @package TYPO3
73 * @subpackage core
74 */
75 class SC_wizard_add {
76
77 // Internal, dynamic:
78 var $content; // Content accumulation for the module.
79 var $include_once=array(); // List of files to include.
80
81 var $processDataFlag=0; // If set, the TCEmain class is loaded and used to add the returning ID to the parent record.
82
83 // Internal, static:
84 var $pid; // Create new record -pid (pos/neg). If blank, return immediately
85 var $table; // The parent table we are working on.
86 var $id; // Loaded with the created id of a record when TCEforms (alt_doc.php) returns ...
87
88 // Internal, static: GPvars
89 var $P; // Wizard parameters, coming from TCEforms linking to the wizard.
90 var $returnEditConf; // Information coming back from alt_doc.php script, telling what the table/id was of the newly created record.
91
92
93
94
95
96
97
98
99 /**
100 * Initialization of the class.
101 *
102 * @return void
103 */
104 function init() {
105
106 // Init GPvars:
107 $this->P = t3lib_div::GPvar('P',1);
108 $this->returnEditConf = t3lib_div::GPvar('returnEditConf');
109
110 // Get this record
111 $origRow = t3lib_BEfunc::getRecord($this->P['table'],$this->P['uid']);
112
113 // Set table:
114 $this->table = $this->P['params']['table'];
115
116 // Get TSconfig for it.
117 $TSconfig = t3lib_BEfunc::getTCEFORM_TSconfig($this->table,is_array($origRow)?$origRow:array('pid'=>$this->P['pid']));
118
119 // Set [params][pid]
120 if (substr($this->P['params']['pid'],0,3)=='###' && substr($this->P['params']['pid'],-3)=='###') {
121 $this->pid = intval($TSconfig['_'.substr($this->P['params']['pid'],3,-3)]);
122 } else $this->pid = intval($this->P['params']['pid']);
123
124 // Return if new record as parent (not possibly/allowed)
125 if (!strcmp($this->pid,'')) {
126 header('Location: '.t3lib_div::locationHeaderUrl($this->P['returnUrl']));
127 exit;
128 }
129
130 // Else proceed:
131 if ($this->returnEditConf) { // If a new id has returned from a newly created record...
132 $eC = unserialize($this->returnEditConf);
133 if (is_array($eC[$this->table]) && t3lib_div::testInt($this->P['uid'])) {
134
135 // Getting id and cmd from returning editConf array.
136 reset($eC[$this->table]);
137 $this->id = intval(key($eC[$this->table]));
138 $cmd = current($eC[$this->table]);
139
140 // ... and if everything seems OK we will register some classes for inclusion and instruct the object to perform processing later.
141 if ($this->P['params']['setValue'] && $cmd=='edit' && $this->id && $this->P['table'] && $this->P['field'] && $this->P['uid']) {
142 $this->include_once[]=PATH_t3lib.'class.t3lib_loaddbgroup.php';
143 $this->include_once[]=PATH_t3lib.'class.t3lib_transferdata.php';
144 $this->include_once[]=PATH_t3lib.'class.t3lib_tcemain.php';
145 $this->processDataFlag=1;
146 }
147 }
148 }
149 }
150
151 /**
152 * Main function
153 * Will issue a location-header, redirecting either BACK or to a new alt_doc.php instance...
154 *
155 * @return void
156 */
157 function main() {
158
159 if ($this->returnEditConf) {
160 if ($this->processDataFlag) {
161
162 // Preparing the data of the parent record...:
163 $trData = t3lib_div::makeInstance('t3lib_transferData');
164 $trData->fetchRecord($this->P['table'],$this->P['uid'],''); // 'new'
165 reset($trData->regTableItems_data);
166 $current = current($trData->regTableItems_data);
167
168 // If that record was found (should absolutely be...), then init TCEmain and set, prepend or append the record
169 if (is_array($current)) {
170 $tce = t3lib_div::makeInstance('t3lib_TCEmain');
171 $data=array();
172 $addEl = $this->table.'_'.$this->id;
173 switch((string)$this->P['params']['setValue']) {
174 case 'set':
175 $data[$this->P['table']][$this->P['uid']][$this->P['field']]=$addEl;
176 break;
177 case 'prepend':
178 $data[$this->P['table']][$this->P['uid']][$this->P['field']] = $current[$this->P['field']].','.$addEl;
179 break;
180 case 'append':
181 $data[$this->P['table']][$this->P['uid']][$this->P['field']] = $addEl.','.$current[$this->P['field']];
182 break;
183 }
184
185 // Setting the new field data:
186 $data[$this->P['table']][$this->P['uid']][$this->P['field']] = implode(',',t3lib_div::trimExplode(',',$data[$this->P['table']][$this->P['uid']][$this->P['field']],1));
187
188 // Submit the data:
189 $tce->start($data,array());
190 $tce->stripslashes_values=0;
191 $tce->process_datamap();
192 }
193 }
194 // Return to the parent alt_doc.php record editing session:
195 header('Location: '.t3lib_div::locationHeaderUrl($this->P['returnUrl']));
196 } else {
197 // Redirecting to alt_doc.php with instructions to create a new record AND when closing to return back with information about that records ID etc.
198 header('Location: '.t3lib_div::locationHeaderUrl('alt_doc.php?returnUrl='.rawurlencode(t3lib_div::getIndpEnv('REQUEST_URI')).'&returnEditConf=1&edit['.$this->P['params']['table'].']['.$this->pid.']=new'));
199 }
200 }
201 }
202
203 // Include extension?
204 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/wizard_add.php']) {
205 include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['typo3/wizard_add.php']);
206 }
207
208
209
210
211
212
213
214
215
216
217
218
219 // Make instance:
220 $SOBE = t3lib_div::makeInstance('SC_wizard_add');
221 $SOBE->init();
222
223 // Include files?
224 foreach($SOBE->include_once as $INC_FILE) include_once($INC_FILE);
225
226 $SOBE->main();
227 $SOBE->printContent();
228 ?>