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
|
#include <argp.h>
#include <error.h>
#include <unistd.h>
#include <hurd.h>
#include <sys/fcntl.h>
#include "store.h"
struct argp_option options[] = {
{"file", 'f', 0, 0, "Use file IO instead of the raw device"},
{"block-size", 'b', "BYTES", 0, "Set the file block size"},
{"interleave", 'i', "INTERVAL", 0, "Instead of concatenating the files,"
" interleave them, every INTERVAL blocks (default 1)"},
{0, 0}
};
char *arg_doc = "FILE...";
char *doc = 0;
int
main (int argc, char **argv)
{
struct store *stores[4096];
int num_stores = 0;
int use_file_io = 0, block_size = 0, interleave = 0;
struct store *make_store (char *file)
{
error_t err;
struct store *store;
file_t source = file_name_lookup (file, O_READ, 0);
if (errno)
error (2, errno, "%s", file);
if (use_file_io)
if (block_size)
{
off_t runs[2];
struct stat stat;
err = io_stat (source, &stat);
if (! err)
{
runs[0] = 0;
runs[1] = stat.st_size / block_size;
err = _store_file_create (source,
block_size, runs, 2, &store);
}
}
else
err = store_file_create (source, &store);
else
err = store_create (source, &store);
if (err)
error (err, 3, "%s", file);
return store;
}
void dump (struct store *store, off_t addr, ssize_t len)
{
char buf[4096], *data = buf;
size_t data_len = sizeof (buf);
error_t err =
store_read (store, addr, len < 0 ? store->size : len,
&data, &data_len);
if (err)
error (5, err, store->name ? "%s" : "<store>", store->name);
if (write (1, data, data_len) < 0)
error (6, errno, "stdout");
if (data != buf)
vm_deallocate (mach_task_self (), (vm_address_t)data, data_len);
}
error_t parse_opt (int key, char *arg, struct argp_state *state)
{
switch (key)
{
case 'f': use_file_io = 1; break;
case 'b': block_size = atoi (arg); break;
case 'i': interleave = atoi (arg); break;
case ARGP_KEY_ARG:
if (num_stores > sizeof stores / sizeof *stores)
error (72, 0, "%s: Too many files", arg);
stores[num_stores++] = make_store (arg);
break;
case ARGP_KEY_END:
if (num_stores == 1)
dump (stores[0], 0, -1);
else if (num_stores > 1)
{
error_t err;
struct store *cat;
if (interleave)
err = store_ileave_create (interleave, stores, num_stores, 1,
&cat);
else
err = store_concat_create (stores, num_stores, 1, &cat);
if (err)
error (99, err, "Can't concatenate");
dump (cat, 0, -1);
}
break;
default:
return EINVAL;
}
return 0;
}
struct argp argp = {options, parse_opt, arg_doc, doc};
argp_parse (&argp, argc, argv, 0, 0);
exit (0);
}
|
