Lines Matching refs:object
34 sub make_error_file($self, $object)
36 $object->{errors} = OpenBSD::Temp->file;
37 if (!defined $object->{errors}) {
189 sub close($self, $object, $hint = undef)
191 close($object->{fh}) if defined $object->{fh};
192 if (defined $object->{pid2}) {
194 kill HUP => $object->{pid2};
197 waitpid($object->{pid2}, 0);
200 $self->parse_problems($object->{errors}, $hint, $object)
201 if defined $object->{errors};
202 undef $object->{errors};
203 $object->deref;
224 sub open($self, $object)
226 return unless $self->may_exist($object->{name});
231 my $fh = $self->open_pipe($object);
235 $object->{fh} = $fh;
237 push @$already, $object;
259 sub parse_problems($self, $filename, $hint = 0, $object = undef)
264 if (defined $object) {
265 $objecturl = $object->url;
266 $object->{error_reported} = 1;
323 if (!defined $object) {
400 sub uncompress($self, $object, @p)
405 if ($object->{is_signed}) {
410 $object->{signer} = $1;
412 $object->{signdate} = $1;
432 sub signify_pipe($self, $object, @p)
434 CORE::open STDERR, ">>", $object->{errors};
444 sub check_signed($self, $object)
446 if ($object->{repository}{trusted}) {
450 $object->{is_signed} = 1;
497 sub may_copy($self, $object, $destdir)
499 my $src = $self->relative_url($object->{name});
516 sub open_pipe($self, $object)
519 $self->may_copy($object, $self->{state}->cache_directory);
521 my $name = $self->relative_url($object->{name});
522 if ($self->check_signed($object)) {
523 $self->make_error_file($object);
527 $object->{pid} = $pid;
528 return $self->uncompress($object, $fh);
530 $self->signify_pipe($object, "-x", $name);
533 return $self->uncompress($object, $name);
602 sub pkg_copy($self, $in, $object)
604 my $name = $object->{name};
605 my $dir = $object->{cache_dir};
610 $object->{tempname} = $filename;
659 sub open_pipe($self, $object)
661 $self->make_error_file($object);
664 $object->{cache_dir} = $d;
668 $object->{cache_dir} = $d;
670 $object->{parent} = $$;
678 $object->{pid2} = $pid2;
681 open STDERR, '>>', $object->{errors};
690 $self->pkg_copy($in, $object);
692 $self->grab_object($object);
695 $self->grab_object($object);
700 if ($self->check_signed($object)) {
704 $object->{pid} = $pid;
710 $self->signify_pipe($object);
713 return $self->uncompress($object, $fh);
715 return $self->uncompress($object, $rdfh);
719 sub finish_and_close($self, $object)
721 if (defined $object->{cache_dir}) {
722 while (defined $object->next) {
725 $self->SUPER::finish_and_close($object);
806 sub grab_object($self, $object)
814 "-", $self->url($object->{name})