|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/371.32 11 Aug 2000 10:24:18
To : Andrew Maltsev
Subject : Re: Как определить залочен или нет?
--------------------------------------------------------------------------------
<Andrew_Maltsev@f124.n5015.z2.fidonet.org> wrote:
AM> $unix = 'yes';
AM> sub LOCK_SH { 1 } # Для чтения
AM> sub LOCK_EX { 2 } # Для записи
AM> sub LOCK_UN { 8 } # Unlock File
AM> sub filelock
AM> {
AM> return flock($_[0],$_[1]) if ($unix eq 'yes');
AM> 1;
AM> }
AM> open DATA,">desc.dat";
AM> &filelock(*DATA, LOCK_EX) || die($!); # фыя чтхэшя - LOCK_SH
AM> Господа, если я вот так лочу файл, то как в другом сеансе определить
AM> залочен этот файл уже или нет
Попросить неблокирующий флок. man flock. И посмотреть на результат.
AM> и дождаться когда он будет разлочен?
А тут просто позвать нормальный. Если завершился успешно, значит, он разлочен
тем процессом и залочен тобой.
--
Счастливо!
Ран.
--- ifmail v.2.14.os-p7-tma3
* Origin: MemoNet (2:5020/371.32@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
