Copyright (C) 1994, Digital Equipment Corp.
INTERFACE Uugid;
FROM Ctypes IMPORT int;
FROM Utypes IMPORT u_long;
** getuid(2), geteuid(2) - get user identity **
<*EXTERNAL*> PROCEDURE getuid (): u_long;
<*EXTERNAL*> PROCEDURE geteuid (): u_long;
** getgid(2), getguid(2) - get group identity **
<*EXTERNAL*> PROCEDURE getgid (): u_long;
<*EXTERNAL*> PROCEDURE getegid (): u_long;
** setreuid(2) - set real and effective user ID's **
<*EXTERNAL*> PROCEDURE setreuid (ruid, euid: int): int;
** setregid(2) - set real and effective group ID **
<*EXTERNAL*> PROCEDURE setregid (rgid, egid: int): int;
END Uugid.