CAllSite::GetSiteByFullPath

static function GetSiteByFullPath($path, $bOneResult = true)
{
	$res = array();

	if(($p = realpath($path)))
		$path = $p;
	$path = str_replace("\", "/", $path);
	$path = mb_strtolower($path)."/";

	$db_res = CSite::GetList("lendir", "desc");
	while($ar_res = $db_res->Fetch())
	{
		$abspath = $ar_res["ABS_DOC_ROOT"].$ar_res["DIR"];
		if(($p = realpath($abspath)))
			$abspath = $p;
		$abspath = str_replace("\", "/", $abspath);
		$abspath = mb_strtolower($abspath);
		if(mb_substr($abspath, -1) <> "/")
			$abspath .= "/";
		if(mb_strpos($path, $abspath) === 0)
		{
			if($bOneResult)
				return $ar_res["ID"];
			$res[] = $ar_res["ID"];
		}
	}

	if(!empty($res))
		return $res;

	return false;
}