QuickFormQuery.php 58.8 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
<?php
/**
 * Created by PhpStorm.
 * User: ep
 * Date: 12/23/15
 * Time: 6:33 PM
 */

namespace qfq;

Carsten  Rose's avatar
Carsten Rose committed
11
use qfq;
12
13
14
15
16
17
18
19
20

//use qfq\Report;

//use qfq\BuildFormPlain;
//use qfq\BuildFormTable;
//use qfq\BuildFormBootstrap;
//use qfq\UserException;
//use qfq\CodeException;
//use qfq\DbException;
21
//use qfq\helper;
22
//use qfq\Store;
Carsten  Rose's avatar
Carsten Rose committed
23

Carsten  Rose's avatar
Carsten Rose committed
24

25
26
27
28
29
30
31
32
33
34
35
require_once(__DIR__ . '/store/Store.php');
require_once(__DIR__ . '/store/FillStoreForm.php');
require_once(__DIR__ . '/store/Session.php');
require_once(__DIR__ . '/Constants.php');
require_once(__DIR__ . '/Save.php');
require_once(__DIR__ . '/helper/KeyValueStringParser.php');
require_once(__DIR__ . '/helper/HelperFormElement.php');
require_once(__DIR__ . '/exceptions/UserFormException.php');
require_once(__DIR__ . '/exceptions/CodeException.php');
require_once(__DIR__ . '/exceptions/DbException.php');
require_once(__DIR__ . '/exceptions/ErrorHandler.php');
36
37
require_once(__DIR__ . '/database/Database.php');
require_once(__DIR__ . '/database/DatabaseUpdate.php');
38
39
40
41
42
require_once(__DIR__ . '/Evaluate.php');
require_once(__DIR__ . '/BuildFormPlain.php');
require_once(__DIR__ . '/BuildFormTable.php');
require_once(__DIR__ . '/BuildFormBootstrap.php');
require_once(__DIR__ . '/report/Report.php');
43
require_once(__DIR__ . '/report/Monitor.php');
44
45
require_once(__DIR__ . '/BodytextParser.php');
require_once(__DIR__ . '/Delete.php');
46
require_once(__DIR__ . '/form/FormAction.php');
Carsten  Rose's avatar
Carsten Rose committed
47
require_once(__DIR__ . '/form/Dirty.php');
48
require_once(__DIR__ . '/form/DragAndDrop.php');
49
50
51
52
53
54
55
56
57
58
59
60
/*
 * Form will be called
 * a) with a SIP identifier, or
 * b) without a SIP identifier (form setting has to allow this) and will create on the fly a new SIP.
 *
 * The SIP-Store stores:
 *  form=<formname>
 *  r=<record id>  (table.id for a single record form)
 *  keySemId,keySemIduser
 *  <further individual variables>
 */

Carsten  Rose's avatar
Carsten Rose committed
61
/**
62
 * Class Qfq
Carsten  Rose's avatar
Carsten Rose committed
63
64
 * @package qfq
 */
65
class QuickFormQuery {
66

67
    /**
68
     * @var \qfq\Store instantiated class
69
     */
Carsten  Rose's avatar
Carsten Rose committed
70
    protected $store = null;
71

72
    /**
73
     * @var \qfq\Database[] - Array of Database instantiated class
74
     */
75
    protected $dbArray = array();
76

77
78
79
80
    /**
     * @var Evaluate instantiated class
     */
    protected $eval = null;
81
82
83
    protected $formSpec = array();
    protected $feSpecAction = array();  // Form Definition: copy of the loaded form
    protected $feSpecNative = array(); // FormEelement Definition: all formElement.class='action' of the loaded form
84
    protected $feSpecNativeRaw = array(); // FormEelement Definition: all formElement.class='action' of the loaded form
85

86
87
88
89
    /**
     * @var array
     */
    private $t3data = array(); // FormEelement Definition: all formElement.class='native' of the loaded form
90

91
92
93
    /**
     * @var bool
     */
94
95
    private $phpUnit = false;

96
97
98
99
100
    /**
     * @var Session
     */
    private $session = null;

101
102
103
    private $dbIndexData = false;
    private $dbIndexQfq = false;

104
105
106
107
108
109
110
111
112
113
114
    /*
     * TODO:
     *  Preparation: setup logging, database access, record locking
     *  fill stores
     *  Check permission_create / permission_update
     *  Multi: iterate over all records, Single: activate record
     *      Check mode: Load | Save
     *      doActions 'Before'
     *      Do all FormElements
     *      doActions 'After'
     */
115

116
117
118
    /**
     * Construct the Form Class and Store too. This is the base initialization moment.
     *
119
120
     * As a result of instantiating of Form, the class Store will initially called the first time and therefore
     * instantiated automatically. Store might throw an exception, in case the URL-passed SIP is invalid.
121
     *
122
     * @param array $t3data
Carsten  Rose's avatar
Carsten Rose committed
123
     * @param bool $phpUnit
124
     *
125
     * @throws CodeException
Carsten  Rose's avatar
Carsten Rose committed
126
     * @throws DbException
127
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
128
     * @throws UserReportException
129
     */
130
131
    public function __construct(array $t3data = array(), $phpUnit = false) {

132
133
        $this->phpUnit = $phpUnit;

134
        mb_internal_encoding("UTF-8");
135

136
137
        $this->session = Session::getInstance($phpUnit);

138
        // Refresh the session even if no new data saved.
139
        Session::set('LAST_ACTIVITY', time());
140

141
        set_error_handler("\\qfq\\ErrorHandler::exception_error_handler");
Carsten  Rose's avatar
Carsten Rose committed
142
143
        // PHPExcel
        set_include_path(get_include_path() . PATH_SEPARATOR . '../../Resources/Private/Classes/');
144

145
146
147
148
149
150
151
        if (!isset($t3data[T3DATA_BODYTEXT])) {
            $t3data[T3DATA_BODYTEXT] = '';
        }

        if (!isset($t3data[T3DATA_UID])) {
            $t3data[T3DATA_UID] = 0;
        }
152

153
        $btp = new BodytextParser();
154
        $t3data[T3DATA_BODYTEXT_RAW] = $t3data[T3DATA_BODYTEXT];
155
        $t3data[T3DATA_BODYTEXT] = $btp->process($t3data[T3DATA_BODYTEXT]);
156

157
158
        $this->t3data = $t3data;

159
        $bodytext = $this->t3data[T3DATA_BODYTEXT];
160
161

        $this->store = Store::getInstance($bodytext, $phpUnit);
162
        $this->store->setVar(TYPO3_TT_CONTENT_UID, $t3data[T3DATA_UID], STORE_TYPO3);
163

164
165
        $this->dbIndexData = $this->store->getVar(SYSTEM_DB_INDEX_DATA, STORE_SYSTEM);
        $this->dbIndexQfq = $this->store->getVar(SYSTEM_DB_INDEX_QFQ, STORE_SYSTEM);
166

167
        $this->dbArray[$this->dbIndexData] = new Database($this->dbIndexData);
168
169
170
171

        $dbName = $this->dbArray[$this->dbIndexData]->getDbName();
        $this->store->setVar(SYSTEM_DB_NAME_DATA, $dbName, STORE_SYSTEM);

172
173
        if ($this->dbIndexData != $this->dbIndexQfq) {
            $this->dbArray[$this->dbIndexQfq] = new Database($this->dbIndexQfq);
174
175

            $dbName = $this->dbArray[$this->dbIndexQfq]->getDbName();
176
        }
177
178
        $this->store->setVar(SYSTEM_DB_NAME_QFQ, $dbName, STORE_SYSTEM);

179

180
        $this->eval = new Evaluate($this->store, $this->dbArray[$this->dbIndexData]);
181

182
        $dbUpdate = $this->store->getVar(SYSTEM_DB_UPDATE, STORE_SYSTEM);
183
        $updateDb = new DatabaseUpdate($this->dbArray[$this->dbIndexQfq]);
184
        $updateDb->checkNupdate($dbUpdate);
185

186
        $this->store->StoreSystemUpdate(); // Do this after the DB-update
187
188
189
190
191
192

        // Set dbIndex, evaluate any
        $dbIndex = $this->store->getVar(TOKEN_DB_INDEX, STORE_TYPO3 . STORE_EMPTY);
        $dbIndex = $this->eval->parse($dbIndex);
        $dbIndex = ($dbIndex == '') ? DB_INDEX_DEFAULT : $dbIndex;
        $this->store->setVar(TOKEN_DB_INDEX, $dbIndex, STORE_TYPO3);
Carsten  Rose's avatar
Carsten Rose committed
193
194
    }

195
    /**
196
     * Returns the defined forwardMode and set forwardPage
197
     *
198
     * @return array
199
200
     * @throws CodeException
     * @throws UserFormException
201
     */
202
203
    public function getForwardMode() {

204
        $forwardPage = $this->formSpec[F_FORWARD_PAGE];
205

Carsten  Rose's avatar
Carsten Rose committed
206
207
208
209
        if ($this->formSpec[F_FORWARD_MODE] == F_FORWARD_MODE_URL_SIP) {
            $forwardPage = store::getSipInstance()->queryStringToSip($forwardPage, RETURN_URL);
            // F_FORWARD_MODE_URL_SIP is not defined in API PROTOCOL. At the moment it's only used for 'copyForm'.
            // 'copyForm' behaves better if the page is not in history.
210
            // An option for better implementing would be to separate SKIP History from ForwardMode. For API, it can be combined again.
Carsten  Rose's avatar
Carsten Rose committed
211
212
213
            $this->formSpec[F_FORWARD_MODE] = F_FORWARD_MODE_URL_SKIP_HISTORY;
        }

214
215
        return ([
            API_REDIRECT => $this->formSpec[F_FORWARD_MODE],
Carsten  Rose's avatar
Carsten Rose committed
216
            API_REDIRECT_URL => $forwardPage,
217
        ]);
218
219
    }

220
    /**
Carsten  Rose's avatar
Carsten Rose committed
221
     * Main entrypoint for display content: a) form and/or b) report
222
     *
223
     * @return string
224
225
     * @throws CodeException
     * @throws DbException
226
     * @throws DownloadException
227
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
228
     * @throws UserReportException
Carsten  Rose's avatar
Carsten Rose committed
229
     */
230
    public function process() {
231
        $html = '';
232

233
        if ($this->store->getVar(TYPO3_DEBUG_SHOW_BODY_TEXT, STORE_TYPO3) === 'yes') {
234
235
            $htmlId = HelperFormElement::buildFormElementId($this->formSpec[F_ID], 0, 0, 0);
            $html .= Support::doTooltip($htmlId . HTML_ID_EXTENSION_TOOLTIP, $this->t3data['bodytext']);
236
237
238
        }

        $html .= $this->doForm(FORM_LOAD);
239
        $html .= $this->doReport();
Carsten  Rose's avatar
Carsten Rose committed
240

241
        // Only needed if there are potential 'download'-links, which shall show a popup during processing of the download.
Carsten  Rose's avatar
Carsten Rose committed
242
243
244
245
        if ($this->store->getVar(SYSTEM_DOWNLOAD_POPUP, STORE_SYSTEM) == DOWNLOAD_POPUP_REQUEST) {
            $html .= $this->getModalCode();
        }

246
247
248
249
250
        // Only needed if there are 'drag and drop' elements.
        if ($this->store->getVar(SYSTEM_DRAG_AND_DROP_JS, STORE_SYSTEM) == 'true') {
            $html .= $this->getDragAndDropCode();
        }

251
        $class = $this->store->getVar(SYSTEM_CSS_CLASS_QFQ_CONTAINER, STORE_SYSTEM);
Carsten  Rose's avatar
Carsten Rose committed
252
        if ($class) {
253
            $html = Support::wrapTag("<div class='$class'>", $html);
Carsten  Rose's avatar
Carsten Rose committed
254
255
        }

256
        return $html;
257
258
    }

259
260
    /**
     * Determine the name of the language parameter field, which has to be taken to fill language specific defintions.
261
262
263
     *
     * @throws CodeException
     * @throws UserFormException
264
265
266
267
268
269
270
271
272
     */
    private function setParameterLanguageFieldName() {

        $typo3PageLanguage = $this->store->getVar(TYPO3_PAGE_LANGUAGE, STORE_TYPO3);
        if (empty($typo3PageLanguage)) {
            return;
        }

        foreach (['A', 'B', 'C', 'D'] as $key) {
273
            $languageIdx = SYSTEM_FORM_LANGUAGE . "$key" . "Id";
274
275
276
277
278
279
280
            if ($this->store->getVar($languageIdx, STORE_SYSTEM) == $typo3PageLanguage) {
                $this->store->setVar(SYSTEM_PARAMETER_LANGUAGE_FIELD_NAME, 'parameterLanguage' . $key, STORE_SYSTEM);
                break;
            }
        }
    }

281
    /**
282
283
     * Creates an empty file. This indicates that the current form is in debug mode. Returns HTML element which will be
     * replaced by the logfile.
284
285
286
287
288
289
290
291
292
293
294
     *
     * @param $formName
     * @param $formLogMode
     * @return
     * @throws CodeException
     * @throws UserFormException
     * @throws UserReportException
     */
    private function getFormLog($formName, $formLogMode) {

        $formLogFileName = Support::getFormLogFileName($formName, $formLogMode);
295
        file_put_contents($formLogFileName, '');
296

297
298
        $monitor = new Monitor();

299
300
        return "<pre id='" . FORM_LOG_HTML_ID . "'>Please wait</pre>" .
            $monitor->process([TOKEN_L_FILE => $formLogFileName, TOKEN_L_APPEND => '1', TOKEN_L_HTML_ID => FORM_LOG_HTML_ID]);
301
    }
302

303
    /**
304
     * Process form.
305
306
307
308
309
     * $mode=
     *   FORM_LOAD: The whole form will be rendered as HTML Code, including the values of all form elements
     *   FORM_UPDATE: States and values of all form elements will be returned as JSON.
     *   FORM_SAVE: The submitted form will be saved. Return Failure or Success as JSON.
     *   FORM_DELETE:
310
     *
311
     * @param string $formMode FORM_LOAD | FORM_UPDATE | FORM_SAVE | FORM_DELETE
312
     *
313
     * @return array|string
314
     * @throws CodeException
315
     * @throws DbException
316
     * @throws DownloadException
317
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
318
     * @throws UserReportException
319
     */
320
    private function doForm($formMode) {
Carsten  Rose's avatar
Carsten Rose committed
321
        $data = '';
Carsten  Rose's avatar
Carsten Rose committed
322
        $foundInStore = '';
323

Carsten  Rose's avatar
Carsten Rose committed
324
        // Fill STORE_FORM
325
        if ($formMode === FORM_UPDATE || $formMode === FORM_SAVE || $formMode === FORM_DRAG_AND_DROP) {
Carsten  Rose's avatar
Carsten Rose committed
326
            $fillStoreForm = new FillStoreForm();
327
            $fillStoreForm->process($formMode);
Carsten  Rose's avatar
Carsten Rose committed
328
        }
329

330
        $recordId = $this->store->getVar(SIP_RECORD_ID, STORE_SIP . STORE_TYPO3 . STORE_CLIENT . STORE_ZERO);
331
        $this->setParameterLanguageFieldName();
332

333
334
335
        $formName = $this->loadFormSpecification($formMode, $recordId, $foundInStore, $formLogMode);
        if ($formName !== false && $formLogMode !== false) {
            return $this->getFormLog($formName, $formLogMode);
336
337
        }

338
        if ($formName === false) {
339
            switch ($formMode) {
340
341
342
343
344
345
346
                case FORM_DELETE:
                    break;
                case FORM_DRAG_AND_DROP:
                    throw new CodeException('Missing form in SIP', ERROR_MISSING_FORM);
                default:
                    return '';// No form found: do nothing
            }
347
        }
348

349
350
        if ($formName !== false) {
            // Validate only if there is a 'real' form (not a FORM_DELETE with only a tablename).
351
            $sipFound = $this->validateForm($foundInStore, $formMode);
352
353

        } else {
354
            // FORM_DELETE without a form definition: Fake the form with only a tableName.
355
356
            $table = $this->store->getVar(SIP_TABLE, STORE_SIP);
            if ($table === false) {
357
                throw new UserFormException("No 'form' and no 'table' definition found.", ERROR_MISSING_VALUE);
358
            }
359

360
361
362
            $sipFound = true;
            $this->formSpec[F_NAME] = '';
            $this->formSpec[F_TABLE_NAME] = $table;
363
364
            $this->formSpec[F_RECORD_LOCK_TIMEOUT_SECONDS] = 1; // just indicate a timeout, the exact timeout is stored in the dirty record.
            $this->formSpec[F_DIRTY_MODE] = DIRTY_MODE_EXCLUSIVE; // just set a mode,, the exact mode is stored in the dirty record.
365
366
367
368
369
370
371
372
373
374

            $tmpDbIndexData = $this->store->getVar(PARAM_DB_INDEX_DATA, STORE_SIP);
            if (!empty($tmpDbIndexData)) {
                $this->formSpec[F_DB_INDEX] = $tmpDbIndexData;
                if ($tmpDbIndexData != $this->dbIndexData) {
                    if (!isset($this->dbArray[$tmpDbIndexData])) {
                        $this->dbArray[$tmpDbIndexData] = new Database($tmpDbIndexData);
                    }
                }
            }
375
376
        }

377
378
        // For 'new' record always create a new Browser TAB-uniq (for this current form, nowhere else used) SIP.
        // With such a Browser TAB-uniq SIP, multiple Browser TABs and following repeated NEWs are easily implemented.
379
        if (!$sipFound || ($formMode == FORM_LOAD && $recordId === 0)) {
380
381
            $this->store->createSipAfterFormLoad($formName);
        }
382

383
384
        if ($this->store->getVar($this->formSpec[F_TABLE_ID], STORE_BEFORE) === false) {
            $this->fillStoreWithRecord($this->formSpec, $recordId, STORE_BEFORE);
385
386
        }

387
        // Check (and release) dirtyRecord.
Carsten  Rose's avatar
Carsten Rose committed
388
        if ($formMode === FORM_DELETE || $formMode === FORM_SAVE) {
389
            $dirty = new Dirty(false, $this->dbIndexData, $this->dbIndexQfq);
Carsten  Rose's avatar
Carsten Rose committed
390

391
            $answer = $dirty->checkDirtyAndRelease($formMode, $this->formSpec[F_RECORD_LOCK_TIMEOUT_SECONDS],
Carsten  Rose's avatar
Carsten Rose committed
392
                $this->formSpec[F_DIRTY_MODE], $this->formSpec[F_TABLE_NAME], $recordId, true);
393

394
            // In case of a conflict, return immediately
Carsten  Rose's avatar
Carsten Rose committed
395
396
            if ($answer[API_STATUS] != API_ANSWER_STATUS_SUCCESS) {
                $answer[API_STATUS] = API_ANSWER_STATUS_ERROR;
397

398
399
                return $answer;
            }
Carsten  Rose's avatar
Carsten Rose committed
400
401
        }

402
403
        // FORM_LOAD: if there is an foreign exclusive record lock - show form in F_MODE_READONLY mode.
        if ($formMode === FORM_LOAD) {
404
            $dirty = new Dirty(false, $this->dbIndexData, $this->dbIndexQfq);
405
406
407
408
409
410
411
            $recordDirty = array();
            $rcLockFound = $dirty->getCheckDirty($this->formSpec[F_TABLE_NAME], $recordId, $recordDirty, $msg);
            if (($rcLockFound == LOCK_FOUND_CONFLICT || $rcLockFound == LOCK_FOUND_OWNER) && $recordDirty[F_DIRTY_MODE] == DIRTY_MODE_EXCLUSIVE) {
                $this->formSpec[F_MODE] = F_MODE_READONLY;
            }
        }

412
        if ($formMode === FORM_DELETE) {
413

414
            $build = new Delete($this->dbIndexData);
415
416

        } else {
417
            $tableDefinition = $this->dbArray[$this->dbIndexData]->getTableDefinition($this->formSpec[F_TABLE_NAME]);
418
            $this->store->fillStoreTableDefaultColumnType($tableDefinition);
419
420
421

            switch ($this->formSpec['render']) {
                case 'plain':
422
                    $build = new BuildFormPlain($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
423
424
                    break;
                case 'table':
425
                    $build = new BuildFormTable($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
426
427
                    break;
                case 'bootstrap':
428
                    $build = new BuildFormBootstrap($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
429
430
431
432
                    break;
                default:
                    throw new CodeException("This statement should never be reached", ERROR_CODE_SHOULD_NOT_HAPPEN);
            }
433
434
        }

435
        $formAction = new FormAction($this->formSpec, $this->dbArray[$this->dbIndexData], $this->phpUnit);
436
        switch ($formMode) {
437
            case FORM_LOAD:
438
439
440
441
442
443
444
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);
                $data = $build->process($formMode);
                $data = Support::wrapTag("<div class='" . 'col-md-' . $this->formSpec[F_BS_COLUMNS] . "'>", $data);
                $data = Support::wrapTag("<div class='row'>", $data);
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_LOAD);
                break;

Carsten  Rose's avatar
Carsten Rose committed
445
            case FORM_UPDATE:
446
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);
447
448
                // data['form-update']=....
                $data = $build->process($formMode);
449
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_LOAD);
450
                break;
Carsten  Rose's avatar
Carsten Rose committed
451

452
453
454
455
456
457
458
459
            case FORM_DELETE:
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_DELETE);

                $build->process($this->formSpec[F_TABLE_NAME], $recordId);

                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_DELETE);
                break;

460
            case FORM_SAVE:
461
462
                $recordId = $this->store->getVar(SIP_RECORD_ID, STORE_SIP);

463
                // Action: Before
464
465
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_INSERT . ',' . FE_TYPE_BEFORE_UPDATE . ',' . FE_TYPE_BEFORE_SAVE);

466
                // If an old record exist: load it. Necessary to delete uploaded files which should be overwritten.
467
                $this->fillStoreWithRecord($this->formSpec, $recordId, STORE_RECORD);
468

469
                // SAVE
470
                $save = new Save($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->feSpecNativeRaw);
471
472

                $save->processAllImageCutFE();
473
                $save->checkRequiredHidden();
474

475
476
                $rc = $save->process();

477
                // Reload fresh saved record and fill STORE_RECORD with it.
478
                $this->fillStoreWithRecord($this->formSpec, $rc, STORE_RECORD);
479

Carsten  Rose's avatar
Upload:    
Carsten Rose committed
480
481
                $save->processAllUploads($rc);

482
                // Action: After
483
484
                $status = $formAction->elements($rc, $this->feSpecAction, FE_TYPE_AFTER_INSERT . ',' . FE_TYPE_AFTER_UPDATE . ',' . FE_TYPE_AFTER_SAVE);
                if ($status != ACTION_ELEMENT_NO_CHANGE) {
485
                    // Reload fresh saved record and fill STORE_RECORD with it.
486
                    $this->fillStoreWithRecord($this->formSpec, $rc, STORE_RECORD);
487
                }
488

Carsten  Rose's avatar
Carsten Rose committed
489
490
491
492
493
494
                // Action: Paste
                $this->pasteClipboard($this->formSpec[F_ID], $formAction);

                // Action: Sendmail
                $formAction->elements($rc, $this->feSpecAction, FE_TYPE_SENDMAIL);

495
496
497
498
499
500
501

                $customForward = $this->setForwardModePage();

                // Logic: If a) r=0 and
                //           b) User presses only 'save' (not save & close) and
                //           c) there is no forwardMode=='url...'
                // then the client should reload the current page with the newly created record. A new SIP is necessary!
502
                $getJson = true;
503
504
505
506
507
                if (0 == $this->store->getVar(SIP_RECORD_ID, STORE_SIP) &&
                    API_SUBMIT_REASON_SAVE == $this->store->getVar(API_SUBMIT_REASON, STORE_CLIENT . STORE_EMPTY, SANITIZE_ALLOW_ALNUMX) &&
                    $customForward == false
                ) {
                    $this->formSpec = $this->buildNSetReloadUrl($this->formSpec, $rc);
508
                    $getJson = false;
509
                }
510

511
                if ($getJson) {
512

513
514
                    // Values of FormElements might be changed during 'afterSave': rebuild the form to load the new values. Especially for non primary template groups.
//                    $this->loadFormSpecification($formMode, $recordId, $foundInStore);
515
516
517
518
                    $feSpecNative = $this->getNativeFormElements(SQL_FORM_ELEMENT_NATIVE_TG_COUNT, [$this->formSpec[F_ID]], $this->formSpec);
                    $parameterLanguageFieldName = $this->store->getVar(SYSTEM_PARAMETER_LANGUAGE_FIELD_NAME, STORE_SYSTEM);
                    $feSpecNative = HelperFormElement::setLanguage($feSpecNative, $parameterLanguageFieldName);
                    $this->feSpecNative = HelperFormElement::setFeContainerFormElementId($feSpecNative, $this->formSpec[F_ID], $recordId);
519

520
521
                    // Retrieve FE Values as JSON
                    // $data['form-update']=...
522
                    // $data = $build->process($formMode, $htmlElementNameIdZero);
523
                    $data = $build->process($formMode, false, $this->feSpecNative);
524
                }
525
                break;
526

527
528
529
            case FORM_DRAG_AND_DROP:
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);

530
                $dragAndDrop = new DragAndDrop($this->formSpec);
531
                $dragAndDrop->process();
532
533

                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_LOAD);
534
                break;
Carsten  Rose's avatar
Carsten Rose committed
535

536
537
538
539
            default:
                throw new CodeException("This statement should never be reached", ERROR_CODE_SHOULD_NOT_HAPPEN);
        }

540
        if (is_array($data)) {
541
            // $data['element-update']=...
542
543
            $data = $this->groupElementUpdateEntries($data);
        }
Carsten  Rose's avatar
Carsten Rose committed
544

Carsten  Rose's avatar
Carsten Rose committed
545
        return $data;
546
547
    }

548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564

    /**
     * Check if forwardMode='url...'.
     * yes: process 'forwardPage' and fill $this->formSpec[F_FORWARD_MODE] and $this->formSpec[F_FORWARD_PAGE]
     * no: do nothing
     *
     * '$this->formSpec[F_FORWARD_PAGE]' might give a new forwardMode. If so, set $this->formSpec[F_FORWARD_MODE] to
     * it.
     *
     * '$this->formSpec[F_FORWARD_PAGE]':
     * a) url     http://www.nzz.ch/index.html?a=123#bottom, website.html?a=123#bottom,
     *            ?<T3 Alias pageid>&a=123#bottom, ?id=<T3 page id>&a=123#bottom
     * b) mode      no|client|url|...
     * c) mode|url  combination of above
     *
     * @return bool  TRUE if F_FORWARD_MODE = 'url..', else FALSE
     *
Carsten  Rose's avatar
Carsten Rose committed
565
566
     * @throws CodeException
     * @throws DbException
567
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
568
     * @throws UserReportException
569
570
571
572
573
574
575
576
577
578
579
580
581
582
     */
    private function setForwardModePage() {

        if ('url' != substr($this->formSpec[F_FORWARD_MODE], 0, 3)) {
            return false;
        }

        $forwardPageTmp = $this->eval->parse($this->formSpec[F_FORWARD_PAGE]);

        // Format: [mode/url][|url]
        $forwardArray = explode('|', $forwardPageTmp, 2);
        $forward = trim($forwardArray[0]);
        switch ($forward) {

583
            case F_FORWARD_MODE_AUTO:
584
            case F_FORWARD_MODE_CLOSE:
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
            case F_FORWARD_MODE_NO:
            case F_FORWARD_MODE_URL:
            case F_FORWARD_MODE_URL_SKIP_HISTORY:
            case F_FORWARD_MODE_URL_SIP:
                $this->formSpec[F_FORWARD_MODE] = $forward;
                if (isset($forwardArray[1])) {
                    $this->formSpec[F_FORWARD_PAGE] = trim($forwardArray[1]);
                } else {
                    $this->formSpec[F_FORWARD_PAGE] = '';
                }
                break;

            default:
                $this->formSpec[F_FORWARD_PAGE] = $forward;
                break;
        }

        if ('url' == substr($this->formSpec[F_FORWARD_MODE], 0, 3)) {
            if ($this->formSpec[F_FORWARD_PAGE] == '') {
604
                $this->formSpec[F_FORWARD_MODE] = F_FORWARD_MODE_AUTO;
605
606
607
608
609
610
611
612
613
614
615
616
617
                $customForward = false;
            } else {
                $customForward = true;
            }

        } else {
            $customForward = false;
        }

        return $customForward;

    }

Carsten  Rose's avatar
Carsten Rose committed
618
619
620
    /**
     * Iterate over all Clipboard source records and fire for each all FE.type=paste records.
     *
Carsten  Rose's avatar
Carsten Rose committed
621
     * @param int $formId
Carsten  Rose's avatar
Carsten Rose committed
622
     * @param FormAction $formAction
623
     *
Carsten  Rose's avatar
Carsten Rose committed
624
625
626
     * @throws CodeException
     * @throws DbException
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
627
     * @throws UserReportException
Carsten  Rose's avatar
Carsten Rose committed
628
629
630
     */
    private function pasteClipboard($formId, FormAction $formAction) {

631
632
633
634
        if (!$this->isPasteRecord()) {
            return;
        }

Carsten  Rose's avatar
Carsten Rose committed
635
636
637
638
639
640
641
        $cookieQfq = $this->store->getVar(CLIENT_COOKIE_QFQ, STORE_CLIENT, SANITIZE_ALLOW_ALNUMX);
        if ($cookieQfq === false || $cookieQfq == '') {
            throw new UserFormException('Qfq Session missing', ERROR_QFQ_SESSION_MISSING);
        }

        # select clipboard records
        $sql = "SELECT c.idSrc as id, c.xId FROM Clipboard AS c WHERE c.cookie='$cookieQfq' AND c.formIdPaste=$formId ORDER BY c.id";
642
        $arrClipboard = $this->dbArray[$this->dbIndexQfq]->sql($sql);
Carsten  Rose's avatar
Carsten Rose committed
643
644
645
646
647
648
649
650

        // Process clipboard records.
        foreach ($arrClipboard AS $srcIdRecord) {
            $formAction->doAllFormElementPaste($this->feSpecAction, $this->formSpec[F_TABLE_NAME], $this->formSpec[F_TABLE_NAME], "", $srcIdRecord);
        }

    } # doClipboard()

651
652
653
654
655
656
657
658
659
660
    /**
     * @return bool  true if there is at least one paste record, else false.
     */
    private function isPasteRecord() {

        foreach ($this->feSpecAction as $formElement) {
            if ($formElement[FE_TYPE] == FE_TYPE_PASTE) {
                return true;
            }
        }
661

662
663
664
665
        return false;

    }

666
667
668
669
670
    /**
     * Set F_FORWARD_MODE to  F_FORWARD_MODE_PAGE and builds a redirection URL to the current page with the already
     * used parameters. Do this by building a new SIP with the new recordId.
     *
     * @param array $formSpec
Carsten  Rose's avatar
Carsten Rose committed
671
     * @param int $recordId
672
     *
673
674
675
676
677
678
     * @return array
     * @throws CodeException
     * @throws UserFormException
     */
    private function buildNSetReloadUrl(array $formSpec, $recordId) {

679
        $formSpec[F_FORWARD_MODE] = API_ANSWER_REDIRECT_URL_SKIP_HISTORY;
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696

        // Rebuild original URL
        $storeT3 = $this->store->getStore(STORE_TYPO3);
        $storeT3['id'] = $storeT3[TYPO3_PAGE_ID];
        $storeT3 = OnArray::getArrayItems($storeT3, ['id', TYPO3_PAGE_TYPE, TYPO3_PAGE_LANGUAGE], true, true);

        $arr = KeyValueStringParser::parse($this->store->getVar(SIP_URLPARAM, STORE_SIP), '=', '&');
        $arr[SIP_RECORD_ID] = $recordId;
        $arr = array_merge($storeT3, $arr);
        $queryString = KeyValueStringParser::unparse($arr, '=', '&');

        $formSpec[F_FORWARD_PAGE] = store::getSipInstance()->queryStringToSip($queryString, RETURN_URL);

        return $formSpec;

    }

697
    /**
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
     * Checks if there is formLog mode active for FORM_LOG_SESSION or FORM_LOG_ALL.
     * If yes, set $form[FORM_LOG_FILE_SESSION] resp.  $form[FORM_LOG_FILE_ALL].
     * If the last action is older FORM_LOG_FILE_EXPIRE, the file will be deleted and formLog mode stops (disabled).
     *
     * @param array $form
     * @return array
     * @throws CodeException
     * @throws UserFormException
     * @throws UserReportException
     */
    private function checkFormLogMode(array $form) {

        $form[FORM_LOG_FILE_SESSION] = '';
        $form[FORM_LOG_FILE_ALL] = '';

        foreach ([FORM_LOG_SESSION, FORM_LOG_ALL] as $mode) {
            $file = Support::getFormLogFileName($form[F_NAME], $mode);
            if (false !== ($arr = stat($file))) {

                if (time() - $arr['mtime'] > FORM_LOG_FILE_EXPIRE) {
                    unlink($file);
                } else {
                    $form[FORM_LOG_FILE . '_' . $mode] = $file;
721
                    $form[FORM_LOG_ACTIVE]=1;
722
723
724
725
726
727
728
                }
            }
        }

        return $form;
    }

729
    /**
730
731
     * Get form name
     * Check if the form is in log mode: set formLog and return
732
     * Load form. Evaluates form. Load FormElements.
733
     *
Carsten  Rose's avatar
Carsten Rose committed
734
     * After processing:
735
736
737
738
     * Loaded Form is in  $this->formSpec
     * Loaded 'action' FormElements are in $this->feSpecAction
     * Loaded 'native' FormElements are in $this->feSpecNative
     *
Carsten  Rose's avatar
Carsten Rose committed
739
     * @param string $mode FORM_LOAD|FORM_SAVE|FORM_UPDATE
Carsten  Rose's avatar
Carsten Rose committed
740
     * @param int $recordId
Carsten  Rose's avatar
Carsten Rose committed
741
     * @param string $foundInStore
742
     * @param string $formLogMode
Carsten  Rose's avatar
Carsten Rose committed
743
     * @return bool|string if found the formName, else 'false'.
744
     *
Carsten  Rose's avatar
Carsten Rose committed
745
     * @throws CodeException
746
     * @throws DbException
747
     * @throws UserFormException
Carsten  Rose's avatar
Carsten Rose committed
748
     * @throws UserReportException
749
     */
750
751
752
    private function loadFormSpecification($mode, $recordId, &$foundInStore = '', &$formLogMode = '') {

        $formLogMode = false; // Important: if no form is found, formLogMode needs also to be false.
Carsten  Rose's avatar
Carsten Rose committed
753

754
        // formName
Carsten  Rose's avatar
Carsten Rose committed
755
        if (false === ($formName = $this->getFormName($mode, $foundInStore))) {
756
757
            return false;
        }
758

759
760
761
762
        // Check for '_formLogMode'=logSession|logAll
        $formLogMode = $this->store::getVar(FORM_LOG_MODE, STORE_SIP);
        if ($formLogMode !== false) {
            return $formName; // fomLog: getting the formName is sufficient.
763
764
        }

765
766
        if (!$this->dbArray[$this->dbIndexQfq]->existTable(TABLE_NAME_FORM)) {
            throw new UserFormException("Table '" . TABLE_NAME_FORM . "' not found", ERROR_MISSING_TABLE);
767
768
        }

769
        // Preparation for Log, Debug
770
        $this->store->setVar(SYSTEM_FORM, $formName, STORE_SYSTEM);
Carsten  Rose's avatar
Carsten Rose committed
771

772
773
774
775
776
777
778
        // Check if there is a recordId specified in Bodytext - as variable or query.
        $rTmp = $this->store->getVar(CLIENT_RECORD_ID, STORE_TYPO3, SANITIZE_ALLOW_ALL);
        if (false !== $rTmp && !is_int($rTmp)) {
            $rTmp = $this->eval->parse($rTmp);
            $this->store->setVar(CLIENT_RECORD_ID, $rTmp, STORE_TYPO3);
        }

779
        // Load form
780
        $constant = F_NAME; // PhpStorm complains if the constant is directly defined in the string below
781
        $form = $this->dbArray[$this->dbIndexQfq]->sql("SELECT * FROM Form AS f WHERE f.$constant LIKE ? AND f.deleted='no'", ROW_EXPECT_1,
782
            [$formName], 'Form "' . $formName . '" not found or multiple forms with the same name.');
783

784
        $form = $this->checkFormLogMode($form);
785
        $form = $this->modeCleanFormConfig($mode, $form);
786

Carsten  Rose's avatar
Carsten Rose committed
787
788
789
790
        // Save specific elements to be expanded later.
        $parseLater = OnArray::getArrayItems($form, [F_FORWARD_PAGE]);
        $form[F_FORWARD_PAGE] = '';

791
792
793
794
795
796
797
        HelperFormElement::explodeParameter($form, F_PARAMETER);
        unset($form[F_PARAMETER]);
        if (isset($form[FE_FILL_STORE_VAR])) {
            $fillStoreVar = $form[FE_FILL_STORE_VAR];
            unset($form[FE_FILL_STORE_VAR]);
        }

798
        // Setting defaults later is too late.
799
800
801
802
        if (empty($form[F_DB_INDEX])) {
            $form[F_DB_INDEX] = $this->dbIndexData;
        } else {
            $form[F_DB_INDEX] = $this->eval->parse($form[F_DB_INDEX]);
803
        }
804
        $form[F_TABLE_ID] = $form[F_TABLE_ID] ?? F_TABLE_ID_DEFAULT;
805
806

        // Some forms load/save the form data on extra defined databases.
807
808
809
        if ($this->dbIndexData != $form[F_DB_INDEX]) {
            if (!isset($this->dbArray[$form[F_DB_INDEX]])) {
                $this->dbArray[$form[F_DB_INDEX]] = new Database($form[F_DB_INDEX]);
810
            }
811
812
813
814
            $this->dbIndexData = $form[F_DB_INDEX];

            unset($this->eval);
            $this->eval = new Evaluate($this->store, $this->dbArray[$this->dbIndexData]);
815
816
        }

817
818
        // This is needed for filling templateGroup records with their default values
        // and for evaluating variables in the Form title
819
        $this->fillStoreWithRecord($form, $recordId, STORE_RECORD);
820
821
822

        $formSpec = $this->eval->parseArray($form);

823
824
        $parameterLanguageFieldName = $this->store->getVar(SYSTEM_PARAMETER_LANGUAGE_FIELD_NAME, STORE_SYSTEM);
        $formSpec = HelperFormElement::setLanguage($formSpec, $parameterLanguageFieldName);
825

826
        $formSpec = $this->syncSystemFormConfig($formSpec);
827
        $formSpec = $this->initForm($formSpec, $recordId);
828

Carsten  Rose's avatar
Carsten Rose committed
829
830
        $formSpec = array_merge($formSpec, $parseLater);

831
        // Set F_FINAL_DELETE_FORM
832
        $formSpec[F_FINAL_DELETE_FORM] = ($formSpec[F_EXTRA_DELETE_FORM] != '') ? $formSpec[F_EXTRA_DELETE_FORM] : $formSpec[F_NAME];
833

834
835
        // LOG
        !empty($form[FORM_LOG_ACTIVE]) && Logger::logFormLine($form, "F:$mode:evaluated:" . date('Y-m-d H:i:s'), $form, true);
836
837
838
839
840

        // Fire FE_FILL_STORE_VAR after the primary form record has been loaded
        if (!empty($fillStoreVar)) {
            $rows = $this->eval->parse($fillStoreVar);
            if (is_array($rows)) {
841
                $this->store->appendToStore($rows[0], STORE_VAR);
842
843
                // LOG
                !empty($form[FORM_LOG_ACTIVE]) && Logger::logFormLine($form, "F:add to STORE_VAR", $rows[0]);
844
845
846
847
848
849
850
851
            } else {
                if (!empty($rows)) {
                    throw new UserFormException("Invalid statement for '" . FE_FILL_STORE_VAR . "': " . $formSpec[FE_FILL_STORE_VAR], ERROR_INVALID_OR_MISSING_PARAMETER);
                }
            }
        }

        $this->formSpec = $formSpec;
852

Carsten  Rose's avatar
Carsten Rose committed
853
        // Clear
854
855
        $this->store->setVar(SYSTEM_FORM_ELEMENT, '', STORE_SYSTEM);

856
857
858
        // Read all 'active' FE
        $this->feSpecNativeRaw = $this->dbArray[$this->dbIndexQfq]->sql(SQL_FORM_ELEMENT_RAW, ROW_REGULAR, [$this->formSpec["id"]]);

859
        // FE: Action
860
        $this->feSpecAction = $this->dbArray[$this->dbIndexQfq]->sql(SQL_FORM_ELEMENT_ALL_CONTAINER, ROW_REGULAR, ['no', $this->formSpec["id"], 'action']);
861
        HelperFormElement::explodeParameterInArrayElements($this->feSpecAction, FE_PARAMETER);
862
863

        // FE: Native & Container
864
        // "SELECT *, ? AS 'nestedInFieldSet' FROM FormElement AS fe WHERE fe.formId = ? AND fe.deleted = 'no' AND FIND_IN_SET(fe.class, ? ) AND fe.feIdContainer = ? AND fe.enabled='yes' ORDER BY fe.ord, fe.id";
865
        $feSpecNative = array();
866
867
        switch ($mode) {
            case FORM_LOAD:
868
                // Select all Native elements (native, pill, fieldset, templateGroup) which are NOT nested = Root level.
869
                $feSpecNative = $this->dbArray[$this->dbIndexQfq]->getNativeFormElements(SQL_FORM_ELEMENT_SPECIFIC_CONTAINER, ['no', $this->formSpec["id"], 'native,container', 0], $this->formSpec);
870
871
872
                break;

            case FORM_SAVE:
Carsten  Rose's avatar
Carsten Rose committed
873
            case FORM_UPDATE:
874
                $feSpecNative = $this->getNativeFormElements(SQL_FORM_ELEMENT_NATIVE_TG_COUNT, [$this->formSpec[F_ID]], $this->formSpec);
875
876
                break;

877
878
879
880
            case FORM_DELETE:
                $this->feSpecNative = array();
                break;

881
            default:
882
                break;
883
884
        }

885
        $this->feSpecNative = HelperFormElement::setLanguage($feSpecNative, $parameterLanguageFieldName);
886
        $this->feSpecNative = HelperFormElement::setFeContainerFormElementId($this->feSpecNative, $this->formSpec[F_ID], $recordId);
887

888
        return $formName;
Carsten  Rose's avatar
Carsten Rose committed
889
890
    }

891
892
    /**
     * Depending on $sql reads FormElements to a specific container or all. Preprocess all FormElements.
893
894
895
     * This code is dirty: the nearly same function exists in class 'Database' - the difference is only
     * 'explodeTemplateGroupElements()'.
     *
Carsten  Rose's avatar
Carsten Rose committed
896
897
898
     * @param string $sql SQL_FORM_ELEMENT_SPECIFIC_CONTAINER | SQL_FORM_ELEMENT_ALL_CONTAINER
     * @param array $param Parameter which matches the prepared statement in $sql
     * @param array $formSpec Main FormSpec to copy generic parameter to FormElements
899
900
     *
     * @return array|int
901
902
903
904
     * @throws CodeException
     * @throws DbException
     * @throws UserFormException
     * @throws UserReportException
905
906
907
     */
    public function getNativeFormElements($sql, array $param, $formSpec) {

908
        $feSpecNative = $this->dbArray[$this->dbIndexQfq]->sql($sql, ROW_REGULAR, $param);
909

910
911
        $feSpecNative = HelperFormElement::formElementSetDefault($feSpecNative);

912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
        // Explode and Do $FormElement.parameter
        HelperFormElement::explodeParameterInArrayElements($feSpecNative, FE_PARAMETER);

        // Check for retype FormElements which have to duplicated.
        $feSpecNative = HelperFormElement::duplicateRetypeElements($feSpecNative);

        // Check for templateGroup Elements to explode them
        $feSpecNative = $this->explodeTemplateGroupElements($feSpecNative);

        // Copy Attributes to FormElements
        $feSpecNative = HelperFormElement::copyAttributesToFormElements($formSpec, $feSpecNative);

        return $feSpecNative;
    }

    /**
928
929
930
     * Iterate over all FormElements in $elements. If a row has a column NAME_TG_COPIES, copy those elements
     * NAME_TG_COPIES-times. Adjust FE_TEMPLATE_GROUP_NAME_PATTERN (='%d') with current count on column FE_NAME and
     * FE_LABEL.
931
     *
932
933
934
     * This code is dirty: only to get JSON value, we have to initialize the STORE_RECORD (done earlier) to be capable
     * to parse fe[FE_VALUE], which probably contains as string like '{{!SELECT value FROM table WHERE xId={{id}} ORDER
     * BY id}}' - the {{id}} needs to be replaced by the current recordId (primary record).