/osnet-11/usr/src/lib/fm/libldom/sparc/ |
H A D | ldom.c | 180 int fh; local 184 if ((fh = open("/devices/pseudo/mdesc@0:mdesc", O_RDONLY, 0)) < 0) 187 if (ioctl(fh, MDESCIOCGSZ, &size) < 0) { 188 (void) close(fh); 194 if (read(fh, bufp, size) < 0) { 196 (void) close(fh); 199 (void) close(fh);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/via/ |
H A D | via.xs | 17 SV * fh; 89 if (!s->fh) { 92 s->fh = newRV_noinc((SV *) gv); 97 XPUSHs(s->fh); 312 if (s->fh) { 313 SvREFCNT_dec(s->fh); 314 s->fh = Nullsv;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/utils/ |
H A D | dprofpp.PL | 382 my $fh = 'main::fh'; 384 open( $fh, "<$Monfile" ) && do { 386 header($fh); 387 close( $fh ); 425 my $fh = 'main::fh'; 444 open( $fh, "<$monout" ) || die "Unable to open $monout\n"; 446 header($fh); 455 parsestack( $fh, [all...] |
H A D | libnetcfg.PL | 716 my $fh = IO::File->new($libnet_cfg_out, "w") or 721 print $fh "{\n"; 744 print $fh "\t'",$key,"' => ",$val,",\n"; 747 print $fh "}\n"; 749 $fh->close;
|
/osnet-11/usr/src/grub/grub2/util/ |
H A D | grub-mount.c | 237 fi->fh = first_fd; 247 grub_file_t file = files[fi->fh]; 268 grub_file_close (files[fi->fh]); 269 files[fi->fh] = NULL;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/lib/IO/ |
H A D | Select.pm | 353 foreach $fh (@ready) { 354 if($fh == $lsn) { 363 $sel->remove($fh); 364 $fh->close;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Net/ |
H A D | Netrc.pm | 35 my $fh; 63 if($fh = FileHandle->new($file,"r")) 67 while(<$fh>) 129 $fh->close();
|
H A D | Ping.pm | 128 $self->{"fh"} = FileHandle->new(); 129 socket($self->{"fh"}, PF_INET, SOCK_DGRAM, 133 setsockopt($self->{"fh"}, SOL_SOCKET, SO_BINDTODEVICE(), pack("Z*", $self->{'device'})) 137 setsockopt($self->{"fh"}, SOL_IP, IP_TOS(), pack("I*", $self->{'tos'})) 147 $self->{"fh"} = FileHandle->new(); 148 socket($self->{"fh"}, PF_INET, SOCK_RAW, $self->{"proto_num"}) || 151 setsockopt($self->{"fh"}, SOL_SOCKET, SO_BINDTODEVICE(), pack("Z*", $self->{'device'})) 155 setsockopt($self->{"fh"}, SOL_IP, IP_TOS(), pack("I*", $self->{'tos'})) 165 $self->{"fh"} = FileHandle->new(); 177 $self->{"fh"} [all...] |
H A D | Cmd.pm | 360 my $fh = shift; 374 if (defined $fh) 376 print $fh $str; 524 my $fh = gensym(); 525 tie *$fh,ref($cmd),$cmd; 526 return $fh;
|
H A D | NNTP.pm | 110 my @fh; 112 @fh = (pop) if @_ == 2 || (@_ && ref($_[0]) || ref(\$_[0]) eq 'GLOB'); 115 ? $nntp->read_until_dot(@fh) 149 my @fh; 151 @fh = (pop) if @_ == 2 || (@_ && ref($_[0]) || ref(\$_[0]) eq 'GLOB'); 154 ? $nntp->read_until_dot(@fh) 170 my @fh; 172 @fh = (pop) if @_ == 2 || (@_ && ref($_[0]) || ref(\$_[0]) eq 'GLOB'); 175 ? $nntp->read_until_dot(@fh)
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Pod/ |
H A D | Perldoc.pm | 1104 my $fh; 1108 $fh = Symbol::gensym(); 1111 return($fh, $spec) if open($fh, ">", $spec); # XXX 5.6ism 1415 my $fh; 1419 $fh = Symbol::gensym(); 1423 unless open($fh, ">", $outspec); # XXX 5.6ism 1426 binmode($fh) if $self->{'output_is_binary'}; 1427 return($fh, $outspec);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
H A D | 01_gen.t | 120 local *FH = $o->{fh};
|
H A D | 15_pushpop.t | 109 local *FH = $o->{fh};
|
H A D | 16_handle.t | 118 local *FH = $o->{fh};
|
H A D | 17_misc_meth.t | 105 local *FH = $o->{fh};
|
H A D | 31_autodefer.t | 154 local *FH = $o->{fh};
|
H A D | 09_gen_rs.t | 181 local *FH = $o->{fh};
|
H A D | 10_splice_rs.t | 189 local *FH = $o->{fh};
|
H A D | 22_autochomp.t | 106 local *FH = $o->{fh};
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | CPAN.pm | 121 my($fh) = FileHandle->new; 122 open $fh, "<$histfile" or last; 124 while (<$fh>) { 128 close $fh; 499 my $fh = FileHandle->new($lockfile) or 501 my $otherpid = <$fh>; 502 my $otherhost = <$fh>; 503 $fh->close; 586 my $fh; 587 unless ($fh [all...] |
H A D | SelfLoader.pm | 54 my $fh = \*{"${callpack}::DATA"}; 60 unless fileno($fh); 64 while(defined($line = <$fh>) and $line !~ m/^__END__/) { 105 @$endlines = <$fh>; 107 close($fh);
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Safe/t/ |
H A D | safeops.t | 31 open my $fh, '<', '../ext/Safe/t/opcode.pl' or die "Can't open opcode.pl: $!"; 32 while (<$fh>) { 35 while (<$fh>) { 41 close $fh;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Digest/MD5/ |
H A D | MD5.xs | 623 addfile(self, fh) 625 InputStream fh 632 if (fh) { 639 if ( (n = PerlIO_read(fh, buffer, missing)) > 0) 646 while ( (n = PerlIO_read(fh, buffer, sizeof(buffer))) > 0) { 650 if (PerlIO_error(fh)) {
|
/osnet-11/usr/src/lib/nsswitch/files/common/ |
H A D | files_common.c | 876 cmpkey(files_hash_t *fh, files_hashent_t *hpa, files_hashent_t *hpb) argument 887 linea = &fh->fh_line[hpa - fh->fh_table]; 891 lineb = &fh->fh_line[hpb - fh->fh_table]; 910 insertsorted(files_hash_t *fh, files_hashent_t **hpp, files_hashent_t *new) argument 912 while (*hpp != NULL && cmpkey(fh, new, *hpp) > 0)
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/ |
H A D | C.pm | 37 my ($section, $fh, $format) = @_; 44 printf $fh $format, $_, $i; 112 my( $section, $fh, $format, $init_name ) = @_; 119 print $fh <<"EOT"; 128 print $fh "\t$j\n"; 130 print $fh "\treturn 0;\n}\n"; 139 print $fh <<"EOT"; 145 $section->SUPER::output( $fh, $format ); 146 print $fh "\treturn 0;\n}\n"; 1171 my $fh [all...] |