Comment vérifier si un PID donné fonctionne?

J'écris un script Perl qui analyse les fichiers journaux pour collecter les PID, puis vérifie si ce PID est en cours d'exécution. J'essaie de penser à la meilleure façon de faire ce chèque. Évidemment, je pourrais faire quelque chose comme:

system("ps $pid > /dev/null") && print "Not running\n";

Cependant, je préfère éviter l'appel système si possible. J'ai donc pensé pouvoir utiliser le /procsystème de fichiers (la portabilité n'est pas un problème, cela fonctionnera toujours sur un système Linux). Par exemple:

if(! -d "/proc/$pid"){
    print "Not running\n";
}

Est-ce sûr? Puis-je toujours supposer que s'il n'y a pas de /proc/$pid/répertoire, le PID associé ne fonctionne pas? Je m'attends à ce que puisque l'AFAIK pslui-même obtient ses informations de /proctoute façon, mais comme il s'agit du code de production, je veux en être sûr.

Ainsi, peut-il y avoir des cas où un processus en cours d'exécution n'a pas de /proc/PIDrépertoire ou où un /proc/PIDrépertoire existe et le processus n'est pas en cours d'exécution? Y a-t-il une raison de préférer l'analyse psau lieu de vérifier l'existence du répertoire?

La fonction perl kill(0,$pid) peut être utilisée.

Si le code retour est 1, le PID existe et vous êtes autorisé à lui envoyer un signal.

Si le code retour est 0, vous devez vérifier $ !. Il peut s'agir d'EPERM (autorisation refusée), ce qui signifie que le processus existe ou ESRCH, auquel cas le processus n'existe pas.

Si votre code de vérification est en cours d'exécution, rootvous pouvez simplifier cela en vérifiant simplement le code retour de kill; 0 => erreur, 1 => ok

Par exemple:

% perl -d -e 0

Loading DB routines from perl5db.pl version 1.37
Editor support available.

Enter h or 'h h' for help, or 'man perldebug' for more help.

main::(-e:1):   0
  DB<1> print kill(0,500)
0
  DB<2> print $!
No such process
  DB<3> print kill(0,1)
0
  DB<4> print $!
Operation not permitted
  DB<5> print kill(0,$$)
1

Cela peut être transformé en une fonction simple

use Errno;

sub test_pid($)
{
  my ($pid)=@_;

  my $not_present=(!kill(0,$pid) && $! == Errno::ESRCH);

  return($not_present);
}

print "PID 500 not present\n" if test_pid(500);
print "PID 1 not present\n" if test_pid(1);
print "PID $$ not present\n" if test_pid($$);

• Je suis sûr à 99,9% que la vérification de l' existence (et d'un répertoire) est à 98% aussi fiable que la technique. La raison pour laquelle le 98% n'est pas 100% est un point que Stephen Harris a abordé (et rebondi) dans un commentaire - à savoir, le système de fichiers pourrait ne pas être monté. Il peut être valide pour demander qu'un système Linux sans un système endommagé, dégradé - après tout, des choses comme , , et/proc/PIDkill 0/proc/procpstoplsof ne fonctionnera probablement pas - et si cela pourrait ne pas être un problème pour un système de production. Mais il est (théoriquement) possible qu'il n'ait jamais été monté (bien que cela puisse empêcher le système de revenir à un état normal), il est certainement possible qu'il soit démonté (je l'ai testé ¹), et je pense qu'il n'y a aucune garantie qu'elle existera (c'est-à-dire qu'elle n'est pas requise par POSIX). Et, à moins que le système ne soit complètement arrosé, killcela fonctionnera.
• Le commentaire de Stephen parle de «sortir vers le système de fichiers» et «d'utiliser les appels système natifs». Je crois que c'est en grande partie un hareng rouge.
  • Oui, toute tentative d'accès /proc nécessite la lecture du répertoire racine pour trouver le /procsystème de fichiers. Cela est vrai pour toute tentative d'accéder à tout fichier par un chemin absolu, y compris les choses dans /bin, /etcet /dev. Cela se produit si souvent que le répertoire racine est sûrement mis en cache dans la mémoire pendant toute la durée de vie (disponibilité) du système, donc cette étape peut être effectuée sans aucune E / S disque. Et, une fois que vous avez l'inode de /proc, tout ce qui se passe est en mémoire.
  • Comment accédez-vous /proc? Avec stat, open, readdir, etc., qui sont le système natif appelle tout autant que kill.

• La question parle d'un processus en cours. Ceci est une phrase glissante. Si vous voulez réellement tester si le processus est en cours d'exécution (c'est-à-dire dans la file d'attente d'exécution; peut-être le processus en cours sur un processeur; pas en veille, en attente ou arrêté), vous devrez peut-être faire et lire la sortie , ou regarder . Mais je ne vois aucun indice dans votre question ou vos commentaires que cela vous préoccupe.ps PID /proc/PID/stat

  L'éléphant dans la pièce, cependant, est qu'un processus zombie ² peut être difficile à distinguer d'un processus qui est bien vivant.  kill 0fonctionne sur un zombie, et existe. Vous pouvez identifier les zombies avec les techniques énumérées dans le paragraphe précédent (faire et lire la sortie, ou regarder ). Mon très rapide et les tests occasionnels (c. -à- pas très approfondie) suggère que vous pouvez aussi le faire en faisant une ou sur , ou - ceux - ci échouera sur les zombies. (Cependant, ils échoueront également sur les processus que vous ne possédez pas.)/proc/PIDps PID/proc/PID/statreadlinklstat/proc/PID/cwd/proc/PID/root/proc/PID/exe

____________
¹  si l' option -f( f orce) ne fonctionne pas, essayez -l( l azy).
²  c'est-à-dire un processus qui s'est terminé / est mort / a pris fin, mais dont le parent n'a pas encore fait a wait.