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_getline(src_stream)) != NULL) {
23 char *line_ptr = line;
25 if (strcmp(line, "end") == 0) {
28 length = ((*line_ptr - 0x20) & 0x3f)* 4 / 3;
31 /* Ignore the "`\n" line, why is it even in the encode file ? */
35 bb_error_msg_and_die("line too long");
39 /* Tolerate an overly long line to accomodate a possible exta '`' */
40 if (strlen(line_ptr) < (size_t)length) {
41 bb_error_msg_and_die("short file");
45 /* Merge four 6 bit chars to three 8 bit chars */
46 fputc(((line_ptr[0] - 0x20) & 077) << 2 | ((line_ptr[1] - 0x20) & 077) >> 4, dst_stream);
53 fputc(((line_ptr[0] - 0x20) & 077) << 4 | ((line_ptr[1] - 0x20) & 077) >> 2, dst_stream);
60 fputc(((line_ptr[0] - 0x20) & 077) << 6 | ((line_ptr[1] - 0x20) & 077), dst_stream);
66 bb_error_msg_and_die("short file");
69 static void read_base64(FILE *src_stream, FILE *dst_stream)
81 /* Get next _valid_ character.
82 * global vector bb_uuenc_tbl_base64[] contains this string:
83 * "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=\n"
86 ch = fgetc(src_stream);
88 bb_error_msg_and_die("short file");
90 table_ptr = strchr(bb_uuenc_tbl_base64, ch);
91 } while (table_ptr == NULL);
93 /* Convert encoded character to decimal */
94 ch = table_ptr - bb_uuenc_tbl_base64;
96 if (*table_ptr == '=') {
97 if (term_count == 0) {
98 translated[count] = '\0';
102 } else if (*table_ptr == '\n') {
103 /* Check for terminating line */
104 if (term_count == 5) {
110 translated[count] = ch;
116 /* Merge 6 bit chars to 8 bit */
118 fputc(translated[0] << 2 | translated[1] >> 4, dst_stream);
121 fputc(translated[1] << 4 | translated[2] >> 2, dst_stream);
124 fputc(translated[2] << 6 | translated[3], dst_stream);
129 int uudecode_main(int argc, char **argv);
130 int uudecode_main(int argc, char **argv)
132 FILE *src_stream = stdin;
133 char *outname = NULL;
136 opt_complementary = "?1"; /* 1 argument max */
137 getopt32(argv, "o:", &outname);
141 src_stream = xfopen(argv[0], "r");
143 /* Search for the start of the encoding */
144 while ((line = xmalloc_getline(src_stream)) != NULL) {
145 void (*decode_fn_ptr)(FILE * src, FILE * dst);
150 if (strncmp(line, "begin-base64 ", 13) == 0) {
151 line_ptr = line + 13;
152 decode_fn_ptr = read_base64;
153 } else if (strncmp(line, "begin ", 6) == 0) {
155 decode_fn_ptr = read_stduu;
161 /* begin line found. decode and exit */
162 mode = strtoul(line_ptr, NULL, 8);
163 if (outname == NULL) {
164 outname = strchr(line_ptr, ' ');
165 if ((outname == NULL) || (*outname == '\0')) {
171 if (NOT_LONE_DASH(outname)) {
172 dst_stream = xfopen(outname, "w");
173 chmod(outname, mode & (S_IRWXU | S_IRWXG | S_IRWXO));
176 decode_fn_ptr(src_stream, dst_stream);
177 /* fclose_if_not_stdin(src_stream); - redundant */
180 bb_error_msg_and_die("no 'begin' line");
184 Put this into an empty dir with busybox binary, an run.
187 test -x busybox || { echo "No ./busybox?"; exit; }
188 ln -sf busybox uudecode
189 ln -sf busybox uuencode
196 echo -n ABCDEF >ABCDEF
200 ./uuencode $f <$f >u_$f
201 ./uuencode -m $f <$f >m_$f
203 mkdir unpk_u unpk_m 2>/dev/null
205 ./uudecode <$f -o unpk_u/${f:2}
206 diff -a ${f:2} unpk_u/${f:2} >/dev/null 2>&1
210 ./uudecode <$f -o unpk_m/${f:2}
211 diff -a ${f:2} unpk_m/${f:2} >/dev/null 2>&1