* Copyright (c) 1982, 1986, 1989, 1990, 1991 Regents of the University
* of California. All rights reserved.
* %sccs.include.redist.c%
* @(#)kern_prot.c 7.21 (Berkeley) %G%
* System calls related to processes and protection
retval
[1] = p
->p_pptr
->p_pid
;
*retval
= p
->p_pptr
->p_pid
;
/* Get process group ID; note that POSIX getpgrp takes no parameter */
*retval
= p
->p_pgrp
->pg_id
;
*retval
= p
->p_cred
->p_ruid
;
retval
[1] = p
->p_ucred
->cr_uid
;
*retval
= p
->p_ucred
->cr_uid
;
*retval
= p
->p_cred
->p_rgid
;
retval
[1] = p
->p_ucred
->cr_groups
[0];
* Get effective group ID. The "egid" is groups[0], and could be obtained
* via getgroups. This syscall exists because it is somewhat painful to do
* correctly in a library function.
*retval
= p
->p_ucred
->cr_groups
[0];
getgroups(p
, uap
, retval
)
int *gidset
; /* XXX not yet POSIX */
register struct pcred
*pc
= p
->p_cred
;
if ((ngrp
= uap
->gidsetsize
) == 0) {
*retval
= pc
->pc_ucred
->cr_ngroups
;
if (ngrp
< pc
->pc_ucred
->cr_ngroups
)
ngrp
= pc
->pc_ucred
->cr_ngroups
;
for (gp
= pc
->pc_ucred
->cr_groups
, lp
= groups
; lp
< &groups
[ngrp
]; )
if (error
= copyout((caddr_t
)groups
, (caddr_t
)uap
->gidset
,
ngrp
* sizeof (groups
[0])))
if (p
->p_pgid
== p
->p_pid
|| pgfind(p
->p_pid
)) {
enterpgrp(p
, p
->p_pid
, 1);
* set process group (setpgid/old setpgrp)
* caller does setpgid(targpid, targpgid)
* pid must be caller or child of caller (ESRCH)
* pid must be in same session (EPERM)
* pid can't have done an exec (EACCES)
* there must exist some pid in same session having pgid (EPERM)
* pid must not be session leader (EPERM)
setpgid(curp
, uap
, retval
)
int pid
; /* target process id */
int pgid
; /* target pgrp id */
register struct proc
*targp
; /* target process */
register struct pgrp
*pgrp
; /* target pgrp */
if (uap
->pid
!= 0 && uap
->pid
!= curp
->p_pid
) {
if ((targp
= pfind(uap
->pid
)) == 0 || !inferior(targp
))
if (targp
->p_session
!= curp
->p_session
)
uap
->pgid
= targp
->p_pid
;
else if (uap
->pgid
!= targp
->p_pid
)
if ((pgrp
= pgfind(uap
->pgid
)) == 0 ||
pgrp
->pg_session
!= curp
->p_session
)
enterpgrp(targp
, uap
->pgid
, 0);
register struct pcred
*pc
= p
->p_cred
;
(error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
* Everything's okay, do it. Copy credentials so other references do
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_uid
= uid
;
register struct pcred
*pc
= p
->p_cred
;
if (euid
!= pc
->p_ruid
&& euid
!= pc
->p_svuid
&&
(error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
* Everything's okay, do it. Copy credentials so other references do
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_uid
= euid
;
register struct pcred
*pc
= p
->p_cred
;
if (gid
!= pc
->p_rgid
&& (error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_groups
[0] = gid
;
pc
->p_svgid
= gid
; /* ??? */
register struct pcred
*pc
= p
->p_cred
;
if (egid
!= pc
->p_rgid
&& egid
!= pc
->p_svgid
&&
(error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_groups
[0] = egid
;
osetreuid(p
, uap
, retval
)
register struct pcred
*pc
= p
->p_cred
;
register uid_t ruid
, euid
;
if (ruid
!= pc
->p_ruid
&& ruid
!= pc
->pc_ucred
->cr_uid
/* XXX */ &&
(error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
if (euid
!= pc
->pc_ucred
->cr_uid
&& euid
!= pc
->p_ruid
&&
euid
!= pc
->p_svuid
&& (error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
* Everything's okay, do it. Copy credentials so other references do
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_uid
= euid
;
osetregid(p
, uap
, retval
)
register struct pcred
*pc
= p
->p_cred
;
register gid_t rgid
, egid
;
if (rgid
!= pc
->p_rgid
&& rgid
!= pc
->pc_ucred
->cr_groups
[0] /* XXX */ &&
(error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
if (egid
!= pc
->pc_ucred
->cr_groups
[0] && egid
!= pc
->p_rgid
&&
egid
!= pc
->p_svgid
&& (error
= suser(pc
->pc_ucred
, &p
->p_acflag
)))
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_groups
[0] = egid
;
setgroups(p
, uap
, retval
)
register struct pcred
*pc
= p
->p_cred
;
int error
, groups
[NGROUPS
];
if (error
= suser(pc
->pc_ucred
, &p
->p_acflag
))
if ((ngrp
= uap
->gidsetsize
) > NGROUPS
)
if (error
= copyin((caddr_t
)uap
->gidset
, (caddr_t
)groups
,
ngrp
* sizeof (groups
[0])))
pc
->pc_ucred
= crcopy(pc
->pc_ucred
);
pc
->pc_ucred
->cr_ngroups
= ngrp
;
/* convert from int's to gid_t's */
for (gp
= pc
->pc_ucred
->cr_groups
, lp
= groups
; ngrp
--; )
* Check if gid is a member of the group set.
register struct ucred
*cred
;
egp
= &(cred
->cr_groups
[cred
->cr_ngroups
]);
for (gp
= cred
->cr_groups
; gp
< egp
; gp
++)
* Test whether the specified credentials imply "super-user"
* privilege; if so, and we have accounting info, set the flag
* indicating use of super-powers.
* Allocate a zeroed cred structure.
register struct ucred
*cr
;
MALLOC(cr
, struct ucred
*, sizeof(*cr
), M_CRED
, M_WAITOK
);
bzero((caddr_t
)cr
, sizeof(*cr
));
* Throws away space when ref count gets to 0.
int s
= splimp(); /* ??? */
FREE((caddr_t
)cr
, M_CRED
);
* Copy cred structure to a new one and free the old one.
* Dup cred struct to a new held one.
* Get login name, if available.
if (uap
->namelen
> sizeof (p
->p_pgrp
->pg_session
->s_login
))
uap
->namelen
= sizeof (p
->p_pgrp
->pg_session
->s_login
);
return (copyout((caddr_t
) p
->p_pgrp
->pg_session
->s_login
,
(caddr_t
) uap
->namebuf
, uap
->namelen
));
if (error
= suser(p
->p_ucred
, &p
->p_acflag
))
error
= copyinstr((caddr_t
) uap
->namebuf
,
(caddr_t
) p
->p_pgrp
->pg_session
->s_login
,
sizeof (p
->p_pgrp
->pg_session
->s_login
) - 1, (u_int
*)0);
if (error
== ENAMETOOLONG
)