rob@831: /* uuencode.c - uuencode / base64 encode
rob@831:  *
rob@831:  * Copyright 2013 Erich Plondke <toybox@erich.wreck.org>
rob@831:  *
rob@831:  * See http://pubs.opengroup.org/onlinepubs/9699919799/utilities/uuencode.html
rob@831: 
rob@831: USE_UUENCODE(NEWTOY(uuencode, "<1>2m", TOYFLAG_USR|TOYFLAG_BIN))
rob@831: 
rob@831: config UUENCODE
rob@831:   bool "uuencode"
rob@831:   default y 
rob@831:   help
rob@831:     usage: uuencode [-m] [file] encode-filename
rob@831: 
rob@831:     Uuencode stdin (or file) to stdout, with encode-filename in the output.
rob@831: 
rob@831:     -m	base64-encode
rob@831: */
rob@831: 
rob@831: #define FOR_uuencode
rob@831: #include "toys.h"
rob@831: 
rob@831: void uuencode_main(void)
rob@831: {
rob@831:   char *p, *name = toys.optargs[toys.optc-1], buf[(76/4)*3];
rob@831: 
rob@831:   int i, m = toys.optflags & FLAG_m, fd = 0;
rob@831: 
rob@831:   if (toys.optc > 1) fd = xopen(toys.optargs[0], O_RDONLY);
rob@831: 
rob@831:   // base64 table
rob@831: 
rob@831:   p = toybuf;
rob@831:   for (i = 'A'; i != ':'; i++) {
rob@831:     if (i == 'Z'+1) i = 'a';
rob@831:     if (i == 'z'+1) i = '0';
rob@831:     *(p++) = i;
rob@831:   }
rob@831:   *(p++) = '+';
rob@831:   *(p++) = '/';
rob@831: 
rob@831:   xprintf("begin%s 744 %s\n", m ? "-base64" : "", name);
rob@831:   for (;;) {
rob@831:     char *in;
rob@831: 
rob@831:     if (!(i = xread(fd, buf, m ? sizeof(buf) : 45))) break;
rob@831: 
rob@831:     if (!m) xputc(i+32);
rob@831:     in = buf;
rob@831: 
rob@831:     for (in = buf; in-buf < i; ) {
rob@831:       int j, x, bytes = i - (in-buf);
rob@831: 
rob@831:       if (bytes > 3) bytes = 3;
rob@831: 
rob@831:       for (j = x = 0; j<4; j++) {
rob@831:         int out;
rob@831: 
rob@831:         if (j < bytes) x |= (*(in++) & 0x0ff) << (8*(2-j));
rob@831:         out = (x>>((3-j)*6)) & 0x3f;
rob@831:         xputc(m ? j > bytes ? '=' : toybuf[out] : out + 0x20);
rob@831:       } 
rob@831:     }
rob@831:     xputc('\n');
rob@831:   }
rob@831:   xputs(m ? "====" : "end");
rob@831: }