| /openbsd-src/usr.sbin/pkg_add/OpenBSD/ |
| H A D | SharedLibs.pm | 31 sub mark_available_lib($self, $pkgname, $object) 33 $object->register_libname($self->fullname, $pkgname); 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); 68 $self->{state}->errsay("Bogus library in #1: #2", $pkgname, 69 $name) unless $pkgname eq 'system'; 98 sub add_libs_from_installed_package($self, $pkgname) 100 return if $self->{done_plist}{$pkgname}; [all …]
|
| H A D | Update.pm | 80 $self->look_for_debug($set, $old->pkgname, $location->name, $state); 93 my $pkgname = $h->pkgname; 95 if ($pkgname =~ m/^\.libs\d*\-/o) { 112 my $plist = OpenBSD::PackingList->from_installation($pkgname, 115 $state->fatal("can't locate #1", $pkgname); 131 my $sname = $pkgname; 217 "No need to update #1", $pkgname); 218 $self->look_for_debug($set, $pkgname, $pkgname, $state); 223 $state->say("Update candidates: #1 -> #2#3", $pkgname, 227 my $r = $state->choose_location($pkgname, $l); [all …]
|
| H A D | Tracker.pm | 89 $self->{known}{$n->pkgname} = 1; 96 $self->{to_install}{$n->pkgname} = $set; 99 $self->{to_update}{$n->pkgname} = $set; 102 delete $self->{to_update}{$n->pkgname}; 103 $self->{uptodate}{$n->pkgname} = 1; 105 $self->{firmware}{$n->pkgname} = 1; 124 delete $self->{to_install}{$n->pkgname}; 125 delete $self->{cant_install}{$n->pkgname}; 128 delete $self->{to_update}{$n->pkgname}; 129 delete $self->{cant_update}{$n->pkgname}; [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)); 71 $state->{conflict_list}{$plist->pkgname} = $plist->conflict_list; 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; [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; 73 $self->{pkgname} = $self->{location}->name; 77 $self->{pkgname} = 82 return $self->{pkgname}; 186 sub create_old($class, $pkgname, $state) 189 $self->{name} = $pkgname; 191 my $location = $state->repo->installed->find($pkgname); 219 my $pkg = $handle->pkgname; [all …]
|
| H A D | Delete.pm | 30 my $borked = borked_package($plist->pkgname); 59 $plist->prepare_for_deletion($state, $plist->pkgname); 77 my $pkgname = $handle->pkgname; 82 "\nDelete firmware #1", $pkgname)) { 83 $state->errsay("NOT deleting #1", $pkgname); 88 $pkgname); 95 $state->fatal("can't recover from deinstalling #1", $pkgname) 104 my $pkgname = $plist->pkgname; 105 my $l = OpenBSD::Requiring->new($pkgname); 108 $state->say("remove dependency of #1 on #2", $pkgname, $name) [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 | 31 OpenBSD::Requiring->new($plist->pkgname)->list) { 32 $state->say("#1 still uses old .libs", $plist->pkgname) 44 OpenBSD::PackingList->from_installation($plist->pkgname, 49 $plist->pkgname, $o->string, $n->string) 168 $state->usage("Missing pkgname"); 192 $state->log->set_context($extra.$h->pkgname); 202 sub updateset_with_new($self, $pkgname) 205 OpenBSD::Handle->create_new($pkgname)); 214 sub display_timestamp($state, $pkgname, $timestamp) 216 $state->say("#1 signed on #2", $pkgname, [all...] |
| H A D | PkgInfo.pm | 49 sub hunt_file($item, $h, $pkgname, $l) 53 push(@{$h->{$fname}}, $pkgname); 54 push(@$l, $pkgname); 169 sub find_pkg_in($self, $state, $repo, $pkgname, $code) 172 if (OpenBSD::PackageName::is_stem($pkgname)) { 174 my $l = $repo->match_locations(OpenBSD::Search::Stem->new($pkgname)); 185 if ($pkgname =~ m/[\*\<\>\=]/) { 187 my $s = OpenBSD::Search::PkgSpec->new($pkgname); 189 $state->errsay("Invalid spec: #1", $pkgname); 204 my $pkg = $repo->find($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) { 197 if (OpenBSD::PackageName::is_stem($pkgname)) { 198 $l = $state->stem2location($inst, $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; 465 $plist->set_infodir(OpenBSD::PackageInfo::installed_info($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 | 50 my $dest = installed_info($plist->pkgname); 60 $plist->prepare_for_addition($state, $plist->pkgname, $set); 68 my $borked = borked_package($plist->pkgname); 94 return if $state->{regression}{stub} && $handle->pkgname !~ /^quirks\-/; 125 return if $state->{regression}{stub} && $handle->pkgname !~ /^quirks\-/; 186 sub extract_pkgname($pkgname) 188 $pkgname =~ s/^.*\///; 189 $pkgname =~ s/\.tgz$//; 190 return $pkgname; 193 sub tweak_package_status($pkgname, $state) [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 | 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 | 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 | 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-src/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;
|