Next: CMPLX, Previous: CHDIR, Up: Intrinsic Procedures [Contents][Index]
CHMOD — Change access permissions of filesCHMOD changes the permissions of a file.
This intrinsic is provided in both subroutine and function forms; however, only one form can be used in any given program unit.
GNU extension
Subroutine, function
| CALL CHMOD(NAME, MODE[, STATUS]) | 
| STATUS = CHMOD(NAME, MODE) | 
| NAME | Scalar CHARACTERof default kind with the
file name. Trailing blanks are ignored unless the characterachar(0)is present, then all characters up to and excludingachar(0)are used as the file name. | 
| MODE | Scalar CHARACTERof default kind giving the
file permission. MODE uses the same syntax as thechmodutility
as defined by the POSIX standard. The argument shall either be a string of
a nonnegative octal number or a symbolic mode. | 
| STATUS | (optional) scalar INTEGER, which is0on success and nonzero otherwise. | 
In either syntax, STATUS is set to 0 on success and nonzero
otherwise.
CHMOD as subroutine
program chmod_test
  implicit none
  integer :: status
  call chmod('test.dat','u+x',status)
  print *, 'Status: ', status
end program chmod_test
CHMOD as function:
program chmod_test
  implicit none
  integer :: status
  status = chmod('test.dat','u+x')
  print *, 'Status: ', status
end program chmod_test