+function get_browser_language() {
+
+ if (x($_SERVER,'HTTP_ACCEPT_LANGUAGE')) {
+ // break up string into pieces (languages and q factors)
+ preg_match_all('/([a-z]{1,8}(-[a-z]{1,8})?)\s*(;\s*q\s*=\s*(1|0\.[0-9]+))?/i',
+ $_SERVER['HTTP_ACCEPT_LANGUAGE'], $lang_parse);
+
+ $lang_list = [];
+ if (count($lang_parse[1])) {
+ // go through the list of prefered languages and add a generic language
+ // for sub-linguas (e.g. de-ch will add de) if not already in array
+ for ($i=0; $i<count($lang_parse[1]); $i++) {
+ $lang_list[] = strtolower($lang_parse[1][$i]);
+ if ( strlen($lang_parse[1][$i])>3 ) {
+ $dashpos = strpos($lang_parse[1][$i], '-');
+ if (! in_array(substr($lang_parse[1][$i], 0, $dashpos), $lang_list ) ) {
+ $lang_list[] = strtolower(substr($lang_parse[1][$i], 0, $dashpos));
+ }
+ }
+ }
+ }
+ }
+
+ // check if we have translations for the preferred languages and pick the 1st that has
+ for ($i=0; $i<count($lang_list); $i++) {
+ $lang = $lang_list[$i];
+ if(file_exists("view/lang/$lang") && is_dir("view/lang/$lang")) {
+ $preferred = $lang;
+ break;
+ }
+ }
+ if(isset($preferred))
+ return $preferred;
+
+ // in case none matches, get the system wide configured language, or fall back to English
+ $a = get_app();
+ return ((isset($a->config['system']['language'])) ? $a->config['system']['language'] : 'en');
+}}
+
+
+function push_lang($language) {
+ global $lang, $a;
+
+ $a->langsave = $lang;
+
+ if($language === $lang)
+ return;
+
+ if(isset($a->strings) && count($a->strings)) {
+ $a->stringsave = $a->strings;
+ }
+ $a->strings = array();
+ load_translation_table($language);
+ $lang = $language;
+}
+
+function pop_lang() {
+ global $lang, $a;
+
+ if($lang === $a->langsave)
+ return;
+
+ if(isset($a->stringsave))
+ $a->strings = $a->stringsave;
+ else
+ $a->strings = array();