--
-- /etc/passwd
--  username : x : UID : GID : Comment : /path/to/home : /path/to/shell
--  raise exception when >7 ':' tokens found as invaild line on line number.

package POSIX_User body is

   -- ..
   procedure Add_User_Name (User_Name : POSIX.User_DB.User_Name_t,
			Group_Name : POSIX.User_DB.Group_Name_t,
			Comment : String,
			Home_PATH : String,
			Shell_PATH : String ) is
   begin
      null;
   end Add_User_Name;

   procedure Remove_User_Name (User_Name : POSIX.User_DB.User_Name_t) is
   begin
      null;
   end Remove_User_Name;


   -- ..
   procedure Set_User_ID (User_Name : POSIX.User_DB.User_Name_t, User_ID : POSIX.User_DB.User_ID_t) is
   begin
      null;
   end Set_User_ID;

   procedure Set_Primary_Group (User_Name : POSIX.User_DB.User_Name_t, Group_ID : POSIX.User_DB.Group_ID_t) is
   begin
      null;
   end Get_Group_Name;


   -- ..
   function Get_User_List return User_List_t
   begin
     null;
   end Get_User_List;

   procedure Set_Password (User_Name : POSIX.User_DB.User_Name_t, Password : POSIX.User_DB.Password_t) is
   begin
      null;
   end Set_Password;

end POSIX_User;