public static function getPageTitle($filesrc, $prolog = false)
{
if ($prolog === false) {
$chunks = PHPParser::getPhpChunks($filesrc, 1);
if (!empty($chunks)) {
$prolog =& $chunks[0];
} else {
$prolog = '';
}
}
$title = false;
if ($prolog != '') {
if (preg_match("/\\\$APPLICATION->SetTitle\\s*\\(\\s*\"(.*?)(?<!\\\\)\"\\s*\\);/is", $prolog, $regs)) {
$title = UnEscapePHPString($regs[1]);
} elseif (preg_match("/\\\$APPLICATION->SetTitle\\s*\\(\\s*'(.*?)(?<!\\\\)'\\s*\\);/is", $prolog, $regs)) {
$title = UnEscapePHPString($regs[1]);
} elseif (preg_match("'<title[^>]*>([^>]+)</title[^>]*>'i", $prolog, $regs)) {
$title = $regs[1];
}
}
if (!$title && preg_match("'<title[^>]*>([^>]+)</title[^>]*>'i", $filesrc, $regs)) {
$title = $regs[1];
}
return $title;
}
function ParseFileContent($filesrc, $params = array())
{
/////////////////////////////////////
// Parse prolog, epilog, title
/////////////////////////////////////
$filesrc = trim($filesrc);
$prolog = $epilog = '';
$php_doubleq = false;
$php_singleq = false;
$php_comment = false;
$php_star_comment = false;
$php_line_comment = false;
$php_st = "<" . "?";
$php_ed = "?" . ">";
if ($params["use_php_parser"] && substr($filesrc, 0, 2) == $php_st) {
$phpChunks = PHPParser::getPhpChunks($filesrc);
if (!empty($phpChunks)) {
$prolog = $phpChunks[0];
$filesrc = substr($filesrc, strlen($prolog));
}
} elseif (substr($filesrc, 0, 2) == $php_st) {
$fl = strlen($filesrc);
$p = 2;
while ($p < $fl) {
$ch2 = substr($filesrc, $p, 2);
$ch1 = substr($ch2, 0, 1);
if ($ch2 == $php_ed && !$php_doubleq && !$php_singleq && !$php_star_comment) {
$p += 2;
break;
} elseif (!$php_comment && $ch2 == "//" && !$php_doubleq && !$php_singleq) {
$php_comment = $php_line_comment = true;
$p++;
} elseif ($php_line_comment && ($ch1 == "\n" || $ch1 == "\r" || $ch2 == "?>")) {
$php_comment = $php_line_comment = false;
} elseif (!$php_comment && $ch2 == "/*" && !$php_doubleq && !$php_singleq) {
$php_comment = $php_star_comment = true;
$p++;
} elseif ($php_star_comment && $ch2 == "*/") {
$php_comment = $php_star_comment = false;
$p++;
} elseif (!$php_comment) {
if (($php_doubleq || $php_singleq) && $ch2 == "\\\\") {
$p++;
} elseif (!$php_doubleq && $ch1 == '"') {
$php_doubleq = true;
} elseif ($php_doubleq && $ch1 == '"' && substr($filesrc, $p - 1, 1) != '\\') {
$php_doubleq = false;
} elseif (!$php_doubleq) {
if (!$php_singleq && $ch1 == "'") {
$php_singleq = true;
} elseif ($php_singleq && $ch1 == "'" && substr($filesrc, $p - 1, 1) != '\\') {
$php_singleq = false;
}
}
}
$p++;
}
$prolog = substr($filesrc, 0, $p);
$filesrc = substr($filesrc, $p);
} elseif (preg_match("'(.*?<title>.*?</title>)(.*)\$'is", $filesrc, $reg)) {
$prolog = $reg[1];
$filesrc = $reg[2];
}
$title = PHPParser::getPageTitle($filesrc, $prolog);
$arPageProps = array();
if (strlen($prolog)) {
if (preg_match_all("'\\\$APPLICATION->SetPageProperty\\(([\"\\'])(.*?)(?<!\\\\)[\"\\'] *, *([\"\\'])(.*?)(?<!\\\\)[\"\\']\\);'i", $prolog, $out)) {
foreach ($out[2] as $i => $m1) {
$arPageProps[UnEscapePHPString($m1, $out[1][$i])] = UnEscapePHPString($out[4][$i], $out[3][$i]);
}
}
}
if (substr($filesrc, -2) == "?" . ">") {
if (isset($phpChunks) && count($phpChunks) > 1) {
$epilog = $phpChunks[count($phpChunks) - 1];
$filesrc = substr($filesrc, 0, -strlen($epilog));
} else {
$p = strlen($filesrc) - 2;
$php_start = "<" . "?";
while ($p > 0 && substr($filesrc, $p, 2) != $php_start) {
$p--;
}
$epilog = substr($filesrc, $p);
$filesrc = substr($filesrc, 0, $p);
}
}
return array("PROLOG" => $prolog, "TITLE" => $title, "PROPERTIES" => $arPageProps, "CONTENT" => $filesrc, "EPILOG" => $epilog);
}
