[Tiki-devel] A Unicode-aware replacement for the natcasesort() function

Volker Wysk <post-hhF2Jplw28UoZk/[email protected]> Fri, 07 Jul 2023 13:31:59 +0200

Newsgroups	gmane.comp.cms.tiki.devel
Message-ID	<[email protected]>

Hi!

Here it is:

----------------------------------------------------------------------------
// Do a natural, locale aware sort of an array of strings.
//
// "Natural" means that numbers are sorted by their value, not by the digits
// they contain. For instance, "10" is ordered after "2".
//
// The "lang" argument is the language for which to order. Accented
// characters, like "ä", are ordered with their non-accented counterpart, 
// like "a". In the non-locale aware natcasesort() function, accented 
// characters get ordered at the end. That's not right for non-English 
// languages.
//
// For the "lang" argument, "false" can be specified. In this case, the 
// function investigates the language of the current user and uses that.
//
// mb_natcasesort() depends on the "intl" PHP extension.

function mb_natcasesort(string $lang, array &$array): bool
{
    if ($lang == false) {
        $tikilib  = TikiLib::lib('tiki');
        $loginlib = TikiLib::lib('login');

        $user = $loginlib->getUser();
        $lang = $tikilib->get_language($user);
    }

    $coll = collator_create($lang);
    collator_set_attribute($coll, Collator::NUMERIC_COLLATION, 
                           Collator::ON);
    collator_set_attribute($coll, Collator::CASE_FIRST, 
                           Collator::LOWER_FIRST);
    collator_set_attribute($coll, Collator::ALTERNATE_HANDLING, 
                           Collator::SHIFTED);

    return collator_asort($coll, $array);
}
----------------------------------------------------------------------------

Any comments are welcome.

Regards,
Volker

_______________________________________________
TikiWiki-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/tikiwiki-devel

signature.asc (application/pgp-signature, 833 B)