A fcntl implementation for systems (like Solaris) without flock() call.

By Sjoerd.
This commit is contained in:
Guido van Rossum 1996-06-11 15:11:34 +00:00
parent 8c1529dc29
commit 3c0b79ca0f
1 changed files with 27 additions and 0 deletions

View File

@ -27,6 +27,8 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include "allobjects.h"
#include "modsupport.h"
#include <fcntl.h>
/* fcntl(fd, opt, [arg]) */
@ -144,7 +146,32 @@ fcntl_flock(self, args)
return NULL;
BGN_SAVE
#ifdef HAVE_FLOCK
ret = flock(fd, code);
#else
#ifndef LOCK_SH
#define LOCK_SH 1 /* shared lock */
#define LOCK_EX 2 /* exclusive lock */
#define LOCK_NB 4 /* don't block when locking */
#define LOCK_UN 8 /* unlock */
#endif
{
struct flock l;
if (code == LOCK_UN)
l.l_type = F_UNLCK;
else if (code & LOCK_SH)
l.l_type = F_RDLCK;
else if (code & LOCK_EX)
l.l_type = F_WRLCK;
else {
err_setstr(ValueError, "unrecognized flock argument");
return NULL;
}
l.l_whence = l.l_start = l.l_len = 0;
ret = fcntl(fd, (code & LOCK_NB) ? F_SETLK : F_SETLKW, &l);
}
#endif /* HAVE_FLOCK */
END_SAVE
if (ret < 0) {
err_errno(IOError);