2 * Copyright (C) 1994-1999, Index Data
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.19 2000-09-05 14:04:05 adam
8 * Updates for prefix 'yaz_' for YAZ log functions.
10 * Revision 1.18 2000/02/24 11:00:07 adam
11 * Fixed bug: indexer would run forever when lock dir was non-existant.
13 * Revision 1.17 1999/12/08 15:03:11 adam
14 * Implemented bf_reset.
16 * Revision 1.16 1999/02/02 14:50:57 adam
17 * Updated WIN32 code specific sections. Changed header.
19 * Revision 1.15 1998/02/17 10:31:33 adam
20 * Fixed bug in zebraIndexUnlock. On NT, the lock files wasn't removed.
22 * Revision 1.14 1998/01/12 15:04:08 adam
23 * The test option (-s) only uses read-lock (and not write lock).
25 * Revision 1.13 1997/09/29 09:08:36 adam
26 * Revised locking system to be thread safe for the server.
28 * Revision 1.12 1997/09/25 14:54:43 adam
29 * WIN32 files lock support.
31 * Revision 1.11 1997/09/17 12:19:15 adam
32 * Zebra version corresponds to YAZ version 1.4.
33 * Changed Zebra server so that it doesn't depend on global common_resource.
35 * Revision 1.10 1997/09/09 13:38:07 adam
36 * Partial port to WIN95/NT.
38 * Revision 1.9 1997/09/04 13:58:04 adam
39 * Added O_BINARY for open calls.
41 * Revision 1.8 1997/02/12 20:39:46 adam
42 * Implemented options -f <n> that limits the log to the first <n>
44 * Changed some log messages also.
46 * Revision 1.7 1996/10/29 14:08:13 adam
47 * Uses resource lockDir instead of lockPath.
49 * Revision 1.6 1996/03/26 16:01:13 adam
50 * New setting lockPath: directory of various lock files.
52 * Revision 1.5 1995/12/13 08:46:09 adam
53 * Locking uses F_WRLCK and F_RDLCK again!
55 * Revision 1.4 1995/12/12 16:00:57 adam
56 * System call sync(2) used after update/commit.
57 * Locking (based on fcntl) uses F_EXLCK and F_SHLCK instead of F_WRLCK
60 * Revision 1.3 1995/12/11 11:43:29 adam
61 * Locking based on fcntl instead of flock.
62 * Setting commitEnable removed. Command line option -n can be used to
63 * prevent commit if commit setting is defined in the configuration file.
65 * Revision 1.2 1995/12/08 16:22:54 adam
66 * Work on update while servers are running. Three lock files introduced.
67 * The servers reload their registers when necessary, but they don't
68 * reestablish result sets yet.
70 * Revision 1.1 1995/12/07 17:38:47 adam
71 * Work locking mechanisms for concurrent updates/commit.
87 static ZebraLockHandle server_lock_main = NULL;
88 static ZebraLockHandle server_lock_cmt = NULL;
89 static ZebraLockHandle server_lock_org = NULL;
91 int zebraIndexWait (int commitPhase)
96 zebra_unlock (server_lock_cmt);
101 zebra_lock_prefix (common_resource, path);
102 strcat (path, FNAME_COMMIT_LOCK);
103 server_lock_cmt = zebra_lock_create (path, 1);
104 if (!server_lock_cmt)
106 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
111 zebra_unlock (server_lock_org);
116 zebra_lock_prefix (common_resource, path);
117 strcat (path, FNAME_ORG_LOCK);
118 server_lock_org = zebra_lock_create (path, 1);
119 if (!server_lock_org)
121 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
129 if (zebra_lock_nb (h))
132 if (errno != EWOULDBLOCK)
134 logf (LOG_FATAL|LOG_ERRNO, "flock");
139 logf (LOG_LOG, "Waiting for lock cmt");
141 logf (LOG_LOG, "Waiting for lock org");
142 if (zebra_lock (h) == -1)
144 logf (LOG_FATAL, "flock");
153 void zebraIndexLockMsg (const char *str)
158 assert (server_lock_main);
159 fd = zebra_lock_fd (server_lock_main);
160 lseek (fd, 0L, SEEK_SET);
162 r = write (fd, str, l);
165 logf (LOG_FATAL|LOG_ERRNO, "write lock file");
168 zebra_lock_prefix (common_resource, path);
169 strcat (path, FNAME_TOUCH_TIME);
170 fd = creat (path, 0666);
174 void zebraIndexUnlock (void)
178 zebra_lock_prefix (common_resource, path);
179 strcat (path, FNAME_MAIN_LOCK);
180 if (unlink (path) && errno != ENOENT)
181 logf (LOG_WARN|LOG_ERRNO, "unlink %s failed", path);
182 zebra_lock_destroy (server_lock_main);
183 server_lock_main = 0;
186 int zebraIndexLock (BFiles bfs, int commitNow, const char *rval)
192 if (server_lock_main)
195 zebra_lock_prefix (common_resource, path);
196 strcat (path, FNAME_MAIN_LOCK);
199 server_lock_main = zebra_lock_create (path, 2);
200 if (!server_lock_main)
202 server_lock_main = zebra_lock_create (path, 1);
203 if (!server_lock_main)
205 logf (LOG_FATAL, "couldn't obtain indexer lock");
208 if (zebra_lock_nb (server_lock_main) == -1)
211 logf (LOG_LOG, "waiting for other index process");
212 zebra_lock (server_lock_main);
213 zebra_unlock (server_lock_main);
214 zebra_lock_destroy (server_lock_main);
217 if (errno == EWOULDBLOCK)
219 logf (LOG_LOG, "waiting for other index process");
220 zebra_lock (server_lock_main);
221 zebra_unlock (server_lock_main);
222 zebra_lock_destroy (server_lock_main);
227 logf (LOG_FATAL|LOG_ERRNO, "flock %s", path);
234 int fd = zebra_lock_fd (server_lock_main);
236 logf (LOG_WARN, "unlocked %s", path);
237 r = read (fd, buf, 256);
240 logf (LOG_WARN, "zero length %s", path);
241 zebra_lock_destroy (server_lock_main);
247 logf (LOG_FATAL|LOG_ERRNO, "read %s", path);
252 logf (LOG_WARN, "previous transaction didn't"
254 zebra_lock_destroy (server_lock_main);
255 bf_commitClean (bfs, rval);
259 else if (*buf == 'd')
261 logf (LOG_WARN, "commit file wan't deleted after commit");
262 zebra_lock_destroy (server_lock_main);
263 bf_commitClean (bfs, rval);
267 else if (*buf == 'w')
270 "The lock file indicates that your index is");
271 logf (LOG_WARN, "inconsistent. Perhaps the indexer");
272 logf (LOG_WARN, "terminated abnormally in the previous");
273 logf (LOG_WARN, "run. You can try to proceed by");
274 logf (LOG_WARN, "deleting the file %s", path);
277 else if (*buf == 'c')
282 zebra_lock_destroy (server_lock_main);
285 logf (LOG_FATAL, "previous transaction didn't"
286 " finish commit. Commit now!");
291 logf (LOG_FATAL, "unknown id 0x%02x in %s", *buf,
300 zebra_lock (server_lock_main);