Feststellen (vllt. anhand CPU-Auslastung) ob Prozess auf einem anderen Rechner hängt

[Union]

Das ist zwar keine Lösung für Dein eigentliches Problem, aber ich sende in solchen Fällen aus dem "Watchdog" heraus eine EMail. In diesen Fällen wird dann weltweit schon irgend jemand reagieren. Fehlalarme gab es bei mir noch nicht. Meine eigenen Dienset schreiben regelmäßíg ein Logfile mit Timestamp, auch wenn sie nichts tun. So läßt sich sehr einfach feststellen ob die sich selber aufhängen.

[Jumpy]

Das hab ich jetzt auf die schnelle auch so umgesetzt, dass dann eine Email an die Admins geht. Ist in der Regel dann auch OK und wenn das Nachts passiert weiß der erste Admin der zur Arbeit kommt direkt Bescheid.
Trotzdem wär es natürlich cool, wenn mein Dienst den fehlerhaften fremden Diesnt selber killen und neustarten könnte.

Ich habe mich durch ein paar MSDN-Einträge und Artikel von Mark Russinovich bzgl. pskill gearbeitet und bin dabei auf dessen Bruder psList gestossen, der vllt. das kann was ich suche. Werde das mal probieren.

[Union]

Falls Du weitreichende Rechte auf dem Zielrechner hast und etwas Zeit zur Analyse, könntest Du evtl Speicherbereiche des fremden Dienstes auf Unterschiede in Intervallen prüfen, in sich denen bei normalem Ablauf etwas ändert. Oder Du erstellst einen Task, der den Dienst "vorsorglich" regelmäßig über sc.exe neu startet.

EDIT: Diese Unit habe ich mal selber eingesetzt, um ggf. einen Thread auszubremsen. Um den Prozentsatz der Auslastung festzustellen, muss das result von wsGetCpuUsage noch durch die Anzahl der Prozessoren geteilt werden.

[hathor]

Zitat:
In Microsoft Windows XP SP1 and later operating systems, GDI uses a watchdog timer to monitor the time that threads spend executing in the display driver. The watchdog defines a time threshold. If a thread spends more time in a display driver than the threshold specifies, the watchdog tries to recover by switching to VGA graphics mode.
If the attempt fails, the watchdog generates bug check 0xEA, THREAD_STUCK_IN_DEVICE_DRIVER.

Vielleicht lässt sich so etwas Ähnliches auch auf dem Zielrechner einrichten.

Stichwort: IsProcessRunning
http://www.delphipraxis.net/168662-b...tet-wurde.html
#6

http://www.delphipraxis.net/177915-p...uerzt-ist.html
http://www.delphipraxis.net/174350-w...angen-hat.html
http://www.delphipraxis.net/122731-w...mm-haengt.html
http://www.delphipraxis.net/66018-fe...ohren-ist.html

[Dejan Vu]

Vielleicht hilft das hier:

Delphi-Quellcode:

function IsAppRespondigNT(wnd: HWND): Boolean;
type
  TIsHungAppWindow = function(wnd:hWnd): BOOL; stdcall;
var
  hKernel: THandle;
  IsHungAppWindow: TIsHungAppWindow;
begin
  Result := True;
  hKernel := GetModuleHandle('user32.dll');
  if (hKernel > 0) then
  begin
    @IsHungAppWindow := GetProcAddress(hKernel, 'IsHungAppWindow');
    if Assigned(IsHungAppWindow) then
    begin
      Result := not IsHungAppWindow(wnd);
    end;
  end;
end;

[himitsu]

Nur über Telnet wirst du wohl Probleme haben.
Da bleibt dann nur noch ein lokaler Überwachungsdienst.

Unsere ServerApp blieb auch manchmal hängen.
Da hatte ich dann erstmal einen Logging-Thread in der Anwendung erstellt, der Loggt regelmäßig einige Dinge.
- die CPU-Auslastung des eigenen Prozesses
- der eigene Arbeitsspeicher
- - Belegung, Ungenutzt (Defragmentierung) ... aber das das geht im FastMM einfacher auszulesen
- Belegung / Frei des eigenen virtuellen Speichers
- Belegung / Frei realen RAM
- Belegung / Frei / Auslagerungsdatei des eigenen globalen Arbeitsspeichers
- nja, und dann halt noch so paar Dinge, wie Anzahl der DataSnap-Verbindungen, und die Aufruf-Anzahl verschiedener AppsFunktionen

Wird aktuell alle 10 Sekunden gemessen, und dann alle 5 oder 15 Minuten in eine Logdatei gespeichert, mit Min, Max und Durchschnitt (innerhalb des Logintervals)

So hat man zumindestens erstmal einen kleinen Überblick, was eigentlich läuft.

(Der halbwegs kleine Code läuft so aber erst ab D2009, bzw. D2006, mit kleinen Änderungen)

[Dejan Vu]

Zitat von himitsu:

Nur über Telnet wirst du wohl Probleme haben.

Es ist mir auch neu, das man per TelNet Prozesse abschießen kann, außer, man hat einen Exploit. Natürlich benötigt man einen entsprechenden Zugriff auf dem Zielrechner.