summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorespie <espie@openbsd.org>2009-10-15 18:40:32 +0000
committerespie <espie@openbsd.org>2009-10-15 18:40:32 +0000
commite759a846f37f5d256e7b7bc5b821e0eb5737595c (patch)
tree14bccde61b39dae2ed15e966f19bed34bfb0c8ba
parentmove the installed check in Tracker, where they belong (diff)
downloadwireguard-openbsd-e759a846f37f5d256e7b7bc5b821e0eb5737595c.tar.xz
wireguard-openbsd-e759a846f37f5d256e7b7bc5b821e0eb5737595c.zip
the to_install/to_update stuff is now in the tracker object.
-rw-r--r--usr.sbin/pkg_add/OpenBSD/Dependencies.pm28
1 files changed, 5 insertions, 23 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/Dependencies.pm b/usr.sbin/pkg_add/OpenBSD/Dependencies.pm
index e697b06a6ae..d5b0448966c 100644
--- a/usr.sbin/pkg_add/OpenBSD/Dependencies.pm
+++ b/usr.sbin/pkg_add/OpenBSD/Dependencies.pm
@@ -1,5 +1,5 @@
# ex:ts=8 sw=4:
-# $OpenBSD: Dependencies.pm,v 1.72 2009/10/15 10:45:47 espie Exp $
+# $OpenBSD: Dependencies.pm,v 1.73 2009/10/15 18:40:32 espie Exp $
#
# Copyright (c) 2005-2007 Marc Espie <espie@openbsd.org>
#
@@ -200,7 +200,7 @@ sub new
{
my ($class, $set) = @_;
bless {set => $set, plist => $set->handle->{plist},
- to_install => {}, to_update => {}, deplist => [], to_register => {} }, $class;
+ deplist => [], to_register => {} }, $class;
}
sub dependencies
@@ -219,22 +219,6 @@ sub has_dep
return $self->{to_register}->{$dep};
}
-sub add_todo
-{
- my ($self, @extra) = @_;
-
- require OpenBSD::PackageName;
-
- for my $set (@extra) {
- for my $n ($set->newer) {
- $self->{to_install}->{$n->pkgname} = $set;
- }
- for my $n ($set->older) {
- $self->{to_update}->{$n->pkgname} = $set;
- }
- }
-}
-
sub find_dep_in_repositories
{
my ($self, $state, $dep) = @_;
@@ -270,7 +254,7 @@ sub find_dep_in_stuff_to_install
{
my ($self, $state, $dep) = @_;
- return find_candidate($dep->spec, keys %{$self->{to_install}});
+ return find_candidate($dep->spec, keys %{$state->{tracker}->{to_install}});
}
sub solve_dependency
@@ -282,7 +266,7 @@ sub solve_dependency
if ($state->{allow_replacing}) {
$v = $self->find_dep_in_stuff_to_install($state, $dep);
if ($v) {
- push(@{$self->{deplist}}, $self->{to_install}->{$v});
+ push(@{$self->{deplist}}, $state->{tracker}->{to_install}->{$v});
return $v;
}
}
@@ -298,7 +282,7 @@ sub solve_dependency
if (!$state->{allow_replacing}) {
$v = $self->find_dep_in_stuff_to_install($state, $dep);
if ($v) {
- push(@{$self->{deplist}}, $self->{to_install}->{$v});
+ push(@{$self->{deplist}}, $state->{tracker}->{to_install}->{$v});
return $v;
}
}
@@ -320,8 +304,6 @@ sub solve_depends
{
my ($self, $state, @extra) = @_;
- $self->add_todo(@extra);
-
for my $package ($self->{set}->newer) {
for my $dep (@{$package->{plist}->{depend}}) {
my $v = $self->solve_dependency($state, $dep);