30 lines
704 B
PHP
30 lines
704 B
PHP
|
|
<?php
|
||
|
|
|
||
|
|
require_once("../../../config/dmsDefaults.php");
|
||
|
|
require_once(KT_LIB_DIR . '/import/zipimportstorage.inc.php');
|
||
|
|
|
||
|
|
$f = new KTZipImportStorage(KT_DIR . "/tests/import/dataset2/dataset2.zip");
|
||
|
|
$f->init();
|
||
|
|
$oInfo = $f->getDocumentInfo("a/b");
|
||
|
|
$norm = file_get_contents(KT_DIR . '/tests/import/dataset1/a/b');
|
||
|
|
|
||
|
|
$gFilename = $oInfo->getFilename();
|
||
|
|
if ($gFilename !== "b") {
|
||
|
|
print "FAILURE\n";
|
||
|
|
print "Filename should have been: b\n";
|
||
|
|
print "Filename was: " . $gFilename . "\n";
|
||
|
|
exit(0);
|
||
|
|
}
|
||
|
|
|
||
|
|
$oFile =& $oInfo->aVersions[0];
|
||
|
|
$gData = $oFile->get_contents();
|
||
|
|
|
||
|
|
if ($norm !== $gData) {
|
||
|
|
print "FAILURE\n";
|
||
|
|
print "Data doesn't match\n";
|
||
|
|
exit(0);
|
||
|
|
}
|
||
|
|
$f->cleanup();
|
||
|
|
|
||
|
|
print "SUCCESS\n";
|