projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
BSD 3 development
[unix-history]
/
usr
/
src
/
games
/
fortune.c
#include <stdio.h>
char
line
[
500
];
char
bline
[
500
];
main
()
{
double
p
;
register
char
*
l
;
long
t
;
FILE
*
f
;
f
=
fopen
(
"/usr/games/lib/fortunes"
,
"r"
);
if
(
f
==
NULL
) {
printf
(
"Memory fault -- core dumped
\n
"
);
exit
(
1
);
}
time
(&
t
);
srand
(
getpid
() + (
int
)((
t
>>
16
) +
t
));
p
=
1
.;
for
(;;) {
l
=
fgets
(
line
,
500
,
f
);
if
(
l
==
NULL
)
break
;
if
(
rand
() <
2147483648
./
p
)
strcpy
(
bline
,
line
);
p
+=
1
.;
}
fputs
(
bline
,
stdout
);
return
(
0
);
}