SIONlib  1.7.7
Scalable I/O library for parallel access to task-local files
Macros | Functions
sion_fortran_omp.c File Reference

Fortran API. More...

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "sion.h"
#include "sion_debug.h"
#include "sion_fd.h"
#include "sion_filedesc.h"
#include "sion_omp.h"
#include "sion_fortran_omp.h"
Include dependency graph for sion_fortran_omp.c:

Go to the source code of this file.

Macros

#define _XOPEN_SOURCE   700
 

Functions

void fsion_paropen_omp_c (char *fname, char *file_mode, sion_int64 *chunksize, sion_int32 *fsblksize, int *globalrank, char *newfname, int *sid, int fname_len, int file_mode_len, int newfname_len)
 Fortran wrapper function that calls sion_paropen_omp. More...
 
void fsion_parclose_omp_c (int *sid, int *ierr)
 Fortran procedure to close a sion file opened with OpenMP in parallel. More...
 

Detailed Description

Fortran API.

Author
Ventsislav Petkov
David Montoya

Definition in file sion_fortran_omp.c.

Function Documentation

◆ fsion_parclose_omp_c()

void fsion_parclose_omp_c ( int *  sid,
int *  ierr 
)

Fortran procedure to close a sion file opened with OpenMP in parallel.

This function closes the sion in parallel on all tasks included in comm. The communicator should be the same used in the parallel open statement.

Parameters
[in]sidsion file handle
Return values
ierr1 if close is ok

Definition at line 104 of file sion_fortran_omp.c.

◆ fsion_paropen_omp_c()

void fsion_paropen_omp_c ( char *  fname,
char *  file_mode,
sion_int64 *  chunksize,
sion_int32 *  fsblksize,
int *  globalrank,
char *  newfname,
int *  sid,
int  fname_len,
int  file_mode_len,
int  newfname_len 
)

Fortran wrapper function that calls sion_paropen_omp.

Parameters
[in]fnamename of file, should equal on all tasks
[in]file_modelike the type parameter of fopen ("rb", "wb")
[in,out]chunksizechunksize for this task
[in,out]fsblksizefilesystem blocksize, must be equal on all processors
[in,out]globalrankany global unique id for this task will be stored in sion file
[out]newfnamefilename of the new file
[in]fname_len(internal) length of the fname string *
[in]file_mode_len(internal) length of the file_mode string
[out]newfname_len(internal) length of the newfname string
[out]sidsion file handle or -1 if error occured

Definition at line 49 of file sion_fortran_omp.c.