2 * Copyright (C) 1994-1999, Index Data
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.17 1999-12-08 15:03:11 adam
8 * Implemented bf_reset.
10 * Revision 1.16 1999/02/02 14:50:57 adam
11 * Updated WIN32 code specific sections. Changed header.
13 * Revision 1.15 1998/02/17 10:31:33 adam
14 * Fixed bug in zebraIndexUnlock. On NT, the lock files wasn't removed.
16 * Revision 1.14 1998/01/12 15:04:08 adam
17 * The test option (-s) only uses read-lock (and not write lock).
19 * Revision 1.13 1997/09/29 09:08:36 adam
20 * Revised locking system to be thread safe for the server.
22 * Revision 1.12 1997/09/25 14:54:43 adam
23 * WIN32 files lock support.
25 * Revision 1.11 1997/09/17 12:19:15 adam
26 * Zebra version corresponds to YAZ version 1.4.
27 * Changed Zebra server so that it doesn't depend on global common_resource.
29 * Revision 1.10 1997/09/09 13:38:07 adam
30 * Partial port to WIN95/NT.
32 * Revision 1.9 1997/09/04 13:58:04 adam
33 * Added O_BINARY for open calls.
35 * Revision 1.8 1997/02/12 20:39:46 adam
36 * Implemented options -f <n> that limits the log to the first <n>
38 * Changed some log messages also.
40 * Revision 1.7 1996/10/29 14:08:13 adam
41 * Uses resource lockDir instead of lockPath.
43 * Revision 1.6 1996/03/26 16:01:13 adam
44 * New setting lockPath: directory of various lock files.
46 * Revision 1.5 1995/12/13 08:46:09 adam
47 * Locking uses F_WRLCK and F_RDLCK again!
49 * Revision 1.4 1995/12/12 16:00:57 adam
50 * System call sync(2) used after update/commit.
51 * Locking (based on fcntl) uses F_EXLCK and F_SHLCK instead of F_WRLCK
54 * Revision 1.3 1995/12/11 11:43:29 adam
55 * Locking based on fcntl instead of flock.
56 * Setting commitEnable removed. Command line option -n can be used to
57 * prevent commit if commit setting is defined in the configuration file.
59 * Revision 1.2 1995/12/08 16:22:54 adam
60 * Work on update while servers are running. Three lock files introduced.
61 * The servers reload their registers when necessary, but they don't
62 * reestablish result sets yet.
64 * Revision 1.1 1995/12/07 17:38:47 adam
65 * Work locking mechanisms for concurrent updates/commit.
81 static ZebraLockHandle server_lock_main = NULL;
82 static ZebraLockHandle server_lock_cmt = NULL;
83 static ZebraLockHandle server_lock_org = NULL;
85 int zebraIndexWait (int commitPhase)
90 zebra_unlock (server_lock_cmt);
95 zebra_lock_prefix (common_resource, path);
96 strcat (path, FNAME_COMMIT_LOCK);
97 server_lock_cmt = zebra_lock_create (path, 1);
100 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
105 zebra_unlock (server_lock_org);
110 zebra_lock_prefix (common_resource, path);
111 strcat (path, FNAME_ORG_LOCK);
112 server_lock_org = zebra_lock_create (path, 1);
113 if (!server_lock_org)
115 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
123 if (zebra_lock_nb (h))
126 if (errno != EWOULDBLOCK)
128 logf (LOG_FATAL|LOG_ERRNO, "flock");
133 logf (LOG_LOG, "Waiting for lock cmt");
135 logf (LOG_LOG, "Waiting for lock org");
136 if (zebra_lock (h) == -1)
138 logf (LOG_FATAL, "flock");
147 void zebraIndexLockMsg (const char *str)
152 assert (server_lock_main);
153 fd = zebra_lock_fd (server_lock_main);
154 lseek (fd, 0L, SEEK_SET);
156 r = write (fd, str, l);
159 logf (LOG_FATAL|LOG_ERRNO, "write lock file");
162 zebra_lock_prefix (common_resource, path);
163 strcat (path, FNAME_TOUCH_TIME);
164 fd = creat (path, 0666);
168 void zebraIndexUnlock (void)
172 zebra_lock_destroy (server_lock_main);
173 server_lock_main = 0;
174 zebra_lock_prefix (common_resource, path);
175 strcat (path, FNAME_MAIN_LOCK);
176 if (unlink (path) && errno != ENOENT)
177 logf (LOG_WARN|LOG_ERRNO, "unlink %s failed", path);
180 void zebraIndexLock (BFiles bfs, int commitNow, const char *rval)
186 if (server_lock_main)
189 zebra_lock_prefix (common_resource, path);
190 strcat (path, FNAME_MAIN_LOCK);
193 server_lock_main = zebra_lock_create (path, 2);
194 if (!server_lock_main)
196 server_lock_main = zebra_lock_create (path, 1);
197 if (!server_lock_main)
201 logf (LOG_FATAL|LOG_ERRNO, "open %s", path);
204 if (zebra_lock_nb (server_lock_main) == -1)
207 logf (LOG_LOG, "waiting for other index process");
208 zebra_lock (server_lock_main);
209 zebra_unlock (server_lock_main);
210 zebra_lock_destroy (server_lock_main);
213 if (errno == EWOULDBLOCK)
215 logf (LOG_LOG, "waiting for other index process");
216 zebra_lock (server_lock_main);
217 zebra_unlock (server_lock_main);
218 zebra_lock_destroy (server_lock_main);
223 logf (LOG_FATAL|LOG_ERRNO, "flock %s", path);
230 int fd = zebra_lock_fd (server_lock_main);
232 logf (LOG_WARN, "unlocked %s", path);
233 r = read (fd, buf, 256);
236 logf (LOG_WARN, "zero length %s", path);
237 zebra_lock_destroy (server_lock_main);
243 logf (LOG_FATAL|LOG_ERRNO, "read %s", path);
248 logf (LOG_WARN, "previous transaction didn't"
250 zebra_lock_destroy (server_lock_main);
251 bf_commitClean (bfs, rval);
255 else if (*buf == 'd')
257 logf (LOG_WARN, "commit file wan't deleted after commit");
258 zebra_lock_destroy (server_lock_main);
259 bf_commitClean (bfs, rval);
263 else if (*buf == 'w')
266 "The lock file indicates that your index is");
267 logf (LOG_WARN, "inconsistent. Perhaps the indexer");
268 logf (LOG_WARN, "terminated abnormally in the previous");
269 logf (LOG_WARN, "run. You can try to proceed by");
270 logf (LOG_WARN, "deleting the file %s", path);
273 else if (*buf == 'c')
278 zebra_lock_destroy (server_lock_main);
281 logf (LOG_FATAL, "previous transaction didn't"
282 " finish commit. Commit now!");
287 logf (LOG_FATAL, "unknown id 0x%02x in %s", *buf,
296 zebra_lock (server_lock_main);