diff options
Diffstat (limited to 'lib/Sbuild/ChrootInfoAutopkgtest.pm')
-rw-r--r-- | lib/Sbuild/ChrootInfoAutopkgtest.pm | 67 |
1 files changed, 67 insertions, 0 deletions
diff --git a/lib/Sbuild/ChrootInfoAutopkgtest.pm b/lib/Sbuild/ChrootInfoAutopkgtest.pm new file mode 100644 index 0000000..e43c52a --- /dev/null +++ b/lib/Sbuild/ChrootInfoAutopkgtest.pm @@ -0,0 +1,67 @@ +# +# ChrootInfo.pm: chroot utility library for sbuild +# Copyright © 2005-2009 Roger Leigh <rleigh@debian.org> +# +# 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 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, but +# WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +# General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see +# <http://www.gnu.org/licenses/>. +# +####################################################################### + +package Sbuild::ChrootInfoAutopkgtest; + +use Sbuild::ChrootInfo; +use Sbuild::ChrootAutopkgtest; + +use strict; +use warnings; + +BEGIN { + use Exporter (); + our (@ISA, @EXPORT); + + @ISA = qw(Exporter Sbuild::ChrootInfo); + + @EXPORT = qw(); +} + +sub new { + my $class = shift; + my $conf = shift; + + my $self = $class->SUPER::new($conf); + bless($self, $class); + + return $self; +} + +sub get_info_all { + my $self = shift; + + my $chroots = {}; + + $self->set('Chroots', $chroots); +} + +sub _create { + my $self = shift; + my $chroot_id = shift; + + my $chroot = undef; + + $chroot = Sbuild::ChrootAutopkgtest->new($self->get('Config'), $chroot_id); + + return $chroot; +} + +1; |