root/ompi/mca/io/romio321/romio/adio/ad_ntfs/ad_ntfs_iread.c

DEFINITIONS

1. ADIOI_NTFS_IreadContig

   1 /* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
   2 /* 
   3  *   Copyright (C) 1997 University of Chicago. 
   4  *   See COPYRIGHT notice in top-level directory.
   5  */
   6 
   7 #include "ad_ntfs.h"
   8 
   9 void ADIOI_NTFS_IreadContig(ADIO_File fd, void *buf, int count, 
  10                 MPI_Datatype datatype, int file_ptr_type,
  11                 ADIO_Offset offset, ADIO_Request *request, int *error_code)  
  12 {
  13     MPI_Count len, typesize;
  14     int err;
  15     static char myname[] = "ADIOI_NTFS_IreadContig";
  16 
  17     MPI_Type_size_x(datatype, &typesize);
  18     len = count * typesize;
  19 
  20     if (file_ptr_type == ADIO_INDIVIDUAL)
  21     {
  22         offset = fd->fp_ind;
  23     }
  24     err = ADIOI_NTFS_aio(fd, buf, len, offset, 0, request);
  25     if (file_ptr_type == ADIO_INDIVIDUAL)
  26     {
  27         fd->fp_ind += len;
  28     }
  29 
  30     /* --BEGIN ERROR HANDLING-- */
  31     if (err != MPI_SUCCESS)
  32     {
  33         *error_code = MPIO_Err_create_code(err, MPIR_ERR_RECOVERABLE,
  34                                            myname, __LINE__, MPI_ERR_IO,
  35                                            "**io", 0);
  36         return;
  37     }
  38     /* --END ERROR HANDLING-- */
  39     *error_code = MPI_SUCCESS;
  40 
  41     fd->fp_sys_posn = -1;   /* set it to null. */
  42 }