<?php

if (!class_exists('wps_ic_url_key')) {
    include_once WPS_IC_DIR . 'traits/url_key.php';
}

class wps_criticalCss
{

    static public $API_URL = WPS_IC_CRITICAL_API_URL;
    static public $API_ASSETS_URL = WPS_IC_CRITICAL_API_ASSETS_URL;
    public static $url;
    private static $maxRetries = 5;
    public $urlKey;
    public $serverRequest;
    public $url_key_class;

    public function __construct($url = '')
    {
        if (empty($url)) {
            $url = $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];
        }

        self::$url = $url;

        if (!empty($_GET['debugCritical_replace'])) {
            $url = explode('?', $url);
            $url = $url[0];
        }

        $this->serverRequest = $url;

        $this->url_key_class = new wps_ic_url_key();
        $this->urlKey = $this->url_key_class->setup($url);
        $this->urlKey = ltrim($this->urlKey, '/');
        $this->createDirectory();

    }

    public function createDirectory()
    {
        if (!file_exists(WPS_IC_CRITICAL)) {
            mkdir(WPS_IC_CRITICAL);
        }
    }


    public function maxRetries()
    {
        $running = get_transient('wpc_critical_ajax_' . md5(self::$url));
        if ($running && $running >= self::$maxRetries) {
            return true;
        } else {
            return false;
        }
    }


    public function criticalRunning()
    {
        $running = get_transient('wpc_critical_ajax_' . md5(self::$url));
        if (empty($running) || !$running) {
            return false;
        } else {
            return true;
        }
    }

    public function saveCriticalWarmup($id, $url, $CritUrl, $mode)
    {

        $urlKey = $this->url_key_class->setup($url);
        $critical_path = WPS_IC_CRITICAL . $urlKey . '/';
        $cache = new wps_ic_cache_integrations();

        if (!function_exists('download_url')) {
            require_once(ABSPATH . 'wp-admin/includes/file.php');
        }

        $CSS = wp_remote_get($CritUrl, [
            'headers' => [
                'user-agent' => WPS_IC_API_USERAGENT
            ]
        ]);

        if (is_wp_error($CSS)) {
            // Get the error message
            $error_message = $CSS->get_error_message();

            // Optional: Get the error code
            $error_code = $CSS->get_error_code();

            // Send a JSON response with the error message and code
            wp_send_json_error([
                'msg' => 'Error downloading css file: ' . $error_message,
                'code' => $error_code, // Optional
                'url' => $url
            ]);
        }
        if (!file_exists($critical_path)) {
            mkdir($critical_path, 0777, true);
        }

        $fp = fopen($critical_path . 'critical_' . $mode . '.css', 'w+');
        fwrite($fp, wp_remote_retrieve_body($CSS));
        fclose($fp);

        $cache::purgeAll($urlKey, false, false, false);

        //remove criticalCombine temp folder
        $files = scandir(WPS_IC_COMBINE . $urlKey);
        foreach ($files as $file) {
            if ($file != "." && $file != "..") {
                $subdir = WPS_IC_COMBINE . $urlKey . "/" . $file;
                if (is_dir($subdir) && strpos($file, "criticalCombine") !== false) {
                    $this->removeDirectory($subdir);
                }
            }
        }
    }

    public static function removeDirectory($path)
    {
        $path = rtrim($path, '/');
        $files = glob($path . '/*');
        if (!empty($files)) {
            foreach ($files as $file) {
                is_dir($file) ? self::removeDirectory($file) : unlink($file);
            }
        }

        if (is_dir($path)) {
            rmdir($path);
        }
    }

    public function getCriticalPages()
    {
        $pages = [];

        $posts = get_posts(['posts_per_page' => '-1', 'post_type' => 'page']);
        $totalPosts = count($posts);

        $whatToShow = get_option('show_on_front');
        $homePage = get_option('page_on_front');
        $postsPage = get_option('page_on_posts');

        if ($whatToShow == 'page') {
            if (!empty($homePage)) {
                $post = get_post($homePage);
                $linkFull = get_permalink($post->ID);

                $link = $this->url_key_class->removeUrl($linkFull);
                $link = $this->url_key_class->createUrlKey($link);
                if (empty($link)) {
                    $link = 'index';
                }

                $criticalAssets = json_decode(get_post_meta($post->ID, 'wpc_critical_assets', true), true);

                $permalink = get_permalink($post->ID);

                if (file_exists(WPS_IC_CRITICAL . $link . '_critical.css')) {
                    $pages[$post->ID]['css'] = 'Done';
                } else {
                    $pages[$post->ID]['css'] = 'Not Generated';
                }

                if (!empty($criticalAssets)) {
                    $pages[$post->ID]['assets']['img'] = $criticalAssets['img'];
                    $pages[$post->ID]['assets']['js'] = $criticalAssets['js'];
                    $pages[$post->ID]['assets']['css'] = $criticalAssets['css'];
                } else {
                    $pages[$post->ID]['assets']['img'] = '0';
                    $pages[$post->ID]['assets']['js'] = '0';
                    $pages[$post->ID]['assets']['css'] = '0';
                }

                $pages[$post->ID]['title'] = $post->post_title;
                $pages[$post->ID]['link'] = $permalink;
                $pages[$post->ID]['pageRequest'] = $link;
            }
            if (!empty($postsPage)) {
                $post = get_post($postsPage);
                $linkFull = get_permalink($post->ID);

                $link = $this->url_key_class->removeUrl($linkFull);
                $link = $this->url_key_class->createUrlKey($link);
                if (empty($this->urlKey)) {
                    $link = 'index';
                }

                $criticalAssets = json_decode(get_post_meta($post->ID, 'wpc_critical_assets', true), true);

                $permalink = get_permalink($post->ID);
                if (file_exists(WPS_IC_CRITICAL . $link . '_critical.css')) {
                    $pages[$post->ID]['css'] = 'Done';
                } else {
                    $pages[$post->ID]['css'] = 'Not Generated';
                }

                if (!empty($criticalAssets)) {
                    $pages[$post->ID]['assets']['img'] = $criticalAssets['img'];
                    $pages[$post->ID]['assets']['js'] = $criticalAssets['js'];
                    $pages[$post->ID]['assets']['css'] = $criticalAssets['css'];
                } else {
                    $pages[$post->ID]['assets']['img'] = '0';
                    $pages[$post->ID]['assets']['js'] = '0';
                    $pages[$post->ID]['assets']['css'] = '0';
                }

                $pages[$post->ID]['title'] = $post->post_title;
                $pages[$post->ID]['link'] = urldecode($permalink);
                $pages[$post->ID]['pageRequest'] = $link;
            }
        } else {
            $siteUrl = home_url();
            if (!empty($siteUrl)) {
                $linkFull = $siteUrl;
                $link = $this->url_key_class->removeUrl($linkFull);
                $link = $this->url_key_class->createUrlKey($link);
                if (empty($this->urlKey)) {
                    $link = 'index';
                }

                $criticalAssets = json_decode(get_option('wpc_critical_assets_home'), true);

                if (file_exists(WPS_IC_CRITICAL . $link . '_critical.css')) {
                    $pages['home']['css'] = 'Done';
                } else {
                    $pages['home']['css'] = 'Not Generated';
                }

                if (!empty($criticalAssets)) {
                    $pages['home']['assets']['img'] = $criticalAssets['img'];
                    $pages['home']['assets']['js'] = $criticalAssets['js'];
                    $pages['home']['assets']['css'] = $criticalAssets['css'];
                } else {
                    $pages['home']['assets']['img'] = '0';
                    $pages['home']['assets']['js'] = '0';
                    $pages['home']['assets']['css'] = '0';
                }

                $pages['home']['title'] = 'Home Page';
                $pages['home']['link'] = urldecode($linkFull);
                $pages['home']['pageRequest'] = $link;
            }
        }

        if (!empty($posts)) {
            foreach ($posts as $post) {
                $linkFull = get_permalink($post->ID);

                if (rtrim($linkFull, '/') == rtrim(home_url())) {
                    $link = 'index';
                } else {
                    $link = $this->url_key_class->removeUrl($linkFull);
                    $link = $this->url_key_class->createUrlKey($link);
                }

                $criticalAssets = json_decode(get_post_meta($post->ID, 'wpc_critical_assets', true), true);

                $permalink = get_permalink($post->ID);

                if (file_exists(WPS_IC_CRITICAL . $link . '_critical.css')) {
                    $pages[$post->ID]['css'] = 'Done';
                } else {
                    $pages[$post->ID]['css'] = 'Not Generated';
                }

                if (!empty($criticalAssets)) {
                    $pages[$post->ID]['assets']['img'] = $criticalAssets['img'];
                    $pages[$post->ID]['assets']['js'] = $criticalAssets['js'];
                    $pages[$post->ID]['assets']['css'] = $criticalAssets['css'];
                } else {
                    $pages[$post->ID]['assets']['img'] = '0';
                    $pages[$post->ID]['assets']['js'] = '0';
                    $pages[$post->ID]['assets']['css'] = '0';
                }

                if ($homePage == $post->ID) {
                    $pageTitle = 'Home Page';
                } elseif ($postsPage == $post->ID) {
                    $pageTitle = 'Posts Page';
                } else {
                    $pageTitle = $post->post_title;
                }

                $pages[$post->ID]['title'] = $pageTitle;
                $pages[$post->ID]['link'] = urldecode($permalink);
                $pages[$post->ID]['pageRequest'] = $link;
            }
        }

        return $pages;
    }


    public function sendCriticalUrl($realUrl = '', $postID = 0, $timeout = 120)
    {
        while (ob_get_level()) {
            ob_end_clean();
        }
        ob_start();
        $type = 'meta';


        if (empty($realUrl)) {
            if ($postID === 'home' || !$postID || $postID == 0) {

                $homePage = get_option('page_on_front');
                $blogPage = get_option('page_for_posts');

                if (!$homePage) {
                    $post['post_name'] = 'Home';
                    $post = (object)$post;
                    $url = site_url();
                } else {
                    $post = get_post($homePage);
                    $url = get_permalink($homePage);
                }

                $pages[$postID] = urldecode($url);

                if ($blogPage !== 0 && $blogPage !== '0' && $blogPage !== $homePage) {
                    $post = get_post($blogPage);
                    $url = get_permalink($blogPage);
                }

                $pages[$postID] = urldecode($url);
            } else {
                $post = get_post($postID);
                $url = get_permalink($postID);
                $pages[$postID] = urldecode($url);
            }
            $url_key = $this->url_key_class->setup($url);
        } else {
            $pages[$postID] = urldecode($realUrl);
            $url_key = $this->url_key_class->setup($realUrl);
            $url = $realUrl;
        }

        if ($this->criticalExists()) {
            wp_send_json_success('Exists');
        }

        $url = rtrim($url, '?');

        $criticalAPI = get_transient('wpc_api_' . $postID);
        if (empty($criticalAPI)) {

            $this->initCritical($postID, $url, $url_key, $type, $pages);

        } else {

            $this->checkIsCriticalDone($criticalAPI, $postID, $url, $url_key, $type, $pages);

        }

    }

    public function criticalExists($returnDir = false)
    {
        if (!empty($_GET['debugCritical_replace'])) {
            return [WPS_IC_CRITICAL, $this->urlKey, 'file' => WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css', 'exists' => file_exists(WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css')];
        }

        $return = [];

        if (file_exists(WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css')) {
            if ($returnDir) {
                $return['desktop'] = WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css';
            } else {
                $return['desktop'] = WPS_IC_CRITICAL_URL . $this->urlKey . '/critical_desktop.css';
            }
        }

        if (file_exists(WPS_IC_CRITICAL . $this->urlKey . '/critical_mobile.css')) {
            if ($returnDir) {
                $return['mobile'] = WPS_IC_CRITICAL . $this->urlKey . '/critical_mobile.css';
            } else {
                $return['mobile'] = WPS_IC_CRITICAL_URL . $this->urlKey . '/critical_mobile.css';
            }
        }

        if (!isset($return['mobile']) || !isset($return['desktop'])) {
            return false;
        }

        return $return;
    }

    public function initCritical($postID, $url, $url_key, $type, $pages, $timeout = 120)
    {
        $requests = new wps_ic_requests();

        $args = ['v7' => 'true', 'url' => $url, 'pages' => json_encode($pages), 'apikey' => get_option(WPS_IC_OPTIONS)
        ['api_key']];

        $call = $requests->POST(self::$API_URL, $args, ['timeout' => $timeout]);
        $code = $requests->getResponseCode($call);

        if ($code == 200) {
            $body = $requests->getResponseBody($call);
            $json = json_decode($body, true);

            if (!empty($json['apiResults'])) {
                set_transient('wpc_api_' . $postID, $json['apiResults'], 60 * 15);
                wp_send_json_success(['msg' => 'transient set for ' . $postID, 'apikey' => get_option(WPS_IC_OPTIONS)
                ['api_key'], 'url' => $url, 'api' => $json['api']]);
            } else {
                if (!empty($body) && strlen($body) > 128) {
                    $this->saveCriticalCss($url_key, $body, $type);
                } else {
                    wp_send_json_error(['msg' => 'API returned empty response.', 'response body' => $body]);
                }
            }

        } else if (is_wp_error($call)) {
            $error_message = $requests->getErrorMessage($call);

            if (strpos($error_message, 'cURL error 28') !== false) {
                wp_send_json_error(['msg' => 'Request timeout, API is likely blocked.', 'error' => $error_message]);
            }

            wp_send_json_error(['msg' => 'Error code ' . $code, 'error' => $error_message]);
        } else {
            wp_send_json_error(['code' => $code]);
        }
    }


    public function isJson($string) {
        json_decode($string);
        return (json_last_error() === JSON_ERROR_NONE);
    }


    public function saveCriticalCssText($urlKey, $cssContent, $device = 'desktop', $type = 'meta')
    {

        $critical_path = WPS_IC_CRITICAL . $urlKey . '/';
        $cache = new wps_ic_cache_integrations();

        $criticalCSSPath = 'critical_desktop.css';
        if ($device == 'mobile') {
            $criticalCSSPath = 'critical_mobile.css';
        }


        if (!function_exists('download_url')) {
            require_once(ABSPATH . 'wp-admin/includes/file.php');
        }

        if (is_wp_error($cssContent) || empty($cssContent)) {

            // Send a JSON response with the error message and code
            wp_send_json_error([
                'msg' => 'Error downloading css content - empty API response',
            ]);
        }

        mkdir($critical_path, 0777, true);

        $fp = fopen($critical_path . $criticalCSSPath, 'w+');
        fwrite($fp, $cssContent);
        fclose($fp);

        //remove criticalCombine temp folder
        $files = scandir(WPS_IC_COMBINE . $urlKey);
        foreach ($files as $file) {
            if ($file != "." && $file != "..") {
                $subdir = WPS_IC_COMBINE . $urlKey . "/" . $file;
                if (is_dir($subdir) && strpos($file, "criticalCombine") !== false) {
                    $this->removeDirectory($subdir);
                }
            }
        }

        if (file_exists($critical_path . $criticalCSSPath) && filesize($critical_path . $criticalCSSPath) > 5) {
            if ($type == 'meta') {
                update_post_meta(sanitize_title($urlKey), 'wpc_critical_css', $critical_path . 'critical.css');
            } else {
                update_option('wps_critical_css_' . sanitize_title($urlKey), $critical_path . 'critical.css');
            }
        }

        $cache::purgeAll($urlKey, false, false, false);
    }


    public function saveCriticalCss($urlKey, $CSS, $type = 'meta')
    {
        $critical_path = WPS_IC_CRITICAL . $urlKey . '/';
        $cache = new wps_ic_cache_integrations();

        if (is_array($CSS)) {
            $json = $CSS;
        } else {
            $json = json_decode($CSS, true);
        }


        if (!function_exists('download_url')) {
            require_once(ABSPATH . 'wp-admin/includes/file.php');
        }

        if (!empty($json['server'])) {
            echo $json['server'];
        }

        if (!empty($json['hostname'])) {
            echo $json['hostname'];
        }

        $desktop = wp_remote_get($json['desktop'], [
            'headers' => [
                'user-agent' => WPS_IC_API_USERAGENT
            ]
        ]);

        $mobile = wp_remote_get($json['mobile'], [
            'headers' => [
                'user-agent' => WPS_IC_API_USERAGENT
            ]
        ]);

        if (is_wp_error($desktop)) {
            // Get the error message
            $error_message = $desktop->get_error_message();

            // Optional: Get the error code
            $error_code = $desktop->get_error_code();

            // Send a JSON response with the error message and code
            wp_send_json_error([
                'msg' => 'Error downloading css file: ' . $error_message,
                'code' => $error_code, // Optional
                'url' => $json['desktop']
            ]);
        }
        mkdir($critical_path, 0777, true);

        $fp = fopen($critical_path . 'critical_desktop.css', 'w+');
        fwrite($fp, wp_remote_retrieve_body($desktop));
        fclose($fp);

        if (is_wp_error($mobile)) {
            wp_send_json_error(['msg' => 'Error downloading css file.', 'url' => $json['mobile']]);
        }
        $fp = fopen($critical_path . 'critical_mobile.css', 'w+');
        fwrite($fp, wp_remote_retrieve_body($mobile));
        fclose($fp);

        //remove criticalCombine temp folder
        $files = scandir(WPS_IC_COMBINE . $urlKey);
        foreach ($files as $file) {
            if ($file != "." && $file != "..") {
                $subdir = WPS_IC_COMBINE . $urlKey . "/" . $file;
                if (is_dir($subdir) && strpos($file, "criticalCombine") !== false) {
                    $this->removeDirectory($subdir);
                }
            }
        }

        if (file_exists($critical_path . 'critical_desktop.css') && filesize($critical_path . 'critical_desktop.css') > 5) {
            if ($type == 'meta') {
                update_post_meta(sanitize_title($urlKey), 'wpc_critical_css', $critical_path . 'critical.css');
            } else {
                update_option('wps_critical_css_' . sanitize_title($urlKey), $critical_path . 'critical.css');
            }
        }

        $cache::purgeAll($urlKey, false, false, false);

    }

    public function checkIsCriticalDone($criticalAPI, $postID, $url, $url_key, $type, $pages, $timeout = 120)
    {
        $requests = new wps_ic_requests();

        $args = ['v7' => 'true', 'url' => $url, 'pages' => json_encode($pages), 'apikey' => get_option(WPS_IC_OPTIONS)
        ['api_key']];

        $call = $requests->GET($criticalAPI, $args, ['timeout' => $timeout]);

        if ($call) {
            $call = (array)$call;
            if (is_array($call) && !empty($call['desktop'])) {
                $this->saveCriticalCss($url_key, $call, $type);
            } else {
                //delete_transient('wpc_api_' . $postID);
                wp_send_json_error(['msg' => 'API Done returned empty response.', 'response body' => $call]);
            }

        } else {
            //delete_transient('wpc_api_' . $postID);
            wp_send_json_error(['code' => $call, 'api' => $criticalAPI]);
        }
    }


    public function criticalExistsAjax($url = '')
    {

        if (!empty($url)) {
            $this->urlKey = $this->url_key_class->setup($url);
        }

        if (file_exists(WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css')) {
            return WPS_IC_CRITICAL . $this->urlKey . '/critical_desktop.css';
        } else {
            return false;
        }
    }

    public function sendCriticalUrlGetAssets($url = '', $postID = 0)
    {
        global $post;
        $type = 'post_meta';

        if ($postID === 'home') {
            $url = home_url();
            $type = 'option';
        } elseif (!$postID || $postID == 0) {

            $homePage = get_option('page_on_front');
            $blogPage = get_option('page_for_posts');

            if (!$homePage) {
                $post['post_name'] = 'Home';
                $post = (object)$post;
                $url = site_url();
            } else {
                $post = get_post($homePage);
                $url = get_permalink($homePage);
            }

            if ($blogPage !== 0 && $blogPage !== '0' && $blogPage !== $homePage) {
                $post = get_post($blogPage);
                $url = get_permalink($blogPage);
            }
        } else {
            $post = get_post($postID);
            $url = get_permalink($postID);
        }


        $args = ['url' => $url];
        $call = wp_remote_post(self::$API_ASSETS_URL, ['timeout' => 300, 'body' => $args, 'sslverify' => false, 'user-agent' => WPS_IC_API_USERAGENT]);

        $body = wp_remote_retrieve_body($call);
        if (!empty($body)) {

            if ($type == 'post_meta') {
                update_post_meta($post->ID, 'wpc_critical_assets', $body);
            } else {
                update_option('wpc_critical_assets_home', $body);
            }

            return $body;
        } else {

            if ($type == 'post_meta') {
                update_post_meta($post->ID, 'wpc_critical_assets', 'unable');
            } else {
                update_option('wpc_critical_assets_home', 'unable');
            }

            return json_encode(['img' => 0, 'js' => 0, 'css' => 0]);
        }
    }

    public function generate_critical_cron()
    {
        $queue = get_option('critical_generator_cron');

        if ($queue) {
            foreach ($queue as $key => $url) {
                $this->serverRequest = $url;
                $this->urlKey = $key;
                if ($this->criticalExists()) {
                    unset($queue[$key]);
                    update_option('critical_generator_cron', $queue);
                    continue;
                }

                $this->generateCriticalAjax();
                unset($queue[$key]);
                update_option('critical_generator_cron', $queue);
            }
        }
    }

    public function generateCriticalAjax()
    {
        $args = ['pages' => urldecode(json_encode(['ajax' => $this->serverRequest]))];

        $call = wp_remote_post(self::$API_URL, ['timeout' => 300, 'body' => $args, 'sslverify' => false, 'user-agent' => WPS_IC_API_USERAGENT]);

        $body = wp_remote_retrieve_body($call);

        if (!empty($body) && strlen($body) > 128) {
            $this->saveCriticalCss($this->urlKey, $body);
        }
    }

}