8.48 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 при успехе и отлично от нуля в противном случае.

Пример:

CHMOD как подпрограмма

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

CHMOD как функция:

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