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
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
|
/* uudecode.c - uudecode / base64 decode
*
* Copyright 2013 Erich Plondke <toybox@erich.wreck.org>
*
* See http://pubs.opengroup.org/onlinepubs/9699919799/utilities/uudecode.html
USE_UUDECODE(NEWTOY(uudecode, ">1o:", TOYFLAG_USR|TOYFLAG_BIN|TOYFLAG_UMASK))
config UUDECODE
bool "uudecode"
default n
help
usage: uudecode [-o OUTFILE] [INFILE]
Decode file from stdin (or INFILE).
-o write to OUTFILE instead of filename in header
*/
#define FOR_uudecode
#include "toys.h"
GLOBALS(
char *o;
)
static inline signed char uudecode_b64_1byte(char in)
{
if (in >= 'A' && in <= 'Z') return in-'A';
if (in >= 'a' && in <= 'z') return in-'a'+26;
if (in >= '0' && in <= '9') return in-'0'+52;
if (in == '+') return 62;
if (in == '/') return 63;
return -1;
};
static int uudecode_b64_4bytes(char *out, char *in)
{
int i, len = 3;
unsigned x = 0;
for (i=0; i<4; i++) {
int c = in[i];
if (c == '=') len--;
else if (len != 3) len = 0;
if (!len) error_exit("bad input");
x |= uudecode_b64_1byte(c) << (6*(3-i));
if (i && i <= len) *(out++) = (x>>(8*(3-i))) & 0xff;
}
return len;
}
static void uudecode_b64_line(int ofd, char *in, int ilen)
{
int olen;
char out[4];
while (ilen >= 4) {
olen = uudecode_b64_4bytes(out, in);
xwrite(ofd,out,olen);
in += 4;
ilen -= 4;
};
}
static void uudecode_b64(int ifd, int ofd)
{
int len;
char *line;
while ((line = get_line(ifd)) != NULL) {
if ((len = strlen(line)) < 4) continue;
if (!strncmp(line, "====", 4)) return;
uudecode_b64_line(ofd,line,len);
free(line);
}
}
static void uudecode_uu_4bytes(char *out, char *in, int len)
{
unsigned int i,x=0;
for (i = 0; i < 4; i++) x |= ((in[i] - 32) & 0x03f) << (6*(3-i));
if (len > 3) len = 3;
for (i = 0; i < len; i++) *out++ = x >> (8*(2-i));
}
static void uudecode_uu_line(int ofd, char *in)
{
int olen = in[0] - 32;
char buf[4];
in++;
while (olen > 0) {
uudecode_uu_4bytes(buf,in,olen);
xwrite(ofd,buf,olen < 3 ? olen : 3);
olen -= 3;
in += 4;
}
}
static void uudecode_uu(int ifd, int ofd)
{
char *line = NULL;
for (;;) {
if (!(line = get_line(ifd))) break;
if (*line) {
if (!strncmp(line, "end", 3)) {
free(line);
break;
}
uudecode_uu_line(ofd,line);
}
free(line);
}
}
void uudecode_main(void)
{
int ifd = 0, ofd, idx = 0;
char *line;
void (*decoder)(int ifd, int ofd) = NULL;
if (toys.optc) ifd = xopen(*toys.optargs, O_RDONLY);
for (;;) {
char mode[16];
if (!(line = get_line(ifd))) error_exit("no header");
sscanf(line, "begin%*[ ]%15s%*[ ]%n", mode, &idx);
if (idx) decoder = uudecode_uu;
else {
sscanf(line, "begin-base64%*[ ]%15s%*[ ]%n", mode, &idx);
if (idx) decoder = uudecode_b64;
}
if (!idx) {
free(line);
continue;
}
ofd = xcreate(TT.o ? TT.o : line+idx, O_WRONLY|O_CREAT|O_TRUNC,
string_to_mode(mode, 0777^toys.old_umask));
free(line);
decoder(ifd,ofd);
break;
}
if (CFG_TOYBOX_FREE) {
if (ifd) close(ifd);
close(ofd);
}
}
|
