🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.pascal
Article #92522

Re: [Lazarus] TCurl zawiesza się. Pomocy! Proszę!

#92522
From: Terrmit
Date: Tue, 01 Apr 2008 13:36
27 lines
1986 bytes
Tutaj tworzony jest wątek CurlThreadExecute
>       pthread_mutex_init({$IFDEF FPC}@{$ENDIF}fMutex, nil);
>       pthread_create({$IFDEF FPC}@{$ENDIF}fThread, nil, {$IFDEF 
> FPC}@{$ENDIF}CurlThreadExecute, self);

<code>
   function CurlThreadExecute(o:pointer):LongInt; cdecl;
   begin
     with TCurl(o) do begin
       fThdResult:=curl_easy_perform(fCurl);
       fBusy:=False;
     end;
     Result:=0;
   end;
</code>

Wygląda na to, że po 300-stu wywołaniach przestaje się ten wątek
wykonywać, dlatego zmienna fBusy pozostaje z wartością True.
Tylko dlaczego tak się dzieje?
Stała PTHREAD_THREADS_MAX = 1024.
Być może wątki nie są poprawnie zakończone i zachowują się jak zombi.
Aczkolwiek całość zakończona jest procedurą:
pthread_mutex_destroy({$IFDEF FPC}@{$ENDIF}fMutex);
Tylko jak sprawdzić, czy ilość utworzonych wątków doszła do 1024?
Jak sprawdzić ile ich jest?

Sławek
Technical Details
Message-ID: <fstdsc$lcb$1@atlantis.news.neostrada.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!newsfeed.neostrada.pl!atlantis.news.neostrada.pl!news.neostrada.pl!news.tpi.pl!not-for-mail
References: <fssr03$k01$1@atlantis.news.neostrada.pl> <fst2ug$gd3$1@nemesis.news.neostrada.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!newsfeed.neostrada.pl!atlantis.news.neostrada.pl!news.neostrada.pl!news.tpi.pl!not-for-mail
From: Terrmit <terrmitv@poczta.onet.pl>
Newsgroups: pl.comp.lang.pascal
Subject: Re: [Lazarus] TCurl zawiesza się. Pomocy!
 Proszę!
Date: Tue, 01 Apr 2008 15:36:46 +0200
Organization: TP - http://www.tp.pl/
Lines: 27
Message-ID: <fstdsc$lcb$1@atlantis.news.neostrada.pl>
References: <fssr03$k01$1@atlantis.news.neostrada.pl> <fst2ug$gd3$1@nemesis.news.neostrada.pl>
NNTP-Posting-Host: fge166.internetdsl.tpnet.pl
Mime-Version: 1.0
X-Trace: atlantis.news.neostrada.pl 1207057100 21899 83.13.160.166 (1 Apr 2008 13:38:20 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Tue, 1 Apr 2008 13:38:20 +0000 (UTC)
User-Agent: Thunderbird 2.0.0.12 (X11/20080226)
In-Reply-To: <fst2ug$gd3$1@nemesis.news.neostrada.pl>
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit