1 /* vi: set sw=4 ts=4: */
3 * Copyright 2003, Glenn McGrath
5 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
7 * Based on specification from
8 * http://www.opengroup.org/onlinepubs/007904975/utilities/uuencode.html
10 * Bugs: the spec doesn't mention anything about "`\n`\n" prior to the
17 static void read_stduu(FILE *src_stream, FILE *dst_stream)
21 while ((line = xmalloc_fgetline(src_stream)) != NULL) {
22 int encoded_len, str_len;
25 if (strcmp(line, "end") == 0) {
26 return; /* the only non-error exit */
31 *line_ptr = (*line_ptr - 0x20) & 0x3f;
34 str_len = line_ptr - line;
36 encoded_len = line[0] * 4 / 3;
37 /* Check that line is not too short. (we tolerate
38 * overly _long_ line to accomodate possible extra '`').
39 * Empty line case is also caught here. */
40 if (str_len <= encoded_len) {
41 break; /* go to bb_error_msg_and_die("short file"); */
43 if (encoded_len <= 0) {
44 /* Ignore the "`\n" line, why is it even in the encode file ? */
48 if (encoded_len > 60) {
49 bb_error_msg_and_die("line too long");
55 /* Merge four 6 bit chars to three 8 bit chars */
56 *dst++ = line_ptr[0] << 2 | line_ptr[1] >> 4;
58 if (encoded_len == 0) {
62 *dst++ = line_ptr[1] << 4 | line_ptr[2] >> 2;
64 if (encoded_len == 0) {
68 *dst++ = line_ptr[2] << 6 | line_ptr[3];
71 } while (encoded_len > 0);
72 fwrite(line, 1, dst - line, dst_stream);
75 bb_error_msg_and_die("short file");
78 static void read_base64(FILE *src_stream, FILE *dst_stream)
90 /* Get next _valid_ character.
91 * global vector bb_uuenc_tbl_base64[] contains this string:
92 * "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=\n"
95 ch = fgetc(src_stream);
97 bb_error_msg_and_die("short file");
99 table_ptr = strchr(bb_uuenc_tbl_base64, ch);
100 } while (table_ptr == NULL);
102 /* Convert encoded character to decimal */
103 ch = table_ptr - bb_uuenc_tbl_base64;
105 if (*table_ptr == '=') {
106 if (term_count == 0) {
107 translated[count] = '\0';
111 } else if (*table_ptr == '\n') {
112 /* Check for terminating line */
113 if (term_count == 5) {
119 translated[count] = ch;
125 /* Merge 6 bit chars to 8 bit */
127 fputc(translated[0] << 2 | translated[1] >> 4, dst_stream);
130 fputc(translated[1] << 4 | translated[2] >> 2, dst_stream);
133 fputc(translated[2] << 6 | translated[3], dst_stream);
138 int uudecode_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
139 int uudecode_main(int argc ATTRIBUTE_UNUSED, char **argv)
142 char *outname = NULL;
145 opt_complementary = "?1"; /* 1 argument max */
146 getopt32(argv, "o:", &outname);
150 *--argv = (char*)"-";
151 src_stream = xfopen_stdin(*argv);
153 /* Search for the start of the encoding */
154 while ((line = xmalloc_fgetline(src_stream)) != NULL) {
155 void (*decode_fn_ptr)(FILE *src, FILE *dst);
160 if (strncmp(line, "begin-base64 ", 13) == 0) {
161 line_ptr = line + 13;
162 decode_fn_ptr = read_base64;
163 } else if (strncmp(line, "begin ", 6) == 0) {
165 decode_fn_ptr = read_stduu;
171 /* begin line found. decode and exit */
172 mode = bb_strtou(line_ptr, NULL, 8);
173 if (outname == NULL) {
174 outname = strchr(line_ptr, ' ');
175 if ((outname == NULL) || (*outname == '\0')) {
181 if (NOT_LONE_DASH(outname)) {
182 dst_stream = xfopen(outname, "w");
183 fchmod(fileno(dst_stream), mode & (S_IRWXU | S_IRWXG | S_IRWXO));
186 decode_fn_ptr(src_stream, dst_stream);
187 /* fclose_if_not_stdin(src_stream); - redundant */
190 bb_error_msg_and_die("no 'begin' line");
194 Put this into an empty dir with busybox binary, an run.
197 test -x busybox || { echo "No ./busybox?"; exit; }
198 ln -sf busybox uudecode
199 ln -sf busybox uuencode
206 echo -n ABCDEF >ABCDEF
210 ./uuencode $f <$f >u_$f
211 ./uuencode -m $f <$f >m_$f
213 mkdir unpk_u unpk_m 2>/dev/null
215 ./uudecode <$f -o unpk_u/${f:2}
216 diff -a ${f:2} unpk_u/${f:2} >/dev/null 2>&1
220 ./uudecode <$f -o unpk_m/${f:2}
221 diff -a ${f:2} unpk_m/${f:2} >/dev/null 2>&1