1 /* $OpenBSD: uuencode.c,v 1.25 2009/03/05 11:30:50 djm 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 <sys/types.h>
27 #include <netinet/in.h>
28 #include <resolv.h>
29 #include <stdio.h>
30
31 #include "xmalloc.h"
32 #include "uuencode.h"
33
34 /*
35 * Encode binary 'src' of length 'srclength', writing base64-encoded text
36 * to 'target' of size 'targsize'. Will always nul-terminate 'target'.
37 * Returns the number of bytes stored in 'target' or -1 on error (inc.
38 * 'targsize' too small).
39 */
40 int
uuencode(const u_char * src,u_int srclength,char * target,size_t targsize)41 uuencode(const u_char *src, u_int srclength,
42 char *target, size_t targsize)
43 {
44 return __b64_ntop(src, srclength, target, targsize);
45 }
46
47 /*
48 * Decode base64-encoded 'src' into buffer 'target' of 'targsize' bytes.
49 * Will skip leading and trailing whitespace. Returns the number of bytes
50 * stored in 'target' or -1 on error (inc. targsize too small).
51 */
52 int
uudecode(const char * src,u_char * target,size_t targsize)53 uudecode(const char *src, u_char *target, size_t targsize)
54 {
55 int len;
56 char *encoded, *p;
57
58 /* copy the 'readonly' source */
59 encoded = xstrdup(src);
60 /* skip whitespace and data */
61 for (p = encoded; *p == ' ' || *p == '\t'; p++)
62 ;
63 for (; *p != '\0' && *p != ' ' && *p != '\t'; p++)
64 ;
65 /* and remove trailing whitespace because __b64_pton needs this */
66 *p = '\0';
67 len = __b64_pton(encoded, target, targsize);
68 xfree(encoded);
69 return len;
70 }
71
72 void
dump_base64(FILE * fp,u_char * data,u_int len)73 dump_base64(FILE *fp, u_char *data, u_int len)
74 {
75 char *buf;
76 int i, n;
77
78 if (len > 65536) {
79 fprintf(fp, "dump_base64: len > 65536\n");
80 return;
81 }
82 buf = xmalloc(2*len);
83 n = uuencode(data, len, buf, 2*len);
84 for (i = 0; i < n; i++) {
85 fprintf(fp, "%c", buf[i]);
86 if (i % 70 == 69)
87 fprintf(fp, "\n");
88 }
89 if (i % 70 != 69)
90 fprintf(fp, "\n");
91 xfree(buf);
92 }
93