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

Marc Egger's avatar
Marc Egger committed
9
10
11
12
namespace IMATHUZH\Qfq\Core;

require __DIR__ . '/../../vendor/autoload.php';

13
14
15
16
17
use IMATHUZH\Qfq\Core\Database\Database;
use IMATHUZH\Qfq\Core\Database\DatabaseUpdate;
use IMATHUZH\Qfq\Core\Form\Dirty;
use IMATHUZH\Qfq\Core\Form\DragAndDrop;
use IMATHUZH\Qfq\Core\Form\FormAction;
Marc Egger's avatar
Marc Egger committed
18
use IMATHUZH\Qfq\Core\Helper\HelperFile;
19
20
use IMATHUZH\Qfq\Core\Helper\HelperFormElement;
use IMATHUZH\Qfq\Core\Helper\KeyValueStringParser;
Marc Egger's avatar
Marc Egger committed
21
22
23
use IMATHUZH\Qfq\Core\Helper\Logger;
use IMATHUZH\Qfq\Core\Helper\OnArray;
use IMATHUZH\Qfq\Core\Helper\Support;
24
25
use IMATHUZH\Qfq\Core\Report\Monitor;
use IMATHUZH\Qfq\Core\Report\Report;
Marc Egger's avatar
Marc Egger committed
26
27
use IMATHUZH\Qfq\Core\Store\FillStoreForm;
use IMATHUZH\Qfq\Core\Store\Session;
28
29
use IMATHUZH\Qfq\Core\Store\Sip;
use IMATHUZH\Qfq\Core\Store\Store;
30
use IMATHUZH\Qfq\Core\Typo3\T3Handler;
Marc Egger's avatar
Marc Egger committed
31

32
33
34
35
36
37
38
39
40
41
42
43
/*
 * 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
44
/**
45
 * Class Qfq
Carsten  Rose's avatar
Carsten Rose committed
46
47
 * @package qfq
 */
48
class QuickFormQuery {
49

50
    /**
51
     * @var Store instantiated class
52
     */
Carsten  Rose's avatar
Carsten Rose committed
53
    protected $store = null;
54

55
    /**
Marc Egger's avatar
Marc Egger committed
56
     * @var Database[] - Array of Database instantiated class
57
     */
58
    protected $dbArray = array();
59

60
61
62
    /**
     * @var Evaluate instantiated class
     */
63
64
    protected $evaluate = null;

65
66
67
    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
68
    protected $feSpecNativeRaw = array(); // FormEelement Definition: all formElement.class='action' of the loaded form
69

70
71
72
    /**
     * @var array
     */
73
    private $t3data = array(); // FormElement Definition: all formElement.class='native' of the loaded form
74

75
76
77
    /**
     * @var bool
     */
78
79
    private $phpUnit = false;

80
81
82
83
84
    /**
     * @var bool
     */
    private $inlineReport = false;

85
86
87
88
89
    /**
     * @var Session
     */
    private $session = null;

90
91
92
    private $dbIndexData = false;
    private $dbIndexQfq = false;

93
94
95
96
97
98
99
100
101
102
103
    /*
     * 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'
     */
104

105
106
107
    /**
     * Construct the Form Class and Store too. This is the base initialization moment.
     *
108
109
     * 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.
110
     *
111
     * @param array $t3data
Carsten  Rose's avatar
Carsten Rose committed
112
     * @param bool $phpUnit
113
     * @param bool $inlineReport
114
     *
Marc Egger's avatar
Marc Egger committed
115
116
117
118
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
     * @throws \UserReportException
119
     */
120
    public function __construct(array $t3data = array(), $phpUnit = false, $inlineReport = true) {
121
122

        #TODO: rewrite $phpUnit to: "if (!defined('PHPUNIT_QFQ')) {...}"
123
        $this->phpUnit = $phpUnit;
124
        $this->inlineReport = $inlineReport;
125

126
        mb_internal_encoding("UTF-8");
127

128
129
        $this->session = Session::getInstance($phpUnit);

130
        // Refresh the session even if no new data saved.
131
        Session::set(SESSION_LAST_ACTIVITY, time());
132

133
134
        Support::setQfqErrorHandler();

Carsten  Rose's avatar
Carsten Rose committed
135
136
        // PHPExcel
        set_include_path(get_include_path() . PATH_SEPARATOR . '../../Resources/Private/Classes/');
137

138
139
140
141
142
143
144
        if (!isset($t3data[T3DATA_BODYTEXT])) {
            $t3data[T3DATA_BODYTEXT] = '';
        }

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

146
        $btp = new BodytextParser();
147
        $t3data[T3DATA_BODYTEXT_RAW] = $t3data[T3DATA_BODYTEXT];
148
        $t3data[T3DATA_BODYTEXT] = $btp->process($t3data[T3DATA_BODYTEXT]);
149

150
151
        $this->t3data = $t3data;

152
        $bodytext = $this->t3data[T3DATA_BODYTEXT];
153
154

        $this->store = Store::getInstance($bodytext, $phpUnit);
155

156
157
158
        $timeout = $this->store::getVar(SYSTEM_SESSION_TIMEOUT_SECONDS, STORE_SYSTEM);
        Session::checkSessionExpired($timeout);

159
        // If an FE user logs out and a different user logs in (same browser session) - the old values has to be destroyed!
160
        if (Session::getAndDestroyFlagFeUserHasChanged()) {
161
162
163
            $this->store->unsetStore(STORE_USER);
        }

164
        $this->store->setVar(TYPO3_TT_CONTENT_UID, $t3data[T3DATA_UID], STORE_TYPO3);
165

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

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

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

175
        $this->evaluate = new Evaluate($this->store, $this->dbArray[$this->dbIndexData]);
176

177
        $dbUpdate = $this->store->getVar(SYSTEM_DB_UPDATE, STORE_SYSTEM);
178
        $updateDb = new DatabaseUpdate($this->dbArray[$this->dbIndexQfq], $this->store);
179
        $updateDb->checkNupdate($dbUpdate);
180

181
        $this->store->FillStoreSystemBySql(); // Do this after the DB-update
182
183
184

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

190
    /**
191
     * Returns the defined forwardMode and set forwardPage
192
     *
193
     * @return array
Marc Egger's avatar
Marc Egger committed
194
195
     * @throws \CodeException
     * @throws \UserFormException
196
     */
197
198
    public function getForwardMode() {

199
        if (!isset($this->formSpec[F_FORWARD_PAGE])) {
Carsten  Rose's avatar
Carsten Rose committed
200
            // For QFQ inline editing: no redirect and no further processing.
201
202
203
            return [API_REDIRECT => API_ANSWER_REDIRECT_NO, API_REDIRECT_URL => ''];
        }

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

206
207
208
209
210
211
212
213
214
215
216
217
218
219
        switch ($this->formSpec[F_FORWARD_MODE]) {
            case F_FORWARD_MODE_URL_SIP:
                $forwardPage = store::getSipInstance()->queryStringToSip($forwardPage, RETURN_URL);
                $this->formSpec[F_FORWARD_MODE] = F_FORWARD_MODE_URL;
                break;
            case F_FORWARD_MODE_URL_SIP_SKIP_HISTORY:
                // 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.
                // An option for better implementing would be to separate SKIP History from ForwardMode. For API, it can be combined again.
                $forwardPage = store::getSipInstance()->queryStringToSip($forwardPage, RETURN_URL);
                $this->formSpec[F_FORWARD_MODE] = F_FORWARD_MODE_URL_SKIP_HISTORY;
                break;
            default:
                break;
Carsten  Rose's avatar
Carsten Rose committed
220
221
        }

222
223
        return ([
            API_REDIRECT => $this->formSpec[F_FORWARD_MODE],
Carsten  Rose's avatar
Carsten Rose committed
224
            API_REDIRECT_URL => $forwardPage,
225
        ]);
226
227
    }

228
    /**
229
     * Main entry point to display content: a) form and/or b) report
230
     *
231
     * @return string
Marc Egger's avatar
Marc Egger committed
232
233
234
     * @throws \CodeException
     * @throws \DbException
     * @throws \DownloadException
235
236
237
     * @throws \PhpOffice\PhpSpreadsheet\Exception
     * @throws \PhpOffice\PhpSpreadsheet\Reader\Exception
     * @throws \PhpOffice\PhpSpreadsheet\Writer\Exception
238
239
240
241
242
     * @throws \Twig\Error\LoaderError
     * @throws \Twig\Error\RuntimeError
     * @throws \Twig\Error\SyntaxError
     * @throws \UserFormException
     * @throws \UserReportException
Carsten  Rose's avatar
Carsten Rose committed
243
     */
244
    public function process() {
245
        $html = '';
246

247
        if ($this->store->getVar(TYPO3_DEBUG_SHOW_BODY_TEXT, STORE_TYPO3) === 'yes') {
248
249
            $htmlId = HelperFormElement::buildFormElementId($this->formSpec[F_ID], 0, 0, 0);
            $html .= Support::doTooltip($htmlId . HTML_ID_EXTENSION_TOOLTIP, $this->t3data['bodytext']);
250
251
252
        }

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

255
        // 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
256
257
258
259
        if ($this->store->getVar(SYSTEM_DOWNLOAD_POPUP, STORE_SYSTEM) == DOWNLOAD_POPUP_REQUEST) {
            $html .= $this->getModalCode();
        }

260
261
262
263
264
        // Only needed if there are 'drag and drop' elements.
        if ($this->store->getVar(SYSTEM_DRAG_AND_DROP_JS, STORE_SYSTEM) == 'true') {
            $html .= $this->getDragAndDropCode();
        }

265
        $class = $this->store->getVar(SYSTEM_CSS_CLASS_QFQ_CONTAINER, STORE_SYSTEM);
Carsten  Rose's avatar
Carsten Rose committed
266
        if ($class) {
267
            $html = Support::wrapTag("<div class='$class'>", $html);
Carsten  Rose's avatar
Carsten Rose committed
268
269
        }

270
        return $html;
271
272
    }

273
    /**
274
     * Determine the name of the language parameter field, which has to be taken to fill language specific definitions.
275
     *
Marc Egger's avatar
Marc Egger committed
276
277
     * @throws \CodeException
     * @throws \UserFormException
278
279
280
281
282
283
284
285
286
     */
    private function setParameterLanguageFieldName() {

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

        foreach (['A', 'B', 'C', 'D'] as $key) {
287
            $languageIdx = SYSTEM_FORM_LANGUAGE . "$key" . "Id";
288
289
290
291
292
293
294
            if ($this->store->getVar($languageIdx, STORE_SYSTEM) == $typo3PageLanguage) {
                $this->store->setVar(SYSTEM_PARAMETER_LANGUAGE_FIELD_NAME, 'parameterLanguage' . $key, STORE_SYSTEM);
                break;
            }
        }
    }

295
    /**
296
297
     * Creates an empty file. This indicates that the current form is in debug mode. Returns HTML element which will be
     * replaced by the logfile.
298
299
300
     *
     * @param $formName
     * @param $formLogMode
301
     * @return string
Marc Egger's avatar
Marc Egger committed
302
303
304
     * @throws \CodeException
     * @throws \UserFormException
     * @throws \UserReportException
305
306
307
308
     */
    private function getFormLog($formName, $formLogMode) {

        $formLogFileName = Support::getFormLogFileName($formName, $formLogMode);
309
        file_put_contents($formLogFileName, '');
310

311
312
        $monitor = new Monitor();

313
314
        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]);
315
    }
316

317
    /**
318
     * Process form.
319
320
321
322
323
     * $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:
324
     *
325
     * @param string $formMode FORM_LOAD | FORM_UPDATE | FORM_SAVE | FORM_DELETE
326
     *
327
     * @return array|string
Marc Egger's avatar
Marc Egger committed
328
329
330
     * @throws \CodeException
     * @throws \DbException
     * @throws \DownloadException
Carsten  Rose's avatar
Carsten Rose committed
331
332
333
     * @throws \PhpOffice\PhpSpreadsheet\Exception
     * @throws \PhpOffice\PhpSpreadsheet\Reader\Exception
     * @throws \PhpOffice\PhpSpreadsheet\Writer\Exception
334
335
336
337
338
     * @throws \Twig\Error\LoaderError
     * @throws \Twig\Error\RuntimeError
     * @throws \Twig\Error\SyntaxError
     * @throws \UserFormException
     * @throws \UserReportException
339
     */
340
    private function doForm($formMode) {
Carsten  Rose's avatar
Carsten Rose committed
341
        $data = '';
Carsten  Rose's avatar
Carsten Rose committed
342
        $foundInStore = '';
343
        $flagApiStructureReGroup = true;
344
        $formModeNew = '';
345
        $build = null;
346

347
        $recordId = $this->store->getVar(SIP_RECORD_ID, STORE_SIP . STORE_TYPO3 . STORE_CLIENT . STORE_ZERO);
348
        $this->setParameterLanguageFieldName();
349

350
351
352
        $formName = $this->loadFormSpecification($formMode, $recordId, $foundInStore, $formLogMode);
        if ($formName !== false && $formLogMode !== false) {
            return $this->getFormLog($formName, $formLogMode);
353
354
        }

355
        if ($formName === false) {
356
            switch ($formMode) {
357
                case FORM_DELETE:
358
                    $formModeNew = FORM_DELETE;
359
360
                    break;
                case FORM_DRAG_AND_DROP:
Marc Egger's avatar
Marc Egger committed
361
                    throw new \CodeException('Missing form in SIP', ERROR_MISSING_FORM);
362
363
364
                default:
                    return '';// No form found: do nothing
            }
365
        }
366

Carsten  Rose's avatar
Carsten Rose committed
367
        // Check 'session expire' happens quite late, cause it can be configured per form.
368
369
370
        if ($formName !== false) {
            Session::checkSessionExpired($this->formSpec[F_SESSION_TIMEOUT_SECONDS]);
        }
371

372
373
374
375
376
377
378
        // Fill STORE_FORM: might need Form.fillStoreVar={{!SELECT ...}}) to provide STORE_VAR - therefore the FORM-definition should already been processed. #8058
        switch ($formMode) {
            case FORM_UPDATE:
            case FORM_SAVE:
            case FORM_REST:
                $fillStoreForm = new FillStoreForm();
                $fillStoreForm->process($formMode);
379
380
381
382
383
384

                // STORE_TYPO3 has been filled: fire fillStoreVar again.
                if (!empty($this->formSpec[FE_FILL_STORE_VAR])) {
                    $this->fillStoreVar($this->formSpec[FE_FILL_STORE_VAR]);
                }

385
386
387
                break;
        }

388
        if ($formName !== false) {
Carsten  Rose's avatar
Carsten Rose committed
389
            // Validate (only if there is a 'real' form, not a FORM_DELETE with only a table name).
Carsten  Rose's avatar
Carsten Rose committed
390
391
            // Attention: $formModeNew will be set
            $sipFound = $this->validateForm($foundInStore, $formMode, $formModeNew);
392
393

        } else {
394
            // FORM_DELETE without a form definition: Fake the form with only a tableName.
395
396
            $table = $this->store->getVar(SIP_TABLE, STORE_SIP);
            if ($table === false) {
Marc Egger's avatar
Marc Egger committed
397
                throw new \UserFormException("No 'form' and no 'table' definition found.", ERROR_MISSING_VALUE);
398
            }
399

400
401
402
            $sipFound = true;
            $this->formSpec[F_NAME] = '';
            $this->formSpec[F_TABLE_NAME] = $table;
403
404
            $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.
405
            $this->formSpec[F_PRIMARY_KEY] = F_PRIMARY_KEY_DEFAULT;
406
407
408
409
410
411
412
413
414
415

            $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);
                    }
                }
            }
416
417
        }

418
419
        // 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.
420
421
422
423
        if ($formMode != FORM_REST) {
            if (!$sipFound || ($formMode == FORM_LOAD && $recordId === 0)) {
                $this->store->createSipAfterFormLoad($formName);
            }
424
        }
425

426
        // Fill STORE_BEFORE
427
        if ($formName !== false && $this->store->getVar($this->formSpec[F_PRIMARY_KEY], STORE_BEFORE) === false) {
428
            $this->store->fillStoreWithRecord($this->formSpec[F_TABLE_NAME], $recordId,
429
                $this->dbArray[$this->dbIndexData], $this->formSpec[F_PRIMARY_KEY], STORE_BEFORE);
430
431
        }

432
        // Check (and release) dirtyRecord.
Carsten  Rose's avatar
Carsten Rose committed
433
        if ($formModeNew === FORM_DELETE || $formModeNew === FORM_SAVE) {
434
            $dirty = new Dirty(false, $this->dbIndexData, $this->dbIndexQfq);
Carsten  Rose's avatar
Carsten Rose committed
435

Carsten  Rose's avatar
Carsten Rose committed
436
            $answer = $dirty->checkDirtyAndRelease($formModeNew, $this->formSpec[F_RECORD_LOCK_TIMEOUT_SECONDS],
437
                $this->formSpec[F_DIRTY_MODE], $this->formSpec[F_TABLE_NAME], $this->formSpec[F_PRIMARY_KEY], $recordId, true);
438

439
            // In case of a conflict, return immediately
Carsten  Rose's avatar
Carsten Rose committed
440
441
            if ($answer[API_STATUS] != API_ANSWER_STATUS_SUCCESS) {
                $answer[API_STATUS] = API_ANSWER_STATUS_ERROR;
442

443
444
                return $answer;
            }
Carsten  Rose's avatar
Carsten Rose committed
445
446
        }

447
        // FORM_LOAD: if there is a foreign exclusive record lock - show form in F_MODE_READONLY mode.
Carsten  Rose's avatar
Carsten Rose committed
448
        if ($formModeNew === FORM_LOAD) {
449
            $dirty = new Dirty(false, $this->dbIndexData, $this->dbIndexQfq);
450
451
452
            $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) {
453
                $this->formSpec[F_MODE_GLOBAL] = F_MODE_READONLY;
454
455
456
            }
        }

Carsten  Rose's avatar
Carsten Rose committed
457
        switch ($formModeNew) {
458
459
460
461
462
463
464
465
466
            case FORM_DELETE:
                $build = new Delete($this->dbIndexData);
                break;
            case FORM_REST:
                break;
            case FORM_LOAD:
            case FORM_SAVE:
            case FORM_UPDATE:
            case FORM_DRAG_AND_DROP:
467

468
469
470
                $tableDefinition = $this->dbArray[$this->dbIndexData]->getTableDefinition($this->formSpec[F_TABLE_NAME]);
                $this->store->fillStoreTableDefaultColumnType($tableDefinition);

471
472
                // Check if the defined column primary key exist.
                if ($this->store::getVar($this->formSpec[F_PRIMARY_KEY], STORE_TABLE_COLUMN_TYPES) === false) {
473
                    throw new \UserFormException("Primary Key '" . $this->formSpec[F_PRIMARY_KEY] . "' not found in table " . $this->formSpec[F_TABLE_NAME], ERROR_INVALID_OR_MISSING_PARAMETER);
474
475
                }

476
477
478
479
480
481
482
483
484
485
486
                switch ($this->formSpec['render']) {
                    case 'plain':
                        $build = new BuildFormPlain($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
                        break;
                    case 'table':
                        $build = new BuildFormTable($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
                        break;
                    case 'bootstrap':
                        $build = new BuildFormBootstrap($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->dbArray);
                        break;
                    default:
Marc Egger's avatar
Marc Egger committed
487
                        throw new \CodeException("This statement should never be reached", ERROR_CODE_SHOULD_NOT_HAPPEN);
488
489
490
                }
                break;
            default:
Marc Egger's avatar
Marc Egger committed
491
                throw new \CodeException("This statement should never be reached", ERROR_CODE_SHOULD_NOT_HAPPEN);
492
493
        }

494
        $formAction = new FormAction($this->formSpec, $this->dbArray[$this->dbIndexData], $this->phpUnit);
Carsten  Rose's avatar
Carsten Rose committed
495
        switch ($formModeNew) {
496
            case FORM_LOAD:
497
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);
498
499

                // Build FORM
Carsten  Rose's avatar
Carsten Rose committed
500
                $data = $build->process($formModeNew);
501

502
503
504
505
                $tmpClass = is_numeric($this->formSpec[F_BS_COLUMNS]) ? ('col-md-' . $this->formSpec[F_BS_COLUMNS]) : $this->formSpec[F_BS_COLUMNS];
//                $data = Support::wrapTag("<div class='" . 'col-md-' . $this->formSpec[F_BS_COLUMNS] . "'>", $data);
                $data = Support::wrapTag('<div class="' . $tmpClass . '">', $data);
                $data = Support::wrapTag('<div class="row">', $data);
506
507
508
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_LOAD);
                break;

Carsten  Rose's avatar
Carsten Rose committed
509
            case FORM_UPDATE:
510
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);
511
                // data['form-update']=....
Carsten  Rose's avatar
Carsten Rose committed
512
                $data = $build->process($formModeNew);
513
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_AFTER_LOAD);
514
                break;
Carsten  Rose's avatar
Carsten Rose committed
515

516
517
518
            case FORM_DELETE:
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_DELETE);

519
                $build->process($this->formSpec[F_TABLE_NAME], $recordId, $this->formSpec[F_PRIMARY_KEY]);
520
521
522
523

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

524
            case FORM_SAVE:
525
526
                $this->logFormSubmitRequest();

Carsten  Rose's avatar
Carsten Rose committed
527
                $recordId = $this->store->getVar(SIP_RECORD_ID, STORE_SIP . STORE_TYPO3);
528

529
                // Action: Before
530
531
                $feTypeList = FE_TYPE_BEFORE_SAVE . ',' . ($recordId == 0 ? FE_TYPE_BEFORE_INSERT : FE_TYPE_BEFORE_UPDATE);
                $formAction->elements($recordId, $this->feSpecAction, $feTypeList);
532

533
                // If an old record exist: load it. Necessary to delete uploaded files which should be overwritten.
534
                $this->store->fillStoreWithRecord($this->formSpec[F_TABLE_NAME], $recordId,
535
                    $this->dbArray[$this->dbIndexData], $this->formSpec[F_PRIMARY_KEY]);
536

537
538
                $this->ifPillIsHiddenSetChildFeToHidden();

539
                // SAVE
540
                $save = new Save($this->formSpec, $this->feSpecAction, $this->feSpecNative, $this->feSpecNativeRaw);
541
542

                $save->processAllImageCutFE();
543
                $save->checkRequiredHidden();
544

545
546
                $rc = $save->process();

547
                // Reload fresh saved record and fill STORE_RECORD with it.
548
                $this->store->fillStoreWithRecord($this->formSpec[F_TABLE_NAME], $rc, $this->dbArray[$this->dbIndexData], $this->formSpec[F_PRIMARY_KEY]);
549

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

552
553
                // Action: After*, Sendmail
                $feTypeList = FE_TYPE_SENDMAIL . ',' . FE_TYPE_AFTER_SAVE . ',' . ($recordId == 0 ? FE_TYPE_AFTER_INSERT : FE_TYPE_AFTER_UPDATE);
554
                $status = $formAction->elements($rc, $this->feSpecAction, $feTypeList);
555
                if ($status != ACTION_ELEMENT_NO_CHANGE) {
556
                    // Reload fresh saved record and fill STORE_RECORD with it.
557
                    $this->store->fillStoreWithRecord($this->formSpec[F_TABLE_NAME], $rc, $this->dbArray[$this->dbIndexData], $this->formSpec[F_PRIMARY_KEY]);
558
                }
559

Carsten  Rose's avatar
Carsten Rose committed
560
561
562
                // Action: Paste
                $this->pasteClipboard($this->formSpec[F_ID], $formAction);

Carsten  Rose's avatar
Carsten Rose committed
563
564
                if ($formMode == FORM_REST) {
                    $data = ['id' => $rc];
565
                    $flagApiStructureReGroup = false;
Carsten  Rose's avatar
Carsten Rose committed
566
567
                    break;
                }
568
569
570
571
572
573
574

                $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!
575
                $getJson = true;
576
577
578
579
580
                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);
581
                    $getJson = false;
582
                }
583

584
                if ($getJson) {
585

586
                    // Values of FormElements might be changed during 'afterSave': rebuild the form to load the new values. Especially for non primary template groups.
587
588
589
590
                    $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);
591

Carsten  Rose's avatar
Carsten Rose committed
592
                    $data = $build->process($formModeNew, false, $this->feSpecNative);
593
                }
594
                break;
595

596
597
598
            case FORM_DRAG_AND_DROP:
                $formAction->elements($recordId, $this->feSpecAction, FE_TYPE_BEFORE_LOAD);

599
                $dragAndDrop = new DragAndDrop($this->formSpec);
600
                $data = $dragAndDrop->process();
601
                $flagApiStructureReGroup = false;
602
603

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

606
            case FORM_REST:
607
                $flagApiStructureReGroup = false;
608
                $data = $this->doRestGet();
609
610
                break;

611
            default:
Marc Egger's avatar
Marc Egger committed
612
                throw new \CodeException("This statement should never be reached", ERROR_CODE_SHOULD_NOT_HAPPEN);
613
614
        }

615
        if ($flagApiStructureReGroup && is_array($data)) {
616
            // $data['element-update']=...
617
618
            $data = $this->groupElementUpdateEntries($data);
        }
Carsten  Rose's avatar
Carsten Rose committed
619

Carsten  Rose's avatar
Carsten Rose committed
620
        return $data;
621
622
    }

623
624
    /**
     * @return array
Marc Egger's avatar
Marc Egger committed
625
626
627
628
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
     * @throws \UserReportException
629
     */
630
    private function doRestGet() {
631

Carsten  Rose's avatar
Carsten Rose committed
632
        $this->nameGenericRestParam();
633
634
635
636

        $r = $this->store::getVar(TYPO3_RECORD_ID, STORE_TYPO3);
        $key = empty($r) ? F_REST_SQL_LIST : F_REST_SQL_DATA;

637
        if (!isset($this->formSpec[$key])) {
Marc Egger's avatar
Marc Egger committed
638
            throw new \UserFormException("Missing Parameter '$key'", ERROR_INVALID_VALUE);
639
640
641
642
643
644
        }

        return $this->evaluate->parse($this->formSpec[$key]);

    }

Carsten  Rose's avatar
Carsten Rose committed
645
646
647
648
649
    /**
     * Checks if $serverToken matches HTTP_HEADER_AUTHORIZATION,
     * If not: throw an exception.
     *
     * @param string|array $serverToken
Marc Egger's avatar
Marc Egger committed
650
651
     * @throws \CodeException
     * @throws \UserFormException
Carsten  Rose's avatar
Carsten Rose committed
652
653
654
655
656
657
658
659
     */
    private function restCheckAuthToken($serverToken) {

        // No serverToken: no check necessary
        if ($serverToken === '') {
            return;
        }

660
661
        $clientToken = $this->store::getVar(HTTP_HEADER_AUTHORIZATION, STORE_CLIENT, SANITIZE_ALLOW_ALL);
        if ($serverToken === $clientToken) {
Carsten  Rose's avatar
Carsten Rose committed
662
663
664
665
666
667
668
            return;
        }

        // Delay before answering.
        $seconds = $this->store::getVar(SYSTEM_SECURITY_FAILED_AUTH_DELAY, STORE_SYSTEM);
        sleep($seconds);

669
        if ($clientToken == false) {
Marc Egger's avatar
Marc Egger committed
670
            throw new \UserFormException(json_encode([ERROR_MESSAGE_TO_USER => 'Missing authorization token',
Marc Egger's avatar
Marc Egger committed
671
                ERROR_MESSAGE_TO_DEVELOPER => "Missing HTTP Header: " . HTTP_HEADER_AUTHORIZATION,
672
                ERROR_MESSAGE_HTTP_STATUS => HTTP_401_UNAUTHORIZED
673
674
675
            ]), ERROR_REST_AUTHORIZATION);
        }

Marc Egger's avatar
Marc Egger committed
676
        throw new \UserFormException(json_encode([ERROR_MESSAGE_TO_USER => 'Authorization token not accepted',
Marc Egger's avatar
Marc Egger committed
677
            ERROR_MESSAGE_TO_DEVELOPER => "Missing HTTP Header: " . HTTP_HEADER_AUTHORIZATION,
678
            ERROR_MESSAGE_HTTP_STATUS => HTTP_401_UNAUTHORIZED
679
        ]), ERROR_REST_AUTHORIZATION);
Carsten  Rose's avatar
Carsten Rose committed
680
681
    }

682
683
684
    /**
     * STORE_CLIENT: copy parameter _id1,_id2,...,_idN to named variables, specified via $this->formSpec[F_REST_PARAM] (CSV list)
     *
Marc Egger's avatar
Marc Egger committed
685
686
     * @throws \CodeException
     * @throws \UserFormException
687
     */
Carsten  Rose's avatar
Carsten Rose committed
688
    private function nameGenericRestParam() {
689
690
691
692
693
694
695
696

        $paramNames = explode(',', $this->formSpec[F_REST_PARAM] ?? '');

        $ii = 1;
        foreach ($paramNames as $key) {
            switch ($key) {
                case CLIENT_FORM:
                case CLIENT_RECORD_ID:
Marc Egger's avatar
Marc Egger committed
697
                    throw new \UserFormException("Name '$key' is forbidden in " . F_REST_PARAM, ERROR_INVALID_VALUE);
698
699
700
701
702
703
704
705
706
707
                    break;
                default:
                    break;
            }
            $val = $this->store::getVar(CLIENT_REST_ID . $ii, STORE_CLIENT);
            $this->store::setVar($key, $val, STORE_CLIENT);
            $ii++;
        }
    }

708
709
710
    /**
     * Copies state 'hidden' from a FE pill to all FE child elements of that pill.
     *
Marc Egger's avatar
Marc Egger committed
711
712
713
714
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
     * @throws \UserReportException
715
716
717
718
719
720
721
722
     */
    private function ifPillIsHiddenSetChildFeToHidden() {

        $feFilter = OnArray::filter($this->feSpecNative, FE_TYPE, FE_TYPE_PILL);

        if (!empty($feFilter)) {
            foreach ($feFilter AS $feParent) {

723
                if ($feParent[FE_MODE_SQL]) {
724
                    $mode = $this->evaluate->parse($feParent[FE_MODE_SQL]);
725
726
                    if ($mode != '') {
                        $feParent[FE_MODE] = $mode;
727
728
729
730
731
732
733
734
                    }
                }

                if ($feParent[FE_MODE] == FE_MODE_HIDDEN) {
                    $feChild = OnArray::filter($this->feSpecNative, FE_ID_CONTAINER, $feParent[FE_ID]);
                    foreach ($feChild AS $fe) {

                        # Search for origin
735
736
                        foreach ($this->feSpecNative as $key => $value) {
                            if ($value[FE_ID] == $fe[FE_ID]) {
737
738
739
740
741
742
743
744
745
746
                                $this->feSpecNative[$key][FE_MODE] = FE_MODE_HIDDEN;
                                break;
                            }
                        }
                    }
                }
            }
        }
    }

747
    /**
Marc Egger's avatar
Marc Egger committed
748
749
750
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
751
752
753
754
755
756
757
758
759
760
761
     */
    private function logFormSubmitRequest() {
        $formSubmitLogMode = $this->formSpec[F_FORM_SUBMIT_LOG_MODE] ??
            $this->store->getVar(SYSTEM_FORM_SUBMIT_LOG_MODE, STORE_SYSTEM, SANITIZE_ALLOW_ALNUMX);
        if ($formSubmitLogMode === FORM_SUBMIT_LOG_MODE_NONE) {
            return;
        }

        $formData = $_POST;
        unset($formData[CLIENT_SIP]);
        $formData = json_encode($formData, JSON_UNESCAPED_UNICODE);
Carsten  Rose's avatar
Carsten Rose committed
762
763
        $clientIp = $_SERVER[CLIENT_REMOTE_ADDRESS] ?? '';
        $userAgent = $_SERVER[CLIENT_HTTP_USER_AGENT] ?? '';
764
765
766
767
768
769
770
        $sipData = json_encode($this->store->getStore(STORE_SIP), JSON_UNESCAPED_UNICODE);
        $formId = $this->formSpec[F_ID];
        $recordId = $this->store->getVar(SIP_RECORD_ID, STORE_SIP);
        $feUser = $this->store->getVar(TYPO3_FE_USER, STORE_TYPO3, SANITIZE_ALLOW_ALNUMX);
        $pageId = $this->store->getVar(TYPO3_PAGE_ID, STORE_TYPO3, SANITIZE_ALLOW_ALNUMX);
        $sessionId = session_id();

771
        $sql = "INSERT INTO `FormSubmitLog` (`formData`, `sipData`, `clientIp`, `feUser`, `userAgent`, `formId`, `recordId`, `pageId`, `sessionId`, `created`)" .
772
            "VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, NOW())";
773
774
775
776
        $params = [$formData, $sipData, $clientIp, $feUser, $userAgent, $formId, $recordId, $pageId, $sessionId];
        $this->dbArray[$this->dbIndexQfq]->sql($sql, ROW_REGULAR, $params);
    }

777
778
779
780
781
782
783
784
785
786
787

    /**
     * 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,
788
     *            ?[id=]<T3 Alias pageid>&a=123#bottom, ?id=<T3 page id>&a=123#bottom
789
790
791
792
793
     * b) mode      no|client|url|...
     * c) mode|url  combination of above
     *
     * @return bool  TRUE if F_FORWARD_MODE = 'url..', else FALSE
     *
Marc Egger's avatar
Marc Egger committed
794
795
796
797
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
     * @throws \UserReportException
798
799
800
     */
    private function setForwardModePage() {

801
        if (F_FORWARD_MODE_URL != substr($this->formSpec[F_FORWARD_MODE], 0, 3)) {
802
803
804
            return false;
        }

805
        $forwardPageTmp = $this->evaluate->parse($this->formSpec[F_FORWARD_PAGE]);
806
807
808
809
810
811

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

812
            case F_FORWARD_MODE_AUTO:
813
            case F_FORWARD_MODE_CLOSE:
814
815
816
817
            case F_FORWARD_MODE_NO:
            case F_FORWARD_MODE_URL:
            case F_FORWARD_MODE_URL_SKIP_HISTORY:
            case F_FORWARD_MODE_URL_SIP:
818
            case F_FORWARD_MODE_URL_SIP_SKIP_HISTORY:
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
                $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] == '') {
834
                $this->formSpec[F_FORWARD_MODE] = F_FORWARD_MODE_AUTO;
835
836
837
838
839
840
841
842
843
844
845
846
847
                $customForward = false;
            } else {
                $customForward = true;
            }

        } else {
            $customForward = false;
        }

        return $customForward;

    }

Carsten  Rose's avatar
Carsten Rose committed
848
849
850
    /**
     * Iterate over all Clipboard source records and fire for each all FE.type=paste records.
     *
Carsten  Rose's avatar
Carsten Rose committed
851
     * @param int $formId
Carsten  Rose's avatar
Carsten Rose committed
852
     * @param FormAction $formAction
853
     *
Marc Egger's avatar
Marc Egger committed
854
855
856
857
     * @throws \CodeException
     * @throws \DbException
     * @throws \UserFormException
     * @throws \UserReportException
Carsten  Rose's avatar
Carsten Rose committed
858
859
860
     */
    private function pasteClipboard($formId, FormAction $formAction) {

861
862
863
864
        if (!$this->isPasteRecord()) {
            return;
        }

Carsten  Rose's avatar
Carsten Rose committed
865
866
        $cookieQfq = $this->store->getVar(CLIENT_COOKIE_QFQ, STORE_CLIENT, SANITIZE_ALLOW_ALNUMX);
        if ($cookieQfq === false || $cookieQfq == '') {
Marc Egger's avatar
Marc Egger committed
867
            throw new \UserFormException('Qfq Session missing', ERROR_QFQ_SESSION_MISSING);
Carsten  Rose's avatar
Carsten Rose committed
868
869
870
        }

        # select clipboard records
871
        $sql = "SELECT c.idSrc as id, c.xId FROM `Clipboard` AS c WHERE `c`.`cookie`='$cookieQfq' AND `c`.`formIdPaste`=$formId ORDER BY `c`.`id`";
872
        $arrClipboard = $this->dbArray[$this->dbIndexQfq]->sql($sql);
Carsten  Rose's avatar
Carsten Rose committed
873
874
875
876
877
878
879
880

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

    } # doClipboard()

881
882
883
884
885
886
887
888
889
890
    /**
     * @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;
            }
        }
891

892
893
894
895
        return false;

    }

896
897
898
899
900
    /**
     * 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
901
     * @param int $recordId
902
     *
903
     * @return array
Marc Egger's avatar
Marc Egger committed
904
905
     * @throws \CodeException
     * @throws \UserFormException
906
907
908
     */
    private function buildNSetReloadUrl(array $formSpec, $recordId) {

909
        $formSpec[F_FORWARD_MODE] = API_ANSWER_REDIRECT_URL_SKIP_HISTORY;
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926

        // 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;

    }

927
    /**
928
929
930
931
932
933
     * 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
Marc Egger's avatar
Marc Egger committed
934
935
936
     * @throws \CodeException
     * @throws \UserFormException
     * @throws \UserReportException
937
938
939
940
941
942
943
944
     */
    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);
945
            if (file_exists($file) && false !== ($arr = stat($file))) {
946
947

                if (time() - $arr['mtime'] > FORM_LOG_FILE_EXPIRE) {
948
                    HelperFile::unlink($file);
Carsten  Rose's avatar