[Overview][Constants][Types][Procedures and functions][Variables] | Reference for unit 'oldlinux' (#rtl) |
Change owner of file
Source position: oldlinux.pp line 1397
function Chown( |
path: PathStr; |
NewUid: LongInt; |
NewGid: LongInt |
):Boolean; |
Chown sets the User ID and Group ID of the file in Path to NewUid, NewGid The function returns True if the call was succesfull, False if the call failed.
Errors are returned in LinuxError.
|
Change file permission bits |
|
|
Check file access |
Program Example24; { Program to demonstrate the Chown function. } Uses oldlinux; Var UID,GID : Longint; F : Text; begin Writeln ('This will only work if you are root.'); Write ('Enter a UID : ');readln(UID); Write ('Enter a GID : ');readln(GID); Assign (f,'test.txt'); Rewrite (f); Writeln (f,'The owner of this file should become : '); Writeln (f,'UID : ',UID); Writeln (f,'GID : ',GID); Close (F); if not Chown ('test.txt',UID,GID) then if LinuxError=Sys_EPERM then Writeln ('You are not root !') else Writeln ('Chmod failed with exit code : ',LinuxError) else Writeln ('Changed owner successfully !'); end.
No notes exist for this page yet.