* ext/socket/option.c (inspect_peercred): new function to show

  SO_PEERCRED socket option.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@22131 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 20 insertions, 4 deletions

diff --git a/test/socket/test_unix.rb b/test/socket/test_unix.rb
index 31d60e3ff3..ca4b17b3f4 100644
--- a/test/socket/test_unix.rb
+++ b/test/socket/test_unix.rb
@@ -296,7 +296,23 @@ class TestUNIXSocket < Test::Unit::TestCase
     }
   end
 
-  def test_cred_ucred
+  def test_getcred_ucred
+    return if /linux/ !~ RUBY_PLATFORM
+    Dir.mktmpdir {|d|
+      sockpath = "#{d}/sock"
+      serv = Socket.unix_server_socket(sockpath)
+      c = Socket.unix(sockpath)
+      s, = serv.accept
+      cred = s.getsockopt(:SOCKET, :PEERCRED)
+      inspect = cred.inspect
+      assert_match(/ pid=#{$$} /, inspect)
+      assert_match(/ uid=#{Process.uid} /, inspect)
+      assert_match(/ gid=#{Process.gid} /, inspect)
+      assert_match(/ \(ucred\)/, inspect)
+    }
+  end
+
+  def test_sendcred_ucred
     return if /linux/ !~ RUBY_PLATFORM
     Dir.mktmpdir {|d|
       sockpath = "#{d}/sock"
@@ -310,12 +326,12 @@ class TestUNIXSocket < Test::Unit::TestCase
       assert_equal("a", msg)
       assert_match(/ pid=#{$$} /, inspect)
       assert_match(/ uid=#{Process.uid} /, inspect)
-      assert_match(/ gid=#{Process.gid}>/, inspect)
+      assert_match(/ gid=#{Process.gid} /, inspect)
       assert_match(/ \(ucred\)/, inspect)
     }
   end
 
-  def test_cred_sockcred
+  def test_sendcred_sockcred
     return if /netbsd|freebsd/ !~ RUBY_PLATFORM
     Dir.mktmpdir {|d|
       sockpath = "#{d}/sock"
@@ -336,7 +352,7 @@ class TestUNIXSocket < Test::Unit::TestCase
     }
   end
 
-  def test_cred_cmsgcred
+  def test_sendcred_cmsgcred
     return if /freebsd/ !~ RUBY_PLATFORM
     Dir.mktmpdir {|d|
       sockpath = "#{d}/sock"