sysdeps/posix/pwrite.c

   1 /* Write block to given position in file without changing file pointer.
   2    POSIX version.
   3    Copyright (C) 1997, 1998, 1999, 2002 Free Software Foundation, Inc.
   4    This file is part of the GNU C Library.
   5    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
   6
   7    The GNU C Library is free software; you can redistribute it and/or
   8    modify it under the terms of the GNU Lesser General Public
   9    License as published by the Free Software Foundation; either
  10    version 2.1 of the License, or (at your option) any later version.
  11
  12    The GNU C Library is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15    Lesser General Public License for more details.
  16
  17    You should have received a copy of the GNU Lesser General Public
  18    License along with the GNU C Library; if not, write to the Free
  19    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  20    02111-1307 USA.  */
  21
  22 #include <errno.h>
  23 #include <unistd.h>
  24
  25 /* Note: This implementation of pwrite is not multithread-safe.  */
  26
  27 ssize_t
  28 __libc_pwrite (int fd, const void *buf, size_t nbyte, off_t offset)
  29 {
  30   /* Since we must not change the file pointer preserve the value so that
  31      we can restore it later.  */
  32   int save_errno;
  33   ssize_t result;
  34   off_t old_offset = __libc_lseek (fd, 0, SEEK_CUR);
  35   if (old_offset == (off_t) -1)
  36     return -1;
  37
  38   /* Set to wanted position.  */
  39   if (__libc_lseek (fd, offset, SEEK_SET) == (off_t) -1)
  40     return -1;
  41
  42   /* Write out the data.  */
  43   result = __libc_write (fd, buf, nbyte);
  44
  45   /* Now we have to restore the position.  If this fails we have to
  46      return this as an error.  But if the writing also failed we
  47      return this error.  */
  48   save_errno = errno;
  49   if (__libc_lseek (fd, old_offset, SEEK_SET) == (off_t) -1)
  50     {
  51       if (result == -1)
  52         __set_errno (save_errno);
  53       return -1;
  54     }
  55   __set_errno (save_errno);
  56
  57   return result;
  58 }
  59
  60 #ifndef __libc_pwrite
  61 strong_alias (__libc_pwrite, __pwrite)
  62 weak_alias (__libc_pwrite, pwrite)
  63 #endif