PXFCHOWN(3F) Last changed: 1-6-98
NAMEPXFCHOWN - Changes the owner and group of a file
SYNOPSIS
CHARACTER*n path
INTEGER ilen, iowner, igroup, ierror
CALL PXFCHOWN(path, ilen, iowner, igroup, ierror)
IMPLEMENTATION
UNICOS, UNICOS/mk, and IRIX systems
STANDARDS
IEEE standard interface for FORTRAN 77
DESCRIPTION
On IRIX systems, this routine is in libfortran.so which is linked by
default when compiling programs with the MIPSpro 7 Fortran 90 compiler
or when compiling programs with the -craylibs option to the MIPSpro
7.2 F77 compiler.
The PXFCHOWN subroutine uses the chown(2) function to change the owner
and group of a file.
The value of iowner and igroup indicates the new values.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
kind unless documented otherwise. On UNICOS and UNICOS/mk, default
kind is KIND=8 for integer, real, complex, and logical arguments; on
IRIX, the default kind is KIND=4.
The following is a list of valid arguments for this routine:
path Input character variable or array element containing the
name of a file.
ilen Input integer variable containing the length of path in
characters. If ilen is zero, all trailing blanks are
removed before calling chown().
iowner Input integer variable containing the integer value for the
owner.
igroup Input integer variable containing the integer value for the
group.
ierror Output integer variable that contains zero if the group and
owner of the file were changed or nonzero if PXFCHOWN did
not change the group and owner.
In addition to the errors returned by the chown(2) system call,
PXFCHOWN may return the following errors:
EINVAL If ilen is less than 0 or ilen is greater than LEN(path).
ENOMEM If PXFCHOWN is unable to obtain memory to copy path.
EXAMPLES
subroutine test (iowner,igroup)
character*(12) path
integer ilen, iowner, igroup, ierr
path = 'testfile'
ilen = 0
call pxfchown(path,ilen,iowner,igroup,ierr)
if (ierr.ne.0) then
print *,'FAIL: error from pxfchown = ',ierr
else
print *,'PASS: No error from pxfchown = '
endif
end
SEE ALSOchown(2)
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.
