iGEL-ua_parser 0.0.1

data/test/presto_test.rb

@@ -0,0 +1,169 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+require 'test/unit'
+require 'ua_parser'
+
+class PrestoTest < Test::Unit::TestCase
+  include UaParser
+  
+  def test_opera_852_linux_as_ie_6
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 6.0; X11; Linux i686; en) Opera 8.52"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :opera, ua.name
+    assert_equal "8.52", ua.version.full
+    assert_equal "8.5", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_854_win_xp
+    ua = UserAgent.new "Opera/8.54 (Windows NT 5.1; U; pl)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :opera, ua.name
+    assert_equal "8.54", ua.version.full
+    assert_equal "8.5", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_923_win_xp
+    ua = UserAgent.new "Opera/9.23 (Windows NT 5.1; U; SV1; MEGAUPLOAD 1.0; ru)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :opera, ua.name
+    assert_equal "9.23", ua.version.full
+    assert_equal "9.2", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_963_linux
+    ua = UserAgent.new "Opera/9.63 (X11; Linux i686; U; de) Presto/2.1.1"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal "2.1.1", ua.render_engine_version.full
+    assert_equal :opera, ua.name
+    assert_equal "9.63", ua.version.full
+    assert_equal "9.6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_963_win_me_as_ie_6
+    ua = UserAgent.new "Mozilla/5.0 (Windows ME; U; en; rv:1.8.1) Gecko/20061208 Firefox/2.0.0 Opera 9.63"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :opera, ua.name
+    assert_equal "9.63", ua.version.full
+    assert_equal "9.6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_963_win_vista
+    ua = UserAgent.new "Opera/9.63 (Windows NT 6.0; U; en) Presto/2.1.1"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal "2.1.1", ua.render_engine_version.full
+    assert_equal :opera, ua.name
+    assert_equal "9.63", ua.version.full
+    assert_equal "9.6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_opera_963_win_vista_as_ie_6
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 6.0; ja) Opera 9.63"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :presto, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :opera, ua.name
+    assert_equal "9.63", ua.version.full
+    assert_equal "9.6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+end

data/test/trident_test.rb

@@ -0,0 +1,146 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+require 'test/unit'
+require 'ua_parser'
+
+class TridentTest < Test::Unit::TestCase
+  include UaParser
+  
+  def test_msie_60_win_2003
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; SV1; .NET CLR 1.1.4322)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :internet_explorer, ua.name
+    assert_equal "6.0", ua.version.full
+    assert_equal "6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_msie_60_win_xp
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :internet_explorer, ua.name
+    assert_equal "6.0", ua.version.full
+    assert_equal "6", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_msie_70_win_vista_dotnet_2050727_dotnet_3004506_media_center
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.0; SLCC1; .NET CLR 2.0.50727; Media Center PC 5.0; .NET CLR 3.0.04506)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :internet_explorer, ua.name
+    assert_equal "7.0", ua.version.full
+    assert_equal "7", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_msie_70_win_xp_dotnet_114322
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :internet_explorer, ua.name
+    assert_equal "7.0", ua.version.full
+    assert_equal "7", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_msie_70_win_xp
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal nil, ua.render_engine_version
+    assert_equal :internet_explorer, ua.name
+    assert_equal "7.0", ua.version.full
+    assert_equal "7", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_msie_80_win_xp
+    ua = UserAgent.new "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :trident, ua.render_engine
+    assert_equal "4.0", ua.render_engine_version.full
+    assert_equal :internet_explorer, ua.name
+    assert_equal "8.0", ua.version.full
+    assert_equal "8", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+end

data/test/version_test.rb

@@ -0,0 +1,130 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+require 'test/unit'
+require 'ua_parser/version'
+
+class VersionTest < Test::Unit::TestCase
+  include UaParser
+  def test_compare_1
+    assert Version.new("1.0") < Version.new("2.0")
+  end
+
+  def test_compare_2
+    assert Version.new("1.0") < Version.new("1.2")
+  end
+
+  def test_compare_3
+    assert Version.new("1.0.0") > Version.new("1.0b2")
+  end
+
+  def test_compare_4
+    assert Version.new("1.0") > Version.new("1.0b2")
+  end
+
+  def test_compare_5
+    assert Version.new("1.0") == Version.new("1.0")
+  end
+
+  def test_compare_6
+    assert Version.new("1.0") < Version.new("1.0.2")
+  end
+
+  def test_compare_7
+    assert Version.new("1.0.2") => Version.new("1.0")
+  end
+
+  def test_compare_8
+    assert Version.new("1.10.3") => Version.new("1.3.7")
+  end
+
+  def test_compare_different_agents
+    assert_raise Version::DifferentAgentsNotComparable do
+      Version.new("1.0", :opera) < Version.new("2.0", :netscape)
+    end
+  end
+
+  def test_compare_same_agents
+    assert Version.new("1.0.2", :opera) => Version.new("1.0", :opera)
+  end
+
+  def test_compare_with_integer
+    assert_raise TypeError do
+      Version.new("1.0") < 3
+    end
+  end
+  
+  def test_initialize_with_array
+    assert_raise TypeError do 
+      Version.new([1, 2, 3])
+    end
+  end
+
+  def test_initialize_with_float
+    v = Version.new(1.0)
+    assert_kind_of Version, v
+    assert_equal "1.0", v.full
+  end
+
+  def test_initialize_with_integer
+    v = Version.new(1)
+    assert_kind_of Version, v
+    assert_equal "1", v.full
+  end
+
+  def test_initialize_with_nil
+    assert_raise TypeError do
+      Version.new(nil)
+    end
+  end
+
+  def test_initialize_with_string
+    v = Version.new("1.0")
+    assert_kind_of Version, v
+    assert_equal "1.0", v.full
+  end
+
+  def test_java_version
+    v = Version.new("1.6.0_03")
+    assert_equal [1, 6, 0, 0, 3], v.send(:tokens)
+  end
+
+  def test_major_1
+    v = Version.new "1"
+    assert_equal "1", v.major
+  end
+
+  def test_major_1_0
+    v = Version.new "1.0"
+    assert_equal "1.0", v.major
+  end
+
+  def test_major_1_12
+    v = Version.new "1.12"
+    assert_equal "1.12", v.major
+  end
+
+  def test_major_1_12_opera
+    v = Version.new "1.12", :opera
+    assert_equal "1.1", v.major
+  end
+
+  def test_major_2_0_0_14
+    v = Version.new "2.0.0.14"
+    assert_equal "2.0", v.major
+  end
+
+  def test_major_2_0b3
+    v = Version.new "2.0b3"
+    assert_equal "2.0b", v.major
+  end
+
+  def test_major_4_0_dp
+    v = Version.new "4.0dp"
+    assert_equal "4.0dp", v.major
+  end
+
+  def test_major_503_34
+    v = Version.new "503.34"
+    assert_equal "503.34", v.major
+  end
+end

data/test/webkit_test.rb

@@ -0,0 +1,242 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+require 'test/unit'
+require 'ua_parser'
+
+class WebkitTest < Test::Unit::TestCase
+  include UaParser
+
+  def test_chrome_031549_windows_7
+    ua = UserAgent.new "Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US) AppleWebKit/525.19 (KHTML, like Gecko) Chrome/0.3.154.9 Safari/525.19"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "525.19", ua.render_engine_version.full
+    assert_equal :chrome, ua.name
+    assert_equal "0.3.154.9", ua.version.full
+    assert_equal "0.3", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_chrome_1015439_windows_xp
+    ua = UserAgent.new "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/525.19 (KHTML, like Gecko) Chrome/1.0.154.39 Safari/525.19"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "525.19", ua.render_engine_version.full
+    assert_equal :chrome, ua.name
+    assert_equal "1.0.154.39", ua.version.full
+    assert_equal "1.0", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_chrome_201561_windows_7
+    ua = UserAgent.new "Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US) AppleWebKit/528.8 (KHTML, like Gecko) Chrome/2.0.156.1 Safari/528.8"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "528.8", ua.render_engine_version.full
+    assert_equal :chrome, ua.name
+    assert_equal "2.0.156.1", ua.version.full
+    assert_equal "2.0", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_chrome_201572_windows_vista
+    ua = UserAgent.new "Mozilla/5.0 (Windows; U; Windows NT 6.0; en-US) AppleWebKit/528.10 (KHTML, like Gecko) Chrome/2.0.157.2 Safari/528.10"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "528.10", ua.render_engine_version.full
+    assert_equal :chrome, ua.name
+    assert_equal "2.0.157.2", ua.version.full
+    assert_equal "2.0", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+=begin
+  def test_safari_132_mac_10_ppc
+    ua = UserAgent.new "Mozilla/5.0 (Macintosh; U; PPC Mac OS X; en-us) AppleWebKit/312.8 (KHTML, like Gecko) Safari/312.6"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "312.6", ua.render_engine_version.full
+    assert_equal :safari, ua.name
+    assert_equal "1.3.2", ua.version.full
+    assert_equal "1.3", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_safari_202
+    ua = UserAgent.new "Mozilla/5.0 (Macintosh; U; PPC Mac OS X; fr) AppleWebKit/416.12 (KHTML, like Gecko) Safari/412.5"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "412.5", ua.render_engine_version.full
+    assert_equal :safari, ua.name
+    assert_equal "2.0.2", ua.version.full
+    assert_equal "2.0", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+=end
+  
+  def test_safari_32_mac_intel
+    ua = UserAgent.new "Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_5_5; ja-jp) AppleWebKit/525.26.2 (KHTML, like Gecko) Version/3.2 Safari/525.26.12"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "525.26.2", ua.render_engine_version.full
+    assert_equal "525.26", ua.render_engine_version.major
+    assert_equal :safari, ua.name
+    assert_equal "3.2", ua.version.full
+    assert_equal "3.2", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_safari_32_windows_xp
+    ua = UserAgent.new "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru-RU) AppleWebKit/525.26.2 (KHTML, like Gecko) Version/3.2 Safari/525.26.13"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "525.26.2", ua.render_engine_version.full
+    assert_equal :safari, ua.name
+    assert_equal "3.2", ua.version.full
+    assert_equal "3.2", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_safari_40_mac_ppc
+    ua = UserAgent.new "Mozilla/5.0 (Macintosh; U; PPC Mac OS X 10_4_11; en) AppleWebKit/528.4+ (KHTML, like Gecko) Version/4.0 Safari/528.1"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "528.4+", ua.render_engine_version.full
+    assert_equal "528.4+", ua.render_engine_version.major
+    assert_equal :safari, ua.name
+    assert_equal "4.0", ua.version.full
+    assert_equal "4.0", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+
+  def test_safari_40dp1_mac_10_intel
+    ua = UserAgent.new "Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_5_6; en-gb) AppleWebKit/528.10+ (KHTML, like Gecko) Version/4.0dp1 Safari/526.11.2"
+    assert ua.known?
+    assert ua.browser?
+    assert !ua.bot?
+    assert !ua.feed_reader?
+    assert !ua.other?
+    assert_equal :webkit, ua.render_engine
+    assert_equal "528.10+", ua.render_engine_version.full
+    assert_equal :safari, ua.name
+    assert_equal "4.0dp1", ua.version.full
+    assert_equal "4.0dp", ua.version.major
+    assert_equal [], ua.emails
+    assert_equal nil, ua.email
+    assert_equal [], ua.urls
+    assert_equal nil, ua.url
+    [:architecture, :dotnet_versions, :os, :os_type, :os_version, :ui_lang, :ui_lang_country, :vendor].each do |method|
+      assert_raise NotImplementedError do
+        ua.method(method).call
+      end
+    end
+  end
+end