ÿØÿà JFIF    ÿÛ „  ( %!1"%)+...383-7(-.+  -%%--------+------------/----------------------------ÿÀ  ¶" ÿÄ     ÿÄ @    !1AQaq‘¡"±ÁÑð2’BRráS‚ñ3b¢CT²Ò #cÿÄ    ÿÄ '   1!AQ2a"‘±#ÿÚ   ? ò(/p‘—–¢·,M|¯G»R£üešT. ôŸEoCFñ‡ 4ÔkåóxR|µÁ¨ÓDà!Ç´µ˜‡p ÍQ‹§!þž^õWsŒy  åÁ§$á«%ºq˜™JyyË0y«^Ϗ -3ÃÏËÈ£Æ\P’ä„s&•‹Üs üô'àWt¹pñCp$bÚF`·7.^)¾!)ÒÙ˜–ÅÏš^h¾ø³·ìe±ŒaeÖ—Í,e=B}Jéߦ$$½—šÙÜCC¯¶è8β–Åkèwx LÉngT±æ¹£Ócœ¿Í/©Éÿ ‰ÚCÒ­mq;Tt¶–}0"zÖPcd1š­¤tˆ„ÐÓâqú[™öUCŠ2޿د­É(¸ßúçšmW,Ò ºf‹Ån™ÄLêÁ8üÁkÁ€L¥ÍuJ1œôrÂSŒÓöt!7EUíïb)AËi¬â-ÙHk8òÁiXYwÅ)O^"ÇØriÛô{»wRUKÙÏÚlÓ¬€‚’שT ] ªb—ÊîKC^×M“xùäñz¬zJ× {4[¹M'IÆeH1LCWÕ]œûº WDæà°OÅ‚¹c²ÞuA–rL`HšpCez‡V’— Ž‚Ë„–ñ­'µR0ÕÖ=À:±G»C\nÆÉ5*¢ †3šhQ4ýÒi$Õ1"Ü]¢p-q3zcQ$ªö¨¥æf›‘»´ÝÚHá„e²JÇ–iÊ:·à¬Øc5Åk»Laª*wi [0Ówk ¦a¦0Õ²ÅÅ‚T¸’³q:Æ<¹ú Ò˜Æ}2VE•Ð€p¡Ô3Úº …h³^LJºçì¥Ánó|˜ÖˆÎˆ+« ¦dø‘Mº–d\ªDðÛ„Ì×LÝ——Ð9Ç|•FèçVm™¨€™3õS–9Äå¢<̉Ìm¢±`·º˜&Z²ž Ë®D«¶»6™‰©­HÈ Àá«h­i³04æ’hxœi3ï¨(ÓL·†‹¶ËpŒ ƒÜÒ? :õdsÀ –3æÓ·Üjâ¬9—]8n¼&]I F£¼…ì–—Œ0v°LǐÅfÛ2TÖ’aµ˜N@ÖBSÏ^à´4-±°b×nÈÈœÆD=KdŒø…ÄÈK,›ÖR§fjü$^ÔÎ!„6^ s:Üun\ôkCÞò÷<—Lúl Í›G¹ÀPá¼Nc¡šÒ…ÙWͳœ±vÊáЄ×9‹P‰cEØ‘™›µŸP<×g1 º©Ø¬wiÁ^l5× I/';Ë+´Z‡ÓÄFÕp[Èð’ HÄ ó 9¬Dl4“é±Ï”V=^Hð;žLädÉa‚°Ë,#/Ž~²BÔÛ QãñQtIeórVB,ÏÂf‹4#Îœc‹É3ZIÖ Œ¢¥·üxa‡Ãçè„jŠ[5 Ä!U?,3žÎ×…ðdÓ÷háŠA‰ìÄ4÷ÃÜZÃE{‰®+W\ZÍE[‰»µk»MÝ­`¢©†˜ÃV‹-f¢¡†¢a«eŠ%«Y¨©q%jâd,Ôq`) ¤¦…šˆ ¦E>0Ùb²t–Ÿ  ÷jsÏ‚Ò’KÈcø(é›;k(’#ôŒQ ™C> õ³M9óºÆµ¤çâ;uÀ)5>RÔ¸fÓ~Ȧ—’-$fe«"FâUˆÊwµPÏu w+"åÉó¨6s™Û9(À¨ù©hE°½†n`m~“@©›p!Vkhµ Á1šbEqqÊ@ºèl›2 –Yã%‘‚hÛ{a¶‡ÅÞM²¬çL34®Çl]®‹ŽØŒm'RÜe35æöˆ­Á­ cP9šeÁköo´L³Ì=p8]”‡B¶,šº|ɏdzXˆØk*ÇÚ{#ñ‰pã(€¶‡9ý'šÜ³½¯kƒ†Â’ëSOƒ•Å®H6+a¢µˆ‹Y¨b˜b+XˆÖ!°u!¢"µˆˆn2ˆ Å0Ä`Å Ô®c(ÓÜGº•Ä»Œ âWî%q.áÐÄ÷î%umÍ£+ÜQ,Vn¦-GphU¸¢X­&,Gt ·K¢ÅÅ·¥RÄÊÉbKn N­R2g$VµÕó Qr#–ÓZUÏð0ÎtÙÀœz ëöo“Îk¯n„T°"SÞ+³/…€½"ižãO%Í%&Δâ‘ËØ´IˆÓ°Ë‰ÞM3.™yçÁzit›`4C`k¢¼á!álÄï sÂ[×!¤l¾æo"ƒIÔ'@ªu)3›ô®“@Z à¾] üœ'‡4¸PÞkÁ-qÄH‰ÓÍBd´ÿ —¹°ÄA&ÊUC„öz‚‚RæŠtf¬>˜ÑidšEçÑL÷áý¡V±h§­c¿¥¨ƒ@g¼…Ýö^ÞËc.ž„æ“I[ ª+·zÐÒÚ,½Ð»¶€C›7jk$๖€Ž¾ÅÙpp¶ÍþéΤ ½ØÎŒq ñpæžÅ¥#Øâ49ÃÂK^MYV“,¶Éz_òæ:…;Õ«¦I3âJ£¤û5$7Èxün\â]Êe¯(Ÿ&Ž‹¶2<6Ćf× æ¢ƱqWı[(ÙÂŽç‚T7¨@ÈÉÍß‚ïÙ"&3TYlGŽ†)†#5ŠA©^T2ÆÁ†)©†©†¤yGXÁ†©"†)©¼ÅV WS†#©]R–r‹q5ÕbâWþBh¯u+ªÅÄ×ü„nÑ^êkªÁj‰jeœWˆÕÕ`µDµ2Ì+Ä µDµµ5Ô{¤Þ0RF’H÷AÛ<ÊÁ§ ƈæ0Ñ£ê4 öÚµ[¬/1²€â<-¬šö²r×0o×w ´xÐÒË„ g01¬„åEM蛇Ã\6µE›‘fÙO k÷CºnÓ1`iîÒ² áÂ!ÑLÄÿ ³¬\õ*:M=Ç»c‹2[‰ØsÕLò\ŒK L^™üÄN\¶#» Ç\……ßïIœÉ$¸ÎñÍ®ÔHÇ Ûí/´>Li”„†g^$ 7NÍÑÑ2M2ªNg=k½Ð}Ÿl6‡ —JWˆ”ÞéT·+µ¦üÂFè¢Vs6ýÆ4»2+2IÝ9ô9®ÇGÙÇ1+Ä8;*Õ§ž½D*îÑWÚçá3Ma¤·ˆ¥t}š²Ü…Q+Æüµ8HíS”üxGéÁˆ¦Ël„éÈ 5 µÄƒ6äÜ(kIš¯S†fÖ&¸®×v|Äyˆ*禌Éù@7-®Ä[]ÎÖ¿ê`º…=:…žJVnݳvðÖKE¼‚ »mà ÷f®:Ë ™–4rð¡4` ܹçž~‹C=œ…¾Ïj|VDtK.ƒ"9 Ï ­–éXá³6WÒïIL-Ї Ç home/smkb8269/public_html/lms.smk-almanshuriyah.sch.id/lib/classes/collator.php000064400000034553152267603610023436 0ustar00. /** * Defines string apis * * @package core * @copyright 2011 Sam Hemelryk * 2012 Petr Skoda * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ defined('MOODLE_INTERNAL') || die(); /** * A collator class with static methods that can be used for sorting. * * @package core * @copyright 2011 Sam Hemelryk * 2012 Petr Skoda * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ class core_collator { /** @var int compare items using general PHP comparison, equivalent to Collator::SORT_REGULAR, this may bot be locale aware! */ const SORT_REGULAR = 0; /** @var int compare items as strings, equivalent to Collator::SORT_STRING */ const SORT_STRING = 1; /** @var int compare items as numbers, equivalent to Collator::SORT_NUMERIC */ const SORT_NUMERIC = 2; /** @var int compare items like natsort(), equivalent to SORT_NATURAL */ const SORT_NATURAL = 6; /** @var int do not ignore case when sorting, use bitwise "|" with SORT_NATURAL or SORT_STRING, equivalent to Collator::UPPER_FIRST */ const CASE_SENSITIVE = 64; /** @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; /** * Prevent class instances, all methods are static. */ private function __construct() { } /** * Ensures that a collator is available and created * * @return bool Returns true if collation is available and ready */ protected static function ensure_collator_available() { $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 further calls to collation will cause // it to reset to 0 again (or another error code if one occurred) $errorcode = $collator->getErrorCode(); $errormessage = $collator->getErrorMessage(); // Check for an error code, 0 means no error occurred 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 warning error codes. If any of the two // following errors occurred, there is normally little to worry about: // * U_USING_FALLBACK_WARNING (-128) indicates that a fall back locale was // used. For example, 'de_CH' was requested, but nothing was found // there, so 'de' was used. // * U_USING_DEFAULT_WARNING (-127) indicates that the default locale // data was used; neither the requested locale nor any of its fall // back locales could be found. For example, 'pt' was requested, but // UCA was used (Unicode Collation Algorithm http://unicode.org/reports/tr10/). // See http://www.icu-project.org/apiref/icu4c/classicu_1_1ResourceBundle.html if ($errorcode === -127 || $errorcode === -128) { // Check if the locale in use is UCA default one ('root') or // if it is anything like the locale we asked for if ($localeinuse !== 'root' && strpos($locale, $localeinuse) !== 0) { // The locale we asked for is completely different to the locale // we have received, let the user know via debugging debugging('Locale warning (not fatal) '.$errormessage.': '. 'Requested locale "'.$locale.'" not found, locale "'.$localeinuse.'" used instead. '. 'The most specific locale supported by ICU relatively to the requested locale is "'. $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 or to use UCA collation } } else { // We've received some other sort of non fatal warning - let the // user know about it via debugging. debugging('Problem with locale: '.$errormessage.'. '. 'Requested locale: "'.$locale.'", actual locale "'.$localeinuse.'". '. 'The most specific locale supported by ICU relatively to the requested locale is "'. $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... something went wrong debugging('Error instantiating collator for locale: "' . $locale . '", with error [' . intl_get_error_code() . '] ' . intl_get_error_message($collator)); } } } return (self::$collator instanceof Collator); } /** * Restore array contents keeping new keys. * @static * @param array $arr * @param array $original * @return void modifies $arr */ protected static function restore_array(array &$arr, array &$original) { foreach ($arr as $key => $ignored) { $arr[$key] = $original[$key]; } } /** * Normalise numbers in strings for natural sorting comparisons. * @static * @param string $string * @return string string with normalised numbers */ protected static function naturalise($string) { return preg_replace_callback('/[0-9]+/', array('core_collator', 'callback_naturalise'), $string); } /** * @internal * @static * @param array $matches * @return string */ public static function callback_naturalise($matches) { return str_pad($matches[0], 20, '0', STR_PAD_LEFT); } /** * Locale aware sorting, the key associations are kept, values are sorted alphabetically. * * @param array $arr array to be sorted (reference) * @param int $sortflag One of core_collator::SORT_NUMERIC, core_collator::SORT_STRING, core_collator::SORT_NATURAL, core_collator::SORT_REGULAR * optionally "|" core_collator::CASE_SENSITIVE * @return bool True on success */ public static function asort(array &$arr, $sortflag = core_collator::SORT_STRING) { if (empty($arr)) { // nothing to do return true; } $original = null; $casesensitive = (bool)($sortflag & core_collator::CASE_SENSITIVE); $sortflag = ($sortflag & ~core_collator::CASE_SENSITIVE); if ($sortflag != core_collator::SORT_NATURAL and $sortflag != core_collator::SORT_STRING) { $casesensitive = false; } if (self::ensure_collator_available()) { if ($sortflag == core_collator::SORT_NUMERIC) { $flag = Collator::SORT_NUMERIC; } else if ($sortflag == core_collator::SORT_REGULAR) { $flag = Collator::SORT_REGULAR; } else { $flag = Collator::SORT_STRING; } if ($sortflag == core_collator::SORT_NATURAL) { $original = $arr; if ($sortflag == core_collator::SORT_NATURAL) { foreach ($arr as $key => $value) { $arr[$key] = self::naturalise((string)$value); } } } if ($casesensitive) { self::$collator->setAttribute(Collator::CASE_FIRST, Collator::UPPER_FIRST); } else { self::$collator->setAttribute(Collator::CASE_FIRST, Collator::OFF); } $result = self::$collator->asort($arr, $flag); if ($original) { self::restore_array($arr, $original); } return $result; } // try some fallback that works at least for English if ($sortflag == core_collator::SORT_NUMERIC) { return asort($arr, SORT_NUMERIC); } else if ($sortflag == core_collator::SORT_REGULAR) { return asort($arr, SORT_REGULAR); } if (!$casesensitive) { $original = $arr; foreach ($arr as $key => $value) { $arr[$key] = core_text::strtolower($value); } } if ($sortflag == core_collator::SORT_NATURAL) { $result = natsort($arr); } else { $result = asort($arr, SORT_LOCALE_STRING); } if ($original) { self::restore_array($arr, $original); } return $result; } /** * 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 * @param int $sortflag One of core_collator::SORT_NUMERIC, core_collator::SORT_STRING, core_collator::SORT_NATURAL, core_collator::SORT_REGULAR * optionally "|" core_collator::CASE_SENSITIVE * @return bool True on success */ public static function asort_objects_by_property(array &$objects, $property, $sortflag = core_collator::SORT_STRING) { $original = $objects; foreach ($objects as $key => $object) { $objects[$key] = $object->$property; } $result = self::asort($objects, $sortflag); self::restore_array($objects, $original); return $result; } /** * 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 * @param int $sortflag One of core_collator::SORT_NUMERIC, core_collator::SORT_STRING, core_collator::SORT_NATURAL, core_collator::SORT_REGULAR * optionally "|" core_collator::CASE_SENSITIVE * @return bool True on success */ public static function asort_objects_by_method(array &$objects, $method, $sortflag = core_collator::SORT_STRING) { $original = $objects; foreach ($objects as $key => $object) { $objects[$key] = $object->{$method}(); } $result = self::asort($objects, $sortflag); self::restore_array($objects, $original); return $result; } /** * Locale aware sort of array of arrays. * * Given an array like: * $array = array( * array('name' => 'bravo'), * array('name' => 'charlie'), * array('name' => 'alpha') * ); * * If you call: * core_collator::asort_array_of_arrays_by_key($array, 'name') * * You will be returned $array sorted by the name key of the subarrays. e.g. * $array = array( * array('name' => 'alpha'), * array('name' => 'bravo'), * array('name' => 'charlie') * ); * * @param array $array An array of objects to sort (handled by reference) * @param string $key The key to use for comparison * @param int $sortflag One of * core_collator::SORT_NUMERIC, * core_collator::SORT_STRING, * core_collator::SORT_NATURAL, * core_collator::SORT_REGULAR * optionally "|" core_collator::CASE_SENSITIVE * @return bool True on success */ public static function asort_array_of_arrays_by_key(array &$array, $key, $sortflag = core_collator::SORT_STRING) { $original = $array; foreach ($array as $initkey => $item) { $array[$initkey] = $item[$key]; } $result = self::asort($array, $sortflag); self::restore_array($array, $original); return $result; } /** * Locale aware sorting, the key associations are kept, keys are sorted alphabetically. * * @param array $arr array to be sorted (reference) * @param int $sortflag One of core_collator::SORT_NUMERIC, core_collator::SORT_STRING, core_collator::SORT_NATURAL, core_collator::SORT_REGULAR * optionally "|" core_collator::CASE_SENSITIVE * @return bool True on success */ public static function ksort(array &$arr, $sortflag = core_collator::SORT_STRING) { $keys = array_keys($arr); if (!self::asort($keys, $sortflag)) { return false; } // This is a bit slow, but we need to keep the references $original = $arr; $arr = array(); // Surprisingly this does not break references outside foreach ($keys as $key) { $arr[$key] = $original[$key]; } return true; } }