xmp_coarray_local.c File Reference

#include <string.h>
#include <stdlib.h>
#include "xmp_internal.h"
#include "xmp_math_function.h"

Include dependency graph for xmp_coarray_local.c:

Functions
size_t	_XMP_calc_copy_chunk (const int copy_chunk_dim, const _XMP_array_section_t *array)
void	_XMP_local_put (_XMP_coarray_t *dst_desc, const void *src, const int dst_contiguous, const int src_contiguous, const int dst_dims, const int src_dims, const _XMP_array_section_t *dst_info, const _XMP_array_section_t *src_info, const size_t dst_elmts, const size_t src_elmts)
void	_XMP_local_get (void *dst, const _XMP_coarray_t *src_desc, const int dst_contiguous, const int src_contiguous, const int dst_dims, const int src_dims, const _XMP_array_section_t *dst_info, const _XMP_array_section_t *src_info, const size_t dst_elmts, const size_t src_elmts)

Function Documentation

_XMP_calc_copy_chunk()

size_t _XMP_calc_copy_chunk	(	const int	copy_chunk_dim,
		const _XMP_array_section_t *	array
	)

{
  if(copy_chunk_dim == 0)   // All elements are copied
    return array[0].length * array[0].distance;
 
  if(array[copy_chunk_dim-1].stride == 1)
    return array[copy_chunk_dim-1].length * array[copy_chunk_dim-1].distance;
  else
    return array[copy_chunk_dim-1].distance;
}

Here is the caller graph for this function:

_XMP_local_get()

void _XMP_local_get	(	void *	dst,
		const _XMP_coarray_t *	src_desc,
		const int	dst_contiguous,
		const int	src_contiguous,
		const int	dst_dims,
		const int	src_dims,
		const _XMP_array_section_t *	dst_info,
		const _XMP_array_section_t *	src_info,
		const size_t	dst_elmts,
		const size_t	src_elmts
	)

{
  size_t dst_offset = _XMP_get_offset(dst_info, dst_dims);
  size_t src_offset = _XMP_get_offset(src_info, src_dims);
  size_t elmt_size  = src_desc->elmt_size;
 
  if(dst_contiguous && src_contiguous)
    _XMP_local_contiguous_copy((char *)dst+dst_offset, (char *)src_desc->real_addr+src_offset, 
                               dst_elmts, src_elmts, elmt_size);
  else
    _local_NON_contiguous_copy((char *)dst+dst_offset, (char *)src_desc->real_addr+src_offset,
                               dst_dims, src_dims, dst_info, src_info, dst_elmts, src_elmts, elmt_size);
}

Here is the call graph for this function:

_XMP_local_put()

void _XMP_local_put	(	_XMP_coarray_t *	dst_desc,
		const void *	src,
		const int	dst_contiguous,
		const int	src_contiguous,
		const int	dst_dims,
		const int	src_dims,
		const _XMP_array_section_t *	dst_info,
		const _XMP_array_section_t *	src_info,
		const size_t	dst_elmts,
		const size_t	src_elmts
	)

{
  size_t dst_offset = _XMP_get_offset(dst_info, dst_dims);
  size_t src_offset = _XMP_get_offset(src_info, src_dims);
  size_t elmt_size  = dst_desc->elmt_size;
 
  if(dst_contiguous && src_contiguous)
    _XMP_local_contiguous_copy((char *)dst_desc->real_addr+dst_offset, (char *)src+src_offset,
                               dst_elmts, src_elmts, elmt_size);
  else
    _local_NON_contiguous_copy((char *)dst_desc->real_addr+dst_offset, (char *)src+src_offset,
                               dst_dims, src_dims, dst_info, src_info, dst_elmts, src_elmts, elmt_size);
}

Here is the call graph for this function: