/*
- * Copyright (C) 1994-1995, Index Data I/S
+ * Copyright (C) 1994-1998, Index Data I/S
* All rights reserved.
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: lockidx.c,v $
- * Revision 1.7 1996-10-29 14:08:13 adam
+ * Revision 1.15 1998-02-17 10:31:33 adam
+ * Fixed bug in zebraIndexUnlock. On NT, the lock files wasn't removed.
+ *
+ * Revision 1.14 1998/01/12 15:04:08 adam
+ * The test option (-s) only uses read-lock (and not write lock).
+ *
+ * Revision 1.13 1997/09/29 09:08:36 adam
+ * Revised locking system to be thread safe for the server.
+ *
+ * Revision 1.12 1997/09/25 14:54:43 adam
+ * WIN32 files lock support.
+ *
+ * Revision 1.11 1997/09/17 12:19:15 adam
+ * Zebra version corresponds to YAZ version 1.4.
+ * Changed Zebra server so that it doesn't depend on global common_resource.
+ *
+ * Revision 1.10 1997/09/09 13:38:07 adam
+ * Partial port to WIN95/NT.
+ *
+ * Revision 1.9 1997/09/04 13:58:04 adam
+ * Added O_BINARY for open calls.
+ *
+ * Revision 1.8 1997/02/12 20:39:46 adam
+ * Implemented options -f <n> that limits the log to the first <n>
+ * records.
+ * Changed some log messages also.
+ *
+ * Revision 1.7 1996/10/29 14:08:13 adam
* Uses resource lockDir instead of lockPath.
*
* Revision 1.6 1996/03/26 16:01:13 adam
*/
#include <stdio.h>
#include <assert.h>
+#ifdef WINDOWS
+#include <io.h>
+#else
#include <unistd.h>
+#endif
#include <fcntl.h>
#include <string.h>
#include <errno.h>
#include "index.h"
-static int lock_fd = -1;
-static int server_lock_cmt = -1;
-static int server_lock_org = -1;
+static ZebraLockHandle server_lock_main = NULL;
+static ZebraLockHandle server_lock_cmt = NULL;
+static ZebraLockHandle server_lock_org = NULL;
int zebraIndexWait (int commitPhase)
{
- char pathPrefix[1024];
- char path[1024];
- int fd;
-
- zebraLockPrefix (pathPrefix);
+ ZebraLockHandle h;
- if (server_lock_cmt == -1)
+ if (server_lock_cmt)
+ zebra_unlock (server_lock_cmt);
+ else
{
- sprintf (path, "%s%s", pathPrefix, FNAME_COMMIT_LOCK);
- if ((server_lock_cmt = open (path, O_CREAT|O_RDWR|O_SYNC, 0666))
- == -1)
- {
- logf (LOG_FATAL|LOG_ERRNO, "create %s", path);
- return -1;
- }
+ char path[1024];
+
+ zebra_lock_prefix (common_resource, path);
+ strcat (path, FNAME_COMMIT_LOCK);
+ server_lock_cmt = zebra_lock_create (path, 1);
+ if (!server_lock_cmt)
+ {
+ logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
+ return -1;
+ }
}
+ if (server_lock_org)
+ zebra_unlock (server_lock_org);
else
- zebraUnlock (server_lock_cmt);
- if (server_lock_org == -1)
{
- sprintf (path, "%s%s", pathPrefix, FNAME_ORG_LOCK);
- if ((server_lock_org = open (path, O_CREAT|O_RDWR|O_SYNC, 0666))
- == -1)
- {
- logf (LOG_FATAL|LOG_ERRNO, "create %s", path);
- return -1;
- }
+ char path[1024];
+
+ zebra_lock_prefix (common_resource, path);
+ strcat (path, FNAME_ORG_LOCK);
+ server_lock_org = zebra_lock_create (path, 1);
+ if (!server_lock_org)
+ {
+ logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
+ return -1;
+ }
}
- else
- zebraUnlock (server_lock_org);
if (commitPhase)
- fd = server_lock_cmt;
+ h = server_lock_cmt;
else
- fd = server_lock_org;
- if (zebraLockNB (fd, 1) == -1)
+ h = server_lock_org;
+ if (zebra_lock_nb (h))
{
+#ifndef WINDOWS
if (errno != EWOULDBLOCK)
{
logf (LOG_FATAL|LOG_ERRNO, "flock");
exit (1);
}
+#endif
if (commitPhase)
logf (LOG_LOG, "Waiting for lock cmt");
else
logf (LOG_LOG, "Waiting for lock org");
- if (zebraLock (fd, 1) == -1)
+ if (zebra_lock (h) == -1)
{
- logf (LOG_FATAL|LOG_ERRNO, "flock");
+ logf (LOG_FATAL, "flock");
exit (1);
}
}
- zebraUnlock (fd);
+ zebra_unlock (h);
return 0;
}
void zebraIndexLockMsg (const char *str)
{
char path[1024];
- char pathPrefix[1024];
int l, r, fd;
- assert (lock_fd != -1);
- lseek (lock_fd, 0L, SEEK_SET);
+ assert (server_lock_main);
+ fd = zebra_lock_fd (server_lock_main);
+ lseek (fd, 0L, SEEK_SET);
l = strlen(str);
- r = write (lock_fd, str, l);
+ r = write (fd, str, l);
if (r != l)
{
logf (LOG_FATAL|LOG_ERRNO, "write lock file");
exit (1);
}
- zebraLockPrefix (pathPrefix);
- sprintf (path, "%s%s", pathPrefix, FNAME_TOUCH_TIME);
+ zebra_lock_prefix (common_resource, path);
+ strcat (path, FNAME_TOUCH_TIME);
fd = creat (path, 0666);
close (fd);
}
void zebraIndexUnlock (void)
{
char path[1024];
- char pathPrefix[1024];
-
- zebraLockPrefix (pathPrefix);
- sprintf (path, "%s%s", pathPrefix, FNAME_MAIN_LOCK);
- unlink (path);
+
+ zebra_lock_destroy (server_lock_main);
+ zebra_lock_prefix (common_resource, path);
+ strcat (path, FNAME_MAIN_LOCK);
+ if (unlink (path))
+ logf (LOG_WARN|LOG_ERRNO, "unlink %s", path);
}
-void zebraIndexLock (int commitNow)
+void zebraIndexLock (BFiles bfs, int commitNow, const char *rval)
{
char path[1024];
- char pathPrefix[1024];
char buf[256];
int r;
- if (lock_fd != -1)
+ if (server_lock_main)
return ;
- zebraLockPrefix (pathPrefix);
- sprintf (path, "%s%s", pathPrefix, FNAME_MAIN_LOCK);
+
+ zebra_lock_prefix (common_resource, path);
+ strcat (path, FNAME_MAIN_LOCK);
while (1)
{
- lock_fd = open (path, O_CREAT|O_RDWR|O_EXCL, 0666);
- if (lock_fd == -1)
+ server_lock_main = zebra_lock_create (path, 2);
+ if (!server_lock_main)
{
- lock_fd = open (path, O_RDWR);
- if (lock_fd == -1)
+ server_lock_main = zebra_lock_create (path, 1);
+ if (!server_lock_main)
{
if (errno == ENOENT)
continue;
logf (LOG_FATAL|LOG_ERRNO, "open %s", path);
exit (1);
}
- logf (LOG_LOG, "zebraLockNB");
- if (zebraLockNB (lock_fd, 1) == -1)
+ if (zebra_lock_nb (server_lock_main) == -1)
{
+#ifdef WINDOWS
+ logf (LOG_LOG, "waiting for other index process");
+ zebra_lock (server_lock_main);
+ zebra_unlock (server_lock_main);
+ zebra_lock_destroy (server_lock_main);
+ continue;
+#else
if (errno == EWOULDBLOCK)
{
- logf (LOG_LOG, "Waiting for other index process");
- zebraLock (lock_fd, 1);
- zebraUnlock (lock_fd);
- close (lock_fd);
+ logf (LOG_LOG, "waiting for other index process");
+ zebra_lock (server_lock_main);
+ zebra_unlock (server_lock_main);
+ zebra_lock_destroy (server_lock_main);
continue;
}
else
logf (LOG_FATAL|LOG_ERRNO, "flock %s", path);
exit (1);
}
+#endif
}
else
{
- logf (LOG_WARN, "Unlocked %s", path);
- r = read (lock_fd, buf, 256);
+ int fd = zebra_lock_fd (server_lock_main);
+
+ logf (LOG_WARN, "unlocked %s", path);
+ r = read (fd, buf, 256);
if (r == 0)
{
- logf (LOG_WARN, "Zero length %s", path);
- close (lock_fd);
- unlink (path);
+ logf (LOG_WARN, "zero length %s", path);
+ zebra_lock_destroy (server_lock_main);
+ unlink (path);
continue;
}
else if (r == -1)
}
if (*buf == 'r')
{
- logf (LOG_WARN, "Previous transaction didn't"
+ logf (LOG_WARN, "previous transaction didn't"
" reach commit");
- close (lock_fd);
- bf_commitClean ();
+ zebra_lock_destroy (server_lock_main);
+ bf_commitClean (bfs, rval);
unlink (path);
continue;
}
else if (*buf == 'd')
{
- logf (LOG_WARN, "Commit file wan't deleted after commit");
- close (lock_fd);
- bf_commitClean ();
+ logf (LOG_WARN, "commit file wan't deleted after commit");
+ zebra_lock_destroy (server_lock_main);
+ bf_commitClean (bfs, rval);
unlink (path);
continue;
}
else if (*buf == 'w')
{
- logf (LOG_WARN, "Your index may be inconsistent");
+ logf (LOG_WARN,
+ "The lock file indicates that your index is");
+ logf (LOG_WARN, "inconsistent. Perhaps the indexer");
+ logf (LOG_WARN, "terminated abnormally in the previous");
+ logf (LOG_WARN, "run. You can try to proceed by");
+ logf (LOG_WARN, "deleting the file %s", path);
exit (1);
}
else if (*buf == 'c')
if (commitNow)
{
unlink (path);
- close (lock_fd);
+ zebra_lock_destroy (server_lock_main);
continue;
}
- logf (LOG_FATAL, "Previous transaction didn't"
+ logf (LOG_FATAL, "previous transaction didn't"
" finish commit. Commit now!");
exit (1);
}
else
{
- logf (LOG_FATAL, "Unknown id 0x%02x in %s", *buf,
+ logf (LOG_FATAL, "unknown id 0x%02x in %s", *buf,
path);
exit (1);
}
else
break;
}
- zebraLock (lock_fd, 1);
+ zebra_lock (server_lock_main);
}