2 /***************************************************************
5 * (c) 1999-2006 Kasper Skaarhoj (kasperYYYY@typo3.com)
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.
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.
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.
25 * This copyright notice MUST APPEAR in all copies of the script!
26 ***************************************************************/
28 * Contains a class for evaluation of database integrity according to $TCA
29 * Most of these functions are considered obsolete!
32 * Revised for TYPO3 3.6 July/2003 by Kasper Skaarhoj
35 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
38 * [CLASS/FUNCTION INDEX of SCRIPT]
42 * 93: class t3lib_admin
43 * 128: function genTree($theID, $depthData, $versions=FALSE)
44 * 217: function genTree_records($theID, $depthData, $table='', $versions=FALSE)
45 * 292: function genTreeStatus()
46 * 315: function lostRecords($pid_list)
47 * 346: function fixLostRecord($table,$uid)
48 * 367: function countRecords($pid_list)
49 * 395: function getGroupFields($mode)
50 * 429: function getFileFields($uploadfolder)
51 * 452: function getDBFields($theSearchTable)
52 * 480: function selectNonEmptyRecordsWithFkeys($fkey_arrays)
53 * 569: function testFileRefs ()
54 * 620: function testDBRefs($theArray)
55 * 658: function whereIsRecordReferenced($searchTable,$id)
56 * 695: function whereIsFileReferenced($uploadfolder,$filename)
59 * (This index is automatically created/updated by the extension "extdeveval")
83 * This class holds functions used by the TYPO3 backend to check the integrity of the database (The DBint module, 'lowlevel' extension)
85 * Depends on: Depends on loaddbgroup from t3lib/
87 * @todo Need to really extend this class when the tcemain library has been updated and the whole API is better defined. There are some known bugs in this library. Further it would be nice with a facility to not only analyze but also clean up!
88 * @see SC_mod_tools_dbint_index::func_relations(), SC_mod_tools_dbint_index::func_records()
89 * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
94 var $genTree_includeDeleted = TRUE; // if set, genTree() includes deleted pages. This is default.
95 var $genTree_includeVersions = TRUE; // if set, genTree() includes verisonized pages/records. This is default.
96 var $genTree_includeRecords = FALSE; // if set, genTree() includes records from pages.
97 var $perms_clause = ''; // extra where-clauses for the tree-selection
98 var $genTree_makeHTML = 0; // if set, genTree() generates HTML, that visualizes the tree.
101 var $page_idArray = Array(); // Will hod id/rec pais from genTree()
102 var $rec_idArray = Array();
103 var $getTree_HTML = ''; // Will hold the HTML-code visualising the tree. genTree()
107 var $checkFileRefs = Array();
108 var $checkSelectDBRefs = Array(); // From the select-fields
109 var $checkGroupDBRefs = Array(); // From the group-fields
111 var $recStats = Array(
112 'allValid' => array(),
113 'published_versions' => array(),
114 'deleted' => array(),
116 var $lRecords = Array();
117 var $lostPagesList = '';
121 * Generates a list of Page-uid's that corresponds to the tables in the tree. This list should ideally include all records in the pages-table.
123 * @param integer a pid (page-record id) from which to start making the tree
124 * @param string HTML-code (image-tags) used when this function calls itself recursively.
125 * @param boolean Internal variable, don't set from outside!
128 function genTree($theID, $depthData, $versions=FALSE) {
131 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
132 'uid,title,doktype,deleted,t3ver_wsid,t3ver_id,t3ver_count,t3ver_swapmode'.(t3lib_extMgm
::isLoaded('cms')?
',hidden':''),
134 'pid=-1 AND t3ver_oid='.intval($theID).' '.((!$this->genTree_includeDeleted
)?
'AND deleted=0':'').$this->perms_clause
,
139 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
140 'uid,title,doktype,deleted'.(t3lib_extMgm
::isLoaded('cms')?
',hidden':''),
142 'pid='.intval($theID).' '.((!$this->genTree_includeDeleted
)?
'AND deleted=0':'').$this->perms_clause
,
148 // Traverse the records selected:
150 $c = $GLOBALS['TYPO3_DB']->sql_num_rows($res);
151 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
153 // Prepare the additional label used in the HTML output in case of versions:
155 $versionLabel = '[v1.'.$row['t3ver_id'].'; WS#'.$row['t3ver_wsid'].']';
156 } else $versionLabel='';
159 $newID = $row['uid'];
161 // Build HTML output:
162 if ($this->genTree_makeHTML
) {
163 $this->genTree_HTML
.=chr(10).'<div><span class="nobr">';
165 $LN = ($a==$c)?
'blank':'line';
166 $BTM = ($a==$c)?
'bottom':'';
167 $this->genTree_HTML
.= $depthData.
168 '<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/ol/'.$PM.$BTM.'.gif','width="18" height="16"').' align="top" alt="" />'.
170 t3lib_iconWorks
::getIconImage('pages',$row,$this->backPath
,'align="top"').
171 htmlspecialchars($row['uid'].': '.t3lib_div
::fixed_lgd_cs(strip_tags($row['title']),50)).'</span></div>';
174 // Register various data for this item:
175 $this->page_idArray
[$newID]=$row;
177 $this->recStats
['all_valid']['pages'][$newID] = $newID;
178 # if ($versions) $this->recStats['versions']['pages'][$newID] = $newID;
179 if ($row['deleted']) $this->recStats
['deleted']['pages'][$newID] = $newID;
180 if ($versions && $row['t3ver_count']>=1) {
181 $this->recStats
['published_versions']['pages'][$newID] = $newID;
184 if ($row['deleted']) {$this->recStat
['deleted']++
;}
185 if ($row['hidden']) {$this->recStat
['hidden']++
;}
186 $this->recStat
['doktype'][$row['doktype']]++
;
188 // Create the HTML code prefix for recursive call:
189 $genHTML = $depthData.'<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/ol/'.$LN.'.gif','width="18" height="16"').' align="top" alt="" />'.$versionLabel;
191 // If all records should be shown, do so:
192 if ($this->genTree_includeRecords
) {
193 foreach($GLOBALS['TCA'] as $tableName => $cfg) {
194 if ($tableName!='pages') {
195 $this->genTree_records($newID, $this->genTree_HTML ?
$genHTML : '', $tableName);
201 $this->genTree($newID, $this->genTree_HTML ?
$genHTML : '');
203 // If versions are included in the tree, add those now:
204 if ($this->genTree_includeVersions
) {
205 $this->genTree($newID, $this->genTree_HTML ?
$genHTML : '', TRUE);
211 * @param [type] $theID: ...
212 * @param [type] $depthData: ...
213 * @param [type] $table: ...
214 * @param [type] $versions: ...
217 function genTree_records($theID, $depthData, $table='', $versions=FALSE) {
221 // Select all records from table pointing to this page:
222 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
223 t3lib_BEfunc
::getCommonSelectFields($table),
225 'pid=-1 AND t3ver_oid='.intval($theID).
226 (!$this->genTree_includeDeleted?t3lib_BEfunc
::deleteClause($table):'')
229 // Select all records from table pointing to this page:
230 $res = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
231 t3lib_BEfunc
::getCommonSelectFields($table),
233 'pid='.intval($theID).
234 (!$this->genTree_includeDeleted?t3lib_BEfunc
::deleteClause($table):'')
238 // Traverse selected:
240 $c = $GLOBALS['TYPO3_DB']->sql_num_rows($res);
241 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($res)) {
243 // Prepare the additional label used in the HTML output in case of versions:
245 $versionLabel = '[v1.'.$row['t3ver_id'].'; WS#'.$row['t3ver_wsid'].']';
246 } else $versionLabel='';
249 $newID = $row['uid'];
251 // Build HTML output:
252 if ($this->genTree_makeHTML
) {
253 $this->genTree_HTML
.=chr(10).'<div><span class="nobr">';
255 $LN = ($a==$c)?
'blank':'line';
256 $BTM = ($a==$c)?
'bottom':'';
257 $this->genTree_HTML
.= $depthData.
258 '<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/ol/'.$PM.$BTM.'.gif','width="18" height="16"').' align="top" alt="" />'.
260 t3lib_iconWorks
::getIconImage($table,$row,$this->backPath
,'align="top" title="'.$table.'"').htmlspecialchars($row['uid'].': '.t3lib_BEfunc
::getRecordTitle($table,$row)).'</span></div>';
263 // Register various data for this item:
264 $this->rec_idArray
[$table][$newID]=$row;
266 $this->recStats
['all_valid'][$table][$newID] = $newID;
267 # $this->recStats[$versions?'versions':'live'][$table][$newID] = $newID;
268 if ($row['deleted']) $this->recStats
['deleted'][$table][$newID] = $newID;
269 if ($versions && $row['t3ver_count']>=1 && $row['t3ver_wsid']==0) {
270 $this->recStats
['published_versions'][$table][$newID] = $newID;
273 # if ($row['deleted']) {$this->recStat['deleted']++;}
274 # if ($row['hidden']) {$this->recStat['hidden']++;}
278 // Select all versions of this record:
279 if ($this->genTree_includeVersions
&& $TCA[$table]['ctrl']['versioningWS']) {
280 $genHTML = $depthData.'<img'.t3lib_iconWorks
::skinImg($this->backPath
,'gfx/ol/'.$LN.'.gif','width="18" height="16"').' align="top" alt="" />';
282 $this->genTree_records($newID, $genHTML, $table, TRUE);
288 * [Describe function...]
292 function genTreeStatus($root=0) {
293 $this->genTree_includeDeleted
= TRUE; // if set, genTree() includes deleted pages. This is default.
294 $this->genTree_includeVersions
= TRUE; // if set, genTree() includes verisonized pages/records. This is default.
295 $this->genTree_includeRecords
= TRUE; // if set, genTree() includes records from pages.
296 $this->perms_clause
= ''; // extra where-clauses for the tree-selection
297 $this->genTree_makeHTML
= 0; // if set, genTree() generates HTML, that visualizes the tree.
299 $this->genTree($root,'');
301 return $this->recStats
;
310 * Fills $this->lRecords with the records from all tc-tables that are not attached to a PID in the pid-list.
312 * @param string list of pid's (page-record uid's). This list is probably made by genTree()
315 function lostRecords($pid_list) {
318 $this->lostPagesList
='';
320 while (list($table)=each($TCA)) {
321 t3lib_div
::loadTCA($table);
323 $pid_list_tmp = $pid_list;
324 if (!isset($TCA[$table]['ctrl']['versioningWS']) ||
!$TCA[$table]['ctrl']['versioningWS']) {
325 // Remove preceding "-1," for non-versioned tables
326 $pid_list_tmp = preg_replace('/^\-1,/','',$pid_list_tmp);
329 $garbage = $GLOBALS['TYPO3_DB']->exec_SELECTquery (
330 'uid,pid,'.$TCA[$table]['ctrl']['label'],
332 'pid NOT IN ('.$pid_list_tmp.')'
334 $lostIdList = array();
335 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($garbage)) {
336 $this->lRecords
[$table][$row['uid']]=Array('uid'=>$row['uid'], 'pid'=>$row['pid'], 'title'=> strip_tags($row[$TCA[$table]['ctrl']['label']]) );
337 $lostIdList[]=$row['uid'];
339 if ($table=='pages') {
340 $this->lostPagesList
=implode(',',$lostIdList);
347 * Fixes lost record from $table with uid $uid by setting the PID to zero. If there is a disabled column for the record that will be set as well.
349 * @param string Database tablename
350 * @param integer The uid of the record which will have the PID value set to 0 (zero)
351 * @return boolean True if done.
353 function fixLostRecord($table,$uid) {
354 if ($table && $GLOBALS['TCA'][$table] && $uid && is_array($this->lRecords
[$table][$uid]) && $GLOBALS['BE_USER']->user
['admin']) {
356 $updateFields = array();
357 $updateFields['pid'] = 0;
358 if ($GLOBALS['TCA'][$table]['ctrl']['enablecolumns']['disabled']) { // If possible a lost record restored is hidden as default
359 $updateFields[$GLOBALS['TCA'][$table]['ctrl']['enablecolumns']['disabled']] = 1;
362 $GLOBALS['TYPO3_DB']->exec_UPDATEquery($table, 'uid='.intval($uid), $updateFields);
369 * Counts records from $TCA-tables that ARE attached to an existing page.
371 * @param string list of pid's (page-record uid's). This list is probably made by genTree()
372 * @return array an array with the number of records from all $TCA-tables that are attached to a PID in the pid-list.
374 function countRecords($pid_list) {
380 while (list($table)=each($TCA)) {
381 t3lib_div
::loadTCA($table);
383 $pid_list_tmp = $pid_list;
384 if (!isset($TCA[$table]['ctrl']['versioningWS']) ||
!$TCA[$table]['ctrl']['versioningWS']) {
385 // Remove preceding "-1," for non-versioned tables
386 $pid_list_tmp = preg_replace('/^\-1,/','',$pid_list_tmp);
389 $count = $GLOBALS['TYPO3_DB']->exec_SELECTquery('count(*)', $table, 'pid IN ('.$pid_list_tmp.')');
390 if ($row = $GLOBALS['TYPO3_DB']->sql_fetch_row($count)) {
391 $list[$table]=$row[0];
394 $count = $GLOBALS['TYPO3_DB']->exec_SELECTquery('count(*)', $table, 'pid IN ('.$pid_list_tmp.')'.t3lib_BEfunc
::deleteClause($table));
395 if ($row = $GLOBALS['TYPO3_DB']->sql_fetch_row($count)) {
396 $list_n[$table]=$row[0];
400 return array('all' => $list, 'non_deleted' => $list_n);
404 * Finding relations in database based on type 'group' (files or database-uid's in a list)
406 * @param string $mode = file, $mode = db, $mode = '' (all...)
407 * @return array An array with all fields listed that somehow are references to other records (foreign-keys) or files
409 function getGroupFields($mode) {
413 while (list($table)=each($TCA)) {
414 t3lib_div
::loadTCA($table);
415 $cols = $TCA[$table]['columns'];
417 while (list($field,$config)=each($cols)) {
418 if ($config['config']['type']=='group') {
420 ((!$mode||
$mode=='file') && $config['config']['internal_type']=='file') ||
421 ((!$mode||
$mode=='db') && $config['config']['internal_type']=='db')
423 $result[$table][]=$field;
426 if ( (!$mode||
$mode=='db') && $config['config']['type']=='select' && $config['config']['foreign_table']) {
427 $result[$table][]=$field;
430 if ($result[$table]) {
431 $result[$table] = implode(',',$result[$table]);
438 * Finds all fields that hold filenames from uploadfolder
440 * @param string Path to uploadfolder
441 * @return array An array with all fields listed that have references to files in the $uploadfolder
443 function getFileFields($uploadfolder) {
447 while (list($table)=each($TCA)) {
448 t3lib_div
::loadTCA($table);
449 $cols = $TCA[$table]['columns'];
451 while (list($field,$config)=each($cols)) {
452 if ($config['config']['type']=='group' && $config['config']['internal_type']=='file' && $config['config']['uploadfolder']==$uploadfolder) {
453 $result[]=Array($table,$field);
461 * Returns an array with arrays of table/field pairs which are allowed to hold references to the input table name - according to $TCA
463 * @param string Table name
466 function getDBFields($theSearchTable) {
470 while (list($table)=each($TCA)) {
471 t3lib_div
::loadTCA($table);
472 $cols = $TCA[$table]['columns'];
474 while (list($field,$config)=each($cols)) {
475 if ($config['config']['type']=='group' && $config['config']['internal_type']=='db') {
476 if (trim($config['config']['allowed'])=='*' ||
strstr($config['config']['allowed'],$theSearchTable)) {
477 $result[]=Array($table,$field);
479 } else if ($config['config']['type']=='select' && $config['config']['foreign_table']==$theSearchTable) {
480 $result[]=Array($table,$field);
488 * This selects non-empty-records from the tables/fields in the fkey_array generated by getGroupFields()
490 * @param array Array with tables/fields generated by getGroupFields()
492 * @see getGroupFields()
494 function selectNonEmptyRecordsWithFkeys($fkey_arrays) {
496 if (is_array($fkey_arrays)) {
498 while (list($table,$field_list)=each($fkey_arrays)) {
499 if ($TCA[$table] && trim($field_list)) {
500 t3lib_div
::loadTCA($table);
501 $fieldArr = explode(',',$field_list);
503 if(t3lib_extMgm
::isLoaded('dbal')) {
504 $fields = $GLOBALS['TYPO3_DB']->admin_get_fields($table);
506 list(,$field)=each($fieldArr);
507 $cl_fl = ($GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'I' ||
$GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'N' ||
$GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'R') ?
508 $field.'!=0' : $field.'!=\'\'';
509 while (list(,$field)=each($fieldArr)) {
510 $cl_fl .= ($GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'I' ||
$GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'N' ||
$GLOBALS['TYPO3_DB']->MetaType($fields[$field]['type'],$table) == 'R') ?
511 ' OR '.$field.'!=0' : ' OR '.$field.'!=\'\'';
516 $cl_fl = implode ('!="" OR ',$fieldArr). '!=""';
519 $mres = $GLOBALS['TYPO3_DB']->exec_SELECTquery('uid,'.$field_list, $table, $cl_fl);
520 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($mres)) {
522 while (list(,$field)=each($fieldArr)) {
523 if (trim($row[$field])) {
524 $fieldConf = $TCA[$table]['columns'][$field]['config'];
525 if ($fieldConf['type']=='group') {
526 if ($fieldConf['internal_type']=='file') {
528 if ($fieldConf['MM']) {
530 $dbAnalysis = t3lib_div
::makeInstance('t3lib_loadDBGroup');
531 $dbAnalysis->start('','files',$fieldConf['MM'],$row['uid']);
532 reset($dbAnalysis->itemArray
);
533 while (list($somekey,$someval)=each($dbAnalysis->itemArray
)) {
534 if ($someval['id']) {
535 $tempArr[]=$someval['id'];
539 $tempArr = explode(',',trim($row[$field]));
542 while (list(,$file)=each($tempArr)) {
545 $this->checkFileRefs
[$fieldConf['uploadfolder']][$file]+
=1;
549 if ($fieldConf['internal_type']=='db') {
551 $dbAnalysis = t3lib_div
::makeInstance('t3lib_loadDBGroup');
552 $dbAnalysis->start($row[$field],$fieldConf['allowed'],$fieldConf['MM'],$row['uid'], $table, $fieldConf);
553 reset($dbAnalysis->itemArray
);
554 while (list(,$tempArr)=each($dbAnalysis->itemArray
)) {
555 $this->checkGroupDBRefs
[$tempArr['table']][$tempArr['id']]+
=1;
559 if ($fieldConf['type']=='select' && $fieldConf['foreign_table']) {
561 $dbAnalysis = t3lib_div
::makeInstance('t3lib_loadDBGroup');
562 $dbAnalysis->start($row[$field],$fieldConf['foreign_table'],$fieldConf['MM'],$row['uid'], $table, $fieldConf);
563 reset($dbAnalysis->itemArray
);
564 while (list(,$tempArr)=each($dbAnalysis->itemArray
)) {
565 if ($tempArr['id']>0) {
566 $this->checkGroupDBRefs
[$fieldConf['foreign_table']][$tempArr['id']]+
=1;
579 * Depends on selectNonEmpty.... to be executed first!!
581 * @return array Report over files; keys are "moreReferences", "noReferences", "noFile", "error"
583 function testFileRefs () {
585 reset($this->checkFileRefs
);
586 while(list($folder,$fileArr)=each($this->checkFileRefs
)) {
587 $path = PATH_site
.$folder;
588 if (@is_dir
($path)) {
590 while($entry=$d->read()) {
591 if (@is_file
($path.'/'.$entry)) {
592 if (isset($fileArr[$entry])) {
593 if ($fileArr[$entry] > 1) {
594 $temp = $this->whereIsFileReferenced($folder,$entry);
596 while(list(,$inf)=each($temp)) {
597 $tempList.='['.$inf['table'].']['.$inf['uid'].']['.$inf['field'].'] (pid:'.$inf['pid'].') - ';
599 $output['moreReferences'][] = Array($path,$entry,$fileArr[$entry],$tempList);
601 unset($fileArr[$entry]);
603 if (!strstr($entry,'index.htm')) {
604 $output['noReferences'][] = Array($path,$entry);
612 while(list($file,)=each($fileArr)) {
613 $temp = $this->whereIsFileReferenced($folder,$file);
615 while(list(,$inf)=each($temp)) {
616 $tempList.='['.$inf['table'].']['.$inf['uid'].']['.$inf['field'].'] (pid:'.$inf['pid'].') - ';
619 $output['noFile'][substr($path,-3).'_'.substr($file,0,3).'_'.$tempCounter] = Array($path,$file,$tempList);
622 $output['error'][] = Array($path);
629 * Depends on selectNonEmpty.... to be executed first!!
631 * @param array Table with key/value pairs being table names and arrays with uid numbers
632 * @return string HTML Error message
634 function testDBRefs($theArray) {
637 while(list($table,$dbArr)=each($theArray)) {
640 while(list($id,)=each($dbArr)) {
643 $theList = implode(',',$idlist);
645 $mres = $GLOBALS['TYPO3_DB']->exec_SELECTquery('uid', $table, 'uid IN ('.$theList.')'.t3lib_BEfunc
::deleteClause($table));
646 while($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($mres)) {
647 if (isset($dbArr[$row['uid']])) {
648 unset ($dbArr[$row['uid']]);
650 $result.='Strange Error. ...<br />';
654 while (list($theId,$theC)=each($dbArr)) {
655 $result.='There are '.$theC.' records pointing to this missing or deleted record; ['.$table.']['.$theId.']<br />';
659 $result.='Codeerror. Table is not a table...<br />';
666 * Finding all references to record based on table/uid
668 * @param string Table name
669 * @param integer Uid of database record
670 * @return array Array with other arrays containing information about where references was found
672 function whereIsRecordReferenced($searchTable,$id) {
674 $fileFields = $this->getDBFields($searchTable); // Gets tables / Fields that reference to files...
675 $theRecordList=Array();
676 while (list(,$info)=each($fileFields)) {
677 $table=$info[0]; $field=$info[1];
678 t3lib_div
::loadTCA($table);
679 $mres = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
680 'uid,pid,'.$TCA[$table]['ctrl']['label'].','.$field,
682 $field.' LIKE \'%'.$GLOBALS['TYPO3_DB']->quoteStr($id, $table).'%\''
684 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($mres)) {
685 // Now this is the field, where the reference COULD come from. But we're not garanteed, so we must carefully examine the data.
686 $fieldConf = $TCA[$table]['columns'][$field]['config'];
687 $allowedTables = ($fieldConf['type']=='group') ?
$fieldConf['allowed'] : $fieldConf['foreign_table'];
689 $dbAnalysis = t3lib_div
::makeInstance('t3lib_loadDBGroup');
690 $dbAnalysis->start($row[$field],$allowedTables,$fieldConf['MM'],$row['uid'], $table, $fieldConf);
691 reset($dbAnalysis->itemArray
);
692 while (list(,$tempArr)=each($dbAnalysis->itemArray
)) {
693 if ($tempArr['table']==$searchTable && $tempArr['id']==$id) {
694 $theRecordList[]=Array('table'=>$table,'uid'=>$row['uid'],'field'=>$field,'pid'=>$row['pid']);
699 return $theRecordList;
703 * Finding all references to file based on uploadfolder / filename
705 * @param string Upload folder where file is found
706 * @param string Filename to search for
707 * @return array Array with other arrays containing information about where references was found
709 function whereIsFileReferenced($uploadfolder,$filename) {
711 $fileFields = $this->getFileFields($uploadfolder); // Gets tables / Fields that reference to files...
712 $theRecordList=Array();
713 while (list(,$info)=each($fileFields)) {
714 $table=$info[0]; $field=$info[1];
715 $mres = $GLOBALS['TYPO3_DB']->exec_SELECTquery(
716 'uid,pid,'.$TCA[$table]['ctrl']['label'].','.$field,
718 $field.' LIKE \'%'.$GLOBALS['TYPO3_DB']->quoteStr($filename, $table).'%\''
720 while ($row = $GLOBALS['TYPO3_DB']->sql_fetch_assoc($mres)) {
721 // Now this is the field, where the reference COULD come from. But we're not garanteed, so we must carefully examine the data.
722 $tempArr = explode(',',trim($row[$field]));
723 while (list(,$file)=each($tempArr)) {
725 if ($file==$filename) {
726 $theRecordList[]=Array('table'=>$table,'uid'=>$row['uid'],'field'=>$field,'pid'=>$row['pid']);
731 return $theRecordList;
736 if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_admin.php']) {
737 include_once($TYPO3_CONF_VARS[TYPO3_MODE
]['XCLASS']['t3lib/class.t3lib_admin.php']);