C'è un modo per leggere le variabili di ambiente di altri processi usando Perl e in un ambiente Linux o Solaris?

Question

In Perl, ho bisogno di leggere l'ambiente di altri processi.

• Lo script è in esecuzione con radice privilegi.
• Lo script sarà esecuzione in Linux e Solaris.
• vorrei una soluzione che è in gran parte indipendente dalla piattaforma, almeno tra Linux e Solaris. In Linux, esaminare/env/< proc_id>/environ può ottenere la risposta.
• Vorrei evitare di dover forchetta. Ho già una soluzione forking "/ usr/ucb/ps -auxwwwe $ pid"

Qualche idea?

Answer 1

Per Solaris, è possibile provare il procfs module from CPAN. Anche se questo modulo sembra ancora molto giovane, questa citazione suona speranza:

Brian Farrell ha inviato una patch molto utile che gestisce ispezione del argv e l'ambiente dei processi diversi dal processo attualmente in esecuzione.

Immagino che questo sia probabilmente solo l'ambiente iniziale (proprio come il file environ sotto linux), ma quello sembra essere quello che vuoi?

Altrimenti, anche se ti vedo dire che non vuoi biforcarti, una soluzione semplice probabilmente farebbe girare a circa 20 righe di C per produrre un piccolo programma che sputa l'ambiente su Solaris esattamente come l'equivalente del Linux environ file. Ho già qualcosa di molto simile in C. Se sei interessato, posso postarlo.

EDIT (dopo aver letto OpenSolaris pargs.c): il buffer di ambiente viene riallocato in Solaris quando l'ambiente cambia, quindi il puntatore di psinfo potrebbe non essere valido. Per una soluzione a prova di proiettile, devi dare la caccia a _environ. Probabilmente è molto più fastidioso di quello che ti serve ... pargs -e <pid> potrebbe essere un alterativo più bello per UCB ps(1) se si va sul bivio, però.

Answer 2

In linux sembra che il /proc/<pid>/environ psuedofiles contengono la variabile environ passato quando è stato creato il processo. Se hai un permesso sufficiente, puoi leggerli.

Essi non sembrano tenere traccia delle modifiche nell'ambiente processi dopo il lancio.

Ciò suggerisce che si dovrebbe disect il dump della memoria dei processi per ottenere quello che stai chiedendo.

Tricky.

Answer 3

La prima cosa che mi viene in mente è usare GDB per collegarsi al processo in questione e quindi chiedere a GDB di ottenere l'ambiente per tu. Puoi farlo con il comando "show environment" nella shell GDB .

Sembra che ci sia un modulo Perl che può fare questo per voi, Devel::GDB. Non ho ancora provato lo strumento , ma sembra una semplice questione di programmazione su creare l'oggetto Devel :: GDB, connettersi al processo che si desidera controllare , inviare il comando "show environment", quindi analizzare lo risultati.

Devo dire però ... quando la soluzione è così complicata, è probabile che tu stia facendo qualcos'altro che non va, . Perché è necessario l'ambiente per un processo casuale, comunque?

Answer 4

Se ps può farlo, come dici tu, allora la tua risposta può essere trovata da qualche parte nel codice sorgente di ps. Ciò eviterebbe la generazione di un nuovo processo.

Answer 5

Il pacchetto GNU "binutils" include un'utilità CLI denominata strings. Vedi http://www.gnu.org/software/binutils/ per maggiori informazioni.

strings /proc/pid/environ - stampa una bella lista delle variabili di ambiente come env.

Answer 6

Su Linux può essere sufficiente risolvere il collegamento simbolico /proc/[pid]/cwd, vedere procfs(5).