PXFISFIFO(3F) Last changed: 1-6-98
PXFISFIFO - Tests for pipe or a FIFO special file
LOGICAL FUNCTION PXFISFIFO(m)
INTEGER m
UNICOS, UNICOS/mk, and IRIX systems
IEEE standard interface for FORTRAN 77
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 logical function PXFISFIFO checks if a file is a pipe or FIFO
special file. The argument m should be supplied by the st_mode
component of the stat structure used by the PXFSTAT(3F) routine.
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 argument is valid for this routine:
m An integer input variable containing the file mode.
If the file is a block special file, PXFISFIFO returns a logical true,
otherwise a logical false is returned.
In this example, a file named testfile in /tmp created by mkfifo(1) is
tested to see if it is a FIFO special file.
program pxftest
integer mode, ierror
integer jstat
logical PXFISFIFO
CALL PXFCHDIR('/tmp',0,ierror)
CALL MKFIFO('testfile',644,ierror)
CALL PXFSTRUCTCREATE('stat',jstat,ierror)
CALL PXFSTAT('testfile',0,jstat,ierror)
CALL PXFINTGET(jstat,'st_mode',mode,ierror)
if (PXFISFIFO(mode,ierror) .eqv. .TRUE.) then
print *,'PASSED: PXFISFIFO test'
else
print *,'FAILED: PXFISFIFO test'
endif
end
PXFINTSET(3F), PXFSTAT(3F), PXFSTRUCTCREATE(3F)
mkfifo(1)
Application Programmer's Library Reference Manual, publication SR2165,
for the printed version of this man page.
PXFISFIFO(3F) Last changed: 1-6-98
PXFISFIFO - Tests for pipe or a FIFO special file
LOGICAL FUNCTION PXFISFIFO(m)
INTEGER m
UNICOS, UNICOS/mk, and IRIX systems
IEEE standard interface for FORTRAN 77
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 logical function PXFISFIFO checks if a file is a pipe or FIFO
special file. The argument m should be supplied by the st_mode
component of the stat structure used by the PXFSTAT(3F) routine.
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 argument is valid for this routine:
m An integer input variable containing the file mode.
If the file is a block special file, PXFISFIFO returns a logical true,
otherwise a logical false is returned.
In this example, a file named testfile in /tmp created by mkfifo(1) is
tested to see if it is a FIFO special file.
program pxftest
integer mode, ierror
integer jstat
logical PXFISFIFO
CALL PXFCHDIR('/tmp',0,ierror)
CALL MKFIFO('testfile',644,ierror)
CALL PXFSTRUCTCREATE('stat',jstat,ierror)
CALL PXFSTAT('testfile',0,jstat,ierror)
CALL PXFINTGET(jstat,'st_mode',mode,ierror)
if (PXFISFIFO(mode,ierror) .eqv. .TRUE.) then
print *,'PASSED: PXFISFIFO test'
else
print *,'FAILED: PXFISFIFO test'
endif
end
PXFINTSET(3F), PXFSTAT(3F), PXFSTRUCTCREATE(3F)
mkfifo(1)
Application Programmer's Library Reference Manual, publication SR2165,
for the printed version of this man page.
[ Back ]
|
