<?php
/*
 * Copyright (c) 2025 AltumCode (https://altumcode.com/)
 *
 * This software is licensed exclusively by AltumCode and is sold only via https://altumcode.com/.
 * Unauthorized distribution, modification, or use of this software without a valid license is not permitted and may be subject to applicable legal actions.
 *
 * 🌍 View all other existing AltumCode projects via https://altumcode.com/
 * 📧 Get in touch for support or general queries via https://altumcode.com/contact
 * 📤 Download the latest version via https://altumcode.com/downloads
 *
 * 🐦 X/Twitter: https://x.com/AltumCode
 * 📘 Facebook: https://facebook.com/altumcode
 * 📸 Instagram: https://instagram.com/altumcode
 */

namespace Altum\Controllers;

use Altum\Alerts;
use Altum\Language;

defined('ALTUMCODE') || die();

class AdminLanguageUpdate extends Controller {

    public function index() {

        $language_name = isset($this->params[0]) ? $this->params[0] : null;
        $type = isset($this->params[1]) && in_array($this->params[1], ['app', 'admin']) ? $this->params[1] : null;

        /* Check if language exists */
        if(!isset(Language::$languages[$language_name])) {
            redirect('admin/languages');
        }

        /* Make sure to load up in memory the language that is being edited and the main language */
        Language::get(Language::$main_name);
        Language::get($language_name);

        $language = Language::$languages[$language_name];

        /* count placeholders: numbered -> unique indexes; unnumbered -> exact occurrences */
        function count_matched_translation_variables($string) {
            /* ensure string */
            $safe_string = (string) ($string ?? '');

            /* numbered placeholders like %1$s, %2$s... */
            preg_match_all('/%(\d+)\$s/', $safe_string, $numbered_matches);
            if (!empty($numbered_matches[1])) {
                /* allow repeats of the same index -> count unique indexes only */
                $unique_indexes = array_unique(array_map('intval', $numbered_matches[1]));
                return count($unique_indexes);
            }

            /* unnumbered placeholders like %s (ignore %%s) */
            preg_match_all('/(?<!%)%s/', $safe_string, $unnumbered_matches);
            return count($unnumbered_matches[0] ?? []);
        }

        if(!empty($_POST)) {
            /* Clean some posted variables */
            $_POST['language_name'] = input_clean(preg_replace('/\s{2,}/', ' ', trim($_POST['language_name']), 64));
            $_POST['language_code'] = mb_strtolower(input_clean(preg_replace("/\s+/", '', $_POST['language_code'], 16)));
            $_POST['language_flag'] = mb_substr(trim(input_clean($_POST['language_flag'])), 0, 4, 'UTF-8');
            $_POST['status'] = (int) isset($_POST['status']);
            $_POST['order'] = (int) $_POST['order'];

            /* New language strings content for the translation files */
            $language_strings = '';
            $admin_language_strings = '';

            /* Go through each keys of the original translation file */
            foreach(\Altum\Language::$languages[\Altum\Language::$main_name]['content'] as $key => $value) {
                $form_key = str_replace('.', 'ALTUM', $key);

                /* Check for already existing original translation value */

                /* Check if new translation for the field is submitted */
                if(!empty($_POST[$form_key])) {
                    $values[$form_key] = $_POST[$form_key];
                    $_POST[$form_key] = addcslashes($_POST[$form_key], "'");

                    /* Make sure the new translated string contains the required variables if existing */
                    $translated_string = $_POST[$form_key];
                    $original_translation_string = addcslashes(\Altum\Language::$languages[\Altum\Language::$main_name]['content'][$key], "'");

                    /* Revert to default if the required variables are not introduced */
                    if(count_matched_translation_variables($translated_string) != count_matched_translation_variables($original_translation_string)) {
                        $_POST[$form_key] = $original_translation_string;
                    }

                    if(string_starts_with('admin_', $key)) {
                        $admin_language_strings .= "\t'{$key}' => '{$_POST[$form_key]}',\n";
                    } else {
                        $language_strings .= "\t'{$key}' => '{$_POST[$form_key]}',\n";
                    }
                }

                /* Check if the translation already exists in the file, if not submitted in the form */
                else {
                    $translation_exists = array_key_exists($key, $language['content']);

                    /* Do not allow removing of translations for the main default one */
                    if($translation_exists && $_POST['language_name'] == Language::$main_name) {
                        $potential_already_existing_value = addcslashes($language['content'][$key], "'");

                        if(string_starts_with('admin_', $key)) {
                            $admin_language_strings .= "\t'{$key}' => '{$potential_already_existing_value}',\n";
                        } else {
                            $language_strings .= "\t'{$key}' => '{$potential_already_existing_value}',\n";
                        }
                    }
                }
            }

            /* Check for custom submitted keys */
            if(!empty($_POST['translation_key']) && !empty($_POST['translation_value'])) {
                foreach($_POST['translation_key'] as $key => $value) {
                    if(empty($value)) continue;
                    if(empty($_POST['translation_value'][$key])) continue;
                    if(array_key_exists($value, \Altum\Language::$languages[\Altum\Language::$main_name]['content'])) continue;

                    $translation_value = addcslashes($_POST['translation_value'][$key], "'");
                    $language_strings .= "\t'{$value}' => '{$translation_value}',\n";
                }
            }

            $language_content = function($language_strings) {
                return <<<ALTUM
<?php

return [
{$language_strings}
];
ALTUM;
            };

            //ALTUMCODE:DEMO if(DEMO) Alerts::add_error('This command is blocked on the demo.');

            /* Check for any errors */
            $required_fields = ['language_name', 'language_code'];
            foreach($required_fields as $field) {
                if(!isset($_POST[$field]) || trim($_POST[$field]) === '') {
                    Alerts::add_field_error($field, l('global.error_message.empty_field'));
                }
            }

            if(!is_writable(Language::$path)) {
                Alerts::add_error(sprintf(l('global.error_message.directory_not_writable'), Language::$path));
            }

            if(!is_writable(Language::$path . 'admin/')) {
                Alerts::add_error(sprintf(l('global.error_message.directory_not_writable'), Language::$path . 'admin/'));
            }

            if(($_POST['language_name'] != $language_name && in_array($_POST['language_name'], Language::$languages))) {
                Alerts::add_error(sprintf(l('admin_languages.error_message.language_exists'), $_POST['language_name'], $_POST['language_code']));
            }

            if($_POST['language_code'] != $language['code']) {
                foreach(Language::$languages as $lang) {
                    if($lang['code'] == $_POST['language_code']) {
                        Alerts::add_error(sprintf(l('admin_languages.error_message.language_exists'), $_POST['language_name'], $_POST['language_code']));
                        break;
                    }
                }
            }

            /* If there are no errors, continue */
            if(!Alerts::has_field_errors() && !Alerts::has_errors()) {
                function safe_direct_file_write($file_path, $file_content, $file_permissions = 0777) {
                    /* attempt to write content directly to file */
                    file_put_contents($file_path, $file_content);

                    /* clear PHP's file status cache */
                    clearstatcache(true, $file_path);

                    /* invalidate opcache if enabled */
                    if(function_exists('opcache_invalidate')) {
                        opcache_invalidate($file_path, true);
                    }

                    /* set file permissions */
                    chmod($file_path, $file_permissions);

                    return true;
                }

                switch($type) {
                    case 'app':
                        $language_file_path = Language::$path . $_POST['language_name'] . '#' . $_POST['language_code'] . '.php';
                        safe_direct_file_write($language_file_path, $language_content($language_strings));
                        break;

                    case 'admin':
                        $admin_language_file_path = Language::$path . 'admin/' . $_POST['language_name'] . '#' . $_POST['language_code'] . '.php';
                        safe_direct_file_write($admin_language_file_path, $language_content($admin_language_strings));
                        break;

                    default:

                        /* Change the name of the file if needed */
                        if($_POST['language_code'] != $language['code'] || $_POST['language_name'] != $language['name']) {
                            if(file_exists(Language::$path . $language['name'] . '#' . $language['code'] . '.php')) {
                                rename(Language::$path . $language['name'] . '#' . $language['code'] . '.php', Language::$path . $_POST['language_name'] . '#' . $_POST['language_code'] . '.php');
                                rename(Language::$path . 'admin/' . $language['name'] . '#' . $language['code'] . '.php', Language::$path . 'admin/' . $_POST['language_name'] . '#' . $_POST['language_code'] . '.php');
                            }
                        }

                        /* Update all languages in the settings table */
                        $settings_languages = [];
                        foreach(Language::$languages as $lang) {
                            $settings_languages[$lang['name']] = [
                                'status' => $lang['name'] == $_POST['language_name'] ? $_POST['status'] : (settings()->languages->{$lang['name']}->status ?? true),
                                'order' => $lang['name'] == $_POST['language_name'] ? $_POST['order'] : (settings()->languages->{$lang['name']}->order ?? 1),
                                'language_flag' => $lang['name'] == $_POST['language_name'] ? $_POST['language_flag'] : (settings()->languages->{$lang['name']}->language_flag ?? ''),
                            ];
                        }

                        /* Update the database */
                        db()->where('`key`', 'languages')->update('settings', ['value' => json_encode($settings_languages)]);

                        /* Auto update the used language across other resources if needed */
                        if($_POST['language_name'] != $language['name']) {
                            db()->where('language', $_POST['language_name'])->update('pages_categories', [
                                'language' => $_POST['language_name'],
                            ]);

                            db()->where('language', $_POST['language_name'])->update('pages', [
                                'language' => $_POST['language_name'],
                            ]);

                            db()->where('language', $_POST['language_name'])->update('blog_posts_categories', [
                                'language' => $_POST['language_name'],
                            ]);

                            db()->where('language', $_POST['language_name'])->update('blog_posts', [
                                'language' => $_POST['language_name'],
                            ]);

                            db()->where('language', $_POST['language_name'])->update('users', [
                                'language' => $_POST['language_name'],
                            ]);

                            if($language['name'] == settings()->main->default_language) {
                                settings()->main->default_language = $_POST['language_name'];

                                /* Update the database */
                                db()->where('`key`', 'main')->update('settings', ['value' => json_encode(settings()->main)]);
                            }

                            /* Clear the cache */
                            cache()->clear();
                        }

                        /* Clear the cache */
                        cache()->deleteItem('settings');

                        break;
                }

                /* Clear the language cache */
                \Altum\Language::clear_cache();

                /* Set a nice success message */
                Alerts::add_success(sprintf(l('global.success_message.update1'), '<strong>' . $_POST['language_name'] . '</strong>'));

                /* Redirect */
                redirect('admin/language-update/' . replace_space_with_plus($_POST['language_name']) . '/' . $type);
            }

        }

        /* Main View */
        $data = [
            'language' => $language,
            'type' => $type,
        ];

        $view = new \Altum\View('admin/language-update/index', (array) $this);

        $this->add_view_content('content', $view->run($data));

    }

}
