(Publicar esto como una respuesta separada ya que es demasiado tiempo para caber en un comentario)
Gracias a @MatthieuRiegler por el guión original.
Esto funcionó en 10.12.6 y es una modificación menor del guión original (vi el comentario de @ CharlieGorichanaz después de haber hecho mi propia investigación):
set textToSearchForInProcessName to "Not Responding"
-- Run Activity Monitor
tell application "Activity Monitor" to activate
tell application "System Events" to tell process "Activity Monitor"
-- Wait for the Activity Monitor window to open
repeat until (exists window 1)
delay 1
end repeat
--display notification "Window appeared"
-- Wait for the Menubar to be present
repeat until (exists menu 1 of menu bar item "View" of menu bar 1)
delay 1
end repeat
--display notification "Menubar appeared"
-- Make sure View -> My Processes is selected
click menu item "My Processes" of menu 1 of menu bar item "View" of menu bar 1
-- Click the 'CPU View' button ( **1 )
click radio button 1 of radio group 1 ¬
of group 2 of toolbar 1 ¬
of window 1
-- Working with the list of processes
tell outline 1 of scroll area 1 of window 1
-- Looking for Not responding process
set notResponding to rows whose value of ¬
first static text contains textToSearchForInProcessName
repeat with aProcess in notResponding
-- For each non responding process retrieve the PID
set pid to value of text field 1 of aProcess -- ( **2 )
-- Kill that process using pid
if pid is not "" then do shell script ("kill -9 " & pid)
end repeat
end tell
end tell
** 1
En macOS 10.12.x, la barra de herramientas contiene uniconoadicionaldebido al cual se encuentra el conjunto de botones (CPU, Memoria, Energía, etc.) en group 2 of toolbar 1
lugar degroup 1 of toolbar 1
. En ausencia de ese icono (no lo he confirmado en versiones anteriores de macOS), creo que los botones de la CPU, etc.group 1 of toolbar 1
** 2
Esto se aplica si alguna vez arrastró la columna PID en la columna Actividad a una posición diferente. Arrastré la columna PID a la posición más a la izquierda, así que en esta línea, tuve que cambiar el índice a1
:
set pid to value of text field 1 of aProcess
Las columnas están numeradas desde el extremo izquierdo, comenzando en 1. Por lo tanto, ajuste el índice resaltado en la línea anterior en consecuencia si es necesario.