2 * Copyright (C) 1994-1999, Index Data
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.16 1999-02-02 14:50:57 adam
8 * Updated WIN32 code specific sections. Changed header.
10 * Revision 1.15 1998/02/17 10:31:33 adam
11 * Fixed bug in zebraIndexUnlock. On NT, the lock files wasn't removed.
13 * Revision 1.14 1998/01/12 15:04:08 adam
14 * The test option (-s) only uses read-lock (and not write lock).
16 * Revision 1.13 1997/09/29 09:08:36 adam
17 * Revised locking system to be thread safe for the server.
19 * Revision 1.12 1997/09/25 14:54:43 adam
20 * WIN32 files lock support.
22 * Revision 1.11 1997/09/17 12:19:15 adam
23 * Zebra version corresponds to YAZ version 1.4.
24 * Changed Zebra server so that it doesn't depend on global common_resource.
26 * Revision 1.10 1997/09/09 13:38:07 adam
27 * Partial port to WIN95/NT.
29 * Revision 1.9 1997/09/04 13:58:04 adam
30 * Added O_BINARY for open calls.
32 * Revision 1.8 1997/02/12 20:39:46 adam
33 * Implemented options -f <n> that limits the log to the first <n>
35 * Changed some log messages also.
37 * Revision 1.7 1996/10/29 14:08:13 adam
38 * Uses resource lockDir instead of lockPath.
40 * Revision 1.6 1996/03/26 16:01:13 adam
41 * New setting lockPath: directory of various lock files.
43 * Revision 1.5 1995/12/13 08:46:09 adam
44 * Locking uses F_WRLCK and F_RDLCK again!
46 * Revision 1.4 1995/12/12 16:00:57 adam
47 * System call sync(2) used after update/commit.
48 * Locking (based on fcntl) uses F_EXLCK and F_SHLCK instead of F_WRLCK
51 * Revision 1.3 1995/12/11 11:43:29 adam
52 * Locking based on fcntl instead of flock.
53 * Setting commitEnable removed. Command line option -n can be used to
54 * prevent commit if commit setting is defined in the configuration file.
56 * Revision 1.2 1995/12/08 16:22:54 adam
57 * Work on update while servers are running. Three lock files introduced.
58 * The servers reload their registers when necessary, but they don't
59 * reestablish result sets yet.
61 * Revision 1.1 1995/12/07 17:38:47 adam
62 * Work locking mechanisms for concurrent updates/commit.
78 static ZebraLockHandle server_lock_main = NULL;
79 static ZebraLockHandle server_lock_cmt = NULL;
80 static ZebraLockHandle server_lock_org = NULL;
82 int zebraIndexWait (int commitPhase)
87 zebra_unlock (server_lock_cmt);
92 zebra_lock_prefix (common_resource, path);
93 strcat (path, FNAME_COMMIT_LOCK);
94 server_lock_cmt = zebra_lock_create (path, 1);
97 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
102 zebra_unlock (server_lock_org);
107 zebra_lock_prefix (common_resource, path);
108 strcat (path, FNAME_ORG_LOCK);
109 server_lock_org = zebra_lock_create (path, 1);
110 if (!server_lock_org)
112 logf (LOG_WARN|LOG_ERRNO, "cannot create lock %s", path);
120 if (zebra_lock_nb (h))
123 if (errno != EWOULDBLOCK)
125 logf (LOG_FATAL|LOG_ERRNO, "flock");
130 logf (LOG_LOG, "Waiting for lock cmt");
132 logf (LOG_LOG, "Waiting for lock org");
133 if (zebra_lock (h) == -1)
135 logf (LOG_FATAL, "flock");
144 void zebraIndexLockMsg (const char *str)
149 assert (server_lock_main);
150 fd = zebra_lock_fd (server_lock_main);
151 lseek (fd, 0L, SEEK_SET);
153 r = write (fd, str, l);
156 logf (LOG_FATAL|LOG_ERRNO, "write lock file");
159 zebra_lock_prefix (common_resource, path);
160 strcat (path, FNAME_TOUCH_TIME);
161 fd = creat (path, 0666);
165 void zebraIndexUnlock (void)
169 zebra_lock_destroy (server_lock_main);
170 zebra_lock_prefix (common_resource, path);
171 strcat (path, FNAME_MAIN_LOCK);
173 logf (LOG_WARN|LOG_ERRNO, "unlink %s", path);
176 void zebraIndexLock (BFiles bfs, int commitNow, const char *rval)
182 if (server_lock_main)
185 zebra_lock_prefix (common_resource, path);
186 strcat (path, FNAME_MAIN_LOCK);
189 server_lock_main = zebra_lock_create (path, 2);
190 if (!server_lock_main)
192 server_lock_main = zebra_lock_create (path, 1);
193 if (!server_lock_main)
197 logf (LOG_FATAL|LOG_ERRNO, "open %s", path);
200 if (zebra_lock_nb (server_lock_main) == -1)
203 logf (LOG_LOG, "waiting for other index process");
204 zebra_lock (server_lock_main);
205 zebra_unlock (server_lock_main);
206 zebra_lock_destroy (server_lock_main);
209 if (errno == EWOULDBLOCK)
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);
219 logf (LOG_FATAL|LOG_ERRNO, "flock %s", path);
226 int fd = zebra_lock_fd (server_lock_main);
228 logf (LOG_WARN, "unlocked %s", path);
229 r = read (fd, buf, 256);
232 logf (LOG_WARN, "zero length %s", path);
233 zebra_lock_destroy (server_lock_main);
239 logf (LOG_FATAL|LOG_ERRNO, "read %s", path);
244 logf (LOG_WARN, "previous transaction didn't"
246 zebra_lock_destroy (server_lock_main);
247 bf_commitClean (bfs, rval);
251 else if (*buf == 'd')
253 logf (LOG_WARN, "commit file wan't deleted after commit");
254 zebra_lock_destroy (server_lock_main);
255 bf_commitClean (bfs, rval);
259 else if (*buf == 'w')
262 "The lock file indicates that your index is");
263 logf (LOG_WARN, "inconsistent. Perhaps the indexer");
264 logf (LOG_WARN, "terminated abnormally in the previous");
265 logf (LOG_WARN, "run. You can try to proceed by");
266 logf (LOG_WARN, "deleting the file %s", path);
269 else if (*buf == 'c')
274 zebra_lock_destroy (server_lock_main);
277 logf (LOG_FATAL, "previous transaction didn't"
278 " finish commit. Commit now!");
283 logf (LOG_FATAL, "unknown id 0x%02x in %s", *buf,
292 zebra_lock (server_lock_main);