function search_updatelist($options = '')
{
global $win32, $setctl, $bd, $runinit;
if ($runinit['astream']) {
if (!updaterunning()) {
$setctl->set('updatemid', db_thread_id());
} else {
errormessage('Another update is running. Please try again later.', true);
}
}
kprintheader(get_lang(17));
$updateall = false;
@ini_set('output_buffering', '1');
if (isset($options['deleteunused'])) {
$deleteunused = 1;
} else {
$deleteunused = 0;
}
if (isset($options['debugmode'])) {
$debugmode = 1;
} else {
$debugmode = 0;
}
if (isset($options['sleeppertrans'])) {
$sleeptrans = $options['sleeppertrans'];
} else {
$sleeptrans = 0;
}
if (isset($options['rebuildid3'])) {
$updateall = true;
}
$setctl->publish('updusecache');
$setctl->publish('followsymlinks');
$db_out = $db_mtime = $db_unique = $db_path = array();
$filecntr = 0;
$file = '';
$fixurl = 'http://www.kplaylist.net/forum/viewtopic.php?p=3672';
echo '<font class="notice">' . get_lang(296, '<a href="' . $fixurl . '" target="_blank">' . $fixurl . '</a>') . '</font><br/><br/>';
echo '<font class="notice">' . get_lang(136) . '..</font><br/>';
flush();
$data = array();
$datacnt = 0;
if ($debugmode) {
@ini_set('display_errors', 'On');
echo '<!-- update debug step 0 - mem limit detected: ' . @ini_get('memory_limit') . ' -->';
}
$kqm = new kq_Measure();
$kqm->start();
echo '<br/><div id="up_status2" class="notice"></div>';
echo '<br/><div id="up_status" class="notice"></div><br/>';
$cnt = 0;
for ($i = 0, $c = $bd->getcnt(); $i < $c; $i++) {
if ($bd->gtype($i) == 'l') {
$grabdata = array();
if ($debugmode) {
echo '<!-- update debug step 1 - grabbing filelist from ' . $bd->getpath($i) . ' -->';
}
$stripc = strlen($bd->getpath($i));
GetDirArray($bd->getpath($i), $grabdata, $cnt, $stripc);
$data[$i] = $grabdata;
$datacnt += count($data[$i]);
}
}
if ($debugmode) {
echo '<!-- update debug step 2 -->';
}
if ($datacnt > 0) {
$result = db_execquery('SELECT count(*) FROM ' . TBL_SEARCH . ' WHERE xid = 0');
$row = db_fetch_row($result);
$dbrows = $row[0];
$result = db_execquery('SELECT fsize, id, md5, fname, drive, mtime, fpath FROM ' . TBL_SEARCH . ' WHERE xid = 0 ORDER BY id ASC', true);
$dcntr = 0;
updateup_status(get_lang(314, $dcntr, $dbrows));
while ($row = db_fetch_row($result)) {
if (UPDUSECACHE) {
$db_out[$dcntr] = $row;
} else {
$db_out[$dcntr] = array($row[0], $row[1]);
}
if ($dcntr % 50 == 0) {
updateup_status(get_lang(314, $dcntr, $dbrows));
}
if (!isset($db_mtime[$row[0]][$row[5]])) {
$db_mtime[$row[0]][$row[5]] = $dcntr;
}
if (!isset($db_unique[$row[0]][$row[2]])) {
$db_unique[$row[0]][$row[2]] = $dcntr;
}
if (strlen($row[6]) != 0 || strlen($row[3]) != 0) {
$path = crc32($row[6] . $row[3]);
if (isset($db_path[$path])) {
$ids = $db_path[$path];
$ids[] = $dcntr;
$db_path[$path] = $ids;
} else {
$db_path[$path] = array($dcntr);
}
}
$dcntr++;
}
updateup_status(get_lang(314, $dcntr, $dbrows), 'up_status');
db_free($result);
if ($debugmode) {
echo '<!-- update debug step 3 -->';
}
if ($updateall) {
$db_mtime = array();
}
$query = null;
updateup_status(get_lang(18, $datacnt));
$totalqupds = $dcntr;
$totalins = $datacnt;
$qins = $qupd = $failed = $qupdins = $skips = $qdels = $fdups = 0;
$rowinsertid = -1;
if ($datacnt > 0) {
for ($drive = 0, $drivec = $bd->getcnt(); $drive < $drivec; $drive++) {
if ($bd->gtype($drive) == 'l') {
for ($i = 0, $ic = count($data[$drive]); $i < $ic; $i++) {
$filein = $data[$drive][$i];
$file = $bd->getpath($drive) . $filein;
if ($i % 50 == 0 || $debugmode) {
$countups = $qupd + $qupdins;
$out = get_lang(20, $qins, $countups);
$out .= kp_strlen($filein) > 60 ? addslashes(kp_substr($filein, 0, 60)) . '...' : addslashes($filein);
updateup_status($out, 'up_status');
}
$fsize = filesize($file);
$mtime = filemtime($file);
if (!$fsize) {
echo '<font class="notice">' . get_lang(19, $file) . '</font><br/>';
flush();
$skips++;
continue;
}
$filecntr++;
if (isset($db_mtime[$fsize][$mtime])) {
$i2 = $db_mtime[$fsize][$mtime];
if (UPDUSECACHE) {
$userow = $db_out[$i2];
} else {
$userow = getsrow($db_out[$i2][1]);
}
if ($db_out[$i2][0] != -1 && $userow[6] . $userow[3] == $filein && $userow[4] == $drive) {
$db_out[$i2][0] = -1;
$qupd++;
continue;
}
}
$md5 = md5file($file);
if ($sleeptrans > 0 && !$win32) {
usleep($sleeptrans);
}
if (!empty($md5)) {
if (isset($db_unique[$fsize][$md5])) {
$idupdate = $db_unique[$fsize][$md5];
if ($db_out[$idupdate][0] == -1) {
if (UPDUSECACHE) {
$userow = $db_out[$idupdate];
} else {
$userow = getsrow($db_out[$idupdate][1]);
}
$checkf = $bd->getpath($userow[4]) . $userow[6] . $userow[3];
/* duplicate check - not in production - uncomment to use. But, do not use if you do not understand what it does.
$identical = false;
$fp1 = fopen($checkf, 'rb');
$fp2 = fopen($file, 'rb');
if ($fp1 && $fp2)
{
$identical = true;
while (!feof($fp1))
{
$data1 = fread($fp1, 32768);
$data2 = fread($fp2, 32768);
if (strcmp($data1,$data2) != 0)
{
$identical = false;
break;
}
}
fclose($fp1);
fclose($fp2);
}
if ($identical) $extra = '! '; else $extra = '';*/
echo '<font class="notice">' . get_lang(168, $file, $checkf) . '</font><br/><br/>';
$fdups++;
continue;
}
} else {
$idupdate = -1;
}
if ($idupdate != -1) {
$db_out[$idupdate][0] = -1;
if (UPDUSECACHE) {
$userow = $db_out[$idupdate];
} else {
$userow = getsrow($db_out[$idupdate][1]);
}
if ($updateall) {
$userow[5] = 0;
}
if ($mtime != $userow[5]) {
$fid = get_file_info($file);
$query = search_qupdorins($db_out[$idupdate][1], $fid, $filein, $md5, $drive, $mtime, 0, $fsize, time());
$qupdins++;
} else {
if ($userow[6] . $userow[3] != $filein || $userow[4] != $drive) {
$query = search_qupdfree($filein, $drive, $db_out[$idupdate][1]);
$qupdins++;
}
}
} else {
$frel = getrelative($filein);
$ffilein = kp_basename($filein);
$checkex = crc32($frel . $ffilein);
$useid = -1;
if (isset($db_path[$checkex])) {
$ids = $db_path[$checkex];
for ($i3 = 0, $c3 = count($ids); $i3 < $c3; $i3++) {
$cid = $ids[$i3];
if (UPDUSECACHE) {
$userow = $db_out[$cid];
} else {
$userow = getsrow($db_out[$cid][1]);
}
if ($userow[3] == $ffilein && $userow[6] == $frel) {
$useid = $cid;
break;
}
}
}
$fid = get_file_info($file);
if ($useid == -1) {
$query = search_qupdorins(0, $fid, $filein, $md5, $drive, $mtime, 0, $fsize, time());
if (UPDUSECACHE) {
$db_out[$dcntr] = array(-1, 0, $md5, kp_basename($filein), $drive, $mtime, getrelative($filein));
} else {
$db_out[$dcntr] = array(-1, 0);
}
$db_unique[$fsize][$md5] = $dcntr;
$rowinsertid = $dcntr;
$dcntr++;
$qins++;
} else {
$query = search_qupdorins($db_out[$useid][1], $fid, $filein, $md5, $drive, $mtime, 0, $fsize, time());
$db_out[$useid][0] = -1;
$qupdins++;
}
}
if ($query !== null) {
$result = db_execquery($query, true);
if (!$result) {
$failed++;
echo '<font class="wtext">' . get_lang(22, $query) . '</font><br/>';
} else {
if ($rowinsertid != -1) {
$db_out[$rowinsertid][1] = db_insert_id();
$rowinsertid = -1;
}
}
$query = null;
}
} else {
echo '<font class="notice">' . get_lang(23, $file) . '</font><br/>';
flush();
$skips++;
}
}
// end of file loop
}
// if local drive
}
// end of drive loop
}
// if found any files
$fordel = 0;
for ($i2 = 0; $i2 < $dcntr; $i2++) {
if ($db_out[$i2][0] != -1) {
$fordel++;
}
}
if ($deleteunused) {
if ($skips == 0) {
for ($i2 = 0; $i2 < $dcntr; $i2++) {
if ($db_out[$i2][0] != -1) {
if (UPDUSECACHE) {
$userow = $db_out[$i2];
} else {
$userow = getsrow($db_out[$i2][1]);
}
echo '<font class="notice">' . get_lang(24, $userow[6] . $userow[3]);
$result = db_execquery('DELETE FROM ' . TBL_SEARCH . ' WHERE id = ' . $db_out[$i2][1], true);
if ($result) {
$qdels++;
}
echo '</font><br/>';
$fordel = 0;
}
}
echo '<br/>';
} else {
if ($fordel > 0) {
echo '<font class="notice">' . get_lang(335) . '</font><br/>';
}
}
} else {
$one = false;
for ($i2 = 0; $i2 < $dcntr; $i2++) {
if ($db_out[$i2][0] != -1) {
$one = true;
if (UPDUSECACHE) {
$userow = $db_out[$i2];
} else {
$userow = getsrow($db_out[$i2][1]);
}
echo '<font class="notice">' . get_lang(315, $userow[6] . $userow[3]) . '</font><br/>';
}
}
if ($one) {
echo '<br/>';
}
}
$kqm->stop();
updateup_status(get_lang(26), 'up_status');
echo '<font class="notice">' . get_lang(25, $qins, $qupdins, $qdels, $failed, $skips, $filecntr, $kqm->result(3), $fordel);
echo '</font><br/><br/>';
} else {
for ($i = 0, $c = $bd->getcnt(); $i < $c; $i++) {
if ($bd->gtype($i) == 'l') {
echo '<font class="notice">' . get_lang(28, $bd->getpath($i)) . '</font><br/>';
}
}
}
// network update && clean up
for ($i = 0, $c = $bd->getcnt(); $i < $c; $i++) {
if ($bd->gtype($i) == 'n') {
updateup_status(get_lang(253));
updateup_status('', 'up_status');
$kpn = new kpnetwork();
if ($kpn->setdrive($i)) {
if ($kpn->checklogin()) {
$cnt = $kpn->preparesync($i);
$host = $kpn->getnetworkhost();
if ($cnt > 0) {
updateup_status(get_lang(347, $host->geturl(), $cnt));
if ($kpn->genchlist($updateall, $deleteunused) > 0) {
$kpn->dosync();
}
updateup_status(get_lang(348, $host->geturl(), get_lang(181)), 'up_status');
} else {
if ($cnt == -1) {
updateup_status(get_lang(348, $host->geturl(), $kpn->geterrorstr()), 'up_status');
}
}
} else {
updateup_status(get_lang(348, $host->geturl(), $kpn->geterrorstr()), 'up_status');
}
}
} else {
if ($bd->gtype($i) == 'l') {
if ($deleteunused) {
$res = db_execquery('SELECT count(*) as cnt FROM ' . TBL_SEARCH . ' WHERE xid != 0 AND drive = ' . $i);
$row = db_fetch_assoc($res);
if ($row['cnt'] > 0) {
$res = db_execquery('DELETE FROM ' . TBL_SEARCH . ' WHERE xid != 0 AND drive = ' . $i);
}
}
}
}
}
echo '<input type="button" value="' . get_lang(27) . '" name="close" class="fatbuttom" onclick="javascript: self.close();"/><br/><br/>';
if ($runinit['astream']) {
$setctl->set('updatemid', 0);
}
$setctl->set('basedir_changed', 0);
cache_updateall();
kprintend();
}