[Truffle] Add Process.getpgid

jruby · May 27, 2015 · d0c1512 · d0c1512
1 parent 47dc1aa
commit d0c1512
Show file tree

Hide file tree

Showing 3 changed files with 22 additions and 3 deletions.
diff --git a/spec/truffle/tags/core/process/getpgid_tags.txt b/spec/truffle/tags/core/process/getpgid_tags.txt
diff --git a/truffle/src/main/java/org/jruby/truffle/nodes/rubinius/PosixNodes.java b/truffle/src/main/java/org/jruby/truffle/nodes/rubinius/PosixNodes.java
@@ -503,6 +503,20 @@ public int fcntl(int fd, int fcntl, int arg) {
 
     }
 
+    @CoreMethod(names = "getpgid", isModuleFunction = true, required = 1)
+    public abstract static class GetpgidNode extends CoreMethodArrayArgumentsNode {
+
+        public GetpgidNode(RubyContext context, SourceSection sourceSection) {
+            super(context, sourceSection);
+        }
+
+        @Specialization
+        public int getpgid(int pid) {
+            return posix().getpgid(pid);
+        }
+
+    }
+
     @CoreMethod(names = "getpgrp", isModuleFunction = true)
     public abstract static class GetpgrpNode extends CoreMethodArrayArgumentsNode {
 

diff --git a/truffle/src/main/ruby/core/rubinius/common/process.rb b/truffle/src/main/ruby/core/rubinius/common/process.rb
@@ -68,6 +68,14 @@ def self.times
     Struct::Tms.new(*cpu_times)
   end
 
+  def self.getpgid(pid)
+    pid = Rubinius::Type.coerce_to pid, Integer, :to_int
+
+    ret = FFI::Platform::POSIX.getpgid(pid)
+    Errno.handle if ret == -1
+    ret
+  end
+
   @maxgroups = 32
   class << self
     attr_reader :maxgroups