pxfctermid(3F)

NAME
     PXFCTERMID - Generates terminal pathname

SYNOPSIS
     SUBROUTINE PXFCTERMID (s, ilen, ierror)
     CHARACTER*n s
     INTEGER ilen, 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 PXFCTERMID subroutine uses the ctermid function to generate a
     string which is the pathname for the current process' controlling
     terminal.  If the pathname for the controlling terminal cannot be
     determined, the ilen variable is set to zero.

     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 subroutine:

     s         An output character array or character element variable for
               the pathname for the current process' controlling terminal.
               The maximum length of s is defined by the L_ctermid constant
               found in <stdio.h>.

     ilen      An output interger variable for the length of s.

     ierror    An output integer variable for the completion status of
               PXFCTERMID. ierror may contain zero if PXFCTERMID was
               successful or nonzero if PXFCTERMID was not successful.

     PXFCTERMID may return the ETRUNC error value if the output variable s
     cannot contain the pathname for the current process' controlling
     terminal, causing the pathname to be truncated.

EXAMPLES
          program pxftest
          integer ilen, ierror
          character*20 s

          CALL PXFCTERMID(s,ilen,ierror)
          print *,'controlling terminal is ',s
          end

SEE ALSO
     ctermid(3S) on IRIX systems
     ctermid(3C) on UNICOS and UNICOS/mk systems

     Application Programmer's Library Reference Manual, publication
     SR-2165, for the printed version of this man page.