Annotation of libaitwww/src/base64.c, revision 1.1.2.1

1.1.2.1 ! misho       1: /*************************************************************************
        !             2: * (C) 2012 AITNET ltd - Sofia/Bulgaria - <misho@aitnet.org>
        !             3: *  by Michael Pounov <misho@elwix.org>
        !             4: *
        !             5: * $Author: misho $
        !             6: * $Id: url.c,v 1.2.6.1 2012/09/04 12:29:07 misho Exp $
        !             7: *
        !             8: **************************************************************************
        !             9: The ELWIX and AITNET software is distributed under the following
        !            10: terms:
        !            11: 
        !            12: All of the documentation and software included in the ELWIX and AITNET
        !            13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
        !            14: 
        !            15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
        !            16:        by Michael Pounov <misho@elwix.org>.  All rights reserved.
        !            17: 
        !            18: Redistribution and use in source and binary forms, with or without
        !            19: modification, are permitted provided that the following conditions
        !            20: are met:
        !            21: 1. Redistributions of source code must retain the above copyright
        !            22:    notice, this list of conditions and the following disclaimer.
        !            23: 2. Redistributions in binary form must reproduce the above copyright
        !            24:    notice, this list of conditions and the following disclaimer in the
        !            25:    documentation and/or other materials provided with the distribution.
        !            26: 3. All advertising materials mentioning features or use of this software
        !            27:    must display the following acknowledgement:
        !            28: This product includes software developed by Michael Pounov <misho@elwix.org>
        !            29: ELWIX - Embedded LightWeight unIX and its contributors.
        !            30: 4. Neither the name of AITNET nor the names of its contributors
        !            31:    may be used to endorse or promote products derived from this software
        !            32:    without specific prior written permission.
        !            33: 
        !            34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
        !            35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
        !            36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !            37: ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
        !            38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !            39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
        !            40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
        !            41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
        !            42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
        !            43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
        !            44: SUCH DAMAGE.
        !            45: */
        !            46: #include "global.h"
        !            47: 
        !            48: 
        !            49: static const unsigned char base64_table[65] = 
        !            50:        "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
        !            51: 
        !            52: 
        !            53: /*
        !            54:  * www_b64encode() - Base64 encode function
        !            55:  *
        !            56:  * @src = source data
        !            57:  * return: NULL error or !=NULL encoded variable, after use call io_freeVar()
        !            58:  */
        !            59: ait_val_t *
        !            60: www_b64encode(ait_val_t * __restrict src)
        !            61: {
        !            62:        ait_val_t v, *ret = NULL;
        !            63:        size_t olen;
        !            64:        const u_char *in, *end;
        !            65:        u_char *pos, *out;
        !            66:        int len = 0;
        !            67: 
        !            68:        if (!src || AIT_ISEMPTY(src))
        !            69:                return NULL;
        !            70:        olen = AIT_LEN(src) * 4 / 3 + 4;        /* 3-byte blocks to 4-byte */
        !            71:        olen += olen / 72;                      /* LF */
        !            72:        olen++;                                 /* \0 */
        !            73:        if (olen < AIT_LEN(src)) {
        !            74:                www_SetErr(EINVAL, "Integer overflow");
        !            75:                return NULL;
        !            76:        }
        !            77: 
        !            78:        AIT_SET_STRSIZ(&v, olen);
        !            79:        pos = out = (u_char*) AIT_GET_STR(&v);
        !            80:        in = (u_char*) AIT_GET_STR(src);
        !            81:        end = in + AIT_LEN(src);
        !            82: 
        !            83:        while (end - in >= 3) {
        !            84:                *pos++ = base64_table[in[0] >> 2];
        !            85:                *pos++ = base64_table[((in[0] & 0x03) << 4) | (in[1] >> 4)];
        !            86:                *pos++ = base64_table[((in[1] & 0x0f) << 2) | (in[2] >> 6)];
        !            87:                *pos++ = base64_table[in[2] & 0x3f];
        !            88:                in += 3;
        !            89:                len += 4;
        !            90:                if (len >= 72) {
        !            91:                        *pos++ = '\n';
        !            92:                        len = 0;
        !            93:                }
        !            94:        }
        !            95: 
        !            96:        if (end - in) {
        !            97:                *pos++ = base64_table[in[0] >> 2];
        !            98:                if (end - in == 1) {
        !            99:                        *pos++ = base64_table[(in[0] & 0x03) << 4];
        !           100:                        *pos++ = '=';
        !           101:                } else {
        !           102:                        *pos++ = base64_table[((in[0] & 0x03) << 4) | (in[1] >> 4)];
        !           103:                        *pos++ = base64_table[(in[1] & 0x0f) << 2];
        !           104:                }
        !           105:                *pos++ = '=';
        !           106:                len += 4;
        !           107:        }
        !           108: 
        !           109:        if (len)
        !           110:                *pos++ = '\n';
        !           111: 
        !           112:        *pos = 0;
        !           113: 
        !           114:        if (!(ret = io_allocVar())) {
        !           115:                www_SetErr(io_GetErrno(), "%s", io_GetError());
        !           116:                return NULL;
        !           117:        } else {
        !           118:                AIT_INIT_VAL2(ret, string);
        !           119:                AIT_SET_STRLCPY(ret, AIT_GET_STR(&v), pos - out);
        !           120:                AIT_FREE_VAL(&v);
        !           121:        }
        !           122:        return ret;
        !           123: }
        !           124: 
        !           125: /*
        !           126:  * www_b64decode() - Base64 decode function
        !           127:  *
        !           128:  * @src = source encoded data
        !           129:  * return: NULL error or !=NULL decoded variable, after use call io_freeVar()
        !           130:  */
        !           131: ait_val_t *
        !           132: www_b64decode(ait_val_t * __restrict src)
        !           133: {
        !           134:        ait_val_t v, *ret = NULL;
        !           135:        u_char dtable[256], *s, *pos, *out, in[4], blk[4];
        !           136:        register size_t i, olen, cx = 0;
        !           137: 
        !           138:        if (!src || AIT_ISEMPTY(src))
        !           139:                return NULL;
        !           140:        else
        !           141:                s = (u_char*) AIT_GET_STR(src);
        !           142: 
        !           143:        memset(dtable, 0x80, sizeof dtable);
        !           144:        for (i = 0; i < sizeof base64_table - 1; i++)
        !           145:                dtable[base64_table[i]] = (u_char) i;
        !           146:        dtable['='] = 0;
        !           147: 
        !           148:        for (i = 0; i < AIT_LEN(src); i++)
        !           149:                if (dtable[s[i]] != 0x80)
        !           150:                        cx++;
        !           151:        if (!cx || cx % 4) {
        !           152:                www_SetErr(EINVAL, "Invalid argument");
        !           153:                return NULL;
        !           154:        }
        !           155: 
        !           156:        olen = cx / 4 * 3;
        !           157:        AIT_SET_STRSIZ(&v, olen);
        !           158:        pos = out = (u_char*) AIT_GET_STR(&v);
        !           159: 
        !           160:        for (cx = i = 0; i < AIT_LEN(src); i++) {
        !           161:                if (dtable[s[i]] == 0x80)
        !           162:                        continue;
        !           163:                in[cx] = s[i];
        !           164:                blk[cx++] = dtable[s[i]];
        !           165:                if (cx == 4) {
        !           166:                        *pos++ = (blk[0] << 2) | (blk[1] >> 4);
        !           167:                        *pos++ = (blk[1] << 4) | (blk[2] >> 2);
        !           168:                        *pos++ = (blk[2] << 6) | blk[3];
        !           169:                        cx = 0;
        !           170:                }
        !           171:        }
        !           172: 
        !           173:        if (pos > out) {
        !           174:                if (in[2] == '=')
        !           175:                        pos -= 2;
        !           176:                else if (in[3] == '=')
        !           177:                        pos--;
        !           178:        }
        !           179: 
        !           180:        if (!(ret = io_allocVar())) {
        !           181:                www_SetErr(io_GetErrno(), "%s", io_GetError());
        !           182:                return NULL;
        !           183:        } else {
        !           184:                AIT_INIT_VAL2(ret, string);
        !           185:                AIT_SET_STRLCPY(ret, AIT_GET_STR(&v), pos - out);
        !           186:                AIT_FREE_VAL(&v);
        !           187:        }
        !           188:        return ret;
        !           189: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>