libs/port/pwrite.c

   1 /*
   2  * pwrite function
   3  *
   4  * Copyright 1996 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #include <errno.h>
  25 #include <stdio.h>
  26 #ifdef HAVE_UNISTD_H
  27 # include <unistd.h>
  28 #endif
  29 #ifdef HAVE_IO_H
  30 # include <io.h>
  31 #endif
  32
  33 /* FIXME: this is not thread-safe */
  34
  35 #ifndef HAVE_PWRITE
  36 ssize_t pwrite( int fd, const void *buf, size_t count, off_t offset )
  37 {
  38     ssize_t ret;
  39     off_t old_pos;
  40
  41     if ((old_pos = lseek( fd, 0, SEEK_CUR )) == -1) return -1;
  42     if (lseek( fd, offset, SEEK_SET ) == -1) return -1;
  43     if ((ret = write( fd, buf, count )) == -1)
  44     {
  45         int err = errno;  /* save errno */
  46         lseek( fd, old_pos, SEEK_SET );
  47         errno = err;
  48         return -1;
  49     }
  50     if (lseek( fd, old_pos, SEEK_SET ) == -1) return -1;
  51     return ret;
  52 }
  53 #endif /* HAVE_PWRITE */