<?php namespace {скрыто}\PhpMorphy\Helpers;

use phpMorphy;
use phpMorphy_Exception;
use Log;

require_once(base_path('{скрыто}/phpmorphy/common.php'));

class Morphy
{
    const MORPHY_PATH = '{скрыто}/phpmorphy';

    const MORPHY_SKEEP_WORD_END_WITH = ['кабардино', 'карачаево', 'ханты', 'ямало']; //Пропускать слова, которые заканчиваются на один из элементов массива
    const MORPHY_SKEEP_WORD_DELIMS = ['-']; //Разделители при нахождении которых преобразуем фразу по каждому слову отдельно

    /**
     * Создание класса Morphy с настройками
     *
     * @return phpMorphy|void
     */
    public static function getMorphy(){
        try {
            $dir = base_path(self::MORPHY_PATH) . '/dicts';
            $lang = 'ru_RU';
            $opts = array(
                // storage type, follow types supported
                // PHPMORPHY_STORAGE_FILE - use file operations(fread, fseek) for dictionary access, this is very slow...
                // PHPMORPHY_STORAGE_SHM - load dictionary in shared memory(using shmop php extension), this is preferred mode
                // PHPMORPHY_STORAGE_MEM - load dict to memory each time when phpMorphy intialized, this useful when shmop ext. not activated. Speed same as for PHPMORPHY_STORAGE_SHM type
                'storage' => PHPMORPHY_STORAGE_MEM,
                'predict_by_suffix' => true,
                'predict_by_db' => true,
                'graminfo_as_text' => true,
            );
            return new phpMorphy($dir, $lang, $opts);
        } catch(phpMorphy_Exception $e) {
            log::error('Morphy::getMorphy(): Error occured while creating phpMorphy instance: ' . $e->getMessage());
        }
    }

    /**
     * Получение существительного для числового обозначения
     * Пример: 3 вакансии, 5 вакансий, 1 заявление
     *
     * @param $count
     * @param string $word
     * @param null $morphy
     * @return string
     */
    public static function getMorphedCount($count, string $word, $morphy = null): string
    {
        if (empty($morphy)) $morphy = self::getMorphy();
        $word = mb_strtoupper($word);
        $one = $morphy->castFormByGramInfo($word, null, ['ЕД', 'ИМ'], true)[0] ?? '';
        $twoFour = $morphy->castFormByGramInfo($word, null, ['ЕД', 'РД'], true)[0] ?? '';
        $fiveZero = $morphy->castFormByGramInfo($word, null, ['МН', 'РД'], true)[0] ?? '';
        switch (substr($count, -1)) {
            case '1': $countStr = $one; break;
            case '2':
            case '3':
            case '4': $countStr = $twoFour; break;
            case '5':
            case '6':
            case '7':
            case '8':
            case '9':
            case '0':
            default: $countStr = $fiveZero;
        }
        return mb_strtolower($countStr);
    }

    /**
     * Преобразование слова к указанному падежу и численности
     *
     * @param $morphy
     * @param string $word
     * @param array $gramInfo
     * @return string
     */
    public static function getMorphed($morphy, string $word, array $gramInfo): string
    {
        try {
            $delims = collect(self::MORPHY_SKEEP_WORD_DELIMS);

            $word = str_replace(' - ', '-', $word);

            $delimsFounded = $delims->filter(function ($delim) use ($word){ return mb_strpos($word, $delim) !== false; });

            if ($delimsFounded->count() > 0){
                //Преобразование фразы, делаем каждое слово отдельно
                $resultWord = '';
                $delimsFounded->each(function ($delim) use ($word, &$result, $morphy, $gramInfo, &$resultWord){
                    $result = [];
                    collect(explode($delim, $word))->each(function ($word) use (&$result, $morphy, $gramInfo){
                        $result[] = self::isWordEndWithSkipArr($word) ? $word : ($morphy->castFormByGramInfo(mb_strtoupper($word), null, $gramInfo, true)[0]??'');
                    });
                    $resultWord = implode($delim, $result);
                });
                return mb_strtolower($resultWord);
            } else {
                //Преобразование слова
                return mb_strtolower($morphy->castFormByGramInfo(mb_strtoupper($word), null, $gramInfo, true)[0] ?? '');
            }
        } catch (\Throwable $err) {
            \Illuminate\Support\Facades\Log::error('Morphy::getMorphed(): EXCEPTION. $word: '.$word.' $gramInfo: '.json_encode($gramInfo).' '.$err->getMessage(), ['ERROR' => $err->getMessage(), 'TRACE' => $err->getTrace()]);
            return '';
        }
    }

    /**
     * Проверка, заканчивается ли слово на одно из значений массива
     *
     * @param $word
     * @return bool
     */
    public static function isWordEndWithSkipArr($word){
        return collect(self::MORPHY_SKEEP_WORD_END_WITH)->filter(function ($skipLetter) use ($word){
                return ends_with(mb_strtolower($word), mb_strtolower($skipLetter));
            })->count() > 0;
    }

    /**
     * Привести первую буква слова к верхнему регистру в кодировке UTF-8
     *
     * @param $text
     * @return string
     */
    public static function mb_ucfirst($text): string
    {
        try {
            $text = mb_strtolower($text);
            return mb_strtoupper(mb_substr($text, 0, 1)) . mb_substr($text, 1);
        } catch (\Throwable $err) {
            \Illuminate\Support\Facades\Log::error('Morphy::mb_ucfirst(): EXCEPTION. $text: '.$text.' '.$err->getMessage(), ['ERROR' => $err->getMessage(), 'TRACE' => $err->getTrace()]);
            return '';
        }
    }

    /**
     * Привести первую букву каждого слова в строке к верхнему регистру в кодировке UTF-8
     *
     * @param $text
     * @return string
     */
    public static function mb_ucwords($text): string
    {
        try {
            $text = mb_strtolower($text);
            $result = [];
            collect(explode(' ', $text))->each(function ($word) use (&$result) {
                $result[] = self::mb_ucfirst($word);
            });
            return implode(' ', $result);
        } catch (\Throwable $err) {
            \Illuminate\Support\Facades\Log::error('Morphy::mb_ucwords(): EXCEPTION. $text: '.$text.' '.$err->getMessage(), ['ERROR' => $err->getMessage(), 'TRACE' => $err->getTrace()]);
            return '';
        }
    }

    public static function getMorphedRegionName($morphy, string $regionName, bool $addV = true)
    {
        //В республике
        if (mb_strpos($regionName, ' ') === false) return $regionName;

        $regionName = mb_strtoupper(str_replace(' — ','-', $regionName));

        $result = $regionName;
        $regionArr = explode(' ', $regionName);

        $v = $addV ? 'в ' : '';

        if (mb_strpos($regionName, 'РЕСПУБЛИКА') !== false){
            if (starts_with($regionName, 'РЕСПУБЛИКА')){
                //Республика Крым -> в республике Крым
                $result = $v.'республике '.Morphy::mb_ucfirst(mb_strtolower(str_replace('РЕСПУБЛИКА ', '', $regionName)));
            } else {
                //Чувашская Республика -> в Чувашской республике
                $result = $v.Morphy::mb_ucfirst(Morphy::getMorphed($morphy, $regionArr[0], ['ЕД', 'ЖР', 'РД'])).' республике';
            }

        } elseif (mb_strpos($regionName, 'КРАЙ') !== false){
            //Алтайский край -> в Алтайском крае
            $result = $v.Morphy::mb_ucfirst(Morphy::getMorphed($morphy, $regionArr[0], ['ЕД', 'МР', 'ПР'])).' крае';
        } elseif (mb_strpos($regionName, 'АВТОНОМНАЯ ОБЛАСТЬ') !== false){
            //в Еврейской автономной области
            $result = $v.Morphy::mb_ucfirst(Morphy::getMorphed($morphy, $regionArr[0], ['ЕД', 'ЖР', 'РД'])).' автономной области';
        } elseif (mb_strpos($regionName, 'ОБЛАСТЬ') !== false){
            //в Архангельской области
            $result = $v.Morphy::mb_ucfirst(Morphy::getMorphed($morphy, $regionArr[0], ['ЕД', 'ЖР', 'РД'])).' области';
        } elseif (mb_strpos($regionName, 'АВТОНОМНЫЙ ОКРУГ') !== false){
            //в Ханты-Мансийском автономном округе
            $result = $v.Morphy::mb_ucfirst(Morphy::getMorphed($morphy, $regionArr[0], ['ЕД', 'МР', 'ПР'])).' автономном округе';
        }

        return $result;
    }
}

     /**
     * Генерим SOE данные для группы вакансий
     *
     * @return array
     */
    public function getSeoDataForGroup($morphy, $count, $groupName, $regionName): array
    {
        // Хотим на выходе:
        // title: Работа биоинженером в России, 175 уникальных вакансий
        // h1: Работа биоинженером в России, 175 вакансий
        // description: Работа в АПК. Свежие вакансии биоинженера в России от прямых работодателей. Мы собрали 175 уникальных вакансий.
        // keywords: работа биоинженером, вакансии биоинженера, вакансии ассистента биоинженера, работа ассистентом биоинженера, вакансии биоинженер

        $groupName = mb_strtolower($groupName);
        $regionName = mb_strtolower($regionName);

        $groupNameTV = Morphy::getMorphed($morphy, $groupName, ['ЕД', 'ТВ']); //кем - биоинженером - Творительный падеж
        $groupNameVN = Morphy::getMorphed($morphy, $groupName, ['ЕД', 'ВН']); //кого - биоинженера - Винительный падеж

        $regionNameV = Morphy::getMorphedRegionName($morphy, $regionName);

        $countStr = Morphy::getMorphedCount($count, 'вакансия', $morphy);

        $titlePart = "Работа $groupNameTV $regionNameV, $count"; //Работа биоинженером в России, 175
        $descripton = "Работа в АПК. Свежие вакансии $groupNameVN $regionNameV от прямых работодателей. Мы собрали $count уникальных $countStr.";
        $keywords = "работа $groupNameTV, вакансии $groupNameVN, вакансии ассистента $groupNameVN, работа ассистентом $groupNameVN, вакансии $groupName";


        return [
            'seo_title'         => "$titlePart уникальных $countStr",
            'seo_h1'            => "$titlePart $countStr",
            'seo_description'   => $descripton,
            'seo_keywords'      => $keywords
        ];
    }