debian/0000755000000000000000000000000012234030602007156 5ustar debian/patches/0000755000000000000000000000000012234027047010616 5ustar debian/patches/series0000644000000000000000000000002111672202125012021 0ustar empty_utmp.patch debian/patches/empty_utmp.patch0000644000000000000000000000462211672202125014043 0ustar Author: Joey Hess Description: Fix the test suite to not die if the utmp file is empty. Bug: #394618 --- a/t/06taint.t +++ b/t/06taint.t @@ -23,5 +23,8 @@ my $utmp = Sys::Utmp->new(); my $utent = $utmp->getutent(); -ok(tainted($utent->ut_user()),"ut_user is tainted"); -ok(tainted($utent->ut_host()),"ut_host is tainted"); +SKIP: { + skip "no utmp entries", 2 if ! $utent; + ok(tainted($utent->ut_user()),"ut_user is tainted"); + ok(tainted($utent->ut_host()),"ut_host is tainted"); +} --- a/t/07utent_methods.t +++ b/t/07utent_methods.t @@ -7,10 +7,13 @@ my $utmp = Sys::Utmp->new(); my $utent = $utmp->getutent(); -ok(defined $utent->ut_user(),"ut_user"); -ok(defined $utent->ut_id(),"ut_id"); -ok(defined $utent->ut_line(),"ut_line"); -ok(defined $utent->ut_pid(),"ut_pid"); -ok(defined $utent->ut_type(),"ut_type"); -ok(defined $utent->ut_host(),"ut_host"); -ok(defined $utent->ut_time(),"ut_time"); +SKIP: { + skip "no utmp entries", 7 if ! $utent; + ok(defined $utent->ut_user(),"ut_user"); + ok(defined $utent->ut_id(),"ut_id"); + ok(defined $utent->ut_line(),"ut_line"); + ok(defined $utent->ut_pid(),"ut_pid"); + ok(defined $utent->ut_type(),"ut_type"); + ok(defined $utent->ut_host(),"ut_host"); + ok(defined $utent->ut_time(),"ut_time"); +} --- a/t/08utent_types.t +++ b/t/08utent_types.t @@ -6,13 +6,16 @@ use Test::More tests => 10; my $utmp = Sys::Utmp->new(); my $utent = $utmp->getutent(); -ok(defined $utent->accounting(),"accounting"); -ok(defined $utent->boot_time(),"boot_time"); -ok(defined $utent->dead_process(),"dead_process"); -ok(defined $utent->empty(),"empty"); -ok(defined $utent->init_process(),"init_process"); -ok(defined $utent->login_process(),"login_process"); -ok(defined $utent->new_time(),"new_time"); -ok(defined $utent->old_time(),"old_time"); -ok(defined $utent->run_lvl(),"run_lvl"); -ok(defined $utent->user_process(),"user_process"); +SKIP: { + skip "no utmp entries", 10 if ! $utent; + ok(defined $utent->accounting(),"accounting"); + ok(defined $utent->boot_time(),"boot_time"); + ok(defined $utent->dead_process(),"dead_process"); + ok(defined $utent->empty(),"empty"); + ok(defined $utent->init_process(),"init_process"); + ok(defined $utent->login_process(),"login_process"); + ok(defined $utent->new_time(),"new_time"); + ok(defined $utent->old_time(),"old_time"); + ok(defined $utent->run_lvl(),"run_lvl"); + ok(defined $utent->user_process(),"user_process"); +} debian/watch0000644000000000000000000000012612101266533010215 0ustar version=3 https://metacpan.org/release/Sys-Utmp/ .*/Sys-Utmp-([[:digit:]].*)\.tar\.gz debian/copyright0000644000000000000000000000214412234030120011105 0ustar Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/ Source: https://metacpan.org/release/Sys-Utmp Upstream-Contact: Jonathan Stowe Upstream-Name: Sys-Utmp Files: * Copyright: 2001, Netscalibur UK 2001-2013, Jonathan Stowe License: Artistic or GPL-1+ Files: debian/* Copyright: 2002-2007, Joey Hess 2013, Florian Schlichting License: Artistic or GPL-1+ License: Artistic This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License, which comes with Perl. . On Debian systems, the complete text of the Artistic License can be found in `/usr/share/common-licenses/Artistic'. License: GPL-1+ This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version. . On Debian systems, the complete text of version 1 of the GNU General Public License can be found in `/usr/share/common-licenses/GPL-1'. debian/control0000644000000000000000000000166012234030306010565 0ustar Source: libsys-utmp-perl Maintainer: Debian Perl Group Uploaders: Florian Schlichting Section: perl Priority: optional Build-Depends: debhelper (>= 9.20120312), perl, libtest-pod-perl, libtest-pod-coverage-perl Standards-Version: 3.9.5 Vcs-Browser: http://anonscm.debian.org/gitweb/?p=pkg-perl/packages/libsys-utmp-perl.git Vcs-Git: git://anonscm.debian.org/pkg-perl/packages/libsys-utmp-perl.git Homepage: https://metacpan.org/release/Sys-Utmp/ Package: libsys-utmp-perl Architecture: any Depends: ${perl:Depends}, ${shlibs:Depends}, ${misc:Depends} Description: perl module to query UTMP files Sys::Utmp provides a vaguely object oriented interface to the Unix user accounting file /var/run/utmp, and other files of similar format. It can only be used to query the contents of the file, and cannot modify it. debian/compat0000644000000000000000000000000212234026723010365 0ustar 9 debian/changelog0000644000000000000000000000536512234030602011041 0ustar libsys-utmp-perl (1.7-1) unstable; urgency=low [ gregor herrmann ] * debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser field (source stanza); Homepage field (source stanza). Removed: XS- Vcs-Svn fields. * Use dist-based URL in debian/watch. * Split fix for the test suite out into empty_utmp.patch. * Activate additional tests by adding build dependencies on libtest-pod-perl, libtest-pod-coverage-perl. * Remove build dependency on historic dpkg-dev version. [ Ansgar Burchardt ] * debian/control: Convert Vcs-* fields to Git. [ gregor herrmann ] * debian/control: update {versioned,alternative} (build) dependencies. [ Salvatore Bonaccorso ] * Change Vcs-Git to canonical URI (git://anonscm.debian.org) * Change search.cpan.org based URIs to metacpan.org based URIs [ Florian Schlichting ] * Import Upstream version 1.7 * Switch to source format 3.0 (quilt) * Switch dh compatibility to level 9 to enable passing of hardening flags * Switch to short-form debian/rules * Convert debian/copyright to machine-readable copyright-format 1.0 * Add myself to uploaders * Declare compliance with Debian Policy 3.9.5 * Add lintian override regarding missing hardening flags -- Florian Schlichting Tue, 29 Oct 2013 23:05:51 +0100 libsys-utmp-perl (1.6-4) unstable; urgency=low * Now maintained by the Debian perl group. -- Joey Hess Mon, 30 Jul 2007 01:22:56 -0400 libsys-utmp-perl (1.6-3) unstable; urgency=low * Fix the test suite to not die if the utmp file is empty. Closes: #394618 -- Joey Hess Tue, 24 Oct 2006 12:31:48 -0400 libsys-utmp-perl (1.6-2) unstable; urgency=low * The test suite depends on the system having a utmp file, and since utmp files are IIRC not portable across arches, it's not easy to include a demo one for the tests to run against. Instead, if the utmp file is not present, skip the test suite. Closes: #394618 -- Joey Hess Sun, 22 Oct 2006 15:16:41 -0400 libsys-utmp-perl (1.6-1) unstable; urgency=low * New upstream release. -- Joey Hess Sun, 22 Oct 2006 00:53:24 -0400 libsys-utmp-perl (1.5-4) unstable; urgency=low * Update to current stadands-version. -- Joey Hess Sat, 23 Jul 2005 19:34:31 -0400 libsys-utmp-perl (1.5-3) unstable; urgency=low * Built for perl 5.8. -- Joey Hess Wed, 31 Jul 2002 02:42:19 +0000 libsys-utmp-perl (1.5-2) unstable; urgency=low * Debhelper v4. Fixed dpkg-dev build-dep. -- Joey Hess Mon, 29 Jul 2002 19:05:43 +0000 libsys-utmp-perl (1.5-1) unstable; urgency=low * Initial Release. -- Joey Hess Tue, 12 Feb 2002 20:49:36 -0500 debian/libsys-utmp-perl.examples0000644000000000000000000000001312234027711014147 0ustar examples/* debian/libsys-utmp-perl.lintian-overrides0000644000000000000000000000014112234030443015765 0ustar # hardening flags are present hardening-no-fortify-functions usr/lib/perl5/auto/Sys/Utmp/Utmp.so debian/source/0000755000000000000000000000000012234026627010472 5ustar debian/source/format0000644000000000000000000000001412234027711011673 0ustar 3.0 (quilt) debian/rules0000755000000000000000000000003612234027711010244 0ustar #!/usr/bin/make -f %: dh $@