www.delorie.com/gnu/docs/gcc/g77_188.html

search

	Buy the book!

Using and Porting GNU Fortran

8.11.9.113 FStat Intrinsic (subroutine)

CALL FStat(Unit, SArray, Status)

Unit: INTEGER; scalar; INTENT(IN).

SArray: INTEGER(KIND=1); DIMENSION(13); INTENT(OUT).

Status: INTEGER(KIND=1); OPTIONAL; scalar; INTENT(OUT).

Intrinsic groups: unix.

Description:

Obtains data about the file open on Fortran I/O unit Unit and places them in the array SArray. The values in this array are extracted from the stat structure as returned by fstat(2) q.v., as follows:

1. Device ID

2. Inode number

3. File mode

4. Number of links

5. Owner's uid

6. Owner's gid

7. ID of device containing directory entry for file (0 if not available)

8. File size (bytes)

9. Last access time

10. Last modification time

11. Last file status change time

12. Preferred I/O block size (-1 if not available)

13. Number of blocks allocated (-1 if not available)

Not all these elements are relevant on all systems. If an element is not relevant, it is returned as 0.

If the Status argument is supplied, it contains 0 on success or a non-zero error code upon return.

Some non-GNU implementations of Fortran provide this intrinsic as only a function, not as a subroutine, or do not support the (optional) Status argument.

For information on other intrinsics with the same name: See section 8.11.9.114 FStat Intrinsic (function).