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#define FOR_split
28#include "toys.h"
29
30GLOBALS(
31 long l, b, a;
32
33 char *outfile;
34)
35
36static void do_split(int infd, char *in)
37{
38 unsigned long bytesleft, linesleft, filenum, len, pos;
39 int outfd = -1;
40 struct stat st;
41
42
43 st.st_mode = 0777;
44 fstat(infd, &st);
45
46 len = pos = filenum = bytesleft = linesleft = 0;
47 for (;;) {
48 int i, j;
49
50
51 if (len == pos) {
52 if (!(len = xread(infd, toybuf, sizeof(toybuf)))) break;
53 pos = 0;
54 }
55
56
57 if ((TT.b && !bytesleft) || (TT.l && !linesleft)) {
58 char *s = TT.outfile + strlen(TT.outfile);
59
60 j = filenum++;
61 for (i = 0; i<TT.a; i++) {
62 *(--s) = 'a'+(j%26);
63 j /= 26;
64 }
65 if (j) error_exit("bad suffix");
66 bytesleft = TT.b;
67 linesleft = TT.l;
68 if (outfd != -1) close(outfd);
69 outfd = xcreate(TT.outfile, O_RDWR|O_CREAT|O_TRUNC, st.st_mode & 0777);
70 }
71
72
73 if (TT.l) {
74 for (i = pos; i < len; ) {
75 if (toybuf[i++] == '\n' && !--linesleft) break;
76 if (!--bytesleft) break;
77 }
78 j = i - pos;
79 } else {
80 j = len - pos;
81 if (j > bytesleft) j = bytesleft;
82 bytesleft -= j;
83 }
84 xwrite(outfd, toybuf+pos, j);
85 pos += j;
86 }
87
88 if (CFG_TOYBOX_FREE) {
89 if (outfd != -1) close(outfd);
90 if (infd) close(infd);
91 free(TT.outfile);
92 }
93 xexit();
94}
95
96void split_main(void)
97{
98 if (!TT.b && !TT.l) TT.l = 1000;
99
100
101 TT.outfile = xmprintf("%s%*c", (toys.optc == 2) ? toys.optargs[1] : "x",
102 (int)TT.a, ' ');
103
104
105 loopfiles(toys.optargs, do_split);
106}
107