osprey/libf/fio/dopexfer.c File Reference

#include <liberrno.h>
#include <stdlib.h>
#include <string.h>
#include <cray/nassert.h>
#include "fio.h"
#include "f90io.h"

Include dependency graph for dopexfer.c:

Go to the source code of this file.

Data Types
type	dovarlist
type	strideloop
Defines
#define	DEBUG_90IO   0
#define	DD
#define	MAXDOVAR   7
#define	MAXITEMS   32
Typedefs
typedef struct strideloop	strideloop_t
Functions/Subroutines
static int	_stride_dv (FIOSPTR css, unit *cup, DopeVectorType *dv, int **dovar, xfer_func *func)
int	_map_to_dv (ioimplieddo_entry *impdo, DopeVectorType *dvptr, int **iarr, struct dovarlist *dovlp)
int	_strip_mine (FIOSPTR css, unit *cup, xfer_func *func, ioimplieddo_entry *ie, int *retp)
int	_xfer_iolist (FIOSPTR css, unit *cup, iolist_header *iolist, xfer_func *func)
long	_tripcnt (long beg, long end, long inc)
Variables
static FILE *	_df
static int	_ddope_nest = 0
static int	_ddope = -1
static unit *	_ddcup

---

Define Documentation

#define DD

Definition at line 91 of file dopexfer.c.

Referenced by _map_to_dv(), _stride_dv(), _strip_mine(), and _xfer_iolist().

#define DEBUG_90IO   0

Definition at line 90 of file dopexfer.c.

Referenced by _map_to_dv(), _stride_dv(), _strip_mine(), and _xfer_iolist().

#define MAXDOVAR   7

Definition at line 99 of file dopexfer.c.

Referenced by _map_to_dv().

#define MAXITEMS   32

Definition at line 1282 of file dopexfer.c.

Referenced by _strip_mine().

---

Typedef Documentation

typedef struct strideloop strideloop_t

---

Function Documentation

int _map_to_dv	(	ioimplieddo_entry *	impdo,
		DopeVectorType *	dvptr,
		int **	iarr,
		struct dovarlist *	dovlp
	)

Definition at line 1016 of file dopexfer.c.

References _cptofcd, _df, _fcdlen, _fcdtocp, _tripcnt(), DopeVector::a, assert, DopeVector::base_addr, DopeVector::charptr, DD, DEBUG_90IO, DopeVector::dimension, dovarlist::dov, ioarray_entry::dovar, ioarray_entry::dv, DVTYPE_ASCII, end, f, fprintf(), i, ioarray_entry::indflag, ioimplieddo_entry::iobegcnt, ioimplieddo_entry::ioendcnt, ioimplieddo_entry::ioinccnt, ioimplieddo_entry::ioloopvar, MAXDOVAR, DopeVector::n_dim, NULL, dovarlist::nvar, ret, SMSHIFT, f90_type::type, DopeVector::type_lens, and ioentry_header::valtype.

Referenced by _xfer_iolist().

static int _stride_dv	(	FIOSPTR	css,
		unit *	cup,
		DopeVectorType *	dv,
		int **	dovar,
		xfer_func *	func
	)			[static]

Definition at line 532 of file dopexfer.c.

References _df, _fcdlen, _fcdtocp, _get_dc_param(), _iochunk(), DopeVector::a, addr(), assert, DopeVector::assoc, DopeVector::base_addr, DopeVector::charptr, CHBUFSIZE, type_information_packet::cnvindx, type_information_packet::count, DD, DEBUG_90IO, f90_type::dec_len, DopeVector::dimension, f90_type::dpflag, DVTYPE_ASCII, type_information_packet::elsize, DopeVector::DvDimen::extent, type_information_packet::extlen, FEPTRNAS, for(), fprintf(), func, i, i_dim(), f90_type::int_len, type_information_packet::intlen, f90_type::kind_or_star, DopeVector::DvDimen::low_bound, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, PARTIAL, DopeVector::ptr_alloc, ret, signed, SMSCALE, SMSHIFT, type_information_packet::stride, DopeVector::DvDimen::stride_mult, f90_type::type, type_information_packet::type77, type_information_packet::type90, DopeVector::type_lens, unit_s::ucharset, unit_s::ufmt, and unit_s::unumcvrt.

Referenced by _xfer_iolist().

int _strip_mine	(	FIOSPTR	css,
		unit *	cup,
		xfer_func *	func,
		ioimplieddo_entry *	ie,
		int *	retp
	)

Definition at line 1285 of file dopexfer.c.

References _df, _get_dc_param(), _ld_read, _tripcnt(), DopeVector::a, addr(), assert, DopeVector::base_addr, strideloop::binc, CHBUFSIZE, type_information_packet::cnvindx, type_information_packet::count, DD, DEBUG_90IO, DopeVector::dimension, ioarray_entry::dovar, ioarray_entry::dv, DVTYPE_ASCII, type_information_packet::elsize, strideloop::elstr, FEINCZER, fprintf(), func, i, iolist_header::icount, strideloop::inc, ioarray_entry::indflag, f90_type::int_len, type_information_packet::intlen, ioimplieddo_entry::iobegcnt, ioimplieddo_entry::ioendcnt, ioentry_header::ioentsize, ioimplieddo_entry::ioinccnt, ioimplieddo_entry::ioloopvar, ioscalar_entry::iovar_address, long, MAXITEMS, memcmp, memcpy, DopeVector::n_dim, NULL, PARTIAL, putc(), strideloop::saddr, signed, SMSCALE, SMSHIFT, type_information_packet::stride, stride, DopeVector::DvDimen::stride_mult, ioscalar_entry::tinfo, f90_type::type, type_information_packet::type77, type_information_packet::type90, DopeVector::type_lens, unit_s::ucharset, unit_s::ufmt, unit_s::unumcvrt, unit_s::uwrt, gfptr_t::v, ioentry_header::valtype, and void.

Referenced by _xfer_iolist().

long _tripcnt	(	long	beg,
		long	end,
		long	inc
	)

Definition at line 1232 of file dopexfer.c.

Referenced by _map_to_dv(), and _strip_mine().

int _xfer_iolist	(	FIOSPTR	css,
		unit *	cup,
		iolist_header *	iolist,
		xfer_func *	func
	)

Definition at line 140 of file dopexfer.c.

References _ddope_nest, _df, _fcdlen, _fcdtocp, _ferr(), _get_dc_param(), _ld_read, _ld_write, _map_to_dv(), _rdfmt, _rdunf, _stride_dv(), _strip_mine(), _wrfmt, _wrunf, _xfer_iolist(), DopeVector::a, assert, DopeVector::base_addr, type_information_packet::cnvindx, type_information_packet::count, DD, DEBUG_90IO, f90_type::dec_len, DopeVector::dimension, ioarray_entry::dovar, f90_type::dpflag, ioarray_entry::dv, DVTYPE_ASCII, type_information_packet::elsize, DopeVector::DvDimen::extent, type_information_packet::extlen, unit_s::f_lastiolist, gfptr_t::fcd, FEINCZER, FEINTUNK, fprintf(), FULL, func, iolist_header::icount, ioarray_entry::indflag, f90_type::int_len, type_information_packet::intlen, ioentry_header::ioentsize, ioscalar_entry::iovar_address, f90_type::kind_or_star, MAXDIM, mode, DopeVector::n_dim, NULL, dovarlist::nvar, PARTIAL, putc(), ret, signed, sm(), SMSCALE, type_information_packet::stride, DopeVector::DvDimen::stride_mult, ioscalar_entry::tinfo, f90_type::type, type_information_packet::type77, type_information_packet::type90, DopeVector::type_lens, unit_s::ucharset, unit_s::ufmt, unit_s::uid, unit_s::unumcvrt, gfptr_t::v, and ioentry_header::valtype.

Referenced by _FRF(), _FRU(), _FWF(), _FWU(), and _xfer_iolist().

---

Variable Documentation

unit* _ddcup [static]

Definition at line 61 of file dopexfer.c.

int _ddope = -1 [static]

Definition at line 60 of file dopexfer.c.

int _ddope_nest = 0 [static]

Definition at line 59 of file dopexfer.c.

Referenced by _xfer_iolist().

FILE* _df [static]

Definition at line 58 of file dopexfer.c.

Referenced by _map_to_dv(), _stride_dv(), _strip_mine(), and _xfer_iolist().