}
$arParams["COMMENT_PROPERTY"] = array("UF_BLOG_COMMENT_DOC");
if (CModule::IncludeModule("webdav") || CModule::IncludeModule("disk")) {
$arParams["COMMENT_PROPERTY"][] = "UF_BLOG_COMMENT_FILE";
$arParams["COMMENT_PROPERTY"][] = "UF_BLOG_COMMENT_FH";
}
$arParams["COMMENT_PROPERTY"][] = "UF_BLOG_COMM_URL_PRV";
$arBlog = $arParams["BLOG_DATA"];
$arPost = $arParams["POST_DATA"];
$arResult["Perm"] = BLOG_PERMS_DENY;
$arResult["PostPerm"] = BLOG_PERMS_DENY;
if (IntVal($_REQUEST["comment_post_id"]) > 0) {
$arParams["ID"] = IntVal($_REQUEST["comment_post_id"]);
$arPost = CBlogPost::GetById($arParams["ID"]);
$arPost = CBlogTools::htmlspecialcharsExArray($arPost);
$arBlog = CBlog::GetById($arPost["BLOG_ID"]);
$arBlog = CBlogTools::htmlspecialcharsExArray($arBlog);
if ($arPost["AUTHOR_ID"] == $user_id) {
$arResult["Perm"] = BLOG_PERMS_FULL;
$arResult["PostPerm"] = BLOG_PERMS_FULL;
} else {
$arResult["PostPerm"] = CBlogPost::GetSocNetPostPerms($arParams["ID"]);
if ($arResult["PostPerm"] > BLOG_PERMS_DENY) {
$arResult["Perm"] = CBlogComment::GetSocNetUserPerms($arParams["ID"], $arPost["AUTHOR_ID"]);
}
}
$arResult["is_ajax_post"] = "Y";
} else {
$arResult["PostPerm"] = strlen($arParams["POST_DATA"]["perms"]) <= 0 ? CBlogPost::GetSocNetPostPerms($arParams["ID"]) : $arParams["POST_DATA"]["perms"];
if ($arResult["PostPerm"] > BLOG_PERMS_DENY) {
if ($bIntranetInstalled && IsModuleInstalled("bitrix24") && $arParams["POST_DATA"]["HAVE_ALL_IN_ADR"] == "Y") {
