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 <my_global.h>
18
#include <mysys_err.h>
26
-1 An error has occured and 'my_errno' is set
27
to indicate the actual error code.
30
int my_lock(File fd, int locktype, my_off_t start, my_off_t length,
34
long alarm_pos=0,alarm_end_pos=MY_HOW_OFTEN_TO_WRITE-1;
36
DBUG_ENTER("my_lock");
37
DBUG_PRINT("my",("Fd: %d Op: %d start: %ld Length: %ld MyFlags: %d",
38
fd,locktype,(long) start,(long) length,MyFlags));
39
if (my_disable_locking)
45
lock.l_type= (short) locktype;
46
lock.l_whence= SEEK_SET;
47
lock.l_start= (off_t) start;
48
lock.l_len= (off_t) length;
50
if (MyFlags & MY_DONT_WAIT)
52
if (fcntl(fd,F_SETLK,&lock) != -1) /* Check if we can lock */
53
DBUG_RETURN(0); /* Ok, file locked */
54
DBUG_PRINT("info",("Was locked, trying with alarm"));
55
while ((value=fcntl(fd,F_SETLKW,&lock)) && ! (alarm_pos++ >= alarm_end_pos) &&
57
{ /* Setup again so we don`t miss it */
58
alarm_end_pos+=MY_HOW_OFTEN_TO_WRITE;
65
else if (fcntl(fd,F_SETLKW,&lock) != -1) /* Wait until a lock */
69
/* We got an error. We don't want EACCES errors */
70
my_errno=(errno == EACCES) ? EAGAIN : errno ? errno : -1;
73
if (locktype == F_UNLCK)
74
my_error(EE_CANTUNLOCK,MYF(ME_BELL+ME_WAITTANG),my_errno);
76
my_error(EE_CANTLOCK,MYF(ME_BELL+ME_WAITTANG),my_errno);
78
DBUG_PRINT("error",("my_errno: %d (%d)",my_errno,errno));