1 /* $OpenBSD: uuencode.c,v 1.28 2015/04/24 01:36:24 deraadt Exp $ */
2 /*
3 * Copyright (c) 2000 Markus Friedl. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24 */
25
26 #include "includes.h"
27
28 #include <sys/types.h>
29 #include <netinet/in.h>
30 #include <resolv.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33
34 #include "xmalloc.h"
35 #include "uuencode.h"
36
37 /*
38 * Encode binary 'src' of length 'srclength', writing base64-encoded text
39 * to 'target' of size 'targsize'. Will always nul-terminate 'target'.
40 * Returns the number of bytes stored in 'target' or -1 on error (inc.
41 * 'targsize' too small).
42 */
43 int
uuencode(const u_char * src,u_int srclength,char * target,size_t targsize)44 uuencode(const u_char *src, u_int srclength,
45 char *target, size_t targsize)
46 {
47 return __b64_ntop(src, srclength, target, targsize);
48 }
49
50 /*
51 * Decode base64-encoded 'src' into buffer 'target' of 'targsize' bytes.
52 * Will skip leading and trailing whitespace. Returns the number of bytes
53 * stored in 'target' or -1 on error (inc. targsize too small).
54 */
55 int
uudecode(const char * src,u_char * target,size_t targsize)56 uudecode(const char *src, u_char *target, size_t targsize)
57 {
58 int len;
59 char *encoded, *p;
60
61 /* copy the 'readonly' source */
62 encoded = xstrdup(src);
63 /* skip whitespace and data */
64 for (p = encoded; *p == ' ' || *p == '\t'; p++)
65 ;
66 for (; *p != '\0' && *p != ' ' && *p != '\t'; p++)
67 ;
68 /* and remove trailing whitespace because __b64_pton needs this */
69 *p = '\0';
70 len = __b64_pton(encoded, target, targsize);
71 free(encoded);
72 return len;
73 }
74
75 void
dump_base64(FILE * fp,const u_char * data,u_int len)76 dump_base64(FILE *fp, const u_char *data, u_int len)
77 {
78 char *buf;
79 int i, n;
80
81 if (len > 65536) {
82 fprintf(fp, "dump_base64: len > 65536\n");
83 return;
84 }
85 buf = xreallocarray(NULL, 2, len);
86 n = uuencode(data, len, buf, 2*len);
87 for (i = 0; i < n; i++) {
88 fprintf(fp, "%c", buf[i]);
89 if (i % 70 == 69)
90 fprintf(fp, "\n");
91 }
92 if (i % 70 != 69)
93 fprintf(fp, "\n");
94 free(buf);
95 }
96