Sta uopste predstavlja "flock"

Pokusavam da pokrenem skriptu na mom racunaru:

OS Win 98 i imam instaliran IndigiPerl

neke skripte rade ali neke nece i stalno mi izbacuje ovu poruku:


Software error:
flock() unimplemented on this platform at C:/indigoperl/APACHE/CGI-BIN/bannerex/admin.pl line 570.

For help, please send mail to the webmaster ([email protected]), giving this error message and the time and date of the error.



Sta mu to predstavlja uopste?

Unapred Zahvalan

Potpis

http://scoop.mojblog.co.yu

flock() je funkcija koja se koristi kod pristupa nekom fajlu, a postoji mogucnost da u isto vreme neki drugi proces pristupi istom fajlu.
Ukoliko bi dva procesa naprimer istovremeno pokusala da pisu u isti fajl, doslo bi do zbrke i fajl i podaci u njemu bili bi osteceni. Da bi se ovo izbeglo koristi se flock() (ime je nastalo od file lock - zakljucavanje fajla) i sustina je da proces koji pristupa fajlu prvo ga "zakljuca", pa kad neki drugi proces pokusa da otvori ovako zakljucani fajl nece uspeti, nego mora da ceka dok prvi proces zavrsi i otkljuca fajl. Na taj nacin se obezbedjuje da u jednom trenutku samo jedan proces moze da pise u odredjeni fajl.

Sto se konkretno tvog problema tice Perl-ov flock() koristi unix sistemske pozive flock, lockf, fcntl, i ukoliko one ne postoje na sistemu, dobije se fatal error. S obzirom da ovo postoji samo na naprednijim operativnim sistemima, flock() jednostavno ne radi na windows platformama.

Mozes da izbacis delove koji koriste flock (apsolutno ti ne preporucujem, jer sigurno postoji dobar razlog zasto je tu uopste stavljen flock) ili da izmenis program tako da simuliras flock, a kako to da uradis pogledaj temu pre ove:

https://www.elitesecurity.org/t39859

Potpis

Never trust an operating system you don't have sources for.

Ja priznajem da nisam PERL haker, ali ako PERL ima flock() onda je taj
flock() 100% multiplatform! :) Dakle ne verujem da ce se dobiti fatal
error na Windows-u, jer ce flock() na Windows-u raditi drugacije.

Potpis

Dejan Lekic
software engineer, MySQL/PgSQL DBA, sysadmin

Leko, mislim da nisi bas skroz u pravu, jer flock() funkcija nije implementirana (ne radi) na nekim Windows platformama - sto je definitivno slucaj sa Windows 95 i Windows 98 sistemima.

No, i tu ima spasa: LockFile::Simple.

Pozdrav,
alex.

Potpis

Alex: My favorite site is http://localhost/
R.J. Oppenheimer: "I am become death, destroyer of worlds" (1945 AD)
tweet.13x ||
linkedin.13x

Ima i nekih drugih kombinacija. Ali posto stvarno ne verujem da ce tvoje skripte da budu na internetu na nekom win 98 serveru, cak i ako budu uopste na win platformi. Nemoj da brines za to. Win 2000, NT i XP koje sreces kao servere, imaju flock i radi super.

Zato lepo stavi negde u pocetak skripte :

$iswin=1;
# ovo stavi na 1 kad testiras kuci, a na 0 kad uploadujes negde na server

a onda u delu gde je flock(); stavi sledece

if($iswin == 0) {
flock(filehandle,2);
}

A tamo gde otkljucavas fajl isto to samo stavis flock(filehandle,8);

I ne brini.

I da znam da ovo mozes i da automatizujes, pa da ti sama skripta proverava koji je OS, samo ne mogu sad da gledam, a i posluzice ti ovo dok ti ne javim za drugo resenje.

Alex, nisam rekao da je skroz nemoguce da postoje takvi problemi, ako
jesam izvinjavam se. Posao sam od premise da su Perl hakeri dobri
programeri, i trude se da kod bude sto vise portabilan. Sa druge strane,
ako flock() ne radi na nekim platformama, to znaci da se mozda niko nije
zalio. Poprilicno sam uveren da bi to bilo fiksirano u roku od ... ODMAH. :)

PS. ja sam negde u prethodnim tekstovima objasnio kako se implementira
portabilni flock()...

Potpis

Dejan Lekic
software engineer, MySQL/PgSQL DBA, sysadmin