00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 #include "ad_nfs.h"
00009 
00010 #ifdef HAVE_UNISTD_H
00011 #include <unistd.h>
00012 #endif
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 void ADIOI_NFS_Resize(ADIO_File fd, ADIO_Offset size, int *error_code)
00021 {
00022     int err;
00023     static char myname[] = "ADIOI_GEN_RESIZE";
00024 
00025     err = ftruncate(fd->fd_sys, size);
00026 
00027     
00028     if (err == -1) {
00029     *error_code = MPIO_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE,
00030                        myname, __LINE__, MPI_ERR_IO,
00031                        "**io", "**io %s", strerror(errno));
00032     return;
00033     }
00034     
00035 
00036     *error_code = MPI_SUCCESS;
00037 }