1
/* Copyright (C) 2000-2003 MySQL AB
3
This program is free software; you can redistribute it and/or modify
4
it under the terms of the GNU General Public License as published by
5
the Free Software Foundation; version 2 of the License.
7
This program is distributed in the hope that it will be useful,
8
but WITHOUT ANY WARRANTY; without even the implied warranty of
9
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10
GNU General Public License for more details.
12
You should have received a copy of the GNU General Public License
13
along with this program; if not, write to the Free Software
14
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
16
#include "mysys_priv.h"
17
#include "mysys_err.h"
19
#undef MY_HOW_OFTEN_TO_ALARM
20
#define MY_HOW_OFTEN_TO_ALARM ((int) my_time_to_wait_for_lock)
31
-1 An error has occured and 'my_errno' is set
32
to indicate the actual error code.
35
int my_lock(File fd, int locktype, my_off_t start, my_off_t length,
42
DBUG_ENTER("my_lock");
43
DBUG_PRINT("my",("Fd: %d Op: %d start: %ld Length: %ld MyFlags: %d",
44
fd,locktype,(long) start,(long) length,MyFlags));
45
if (my_disable_locking)
48
#if defined(HAVE_FCNTL)
52
lock.l_type= (short) locktype;
53
lock.l_whence= SEEK_SET;
54
lock.l_start= (off_t) start;
55
lock.l_len= (off_t) length;
57
if (MyFlags & MY_DONT_WAIT)
59
if (fcntl(fd,F_SETLK,&lock) != -1) /* Check if we can lock */
60
DBUG_RETURN(0); /* Ok, file locked */
61
DBUG_PRINT("info",("Was locked, trying with alarm"));
63
while ((value=fcntl(fd,F_SETLKW,&lock)) && ! ALARM_TEST &&
65
{ /* Setup again so we don`t miss it */
74
else if (fcntl(fd,F_SETLKW,&lock) != -1) /* Wait until a lock */
78
if (MyFlags & MY_SEEK_NOT_DONE)
80
if (my_seek(fd,start,MY_SEEK_SET,MYF(MyFlags & ~MY_SEEK_NOT_DONE))
84
If an error has occured in my_seek then we will already
85
have an error code in my_errno; Just return error code.
90
if (lockf(fd,locktype,length) != -1)
92
#endif /* HAVE_FCNTL */
94
/* We got an error. We don't want EACCES errors */
95
my_errno=(errno == EACCES) ? EAGAIN : errno ? errno : -1;
98
if (locktype == F_UNLCK)
99
my_error(EE_CANTUNLOCK,MYF(ME_BELL+ME_WAITTANG),my_errno);
101
my_error(EE_CANTLOCK,MYF(ME_BELL+ME_WAITTANG),my_errno);
103
DBUG_PRINT("error",("my_errno: %d (%d)",my_errno,errno));