4 # :title: Language module for rbot
6 # This module takes care of language handling for rbot:
7 # setting the core.language value, loading the appropriate
14 # This constant hash holds the mapping
15 # from long language names to the usual POSIX
16 # locale specifications
19 :british_english => 'en_GB',
20 :american_english => 'en_US',
28 :traditional_chinese => 'zh_TW',
29 :simplified_chinese => 'zh_CN'
31 # On WIN32 it appears necessary to have ".UTF-8" explicitly for gettext to use UTF-8
32 Lang2Locale.each_value {|v| v.replace(v + '.UTF-8')}
34 # Return the shortest language for the current
36 def Language.from_locale
37 return 'english' unless defined?(GetText)
38 lang = locale.language
40 str = lang + "_#{locale.country}"
41 if Lang2Locale.value?(str)
42 # Get the shortest key in Lang2Locale which maps to the given lang_country
43 lang_str = Lang2Locale.select { |k, v| v == str }.transpose.first.map { |v| v.to_s }.sort { |a, b| a.length <=> b.length }.first
44 if File.exist?(File.join(Config::datadir, "languages/#{lang_str}.lang"))
49 # lang_country didn't work, let's try lan
50 if Lang2Locale.value?(lang)
51 # Get the shortest key in Lang2Locale which maps to the given lang
52 lang_str = Lang2Locale.select { |k, v| v == lang }.transpose.first.map { |v| v.to_s }.sort { |a, b| a.length <=> b.length }.first
53 if File.exist?(File.join(Config::datadir, "/languages/#{lang_str}.lang"))
57 # all else fail, return 'english'
61 Config.register Config::EnumValue.new('core.language',
62 :default => Irc::Bot::Language.from_locale, :wizard => true,
63 :values => Proc.new{|bot|
64 Dir.new(Config::datadir + "/languages").collect {|f|
65 f =~ /\.lang$/ ? f.gsub(/\.lang$/, "") : nil
68 :on_change => Proc.new {|bot, v| bot.lang.set_language v},
69 :desc => "Which language file the bot should use")
71 def initialize(bot, language)
77 def set_language(language)
78 lang_str = language.to_s.downcase.gsub(/\s+/,'_')
79 lang_sym = lang_str.intern
80 if defined?(GetText) and Lang2Locale.key?(lang_sym)
81 setlocale(Lang2Locale[lang_sym])
82 debug "locale set to #{locale}"
85 warning "Unable to set locale, unknown language #{language} (#{lang_str})"
88 file = Config::datadir + "/languages/#{lang_str}.lang"
89 unless(FileTest.exist?(file))
90 raise "no such language: #{lang_str} (no such file #{file})"
95 return if @bot.plugins.nil?
96 @bot.plugins.core_modules.each { |p|
97 if p.respond_to?('set_language')
98 p.set_language(@language)
101 @bot.plugins.plugins.each { |p|
102 if p.respond_to?('set_language')
103 p.set_language(@language)
111 IO.foreach(@file) {|l|
115 @strings[$1] = Array.new
117 elsif(l =~ /^\s*(.*)$/)
118 @strings[current_key] << $1
128 if(@strings.has_key?(key))
129 return @strings[key][rand(@strings[key].length)]
131 raise "undefined language key"
136 File.open(@file, "w") {|file|
137 @strings.each {|key,val|