Imported Upstream version 2.6.0
[debian/amanda] / common-src / amflock-lockf.c
1 /*
2  * Amanda, The Advanced Maryland Automatic Network Disk Archiver
3  * Copyright (c) 1991-1998 University of Maryland at College Park
4  * All Rights Reserved.
5  *
6  * Permission to use, copy, modify, distribute, and sell this software and its
7  * documentation for any purpose is hereby granted without fee, provided that
8  * the above copyright notice appear in all copies and that both that
9  * copyright notice and this permission notice appear in supporting
10  * documentation, and that the name of U.M. not be used in advertising or
11  * publicity pertaining to distribution of the software without specific,
12  * written prior permission.  U.M. makes no representations about the
13  * suitability of this software for any purpose.  It is provided "as is"
14  * without express or implied warranty.
15  *
16  * U.M. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL U.M.
18  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
19  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
20  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
21  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
22  *
23  * Authors: the Amanda Development Team.  Its members are listed in a
24  * file named AUTHORS, in the root directory of this distribution.
25  */
26
27 /* moved from amflock.c by Dustin J. Mitchell <dustin@zmanda.com> */
28
29 #include "amanda.h"
30
31 /* XPG4-UNIX (eg, SGI IRIX, DEC DU) has F_ULOCK instead of F_UNLOCK */
32 #if defined(F_ULOCK) && !defined(F_UNLOCK)
33 #  define F_UNLOCK F_ULOCK
34 #endif
35
36 static int
37 lockf_lock(
38     int fd,
39     G_GNUC_UNUSED char *resource)
40 {
41     return lockf(fd, F_LOCK, (off_t)0);
42 }
43
44 static int
45 lockf_unlock(
46     int fd,
47     G_GNUC_UNUSED char *resource)
48 {
49     off_t pos;
50
51     /* unlock from here on */
52     if (lockf(fd, F_UNLOCK, (off_t)0) == -1) return -1;
53
54     /* unlock from bof to here */
55     pos = lseek(fd, (off_t)0, SEEK_CUR);
56     if (pos == (off_t)-1) {
57         if (errno == ESPIPE) 
58             pos = (off_t)0;
59         else
60             return -1;
61     }
62
63     if (pos > (off_t)0) {
64         if (lockf(fd, F_UNLOCK, -pos) == -1)
65             return -1;
66     }
67
68     return 0;
69 }
70
71 amflock_impl_t amflock_lockf_impl = {
72     lockf_lock,
73     lockf_lock, /* no read-only support */
74     lockf_unlock,
75     "lockf"
76 };