/[cmucl]/src/code/unix-glibc2.lisp
ViewVC logotype

Diff of /src/code/unix-glibc2.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by dtc, Mon Feb 22 11:26:42 1999 UTC revision 1.6 by dtc, Sat Mar 13 06:23:14 1999 UTC
# Line 1919  length LEN and type TYPE." Line 1919  length LEN and type TYPE."
1919    "Unix-getppid returns the process-id of the parent of the current process.")    "Unix-getppid returns the process-id of the parent of the current process.")
1920    
1921  ;;; Unix-getpgrp returns the group-id associated with the  ;;; Unix-getpgrp returns the group-id associated with the
1922  ;;; process whose process-id is specified as an argument.  ;;; current process.
 ;;; As usual, if the process-id is 0, it refers to the current  
 ;;; process.  
   
 (defun unix-getpgrp (pid)  
   "Unix-getpgrp returns the group-id of the process associated  
    with pid."  
   (int-syscall ("getpgrp" int) pid))  
1923    
1924  ;;; Unix-setpgrp sets the group-id of the process specified by  (defun unix-getpgrp ()
1925      "Unix-getpgrp returns the group-id of the calling process."
1926      (int-syscall ("getpgrp")))
1927    
1928    ;;; Unix-setpgid sets the group-id of the process specified by
1929  ;;; "pid" to the value of "pgrp".  The process must either have  ;;; "pid" to the value of "pgrp".  The process must either have
1930  ;;; the same effective user-id or be a super-user process.  ;;; the same effective user-id or be a super-user process.
1931    
1932    ;;; setpgrp(int int)[freebsd] is identical to setpgid and is retained
1933    ;;; for backward compatibility. setpgrp(void)[solaris] is being phased
1934    ;;; out in favor of setsid().
1935    
1936  (defun unix-setpgrp (pid pgrp)  (defun unix-setpgrp (pid pgrp)
1937    "Unix-setpgrp sets the process group on the process pid to    "Unix-setpgrp sets the process group on the process pid to
1938     pgrp.  NIL and an error number is returned upon failure."     pgrp.  NIL and an error number are returned upon failure."
1939    (void-syscall ( "setpgrp" int int) pid pgrp))    (void-syscall ("setpgid" int int) pid pgrp))
1940    
1941    (defun unix-setpgid (pid pgrp)
1942      "Unix-setpgid sets the process group of the process pid to
1943       pgrp. If pgid is equal to pid, the process becomes a process
1944       group leader. NIL and an error number are returned upon failure."
1945      (void-syscall ("setpgid" int int) pid pgrp))
1946    
1947  #+nil  #+nil
1948  (defun unix-setsid ()  (defun unix-setsid ()

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

  ViewVC Help
Powered by ViewVC 1.1.5