From a8433baee200e4f5b5a6645f04f3e159aa2bdf2a Mon Sep 17 00:00:00 2001
From: Ingo Schommer <ingo@silverstripe.com>
Date: Sun, 16 Sep 2007 16:03:32 +0000
Subject: [PATCH] bfojcapell: Added new field type LanguageDropdownField?
 (merged from branches/gsoc)

git-svn-id: svn://svn.silverstripe.com/silverstripe/open/modules/sapphire/trunk@42109 467b73ca-7a2a-4603-9d3b-597d59a354a9
---
 forms/LanguageDropdownField.php | 58 +++++++++++++++++++++++++++++++++
 1 file changed, 58 insertions(+)
 create mode 100755 forms/LanguageDropdownField.php

diff --git a/forms/LanguageDropdownField.php b/forms/LanguageDropdownField.php
new file mode 100755
index 000000000..b001ff6d8
--- /dev/null
+++ b/forms/LanguageDropdownField.php
@@ -0,0 +1,58 @@
+<?php
+
+/**
+ * An extension to dropdown field, pre-configured to list languages.
+ * The languages already used in the site will be on top.
+ */
+class LanguageDropdownField extends GroupedDropdownField {
+	
+	/**
+	 * Create a new LanguageDropdownField
+	 * @param string $name
+	 * @param string $title
+	 * @param array $dontInclude list of languages that won't be included
+	 * @param string $translatingClass Name of the class with translated instances where to look for used languages
+	 * @param string $list Indicates the source language list. Can be either Common-English, Common-Native or Locale
+	 */
+	function __construct($name, $title, $dontInclude = array(), $translatingClass = 'SiteTree', $list = 'Common-English' ) {
+		$usedlangs = array_diff(
+						i18n::get_existing_languages($translatingClass),
+						$dontInclude
+					);
+		// we accept in dontInclude both language codes and names, so another diff is required
+		$usedlangs = array_flip(array_diff(
+						array_flip($usedlangs),
+						$dontInclude
+					));
+		if (isset($usedlangs[Translatable::default_lang()])) unset($usedlangs[Translatable::default_lang()]);
+					
+		if ('Common-English' == $list) $languageList = i18n::get_common_languages();
+		else if ('Common-Native' == $list) $languageList = i18n::get_common_languages(true);
+		else $languageList = i18n::get_locale_list();
+
+		$alllangs = array_diff(
+						$languageList,
+						(array)$usedlangs,
+						$dontInclude
+					);
+		$alllangs = array_flip(array_diff(
+						array_flip($alllangs),
+						$dontInclude
+					));
+		if (isset($alllangs[Translatable::default_lang()])) unset($alllangs[Translatable::default_lang()]);
+
+		if (count($usedlangs)) {
+			parent::__construct($name, $title, array(
+					"Used languages" => $usedlangs,
+					"Other languages" => $alllangs
+				),
+				reset($usedlangs)
+			);
+		}
+		else {
+			parent::__construct($name, $title, $alllangs);
+		}
+	}
+}
+
+?>
\ No newline at end of file