$tablerows[] = array(strip_tags($strblockname), $row); // first element will be used for sorting
}
- textlib_get_instance()->asort($tablerows);
+ collatorlib::asort($tablerows);
foreach ($tablerows as $row) {
$table->add_data($row[1]);
}
}
$plugins[$plugin] = $strpluginname;
}
-textlib_get_instance()->asort($plugins);
+collatorlib::asort($plugins);
foreach ($plugins as $plugin => $name) {
$delete = new moodle_url($PAGE->url, array('delete' => $plugin, 'sesskey' => sesskey()));
$mform->addHelpButton('urlstring', 'siteurl', 'hub');
$languages = get_string_manager()->get_list_of_languages();
- textlib_get_instance()->asort($languages);
+ collatorlib::asort($languages);
$mform->addElement('select', 'language', get_string('sitelang', 'hub'),
$languages);
$mform->setType('language', PARAM_ALPHANUMEXT);
}
}
- textlib_get_instance()->asort($modfullnames);
+ collatorlib::asort($modfullnames);
foreach ($modfullnames as $modname => $modfullname) {
if ($modname === 'resources') {
$mform->setDefault('licence', $licence);
$languages = get_string_manager()->get_list_of_languages();
- textlib_get_instance()->asort($languages);
+ collatorlib::asort($languages);
$languages = array_merge(array('all' => get_string('any')), $languages);
$mform->addElement('select', 'language', get_string('language'), $languages);
$mform->setDefault('language', $language);
$themes=array();
$themes[''] = get_string('forceno');
foreach ($themeobjects as $key=>$theme) {
- $themes[$key] = $theme->name;
+ if (empty($theme->hidefromselector)) {
+ $themes[$key] = get_string('pluginname', 'theme_'.$theme->name);
+ }
}
$mform->addElement('select', 'theme', get_string('forcetheme'), $themes);
}
$themes = array(''=>get_string('forceno'));
$allthemes = get_list_of_themes();
foreach ($allthemes as $key=>$theme) {
- $themes[$key] = $theme->name;
+ if (empty($theme->hidefromselector)) {
+ $themes[$key] = get_string('pluginname', 'theme_'.$theme->name);
+ }
}
$mform->addElement('select', 'theme', get_string('forcetheme'), $themes);
}
$modnamesplural[$mod->name] = get_string("modulenameplural", "$mod->name");
}
}
- textlib_get_instance()->asort($modnames);
+ collatorlib::asort($modnames);
} else {
print_error("nomodules", 'debug');
}
$modnamesused[$mod->modname] = $modnames[$mod->modname];
}
if ($modnamesused) {
- textlib_get_instance()->asort($modnamesused);
+ collatorlib::asort($modnamesused);
}
}
}
$mform->addHelpButton('description', 'description', 'hub');
$languages = get_string_manager()->get_list_of_languages();
- textlib_get_instance()->asort($languages);
+ collatorlib::asort($languages);
$mform->addElement('select', 'language', get_string('language'), $languages);
$mform->setDefault('language', $defaultlanguage);
$mform->addHelpButton('language', 'language', 'hub');
$menu[$block->name] = $blockobject->get_title();
}
}
- textlib_get_instance()->asort($menu);
+ collatorlib::asort($menu);
$actionurl = new moodle_url($page->url, array('sesskey'=>sesskey()));
$select = new single_select($actionurl, 'bui_addblock', $menu, null, array(''=>get_string('adddots')), 'add_block');
}
}
}
- textlib_get_instance()->asort($filternames);
+ collatorlib::asort($filternames);
return $filternames;
}
foreach ($categories as $category) {
$cats[$category->id] = $category->get_name();
}
- textlib_get_instance()->asort($cats);
+ collatorlib::asort($cats);
return ($result+$cats);
}
}
$countries = $this->load_component_strings('core_countries', $lang);
- textlib_get_instance()->asort($countries);
+ collatorlib::asort($countries);
if (!$returnall and !empty($CFG->allcountrycodes)) {
$enabled = explode(',', $CFG->allcountrycodes);
$return = array();
if (!empty($CFG->langcache) and !empty($this->menucache)) {
// cache the list so that it can be used next time
- textlib_get_instance()->asort($languages);
+ collatorlib::asort($languages);
file_put_contents($this->menucache, json_encode($languages));
}
}
- textlib_get_instance()->asort($languages);
+ collatorlib::asort($languages);
return $languages;
}
/**
* Returns a list of valid and compatible themes
*
- * @global object
* @return array
*/
function get_list_of_themes() {
$theme = theme_config::load($themename);
$themes[$themename] = $theme;
}
- asort($themes);
+
+ collatorlib::asort_objects_by_method($themes, 'get_theme_name');
return $themes;
}
}
return $regions;
}
+
+ /**
+ * Returns the human readable name of the theme
+ *
+ * @return string
+ */
+ public function get_theme_name() {
+ return get_string('pluginname', 'theme_'.$this->name);
+ }
}
}
}
- textlib_get_instance()->asort($fileformatnames);
+ collatorlib::asort($fileformatnames);
return $fileformatnames;
}
$this->assertIdentical(textlib::strtotitle($str), "Žluťoučký Koníček");
}
- public function test_asort() {
- global $SESSION;
- $SESSION->lang = 'en'; // make sure we test en language to get consistent results, hopefully all systems have this locale
-
- $arr = array('b'=>'ab', 1=>'aa', 0=>'cc');
- textlib::asort($arr);
- $this->assertIdentical(array_keys($arr), array(1, 'b', 0));
- $this->assertIdentical(array_values($arr), array('aa', 'ab', 'cc'));
-
- if (extension_loaded('intl')) {
- $error = 'Collation aware sorting not supported';
- } else {
- $error = 'Collation aware sorting not supported, PHP extension "intl" is not available.';
- }
-
- $arr = array('a'=>'áb', 'b'=>'ab', 1=>'aa', 0=>'cc');
- textlib::asort($arr);
- $this->assertIdentical(array_keys($arr), array(1, 'b', 'a', 0), $error);
-
- unset($SESSION->lang);
- }
-
public function test_deprecated_textlib_get_instance() {
$textlib = textlib_get_instance();
$this->assertIdentical($textlib->substr('abc', 1, 1), 'b');
$this->assertIdentical($textlib->strtotitle('abc ABC'), 'Abc Abc');
}
}
+
+/**
+ * Unit tests for our utf-8 aware collator.
+ *
+ * Used for sorting.
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class collatorlib_test extends UnitTestCase {
+
+ protected $initiallang = null;
+ protected $error = null;
+
+ public function setUp() {
+ global $SESSION;
+ if (isset($SESSION->lang)) {
+ $this->initiallang = $SESSION->lang;
+ }
+ $SESSION->lang = 'en'; // make sure we test en language to get consistent results, hopefully all systems have this locale
+ if (extension_loaded('intl')) {
+ $this->error = 'Collation aware sorting not supported';
+ } else {
+ $this->error = 'Collation aware sorting not supported, PHP extension "intl" is not available.';
+ }
+ parent::setUp();
+ }
+ public function tearDown() {
+ global $SESSION;
+ parent::tearDown();
+ if ($this->initiallang !== null) {
+ $SESSION->lang = $this->initiallang;
+ $this->initiallang = null;
+ } else {
+ unset($SESSION->lang);
+ }
+ }
+ function test_asort() {
+ $arr = array('b' => 'ab', 1 => 'aa', 0 => 'cc');
+ collatorlib::asort($arr);
+ $this->assertIdentical(array_keys($arr), array(1, 'b', 0));
+ $this->assertIdentical(array_values($arr), array('aa', 'ab', 'cc'));
+
+ $arr = array('a' => 'áb', 'b' => 'ab', 1 => 'aa', 0=>'cc');
+ collatorlib::asort($arr);
+ $this->assertIdentical(array_keys($arr), array(1, 'b', 'a', 0), $this->error);
+ $this->assertIdentical(array_values($arr), array('aa', 'ab', 'áb', 'cc'), $this->error);
+ }
+ function test_asort_objects_by_method() {
+ $objects = array(
+ 'b' => new string_test_class('ab'),
+ 1 => new string_test_class('aa'),
+ 0 => new string_test_class('cc')
+ );
+ collatorlib::asort_objects_by_method($objects, 'get_protected_name');
+ $this->assertIdentical(array_keys($objects), array(1, 'b', 0));
+ $this->assertIdentical($this->get_ordered_names($objects, 'get_protected_name'), array('aa', 'ab', 'cc'));
+
+ $objects = array(
+ 'a' => new string_test_class('áb'),
+ 'b' => new string_test_class('ab'),
+ 1 => new string_test_class('aa'),
+ 0 => new string_test_class('cc')
+ );
+ collatorlib::asort_objects_by_method($objects, 'get_private_name');
+ $this->assertIdentical(array_keys($objects), array(1, 'b', 'a', 0), $this->error);
+ $this->assertIdentical($this->get_ordered_names($objects, 'get_private_name'), array('aa', 'ab', 'áb', 'cc'), $this->error);
+ }
+ function test_asort_objects_by_property() {
+ $objects = array(
+ 'b' => new string_test_class('ab'),
+ 1 => new string_test_class('aa'),
+ 0 => new string_test_class('cc')
+ );
+ collatorlib::asort_objects_by_property($objects, 'publicname');
+ $this->assertIdentical(array_keys($objects), array(1, 'b', 0));
+ $this->assertIdentical($this->get_ordered_names($objects, 'publicname'), array('aa', 'ab', 'cc'));
+
+ $objects = array(
+ 'a' => new string_test_class('áb'),
+ 'b' => new string_test_class('ab'),
+ 1 => new string_test_class('aa'),
+ 0 => new string_test_class('cc')
+ );
+ collatorlib::asort_objects_by_property($objects, 'publicname');
+ $this->assertIdentical(array_keys($objects), array(1, 'b', 'a', 0), $this->error);
+ $this->assertIdentical($this->get_ordered_names($objects, 'publicname'), array('aa', 'ab', 'áb', 'cc'), $this->error);
+ }
+ protected function get_ordered_names($objects, $methodproperty = 'get_protected_name') {
+ $return = array();
+ foreach ($objects as $object) {
+ if ($methodproperty == 'publicname') {
+ $return[] = $object->publicname;
+ } else {
+ $return[] = $object->$methodproperty();
+ }
+ }
+ return $return;
+ }
+}
+/**
+ * Simple class used to work with the unit test.
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class string_test_class extends stdClass {
+ public $publicname;
+ protected $protectedname;
+ private $privatename;
+ public function __construct($name) {
+ $this->publicname = $name;
+ $this->protectedname = $name;
+ $this->privatename = $name;
+ }
+ public function get_protected_name() {
+ return $this->protectedname;
+ }
+ public function get_private_name() {
+ return $this->publicname;
+ }
+}
\ No newline at end of file
/**
* Locale aware sorting, the key associations are kept, values are sorted alphabetically.
*
- * Note: this function is using current moodle locale.
+ * @param array $arr array to be sorted (reference)
+ * @param int $sortflag One of Collator::SORT_REGULAR, Collator::SORT_NUMERIC, Collator::SORT_STRING
+ * @return void modifies parameter
+ */
+ public static function asort(array &$arr, $sortflag = null) {
+ debugging('textlib::asort has been superseeded by collatorlib::asort please upgrade your code to use that', DEBUG_DEVELOPER);
+ collatorlib::asort($arr, $sortflag);
+ }
+}
+
+/**
+ * A collator class with static methods that can be used for sorting.
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+abstract class collatorlib {
+
+ /** @var Collator|false|null **/
+ protected static $collator = null;
+
+ /** @var string|null The locale that was used in instantiating the current collator **/
+ protected static $locale = null;
+
+ /**
+ * Ensures that a collator is available and created
+ *
+ * @return bool Returns true if collation is available and ready
+ */
+ protected static function ensure_collator_available() {
+ global $CFG;
+
+ $locale = get_string('locale', 'langconfig');
+ if (is_null(self::$collator) || $locale != self::$locale) {
+ self::$collator = false;
+ self::$locale = $locale;
+ if (class_exists('Collator', false)) {
+ $collator = new Collator($locale);
+ if (!empty($collator) && $collator instanceof Collator) {
+ // Check for non fatal error messages. This has to be done immediately
+ // after instantiation as any futher calls to collation will cause
+ // it to reset to 0 again (or another error code if one occured)
+ $errorcode = $collator->getErrorCode();
+ // Check for an error code, 0 means no error occured
+ if ($errorcode !== 0) {
+ // Get the actual locale being used, e.g. en, he, zh
+ $localeinuse = $collator->getLocale(Locale::ACTUAL_LOCALE);
+ // Check for the common fallback wardning error code. If this occured
+ // there is normally little to worry about. (U_USING_FALLBACK_WARNING)
+ if ($errorcode === -128) {
+ // Check if the local in use is anything like the locale we asked for
+ if (strpos($locale, $localeinuse) !== 0) {
+ // The locale we asked for is completely different to the locale
+ // we have recieved, let the user know via debugging
+ debugging('Invalid locale, falling back to the system default locale "'.$collator->getLocale(Locale::VALID_LOCALE).'"');
+ } else {
+ // Nothing to do here, this is expected!
+ // The Moodle locale setting isn't what the collator expected but
+ // it is smart enough to match the first characters of our locale
+ // to find the correct locale
+ // debugging('Invalid locale, falling back to closest match "'.$localeinuse.'" which may not be the exact locale');
+ }
+ } else {
+ // We've recieved some other sort of non fatal warning - let the
+ // user know about it via debugging.
+ debugging('Locale collator generated warnings (not fatal) "'.$collator->getErrorMessage().'" falling back to '.$collator->getLocale(Locale::VALID_LOCALE));
+ }
+ }
+ // Store the collator object now that we can be sure it is in a workable condition.
+ self::$collator = $collator;
+ } else {
+ // Fatal error while trying to instantiate the collator... who know what went wrong.
+ debugging('Error instantiating collator: ['.collator_get_error_code($collator).']'.collator_get_error_message($collator));
+ }
+ }
+ }
+ return (self::$collator instanceof Collator);
+ }
+
+ /**
+ * Locale aware sorting, the key associations are kept, values are sorted alphabetically.
*
- * @param array $arr array to be sorted
- * @return void, modifies parameter
+ * @param array $arr array to be sorted (reference)
+ * @param int $sortflag One of Collator::SORT_REGULAR, Collator::SORT_NUMERIC, Collator::SORT_STRING
+ * @return void modifies parameter
*/
- public static function asort(array &$arr) {
- if (function_exists('collator_asort')) {
- if ($coll = collator_create(get_string('locale', 'langconfig'))) {
- collator_asort($coll, $arr);
- return;
+ public static function asort(array &$arr, $sortflag = null) {
+ if (self::ensure_collator_available()) {
+ if (!isset($sortflag)) {
+ $sortflag = Collator::SORT_REGULAR;
}
+ self::$collator->asort($arr, $sortflag);
+ return;
}
asort($arr, SORT_LOCALE_STRING);
}
+
+ /**
+ * Locale aware comparison of two strings.
+ *
+ * Returns:
+ * 1 if str1 is greater than str2
+ * 0 if str1 is equal to str2
+ * -1 if str1 is less than str2
+ *
+ * @return int
+ */
+ public static function compare($str1, $str2) {
+ if (self::ensure_collator_available()) {
+ return self::$collator->compare($str1, $str2);
+ }
+ return strcmp($str1, $str2);
+ }
+
+ /**
+ * Locale aware sort of objects by a property in common to all objects
+ *
+ * @param array $objects An array of objects to sort (handled by reference)
+ * @param string $property The property to use for comparison
+ * @return bool True on success
+ */
+ public static function asort_objects_by_property(array &$objects, $property) {
+ $comparison = new collatorlib_property_comparison($property);
+ return uasort($objects, array($comparison, 'compare'));
+ }
+
+ /**
+ * Locale aware sort of objects by a method in common to all objects
+ *
+ * @param array $objects An array of objects to sort (handled by reference)
+ * @param string $method The method to call to generate a value for comparison
+ * @return bool True on success
+ */
+ public static function asort_objects_by_method(array &$objects, $method) {
+ $comparison = new collatorlib_method_comparison($method);
+ return uasort($objects, array($comparison, 'compare'));
+ }
}
+
+/**
+ * Abstract class to aid the sorting of objects with respect to proper language
+ * comparison using collator
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+abstract class collatorlib_comparison {
+ /**
+ * This function will perform the actual comparison of values
+ * It must be overridden by the deriving class.
+ *
+ * Returns:
+ * 1 if str1 is greater than str2
+ * 0 if str1 is equal to str2
+ * -1 if str1 is less than str2
+ *
+ * @param mixed $a The first something to compare
+ * @param mixed $b The second something to compare
+ * @return int
+ */
+ public abstract function compare($a, $b);
+}
+
+/**
+ * A comparison helper for comparing properties of two objects
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class collatorlib_property_comparison extends collatorlib_comparison {
+
+ /** @var string The property to sort by **/
+ protected $property;
+
+ /**
+ * @param string $property
+ */
+ public function __construct($property) {
+ $this->property = $property;
+ }
+
+ /**
+ * Returns:
+ * 1 if str1 is greater than str2
+ * 0 if str1 is equal to str2
+ * -1 if str1 is less than str2
+ *
+ * @param mixed $obja The first object to compare
+ * @param mixed $objb The second object to compare
+ * @return int
+ */
+ public function compare($obja, $objb) {
+ $resulta = $obja->{$this->property};
+ $resultb = $objb->{$this->property};
+ return collatorlib::compare($resulta, $resultb);
+ }
+}
+
+/**
+ * A comparison helper for comparing the result of a method on two objects
+ *
+ * @package core
+ * @subpackage lib
+ * @copyright 2011 Sam Hemelryk
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+class collatorlib_method_comparison extends collatorlib_comparison {
+
+ /** @var string The method to use for comparison **/
+ protected $method;
+
+ /**
+ * @param string $method The method to call against each object
+ */
+ public function __construct($method) {
+ $this->method = $method;
+ }
+
+ /**
+ * Returns:
+ * 1 if str1 is greater than str2
+ * 0 if str1 is equal to str2
+ * -1 if str1 is less than str2
+ *
+ * @param mixed $obja The first object to compare
+ * @param mixed $objb The second object to compare
+ * @return int
+ */
+ public function compare($obja, $objb) {
+ $resulta = $obja->{$this->method}();
+ $resultb = $objb->{$this->method}();
+ return collatorlib::compare($resulta, $resultb);
+ }
+}
\ No newline at end of file
}
ksort($sortorder);
- textlib_get_instance()->asort($otherqtypes);
+ collatorlib::asort($otherqtypes);
$sortedqtypes = array();
foreach ($sortorder as $name) {
$themes = get_list_of_themes();
foreach ($themes as $key=>$theme) {
if (empty($theme->hidefromselector)) {
- $choices[$key] = $theme->name;
+ $choices[$key] = get_string('pluginname', 'theme_'.$theme->name);
}
}
$mform->addElement('select', 'theme', get_string('preferredtheme'), $choices);
