CSecurityEnvironmentTest::formatFilePermissions

static function formatFilePermissions($perms)
{
	// http://www.php.net/manual/en/function.fileperms.php

	if (($perms & 0xC000) == 0xC000)
	{
		// Socket
		$info = 's';
	}
	elseif (($perms & 0xA000) == 0xA000)
	{
		// Symbolic Link
		$info = 'l';
	}
	elseif (($perms & 0x8000) == 0x8000)
	{
		// Regular
		$info = '-';
	}
	elseif (($perms & 0x6000) == 0x6000)
	{
		// Block special
		$info = 'b';
	}
	elseif (($perms & 0x4000) == 0x4000)
	{
		// Directory
		$info = 'd';
	}
	elseif (($perms & 0x2000) == 0x2000)
	{
		// Character special
		$info = 'c';
	}
	elseif (($perms & 0x1000) == 0x1000)
	{
		// FIFO pipe
		$info = 'p';
	}
	else
	{
		// Unknown
		$info = 'u';
	}

	// Owner
	$info .= (($perms & 0x0100) ? 'r' : '-');
	$info .= (($perms & 0x0080) ? 'w' : '-');
	$info .= (($perms & 0x0040) ?
		(($perms & 0x0800) ? 's' : 'x' ) :
		(($perms & 0x0800) ? 'S' : '-'));

	// Group
	$info .= (($perms & 0x0020) ? 'r' : '-');
	$info .= (($perms & 0x0010) ? 'w' : '-');
	$info .= (($perms & 0x0008) ?
		(($perms & 0x0400) ? 's' : 'x' ) :
		(($perms & 0x0400) ? 'S' : '-'));

	// World
	$info .= (($perms & 0x0004) ? 'r' : '-');
	$info .= (($perms & 0x0002) ? 'w' : '-');
	$info .= (($perms & 0x0001) ?
		(($perms & 0x0200) ? 't' : 'x' ) :
		(($perms & 0x0200) ? 'T' : '-'));

	return $info;
}