Reverted wrong commit. Sorry.
[Packages/TYPO3.CMS.git] / t3lib / class.t3lib_sqlparser.php
1 <?php
2 /***************************************************************
3 * Copyright notice
4 *
5 * (c) 2004-2006 Kasper Skaarhoj (kasperYYYY@typo3.com)
6 * All rights reserved
7 *
8 * This script is part of the TYPO3 project. The TYPO3 project is
9 * free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * The GNU General Public License can be found at
15 * http://www.gnu.org/copyleft/gpl.html.
16 * A copy is found in the textfile GPL.txt and important notices to the license
17 * from the author is found in LICENSE.txt distributed with these scripts.
18 *
19 *
20 * This script is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
24 *
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
27 /**
28 * TYPO3 SQL parser
29 *
30 * $Id$
31 *
32 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
33 */
34 /**
35 * [CLASS/FUNCTION INDEX of SCRIPT]
36 *
37 *
38 *
39 * 107: class t3lib_sqlparser
40 *
41 * SECTION: SQL Parsing, full queries
42 * 129: function parseSQL($parseString)
43 * 192: function parseSELECT($parseString)
44 * 261: function parseUPDATE($parseString)
45 * 315: function parseINSERT($parseString)
46 * 375: function parseDELETE($parseString)
47 * 413: function parseEXPLAIN($parseString)
48 * 435: function parseCREATETABLE($parseString)
49 * 514: function parseALTERTABLE($parseString)
50 * 583: function parseDROPTABLE($parseString)
51 * 616: function parseCREATEDATABASE($parseString)
52 *
53 * SECTION: SQL Parsing, helper functions for parts of queries
54 * 670: function parseFieldList(&$parseString, $stopRegex='')
55 * 791: function parseFromTables(&$parseString, $stopRegex='')
56 * 882: function parseWhereClause(&$parseString, $stopRegex='')
57 * 990: function parseFieldDef(&$parseString, $stopRegex='')
58 *
59 * SECTION: Parsing: Helper functions
60 * 1053: function nextPart(&$parseString,$regex,$trimAll=FALSE)
61 * 1068: function getValue(&$parseString,$comparator='')
62 * 1127: function getValueInQuotes(&$parseString,$quote)
63 * 1153: function parseStripslashes($str)
64 * 1167: function compileAddslashes($str)
65 * 1182: function parseError($msg,$restQuery)
66 * 1196: function trimSQL($str)
67 *
68 * SECTION: Compiling queries
69 * 1225: function compileSQL($components)
70 * 1263: function compileSELECT($components)
71 * 1294: function compileUPDATE($components)
72 * 1322: function compileINSERT($components)
73 * 1362: function compileDELETE($components)
74 * 1382: function compileCREATETABLE($components)
75 * 1415: function compileALTERTABLE($components)
76 *
77 * SECTION: Compiling queries, helper functions for parts of queries
78 * 1468: function compileFieldList($selectFields)
79 * 1510: function compileFromTables($tablesArray)
80 * 1551: function compileWhereClause($clauseArray)
81 * 1605: function compileFieldCfg($fieldCfg)
82 *
83 * SECTION: Debugging
84 * 1654: function debug_parseSQLpart($part,$str)
85 * 1679: function debug_parseSQLpartCompare($str,$newStr,$caseInsensitive=FALSE)
86 * 1712: function debug_testSQL($SQLquery)
87 *
88 * TOTAL FUNCTIONS: 35
89 * (This index is automatically created/updated by the extension "extdeveval")
90 *
91 */
92
93
94
95
96
97
98
99
100 /**
101 * TYPO3 SQL parser class.
102 *
103 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
104 * @package TYPO3
105 * @subpackage t3lib
106 */
107 class t3lib_sqlparser {
108
109 // Parser:
110 var $parse_error = ''; // Parsing error string
111 var $lastStopKeyWord = ''; // Last stop keyword used.
112
113
114
115
116 /*************************************
117 *
118 * SQL Parsing, full queries
119 *
120 **************************************/
121
122 /**
123 * Parses any single SQL query
124 *
125 * @param string SQL query
126 * @return array Result array with all the parts in - or error message string
127 * @see compileSQL(), debug_testSQL()
128 */
129 function parseSQL($parseString) {
130 // Prepare variables:
131 $parseString = $this->trimSQL($parseString);
132 $this->parse_error = '';
133 $result = array();
134
135 // Finding starting keyword of string:
136 $_parseString = $parseString; // Protecting original string...
137 $keyword = $this->nextPart($_parseString, '^(SELECT|UPDATE|INSERT[[:space:]]+INTO|DELETE[[:space:]]+FROM|EXPLAIN|DROP[[:space:]]+TABLE|CREATE[[:space:]]+TABLE|CREATE[[:space:]]+DATABASE|ALTER[[:space:]]+TABLE)[[:space:]]+');
138 $keyword = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$keyword));
139
140 switch($keyword) {
141 case 'SELECT':
142 // Parsing SELECT query:
143 $result = $this->parseSELECT($parseString);
144 break;
145 case 'UPDATE':
146 // Parsing UPDATE query:
147 $result = $this->parseUPDATE($parseString);
148 break;
149 case 'INSERTINTO':
150 // Parsing INSERT query:
151 $result = $this->parseINSERT($parseString);
152 break;
153 case 'DELETEFROM':
154 // Parsing DELETE query:
155 $result = $this->parseDELETE($parseString);
156 break;
157 case 'EXPLAIN':
158 // Parsing EXPLAIN SELECT query:
159 $result = $this->parseEXPLAIN($parseString);
160 break;
161 case 'DROPTABLE':
162 // Parsing DROP TABLE query:
163 $result = $this->parseDROPTABLE($parseString);
164 break;
165 case 'ALTERTABLE':
166 // Parsing ALTER TABLE query:
167 $result = $this->parseALTERTABLE($parseString);
168 break;
169 case 'CREATETABLE':
170 // Parsing CREATE TABLE query:
171 $result = $this->parseCREATETABLE($parseString);
172 break;
173 case 'CREATEDATABASE':
174 // Parsing CREATE DATABASE query:
175 $result = $this->parseCREATEDATABASE($parseString);
176 break;
177 default:
178 $result = $this->parseError('"'.$keyword.'" is not a keyword',$parseString);
179 break;
180 }
181
182 return $result;
183 }
184
185 /**
186 * Parsing SELECT query
187 *
188 * @param string SQL string with SELECT query to parse
189 * @return mixed Returns array with components of SELECT query on success, otherwise an error message string.
190 * @see compileSELECT()
191 */
192 function parseSELECT($parseString) {
193
194 // Removing SELECT:
195 $parseString = $this->trimSQL($parseString);
196 $parseString = ltrim(substr($parseString,6)); // REMOVE eregi_replace('^SELECT[[:space:]]+','',$parseString);
197
198 // Init output variable:
199 $result = array();
200 $result['type'] = 'SELECT';
201
202 // Looking for STRAIGHT_JOIN keyword:
203 $result['STRAIGHT_JOIN'] = $this->nextPart($parseString, '^(STRAIGHT_JOIN)[[:space:]]+');
204
205 // Select fields:
206 $result['SELECT'] = $this->parseFieldList($parseString, '^(FROM)[[:space:]]+');
207 if ($this->parse_error) { return $this->parse_error; }
208
209 // Continue if string is not ended:
210 if ($parseString) {
211
212 // Get table list:
213 $result['FROM'] = $this->parseFromTables($parseString, '^(WHERE)[[:space:]]+');
214 if ($this->parse_error) { return $this->parse_error; }
215
216 // If there are more than just the tables (a WHERE clause that would be...)
217 if ($parseString) {
218
219 // Get WHERE clause:
220 $result['WHERE'] = $this->parseWhereClause($parseString, '^(GROUP[[:space:]]+BY|ORDER[[:space:]]+BY|LIMIT)[[:space:]]+');
221 if ($this->parse_error) { return $this->parse_error; }
222
223 // If the WHERE clause parsing was stopped by GROUP BY, ORDER BY or LIMIT, then proceed with parsing:
224 if ($this->lastStopKeyWord) {
225
226 // GROUP BY parsing:
227 if ($this->lastStopKeyWord == 'GROUPBY') {
228 $result['GROUPBY'] = $this->parseFieldList($parseString, '^(ORDER[[:space:]]+BY|LIMIT)[[:space:]]+');
229 if ($this->parse_error) { return $this->parse_error; }
230 }
231
232 // ORDER BY parsing:
233 if ($this->lastStopKeyWord == 'ORDERBY') {
234 $result['ORDERBY'] = $this->parseFieldList($parseString, '^(LIMIT)[[:space:]]+');
235 if ($this->parse_error) { return $this->parse_error; }
236 }
237
238 // LIMIT parsing:
239 if ($this->lastStopKeyWord == 'LIMIT') {
240 if (preg_match('/^([0-9]+|[0-9]+[[:space:]]*,[[:space:]]*[0-9]+)$/',trim($parseString))) {
241 $result['LIMIT'] = $parseString;
242 } else {
243 return $this->parseError('No value for limit!',$parseString);
244 }
245 }
246 }
247 }
248 } else return $this->parseError('No table to select from!',$parseString);
249
250 // Return result:
251 return $result;
252 }
253
254 /**
255 * Parsing UPDATE query
256 *
257 * @param string SQL string with UPDATE query to parse
258 * @return mixed Returns array with components of UPDATE query on success, otherwise an error message string.
259 * @see compileUPDATE()
260 */
261 function parseUPDATE($parseString) {
262
263 // Removing UPDATE
264 $parseString = $this->trimSQL($parseString);
265 $parseString = ltrim(substr($parseString,6)); // REMOVE eregi_replace('^UPDATE[[:space:]]+','',$parseString);
266
267 // Init output variable:
268 $result = array();
269 $result['type'] = 'UPDATE';
270
271 // Get table:
272 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+');
273
274 // Continue if string is not ended:
275 if ($result['TABLE']) {
276 if ($parseString && $this->nextPart($parseString, '^(SET)[[:space:]]+')) {
277
278 $comma = TRUE;
279
280 // Get field/value pairs:
281 while($comma) {
282 if ($fieldName = $this->nextPart($parseString,'^([[:alnum:]_]+)[[:space:]]*=')) {
283 $this->nextPart($parseString,'^(=)'); // Strip of "=" sign.
284 $value = $this->getValue($parseString);
285 $result['FIELDS'][$fieldName] = $value;
286 } else return $this->parseError('No fieldname found',$parseString);
287
288 $comma = $this->nextPart($parseString,'^(,)');
289 }
290
291 // WHERE
292 if ($this->nextPart($parseString,'^(WHERE)')) {
293 $result['WHERE'] = $this->parseWhereClause($parseString);
294 if ($this->parse_error) { return $this->parse_error; }
295 }
296 } else return $this->parseError('Query missing SET...',$parseString);
297 } else return $this->parseError('No table found!',$parseString);
298
299 // Should be no more content now:
300 if ($parseString) {
301 return $this->parseError('Still content in clause after parsing!',$parseString);
302 }
303
304 // Return result:
305 return $result;
306 }
307
308 /**
309 * Parsing INSERT query
310 *
311 * @param string SQL string with INSERT query to parse
312 * @return mixed Returns array with components of INSERT query on success, otherwise an error message string.
313 * @see compileINSERT()
314 */
315 function parseINSERT($parseString) {
316
317 // Removing INSERT
318 $parseString = $this->trimSQL($parseString);
319 $parseString = ltrim(substr(ltrim(substr($parseString,6)),4)); // REMOVE eregi_replace('^INSERT[[:space:]]+INTO[[:space:]]+','',$parseString);
320
321 // Init output variable:
322 $result = array();
323 $result['type'] = 'INSERT';
324
325 // Get table:
326 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)([[:space:]]+|\()');
327
328 if ($result['TABLE']) {
329
330 if ($this->nextPart($parseString,'^(VALUES)[[:space:]]+')) { // In this case there are no field names mentioned in the SQL!
331 // Get values/fieldnames (depending...)
332 $result['VALUES_ONLY'] = $this->getValue($parseString,'IN');
333 if ($this->parse_error) { return $this->parse_error; }
334 } else { // There are apparently fieldnames listed:
335 $fieldNames = $this->getValue($parseString,'_LIST');
336 if ($this->parse_error) { return $this->parse_error; }
337
338 if ($this->nextPart($parseString,'^(VALUES)[[:space:]]+')) { // "VALUES" keyword binds the fieldnames to values:
339
340 $values = $this->getValue($parseString,'IN'); // Using the "getValue" function to get the field list...
341 if ($this->parse_error) { return $this->parse_error; }
342
343 foreach($fieldNames as $k => $fN) {
344 if (preg_match('/^[[:alnum:]_]+$/',$fN)) {
345 if (isset($values[$k])) {
346 if (!isset($result['FIELDS'][$fN])) {
347 $result['FIELDS'][$fN] = $values[$k];
348 } else return $this->parseError('Fieldname ("'.$fN.'") already found in list!',$parseString);
349 } else return $this->parseError('No value set!',$parseString);
350 } else return $this->parseError('Invalid fieldname ("'.$fN.'")',$parseString);
351 }
352 if (isset($values[$k+1])) {
353 return $this->parseError('Too many values in list!',$parseString);
354 }
355 } else return $this->parseError('VALUES keyword expected',$parseString);
356 }
357 } else return $this->parseError('No table found!',$parseString);
358
359 // Should be no more content now:
360 if ($parseString) {
361 return $this->parseError('Still content after parsing!',$parseString);
362 }
363
364 // Return result
365 return $result;
366 }
367
368 /**
369 * Parsing DELETE query
370 *
371 * @param string SQL string with DELETE query to parse
372 * @return mixed Returns array with components of DELETE query on success, otherwise an error message string.
373 * @see compileDELETE()
374 */
375 function parseDELETE($parseString) {
376
377 // Removing DELETE
378 $parseString = $this->trimSQL($parseString);
379 $parseString = ltrim(substr(ltrim(substr($parseString,6)),4)); // REMOVE eregi_replace('^DELETE[[:space:]]+FROM[[:space:]]+','',$parseString);
380
381 // Init output variable:
382 $result = array();
383 $result['type'] = 'DELETE';
384
385 // Get table:
386 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+');
387
388 if ($result['TABLE']) {
389
390 // WHERE
391 if ($this->nextPart($parseString,'^(WHERE)')) {
392 $result['WHERE'] = $this->parseWhereClause($parseString);
393 if ($this->parse_error) { return $this->parse_error; }
394 }
395 } else return $this->parseError('No table found!',$parseString);
396
397 // Should be no more content now:
398 if ($parseString) {
399 return $this->parseError('Still content in clause after parsing!',$parseString);
400 }
401
402 // Return result:
403 return $result;
404 }
405
406 /**
407 * Parsing EXPLAIN query
408 *
409 * @param string SQL string with EXPLAIN query to parse
410 * @return mixed Returns array with components of EXPLAIN query on success, otherwise an error message string.
411 * @see parseSELECT()
412 */
413 function parseEXPLAIN($parseString) {
414
415 // Removing EXPLAIN
416 $parseString = $this->trimSQL($parseString);
417 $parseString = ltrim(substr($parseString,6)); // REMOVE eregi_replace('^EXPLAIN[[:space:]]+','',$parseString);
418
419 // Init output variable:
420 $result = $this->parseSELECT($parseString);
421 if (is_array($result)) {
422 $result['type'] = 'EXPLAIN';
423 }
424
425 return $result;
426 }
427
428 /**
429 * Parsing CREATE TABLE query
430 *
431 * @param string SQL string starting with CREATE TABLE
432 * @return mixed Returns array with components of CREATE TABLE query on success, otherwise an error message string.
433 * @see compileCREATETABLE()
434 */
435 function parseCREATETABLE($parseString) {
436
437 // Removing CREATE TABLE
438 $parseString = $this->trimSQL($parseString);
439 $parseString = ltrim(substr(ltrim(substr($parseString,6)),5)); // REMOVE eregi_replace('^CREATE[[:space:]]+TABLE[[:space:]]+','',$parseString);
440
441 // Init output variable:
442 $result = array();
443 $result['type'] = 'CREATETABLE';
444
445 // Get table:
446 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]*\(',TRUE);
447
448 if ($result['TABLE']) {
449
450 // While the parseString is not yet empty:
451 while(strlen($parseString)>0) {
452 if ($key = $this->nextPart($parseString, '^(KEY|PRIMARY KEY|UNIQUE KEY|UNIQUE)([[:space:]]+|\()')) { // Getting key
453 $key = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$key));
454
455 switch($key) {
456 case 'PRIMARYKEY':
457 $result['KEYS']['PRIMARYKEY'] = $this->getValue($parseString,'_LIST');
458 if ($this->parse_error) { return $this->parse_error; }
459 break;
460 case 'UNIQUE':
461 case 'UNIQUEKEY':
462 if ($keyName = $this->nextPart($parseString, '^([[:alnum:]_]+)([[:space:]]+|\()')) {
463 $result['KEYS']['UNIQUE'] = array($keyName => $this->getValue($parseString,'_LIST'));
464 if ($this->parse_error) { return $this->parse_error; }
465 } else return $this->parseError('No keyname found',$parseString);
466 break;
467 case 'KEY':
468 if ($keyName = $this->nextPart($parseString, '^([[:alnum:]_]+)([[:space:]]+|\()')) {
469 $result['KEYS'][$keyName] = $this->getValue($parseString,'_LIST');
470 if ($this->parse_error) { return $this->parse_error; }
471 } else return $this->parseError('No keyname found',$parseString);
472 break;
473 }
474 } elseif ($fieldName = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+')) { // Getting field:
475 $result['FIELDS'][$fieldName]['definition'] = $this->parseFieldDef($parseString);
476 if ($this->parse_error) { return $this->parse_error; }
477 }
478
479 // Finding delimiter:
480 $delim = $this->nextPart($parseString, '^(,|\))');
481 if (!$delim) {
482 return $this->parseError('No delimiter found',$parseString);
483 } elseif ($delim==')') {
484 break;
485 }
486 }
487
488 // Finding what is after the table definition - table type in MySQL
489 if ($delim==')') {
490 if ($this->nextPart($parseString, '^(TYPE[[:space:]]*=)')) {
491 $result['tableType'] = $parseString;
492 $parseString = '';
493 }
494 } else return $this->parseError('No fieldname found!',$parseString);
495
496 // Getting table type
497 } else return $this->parseError('No table found!',$parseString);
498
499 // Should be no more content now:
500 if ($parseString) {
501 return $this->parseError('Still content in clause after parsing!',$parseString);
502 }
503
504 return $result;
505 }
506
507 /**
508 * Parsing ALTER TABLE query
509 *
510 * @param string SQL string starting with ALTER TABLE
511 * @return mixed Returns array with components of ALTER TABLE query on success, otherwise an error message string.
512 * @see compileALTERTABLE()
513 */
514 function parseALTERTABLE($parseString) {
515
516 // Removing ALTER TABLE
517 $parseString = $this->trimSQL($parseString);
518 $parseString = ltrim(substr(ltrim(substr($parseString,5)),5)); // REMOVE eregi_replace('^ALTER[[:space:]]+TABLE[[:space:]]+','',$parseString);
519
520 // Init output variable:
521 $result = array();
522 $result['type'] = 'ALTERTABLE';
523
524 // Get table:
525 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+');
526
527 if ($result['TABLE']) {
528 if ($result['action'] = $this->nextPart($parseString, '^(CHANGE|DROP[[:space:]]+KEY|DROP[[:space:]]+PRIMARY[[:space:]]+KEY|ADD[[:space:]]+KEY|ADD[[:space:]]+PRIMARY[[:space:]]+KEY|DROP|ADD|RENAME)([[:space:]]+|\()')) {
529 $actionKey = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$result['action']));
530
531 // Getting field:
532 if (t3lib_div::inList('ADDPRIMARYKEY,DROPPRIMARYKEY',$actionKey) || $fieldKey = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+')) {
533
534 switch($actionKey) {
535 case 'ADD':
536 $result['FIELD'] = $fieldKey;
537 $result['definition'] = $this->parseFieldDef($parseString);
538 if ($this->parse_error) { return $this->parse_error; }
539 break;
540 case 'DROP':
541 case 'RENAME':
542 $result['FIELD'] = $fieldKey;
543 break;
544 case 'CHANGE':
545 $result['FIELD'] = $fieldKey;
546 if ($result['newField'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+')) {
547 $result['definition'] = $this->parseFieldDef($parseString);
548 if ($this->parse_error) { return $this->parse_error; }
549 } else return $this->parseError('No NEW field name found',$parseString);
550 break;
551
552 case 'ADDKEY':
553 case 'ADDPRIMARYKEY':
554 $result['KEY'] = $fieldKey;
555 $result['fields'] = $this->getValue($parseString,'_LIST');
556 if ($this->parse_error) { return $this->parse_error; }
557 break;
558 case 'DROPKEY':
559 $result['KEY'] = $fieldKey;
560 break;
561 case 'DROPPRIMARYKEY':
562 // ??? todo!
563 break;
564 }
565 } else return $this->parseError('No field name found',$parseString);
566 } else return $this->parseError('No action CHANGE, DROP or ADD found!',$parseString);
567 } else return $this->parseError('No table found!',$parseString);
568
569 // Should be no more content now:
570 if ($parseString) {
571 return $this->parseError('Still content in clause after parsing!',$parseString);
572 }
573
574 return $result;
575 }
576
577 /**
578 * Parsing DROP TABLE query
579 *
580 * @param string SQL string starting with DROP TABLE
581 * @return mixed Returns array with components of DROP TABLE query on success, otherwise an error message string.
582 */
583 function parseDROPTABLE($parseString) {
584
585 // Removing DROP TABLE
586 $parseString = $this->trimSQL($parseString);
587 $parseString = ltrim(substr(ltrim(substr($parseString,4)),5)); // eregi_replace('^DROP[[:space:]]+TABLE[[:space:]]+','',$parseString);
588
589 // Init output variable:
590 $result = array();
591 $result['type'] = 'DROPTABLE';
592
593 // IF EXISTS
594 $result['ifExists'] = $this->nextPart($parseString, '^(IF[[:space:]]+EXISTS[[:space:]]+)');
595
596 // Get table:
597 $result['TABLE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+');
598
599 if ($result['TABLE']) {
600
601 // Should be no more content now:
602 if ($parseString) {
603 return $this->parseError('Still content in clause after parsing!',$parseString);
604 }
605
606 return $result;
607 } else return $this->parseError('No table found!',$parseString);
608 }
609
610 /**
611 * Parsing CREATE DATABASE query
612 *
613 * @param string SQL string starting with CREATE DATABASE
614 * @return mixed Returns array with components of CREATE DATABASE query on success, otherwise an error message string.
615 */
616 function parseCREATEDATABASE($parseString) {
617
618 // Removing CREATE DATABASE
619 $parseString = $this->trimSQL($parseString);
620 $parseString = ltrim(substr(ltrim(substr($parseString,6)),8)); // eregi_replace('^CREATE[[:space:]]+DATABASE[[:space:]]+','',$parseString);
621
622 // Init output variable:
623 $result = array();
624 $result['type'] = 'CREATEDATABASE';
625
626 // Get table:
627 $result['DATABASE'] = $this->nextPart($parseString, '^([[:alnum:]_]+)[[:space:]]+');
628
629 if ($result['DATABASE']) {
630
631 // Should be no more content now:
632 if ($parseString) {
633 return $this->parseError('Still content in clause after parsing!',$parseString);
634 }
635
636 return $result;
637 } else return $this->parseError('No database found!',$parseString);
638 }
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654 /**************************************
655 *
656 * SQL Parsing, helper functions for parts of queries
657 *
658 **************************************/
659
660 /**
661 * Parsing the fields in the "SELECT [$selectFields] FROM" part of a query into an array.
662 * The output from this function can be compiled back into a field list with ->compileFieldList()
663 * Will detect the keywords "DESC" and "ASC" after the table name; thus is can be used for parsing the more simply ORDER BY and GROUP BY field lists as well!
664 *
665 * @param string The string with fieldnames, eg. "title, uid AS myUid, max(tstamp), count(*)" etc. NOTICE: passed by reference!
666 * @param string Regular expressing to STOP parsing, eg. '^(FROM)([[:space:]]*)'
667 * @return array If successful parsing, returns an array, otherwise an error string.
668 * @see compileFieldList()
669 */
670 function parseFieldList(&$parseString, $stopRegex='') {
671
672 $stack = array(); // Contains the parsed content
673
674 if(strlen($parseString)==0) return $stack; // FIXME - should never happen, why does it?
675
676 $pnt = 0; // Pointer to positions in $stack
677 $level = 0; // Indicates the parenthesis level we are at.
678 $loopExit = 0; // Recursivity brake.
679
680 // Prepare variables:
681 $parseString = $this->trimSQL($parseString);
682 $this->lastStopKeyWord = '';
683 $this->parse_error = '';
684
685 // $parseString is continously shortend by the process and we keep parsing it till it is zero:
686 while (strlen($parseString)) {
687
688 // Checking if we are inside / outside parenthesis (in case of a function like count(), max(), min() etc...):
689 if ($level>0) { // Inside parenthesis here (does NOT detect if values in quotes are used, the only token is ")" or "("):
690
691 // Accumulate function content until next () parenthesis:
692 $funcContent = $this->nextPart($parseString,'^([^()]*.)');
693 $stack[$pnt]['func_content.'][] = array(
694 'level' => $level,
695 'func_content' => substr($funcContent,0,-1)
696 );
697 $stack[$pnt]['func_content'].= $funcContent;
698
699 // Detecting ( or )
700 switch(substr($stack[$pnt]['func_content'],-1)) {
701 case '(':
702 $level++;
703 break;
704 case ')':
705 $level--;
706 if (!$level) { // If this was the last parenthesis:
707 $stack[$pnt]['func_content'] = substr($stack[$pnt]['func_content'],0,-1);
708 $parseString = ltrim($parseString); // Remove any whitespace after the parenthesis.
709 }
710 break;
711 }
712 } else { // Outside parenthesis, looking for next field:
713
714 // Looking for a known function (only known functions supported)
715 $func = $this->nextPart($parseString,'^(count|max|min|floor|sum|avg)[[:space:]]*\(');
716 if ($func) {
717 $parseString = trim(substr($parseString,1)); // Strip of "("
718 $stack[$pnt]['type'] = 'function';
719 $stack[$pnt]['function'] = $func;
720 $level++; // increse parenthesis level counter.
721 } else {
722 $stack[$pnt]['distinct'] = $this->nextPart($parseString,'^(distinct[[:space:]]+)');
723 // Otherwise, look for regular fieldname:
724 if ($fieldName = $this->nextPart($parseString,'^([[:alnum:]\*._]+)(,|[[:space:]]+)')) {
725 $stack[$pnt]['type'] = 'field';
726
727 // Explode fieldname into field and table:
728 $tableField = explode('.',$fieldName,2);
729 if (count($tableField)==2) {
730 $stack[$pnt]['table'] = $tableField[0];
731 $stack[$pnt]['field'] = $tableField[1];
732 } else {
733 $stack[$pnt]['table'] = '';
734 $stack[$pnt]['field'] = $tableField[0];
735 }
736 } else {
737 return $this->parseError('No field name found as expected in parseFieldList()',$parseString);
738 }
739 }
740 }
741
742 // After a function or field we look for "AS" alias and a comma to separate to the next field in the list:
743 if (!$level) {
744
745 // Looking for "AS" alias:
746 if ($as = $this->nextPart($parseString,'^(AS)[[:space:]]+')) {
747 $stack[$pnt]['as'] = $this->nextPart($parseString,'^([[:alnum:]_]+)(,|[[:space:]]+)');
748 $stack[$pnt]['as_keyword'] = $as;
749 }
750
751 // Looking for "ASC" or "DESC" keywords (for ORDER BY)
752 if ($sDir = $this->nextPart($parseString,'^(ASC|DESC)([[:space:]]+|,)')) {
753 $stack[$pnt]['sortDir'] = $sDir;
754 }
755
756 // Looking for stop-keywords:
757 if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {
758 $this->lastStopKeyWord = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$this->lastStopKeyWord));
759 return $stack;
760 }
761
762 // Looking for comma (since the stop-keyword did not trigger a return...)
763 if (strlen($parseString) && !$this->nextPart($parseString,'^(,)')) {
764 return $this->parseError('No comma found as expected in parseFieldList()',$parseString);
765 }
766
767 // Increasing pointer:
768 $pnt++;
769 }
770
771 // Check recursivity brake:
772 $loopExit++;
773 if ($loopExit>500) {
774 return $this->parseError('More than 500 loops, exiting prematurely in parseFieldList()...',$parseString);
775 }
776 }
777
778 // Return result array:
779 return $stack;
780 }
781
782 /**
783 * Parsing the tablenames in the "FROM [$parseString] WHERE" part of a query into an array.
784 * The success of this parsing determines if that part of the query is supported by TYPO3.
785 *
786 * @param string list of tables, eg. "pages, tt_content" or "pages A, pages B". NOTICE: passed by reference!
787 * @param string Regular expressing to STOP parsing, eg. '^(WHERE)([[:space:]]*)'
788 * @return array If successful parsing, returns an array, otherwise an error string.
789 * @see compileFromTables()
790 */
791 function parseFromTables(&$parseString, $stopRegex='') {
792
793 // Prepare variables:
794 $parseString = $this->trimSQL($parseString);
795 $this->lastStopKeyWord = '';
796 $this->parse_error = '';
797
798 $stack = array(); // Contains the parsed content
799 $pnt = 0; // Pointer to positions in $stack
800 $loopExit = 0; // Recursivity brake.
801
802 // $parseString is continously shortend by the process and we keep parsing it till it is zero:
803 while (strlen($parseString)) {
804 // Looking for the table:
805 if ($stack[$pnt]['table'] = $this->nextPart($parseString,'^([[:alnum:]_]+)(,|[[:space:]]+)')) {
806 // Looking for stop-keywords before fetching potential table alias:
807 if ($stopRegex && ($this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex))) {
808 $this->lastStopKeyWord = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$this->lastStopKeyWord));
809 return $stack;
810 }
811 if(!preg_match('/^(LEFT|JOIN)[[:space:]]+/i',$parseString)) {
812 $stack[$pnt]['as_keyword'] = $this->nextPart($parseString,'^(AS[[:space:]]+)');
813 $stack[$pnt]['as'] = $this->nextPart($parseString,'^([[:alnum:]_]+)[[:space:]]*');
814 }
815 } else return $this->parseError('No table name found as expected in parseFromTables()!',$parseString);
816
817 // Looking for JOIN
818 if ($join = $this->nextPart($parseString,'^(LEFT[[:space:]]+JOIN|LEFT[[:space:]]+OUTER[[:space:]]+JOIN|JOIN)[[:space:]]+')) {
819 $stack[$pnt]['JOIN']['type'] = $join;
820 if ($stack[$pnt]['JOIN']['withTable'] = $this->nextPart($parseString,'^([[:alnum:]_]+)[[:space:]]+ON[[:space:]]+',1)) {
821 $field1 = $this->nextPart($parseString,'^([[:alnum:]_.]+)[[:space:]]*=[[:space:]]*',1);
822 $field2 = $this->nextPart($parseString,'^([[:alnum:]_.]+)[[:space:]]+');
823 if ($field1 && $field2) {
824
825 // Explode fields into field and table:
826 $tableField = explode('.',$field1,2);
827 $field1 = array();
828 if (count($tableField)!=2) {
829 $field1['table'] = '';
830 $field1['field'] = $tableField[0];
831 } else {
832 $field1['table'] = $tableField[0];
833 $field1['field'] = $tableField[1];
834 }
835 $tableField = explode('.',$field2,2);
836 $field2 = array();
837 if (count($tableField)!=2) {
838 $field2['table'] = '';
839 $field2['field'] = $tableField[0];
840 } else {
841 $field2['table'] = $tableField[0];
842 $field2['field'] = $tableField[1];
843 }
844 $stack[$pnt]['JOIN']['ON'] = array($field1,$field2);
845 } else return $this->parseError('No join fields found in parseFromTables()!',$parseString);
846 } else return $this->parseError('No join table found in parseFromTables()!',$parseString);
847 }
848
849 // Looking for stop-keywords:
850 if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {
851 $this->lastStopKeyWord = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$this->lastStopKeyWord));
852 return $stack;
853 }
854
855 // Looking for comma:
856 if (strlen($parseString) && !$this->nextPart($parseString,'^(,)')) {
857 return $this->parseError('No comma found as expected in parseFromTables()',$parseString);
858 }
859
860 // Increasing pointer:
861 $pnt++;
862
863 // Check recursivity brake:
864 $loopExit++;
865 if ($loopExit>500) {
866 return $this->parseError('More than 500 loops, exiting prematurely in parseFromTables()...',$parseString);
867 }
868 }
869
870 // Return result array:
871 return $stack;
872 }
873
874 /**
875 * Parsing the WHERE clause fields in the "WHERE [$parseString] ..." part of a query into a multidimensional array.
876 * The success of this parsing determines if that part of the query is supported by TYPO3.
877 *
878 * @param string WHERE clause to parse. NOTICE: passed by reference!
879 * @param string Regular expressing to STOP parsing, eg. '^(GROUP BY|ORDER BY|LIMIT)([[:space:]]*)'
880 * @return mixed If successful parsing, returns an array, otherwise an error string.
881 */
882 function parseWhereClause(&$parseString, $stopRegex='') {
883
884 // Prepare variables:
885 $parseString = $this->trimSQL($parseString);
886 $this->lastStopKeyWord = '';
887 $this->parse_error = '';
888
889 $stack = array(0 => array()); // Contains the parsed content
890 $pnt = array(0 => 0); // Pointer to positions in $stack
891 $level = 0; // Determines parenthesis level
892 $loopExit = 0; // Recursivity brake.
893
894 // $parseString is continously shortend by the process and we keep parsing it till it is zero:
895 while (strlen($parseString)) {
896
897 // Look for next parenthesis level:
898 $newLevel = $this->nextPart($parseString,'^([(])');
899 if ($newLevel=='(') { // If new level is started, manage stack/pointers:
900 $level++; // Increase level
901 $pnt[$level] = 0; // Reset pointer for this level
902 $stack[$level] = array(); // Reset stack for this level
903 } else { // If no new level is started, just parse the current level:
904
905 // Find "modifyer", eg. "NOT or !"
906 $stack[$level][$pnt[$level]]['modifier'] = trim($this->nextPart($parseString,'^(!|NOT[[:space:]]+)'));
907
908 // Fieldname:
909 if ($fieldName = $this->nextPart($parseString,'^([[:alnum:]._]+)([[:space:]]+|&|<=|>=|<|>|=|!=|IS)')) {
910
911 // Parse field name into field and table:
912 $tableField = explode('.',$fieldName,2);
913 if (count($tableField)==2) {
914 $stack[$level][$pnt[$level]]['table'] = $tableField[0];
915 $stack[$level][$pnt[$level]]['field'] = $tableField[1];
916 } else {
917 $stack[$level][$pnt[$level]]['table'] = '';
918 $stack[$level][$pnt[$level]]['field'] = $tableField[0];
919 }
920 } else {
921 return $this->parseError('No field name found as expected in parseWhereClause()',$parseString);
922 }
923
924 // See if the value is calculated. Support only for "&" (boolean AND) at the moment:
925 $stack[$level][$pnt[$level]]['calc'] = $this->nextPart($parseString,'^(&)');
926 if (strlen($stack[$level][$pnt[$level]]['calc'])) {
927 // Finding value for calculation:
928 $stack[$level][$pnt[$level]]['calc_value'] = $this->getValue($parseString);
929 }
930
931 // Find "comparator":
932 $stack[$level][$pnt[$level]]['comparator'] = $this->nextPart($parseString,'^(<=|>=|<|>|=|!=|NOT[[:space:]]+IN|IN|NOT[[:space:]]+LIKE|LIKE|IS)');
933 if (strlen($stack[$level][$pnt[$level]]['comparator'])) {
934 // Finding value for comparator:
935 $stack[$level][$pnt[$level]]['value'] = $this->getValue($parseString,$stack[$level][$pnt[$level]]['comparator']);
936 if ($this->parse_error) { return $this->parse_error; }
937 }
938
939 // Finished, increase pointer:
940 $pnt[$level]++;
941
942 // Checking if the current level is ended, in that case do stack management:
943 while ($this->nextPart($parseString,'^([)])')) {
944 $level--; // Decrease level:
945 $stack[$level][$pnt[$level]]['sub'] = $stack[$level+1]; // Copy stack
946 $pnt[$level]++; // Increase pointer of the new level
947
948 // Make recursivity check:
949 $loopExit++;
950 if ($loopExit>500) {
951 return $this->parseError('More than 500 loops (in search for exit parenthesis), exiting prematurely in parseWhereClause()...',$parseString);
952 }
953 }
954
955 // Detecting the operator for the next level:
956 $op = $this->nextPart($parseString,'^(AND[[:space:]]+NOT|OR[[:space:]]+NOT|AND|OR)(\(|[[:space:]]+)');
957 if ($op) {
958 $stack[$level][$pnt[$level]]['operator'] = $op;
959 } elseif (strlen($parseString)) {
960
961 // Looking for stop-keywords:
962 if ($stopRegex && $this->lastStopKeyWord = $this->nextPart($parseString, $stopRegex)) {
963 $this->lastStopKeyWord = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$this->lastStopKeyWord));
964 return $stack[0];
965 } else {
966 return $this->parseError('No operator, but parsing not finished in parseWhereClause().',$parseString);
967 }
968 }
969 }
970
971 // Make recursivity check:
972 $loopExit++;
973 if ($loopExit>500) {
974 return $this->parseError('More than 500 loops, exiting prematurely in parseWhereClause()...',$parseString);
975 }
976 }
977
978 // Return the stacks lowest level:
979 return $stack[0];
980 }
981
982 /**
983 * Parsing the WHERE clause fields in the "WHERE [$parseString] ..." part of a query into a multidimensional array.
984 * The success of this parsing determines if that part of the query is supported by TYPO3.
985 *
986 * @param string WHERE clause to parse. NOTICE: passed by reference!
987 * @param string Regular expressing to STOP parsing, eg. '^(GROUP BY|ORDER BY|LIMIT)([[:space:]]*)'
988 * @return mixed If successful parsing, returns an array, otherwise an error string.
989 */
990 function parseFieldDef(&$parseString, $stopRegex='') {
991 // Prepare variables:
992 $parseString = $this->trimSQL($parseString);
993 $this->lastStopKeyWord = '';
994 $this->parse_error = '';
995
996 $result = array();
997
998 // Field type:
999 if ($result['fieldType'] = $this->nextPart($parseString,'^(int|smallint|tinyint|mediumint|bigint|double|numeric|decimal|varchar|char|text|tinytext|mediumtext|longtext|blob|tinyblob|mediumblob|longblob)([[:space:],]+|\()')) {
1000
1001 // Looking for value:
1002 if (substr($parseString,0,1)=='(') {
1003 $parseString = substr($parseString,1);
1004 if ($result['value'] = $this->nextPart($parseString,'^([^)]*)')) {
1005 $parseString = ltrim(substr($parseString,1));
1006 } else return $this->parseError('No end-parenthesis for value found in parseFieldDef()!',$parseString);
1007 }
1008
1009 // Looking for keywords
1010 while($keyword = $this->nextPart($parseString,'^(DEFAULT|NOT[[:space:]]+NULL|AUTO_INCREMENT|UNSIGNED)([[:space:]]+|,|\))')) {
1011 $keywordCmp = strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$keyword));
1012
1013 $result['featureIndex'][$keywordCmp]['keyword'] = $keyword;
1014
1015 switch($keywordCmp) {
1016 case 'DEFAULT':
1017 $result['featureIndex'][$keywordCmp]['value'] = $this->getValue($parseString);
1018 break;
1019 }
1020 }
1021 } else {
1022 return $this->parseError('Field type unknown in parseFieldDef()!',$parseString);
1023 }
1024
1025 return $result;
1026 }
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038 /************************************
1039 *
1040 * Parsing: Helper functions
1041 *
1042 ************************************/
1043
1044 /**
1045 * Strips off a part of the parseString and returns the matching part.
1046 * Helper function for the parsing methods.
1047 *
1048 * @param string Parse string; if $regex finds anything the value of the first () level will be stripped of the string in the beginning. Further $parseString is left-trimmed (on success). Notice; parsestring is passed by reference.
1049 * @param string Regex to find a matching part in the beginning of the string. Rules: You MUST start the regex with "^" (finding stuff in the beginning of string) and the result of the first parenthesis is what will be returned to you (and stripped of the string). Eg. '^(AND|OR|&&)[[:space:]]+' will return AND, OR or && if found and having one of more whitespaces after it, plus shorten $parseString with that match and any space after (by ltrim())
1050 * @param boolean If set the full match of the regex is stripped of the beginning of the string!
1051 * @return string The value of the first parenthesis level of the REGEX.
1052 */
1053 function nextPart(&$parseString,$regex,$trimAll=FALSE) {
1054 $reg = array();
1055 if (preg_match('/'.$regex.'/i',$parseString.' ', $reg)) { // Adding space char because [[:space:]]+ is often a requirement in regex's
1056 $parseString = ltrim(substr($parseString,strlen($reg[$trimAll?0:1])));
1057 return $reg[1];
1058 }
1059 }
1060
1061 /**
1062 * Finds value in beginning of $parseString, returns result and strips it of parseString
1063 *
1064 * @param string The parseString, eg. "(0,1,2,3) ..." or "('asdf','qwer') ..." or "1234 ..." or "'My string value here' ..."
1065 * @param string The comparator used before. If "NOT IN" or "IN" then the value is expected to be a list of values. Otherwise just an integer (un-quoted) or string (quoted)
1066 * @return mixed The value (string/integer). Otherwise an array with error message in first key (0)
1067 */
1068 function getValue(&$parseString,$comparator='') {
1069 $value = '';
1070
1071 if (t3lib_div::inList('NOTIN,IN,_LIST',strtoupper(str_replace(array(' ',"\n","\r","\t"),'',$comparator)))) { // List of values:
1072 if ($this->nextPart($parseString,'^([(])')) {
1073 $listValues = array();
1074 $comma=',';
1075
1076 while($comma==',') {
1077 $listValues[] = $this->getValue($parseString);
1078 $comma = $this->nextPart($parseString,'^([,])');
1079 }
1080
1081 $out = $this->nextPart($parseString,'^([)])');
1082 if ($out) {
1083 if ($comparator=='_LIST') {
1084 $kVals = array();
1085 foreach ($listValues as $vArr) {
1086 $kVals[] = $vArr[0];
1087 }
1088 return $kVals;
1089 } else {
1090 return $listValues;
1091 }
1092 } else return array($this->parseError('No ) parenthesis in list',$parseString));
1093 } else return array($this->parseError('No ( parenthesis starting the list',$parseString));
1094
1095 } else { // Just plain string value, in quotes or not:
1096
1097 // Quote?
1098 $firstChar = substr($parseString,0,1);
1099
1100 switch($firstChar) {
1101 case '"':
1102 $value = array($this->getValueInQuotes($parseString,'"'),'"');
1103 break;
1104 case "'":
1105 $value = array($this->getValueInQuotes($parseString,"'"),"'");
1106 break;
1107 default:
1108 $reg = array();
1109 if (preg_match('/^([[:alnum:]._-]+)/i',$parseString, $reg)) {
1110 $parseString = ltrim(substr($parseString,strlen($reg[0])));
1111 $value = array($reg[1]);
1112 }
1113 break;
1114 }
1115 }
1116 return $value;
1117 }
1118
1119 /**
1120 * Get value in quotes from $parseString.
1121 * NOTICE: If a query being parsed was prepared for another database than MySQL this function should probably be changed
1122 *
1123 * @param string String from which to find value in quotes. Notice that $parseString is passed by reference and is shortend by the output of this function.
1124 * @param string The quote used; input either " or '
1125 * @return string The value, passed through stripslashes() !
1126 */
1127 function getValueInQuotes(&$parseString,$quote) {
1128
1129 $parts = explode($quote,substr($parseString,1));
1130 $buffer = '';
1131 foreach($parts as $k => $v) {
1132 $buffer.=$v;
1133
1134 $reg = array();
1135 //preg_match('/[\]*$/',$v,$reg); // does not work. what is the *exact* meaning of the next line?
1136 ereg('[\]*$',$v,$reg);
1137 if ($reg AND strlen($reg[0])%2) {
1138 $buffer.=$quote;
1139 } else {
1140 $parseString = ltrim(substr($parseString,strlen($buffer)+2));
1141 return $this->parseStripslashes($buffer);
1142 }
1143 }
1144 }
1145
1146 /**
1147 * Strip slashes function used for parsing
1148 * NOTICE: If a query being parsed was prepared for another database than MySQL this function should probably be changed
1149 *
1150 * @param string Input string
1151 * @return string Output string
1152 */
1153 function parseStripslashes($str) {
1154 $search = array('\\\\', '\\\'', '\\"', '\0', '\n', '\r', '\Z');
1155 $replace = array('\\', '\'', '"', "\x00", "\x0a", "\x0d", "\x1a");
1156
1157 return str_replace($search, $replace, $str);
1158 }
1159
1160 /**
1161 * Add slashes function used for compiling queries
1162 * NOTICE: If a query being parsed was prepared for another database than MySQL this function should probably be changed
1163 *
1164 * @param string Input string
1165 * @return string Output string
1166 */
1167 function compileAddslashes($str) {
1168 return $str;
1169 $search = array('\\', '\'', '"', "\x00", "\x0a", "\x0d", "\x1a");
1170 $replace = array('\\\\', '\\\'', '\\"', '\0', '\n', '\r', '\Z');
1171
1172 return str_replace($search, $replace, $str);
1173 }
1174
1175 /**
1176 * Setting the internal error message value, $this->parse_error and returns that value.
1177 *
1178 * @param string Input error message
1179 * @param string Remaining query to parse.
1180 * @return string Error message.
1181 */
1182 function parseError($msg,$restQuery) {
1183 $this->parse_error = 'SQL engine parse ERROR: '.$msg.': near "'.substr($restQuery,0,50).'"';
1184 return $this->parse_error;
1185 }
1186
1187 /**
1188 * Trimming SQL as preparation for parsing.
1189 * ";" in the end is stripped of.
1190 * White space is trimmed away around the value
1191 * A single space-char is added in the end
1192 *
1193 * @param string Input string
1194 * @return string Output string
1195 */
1196 function trimSQL($str) {
1197 return trim(rtrim($str, "; \r\n\t")).' ';
1198 //return trim(ereg_replace('[[:space:];]*$','',$str)).' ';
1199 }
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212 /*************************
1213 *
1214 * Compiling queries
1215 *
1216 *************************/
1217
1218 /**
1219 * Compiles an SQL query from components
1220 *
1221 * @param array Array of SQL query components
1222 * @return string SQL query
1223 * @see parseSQL()
1224 */
1225 function compileSQL($components) {
1226 switch($components['type']) {
1227 case 'SELECT':
1228 $query = $this->compileSELECT($components);
1229 break;
1230 case 'UPDATE':
1231 $query = $this->compileUPDATE($components);
1232 break;
1233 case 'INSERT':
1234 $query = $this->compileINSERT($components);
1235 break;
1236 case 'DELETE':
1237 $query = $this->compileDELETE($components);
1238 break;
1239 case 'EXPLAIN':
1240 $query = 'EXPLAIN '.$this->compileSELECT($components);
1241 break;
1242 case 'DROPTABLE':
1243 $query = 'DROP TABLE'.($components['ifExists']?' IF EXISTS':'').' '.$components['TABLE'];
1244 break;
1245 case 'CREATETABLE':
1246 $query = $this->compileCREATETABLE($components);
1247 break;
1248 case 'ALTERTABLE':
1249 $query = $this->compileALTERTABLE($components);
1250 break;
1251 }
1252
1253 return $query;
1254 }
1255
1256 /**
1257 * Compiles a SELECT statement from components array
1258 *
1259 * @param array Array of SQL query components
1260 * @return string SQL SELECT query
1261 * @see parseSELECT()
1262 */
1263 function compileSELECT($components) {
1264
1265 // Initialize:
1266 $where = $this->compileWhereClause($components['WHERE']);
1267 $groupBy = $this->compileFieldList($components['GROUPBY']);
1268 $orderBy = $this->compileFieldList($components['ORDERBY']);
1269 $limit = $components['LIMIT'];
1270
1271 // Make query:
1272 $query = 'SELECT '.($components['STRAIGHT_JOIN'] ? $components['STRAIGHT_JOIN'].'' : '').'
1273 '.$this->compileFieldList($components['SELECT']).'
1274 FROM '.$this->compileFromTables($components['FROM']).
1275 (strlen($where)?'
1276 WHERE '.$where : '').
1277 (strlen($groupBy)?'
1278 GROUP BY '.$groupBy : '').
1279 (strlen($orderBy)?'
1280 ORDER BY '.$orderBy : '').
1281 (strlen($limit)?'
1282 LIMIT '.$limit : '');
1283
1284 return $query;
1285 }
1286
1287 /**
1288 * Compiles an UPDATE statement from components array
1289 *
1290 * @param array Array of SQL query components
1291 * @return string SQL UPDATE query
1292 * @see parseUPDATE()
1293 */
1294 function compileUPDATE($components) {
1295
1296 // Where clause:
1297 $where = $this->compileWhereClause($components['WHERE']);
1298
1299 // Fields
1300 $fields = array();
1301 foreach($components['FIELDS'] as $fN => $fV) {
1302 $fields[]=$fN.'='.$fV[1].$this->compileAddslashes($fV[0]).$fV[1];
1303 }
1304
1305 // Make query:
1306 $query = 'UPDATE '.$components['TABLE'].' SET
1307 '.implode(',
1308 ',$fields).'
1309 '.(strlen($where)?'
1310 WHERE '.$where : '');
1311
1312 return $query;
1313 }
1314
1315 /**
1316 * Compiles an INSERT statement from components array
1317 *
1318 * @param array Array of SQL query components
1319 * @return string SQL INSERT query
1320 * @see parseINSERT()
1321 */
1322 function compileINSERT($components) {
1323
1324 if ($components['VALUES_ONLY']) {
1325 // Initialize:
1326 $fields = array();
1327 foreach($components['VALUES_ONLY'] as $fV) {
1328 $fields[]=$fV[1].$this->compileAddslashes($fV[0]).$fV[1];
1329 }
1330
1331 // Make query:
1332 $query = 'INSERT INTO '.$components['TABLE'].'
1333 VALUES
1334 ('.implode(',
1335 ',$fields).')';
1336 } else {
1337 // Initialize:
1338 $fields = array();
1339 foreach($components['FIELDS'] as $fN => $fV) {
1340 $fields[$fN]=$fV[1].$this->compileAddslashes($fV[0]).$fV[1];
1341 }
1342
1343 // Make query:
1344 $query = 'INSERT INTO '.$components['TABLE'].'
1345 ('.implode(',
1346 ',array_keys($fields)).')
1347 VALUES
1348 ('.implode(',
1349 ',$fields).')';
1350 }
1351
1352 return $query;
1353 }
1354
1355 /**
1356 * Compiles an DELETE statement from components array
1357 *
1358 * @param array Array of SQL query components
1359 * @return string SQL DELETE query
1360 * @see parseDELETE()
1361 */
1362 function compileDELETE($components) {
1363
1364 // Where clause:
1365 $where = $this->compileWhereClause($components['WHERE']);
1366
1367 // Make query:
1368 $query = 'DELETE FROM '.$components['TABLE'].
1369 (strlen($where)?'
1370 WHERE '.$where : '');
1371
1372 return $query;
1373 }
1374
1375 /**
1376 * Compiles a CREATE TABLE statement from components array
1377 *
1378 * @param array Array of SQL query components
1379 * @return string SQL CREATE TABLE query
1380 * @see parseCREATETABLE()
1381 */
1382 function compileCREATETABLE($components) {
1383
1384 // Create fields and keys:
1385 $fieldsKeys = array();
1386 foreach($components['FIELDS'] as $fN => $fCfg) {
1387 $fieldsKeys[]=$fN.' '.$this->compileFieldCfg($fCfg['definition']);
1388 }
1389 foreach($components['KEYS'] as $kN => $kCfg) {
1390 if ($kN == 'PRIMARYKEY') {
1391 $fieldsKeys[]='PRIMARY KEY ('.implode(',', $kCfg).')';
1392 } elseif ($kN == 'UNIQUE') {
1393 $fieldsKeys[]='UNIQUE '.$kN.' ('.implode(',', $kCfg).')';
1394 } else {
1395 $fieldsKeys[]='KEY '.$kN.' ('.implode(',', $kCfg).')';
1396 }
1397 }
1398
1399 // Make query:
1400 $query = 'CREATE TABLE '.$components['TABLE'].' (
1401 '.implode(',
1402 ', $fieldsKeys).'
1403 )'.($components['tableType'] ? ' TYPE='.$components['tableType'] : '');
1404
1405 return $query;
1406 }
1407
1408 /**
1409 * Compiles an ALTER TABLE statement from components array
1410 *
1411 * @param array Array of SQL query components
1412 * @return string SQL ALTER TABLE query
1413 * @see parseALTERTABLE()
1414 */
1415 function compileALTERTABLE($components) {
1416
1417 // Make query:
1418 $query = 'ALTER TABLE '.$components['TABLE'].' '.$components['action'].' '.($components['FIELD']?$components['FIELD']:$components['KEY']);
1419
1420 // Based on action, add the final part:
1421 switch(strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$components['action']))) {
1422 case 'ADD':
1423 $query.=' '.$this->compileFieldCfg($components['definition']);
1424 break;
1425 case 'CHANGE':
1426 $query.=' '.$components['newField'].' '.$this->compileFieldCfg($components['definition']);
1427 break;
1428 case 'DROP':
1429 case 'DROPKEY':
1430 break;
1431 case 'ADDKEY':
1432 case 'ADDPRIMARYKEY':
1433 $query.=' ('.implode(',',$components['fields']).')';
1434 break;
1435 }
1436
1437 // Return query
1438 return $query;
1439 }
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454 /**************************************
1455 *
1456 * Compiling queries, helper functions for parts of queries
1457 *
1458 **************************************/
1459
1460 /**
1461 * Compiles a "SELECT [output] FROM..:" field list based on input array (made with ->parseFieldList())
1462 * Can also compile field lists for ORDER BY and GROUP BY.
1463 *
1464 * @param array Array of select fields, (made with ->parseFieldList())
1465 * @return string Select field string
1466 * @see parseFieldList()
1467 */
1468 function compileFieldList($selectFields) {
1469
1470 // Prepare buffer variable:
1471 $outputParts = array();
1472
1473 // Traverse the selectFields if any:
1474 if (is_array($selectFields)) {
1475 foreach($selectFields as $k => $v) {
1476
1477 // Detecting type:
1478 switch($v['type']) {
1479 case 'function':
1480 $outputParts[$k] = $v['function'].'('.$v['func_content'].')';
1481 break;
1482 case 'field':
1483 $outputParts[$k] = ($v['distinct']?$v['distinct']:'').($v['table']?$v['table'].'.':'').$v['field'];
1484 break;
1485 }
1486
1487 // Alias:
1488 if ($v['as']) {
1489 $outputParts[$k].= ' '.$v['as_keyword'].' '.$v['as'];
1490 }
1491
1492 // Specifically for ORDER BY and GROUP BY field lists:
1493 if ($v['sortDir']) {
1494 $outputParts[$k].= ' '.$v['sortDir'];
1495 }
1496 }
1497 }
1498
1499 // Return imploded buffer:
1500 return implode(', ',$outputParts);
1501 }
1502
1503 /**
1504 * Compiles a "FROM [output] WHERE..:" table list based on input array (made with ->parseFromTables())
1505 *
1506 * @param array Array of table names, (made with ->parseFromTables())
1507 * @return string Table name string
1508 * @see parseFromTables()
1509 */
1510 function compileFromTables($tablesArray) {
1511
1512 // Prepare buffer variable:
1513 $outputParts = array();
1514
1515 // Traverse the table names:
1516 if (is_array($tablesArray)) {
1517 foreach($tablesArray as $k => $v) {
1518
1519 // Set table name:
1520 $outputParts[$k] = $v['table'];
1521
1522 // Add alias AS if there:
1523 if ($v['as']) {
1524 $outputParts[$k].= ' '.$v['as_keyword'].' '.$v['as'];
1525 }
1526
1527 if (is_array($v['JOIN'])) {
1528 $outputParts[$k] .= ' '.$v['JOIN']['type'].' '.$v['JOIN']['withTable'].' ON ';
1529 $outputParts[$k] .= ($v['JOIN']['ON'][0]['table']) ? $v['JOIN']['ON'][0]['table'].'.' : '';
1530 $outputParts[$k] .= $v['JOIN']['ON'][0]['field'];
1531 $outputParts[$k] .= '=';
1532 $outputParts[$k] .= ($v['JOIN']['ON'][1]['table']) ? $v['JOIN']['ON'][1]['table'].'.' : '';
1533 $outputParts[$k] .= $v['JOIN']['ON'][1]['field'];
1534 }
1535 }
1536 }
1537
1538 // Return imploded buffer:
1539 return implode(', ',$outputParts);
1540 }
1541
1542 /**
1543 * Implodes an array of WHERE clause configuration into a WHERE clause.
1544 * NOTICE: MIGHT BY A TEMPORARY FUNCTION. Use for debugging only!
1545 * BUT IT IS NEEDED FOR DBAL - MAKE IT PERMANENT?!?!
1546 *
1547 * @param array WHERE clause configuration
1548 * @return string WHERE clause as string.
1549 * @see explodeWhereClause()
1550 */
1551 function compileWhereClause($clauseArray) {
1552
1553 // Prepare buffer variable:
1554 $output='';
1555
1556 // Traverse clause array:
1557 if (is_array($clauseArray)) {
1558 foreach($clauseArray as $k => $v) {
1559
1560 // Set operator:
1561 $output.=$v['operator'] ? ' '.$v['operator'] : '';
1562
1563 // Look for sublevel:
1564 if (is_array($v['sub'])) {
1565 $output.=' ('.trim($this->compileWhereClause($v['sub'])).')';
1566 } else {
1567
1568 // Set field/table with modifying prefix if any:
1569 $output.=' '.trim($v['modifier'].' '.($v['table']?$v['table'].'.':'').$v['field']);
1570
1571 // Set calculation, if any:
1572 if ($v['calc']) {
1573 $output.=$v['calc'].$v['calc_value'][1].$this->compileAddslashes($v['calc_value'][0]).$v['calc_value'][1];
1574 }
1575
1576 // Set comparator:
1577 if ($v['comparator']) {
1578 $output.=' '.$v['comparator'];
1579
1580 // Detecting value type; list or plain:
1581 if (t3lib_div::inList('NOTIN,IN',strtoupper(str_replace(array(' ',"\t","\r","\n"),'',$v['comparator'])))) {
1582 $valueBuffer = array();
1583 foreach($v['value'] as $realValue) {
1584 $valueBuffer[]=$realValue[1].$this->compileAddslashes($realValue[0]).$realValue[1];
1585 }
1586 $output.=' ('.trim(implode(',',$valueBuffer)).')';
1587 } else {
1588 $output.=' '.$v['value'][1].$this->compileAddslashes($v['value'][0]).$v['value'][1];
1589 }
1590 }
1591 }
1592 }
1593 }
1594
1595 // Return output buffer:
1596 return $output;
1597 }
1598
1599 /**
1600 * Compile field definition
1601 *
1602 * @param array Field definition parts
1603 * @return string Field definition string
1604 */
1605 function compileFieldCfg($fieldCfg) {
1606
1607 // Set type:
1608 $cfg = $fieldCfg['fieldType'];
1609
1610 // Add value, if any:
1611 if (strlen($fieldCfg['value'])) {
1612 $cfg.='('.$fieldCfg['value'].')';
1613 }
1614
1615 // Add additional features:
1616 if (is_array($fieldCfg['featureIndex'])) {
1617 foreach($fieldCfg['featureIndex'] as $featureDef) {
1618 $cfg.=' '.$featureDef['keyword'];
1619
1620 // Add value if found:
1621 if (is_array($featureDef['value'])) {
1622 $cfg.=' '.$featureDef['value'][1].$this->compileAddslashes($featureDef['value'][0]).$featureDef['value'][1];
1623 }
1624 }
1625 }
1626
1627 // Return field definition string:
1628 return $cfg;
1629 }
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641 /*************************
1642 *
1643 * Debugging
1644 *
1645 *************************/
1646
1647 /**
1648 * Check parsability of input SQL part string; Will parse and re-compile after which it is compared
1649 *
1650 * @param string Part definition of string; "SELECT" = fieldlist (also ORDER BY and GROUP BY), "FROM" = table list, "WHERE" = Where clause.
1651 * @param string SQL string to verify parsability of
1652 * @return mixed Returns array with string 1 and 2 if error, otherwise false
1653 */
1654 function debug_parseSQLpart($part,$str) {
1655 $retVal = false;
1656
1657 switch($part) {
1658 case 'SELECT':
1659 $retVal = $this->debug_parseSQLpartCompare($str,$this->compileFieldList($this->parseFieldList($str)));
1660 break;
1661 case 'FROM':
1662 $retVal = $this->debug_parseSQLpartCompare($str,$this->compileFromTables($this->parseFromTables($str)));
1663 break;
1664 case 'WHERE':
1665 $retVal = $this->debug_parseSQLpartCompare($str,$this->compileWhereClause($this->parseWhereClause($str)));
1666 break;
1667 }
1668 return $retVal;
1669 }
1670
1671 /**
1672 * Compare two query strins by stripping away whitespace.
1673 *
1674 * @param string SQL String 1
1675 * @param string SQL string 2
1676 * @param boolean If true, the strings are compared insensitive to case
1677 * @return mixed Returns array with string 1 and 2 if error, otherwise false
1678 */
1679 function debug_parseSQLpartCompare($str,$newStr,$caseInsensitive=FALSE) {
1680 if ($caseInsensitive) {
1681 $str1 = strtoupper($str);
1682 $str2 = strtoupper($newStr);
1683 } else {
1684 $str1 = $str;
1685 $str2 = $newStr;
1686 }
1687
1688 // Fixing escaped chars:
1689 $search = array('\0', '\n', '\r', '\Z');
1690 $replace = array("\x00", "\x0a", "\x0d", "\x1a");
1691 $str1 = str_replace($search, $replace, $str1);
1692 $str2 = str_replace($search, $replace, $str2);
1693
1694 # Normally, commented out since they are needed only in tricky cases...
1695 # $str1 = stripslashes($str1);
1696 # $str2 = stripslashes($str2);
1697
1698 if (strcmp(str_replace(array(' ',"\t","\r","\n"),'',$this->trimSQL($str1)),str_replace(array(' ',"\t","\r","\n"),'',$this->trimSQL($str2)))) {
1699 return array(
1700 str_replace(array(' ',"\t","\r","\n"),' ',$str),
1701 str_replace(array(' ',"\t","\r","\n"),' ',$newStr),
1702 );
1703 }
1704 }
1705
1706 /**
1707 * Performs the ultimate test of the parser: Direct a SQL query in; You will get it back (through the parsed and re-compiled) if no problems, otherwise the script will print the error and exit
1708 *
1709 * @param string SQL query
1710 * @return string Query if all is well, otherwise exit.
1711 */
1712 function debug_testSQL($SQLquery) {
1713
1714 // Getting result array:
1715 $parseResult = $this->parseSQL($SQLquery);
1716
1717 // If result array was returned, proceed. Otherwise show error and exit.
1718 if (is_array($parseResult)) {
1719
1720 // Re-compile query:
1721 $newQuery = $this->compileSQL($parseResult);
1722
1723 // TEST the new query:
1724 $testResult = $this->debug_parseSQLpartCompare($SQLquery, $newQuery);
1725
1726 // Return new query if OK, otherwise show error and exit:
1727 if (!is_array($testResult)) {
1728 return $newQuery;
1729 } else {
1730 debug(array('ERROR MESSAGE'=>'Input query did not match the parsed and recompiled query exactly (not observing whitespace)', 'TEST result' => $testResult),'SQL parsing failed:');
1731 exit;
1732 }
1733 } else {
1734 debug(array('query' => $SQLquery, 'ERROR MESSAGE'=>$parseResult),'SQL parsing failed:');
1735 exit;
1736 }
1737 }
1738 }
1739
1740
1741 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_sqlparser.php']) {
1742 include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['t3lib/class.t3lib_sqlparser.php']);
1743 }
1744 ?>