Bei Firebird geht das über die Monitoringtabellen (MON$STATEMENTS in diesem Fall)

Zitat von mkinzler:

Bei Firebird geht das über die Monitoringtabellen (MON$STATEMENTS in diesem Fall)

Kannst Du das mal etwas genauer erklären bitte?

Ist zwar schon nen bisl älter das Thema, aber ich hab auch genau den Fall,
und da hier auch nur nach den Auslösern fürs Hängen gesucht wurde, Frage ich nochmal

Ich möchte einen Thread abschießen, der nicht mehr reagiert.
Warum der hängt, soll egal sein
Z.b. es wrid im thread ne funktion aus einer DLL aufgerufen die dann in einer Schleife festhängt,
und auf die DLL hat man keinen Einfluss.

Die Wege fürs normale beenden sind mir bekannt, funktionieren aber nicht.

Was ich bisher mache:
1.FreeOnTerminate setzen, in der Hoffnung das er sich irgendwann mal beendet, im Fehlerfall.
2.Thread Normal terminieren, im Timeout Fall /Fehler
3.Neuen Thread erstellen der die Aufgabe übernimmt

Bei meiner Simulation, kommt beim beenden des Programmes der Destructor von dem Toten Thread NICHT zum tragen.

Alternativ hab ich schon nachgedacht, den Programm Zustand zu merken und Programm neuzustarten

Was mich interesstiert:
-Möglichkeit den Thread zu killen,
-TerminateThread(MSDN link), funktioniert nicht, bzw vielleicht hab ichs falsch implemtniert? S.u.

Mein ThreadTerminate das net geht:

zusammenfalten · markieren

Delphi-Quellcode:

    FWorker.Terminate;
    StartTimeout(tmpTO,'StopThread_tmpTO',3000);

    //das hier sollte man natürlcih net tun wenn FreeOnTerminate gesetzt ist...
    while not FWorker.Finished and not isTimeout(tmpTO) do
    begin
      Application.ProcessMessages;
    end;

    //FORCE KILL:
    if isTimeout(tmpTO) then
    begin
      System.SetLastError(ERROR_SUCCESS);
      iThreadExitCode:=0;
      if not GetExitCodeThread(FWorker.ThreadID,iThreadExitCode) then
      begin
        sMsg:=SysErrorMessage(GetLastError); //== 'Das Handle ist ungültig' , ist es aber nicht windows :P
        showmessage('Fehler1');
      end;


      System.SetLastError(ERROR_SUCCESS);
      bOK:=TerminateThread(FWorker.ThreadID,iThreadExitCode);
      if bOK then
        showmessage('OK');
      else
      begin
        showmessage('Fehler2')
        sMsg:=SysErrorMessage(GetLastError); //kein OS error vorhanden
      end;
    End;

Wenn z.B. ein Socket gerade hängt, bekommst du den Thread nicht gekillt bevor das Timeout kommt.

An der Stelle wäre dann ein Multiprozessmodell wie in Google Chrome sinnvoll. Das wurde ja genau aus den Gründen eingeführt um hängende oder abgestürzte Tabs zu behandeln ohne dass der Browser selbst abstürzt. Das funktioniert in anderen Browsern ja bis heute nicht richtig.

Einen solchen externen Prozess kannst du in fast allen Fällen abschießen. Es gibt allerdings auch dafür Grenzen. Manchmal kann man nicht einmal einen solchen Prozess abschießen. Diese Fälle sind aber selten.

Zitat von 4dk2:

funktioniert nicht, bzw vielleicht hab ichs falsch implemtniert?

Windows hat sehr wohl recht - Du gibst ihm die Thread Id. Die WinApi-Mehtode GetExitCodeThread möchte aber ein Handle, nicht die ID.

In Fortsetzung der Ausfürungen des schönen Günther: Dasselbe trifft auf TerminateThread zu. D.h. erst OpenThread rufen, um das Handle zu ermitteln und dann mit diesem weiterarbeiten (und nicht vergessen, CloseHandle am Ende aufzurufen).

Grüße
Dalai

Es ist eben meist immer besser das Kind nicht erst in den Brunnen fallen zu lassen. Was sagt denn der Entwickler der DLL zu dem Problem?

Zitat von Dalai:

D.h. erst OpenThread rufen, um das Handle zu ermitteln und dann mit diesem weiterarbeiten (und nicht vergessen, CloseHandle am Ende aufzurufen).

Nicht notwendig, wir haben hier doch einen TThread , und der hat direkt schon die Eigenschaft Handle .

GetExitCodeThread(FWorker.Handle,iThreadExitCode) gibt ok zurück
aber
TerminateThread(FWorker.ThreadID,iThreadExitCode) = false Ich kann aber z.b. mit dem process Explorer von Sysinternals den toten Thread killen.
Dann muss es doch auch eine Interne Möglichkeit geben oder?

Ich vermute einmal du musst wie Dalai geschrieben hat mit OpenThread arbeiten. Ich bezweifle, dass das Handle, das standardmäßig in der Eigenschaft Handle liegt, das Zugriffsrecht THREAD_TERMINATE hat. Siehe Dokumentation.

Dir muss aber klar sein, dass die Verwendung von TerminateThread das ganze System instabil machen oder zum Absturz bringen kann, wenn man nicht ganz genau weiß was man da tut. Deshalb ja auch die dringende Warnung in der Dokumentation:

Zitat:

TerminateThread is a dangerous function that should only be used in the most extreme cases.

Insbesondere bei Verwendung von fremden DLLs, auf die man keinen Einfluss hat, wie du eingangs geschrieben hast, ist das hochkritisch.

Sollte das eine Business Anwendung sein, wäre das schon ein NoGo für deren Einsatz in vielen Fällen.