/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
H A D | 05_size.t | 19 open F, "> $file" or die $!; 37 open F, "> $file" or die $!;
|
H A D | 08_ro.t | 3 # Make sure it works to open the file in read-only mode 33 open F, "> $file" or die $!; 59 open F, "> $file" or die "Couldn't open $file: $!";
|
/osnet-11/usr/src/lib/libc/port/gen/ |
H A D | lfmt_log.c | 94 ((fd = open(LOGNAME, O_WRONLY)) == -1 || 115 fdd = open(LOG_CONSOLE, O_WRONLY);
|
/osnet-11/usr/src/lib/lvm/libmeta/common/ |
H A D | meta_devstamp.c | 51 /* open given device */ 52 if ((fd = open(np->rname, O_RDONLY | O_NDELAY, 0)) < 0) 91 /* open for vtoc */ 92 if ((fd = open(np->rname, O_RDWR | O_NDELAY, 0)) < 0)
|
/osnet-11/usr/src/lib/sun_fc/common/ |
H A D | Trace.cc | 74 /* If we can open the log file, write there, else use the cim log */ 75 fd = open(DEBUG_FILE, O_WRONLY|O_APPEND); /* will only open if exists */ 81 fd = open(LOG_FILE, O_WRONLY|O_APPEND); 82 /* We catch open failures later */
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/run/ |
H A D | switches.t | 83 open my $f, ">$filename" or skip( "Can't write temp file $filename: $!" ); 131 open my $f, ">$filename" or skip( "Can't write temp file $filename: $!" ); 149 open my $f, ">$filename" or skip( "Can't write temp file $filename: $!",4 ); 258 open(FILE, ">file") or die "$0: Failed to create 'file': $!"; 270 open(FILE, "file") or die "$0: Failed to open 'file': $!"; 274 open(BAK, "file.bak") or die "$0: Failed to open 'file': $!";
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | strict.t | 25 open F, "<$_" or die "Cannot open $_: $!\n" ; 60 open F, ">$filename" or die "Cannot open $filename: $!\n" ; 68 open TEST, ">$tmpfile" or die "Could not open: $!";
|
H A D | vmsish.t | 91 open(TEST,'>vmsish_test.pl') || die('not ok ?? : unable to open "vmsish_test.pl" for writing'); 122 open TMP, ">$file" or die "Couldn't open file $file"; 172 open(P,'>vmsish_test.com') || die('not ok ?? : unable to open "vmsish_test.com" for writing');
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
H A D | Constant.t | 162 if (open OUTPUT, "<$output") { 183 open(REGENTMP, ">regentmp") or die $!; 184 open(XS, "$package.xs") or die $!; 208 # open FOO, ">expect"; print FOO $expect; 209 # open FOO, ">regen"; print FOO $regen; close FOO; 260 open FH, ">$makefilePL" or die "open >$makefilePL: $!\n"; 283 open FH, ">$manifest" or die "open >$manifest: $!\n"; 310 open F [all...] |
H A D | basic.t | 82 ok( open(PPD, 'Big-Dummy.ppd'), ' .ppd file generated' ); 177 ok( open(PERLLOCAL, $files{'perllocal.pod'} ) ) || 178 diag("Can't open $files{'perllocal.pod'}: $!"); 185 # ok( open(PACKLIST, $files{'.packlist'} ) ) || 186 # diag("Can't open $files{'.packlist'}: $!"); 259 open(SAVERR, ">&STDERR") or die $!; 260 open(STDERR, ">".File::Spec->devnull) or die $!; 265 open(STDERR, ">&SAVERR") or die $!;
|
H A D | Packlist.t | 98 like( $@, qr/Can't open file/, 'write() should croak on open failure' ); 117 $file_is_ready = open(IN, 'eplist'); 126 like( $@, qr/^Can't open file/, 'read() should croak with bad packfile name' ); 127 #'open packfile for reading 132 skip("cannot open file for reading: $!", 5) unless $file_is_ready;
|
/osnet-11/usr/src/lib/libshadowtest/common/ |
H A D | libshadowtest.c | 61 * Given the root of the filesystem, open the pending FID list and return an 80 if ((fd = open(path, O_RDONLY)) < 0) { 81 (void) st_error("failed to open %s", path); 161 return (st_error("failed to open /etc/mnttab")); 193 if ((fd = open(path, O_RDONLY)) < 0) 194 return (st_error("failed to open %s", path)); 214 if ((fd = open(path, O_RDONLY)) < 0) 215 return (st_error("failed to open %s", path)); 379 if ((fd = open(path, O_RDONLY)) < 0) 380 return (st_error("failed to open [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
H A D | stat.t | 46 open(FOO, ">$tmpfile") || DIE("Can't open temp test file: $!"); 49 open(FOO, ">$tmpfile") || DIE("Can't open temp test file: $!"); 128 open(F, ">$tmpfile") || DIE("Can't open temp test file: $!"); 134 open(F, ">$tmpfile") || DIE("Can't open temp test file: $!"); 318 open(TTY, $TTY) || 319 warn "Can't open [all...] |
H A D | closure.t | 441 die "Can't fork: $!" unless defined($pid = open PERL, "|-"); 447 open STDOUT, ">&WRITE" or die "Can't redirect STDOUT: $!"; 448 open STDERR, ">&WRITE2" or die "Can't redirect STDERR: $!"; 468 open CMD, ">$cmdfile"; print CMD $code; close CMD; 479 open PERL,"$cmd |" or die "Can't open pipe: $!\n"; 486 { local $/; open IN, $outfile; $output = <IN>; close IN } 493 { local $/; open IN, $errfile; $errors = <IN>; close IN } 624 open(T, ">$progfile") or die "$0: $!\n";
|
/osnet-11/usr/src/lib/libnsctl/common/ |
H A D | cache.c | 47 * CKD module, and having nsc_open() prevent any non-NSC_CKD_DISK open 163 if ((fd->sf_fd = open(_NSC_DEV_PATH, fd->sf_fmode)) < 0) 210 (void) open("/dev/null", 0); 211 (void) open(_NSC_CKDCHK_LOG, O_WRONLY|O_CREAT|O_APPEND, 0666); 212 (void) open(_NSC_CKDCHK_LOG, O_WRONLY|O_CREAT|O_APPEND, 0666); 307 fd = open(_NSC_DEV_PATH, O_RDONLY);
|
/osnet-11/usr/src/cmd/perl/5.8.4/utils/port/ |
H A D | InstallPerl | 59 open($fh, '<', $f) || die("Can't open $pf: $!\n"); 102 open($fh, '<', 'patchlevel.h') || die("Can't open patchlevel.h: $!\n"); 150 open($fh, '>', 'config.over') || die("Can't open config.over: $!\n"); 233 open($Fh, '>', 'build.touched') || die("Can't open build.touched: $!\n"); 249 open($Fh, '>', 'install.packlist') || die("Can't open instal [all...] |
/osnet-11/usr/src/lib/libshell/common/sh/ |
H A D | suid_exec.c | 34 * The basic idea is to open the script as standard input, set the effective 38 * may pass file descriptor FDIN as an open file with mode SPECIAL if 41 * open file. On systems without the setreuid() call, e[ug]id is set 83 static const char badopen[] = "cannot open"; 156 n = open(p,0); 381 if((n = open(tmpname, O_WRONLY | O_CREAT | O_EXCL, SPECIAL)) < 0 || 384 if((n = open(tmpname, O_WRONLY | O_CREAT ,SPECIAL)) < 0 || unlink(tmpname) < 0) 422 if((m = open(THISPROG, O_RDONLY)) < 0) 429 if((n = open(tmpname,O_WRONLY|O_CREAT|O_TRUNC|O_EXCL, mode)) < 0) 432 if((n = open(tmpnam [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/ |
H A D | TEST | 101 if (open(MANI, $mani)) { 115 warn "$0: cannot open $mani: $!\n"; 219 open(SCRIPT,"<$test") or die "Can't run $test.\n"; 254 open(RESULTS, $deparse) 279 open(RESULTS,$bytecompile) 292 open(RESULTS,$run) or print "can't run '$run': $!.\n"; 304 open HACK, "> xweghyz.pl"; 308 open HACK, '.\\perl $pl2c $test_executable |'; 311 open HACK, '$test_executable |'; 322 open(RESULT [all...] |
/osnet-11/usr/src/cmd/sendmail/include/sm/ |
H A D | io.h | 168 /* Common predefined and already (usually) open files (exposed) */ 183 # define SM_IO_SET_TYPE(f, name, open, close, read, write, seek, get, set, timeout) \ 185 0, (close), (read), (seek), (write), (open), (set), (get), (timeout),\ 187 # define SM_IO_INIT_TYPE(f, name, open, close, read, write, seek, get, set, timeout) 190 # define SM_IO_SET_TYPE(f, name, open, close, read, write, seek, get, set, timeout) (f) 191 # define SM_IO_INIT_TYPE(f, name, open, close, read, write, seek, get, set, timeout) \ 207 (f).f_open = (open); \ 226 #define SMRW 0x000040 /* open for reading & writing */
|
/osnet-11/usr/src/lib/libparted/common/libparted/fs/amiga/ |
H A D | apfs.c | 113 .open = NULL, 126 .open = NULL,
|
/osnet-11/usr/src/lib/libdscfg/common/ |
H A D | cfg_lockdlck.c | 49 local_lockfd = open(CFG_RDEV_LOCKFILE, O_RDWR|O_CREAT, 0644); 50 local_lockfda = open(CFG_RDEV_LOCKFILE, O_RDWR|O_APPEND, 0644);
|
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/t/ |
H A D | RandTest | 128 open($f, ">/tmp/wr1.$$") || die("\nopen /tmp/wr1.$$ failed: $!\n"); 165 open($f, ">/tmp/wr2.$$") || die("\nopen /tmp/wr2.$$ failed: $!\n"); 185 open($f, ">/tmp/wr2.$$") || die("\nopen /tmp/wr2.$$ failed: $!\n"); 206 open($f, ">/tmp/wr2.$$") || die("\nopen /tmp/wr2.$$ failed: $!\n");
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/ |
H A D | io_dup.t | 37 $stdout->open( "Io.dup","w") || die "Can't open stdout";
|
H A D | io_unix.t | 43 if (-e $PATH or not open(TEST, ">$PATH") and $^O ne 'os2') { 44 print "1..0 # Skip: cannot open '$PATH' for write\n";
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/ |
H A D | store.t | 68 print "not " unless open(OUT, '>>store'); 82 print "not " unless open(OUT, 'store');
|