/openbsd/usr.sbin/pkg_add/OpenBSD/ |
H A D | SharedLibs.pm | 57 sub register_library($self, $lib, $pkgname) 59 $self->{repo}->register($lib, $pkgname); 62 sub register_libname($self, $name, $pkgname) 66 $self->register_library($lib, $pkgname); 69 $name) unless $pkgname eq 'system'; 100 return if $self->{done_plist}{$pkgname}; 101 $self->{done_plist}{$pkgname} = 1; 106 $plist->mark_available_lib($pkgname, $self); 111 my $pkgname = $plist->pkgname; 112 return if $self->{done_plist}{$pkgname}; [all …]
|
H A D | Update.pm | 93 my $pkgname = $h->pkgname; 131 my $sname = $pkgname; 218 $self->look_for_debug($set, $pkgname, $pkgname, $state); 239 my $o_name = $o->pkgname; 243 my $n_name = $n->pkgname; 257 my @sorted = sort {$a->pkgname->{version}->compare($b->pkgname->{version}) } @$locs; 258 if ($sorted[0]->pkgname->{version}->compare($pkgname->{version}) > 0) { 261 if ($sorted[-1]->pkgname->{version}->compare($pkgname->{version}) < 0) { 307 my $pkgname = $hint->pkgname; 314 $pkg2 = $pkgname; [all …]
|
H A D | Tracker.pm | 89 $self->{known}{$n->pkgname} = 1; 99 $self->{to_update}{$n->pkgname} = $set; 103 $self->{uptodate}{$n->pkgname} = 1; 105 $self->{firmware}{$n->pkgname} = 1; 139 $self->{uptodate}{$n->pkgname} = 1; 141 $self->{firmware}{$n->pkgname} = 1; 152 $self->{cant_update}{$n->pkgname} = 1; 158 $self->{uptodate}{$n->pkgname} = 1; 169 $self->{uptodate}{$n->pkgname} = 1; 170 $self->{installed}{$n->pkgname} = 1; [all …]
|
H A D | PkgCfl.pm | 29 my $pkgname = $plist->pkgname; 30 my $stem = OpenBSD::PackageName::splitstem($pkgname); 35 push(@$l, OpenBSD::Search::Exact->new($pkgname, 1)); 76 delete $state->{conflict_list}{$plist->pkgname}; 85 if (!defined $plist->pkgname) { 93 sub find($pkgname, $state) 96 if (is_installed $pkgname) { 97 push(@bad, $pkgname); 103 next if $name eq $pkgname; 107 if ($l->conflicts_with($pkgname)) { [all …]
|
H A D | PackageInfo.pm | 123 sub borked_package($pkgname) 125 $pkgname = "partial-$pkgname" unless $pkgname =~ m/^partial\-/; 126 unless (-e "$pkg_db/$pkgname") { 127 return $pkgname; 131 while (-e "$pkg_db/$pkgname.$i") { 134 return "$pkgname.$i"; 137 sub libs_package($pkgname) 139 $pkgname =~ s/^\.libs\d*\-//; 140 unless (-e "$pkg_db/.libs-$pkgname") { 141 return ".libs-$pkgname"; [all …]
|
H A D | Handle.pm | 67 sub pkgname($self) subroutine 69 if (!defined $self->{pkgname}) { 71 $self->{pkgname} = $self->{plist}->pkgname; 77 $self->{pkgname} = 82 return $self->{pkgname}; 186 sub create_old($class, $pkgname, $state) 189 $self->{name} = $pkgname; 219 my $pkg = $handle->pkgname; 244 my $pkgname = $handle->{pkgname} = $plist->pkgname; 247 if (!defined $pkgname or $pkg ne $pkgname) { [all …]
|
H A D | Delete.pm | 30 my $borked = borked_package($plist->pkgname); 77 my $pkgname = $handle->pkgname; 82 "\nDelete firmware #1", $pkgname)) { 88 $pkgname); 104 my $pkgname = $plist->pkgname; 105 my $l = OpenBSD::Requiring->new($pkgname); 122 my $pkgname = $plist->pkgname; 123 $state->{pkgname} = $pkgname; 142 delete_installed($pkgname); 305 $self->{pkgname} = $pkgname; [all …]
|
H A D | InstalledInfo.pm | 125 sub borked_package($self, $pkgname) 127 $pkgname = "partial-$pkgname" unless $pkgname =~ m/^partial\-/; 128 unless (-e "$self->{pkgdb}/$pkgname") { 129 return $pkgname; 133 while (-e "$self->{pkgdb}/$pkgname.$i") { 136 return "$pkgname.$i"; 139 sub libs_package($self, $pkgname) 141 $pkgname =~ s/^\.libs\d*\-//; 142 unless (-e "$self->{pkgdb}/.libs-$pkgname") { 143 return ".libs-$pkgname"; [all …]
|
H A D | PkgAdd.pm | 322 $h->pkgname, $bad); 337 my $pkgname = $plist->pkgname; 354 if (!defined $o->pkgname) { 540 my $name = $old->pkgname; 616 $set->print, $h->pkgname, $h2->pkgname); 814 my $pkgname = $handle->pkgname; 838 my $pkgname = $handle->pkgname; 843 add_installed($pkgname); 897 $handle->pkgname); 1204 for my $pkgname (@ARGV) { [all …]
|
H A D | PkgInfo.pm | 53 push(@{$h->{$fname}}, $pkgname); 54 push(@$l, $pkgname); 185 if ($pkgname =~ m/[\*\<\>\=]/) { 206 &$code($pkgname, $pkg); 224 if ($pkgname =~ m/[\/\:]/o) { 225 ($repo, $pkgname) = $state->repo->path_parse($pkgname); 279 sub($pkgname, $handle) { 307 sub($pkgname, $handle) { 336 $plist->pkgname); 341 $plist->pkgname); [all …]
|
H A D | PkgDelete.pm | 48 for my $pkgname ($set->older_names) { 49 $self->{todo}{$pkgname} = $set; 59 for my $pkgname ($set->older_names) { 60 delete $self->{todo}{$pkgname}; 70 sub find($self, $pkgname) 72 return $self->{todo}{$pkgname}; 133 $header .= $handle->pkgname; 194 for my $pkgname (@ARGV) { 201 $l = $inst->find($pkgname); 206 $pkgname); [all …]
|
H A D | PackingList.pm | 139 my $pkgname = $self->pkgname; 140 if (defined $pkgname && $pkgname =~ m/^(?:\.libs\d*|partial)\-/) { 322 die "Duplicate $category in plist ".($plist->pkgname // "?"); 346 sub pkgname($self) subroutine 451 sub from_installation($o, $pkgname, $code = \&defaultCode) 456 if ($code == \&DependOnly && defined $plist_cache->{$pkgname}) { 457 return $plist_cache->{$pkgname}; 459 my $filename = OpenBSD::PackageInfo::installed_contents($pkgname); 462 $plist_cache->{$pkgname} = $plist; 478 return if defined $plist_cache->{$self->pkgname}; [all …]
|
H A D | PackageLocator.pm | 74 sub path_parse($self, $pkgname, $state) 77 if ($pkgname =~ m/^(.*[\/\:])(.*)/) { 78 ($pkgname, $path) = ($2, $1); 81 return (OpenBSD::PackageRepository->new($path, $state), $pkgname); 88 my ($repository, $pkgname) = $self->path_parse($url, $state); 89 $package = $repository->find($pkgname); 103 my ($repository, $pkgname) = $self->path_parse($url, $state); 104 $plist = $repository->grabPlist($pkgname, $code);
|
H A D | Search.pm | 110 sub split($class, $pkgname) 114 return $class->new(OpenBSD::PackageName::splitstem($pkgname)); 193 if ($f->{version}->compare($e->pkgname->{version}) <= 0) { 215 my $stem = $e->pkgname->{stem}; 218 for my $f (@{$h->{$e->pkgname->{stem}}}) { 221 if ($f->pkgname->flavor_string ne $e->pkgname->flavor_string) { 235 if ($f->pkgname->{version}->compare($e->pkgname->{version}) < 0) { 243 push(@{$h->{$e->pkgname->{stem}}}, $e);
|
H A D | Add.pm | 186 sub extract_pkgname($pkgname) 188 $pkgname =~ s/^.*\///; 189 $pkgname =~ s/\.tgz$//; 190 return $pkgname; 193 sub tweak_package_status($pkgname, $state) 195 $pkgname = extract_pkgname($pkgname); 196 return 0 unless is_installed($pkgname); 214 my $pkgname = $plist->pkgname; 443 $self->{newly_found} = $pkgname; 899 $pkgname, $self->{message})) { [all …]
|
H A D | PackageName.pod | 11 $pkgname = OpenBSD::PackageName::url2pkgname($url); 13 ($stem, $version, @flavors) = OpenBSD::PackageName::splitname($pkgname); 14 $stem = OpenBSD::PackageName::splitstem($pkgname); 17 OpenBSD::PackageName::is_stem($pkgname) == 0; 36 =item C<OpenBSD::PackageName::splitname($pkgname)> 38 split a C<$pkgname> into a C<$stem>, a C<$version> number, and a (possibly 42 =item C<OpenBSD::PackageName::splitstem($pkgname)>
|
H A D | RequiredBy.pm | 118 sub new($class, $pkgname) 120 my $f = installed_info($pkgname).$class->filename; 141 while (my $pkgname = pop @todo) { 142 next if $done{$pkgname}; 143 $done{$pkgname} = 1; 144 for my $dep ($class->new($pkgname)->list) {
|
H A D | SharedItems.pm | 97 $state->log->set_context('-'.$i->{pkgname}); 105 while (my ($user, $pkgname) = each %$u) { 112 $state->log->set_context('-'.$pkgname); 117 while (my ($group, $pkgname) = each %$g) { 124 $state->log->set_context('-'.$pkgname); 149 $state->log->set_context('-'.$self->{pkgname}); 160 $state->log->set_context('-'.$self->{pkgname});
|
H A D | OldLibs.pm | 166 $splitted->set_pkgname(OpenBSD::PackageInfo::libs_package($plist->pkgname)); 170 OpenBSD::PackingElement::Conflict->add($splitted, $plist->pkgname); 172 my $stem = OpenBSD::PackageName::splitstem($plist->pkgname); 183 my $write = OpenBSD::RequiredBy->new($plist->pkgname); 187 my $r = OpenBSD::Requiring->new($pkg)->add($plist->pkgname); 196 my $oldname = $o->pkgname; 199 my $stub_name = $stub_list->pkgname; 234 $o->pkgname) if $state->verbose >= 2;
|
H A D | UpdateSet.pm | 53 sub pkgname($self) subroutine 76 $self->{older}{$h->pkgname} = $h; 270 $self->{newer}{$h->pkgname} = $h; 279 $self->{kept}->{$h->pkgname} = $h; 287 delete $self->{older}{$h->pkgname}; 288 delete $self->{newer}{$h->pkgname}; 289 $self->{kept}{$h->pkgname} = $h; 292 $self->{repo}->installed->find($h->pkgname); 353 return map {$_->pkgname} $self->hints; 364 if (OpenBSD::PackageInfo::is_installed($h->pkgname)) {
|
H A D | RequiredBy.pod | 15 my $o = OpenBSD::RequiredBy->new($pkgname); 17 my $o2 = OpenBSD::Requiring->new($pkgname); 19 print "Requirements for $pkgname are ", join(' ',$o2->list), "\n"; 28 OpenBSD::RequiredBy->forget(installed_info($pkgname)); 45 C<$o = OpenBSD::RequiredBy-E<gt>new($pkgname)> gives access to the reverse 47 C<$o =OpenBSD::Requiring-E<gt>new($pkgname)> gives access to the forward
|
H A D | Signature.pm | 119 return $class->full->new($plist->pkgname, $k, $plist); 121 return $class->new($plist->pkgname, $k); 130 sub new($class, $pkgname, $extra) 132 bless { name => $pkgname, extra => $extra }, $class; 212 sub new($class, $pkgname, $extra, $plist) 214 my $o = $class->SUPER::new($pkgname, $extra);
|
H A D | ForwardDependencies.pm | 29 for my $f (OpenBSD::RequiredBy->new($old->pkgname)->list) { 40 if ($n->conflict_list->conflicts_with($old->pkgname)) { 43 $n->pkgname, 44 $old->{update_found}->pkgname); 74 my $p = $r->pkgname;
|
H A D | FwUpdate.pm | 114 sub display_timestamp($state, $pkgname, $timestamp) 117 $state->SUPER::display_timestamp($pkgname, $timestamp); 203 my $pkgname = driver2firmware($driver); 209 $set = $state->updateset->add_hints($pkgname); 245 my $h = $state->is_installed($d)->pkgname; 333 push(@deleting, $h->pkgname); 335 push(@updating, $h->pkgname); 339 push(@installing, $h->pkgname);
|
/openbsd/usr.sbin/pkg_add/OpenBSD/PackageRepository/ |
H A D | Cache.pm | 73 my $name = $h->pkgname; 104 my ($pkgname, $value) = ($1, $2); 105 $found->{OpenBSD::PackageName::splitstem($pkgname)} = 1; 106 $self->{raw_data}{$pkgname} //= ''; 107 $self->{raw_data}{$pkgname} .= "$value\n"; 108 if ($pkgname ne $oldname) { 109 $oldname = $pkgname;
|