ILIAS  release_5-1 Revision 5.0.0-5477-g43f3e3fab5f
class.ilObjFileBasedLMAccess.php
Go to the documentation of this file.
1<?php
2
3/* Copyright (c) 1998-2011 ILIAS open source, Extended GPL, see docs/LICENSE */
4
5include_once("./Services/Object/classes/class.ilObjectAccess.php");
6
17{
18 static $online;
19 static $startfile;
20
33 function _checkAccess($a_cmd, $a_permission, $a_ref_id, $a_obj_id, $a_user_id = "")
34 {
35 global $ilUser, $lng, $rbacsystem, $ilAccess;
36
37 if ($a_user_id == "")
38 {
39 $a_user_id = $ilUser->getId();
40 }
41
42 switch ($a_permission)
43 {
44 case "visible":
46 (!$rbacsystem->checkAccessOfUser($a_user_id,'write', $a_ref_id)))
47 {
48 $ilAccess->addInfoItem(IL_NO_OBJECT_ACCESS, $lng->txt("offline"));
49 return false;
50 }
51 break;
52
53 case "read":
54
56 && !$rbacsystem->checkAccessOfUser($a_user_id,'write',$a_ref_id)) ||
58 {
59 $ilAccess->addInfoItem(IL_NO_OBJECT_ACCESS, $lng->txt("offline"));
60 return false;
61 }
62 break;
63 }
64
65
66 return true;
67 }
68
81 function _getCommands()
82 {
83 $commands = array
84 (
85 array("permission" => "read", "cmd" => "view", "lang_var" => "show",
86 "default" => true),
87 array("permission" => "write", "cmd" => "edit", "lang_var" => "edit_content"),
88 array("permission" => "write", "cmd" => "properties", "lang_var" => "settings")
89 );
90
91 return $commands;
92 }
93
94 //
95 // access relevant methods
96 //
97
101 function _lookupOnline($a_id)
102 {
103 global $ilDB;
104
105 if (isset(self::$online[$a_id]))
106 {
107 return self::$online[$a_id];
108 }
109 $q = "SELECT is_online FROM file_based_lm WHERE id = ".$ilDB->quote($a_id, "integer");
110 $set = $ilDB->query($q);
111 $rec = $ilDB->fetchAssoc($set);
112
113 self::$online[$a_id] = ilUtil::yn2tf($rec["is_online"]);
114
115 return self::$online[$a_id];
116 }
117
121 function _determineStartUrl($a_id)
122 {
123 global $ilDB;
124
125 if (isset(self::$startfile[$a_id]))
126 {
127 $start_file = self::$startfile[$a_id];
128 }
129 else
130 {
131 $q = "SELECT startfile FROM file_based_lm WHERE id = ".$ilDB->quote($a_id, "integer");
132 $set = $ilDB->query($q);
133 $rec = $ilDB->fetchAssoc($set);
134 $start_file = $rec["startfile"];
135 self::$startfile[$a_id] = $start_file."";
136 }
137
138 $dir = ilUtil::getWebspaceDir()."/lm_data/lm_".$a_id;
139
140 if (($start_file != "") &&
141 (@is_file($dir."/".$start_file)))
142 {
143 return "./".$dir."/".$start_file;
144 }
145 else if (@is_file($dir."/index.html"))
146 {
147 return "./".$dir."/index.html";
148 }
149 else if (@is_file($dir."/index.htm"))
150 {
151 return "./".$dir."/index.htm";
152 }
153
154 return "";
155 }
156
160 function _checkGoto($a_target)
161 {
162 global $ilAccess;
163
164 $t_arr = explode("_", $a_target);
165
166 if ($t_arr[0] != "htlm" || ((int) $t_arr[1]) <= 0)
167 {
168 return false;
169 }
170
171 if ($ilAccess->checkAccess("visible", "", $t_arr[1]) ||
172 $ilAccess->checkAccess("read", "", $t_arr[1]))
173 {
174 return true;
175 }
176 return false;
177 }
178
184 function _lookupDiskUsage($a_id)
185 {
186 $lm_data_dir = ilUtil::getWebspaceDir('filesystem')."/lm_data";
187 $lm_dir = $lm_data_dir.DIRECTORY_SEPARATOR."lm_".$a_id;
188
189 return file_exists($lm_dir) ? ilUtil::dirsize($lm_dir) : 0;
190 }
191
200 static function _isOffline($a_obj_id)
201 {
202 return !self::_lookupOnline($a_obj_id);
203 }
204
210 function _preloadData($a_obj_ids, $a_ref_ids)
211 {
212 global $ilDB, $ilUser;
213
214 $q = "SELECT id, is_online, startfile FROM file_based_lm WHERE ".
215 $ilDB->in("id", $a_obj_ids, false, "integer");
216
217 $lm_set = $ilDB->query($q);
218 while ($rec = $ilDB->fetchAssoc($lm_set))
219 {
220 self::$online[$rec["id"]] = ilUtil::yn2tf($rec["is_online"]);
221 self::$startfile[$rec["id"]] = $rec["startfile"]."";
222 }
223 }
224
225}
226
227?>
const IL_NO_OBJECT_ACCESS
Class ilFileBasedLMAccess.
static _isOffline($a_obj_id)
Type-specific implementation of general status.
_checkAccess($a_cmd, $a_permission, $a_ref_id, $a_obj_id, $a_user_id="")
checks wether a user may invoke a command or not (this method is called by ilAccessHandler::checkAcce...
_determineStartUrl($a_id)
check wether learning module is online
_lookupDiskUsage($a_id)
Returns the number of bytes used on the harddisk by the learning module with the specified object id.
_checkGoto($a_target)
check whether goto script will succeed
_preloadData($a_obj_ids, $a_ref_ids)
Preload data.
_lookupOnline($a_id)
check wether learning module is online
Class ilObjectAccess.
static getWebspaceDir($mode="filesystem")
get webspace directory
static yn2tf($a_yn)
convert "y"/"n" to true/false
static dirsize($directory)
get size of a directory or a file.
global $lng
Definition: privfeed.php:40
global $ilDB
$lm_set
global $ilUser
Definition: imgupload.php:15