bfort(1) bfort(1)

bfort - program to extract short definitions for a Fortran to C interface

- Names the files from which lint definitions are to be extracted
- Do not generate messages for routines that can not be converted to Fortran.
- Generate messages for all routines/macros without a Fortran counterpart.
- Directory for output file
- file that contains common includes
- translate pointers to integer indices
- prefix for names of functions to convert to/from pointers (default is __). The macro that selects the form based on the pointer size can be changed with -ptr64.
- Generate a single Fortran wrapper that works for almost all systems, by adding C preprocessor names (see below). These names can be changed with -fcaps, -fuscore, and -fduscore.
- Fortran versions return the value of the routine as the last argument (an integer). This is used in MPI and is a not uncommon approach for handling error returns.
- Use short (single character) argument names instead of the name in the C definition.
- Enable handling of Fortran character parameters, using the most common call interface. This is the default unless the environment variable BFORT_STRINGHANDLING is set to IGNORE.
- Disable handling of Fortran character parameters. Routines with char arguments in C will not have interface routines generated for them.
- asis - No special processing for string arguments. Provided for backward compatiblity to older versions of bfort that did not handle strings
- Handle MPI types (some things are pointers by definition)
- Do not generate PMPI names
- Change macro used to select MPI profiling version
- Turn off the generation of the profiling version
- Multiple indirects are native datatypes (no coercion)
- Consider "void *" as a pointer to a structure.
- Do not add 
#ifndef DEBUG_ALL
#define DEBUG_ALL
#endif

to the wrapper file.

- Generate a single wrapper that can handle the three most common cases: trailing underscore, no underscore, and all caps. The choice is based on whether 
FORTRANCAPS:       Names are uppercase, no trailing underscore
FORTRANUNDERSCORE: Names are lowercase, trailing underscore
are defined.
FORTRANDOUBLEUNDERSCORE: Names are lowercase, with TWO trailing

underscores. This is needed when some versions of "f2c" are used to generate C for Fortran routines. Note that f2c uses two underscores ONLY when the name already contains an underscore (at least on the FreeBSD system that I use that uses f2c). To handle this case, the generated code contains the second underscore only when the name already contains one.

If -mapptr is also chosen, then

POINTER_64_BITS

will also be used to determine if pointers are to long to fit in a 32-bit Fortran integer. Routines that destroy a pointer will need to manually insert a call to __RmPointer. The routines for managing the pointers are in ptrcvt.c

In addition, if -mpi is used and -no_pmpi is not, the MPI profiling names are also generated, surrounded by MPI_BUILD_PROFILING.

We really need a way to specify a general type as a pointer, so that it will be handled as a pointer. The -mpi option is a kludge for a pressing need. Eventually should provide a "-ptr name" option and keep in a search space when looking for known types.

Bill Gropp

bfort.c

6/25/2019