Skip Menu |
 

This queue is for tickets about the Proc-ProcessTable CPAN distribution.

Report information
The Basics
Id: 68405
Status: resolved
Priority: 0/
Queue: Proc-ProcessTable

People
Owner: Nobody in particular
Requestors: jmanning [...] yahoo-inc.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: uid/euid info not collected accurately in FreeBSD 7.1
Date: Mon, 23 May 2011 15:21:39 -0700
To: bug-Proc-ProcessTable [...] rt.cpan.org
From: "Jesse Manning" <jmanning [...] yahoo-inc.com>
Download (untitled) / with headers
text/plain 889b
Proc::ProcessTable displays all uids and euids as 0, when ps shows it correctly. The process running in this example is running as user bind (uid 53). $ perl -e 'use File::Find; print $File::Find::VERSION . "\n";' 1.07 $ uname -srm FreeBSD 7.1-YAHOO-20090204 amd64 $ perl --version This is perl, v5.8.5 built for i386-freebsd-thread-multi ... ===snip=== use 5.008; use Proc::ProcessTable; print "Proc::ProcessTable Version: " . $Proc::ProcessTable::VERSION . "\n"; my $ps = Proc::ProcessTable->new(); my $t = $ps->table; foreach my $p ( @{$t} ) { if( $p->fname eq "named" ) { print $p->fname . " " . $p->pid . " " . $p->uid . " " . $p->euid . "\n"; } } ===/snip=== $ ./t.pl Proc::ProcessTable Version: 0.45 perl: warning: /var/run/dev.db: No such file or directory named 29592 0 0 $ ps -p 29592 -o uid,args UID COMMAND 53 /home/y/sbin64/named -n 1 -u bind -t /var/named
Download (untitled) / with headers
text/plain 1.2k
On 2011-05-23 18:21:57, jmanning@yahoo-inc.com wrote: Show quoted text
> Proc::ProcessTable displays all uids and euids as 0, when ps shows it > correctly. The process running in this example is running as user bind > (uid 53). > > $ perl -e 'use File::Find; print $File::Find::VERSION . "\n";' > 1.07 > > $ uname -srm > FreeBSD 7.1-YAHOO-20090204 amd64 > > $ perl --version > > This is perl, v5.8.5 built for i386-freebsd-thread-multi > ... > > ===snip=== > use 5.008; > use Proc::ProcessTable; > print "Proc::ProcessTable Version: " . $Proc::ProcessTable::VERSION .
"\n"; Show quoted text
> my $ps = Proc::ProcessTable->new(); > my $t = $ps->table; > > foreach my $p ( @{$t} ) { > if( $p->fname eq "named" ) { > print $p->fname . " " . $p->pid . " " . $p->uid . " " . $p->euid . "\n"; > } > } > ===/snip=== > > $ ./t.pl > Proc::ProcessTable Version: 0.45 > perl: warning: /var/run/dev.db: No such file or directory > named 29592 0 0 > > $ ps -p 29592 -o uid,args > UID COMMAND > 53 /home/y/sbin64/named -n 1 -u bind -t /var/named >
This issue should be fixed with the following patch: http://cpan.cpantesters.org/authors/id/S/SR/SREZIC/patches/Proc-ProcessTable-0.45-SREZIC-01.patch I tested it with Proc::ProcessTable 0.46 on FreeBSD 8.0 and 9.0. Regards, Slaven
closed in v0.47


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.