diff --git a/reference/filesystem/functions/fileperms.xml b/reference/filesystem/functions/fileperms.xml index 8eefcdefb..290e68389 100644 --- a/reference/filesystem/functions/fileperms.xml +++ b/reference/filesystem/functions/fileperms.xml @@ -1,6 +1,6 @@ - + @@ -95,51 +95,35 @@ echo substr(sprintf('%o', fileperms('/etc/passwd')), -4); $perms = fileperms('/etc/passwd'); switch ($perms & 0xF000) { - case 0xC000: // Socket - $info = 's'; - break; - case 0xA000: // Symbolischer Link - $info = 'l'; - break; - case 0x8000: // Regulär - $info = 'r'; - break; - case 0x6000: // Block special - $info = 'b'; - break; - case 0x4000: // Verzeichnis - $info = 'd'; - break; - case 0x2000: // Character special - $info = 'c'; - break; - case 0x1000: // FIFO pipe - $info = 'p'; - break; - default: // unbekannt - $info = 'u'; + case 0x1000: $info = 'p'; break; // FIFO pipe + case 0x2000: $info = 'c'; break; // Character special + case 0x4000: $info = 'd'; break; // Verzeichnis + case 0x6000: $info = 'b'; break; // Block special + case 0x8000: $info = '-'; break; // Regulär + case 0xA000: $info = 'l'; break; // Symbolischer Link (verfügbar bei verwendung der funktion lstat) + case 0xC000: $info = 's'; break; // Socket + + // unbekannt + default: $info = 'u'; } // Besitzer +$setuid = $perms & 0x0800; $info .= (($perms & 0x0100) ? 'r' : '-'); $info .= (($perms & 0x0080) ? 'w' : '-'); -$info .= (($perms & 0x0040) ? - (($perms & 0x0800) ? 's' : 'x' ) : - (($perms & 0x0800) ? 'S' : '-')); +$info .= (($perms & 0x0040) ? ($setuid ? 's' : 'x') : ($setuid ? 'S' : '-')); // Gruppe +$setgid = $perms & 0x0400; $info .= (($perms & 0x0020) ? 'r' : '-'); $info .= (($perms & 0x0010) ? 'w' : '-'); -$info .= (($perms & 0x0008) ? - (($perms & 0x0400) ? 's' : 'x' ) : - (($perms & 0x0400) ? 'S' : '-')); +$info .= (($perms & 0x0008) ? ($setgid ? 's' : 'x') : ($setgid ? 'S' : '-')); // Andere +$sticky = $perms & 0x0200; $info .= (($perms & 0x0004) ? 'r' : '-'); $info .= (($perms & 0x0002) ? 'w' : '-'); -$info .= (($perms & 0x0001) ? - (($perms & 0x0200) ? 't' : 'x' ) : - (($perms & 0x0200) ? 'T' : '-')); +$info .= (($perms & 0x0001) ? ($sticky ? 't' : 'x') : ($sticky ? 'T' : '-')); echo $info; ?>