1 #ifndef PHSOLVER_PHIO_H 2 #define PHSOLVER_PHIO_H 3 4 #include <FCMangle.h> 5 6 #define phio_restartname \ 7 FortranCInterface_GLOBAL_(phio_restartname, PHIO_RESTARTNAME) 8 9 #ifdef __cplusplus 10 extern "C" { 11 #endif 12 typedef struct phio_file* phio_fp; 13 void phio_readheader( 14 phio_fp fileDescriptor, 15 const char keyphrase[], 16 void* valueArray, 17 int* nItems, 18 const char datatype[], 19 const char iotype[] ); 20 void phio_writeheader( 21 phio_fp fileDescriptor, 22 const char keyphrase[], 23 const void* valueArray, 24 const int* nItems, 25 const int* ndataItems, 26 const char datatype[], 27 const char iotype[] ); 28 void phio_readdatablock( 29 phio_fp fileDescriptor, 30 const char keyphrase[], 31 void* valueArray, 32 int* nItems, 33 const char datatype[], 34 const char iotype[] ); 35 void phio_writedatablock( 36 phio_fp fileDescriptor, 37 const char keyphrase[], 38 const void* valueArray, 39 const int* nItems, 40 const char datatype[], 41 const char iotype[]); 42 void phio_openfile_read( 43 const char filename[], 44 int* numFiles, 45 phio_fp* fileDescriptor); 46 void phio_openfile_write( 47 const char filename[], 48 int* numFiles, 49 int* numFields, 50 int* numPPF, 51 phio_fp* fileDescriptor); 52 void phio_restartname(int* step, char* filename); 53 void phio_closefile_read(phio_fp fileDescriptor); 54 void phio_closefile_write(phio_fp fileDescriptor); 55 #ifdef __cplusplus 56 } 57 #endif 58 59 #endif 60 61