Данная функция возвращает "хозяина" файла на томе Novell NetWare 6.5. На других версиях не проверял.
Принцип работы - парсинг команды "ndir".
Функция wrlog - пишет в лог файл.
$GLOBALS["cfg"]["main"]["owner_default"] - пользователь "по-умолчанию".
Исходник:
function novell_owner83($fname, $ld)
{
if(file_exists($fname) == true)
{
$exe = "ndir " . $fname;
if($ld != "")
wrlog($ld, "Запуск: " . $exe);
exec($exe, $out, $status);
$fname_only = strtoupper(basename($fname));
for($i = 8; $i < count($out); $i++)
{
if($ld != "")
wrlog($ld, convert_cyr_string($out[$i], "d", "w"));
$strs = explode(" ", $out[$i]);
if(strtoupper($strs[0]) == $fname_only)
{
$ret = $strs[count($strs) - 1];
break;
}
}
} else
{
$ret = $GLOBALS["cfg"]["main"]["owner_default"];
}
return $ret;
}
|