<?php

/**
 * Swedish Stemmer
 *
 * Lightweight suffix-based stemmer for Swedish.
 *
 * @package ProRank\SEO\Modules\Content\InternalLinking\Parser\MultiLanguage\Languages
 * @since   1.0.0
 */

declare(strict_types=1);

namespace ProRank\SEO\Modules\Content\InternalLinking\Parser\MultiLanguage\Languages;

use ProRank\SEO\Modules\Content\InternalLinking\Parser\MultiLanguage\Stemmer;

if ( ! defined( 'ABSPATH' ) ) {
    exit;
}

class SwedishStemmer extends Stemmer {
    public function __construct() {
        parent::__construct('sv');
    }

    public function stem(string $word): string {
        $word = $this->normalize($word);
        if (strlen($word) <= 3) {
            return $word;
        }

        $suffixes = [
            'heterna', 'heten', 'elser', 'else', 'anden', 'ande',
            'ningar', 'ning', 'arna', 'erna', 'are', 'ast', 'ens',
            'ers', 'het', 'ing', 'en', 'ar', 'er', 'or', 's',
        ];

        foreach ($suffixes as $suffix) {
            if (str_ends_with($word, $suffix) && strlen($word) > strlen($suffix) + 2) {
                return substr($word, 0, -strlen($suffix));
            }
        }

        return $word;
    }
}
