9.61 CHMOD — Изменение разрешений доступа к файлам

Описание:

CHMOD изменяет разрешения файла.

Этот встроенный элемент доступен как в форме подпрограммы, так и в форме функции; однако только одна форма может быть использована в любом заданном программном модуле.

Стандарт:

Расширение GNU

Класс:

Подпрограмма, функция

Синтаксис:

CALL CHMOD(NAME, MODE[, STATUS])

STATUS = CHMOD(NAME, MODE)

Аргументы:

NAME	Скаляр CHARACTER стандартного типа с именем файла. Конец строки игнорируется, если символ achar(0) присутствует, тогда все символы до и не включая achar(0) используются в качестве имени файла.
MODE	Скаляр CHARACTER стандартного типа, задающий разрешения файла. MODE использует тот же синтаксис, что и утилита chmod согласно стандарту POSIX. Аргумент должен быть строкой с неотрицательным восьмеричным числом или символическим режимом.
STATUS	(необязательно) скаляр INTEGER, который равен 0 при успехе и отлично от нуля в противном случае.

Возвращаемое значение:

В обоих синтаксисах STATUS устанавливается в 0 при успехе и отлично от нуля в противном случае.

Пример:

В качестве подпрограммы:

program chmod_test
  implicit none
  integer :: status
  call chmod('test.dat','u+x',status)
  print *, 'Status: ', status
end program chmod_test

В качестве функции:

program chmod_test
  implicit none
  integer :: status
  status = chmod('test.dat','u+x')
  print *, 'Status: ', status
end program chmod_test