Mercurial > hg > xemacs-beta
comparison src/filelock.c @ 100:4be1180a9e89 r20-1b2
Import from CVS: tag r20-1b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:15:11 +0200 |
parents | 1ce6082ce73f |
children | 8619ce7e4c50 |
comparison
equal
deleted
inserted
replaced
99:2d83cbd90d8d | 100:4be1180a9e89 |
---|---|
258 REGISTER int fd; | 258 REGISTER int fd; |
259 char buf[20]; | 259 char buf[20]; |
260 | 260 |
261 if ((fd = open (lfname, mode, 0666)) >= 0) | 261 if ((fd = open (lfname, mode, 0666)) >= 0) |
262 { | 262 { |
263 #ifdef USG | 263 #if defined(WINDOWSNT) |
264 chmod(lfname, _S_IREAD|_S_IWRITE); | |
265 #elif defined(USG) | |
264 chmod (lfname, 0666); | 266 chmod (lfname, 0666); |
265 #else | 267 #else |
266 fchmod (fd, 0666); | 268 fchmod (fd, 0666); |
267 #endif | 269 #endif |
268 sprintf (buf, "%ld ", (long) getpid ()); | 270 sprintf (buf, "%ld ", (long) getpid ()); |
376 | 378 |
377 emacs_sleep (1); | 379 emacs_sleep (1); |
378 } | 380 } |
379 if (fd >= 0) | 381 if (fd >= 0) |
380 { | 382 { |
381 #ifdef USG | 383 #if defined(WINDOWSNT) |
384 chmod(lfname, _S_IREAD|_S_IWRITE); | |
385 #elif defined(USG) | |
382 chmod ((char *) XSTRING_DATA (Vsuperlock_file), 0666); | 386 chmod ((char *) XSTRING_DATA (Vsuperlock_file), 0666); |
383 #else | 387 #else |
384 fchmod (fd, 0666); | 388 fchmod (fd, 0666); |
385 #endif | 389 #endif |
386 write (fd, lfname, strlen (lfname)); | 390 write (fd, lfname, strlen (lfname)); |