projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
date and time created 80/12/21 16:51:04 by wnj
[unix-history]
/
usr
/
src
/
lib
/
libc
/
stdio
/
freopen.c
/* @(#)freopen.c 4.1 (Berkeley) %G% */
#include <stdio.h>
FILE
*
freopen
(
file
,
mode
,
iop
)
char
*
file
;
register
char
*
mode
;
register
FILE
*
iop
;
{
register
f
;
fclose
(
iop
);
if
(*
mode
==
'w'
)
f
=
creat
(
file
,
0666
);
else if
(*
mode
==
'a'
) {
if
((
f
=
open
(
file
,
1
)) <
0
)
f
=
creat
(
file
,
0666
);
lseek
(
f
,
0L
,
2
);
}
else
f
=
open
(
file
,
0
);
if
(
f
<
0
)
return
(
NULL
);
iop
->
_file
=
f
;
if
(*
mode
!=
'r'
)
iop
->
_flag
|=
_IOWRT
;
else
iop
->
_flag
|=
_IOREAD
;
return
(
iop
);
}