src/base64.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2002 Hiroyuki Yamamoto
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include <glib.h>
  21 #include <ctype.h>
  22
  23 #include "base64.h"
  24
  25 static const gchar base64char[64] =
  26         "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  27
  28 static const gchar base64val[128] = {
  29         -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
  30         -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
  31         -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, -1, -1, 63,
  32         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
  33         -1,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14,
  34         15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, -1,
  35         -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
  36         41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1
  37 };
  38
  39 #define BASE64VAL(c)    (isascii(c) ? base64val[(gint)(c)] : -1)
  40
  41 void base64_encode(gchar *out, const guchar *in, gint inlen)
  42 {
  43         const guchar *inp = in;
  44         gchar *outp = out;
  45
  46         while (inlen >= 3) {
  47                 *outp++ = base64char[(inp[0] >> 2) & 0x3f];
  48                 *outp++ = base64char[((inp[0] & 0x03) << 4) |
  49                                      ((inp[1] >> 4) & 0x0f)];
  50                 *outp++ = base64char[((inp[1] & 0x0f) << 2) |
  51                                      ((inp[2] >> 6) & 0x03)];
  52                 *outp++ = base64char[inp[2] & 0x3f];
  53
  54                 inp += 3;
  55                 inlen -= 3;
  56         }
  57
  58         if (inlen > 0) {
  59                 *outp++ = base64char[(inp[0] >> 2) & 0x3f];
  60                 if (inlen == 1) {
  61                         *outp++ = base64char[(inp[0] & 0x03) << 4];
  62                         *outp++ = '=';
  63                 } else {
  64                         *outp++ = base64char[((inp[0] & 0x03) << 4) |
  65                                              ((inp[1] >> 4) & 0x0f)];
  66                         *outp++ = base64char[((inp[1] & 0x0f) << 2)];
  67                 }
  68                 *outp++ = '=';
  69         }
  70
  71         *outp = '\0';
  72 }
  73
  74 gint base64_decode(guchar *out, const gchar *in, gint inlen)
  75 {
  76         const gchar *inp = in;
  77         guchar *outp = out;
  78         gchar buf[4];
  79
  80         if (inlen < 0)
  81                 inlen = G_MAXINT;
  82
  83         while (inlen >= 4 && *inp != '\0') {
  84                 buf[0] = *inp++;
  85                 inlen--;
  86                 if (BASE64VAL(buf[0]) == -1) break;
  87
  88                 buf[1] = *inp++;
  89                 inlen--;
  90                 if (BASE64VAL(buf[1]) == -1) break;
  91
  92                 buf[2] = *inp++;
  93                 inlen--;
  94                 if (buf[2] != '=' && BASE64VAL(buf[2]) == -1) break;
  95
  96                 buf[3] = *inp++;
  97                 inlen--;
  98                 if (buf[3] != '=' && BASE64VAL(buf[3]) == -1) break;
  99
 100                 *outp++ = ((BASE64VAL(buf[0]) << 2) & 0xfc) |
 101                           ((BASE64VAL(buf[1]) >> 4) & 0x03);
 102                 if (buf[2] != '=') {
 103                         *outp++ = ((BASE64VAL(buf[1]) & 0x0f) << 4) |
 104                                   ((BASE64VAL(buf[2]) >> 2) & 0x0f);
 105                         if (buf[3] != '=') {
 106                                 *outp++ = ((BASE64VAL(buf[2]) & 0x03) << 6) |
 107                                            (BASE64VAL(buf[3]) & 0x3f);
 108                         }
 109                 }
 110         }
 111
 112         return outp - out;
 113 }
 114
 115 Base64Decoder *base64_decoder_new(void)
 116 {
 117         Base64Decoder *decoder;
 118
 119         decoder = g_new0(Base64Decoder, 1);
 120         return decoder;
 121 }
 122
 123 void base64_decoder_free(Base64Decoder *decoder)
 124 {
 125         g_free(decoder);
 126 }
 127
 128 gint base64_decoder_decode(Base64Decoder *decoder,
 129                            const gchar *in, guchar *out)
 130 {
 131         gint len, total_len = 0;
 132         gint buf_len;
 133         gchar buf[4];
 134
 135         g_return_val_if_fail(decoder != NULL, -1);
 136         g_return_val_if_fail(in != NULL, -1);
 137         g_return_val_if_fail(out != NULL, -1);
 138
 139         buf_len = decoder->buf_len;
 140         memcpy(buf, decoder->buf, sizeof(buf));
 141
 142         for (;;) {
 143                 while (buf_len < 4) {
 144                         gchar c = *in;
 145
 146                         in++;
 147                         if (c == '\0') break;
 148                         if (c == '\r' || c == '\n') continue;
 149                         if (c != '=' && BASE64VAL(c) == -1)
 150                                 return -1;
 151                         buf[buf_len++] = c;
 152                 }
 153                 if (buf_len < 4 || buf[0] == '=' || buf[1] == '=') {
 154                         decoder->buf_len = buf_len;
 155                         memcpy(decoder->buf, buf, sizeof(buf));
 156                         return total_len;
 157                 }
 158                 len = base64_decode(out, buf, 4);
 159                 out += len;
 160                 total_len += len;
 161                 buf_len = 0;
 162                 if (len < 3) {
 163                         decoder->buf_len = 0;
 164                         return total_len;
 165                 }
 166         }
 167 }