filemanager 0.1.0

data/lib/locale/base.rb

@@ -0,0 +1,60 @@
+=begin
+  locale/posix.rb 
+
+  Copyright (C) 2002-2007  Masao Mutoh
+
+  You may redistribute it and/or modify it under the same
+  license terms as Ruby.
+
+  $Id: base.rb,v 1.1 2007/11/08 16:57:49 mutoh Exp $
+=end
+
+
+module Locale 
+  # Locale::SystemBase module. This module overrides from other concrete modules. 
+  # This is a low-level class. Application shouldn't use this directly.
+  module SystemBase
+    @@default_locale = Locale::Object.new("C", nil, "UTF-8")
+
+    def default_locale  # :nodoc:
+      @@default_locale
+    end
+
+    # Gets the charset of the locale.
+    # * locale: Locale::Object
+    # * Returns the charset of the locale
+    def get_charset(locale)
+      locale.charset || @@default_locale.charset
+    end    
+
+    # Gets the system locale using setlocale and nl_langinfo. 
+    # * Returns the system locale (Locale::Object).
+    def locale_from_env
+      locale = nil
+      # At least one environment valiables should be set on *nix system.
+      [ENV["LC_ALL"], ENV["LC_MESSAGES"], ENV["LANG"]].each do |loc|
+	if loc != nil and loc.size > 0
+	  locale = Locale::Object.new(loc)
+	  locale.charset ||= get_charset(locale)
+	  break
+	end
+      end
+      locale
+    end
+
+    # Gets the system locale.
+    # * Returns the system locale (Locale::Object)   
+    def system
+      locale_from_env || default_locale
+    end
+
+    # Gets the charset of the locale.
+    # * locale: Locale::Object
+    # * Returns: the charset of the locale
+    def charset
+      # locale parameter is ignored now.
+      system.charset
+    end
+  end
+end
+

data/lib/locale/cgi.rb

@@ -0,0 +1,103 @@
+=begin
+  locale/cgi.rb 
+
+  Copyright (C) 2002-2007  Masao Mutoh
+
+  You may redistribute it and/or modify it under the same
+  license terms as Ruby.
+
+  $Id: cgi.rb,v 1.2 2007/11/08 16:44:22 mutoh Exp $
+=end
+
+require 'locale/base'
+
+module Locale
+  # Locale::System module for CGI.
+  # This is a low-level class. Application shouldn't use this directly.
+  module SystemCGI
+    extend SystemBase
+
+    @@default_locale = Locale::Object.new("en", nil, "UTF-8")
+    @@cgi = nil
+
+    module_function
+    # Gets the default locale using setlocale and nl_langinfo. 
+    # * Returns the system locale (Locale::Object).
+    def system
+      return @@default_locale unless @@cgi
+      cgi_ = cgi
+      if cgi_.has_key?("lang") and ret = cgi_["lang"] and ret.size > 0
+      elsif ret = cgi_.cookies["lang"][0]
+      elsif lang = cgi_.accept_language and lang.size > 0
+	num = lang.index(/;|,/)
+	ret = num ? lang[0, num] : lang
+      else
+	ret = @@default_locale.to_str
+      end
+ 
+      codesets = cgi_.accept_charset
+      if codesets and codesets.size > 0
+	num = codesets.index(',')
+	codeset = num ? codesets[0, num] : codesets
+	codeset = @@default_locale.charset if codeset == "*"
+      else
+	codeset = @@default_locale.charset
+      end
+      Locale::Object.new(ret, nil, codeset)
+    end
+
+
+    # Sets a CGI object.
+    # * cgi_: CGI object
+    # * Returns: self
+    def set_cgi(cgi_)
+      @@cgi = cgi_
+      self
+    end
+    
+    # Sets a CGI object.
+    # * cgi_: CGI object
+    # * Returns: cgi_ 
+    def cgi=(cgi_)
+      set_cgi(cgi_)
+      cgi_
+    end
+
+    # Gets the CGI object. If it is nil, returns new CGI object.
+    # * Returns: the CGI object
+    def cgi
+      @@cgi = CGI.new unless @@cgi
+      @@cgi
+    end
+
+    # Gets the default Locale::Object. 
+    # * Returns: the default locale
+    def default_locale
+      @@default_locale
+    end
+  end
+  @@locale_system_module = SystemCGI
+
+  module_function
+  # Sets a CGI object.
+  # * cgi_: CGI object
+  # * Returns: self
+  def set_cgi(cgi_)
+    @@locale_system_module.set_cgi(cgi_)
+    self
+  end
+
+  # Sets a CGI object.
+  # * cgi_: CGI object
+  # * Returns: cgi_ 
+  def cgi=(cgi_)
+    set_cgi(cgi_)
+    cgi_
+  end
+
+  # Gets the CGI object. If it is nil, returns new CGI object.
+  # * Returns: the CGI object
+  def cgi
+    @@locale_system_module.cgi
+  end
+end

data/lib/locale/jruby.rb

@@ -0,0 +1,36 @@
+=begin
+  locale/jruby.rb
+
+  Copyright (C) 2007 Masao Mutoh
+
+  You may redistribute it and/or modify it under the same
+  license terms as Ruby.
+
+  $Id: jruby.rb,v 1.3 2008/03/21 06:28:10 mutoh Exp $
+=end
+
+require 'locale/base'
+require 'java'
+
+module Locale
+  # Locale::SystemJRuby module for JRuby
+  # This is a low-level class. Application shouldn't use this directly.
+  module SystemJRuby
+    extend SystemBase
+
+    if java.lang.System.getProperties['os.name'].downcase =~ /windows/
+      require 'locale/win32_table'
+
+      extend ::Locale::SystemWin32Table
+    end
+
+    module_function
+    def default_locale  #:nodoc:
+      locale = java.util.Locale.getDefault
+      charset = java.nio.charset.Charset.defaultCharset.name
+      Locale::Object.new(locale.to_s, nil, charset)
+    end
+  end
+  @@locale_system_module = SystemJRuby
+end
+

data/lib/locale/object.rb

@@ -0,0 +1,233 @@
+=begin
+  locale/object.rb - Locale::Object
+
+  Copyright (C) 2006,2007  Masao Mutoh
+
+  You may redistribute it and/or modify it under the same
+  license terms as Ruby.
+
+  $Id: object.rb,v 1.3 2008/01/27 10:58:10 mutoh Exp $
+=end
+
+
+module Locale
+  class Object
+    attr_reader :language, :country, :charset, :script, :variant, :modifier, :orig_str
+
+    # Set the language. e.g.) ja, en, fr, ...
+    def language=(val)
+      @language = val
+      clear
+    end
+
+    # Set the country.  e.g.) JP, US, FR, ...
+    def country=(val)
+      @country = val
+      clear
+    end
+
+    # Set the charset.   e.g.) UTF-8, EUC-JP, Shift_JIS
+    def charset=(val)
+      @charset = val
+      clear
+    end
+
+    # Set the script.   e.g.) Latn
+    def script=(val)
+      @script = val
+      clear
+    end
+
+    # Set the variant.   e.g.) Hant
+    def variant=(val)
+      @variant = val
+      clear
+    end
+
+    # Set the modifier.  e.g.) curreny=DDM
+    def modifier=(val)
+      @modifier = val
+      clear
+    end
+
+    # A fallback locale. With GetText, you don't need to set English(en,C,POSIX) 
+    # by yourself because English is used as the last fallback locale anytime.
+    attr_accessor :fallback
+
+    # Parse POSIX or RFC 3066 style locale name to Array.
+    #
+    # * locale_name: locale name as String 
+    #   
+    #   * Basic POSIX format: <language>_<COUNTRY>.<charset>@<modifier>
+    #     * Both of POSIX and C are converted to "en".
+    #   * Basic RFC3066 format: <language>-<COUNTRY>
+    #   * Win32 format: <language>-<COUNTRY>-<Script>_<sort order>
+    #   * CLDR format: <language>_<Script>_<COUNTRY>_<variant>@<modifier>
+    #   * Some broken format: <language>_<country>_<script>  # Don't use this.
+    #   * The max locale format is below:     
+    #     * <language>-<COUNTRY>-<Script>_<sort order>.<charset>@<modifier>
+    #     * format: <language>_<Script>_<COUNTRY>_<variant>@<modifier>
+    #       * both of '-' and '_' are separators.
+    #       * each elements are omittable.
+    #   
+    #   (e.g.) uz-UZ-Latn, ja_JP.eucJP, wa_BE.iso885915@euro
+    # * Returns: [language, country, charset, script, modifier]
+    #   * language: a lowercase ISO 639(or 639-2/T) language code.
+    #   * country: an uppercase ISO 3166-1 country/region identifier.
+    #   * charset: charset(codeset) (no standard)
+    #   * script: an initial-uppercase ISO 15924 script code. 
+    #   * variant: variant value in CLDR or sort order in Win32.
+    #   * modifier: (no standard)
+    #
+    #  (e.g.)
+    #  "ja_JP.eucJP" => ["ja", "JP", "eucJP", nil, nil]
+    #  "ja-jp.utf-8" => ["ja", "JP", "utf-8", nil, nil]
+    #  "ja-jp" => ["ja", "JP", nil, nil, nil]
+    #  "ja" => ["ja", nil, nil, nil, nil]
+    #  "uz@Latn" => ["uz", nil, nil, nil, "Latn"]
+    #  "uz-UZ-Latn" => ["uz", "UZ", nil, "Latn", nil]
+    #  "uz_UZ_Latn" => ["uz", "UZ", nil, "Latn", nil]
+    #  "wa_BE.iso885915@euro" => ["wa", "BE", "iso885915", nil, "euro"]
+    #  "C" => ["en", nil, nil, nil, nil]
+    #  "POSIX" => ["en", nil, nil, nil, nil]
+    #  "zh_Hant" => ["zh", nil, nil, "Hant", nil]
+    #  "zh_Hant_HK" => ["zh", "HK", nil, "Hant", nil]
+    #  "de_DE@collation=phonebook,currency=DDM" => ["de", "DE", nil, nil, "collation=phonebook,currency=DDM"]
+
+    def self.parse(locale_name)
+      lang_charset, modifier = locale_name.split(/@/)
+      lang, charset = lang_charset.split(/\./)
+      language, country, script, variant = lang.gsub(/_/, "-").split('-')
+      language = language ? language.downcase : nil
+      language = "en" if language == "c" || language == "posix"
+      if country
+	if country =~ /\A[A-Z][a-z]+\Z/  #Latn => script
+	  tmp = script
+	  script = country
+	  if tmp =~ /\A[A-Z]+\Z/ #US => country
+	    country = tmp
+	  else
+	    country = nil
+	    variant = tmp
+	  end
+	else
+	  country = country.upcase
+	  if script !~ /\A[A-Z][a-z]+\Z/ #Latn => script
+	    variant = script
+	    script = nil
+	  end
+	end
+      end
+      [language, country, charset, script, variant, modifier]
+    end
+
+    # Initialize Locale::Object.
+    # * language_or_locale_name: language(ISO 639) or POSIX or RFC3066 style locale name
+    # * country: an uppercase ISO 3166-1 country/region identifier, or nil
+    # * charset: charset(codeset) (no standard), or nil
+    #
+    #  Locale::Object.new("ja", "JP", "eucJP")
+    #   -> language = "ja", country = "JP", charset = "eucJP".
+    #  Locale::Object.new("ja", "JP")
+    #   -> language = "ja", country = "JP", charset = nil.
+    #  Locale::Object.new("ja_JP.eucJP")
+    #   -> language = "ja", country = "JP", charset = "eucJP".
+    #  Locale::Object.new("ja_JP.eucJP", nil, "UTF-8")
+    #   -> language = "ja", country = "JP", charset = "UTF-8".
+    #  Locale::Object.new("en-US", "CA")
+    #   -> language = "en", country = "CA", charset = nil.
+    #  Locale::Object.new("uz-uz-latn")
+    #   -> language = "uz", country = "UZ", charset = nil, script = "Latn"
+    #  Locale::Object.new("uz_UZ_Latn")
+    #   -> language = "uz", country = "UZ", charset = nil, script = "Latn"
+    #  Locale::Object.new("we_BE.iso885915@euro")
+    #   -> language = "we", country = "BE", charset = "iso885915", modifier = "euroo".
+    #  Locale::Object.new("C")
+    #   -> language = "en", country = nil, charset = nil.
+    #  Locale::Object.new("POSIX")
+    #   -> language = "en", country = nil, charset = nil.
+    def initialize(language_or_locale_name, country = nil, charset = nil)
+      @orig_str = language_or_locale_name
+      @language, @country, @charset, @script, @variant, @modifier = 
+	self.class.parse(language_or_locale_name)
+      @country = country if country
+      @charset = charset if charset
+      @fallback = nil
+      clear
+    end
+
+    def clear
+      @posix = nil
+      @iso3066 = nil
+      @win = nil
+      @general = nil
+      @hash = "#{self.class}:#{to_general}.#{@charset}@#{@modifier}".hash
+    end
+    
+    # Returns the locale as POSIX format(but charset is ignored). (e.g.) "ja_JP"
+    def to_posix
+      return @posix if @posix
+      @posix = @language.dup
+
+      @posix << "_#{@country}" if @country
+      @posix
+    end
+
+    # Returns the locale as ISO3066 format. (e.g.) "ja-JP"
+    def to_iso3066
+      return @iso3066 if @iso3066
+
+      @iso3066 = @language.dup
+      @iso3066 << "-#{@country}" if @country
+      @iso3066
+    end
+
+    # Returns the locale as Win32 format. (e.g.) "az-AZ-Latn".
+    # 
+    # This is used to find the charset from locale table.
+    def to_win
+      return @win if @win
+
+      @win = @language.dup
+      @win << "-#{@country}" if @country
+      @win << "-#{@script}" if @script
+      @win
+    end
+
+    # Returns the locale as 'ruby' general format. (e.g.) "az_AZ_Latn"
+    def to_general
+      return @general if @general
+ 
+      @general = @language.dup
+      @general << "_#{@country}" if @country
+      @general << "_#{@script}" if @script 
+      @general
+    end
+
+    # Gets the locale informations as an Array.
+    # * Returns [language, country, charset, script, variant, modifier]
+    #   * language: a lowercase ISO 639(or 639-2/T) language code.
+    #   * country: an uppercase ISO 3166-1 country/region identifier.
+    #   * charset: charset(codeset) (no standard)
+    #   * script: an initial-uppercase ISO 15924 script code. 
+    #   * variant: variant value in CLDR or sort order in Win32.
+    #   * modifier: (no standard)
+    def to_a
+      [@language, @country, @charset, @script, @variant, @modifier]
+    end
+
+    def ==(other)  #:nodoc:
+      other != nil and @hash == other.hash
+    end
+
+    def eql?(other) #:nodoc:
+      self.==(other)
+    end
+
+    def hash #:nodoc:
+      @hash
+    end
+    alias :to_s :to_posix
+    alias :to_str :to_posix
+  end
+end

data/lib/locale/posix.rb

@@ -0,0 +1,22 @@
+=begin
+  locale/posix.rb 
+
+  Copyright (C) 2002-2007  Masao Mutoh
+
+  You may redistribute it and/or modify it under the same
+  license terms as Ruby.
+
+  $Id: posix.rb,v 1.2 2007/11/08 16:44:22 mutoh Exp $
+=end
+
+require 'locale/base'
+
+module Locale 
+  # Locale::SystemPosix module for Posix OS (Unix)
+  # This is a low-level class. Application shouldn't use this directly.
+  module SystemPosix
+    extend SystemBase
+  end
+  @@locale_system_module = SystemPosix
+end
+