danielebarchiesi@0: <?php
danielebarchiesi@0: 
danielebarchiesi@0: /**
danielebarchiesi@0:  * Returns array of language names.
danielebarchiesi@0:  *
danielebarchiesi@0:  * This is a one to one copy of locale_language_list because we can't rely on enabled locale module.
danielebarchiesi@0:  *
danielebarchiesi@0:  * @param $field
danielebarchiesi@0:  *   'name' => names in current language, localized
danielebarchiesi@0:  *   'native' => native names
danielebarchiesi@0:  * @param $all
danielebarchiesi@0:  *   Boolean to return all languages or only enabled ones
danielebarchiesi@0:  *
danielebarchiesi@0:  * @see locale_language_list
danielebarchiesi@0:  */
danielebarchiesi@0: function ctools_language_list($field = 'name', $all = FALSE) {
danielebarchiesi@0:   if ($all) {
danielebarchiesi@0:     $languages = language_list();
danielebarchiesi@0:   }
danielebarchiesi@0:   else {
danielebarchiesi@0:     $languages = language_list('enabled');
danielebarchiesi@0:     $languages = $languages[1];
danielebarchiesi@0:   }
danielebarchiesi@0:   $list = array();
danielebarchiesi@0:   foreach ($languages as $language) {
danielebarchiesi@0:     $list[$language->language] = ($field == 'name') ? t($language->name) : $language->$field;
danielebarchiesi@0:   }
danielebarchiesi@0:   return $list;
danielebarchiesi@0: }
danielebarchiesi@0: 
danielebarchiesi@0: /**
danielebarchiesi@0:  * Returns an array of language names similar to ctools_language_list() except
danielebarchiesi@0:  * that additional choices have been added for ease of use.
danielebarchiesi@0:  */
danielebarchiesi@0: 
danielebarchiesi@0: function ctools_language_list_all() {
danielebarchiesi@0:   $languages = array(
danielebarchiesi@0:     '***CURRENT_LANGUAGE***' => t("Current user's language"),
danielebarchiesi@0:     '***DEFAULT_LANGUAGE***' => t("Default site language"),
danielebarchiesi@0:     LANGUAGE_NONE => t('Language neutral'),
danielebarchiesi@0:   );
danielebarchiesi@0:   $languages = array_merge($languages, ctools_language_list());
danielebarchiesi@0:   return $languages;
danielebarchiesi@0: }