1 /* $NetBSD: uuencode.c,v 1.16 2014/09/06 18:58:35 dholland Exp $ */
2
3 /*-
4 * Copyright (c) 1983, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __COPYRIGHT("@(#) Copyright (c) 1983, 1993\
35 The Regents of the University of California. All rights reserved.");
36 #endif /* not lint */
37
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)uuencode.c 8.2 (Berkeley) 4/2/94";
41 #else
42 __RCSID("$NetBSD: uuencode.c,v 1.16 2014/09/06 18:58:35 dholland Exp $");
43 #endif
44 #endif /* not lint */
45
46 /*
47 * uuencode [input] output
48 *
49 * Encode a file so it can be mailed to a remote system.
50 */
51 #include <sys/types.h>
52 #include <sys/stat.h>
53 #include <netinet/in.h>
54 #include <err.h>
55 #include <errno.h>
56 #include <locale.h>
57 #include <resolv.h>
58 #include <stdio.h>
59 #include <stdlib.h>
60 #include <string.h>
61 #include <unistd.h>
62
63 static void encode(void);
64 static void base64_encode(void);
65 __dead static void usage(void);
66
67 int
main(int argc,char * argv[])68 main(int argc, char *argv[])
69 {
70 struct stat sb;
71 int base64, ch, mode;
72
73 mode = 0;
74 base64 = 0;
75 setlocale(LC_ALL, "");
76 setprogname(argv[0]);
77
78 while ((ch = getopt(argc, argv, "m")) != -1) {
79 switch(ch) {
80 case 'm':
81 base64 = 1;
82 break;
83 default:
84 usage();
85 }
86 }
87 argv += optind;
88 argc -= optind;
89
90 switch(argc) {
91 case 2: /* optional first argument is input file */
92 if (!freopen(*argv, "r", stdin) || fstat(fileno(stdin), &sb))
93 err(1, "%s", *argv);
94 #define RWX (S_IRWXU|S_IRWXG|S_IRWXO)
95 mode = sb.st_mode & RWX;
96 ++argv;
97 break;
98 case 1:
99 #define RW (S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP|S_IROTH|S_IWOTH)
100 mode = RW & ~umask(RW);
101 break;
102 case 0:
103 default:
104 usage();
105 }
106
107 if (base64) {
108 (void)printf("begin-base64 %o %s\n", mode, *argv);
109 base64_encode();
110 (void)printf("====\n");
111 } else {
112 (void)printf("begin %o %s\n", mode, *argv);
113 encode();
114 (void)printf("end\n");
115 }
116
117 if (ferror(stdout))
118 err(1, "write error");
119 exit(0);
120 }
121
122 /* ENC is the basic 1 character encoding function to make a char printing */
123 #define ENC(c) ((c) ? ((c) & 077) + ' ': '`')
124
125 /*
126 * copy from in to out, encoding in base64 as you go along.
127 */
128 static void
base64_encode(void)129 base64_encode(void)
130 {
131 /*
132 * Output must fit into 80 columns, chunks come in 4, leave 1.
133 */
134 #define GROUPS ((70 / 4) - 1)
135 unsigned char buf[3];
136 char buf2[sizeof(buf) * 2 + 1];
137 size_t n;
138 int rv, sequence;
139
140 sequence = 0;
141
142 while ((n = fread(buf, 1, sizeof(buf), stdin))) {
143 ++sequence;
144 rv = b64_ntop(buf, n, buf2, (sizeof(buf2) / sizeof(buf2[0])));
145 if (rv == -1)
146 errx(1, "b64_ntop: error encoding base64");
147 printf("%s%s", buf2, (sequence % GROUPS) ? "" : "\n");
148 }
149 if (sequence % GROUPS)
150 printf("\n");
151 }
152
153 /*
154 * copy from in to out, encoding as you go along.
155 */
156 static void
encode(void)157 encode(void)
158 {
159 int ch, n;
160 char *p;
161 char buf[80];
162
163 while ((n = fread(buf, 1, 45, stdin)) > 0) {
164 ch = ENC(n);
165 if (putchar(ch) == EOF)
166 break;
167 for (p = buf; n > 0; n -= 3, p += 3) {
168 ch = *p >> 2;
169 ch = ENC(ch);
170 if (putchar(ch) == EOF)
171 break;
172 ch = ((*p << 4) & 060) | ((p[1] >> 4) & 017);
173 ch = ENC(ch);
174 if (putchar(ch) == EOF)
175 break;
176 ch = ((p[1] << 2) & 074) | ((p[2] >> 6) & 03);
177 ch = ENC(ch);
178 if (putchar(ch) == EOF)
179 break;
180 ch = p[2] & 077;
181 ch = ENC(ch);
182 if (putchar(ch) == EOF)
183 break;
184 }
185 if (putchar('\n') == EOF)
186 break;
187 }
188 if (ferror(stdin))
189 err(1, "read error.");
190 ch = ENC('\0');
191 (void)putchar(ch);
192 (void)putchar('\n');
193 }
194
195 static void
usage(void)196 usage(void)
197 {
198 (void)fprintf(stderr,
199 "usage: %s [-m] [inputfile] headername > encodedfile\n",
200 getprogname());
201 exit(1);
202 }
203