Como devo verificar se um determinado PID está em execução?

Estou escrevendo um script Perl que analisa arquivos de log para coletar PIDs e verifica se esse PID está em execução. Estou tentando pensar na melhor maneira de fazer essa verificação. Obviamente, eu poderia fazer algo como:

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

No entanto, eu preferiria evitar a chamada do sistema, se possível. Por isso, pensei que poderia usar o /procsistema de arquivos (portabilidade não é uma preocupação, isso sempre estará sendo executado em um sistema Linux). Por exemplo:

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

Isso é seguro? Posso sempre assumir que, se não houver /proc/$pid/diretório, o PID associado não está sendo executado? Espero que sim, já que o pspróprio AFAIK obtém suas informações de /procqualquer maneira, mas como isso é para código de produção, quero ter certeza.

Portanto, pode haver casos em que um processo em execução não possui /proc/PIDdiretório ou onde /proc/PIDexiste um diretório e o processo não está em execução? Existe algum motivo para preferir a análise em psvez de verificar a existência do diretório?

A função perl kill(0,$pid)pode ser usada.

Se o código de retorno for 1, o PID existe e você pode enviar um sinal para ele.

Se o código de retorno for 0, será necessário verificar $ !. Pode ser EPERM (permissão negada), o que significa que o processo existe ou ESRCH; nesse caso, o processo não existe.

Se o seu código de verificação estiver em execução root, você poderá simplificar isso apenas verificando o código de retorno do kill; 0 => erro, 1 => ok

Por exemplo:

% 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

Isso pode ser transformado em uma função simples

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($$);

• Tenho 99,9% de certeza de que verificar se existe (e é um diretório) é 98% tão confiável quanto a técnica. A razão pela qual os 98% não são 100% é um ponto em que Stephen Harris tocou (e ricocheteou) em um comentário - ou seja, o sistema de arquivos pode não estar montado. Pode ser válida a reivindicação de que um sistema Linux sem é uma danificada, o sistema degradado - afinal, as coisas gostam , e provavelmente não vai funcionar - e por isso este pode não ser um problema para um sistema de produção. Mas é (teoricamente) possível que nunca tenha sido montado (embora isso possa impedir que o sistema chegue ao estado normal), é definitivamente possível desmontá-lo (eu testei ¹/proc/PIDkill 0/proc/procpstoplsof) e acredito que não há garantia de que ela exista (isto é, não é exigida pelo POSIX). E, a menos que o sistema seja completamente mangueira, killfuncionará.
• O comentário de Stephen fala sobre "sair para o sistema de arquivos" e "usar chamadas de sistema nativas". Eu acredito que isso é basicamente um arenque vermelho.
  • Sim, qualquer tentativa de acesso /proc requer a leitura do diretório raiz para localizar o /procsistema de arquivos. Isto é verdade para qualquer tentativa de acessar qualquer arquivo por um caminho absoluto, incluindo coisas /bin, /etce /dev. Isso acontece com tanta frequência que o diretório raiz certamente fica armazenado em cache na memória durante toda a vida útil (tempo de atividade) do sistema, portanto, essa etapa pode ser realizada sem nenhuma E / S de disco. E, uma vez que você tenha o inode /proc, tudo o que acontece fica na memória.
  • Como você acessa /proc? Com stat, open, readdir, etc., que são sistema nativo chama cada bocado tanto quanto kill.

• A pergunta fala sobre um processo em execução. Esta é uma frase escorregadia. Se você realmente deseja testar se o processo está em execução (por exemplo, na fila de execução; talvez o processo atual em alguma CPU; não esteja em espera, em espera ou parado), pode ser necessário fazer ae ler a saída ou observar . Mas não vejo nenhuma sugestão em sua pergunta ou comentário de que você esteja preocupado com isso.ps PID /proc/PID/stat

  O elefante na sala, no entanto, é que um processo de zumbi ² pode ser difícil de distinguir de um processo que está vivo e bem.  kill 0trabalha em um zumbi e existe. Você pode identificar zumbis com as técnicas listadas no parágrafo anterior (executando e lendo a saída ou examinando ). Meu ocasional (ou seja, não muito completo) teste muito rápido e sugere que você também pode fazer isso, fazendo uma ou on , ou - estes irão falhar em zumbis. (No entanto, eles também falharão nos processos que você não possui.)/proc/PIDps PID/proc/PID/statreadlinklstat/proc/PID/cwd/proc/PID/root/proc/PID/exe

____________
¹  se o -f( f opção orce) não funcionar, tente -l( l Azy).
²  ou seja, um processo que saiu / morreu / terminou, mas cujo pai ainda não fez a wait.