jpmobile 0.1.6 → 1.0.0.pre

data/lib/jpmobile/mailer.rb

@@ -0,0 +1,31 @@
+# -*- coding: utf-8 -*-
+require 'jpmobile/mail'
+
+module Jpmobile
+  module Mailer
+    class Base < ActionMailer::Base
+      self._view_paths = self._view_paths.dup
+      self.view_paths.unshift(Jpmobile::Resolver.new(File.join(::Rails.root, "app/views")))
+
+      def mail(headers={}, &block)
+        tos = headers[:to].split(/,/)
+
+        @mobile = if tos.size == 1
+                    # for mobile
+                    (Jpmobile::Email.detect(tos.first) || Jpmobile::Mobile::AbstractMobile).new(nil, nil)
+                  else
+                    # for multi to addresses
+                    Jpmobile::Mobile::AbstractMobile.new(nil, nil)
+                  end
+        self.lookup_context.mobile = @mobile.variants
+
+        m = super(headers, &block)
+
+        m.mobile  = @mobile
+        m.charset = @mobile.mail_charset
+
+        m
+      end
+    end
+  end
+end

data/lib/jpmobile/mobile/abstract_mobile.rb

@@ -4,6 +4,9 @@ require 'ipaddr'
 module Jpmobile::Mobile
   # 携帯電話の抽象クラス。
   class AbstractMobile
+    # メールのデフォルトのcharset
+    MAIL_CHARSET = "ISO-2022-JP"
+
     def initialize(env, request)
       @env     = env
       @request = request
@@ -65,6 +68,69 @@ module Jpmobile::Mobile
     def default_charset
       "UTF-8"
     end
+
+    # for view selector
+    def variants
+      return @_variants if @_variants
+
+      @_variants = self.class.ancestors.select {|c| c.to_s =~ /^Jpmobile/}.map do |klass|
+        klass = klass.to_s.
+          gsub(/Jpmobile::/, '').
+          gsub(/AbstractMobile::/, '').
+          gsub(/Mobile::SmartPhone/, 'smart_phone').
+          gsub(/::/, '_').
+          gsub(/([A-Z]+)([A-Z][a-z])/, '\1_\2').
+          gsub(/([a-z\d])([A-Z])/, '\1_\2').
+          downcase
+        klass =~ /abstract/ ? "mobile" : klass
+      end
+
+      if @_variants.include?("smart_phone")
+        @_variants = @_variants.reject{|v| v == "mobile"}.map{|v| v.gsub(/mobile/, "smart_phone")}
+      end
+
+      @_variants
+    end
+
+    # メール送信用
+    def to_mail_subject(str)
+      "=?#{mail_charset}?B?" + [to_mail_encoding(str)].pack('m').strip + "?="
+    end
+    def to_mail_body(str)
+      to_mail_encoding(str)
+    end
+    def mail_charset(charset = nil)
+      (charset.nil? or charset == "") ? self.class::MAIL_CHARSET : charset
+    end
+    def to_mail_encoding(str)
+      str = Jpmobile::Emoticon.unicodecr_to_external(str, Jpmobile::Emoticon::CONVERSION_TABLE_TO_PC_EMAIL, false)
+      Jpmobile::Util.encode(str, mail_charset)
+    end
+    def utf8_to_mail_encode(str)
+      case mail_charset
+      when /ISO-2022-JP/i
+        Jpmobile::Util.utf8_to_jis(str)
+      when /Shift_JIS/i
+        Jpmobile::Util.utf8_to_sjis(str)
+      else
+        str
+      end
+    end
+    def to_mail_internal(str, charset)
+      str
+    end
+    def to_mail_subject_encoded?(str)
+      str.match(/\=\?#{mail_charset}\?B.+\?\=/i)
+    end
+    def to_mail_body_encoded?(str)
+      Jpmobile::Util.jis?(str)
+    end
+    def decode_transfer_encoding(body, charset)
+      body = Jpmobile::Util.set_encoding(body, charset)
+      body = to_mail_internal(body, nil)
+      Jpmobile::Util.force_encode(body, charset, Jpmobile::Util::UTF8)
+    end
+
     # リクエストがこのクラスに属するか調べる
     # メソッド名に関して非常に不安
     def self.check_carrier(env)

data/lib/jpmobile/mobile/au.rb

@@ -9,7 +9,7 @@ module Jpmobile::Mobile
     # User-Agent文字列中に "UP.Browser" を含むVodafoneの端末があるので注意が必要
     USER_AGENT_REGEXP = /^(?:KDDI|UP.Browser\/.+?)-(.+?) /
     # 対応するメールアドレスの正規表現
-    MAIL_ADDRESS_REGEXP = /^.+@ezweb\.ne\.jp$/
+    MAIL_ADDRESS_REGEXP = /.+@ezweb\.ne\.jp/
     # 簡易位置情報取得に対応していないデバイスID
     # http://www.au.kddi.com/ezfactory/tec/spec/eznavi.html
     LOCATION_UNSUPPORTED_DEVICE_ID = ["PT21", "TS25", "KCTE", "TST9", "KCU1", "SYT5", "KCTD", "TST8", "TST7", "KCTC", "SYT4", "KCTB", "KCTA", "TST6", "KCT9", "TST5", "TST4", "KCT8", "SYT3", "KCT7", "MIT1", "MAT3", "KCT6", "TST3", "KCT5", "KCT4", "SYT2", "MAT1", "MAT2", "TST2", "KCT3", "KCT2", "KCT1", "TST1", "SYT1"]
@@ -86,7 +86,6 @@ module Jpmobile::Mobile
       str = Jpmobile::Util.sjis_to_utf8(str)
       # 数値参照を UTF-8 に変換
       Jpmobile::Emoticon::unicodecr_to_utf8(str)
-      # 半角->全角変換
     end
     def to_external(str, content_type, charset)
       # UTF-8を数値参照に
@@ -104,5 +103,29 @@ module Jpmobile::Mobile
     def default_charset
       "Shift_JIS"
     end
+
+    # メール送信用
+    def to_mail_subject(str)
+      "=?#{mail_charset}?B?" + [to_mail_encoding(str)].pack('m').strip + "?="
+    end
+    def to_mail_body(str)
+      to_mail_encoding(str)
+    end
+
+    def to_mail_internal(str, charset)
+      if Jpmobile::Util.jis?(str) or Jpmobile::Util.ascii_8bit?(str) or charset == mail_charset
+        # 絵文字を数値参照に変換
+        str = Jpmobile::Emoticon.external_to_unicodecr_au_mail(Jpmobile::Util.jis(str))
+        str = Jpmobile::Util.jis_to_utf8(Jpmobile::Util.jis(str))
+      end
+      str
+    end
+
+    private
+    def to_mail_encoding(str)
+      str = Jpmobile::Emoticon.utf8_to_unicodecr(str)
+      str = Jpmobile::Util.utf8_to_jis(str)
+      Jpmobile::Util.jis(Jpmobile::Emoticon.unicodecr_to_au_email(str))
+    end
   end
 end

data/lib/jpmobile/mobile/docomo.rb

@@ -7,7 +7,9 @@ module Jpmobile::Mobile
     # 対応するUser-Agentの正規表現
     USER_AGENT_REGEXP = /^DoCoMo/
     # 対応するメールアドレスの正規表現
-    MAIL_ADDRESS_REGEXP = /^.+@docomo\.ne\.jp$/
+    MAIL_ADDRESS_REGEXP = /.+@docomo\.ne\.jp/
+    # メールのデフォルトのcharset
+    MAIL_CHARSET = "Shift_JIS"
 
     # オープンiエリアがあればエリアコードを +String+ で返す。無ければ +nil+ を返す。
     def areacode
@@ -94,6 +96,26 @@ module Jpmobile::Mobile
       "Shift_JIS"
     end
 
+    # メール送信用
+    def to_mail_subject(str)
+      str = to_external(str, nil, nil).first
+      "=?#{mail_charset}?B?" + [str].pack('m').strip + "?="
+    end
+    def to_mail_body(str)
+      to_external(str, nil, nil).first
+    end
+    def to_mail_internal(str, charset)
+      if Jpmobile::Util.shift_jis?(str) or Jpmobile::Util.ascii_8bit?(str) or charset == mail_charset
+        # 絵文字を数値参照に変換
+        str = Jpmobile::Emoticon.external_to_unicodecr_docomo(Jpmobile::Util.sjis(str))
+      end
+
+      str
+    end
+    def to_mail_body_encoded?(str)
+      Jpmobile::Util.shift_jis?(str)
+    end
+
     # i-mode ブラウザのバージョンを返す。
     # http://labs.unoh.net/2009/07/i_20.html
     def imode_browser_version

data/lib/jpmobile/mobile/emobile.rb

@@ -6,7 +6,7 @@ module Jpmobile::Mobile
   class Emobile < AbstractMobile
     USER_AGENT_REGEXP = %r{^emobile/|^Mozilla/5.0 \(H11T; like Gecko; OpenBrowser\) NetFront/3.4$|^Mozilla/4.0 \(compatible; MSIE 6.0; Windows CE; IEMobile 7.7\) S11HT$}
     # 対応するメールアドレスの正規表現
-    MAIL_ADDRESS_REGEXP = /^.+@emnet\.ne\.jp$/
+    MAIL_ADDRESS_REGEXP = /.+@emnet\.ne\.jp/
     # EMnet対応端末から通知されるユニークなユーザIDを取得する。
     def em_uid
       @request.env['HTTP_X_EM_UID']

data/lib/jpmobile/mobile/softbank.rb

@@ -8,7 +8,9 @@ module Jpmobile::Mobile
     # 対応するuser-agentの正規表現
     USER_AGENT_REGEXP = /^(?:SoftBank|Semulator)/
     # 対応するメールアドレスの正規表現　ディズニーモバイル対応
-    MAIL_ADDRESS_REGEXP = /^.+@(?:softbank\.ne\.jp|disney\.ne\.jp)$/
+    MAIL_ADDRESS_REGEXP = /.+@(?:softbank\.ne\.jp|disney\.ne\.jp)/
+    # メールのデフォルトのcharset
+    MAIL_CHARSET = "Shift_JIS"
 
     # 製造番号を返す。無ければ +nil+ を返す。
     def serial_number
@@ -58,5 +60,35 @@ module Jpmobile::Mobile
 
       [str, charset]
     end
+
+    # メール送信用
+    def to_mail_subject(str)
+      "=?#{mail_charset}?B?" + [to_mail_encoding(str)].pack('m').strip + "?="
+    end
+    def to_mail_body(str)
+      to_mail_encoding(str)
+    end
+    def to_mail_internal(str, charset)
+      # 絵文字を数値参照に変換
+      if Jpmobile::Util.utf8?(str) or charset == "UTF-8"
+        # UTF-8
+        str = Jpmobile::Emoticon.external_to_unicodecr_softbank(Jpmobile::Util.utf8(str))
+      elsif Jpmobile::Util.shift_jis?(str) or Jpmobile::Util.ascii_8bit?(str) or charset == mail_charset
+        # Shift_JIS
+        str = Jpmobile::Emoticon.external_to_unicodecr_softbank_sjis(Jpmobile::Util.sjis(str))
+      end
+
+      str
+    end
+    def to_mail_body_encoded?(str)
+      Jpmobile::Util.shift_jis?(str)
+    end
+
+    private
+    def to_mail_encoding(str)
+      str = Jpmobile::Emoticon.utf8_to_unicodecr(str)
+      str = Jpmobile::Util.utf8_to_sjis(str)
+      Jpmobile::Emoticon.unicodecr_to_softbank_email(str)
+    end
   end
 end

data/lib/jpmobile/mobile/vodafone.rb

@@ -7,7 +7,7 @@ module Jpmobile::Mobile
     # 対応するUser-Agentの正規表現
     USER_AGENT_REGEXP = /^(Vodafone|Vemulator)/
     # 対応するメールアドレスの正規表現
-    MAIL_ADDRESS_REGEXP = /^.+@[dhtcrknsq]\.vodafone\.ne\.jp$/
+    MAIL_ADDRESS_REGEXP = /.+@[dhtcrknsq]\.vodafone\.ne\.jp/
 
     # cookieに対応しているか？
     def supports_cookie?

data/lib/jpmobile/mobile/willcom.rb

@@ -7,7 +7,7 @@ module Jpmobile::Mobile
     # 対応するUser-Agentの正規表現
     USER_AGENT_REGEXP = /^Mozilla\/3.0\(WILLCOM/
     # 対応するメールアドレスの正規表現
-    MAIL_ADDRESS_REGEXP = /^.+@(.+\.)?pdx\.ne\.jp$/
+    MAIL_ADDRESS_REGEXP = /.+@((.+\.)?pdx\.ne\.jp|willcom\.com)/
 
     # 位置情報があれば Position のインスタンスを返す。無ければ +nil+ を返す。
     def position

data/lib/jpmobile/path_set.rb

@@ -0,0 +1,40 @@
+module Jpmobile
+  class PathSet < Array
+    %w(initialize << concat insert push unshift).each do |method|
+      class_eval <<-METHOD, __FILE__, __LINE__ + 1
+        def #{method}(*args)
+          super
+          typecast!
+        end
+      METHOD
+    end
+
+    def find(path, prefix = nil, partial = false, details = {}, key = nil)
+      template = find_all(path, prefix, partial, details, key).first
+      raise MissingTemplate.new(self, "#{prefix}/#{path}", details, partial) unless template
+      template
+    end
+
+    def find_all(*args)
+      each do |resolver|
+        templates = resolver.find_all(*args)
+        return templates unless templates.empty?
+      end
+      []
+    end
+
+    def exists?(*args)
+      find_all(*args).any?
+    end
+
+    protected
+
+    def typecast!
+      each_with_index do |path, i|
+        path = path.to_s if path.is_a?(Pathname)
+        next unless path.is_a?(String)
+        self[i] = Jpmobile::Resolver.new(path)
+      end
+    end
+  end
+end

data/lib/jpmobile/rails.rb

@@ -21,3 +21,27 @@ ActiveSupport.on_load(:before_configuration) do
     end
   end
 end
+
+module Jpmobile
+  module ViewSelector
+    def self.included(base)
+      base.class_eval do
+        before_filter :register_mobile
+
+        self._view_paths = self._view_paths.dup
+        self.view_paths.unshift(Jpmobile::Resolver.new(File.join(Rails.root, "app/views")))
+      end
+    end
+
+    def register_mobile
+      if request.mobile
+        # register mobile
+        self.lookup_context.mobile = request.mobile.variants
+      end
+    end
+
+    def disable_mobile_view!
+      self.lookup_context.mobile = nil
+    end
+  end
+end

data/lib/jpmobile/resolver.rb

@@ -0,0 +1,38 @@
+module Jpmobile
+  class Resolver < ActionView::FileSystemResolver
+    # EXTENSION_ORDER = [:variants, :locale, :formats, :handlers]
+
+    def find_templates(name, prefix, partial, details)
+      path = build_path(name, prefix, partial, details)
+      query(path, EXTENSION_ORDER.map { |ext| details[ext] }, details[:formats], details[:mobile])
+    end
+
+    def build_path(name, prefix, partial, details)
+      path = ""
+      path << "#{prefix}/" unless prefix.empty?
+      path << (partial ? "_#{name}" : name)
+      path
+    end
+
+    def query(path, exts, formats, mobile)
+      query = File.join(@path, path)
+      query << '{' << mobile.map {|v| "_#{v}"}.join(',') << ',}' if mobile and mobile.respond_to?(:map)
+
+      exts.each do |ext|
+        query << '{' << ext.map {|e| e && ".#{e}" }.join(',') << ',}'
+      end
+
+      query.gsub!(/\{\.html,/, "{.html,.text.html,")
+      query.gsub!(/\{\.text,/, "{.text,.text.plain,")
+
+      Dir[query].reject { |p| File.directory?(p) }.map do |p|
+        handler, format = extract_handler_and_format(p, formats)
+
+        contents = File.open(p, "rb") {|io| io.read }
+
+        ActionView::Template.new(contents, File.expand_path(p), handler,
+          :virtual_path => path, :format => format)
+      end
+    end
+  end
+end

data/lib/jpmobile/util.rb

@@ -1,6 +1,16 @@
+# -*- coding: utf-8 -*-
 require 'tempfile'
 module Jpmobile
   module Util
+    # SJIS   = "Shift_JIS"
+    SJIS   = "Windows-31J"
+    UTF8   = "UTF-8"
+    JIS    = "ISO-2022-JP"
+    BINARY = "ASCII-8BIT"
+
+    WAVE_DASH = [0x301c].pack("U")
+    FULLWIDTH_TILDE = [0xff5e].pack("U")
+
     module_function
     def deep_apply(obj, &proc)
       case obj
@@ -44,40 +54,69 @@ module Jpmobile
       new_obj
     end
 
-    def sjis(ascii_8bit)
-      if ascii_8bit.respond_to?(:force_encoding)
-        ascii_8bit.force_encoding("Shift_JIS")
+    def sjis(str)
+      if str.respond_to?(:force_encoding) and !shift_jis?(str)
+        str.force_encoding(SJIS)
+      end
+      str
+    end
+
+    def utf8(str)
+      if str.respond_to?(:force_encoding) and !utf8?(str)
+        str.force_encoding(UTF8)
       end
-      ascii_8bit
+      str
     end
 
-    def utf8(ascii_8bit)
-      if ascii_8bit.respond_to?(:force_encoding)
-        ascii_8bit.force_encoding("utf-8")
+    def jis(str)
+      if str.respond_to?(:force_encoding) and !jis?(str)
+        str.force_encoding(JIS)
       end
-      ascii_8bit
+      str
     end
 
     def ascii_8bit(str)
-      if str.respond_to?(:force_encoding)
-        str.force_encoding("ASCII-8BIT")
+      if str.respond_to?(:force_encoding) and !ascii_8bit?(str)
+        str.force_encoding(BINARY)
       end
       str
     end
 
     def utf8_to_sjis(utf8_str)
+      # 波ダッシュ対策
+      utf8_str = wavedash_to_fullwidth_tilde(utf8_str)
+
       if utf8_str.respond_to?(:encode)
-        utf8_str.encode("Shift_JIS", :crlf_newline => true)
+        utf8_str.encode(SJIS, :crlf_newline => true)
       else
         NKF.nkf("-m0 -x -W --oc=cp932", utf8_str).gsub(/\n/, "\r\n")
       end
     end
 
     def sjis_to_utf8(sjis_str)
-      if sjis_str.respond_to?(:encode)
-        sjis_str.encode("UTF-8", :universal_newline => true)
+      utf8_str = if sjis_str.respond_to?(:encode)
+                   sjis_str.encode("UTF-8", :universal_newline => true)
+                 else
+                   NKF.nkf("-m0 -x -w --ic=cp932", sjis_str).gsub(/\r\n/, "\n")
+                 end
+
+      # 波ダッシュ対策
+      fullwidth_tilde_to_wavedash(utf8_str)
+    end
+
+    def utf8_to_jis(utf8_str)
+      if utf8_str.respond_to?(:encode)
+        utf8_str.encode(JIS, :crlf_newline => true)
+      else
+        NKF.nkf("-m0 -x -Wj", utf8_str).gsub(/\n/, "\r\n")
+      end
+    end
+
+    def jis_to_utf8(jis_str)
+      if jis_str.respond_to?(:encode)
+        jis_str.encode(UTF8, :universal_newline => true)
       else
-        NKF.nkf("-m0 -x -w --ic=cp932", sjis_str).gsub(/\r\n/, "\n")
+        NKF.nkf("-m0 -x -Jw", jis_str).gsub(/\r\n/, "\n")
       end
     end
 
@@ -89,11 +128,181 @@ module Jpmobile
       end
     end
 
+    def regexp_to_sjis(sjis_str)
+      if Object.const_defined?(:Encoding)
+        Regexp.compile(Regexp.escape(sjis(sjis_str)))
+      else
+        Regexp.compile(Regexp.escape(sjis_str,"s"),nil,'s')
+      end
+    end
+
     def hash_to_utf8(hash)
       new_hash = {}
       hash.each do |keu, value|
         new_hash[utf8(key)] = utf8(value)
       end
     end
+
+    def sjis_regexp(sjis)
+      sjis_str = sjis.kind_of?(Numeric) ? [sjis].pack('n') : sjis
+
+      if Object.const_defined?(:Encoding)
+        Regexp.compile(Regexp.escape(sjis_str.force_encoding(SJIS)))
+      else
+        Regexp.compile(Regexp.escape(sjis_str,"s"),nil,'s')
+      end
+    end
+
+    def jis_regexp(jis)
+      jis_str = jis.kind_of?(Numeric) ? [jis].pack('n') : jis
+
+      if Object.const_defined?(:Encoding)
+        # Regexp.compile(Regexp.escape(jis_str.force_encoding("stateless-ISO-2022-JP-KDDI"))) # for au only
+        Regexp.compile(Regexp.escape(jis_str.force_encoding(BINARY))) # for au only
+      else
+        Regexp.compile(Regexp.escape(jis_str,"j"),nil,'j')
+      end
+    end
+
+    def jis_string_regexp
+      Regexp.compile(Regexp.escape(ascii_8bit("\x1b\x24\x42")) + "(.+)" + Regexp.escape(ascii_8bit("\x1b\x28\x42")))
+    end
+
+    def encode(str, charset)
+      if Object.const_defined?(:Encoding)
+        (charset.nil? or charset == "" or str.nil? or str == "") ? str : str.encode(charset)
+      else
+        if str.nil?
+          str
+        else
+          case charset
+          when /iso-2022-jp/i
+            NKF.nkf("-j", str)
+          when /shift_jis/i
+            NKF.nkf("-s", str)
+          when /utf-8/i
+            NKF.nkf("-w", str)
+          else
+            str
+          end
+        end
+      end
+    end
+
+    def wavedash_to_fullwidth_tilde(utf8_str)
+      utf8_str.gsub(WAVE_DASH, FULLWIDTH_TILDE)
+    end
+
+    def fullwidth_tilde_to_wavedash(utf8_str)
+      utf8_str.gsub(FULLWIDTH_TILDE, WAVE_DASH)
+    end
+
+    def force_encode(str, from, to)
+      s = str.dup
+      return str if detect_encoding(str) == to
+
+      if Object.const_defined?(:Encoding)
+        to = SJIS if to =~ /shift_jis/i
+
+        to_enc = ::Encoding.find(to)
+        return str if s.encoding == to_enc
+
+        if from
+          from_enc = ::Encoding.find(from)
+          s.force_encoding(from) unless s.encoding == from_enc
+        end
+
+        s.encode(to)
+      else
+        opt = []
+        opt << case from
+               when /iso-2022-jp/i
+                 "-Jx"
+               when /shift_jis/i
+                 "-Sx"
+               when /utf-8/i
+                 "-Wx"
+               else
+                 ""
+               end
+        opt << case to
+               when /iso-2022-jp/i
+                 "-j"
+               when /shift_jis/i, /windows_31j/i
+                 "-s"
+               when /utf-8/i
+                 "-w"
+               else
+                 ""
+               end
+        NKF.nkf(opt.join(" "), str)
+      end
+    end
+
+    def set_encoding(str, encoding)
+      if encoding and Object.const_defined?(:Encoding)
+        encoding = SJIS if encoding =~ /shift_jis/i
+
+        str.force_encoding(encoding)
+      end
+
+      str
+    end
+
+    def extract_charset(str)
+      case str
+      when /iso-2022-jp/i
+        "ISO-2022-JP"
+      when /shift_jis/i
+        "Shift_JIS"
+      when /utf-8/i
+        "UTF-8"
+      else
+        ""
+      end
+    end
+
+    def detect_encoding(str)
+      if Object.const_defined?(:Encoding)
+        case str.encoding
+        when ::Encoding::ISO2022_JP
+          JIS
+        when ::Encoding::Shift_JIS, ::Encoding::Windows_31J, ::Encoding::CP932
+          SJIS
+        when ::Encoding::UTF_8
+          UTF8
+        when ::Encoding::ASCII_8BIT
+          BINARY
+        else
+          BINARY
+        end
+      else
+        case NKF.guess(str)
+        when NKF::SJIS
+          SJIS
+        when NKF::JIS
+          JIS
+        when NKF::UTF8
+          UTF8
+        when NKF::BINARY
+          BINARY
+        else
+          BINARY
+        end
+      end
+    end
+
+    def ascii_8bit?(str)
+      detect_encoding(str) == BINARY
+    end
+    def utf8?(str)
+      detect_encoding(str) == UTF8
+    end
+    def shift_jis?(str)
+      detect_encoding(str) == SJIS
+    end
+    def jis?(str)
+      detect_encoding(str) == JIS
+    end
   end
 end