INTERFACE Upwd;

FROM Ctypes IMPORT char_star, int;
FROM Utypes IMPORT uid_t, gid_t;

TYPE
  struct_passwd = RECORD
    pw_name : char_star;
    pw_passwd : char_star;
    pw_uid : uid_t;
    pw_gid : gid_t;
    pw_gecos : char_star;
    pw_dir : char_star;
    pw_shell : char_star;
  END;
  struct_passwd_star = UNTRACED REF struct_passwd;

<*EXTERNAL*> PROCEDURE getpwuid (uid: int): struct_passwd_star;
<*EXTERNAL*> PROCEDURE getpwnam (name: char_star): struct_passwd_star;

END Upwd.