![]() |
(git:d18deda)
|
Utility routines to open and close files. Tracking of preconnections. More...
Functions/Subroutines | |
subroutine, public | close_file (unit_number, file_status, keep_preconnection) |
Close an open file given by its logical unit number. Optionally, keep the file and unit preconnected. | |
integer function, public | get_unit_number (file_name) |
Returns the first logical unit that is not preconnected. | |
subroutine, public | init_preconnection_list () |
Allocate and initialise the list of preconnected units. | |
subroutine, public | open_file (file_name, file_status, file_form, file_action, file_position, file_pad, unit_number, debug, skip_get_unit_number, file_access) |
Opens the requested file using a free unit number. | |
logical function, public | file_exists (file_name) |
Checks if file exists, considering also the file discovery mechanism. | |
character(len=default_path_length) function, public | discover_file (file_name) |
Checks various locations for a file name. | |
character(len=default_path_length) function, public | get_data_dir () |
Returns path of data directory if set, otherwise an empty string. | |
Variables | |
type(preconnection_type), dimension(max_preconnections) | preconnected |
Utility routines to open and close files. Tracking of preconnections.
subroutine, public cp_files::close_file | ( | integer, intent(in) | unit_number, |
character(len=*), intent(in), optional | file_status, | ||
logical, intent(in), optional | keep_preconnection | ||
) |
Close an open file given by its logical unit number. Optionally, keep the file and unit preconnected.
unit_number | ... |
file_status | ... |
keep_preconnection | ... |
Definition at line 118 of file cp_files.F.
integer function, public cp_files::get_unit_number | ( | character(len=*), intent(in), optional | file_name | ) |
Returns the first logical unit that is not preconnected.
file_name | ... |
Definition at line 236 of file cp_files.F.
subroutine, public cp_files::init_preconnection_list |
Allocate and initialise the list of preconnected units.
Definition at line 272 of file cp_files.F.
subroutine, public cp_files::open_file | ( | character(len=*), intent(in) | file_name, |
character(len=*), intent(in), optional | file_status, | ||
character(len=*), intent(in), optional | file_form, | ||
character(len=*), intent(in), optional | file_action, | ||
character(len=*), intent(in), optional | file_position, | ||
character(len=*), intent(in), optional | file_pad, | ||
integer, intent(inout) | unit_number, | ||
integer, intent(in), optional | debug, | ||
logical, intent(in), optional | skip_get_unit_number, | ||
character(len=*), intent(in), optional | file_access | ||
) |
Opens the requested file using a free unit number.
file_name | ... |
file_status | ... |
file_form | ... |
file_action | ... |
file_position | ... |
file_pad | ... |
unit_number | ... |
debug | ... |
skip_get_unit_number | ... |
file_access | file access mode |
Definition at line 305 of file cp_files.F.
logical function, public cp_files::file_exists | ( | character(len=*), intent(in) | file_name | ) |
Checks if file exists, considering also the file discovery mechanism.
file_name | ... |
Definition at line 500 of file cp_files.F.
character(len=default_path_length) function, public cp_files::discover_file | ( | character(len=*), intent(in) | file_name | ) |
Checks various locations for a file name.
file_name | ... |
Definition at line 517 of file cp_files.F.
character(len=default_path_length) function, public cp_files::get_data_dir |
Returns path of data directory if set, otherwise an empty string.
Definition at line 554 of file cp_files.F.
type(preconnection_type), dimension(max_preconnections) cp_files::preconnected |
Definition at line 47 of file cp_files.F.