<?php
require_once "../../../config/dmsDefaults.php";
require_once KT_LIB_DIR . "/util/ktutil.inc";
$sSrc = KT_DIR . '/tests/util/ktutil/dataset1';
$name = tempnam('/tmp', 'movedirectory');
unlink($name);
print "copying to {$name} first\n";
KTUtil::copyDirectory($sSrc, $name);
$sSrc = $name;
$name = tempnam('/tmp', 'movedirectory');
unlink($name);
print "moving to {$name}\n";
KTUtil::moveDirectory($sSrc, $name);
function moveFolder($oFolder, $oDestFolder)
{
$table = "document_content_version";
$sQuery = "UPDATE {$table} SET storage_path = CONCAT(?, SUBSTRING(storage_path FROM ?)) WHERE storage_path LIKE ?";
if ($oDestFolder->getId() == 1) {
$sDestFolderPath = $oDestFolder->getName();
} else {
$sDestFolderPath = sprintf("%s/%s", $oDestFolder->getFullPath(), $oDestFolder->getName());
}
if ($oFolder->getId() == 1) {
$sSrcFolderPath = $oFolder->getName();
} else {
$sSrcFolderPath = sprintf("%s/%s", $oFolder->getFullPath(), $oFolder->getName());
}
$aParams = array($sDestFolderPath, strlen($oFolder->getFullPath()) + 1, sprintf("%s%%", $sSrcFolderPath));
$res = DBUtil::runQuery(array($sQuery, $aParams));
if (PEAR::isError($res)) {
return $res;
}
$oConfig =& KTConfig::getSingleton();
$sSrc = sprintf("%s/%s", $oConfig->get('urls/documentRoot'), $sSrcFolderPath);
$sDst = sprintf("%s/%s/%s", $oConfig->get('urls/documentRoot'), $sDestFolderPath, $oFolder->getName());
return KTUtil::moveDirectory($sSrc, $sDst);
}
