1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
/* See LICENSE file for copyright and license details. */
#include "stream.h"
#include "util.h"
#include <errno.h>
#include <fcntl.h>
#include <stdint.h>
#include <string.h>
#include <unistd.h>
USAGE("(count | 'inf') file")
static void
repeat_regular_file(char *file, size_t count, int inf)
{
struct stream stream;
char buf[BUFSIZ];
size_t ptr;
ssize_t r;
stream.file = file;
stream.fd = eopen(stream.file, O_RDONLY);
einit_stream(&stream);
if (count > SIZE_MAX / stream.frames)
eprintf("%s: video is too long\n", stream.file);
stream.frames *= count;
fprint_stream_head(stdout, &stream);
efflush(stdout, "<stdout>");
while (inf || count--) {
#if defined(POSIX_FADV_SEQUENTIAL)
posix_fadvise(stream.fd, stream.headlen, 0, POSIX_FADV_SEQUENTIAL);
#endif
for (ptr = stream.headlen;; ptr += (size_t)r) {
r = pread(stream.fd, buf, sizeof(buf), ptr);
if (r < 0)
eprintf("pread %s:", stream.file);
if (r == 0)
break;
if (writeall(STDOUT_FILENO, buf, (size_t)r)) {
if (!inf || errno != EPIPE)
eprintf("write <stdout>:");
return;
}
}
}
close(stream.fd);
}
static void
repeat_stdin(size_t count, int inf)
{
struct stream stream;
char *buf;
size_t ptr, size;
ssize_t r;
stream.file = "<stdin>";
stream.fd = STDIN_FILENO;
einit_stream(&stream);
if (count > SIZE_MAX / stream.frames)
eprintf("%s: video is too long\n", stream.file);
stream.frames *= count;
fprint_stream_head(stdout, &stream);
efflush(stdout, "<stdout>");
ptr = stream.ptr;
size = ptr < BUFSIZ ? BUFSIZ : ptr;
buf = emalloc(size);
memcpy(buf, stream.buf, ptr);
for (;;) {
if (ptr == size)
buf = erealloc(buf, size <<= 1);
r = read(STDIN_FILENO, buf + ptr, size - ptr);
if (r < 0)
eprintf("read <stdout>:");
if (r == 0)
break;
ptr += (size_t)r;
}
while (inf || count--) {
if (writeall(STDOUT_FILENO, buf, ptr)) {
if (!inf || errno != EPIPE)
eprintf("write <stdout>:");
return;
}
}
free(buf);
}
int
main(int argc, char *argv[])
{
size_t count = 0;
int inf = 0;
ENOFLAGS(argc != 2);
if (!strcmp(argv[0], "inf"))
inf = 1;
else
count = etozu_arg("the count", argv[0], 0, SIZE_MAX);
if (inf)
einf_check_fd(STDOUT_FILENO, "<stdout>");
if (!strcmp(argv[1], "-"))
repeat_stdin(count, inf);
else
repeat_regular_file(argv[1], count, inf);
return 0;
}
|