public function testSetGetLookup()
{
global $ilUser;
$obj = new ilObject();
$obj->setType("");
// otherwise type check will fail
$obj->setTitle("TestObject");
$obj->setDescription("TestDescription");
$obj->setImportId("imp_44");
$obj->create();
$obj->createReference();
$id = $obj->getId();
$ref_id = $obj->getRefId();
$obj = new ilObject($id, false);
if ($obj->getType() == "") {
$value .= "sg1-";
}
if ($obj->getTitle() == "TestObject") {
$value .= "sg2-";
}
if ($obj->getDescription() == "TestDescription") {
$value .= "sg3-";
}
if ($obj->getImportId() == "imp_44") {
$value .= "sg4-";
}
if ($obj->getOwner() == $ilUser->getId()) {
$value .= "sg5-";
}
$obj = new ilObject($ref_id);
if ($obj->getTitle() == "TestObject") {
$value .= "sg6-";
}
if ($obj->getCreateDate() == ($lu = $obj->getLastUpdateDate())) {
$value .= "sg7-";
}
$obj->setTitle("TestObject2");
sleep(2);
// we want a different date here...
$obj->update();
$obj = new ilObject($ref_id);
if ($lu != ($lu2 = $obj->getLastUpdateDate())) {
$value .= "up1-";
}
if ($obj->getTitle() == "TestObject2") {
$value .= "up2-";
}
if ($id == ilObject::_lookupObjIdByImportId("imp_44")) {
$value .= "lu1-";
}
if ($ilUser->getFullname() == ilObject::_lookupOwnerName(ilObject::_lookupOwner($id))) {
$value .= "lu2-";
}
if (ilObject::_lookupTitle($id) == "TestObject2") {
$value .= "lu3-";
}
if (ilObject::_lookupDescription($id) == "TestDescription") {
$value .= "lu4-";
}
if (ilObject::_lookupLastUpdate($id) == $lu2) {
$value .= "lu5-";
}
if (ilObject::_lookupObjId($ref_id) == $id) {
$value .= "lu6-";
}
if (ilObject::_lookupType($id) == "") {
$value .= "lu7-";
}
if (ilObject::_lookupObjectId($ref_id) == $id) {
$value .= "lu8-";
}
$ar = ilObject::_getAllReferences($id);
if (is_array($ar) && count($ar) == 1 && $ar[$ref_id] == $ref_id) {
$value .= "lu9-";
}
$ids = ilObject::_getIdsForTitle("TestObject2");
foreach ($ids as $i) {
if ($i == $id) {
$value .= "lu10-";
}
}
$obs = ilObject::_getObjectsByType("usr");
foreach ($obs as $ob) {
if ($ob["obj_id"] == $ilUser->getId()) {
$value .= "lu11-";
}
}
$d1 = ilObject::_lookupDeletedDate($ref_id);
ilObject::_setDeletedDate($ref_id);
$d2 = ilObject::_lookupDeletedDate($ref_id);
ilObject::_resetDeletedDate($ref_id);
$d3 = ilObject::_lookupDeletedDate($ref_id);
if ($d1 != $d2 && $d1 == $d3 && $d3 == null) {
$value .= "dd1-";
}
$obj->delete();
$this->assertEquals("sg1-sg2-sg3-sg4-sg5-sg6-sg7-up1-up2-" . "lu1-lu2-lu3-lu4-lu5-lu6-lu7-lu8-lu9-lu10-lu11-dd1-", $value);
}
final function _lookupLastUpdate($a_id, $a_as_string = false)
{
return parent::_lookupLastUpdate($a_id, $a_as_string);
}
/**
* Get item properties
*
* @return array array of property arrays:
* "alert" (boolean) => display as an alert property (usually in red)
* "property" (string) => property name
* "value" (string) => property value
*/
function getProperties()
{
global $lng, $ilUser;
// BEGIN WebDAV: Get parent properties
$props = parent::getProperties();
// END WebDAV: Get parent properties
// to do: implement extra smaller file info object
include_once "./Modules/File/classes/class.ilObjFileAccess.php";
// Display a warning if a file is not a hidden Unix file, and
// the filename extension is missing
if (!preg_match('/^\\.|\\.[a-zA-Z0-9]+$/', $this->title)) {
$props[] = array("alert" => false, "property" => $lng->txt("filename_interoperability"), "value" => $lng->txt("filename_extension_missing"), 'propertyNameVisible' => false);
}
// BEGIN WebDAV: Only display relevant information.
$props[] = array("alert" => false, "property" => $lng->txt("type"), "value" => ilObjFileAccess::_getFileExtension($this->title), 'propertyNameVisible' => false);
$fileData = ilObjFileAccess::_lookupFileData($this->obj_id);
$props[] = array("alert" => false, "property" => $lng->txt("size"), "value" => ilFormat::formatSize($fileData['file_size'], 'short'), 'propertyNameVisible' => false);
$version = $fileData['version'];
if ($version > 1) {
$props[] = array("alert" => false, "property" => $lng->txt("version"), "value" => $version);
}
$props[] = array("alert" => false, "property" => $lng->txt("last_update"), "value" => ilObject::_lookupLastUpdate($this->obj_id, true), 'propertyNameVisible' => false);
// END WebDAV: Only display relevant information.
return $props;
}
