diff options
Diffstat (limited to 'encoding')
| -rw-r--r-- | encoding/apr_encode.c | 1577 | ||||
| -rw-r--r-- | encoding/apr_escape.c | 1214 |
2 files changed, 2791 insertions, 0 deletions
diff --git a/encoding/apr_encode.c b/encoding/apr_encode.c new file mode 100644 index 0000000..c18f442 --- /dev/null +++ b/encoding/apr_encode.c @@ -0,0 +1,1577 @@ +/* Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed with + * this work for additional information regarding copyright ownership. + * The ASF licenses this file to You under the Apache License, Version 2.0 + * (the "License"); you may not use this file except in compliance with + * the License. You may obtain a copy of the License at + * + * http://www.apache.org/licenses/LICENSE-2.0 + * + * Unless required by applicable law or agreed to in writing, software + * distributed under the License is distributed on an "AS IS" BASIS, + * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + * See the License for the specific language governing permissions and + * limitations under the License. + */ + +/* encode/decode functions. + * + * These functions perform various encoding operations, and are provided in + * pairs, a function to query the length of and encode existing buffers, as + * well as companion functions to perform the same process to memory + * allocated from a pool. + * + * The API is designed to have the smallest possible RAM footprint, and so + * will only allocate the exact amount of RAM needed for each conversion. + */ + +#include "apr_encode.h" +#include "apr_lib.h" +#include "apr_strings.h" +#include "apr_encode_private.h" + +/* lookup table: fast and const should make it shared text page. */ +static const unsigned char pr2six[256] = +{ +#if !APR_CHARSET_EBCDIC + /* ASCII table */ + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 62, 64, 62, 64, 63, + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 64, 64, 64, 128, 64, 64, + 64, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, + 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 64, 64, 64, 64, 63, + 64, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, + 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64 +#else /* APR_CHARSET_EBCDIC */ + /* EBCDIC table */ + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 62, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 62, 63, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 63, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 128, 64, + 64, 26, 27, 28, 29, 30, 31, 32, 33, 34, 64, 64, 64, 64, 64, 64, + 64, 35, 36, 37, 38, 39, 40, 41, 42, 43, 64, 64, 64, 64, 64, 64, + 64, 64, 44, 45, 46, 47, 48, 49, 50, 51, 64, 64, 64, 64, 64, 64, + 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, + 64, 0, 1, 2, 3, 4, 5, 6, 7, 8, 64, 64, 64, 64, 64, 64, + 64, 9, 10, 11, 12, 13, 14, 15, 16, 17, 64, 64, 64, 64, 64, 64, + 64, 64, 18, 19, 20, 21, 22, 23, 24, 25, 64, 64, 64, 64, 64, 64, + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 64, 64, 64, 64, 64, 64 +#endif /* APR_CHARSET_EBCDIC */ +}; + +static const unsigned char pr2five[256] = +{ +#if !APR_CHARSET_EBCDIC + /* ASCII table */ + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 26, 27, 28, 29, 30, 31, 32, 32, 32, 32, 32, 128, 32, 32, + 32, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, + 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32 +#else /* APR_CHARSET_EBCDIC */ + /* EBCDIC table */ + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 128, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 0, 1, 2, 3, 4, 5, 6, 7, 8, 32, 32, 32, 32, 32, 32, + 32, 9, 10, 11, 12, 13, 14, 15, 16, 17, 32, 32, 32, 32, 32, 32, + 32, 32, 18, 19, 20, 21, 22, 23, 24, 25, 32, 32, 32, 32, 32, 32, + 32, 32, 26, 27, 28, 29, 30, 31, 32, 32, 32, 32, 32, 32, 32, 32 +#endif /* APR_CHARSET_EBCDIC */ +}; + +static const unsigned char pr2fivehex[256] = +{ +#if !APR_CHARSET_EBCDIC + /* ASCII table */ + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 32, 32, 32, 128, 32, 32, + 32, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, + 25, 26, 27, 28, 29, 30, 31, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32 +#else /* APR_CHARSET_EBCDIC */ + /* EBCDIC table */ + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 128, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 32, 10, 11, 12, 13, 14, 15, 16, 17, 18, 32, 32, 32, 32, 32, 32, + 32, 19, 20, 21, 22, 23, 24, 25, 26, 27, 32, 32, 32, 32, 32, 32, + 32, 32, 28, 29, 30, 31, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 32, 32, 32, 32, 32, 32 +#endif /* APR_CHARSET_EBCDIC */ +}; + +static const unsigned char pr2two[256] = +{ +#if !APR_CHARSET_EBCDIC + /* ASCII table */ + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 32, 16, 16, 16, 16, 16, + 16, 10, 11, 12, 13, 14, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 10, 11, 12, 13, 14, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16 +#else /* APR_CHARSET_EBCDIC */ + /* EBCDIC table */ + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 32, 16, 16, 16, 16, 16, + 16, 10, 11, 12, 13, 14, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 10, 11, 12, 13, 14, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 16, 16, 16, 16, 16, 16 +#endif /* APR_CHARSET_EBCDIC */ +}; + +static const char base64[] = +"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; +static const char base64url[] = +"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_"; + +static const char base32[] = +"ABCDEFGHIJKLMNOPQRSTUVWXYZ234567"; +static const char base32hex[] = +"0123456789ABCDEFGHIJKLMNOPQRSTUV"; + +static const char base16[] = "0123456789ABCDEF"; +static const char base16lower[] = "0123456789abcdef"; + +APR_DECLARE(apr_status_t) apr_encode_base64(char *dest, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + const char *base; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + apr_size_t i = 0; + + if (0 == ((flags & APR_ENCODE_BASE64URL))) { + base = base64; + } + else { + base = base64url; + } + + if (count > 2) { + for (; i < count - 2; i += 3) { + *bufout++ = base[(TO_ASCII(src[i]) >> 2) & 0x3F]; + *bufout++ = base[((TO_ASCII(src[i]) & 0x3) << 4 | + (TO_ASCII(src[i + 1]) & 0xF0) >> 4)]; + *bufout++ = base[((TO_ASCII(src[i + 1]) & 0xF) << 2 | + (TO_ASCII(src[i + 2]) & 0xC0) >> 6)]; + *bufout++ = base[TO_ASCII(src[i + 2]) & 0x3F]; + } + } + if (i < count) { + *bufout++ = base[(TO_ASCII(src[i]) >> 2) & 0x3F]; + if (i == (count - 1)) { + *bufout++ = base[(TO_ASCII(src[i]) & 0x3) << 4]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + else { + *bufout++ = base[((TO_ASCII(src[i]) & 0x3) << 4 | + (TO_ASCII(src[i + 1]) & 0xF0) >> 4)]; + *bufout++ = base[(TO_ASCII(src[i + 1]) & 0xF) << 2]; + } + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = ((count + 2u) / 3u) * 4u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_encode_base64_binary(char *dest, const unsigned char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + const char *base; + + if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + apr_size_t i = 0; + + if (0 == ((flags & APR_ENCODE_BASE64URL))) { + base = base64; + } + else { + base = base64url; + } + + if (count > 2) { + for (; i < count - 2; i += 3) { + *bufout++ = base[(src[i] >> 2) & 0x3F]; + *bufout++ = base[((src[i] & 0x3) << 4 | + (src[i + 1] & 0xF0) >> 4)]; + *bufout++ = base[((src[i + 1] & 0xF) << 2 | + (src[i + 2] & 0xC0) >> 6)]; + *bufout++ = base[src[i + 2] & 0x3F]; + } + } + if (i < count) { + *bufout++ = base[(src[i] >> 2) & 0x3F]; + if (i == (count - 1)) { + *bufout++ = base[((src[i] & 0x3) << 4)]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + else { + *bufout++ = base[((src[i] & 0x3) << 4 | + (src[i + 1] & 0xF0) >> 4)]; + *bufout++ = base[(src[i + 1] & 0xF) << 2]; + } + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = ((count + 2u) / 3u) * 4u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pencode_base64(apr_pool_t * p, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base64(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base64(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const char *)apr_pencode_base64_binary(apr_pool_t * p, const unsigned char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base64_binary(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base64_binary(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_decode_base64(char *dest, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + + bufin = (const unsigned char *)src; + while (count) { + if (pr2six[*bufin] >= 64) { + if (!(flags & APR_ENCODE_RELAXED)) { + if (count <= 2) { + do { + if (pr2six[bufin[count - 1]] <= 64) + break; + } while (--count); + } + if (count) { + status = APR_BADCH; + } + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 4) { + *(bufout++) = TO_NATIVE(pr2six[bufin[0]] << 2 | + pr2six[bufin[1]] >> 4); + *(bufout++) = TO_NATIVE(pr2six[bufin[1]] << 4 | + pr2six[bufin[2]] >> 2); + *(bufout++) = TO_NATIVE(pr2six[bufin[2]] << 6 | + pr2six[bufin[3]]); + bufin += 4; + count -= 4; + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + if (count > 1) { + *(bufout++) = TO_NATIVE(pr2six[bufin[0]] << 2 | + pr2six[bufin[1]] >> 4); + } + if (count > 2) { + *(bufout++) = TO_NATIVE(pr2six[bufin[1]] << 4 | + pr2six[bufin[2]] >> 2); + } + + dlen = bufout - (unsigned char *)dest; + dest[dlen] = '\0'; + } + } + + if (!src || !dest) { + dlen = (count / 4u) * 3u + 1u; + switch (count % 4) { + case 3: + dlen += 2; + break; + case 2: + dlen++; + break; + case 1: + status = APR_EINCOMPLETE; + break; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_decode_base64_binary(unsigned char *dest, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + + bufin = (const unsigned char *)src; + while (count) { + if (pr2six[*bufin] >= 64) { + if (!(flags & APR_ENCODE_RELAXED)) { + if (count <= 2) { + do { + if (pr2six[bufin[count - 1]] <= 64) + break; + } while (--count); + } + if (count) { + status = APR_BADCH; + } + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 4) { + *(bufout++) = (pr2six[bufin[0]] << 2 | + pr2six[bufin[1]] >> 4); + *(bufout++) = (pr2six[bufin[1]] << 4 | + pr2six[bufin[2]] >> 2); + *(bufout++) = (pr2six[bufin[2]] << 6 | + pr2six[bufin[3]]); + bufin += 4; + count -= 4; + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + if (count > 1) { + *(bufout++) = (pr2six[bufin[0]] << 2 | + pr2six[bufin[1]] >> 4); + } + if (count > 2) { + *(bufout++) = (pr2six[bufin[1]] << 4 | + pr2six[bufin[2]] >> 2); + } + + dlen = bufout - dest; + } + } + + if (!src || !dest) { + dlen = (count / 4u) * 3u; + switch (count % 4) { + case 3: + dlen += 2; + break; + case 2: + dlen++; + break; + case 1: + status = APR_EINCOMPLETE; + break; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pdecode_base64(apr_pool_t * p, const char *str, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base64(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + void *cmd = apr_palloc(p, size); + if (cmd) { + apr_decode_base64(cmd, str, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const unsigned char *)apr_pdecode_base64_binary(apr_pool_t * p, + const char *str, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base64_binary(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + unsigned char *cmd = apr_palloc(p, size + 1); + if (cmd) { + apr_decode_base64_binary(cmd, str, slen, flags, len); + cmd[size] = 0; + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_encode_base32(char *dest, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + const char *base; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + apr_size_t i = 0; + + if (!((flags & APR_ENCODE_BASE32HEX))) { + base = base32; + } + else { + base = base32hex; + } + + if (count > 4) { + for (; i < count - 4; i += 5) { + *bufout++ = base[(TO_ASCII(src[i]) >> 3) & 0x1F]; + *bufout++ = base[(((TO_ASCII(src[i]) << 2) & 0x1C) | + ((TO_ASCII(src[i + 1]) >> 6) & 0x3))]; + *bufout++ = base[(TO_ASCII(src[i + 1]) >> 1) & 0x1F]; + *bufout++ = base[(((TO_ASCII(src[i + 1]) << 4) & 0x10) | + ((TO_ASCII(src[i + 2]) >> 4) & 0xF))]; + *bufout++ = base[(((TO_ASCII(src[i + 2]) << 1) & 0x1E) | + ((TO_ASCII(src[i + 3]) >> 7) & 0x1))]; + *bufout++ = base[(TO_ASCII(src[i + 3]) >> 2) & 0x1F]; + *bufout++ = base[(((TO_ASCII(src[i + 3]) << 3) & 0x18) | + ((TO_ASCII(src[i + 4]) >> 5) & 0x7))]; + *bufout++ = base[TO_ASCII(src[i + 4]) & 0x1F]; + } + } + if (i < count) { + *bufout++ = base[(TO_ASCII(src[i]) >> 3) & 0x1F]; + if (i == (count - 1)) { + *bufout++ = base[(TO_ASCII(src[i]) << 2) & 0x1C]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else if (i == (count - 2)) { + *bufout++ = base[(((TO_ASCII(src[i]) << 2) & 0x1C) | + ((TO_ASCII(src[i + 1]) >> 6) & 0x3))]; + *bufout++ = base[(TO_ASCII(src[i + 1]) >> 1) & 0x1F]; + *bufout++ = base[(TO_ASCII(src[i + 1]) << 4) & 0x10]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else if (i == (count - 3)) { + *bufout++ = base[(((TO_ASCII(src[i]) << 2) & 0x1C) | + ((TO_ASCII(src[i + 1]) >> 6) & 0x3))]; + *bufout++ = base[(TO_ASCII(src[i + 1]) >> 1) & 0x1F]; + *bufout++ = base[(((TO_ASCII(src[i + 1]) << 4) & 0x10) | + ((TO_ASCII(src[i + 2]) >> 4) & 0xF))]; + *bufout++ = base[(TO_ASCII(src[i + 2]) << 1) & 0x1E]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else { + *bufout++ = base[(((TO_ASCII(src[i]) << 2) & 0x1C) | + ((TO_ASCII(src[i + 1]) >> 6) & 0x3))]; + *bufout++ = base[(TO_ASCII(src[i + 1]) >> 1) & 0x1F]; + *bufout++ = base[(((TO_ASCII(src[i + 1]) << 4) & 0x10) | + ((TO_ASCII(src[i + 2]) >> 4) & 0xF))]; + *bufout++ = base[(((TO_ASCII(src[i + 2]) << 1) & 0x1E) | + ((TO_ASCII(src[i + 3]) >> 7) & 0x1))]; + *bufout++ = base[(TO_ASCII(src[i + 3]) >> 2) & 0x1F]; + *bufout++ = base[(TO_ASCII(src[i + 3]) << 3) & 0x18]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = ((count + 4u) / 5u) * 8u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_encode_base32_binary(char *dest, const unsigned char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + const char *base; + + if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + apr_size_t i = 0; + + if (!((flags & APR_ENCODE_BASE32HEX))) { + base = base32; + } + else { + base = base32hex; + } + + if (count > 4) { + for (; i < count - 4; i += 5) { + *bufout++ = base[((src[i] >> 3) & 0x1F)]; + *bufout++ = base[(((src[i] << 2) & 0x1C) | + ((src[i + 1] >> 6) & 0x3))]; + *bufout++ = base[((src[i + 1] >> 1) & 0x1F)]; + *bufout++ = base[(((src[i + 1] << 4) & 0x10) | + ((src[i + 2] >> 4) & 0xF))]; + *bufout++ = base[(((src[i + 2] << 1) & 0x1E) | + ((src[i + 3] >> 7) & 0x1))]; + *bufout++ = base[((src[i + 3] >> 2) & 0x1F)]; + *bufout++ = base[(((src[i + 3] << 3) & 0x18) | + ((src[i + 4] >> 5) & 0x7))]; + *bufout++ = base[(src[i + 4] & 0x1F)]; + } + } + if (i < count) { + *bufout++ = base[(src[i] >> 3) & 0x1F]; + if (i == (count - 1)) { + *bufout++ = base[((src[i] << 2) & 0x1C)]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else if (i == (count - 2)) { + *bufout++ = base[(((src[i] << 2) & 0x1C) | + ((src[i + 1] >> 6) & 0x3))]; + *bufout++ = base[((src[i + 1] >> 1) & 0x1F)]; + *bufout++ = base[((src[i + 1] << 4) & 0x10)]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else if (i == (count - 3)) { + *bufout++ = base[(((src[i] << 2) & 0x1C) | + ((src[i + 1] >> 6) & 0x3))]; + *bufout++ = base[((src[i + 1] >> 1) & 0x1F)]; + *bufout++ = base[(((src[i + 1] << 4) & 0x10) | + ((src[i + 2] >> 4) & 0xF))]; + *bufout++ = base[((src[i + 2] << 1) & 0x1E)]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + *bufout++ = '='; + *bufout++ = '='; + } + } + else { + *bufout++ = base[(((src[i] << 2) & 0x1C) | + ((src[i + 1] >> 6) & 0x3))]; + *bufout++ = base[((src[i + 1] >> 1) & 0x1F)]; + *bufout++ = base[(((src[i + 1] << 4) & 0x10) | + ((src[i + 2] >> 4) & 0xF))]; + *bufout++ = base[(((src[i + 2] << 1) & 0x1E) | + ((src[i + 3] >> 7) & 0x1))]; + *bufout++ = base[((src[i + 3] >> 2) & 0x1F)]; + *bufout++ = base[((src[i + 3] << 3) & 0x18)]; + if (!(flags & APR_ENCODE_NOPADDING)) { + *bufout++ = '='; + } + } + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = ((count + 4u) / 5u) * 8u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pencode_base32(apr_pool_t * p, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base32(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base32(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const char *)apr_pencode_base32_binary(apr_pool_t * p, const unsigned char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base32_binary(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base32_binary(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_decode_base32(char *dest, const char *src, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + const unsigned char *pr2; + + if ((flags & APR_ENCODE_BASE32HEX)) { + pr2 = pr2fivehex; + } + else { + pr2 = pr2five; + } + + bufin = (const unsigned char *)src; + while (count) { + if (pr2[*bufin] >= 32) { + if (!(flags & APR_ENCODE_RELAXED)) { + if (count <= 6) { + do { + if (pr2[bufin[count - 1]] <= 32) + break; + } while (--count); + } + if (count) { + status = APR_BADCH; + } + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 8) { + *(bufout++) = TO_NATIVE(pr2[bufin[0]] << 3 | + pr2[bufin[1]] >> 2); + *(bufout++) = TO_NATIVE(pr2[bufin[1]] << 6 | + pr2[bufin[2]] << 1 | + pr2[bufin[3]] >> 4); + *(bufout++) = TO_NATIVE(pr2[bufin[3]] << 4 | + pr2[bufin[4]] >> 1); + *(bufout++) = TO_NATIVE(pr2[bufin[4]] << 7 | + pr2[bufin[5]] << 2 | + pr2[bufin[6]] >> 3); + *(bufout++) = TO_NATIVE(pr2[bufin[6]] << 5 | + pr2[bufin[7]]); + bufin += 8; + count -= 8; + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + if (count >= 2) { + *(bufout++) = TO_NATIVE(pr2[bufin[0]] << 3 | + pr2[bufin[1]] >> 2); + } + if (count == 3) { + status = APR_EINCOMPLETE; + } + if (count >= 4) { + *(bufout++) = TO_NATIVE(pr2[bufin[1]] << 6 | + pr2[bufin[2]] << 1 | + pr2[bufin[3]] >> 4); + } + if (count >= 5) { + *(bufout++) = TO_NATIVE(pr2[bufin[3]] << 4 | + pr2[bufin[4]] >> 1); + } + if (count == 6) { + status = APR_EINCOMPLETE; + } + if (count >= 7) { + *(bufout++) = TO_NATIVE(pr2[bufin[4]] << 7 | + pr2[bufin[5]] << 2 | + pr2[bufin[6]] >> 3); + } + + dlen = bufout - (unsigned char *)dest; + dest[dlen] = '\0'; + } + } + + if (!src || !dest) { + dlen = (count / 8u) * 5u + 1u; + switch (count % 8) { + case 7: + dlen += 4; + break; + case 6: + status = APR_EINCOMPLETE; + case 5: + dlen += 3; + break; + case 4: + dlen += 2; + break; + case 3: + status = APR_EINCOMPLETE; + case 2: + dlen++; + break; + case 1: + status = APR_EINCOMPLETE; + break; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_decode_base32_binary(unsigned char *dest, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + const unsigned char *pr2; + + if ((flags & APR_ENCODE_BASE32HEX)) { + pr2 = pr2fivehex; + } + else { + pr2 = pr2five; + } + + bufin = (const unsigned char *)src; + while (count) { + if (pr2[*bufin] >= 32) { + if (!(flags & APR_ENCODE_RELAXED)) { + if (count <= 6) { + do { + if (pr2[bufin[count - 1]] <= 32) + break; + } while (--count); + } + if (count) { + status = APR_BADCH; + } + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 8) { + *(bufout++) = (pr2[bufin[0]] << 3 | + pr2[bufin[1]] >> 2); + *(bufout++) = (pr2[bufin[1]] << 6 | + pr2[bufin[2]] << 1 | + pr2[bufin[3]] >> 4); + *(bufout++) = (pr2[bufin[3]] << 4 | + pr2[bufin[4]] >> 1); + *(bufout++) = (pr2[bufin[4]] << 7 | + pr2[bufin[5]] << 2 | + pr2[bufin[6]] >> 3); + *(bufout++) = (pr2[bufin[6]] << 5 | + pr2[bufin[7]]); + bufin += 8; + count -= 8; + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + if (count >= 2) { + *(bufout++) = (pr2[bufin[0]] << 3 | + pr2[bufin[1]] >> 2); + } + if (count == 3) { + status = APR_EINCOMPLETE; + } + if (count >= 4) { + *(bufout++) = (pr2[bufin[1]] << 6 | + pr2[bufin[2]] << 1 | + pr2[bufin[3]] >> 4); + } + if (count >= 5) { + *(bufout++) = (pr2[bufin[3]] << 4 | + pr2[bufin[4]] >> 1); + } + if (count == 6) { + status = APR_EINCOMPLETE; + } + if (count >= 7) { + *(bufout++) = (pr2[bufin[4]] << 7 | + pr2[bufin[5]] << 2 | + pr2[bufin[6]] >> 3); + } + + dlen = bufout - dest; + } + } + + if (!src || !dest) { + dlen = (count / 8u) * 5u; + switch (count % 8) { + case 7: + dlen += 4; + break; + case 6: + status = APR_EINCOMPLETE; + case 5: + dlen += 3; + break; + case 4: + dlen += 2; + break; + case 3: + status = APR_EINCOMPLETE; + case 2: + dlen++; + break; + case 1: + status = APR_EINCOMPLETE; + break; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pdecode_base32(apr_pool_t * p, const char *str, + apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base32(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + void *cmd = apr_palloc(p, size); + if (cmd) { + apr_decode_base32(cmd, str, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const unsigned char *)apr_pdecode_base32_binary(apr_pool_t * p, + const char *str, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base32_binary(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + unsigned char *cmd = apr_palloc(p, size + 1); + if (cmd) { + apr_decode_base32_binary(cmd, str, slen, flags, len); + cmd[size] = 0; + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_encode_base16(char *dest, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + const char *base; + apr_size_t i; + + if ((flags & APR_ENCODE_LOWER)) { + base = base16lower; + } + else { + base = base16; + } + + for (i = 0; i < count; i++) { + if ((flags & APR_ENCODE_COLON) && i) { + *(bufout++) = ':'; + } + *(bufout++) = base[TO_ASCII(src[i]) >> 4]; + *(bufout++) = base[TO_ASCII(src[i]) & 0xf]; + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = count * 2u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + if ((flags & APR_ENCODE_COLON) && count > 1) { + apr_size_t more = dlen + count - 1; + if (more <= dlen) { + status = APR_ENOSPC; + } + dlen = more; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_encode_base16_binary(char *dest, + const unsigned char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (dest) { + char *bufout = dest; + const char *base; + apr_size_t i; + + if ((flags & APR_ENCODE_LOWER)) { + base = base16lower; + } + else { + base = base16; + } + + for (i = 0; i < count; i++) { + if ((flags & APR_ENCODE_COLON) && i) { + *(bufout++) = ':'; + } + *(bufout++) = base[src[i] >> 4]; + *(bufout++) = base[src[i] & 0xf]; + } + + dlen = bufout - dest; + dest[dlen] = '\0'; + } + else { + dlen = count * 2u + 1u; + if (dlen <= count) { + status = APR_ENOSPC; + } + if ((flags & APR_ENCODE_COLON) && count > 1) { + apr_size_t more = dlen + count - 1; + if (more <= dlen) { + status = APR_ENOSPC; + } + dlen = more; + } + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pencode_base16(apr_pool_t * p, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base16(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base16(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const char *)apr_pencode_base16_binary(apr_pool_t * p, + const unsigned char *src, apr_ssize_t slen, int flags, + apr_size_t * len) +{ + apr_size_t size; + + if (!src) { + return NULL; + } + + switch (apr_encode_base16_binary(NULL, src, slen, flags, &size)) { + case APR_SUCCESS:{ + char *cmd = apr_palloc(p, size); + if (cmd) { + apr_encode_base16_binary(cmd, src, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_decode_base16(char *dest, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + + bufin = (const unsigned char *)src; + while (count) { + if (pr2two[*bufin] >= 16 + && (!(flags & APR_ENCODE_COLON) + || pr2two[*bufin] != 32 /* ':' */)) { + if (!(flags & APR_ENCODE_RELAXED)) { + status = APR_BADCH; + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 2) { + if (pr2two[bufin[0]] == 32 /* ':' */) { + bufin += 1; + count -= 1; + } + else { + *(bufout++) = TO_NATIVE(pr2two[bufin[0]] << 4 | + pr2two[bufin[1]]); + bufin += 2; + count -= 2; + } + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + + dlen = bufout - (unsigned char *)dest; + dest[dlen] = '\0'; + } + } + + if (!src || !dest) { + if (flags & APR_ENCODE_COLON) { + if (count && (count + 1u) % 3u) { + status = APR_EINCOMPLETE; + } + count -= count / 3u; + } + if (count % 2u) { + status = APR_EINCOMPLETE; + } + dlen = count / 2u + 1u; + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(apr_status_t) apr_decode_base16_binary(unsigned char *dest, + const char *src, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_status_t status = APR_SUCCESS; + apr_size_t count = slen, dlen = 0; + + if (src && slen == APR_ENCODE_STRING) { + count = strlen(src); + } + else if (slen < 0 || (dest && !src)) { + return (src) ? APR_EINVAL : APR_NOTFOUND; + } + + if (src) { + const unsigned char *bufin; + + bufin = (const unsigned char *)src; + while (count) { + if (pr2two[*bufin] >= 16 + && (!(flags & APR_ENCODE_COLON) + || pr2two[*bufin] != 32 /* ':' */)) { + if (!(flags & APR_ENCODE_RELAXED)) { + status = APR_BADCH; + } + break; + } + count--; + bufin++; + } + count = bufin - (const unsigned char *)src; + + if (dest) { + unsigned char *bufout; + + bufout = (unsigned char *)dest; + bufin = (const unsigned char *)src; + + while (count >= 2) { + if (pr2two[bufin[0]] == 32 /* ':' */) { + bufin += 1; + count -= 1; + } + else { + *(bufout++) = (pr2two[bufin[0]] << 4 | + pr2two[bufin[1]]); + bufin += 2; + count -= 2; + } + } + + if (count == 1) { + status = APR_EINCOMPLETE; + } + + dlen = bufout - (unsigned char *)dest; + } + } + + if (!src || !dest) { + if (flags & APR_ENCODE_COLON) { + if (count && (count + 1u) % 3u) { + status = APR_EINCOMPLETE; + } + count -= count / 3u; + } + if (count % 2u) { + status = APR_EINCOMPLETE; + } + dlen = count / 2u; + } + + if (len) { + *len = dlen; + } + return status; +} + +APR_DECLARE(const char *)apr_pdecode_base16(apr_pool_t * p, + const char *str, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base16(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + void *cmd = apr_palloc(p, size); + if (cmd) { + apr_decode_base16(cmd, str, slen, flags, len); + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} + +APR_DECLARE(const unsigned char *)apr_pdecode_base16_binary(apr_pool_t * p, + const char *str, apr_ssize_t slen, int flags, apr_size_t * len) +{ + apr_size_t size; + + if (!str) { + return NULL; + } + + switch (apr_decode_base16_binary(NULL, str, slen, flags, &size)) { + case APR_SUCCESS:{ + unsigned char *cmd = apr_palloc(p, size + 1); + if (cmd) { + apr_decode_base16_binary(cmd, str, slen, flags, len); + cmd[size] = 0; + } + return cmd; + } + default:{ + break; + } + } + + return NULL; +} diff --git a/encoding/apr_escape.c b/encoding/apr_escape.c new file mode 100644 index 0000000..6074d73 --- /dev/null +++ b/encoding/apr_escape.c @@ -0,0 +1,1214 @@ +/* Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed with + * this work for additional information regarding copyright ownership. + * The ASF licenses this file to You under the Apache License, Version 2.0 + * (the "License"); you may not use this file except in compliance with + * the License. You may obtain a copy of the License at + * + * http://www.apache.org/licenses/LICENSE-2.0 + * + * Unless required by applicable law or agreed to in writing, software + * distributed under the License is distributed on an "AS IS" BASIS, + * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + * See the License for the specific language governing permissions and + * limitations under the License. + */ + +/* escape/unescape functions. + * + * These functions perform various escaping operations, and are provided in + * pairs, a function to query the length of and escape existing buffers, as + * well as companion functions to perform the same process to memory + * allocated from a pool. + * + * The API is designed to have the smallest possible RAM footprint, and so + * will only allocate the exact amount of RAM needed for each conversion. + */ + +#include "apr_escape.h" +#include "apr_escape_test_char.h" +#include "apr_encode_private.h" +#include "apr_lib.h" +#include "apr_strings.h" + +/* we assume the folks using this ensure 0 <= c < 256... which means + * you need a cast to (unsigned char) first, you can't just plug a + * char in here and get it to work, because if char is signed then it + * will first be sign extended. + */ +#define TEST_CHAR(c, f) (test_char_table[(unsigned)(c)] & (f)) + +APR_DECLARE(apr_status_t) apr_escape_shell(char *escaped, const char *str, + apr_ssize_t slen, apr_size_t *len) +{ + unsigned char *d; + const unsigned char *s; + apr_size_t size = 1; + int found = 0; + + d = (unsigned char *) escaped; + s = (const unsigned char *) str; + + if (s) { + if (d) { + for (; *s && slen; ++s, slen--) { +#if defined(OS2) || defined(WIN32) + /* + * Newlines to Win32/OS2 CreateProcess() are ill advised. + * Convert them to spaces since they are effectively white + * space to most applications + */ + if (*s == '\r' || *s == '\n') { + if (d) { + *d++ = ' '; + found = 1; + } + continue; + } +#endif + if (TEST_CHAR(*s, T_ESCAPE_SHELL_CMD)) { + *d++ = '\\'; + size++; + found = 1; + } + *d++ = *s; + size++; + } + *d = '\0'; + } + else { + for (; *s && slen; ++s, slen--) { + if (TEST_CHAR(*s, T_ESCAPE_SHELL_CMD)) { + size++; + found = 1; + } + size++; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_shell(apr_pool_t *p, const char *str) +{ + apr_size_t len; + + switch (apr_escape_shell(NULL, str, APR_ESCAPE_STRING, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_escape_shell(cmd, str, APR_ESCAPE_STRING, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +static char x2c(const char *what) +{ + register char digit; + +#if !APR_CHARSET_EBCDIC + digit = + ((what[0] >= 'A') ? ((what[0] & 0xdf) - 'A') + 10 : (what[0] - '0')); + digit *= 16; + digit += (what[1] >= 'A' ? ((what[1] & 0xdf) - 'A') + 10 : (what[1] - '0')); +#else /*APR_CHARSET_EBCDIC*/ + char xstr[5]; + xstr[0]='0'; + xstr[1]='x'; + xstr[2]=what[0]; + xstr[3]=what[1]; + xstr[4]='\0'; + digit = TO_NATIVE(strtol(xstr, NULL, 16)); +#endif /*APR_CHARSET_EBCDIC*/ + return (digit); +} + +APR_DECLARE(apr_status_t) apr_unescape_url(char *escaped, const char *url, + apr_ssize_t slen, const char *forbid, const char *reserved, int plus, + apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const char *s = (const char *) url; + char *d = (char *) escaped; + register int badesc, badpath; + + if (!url) { + return APR_NOTFOUND; + } + + badesc = 0; + badpath = 0; + if (s) { + if (d) { + for (; *s && slen; ++s, d++, slen--) { + if (plus && *s == '+') { + *d = ' '; + found = 1; + } + else if (*s != '%') { + *d = *s; + } + else { + if (!apr_isxdigit(*(s + 1)) || !apr_isxdigit(*(s + 2))) { + badesc = 1; + *d = '%'; + } + else { + char decoded; + decoded = x2c(s + 1); + if ((decoded == '\0') + || (forbid && strchr(forbid, decoded))) { + badpath = 1; + *d = decoded; + s += 2; + slen -= 2; + } + else if (reserved && strchr(reserved, decoded)) { + *d++ = *s++; + *d++ = *s++; + *d = *s; + size += 2; + } + else { + *d = decoded; + s += 2; + slen -= 2; + found = 1; + } + } + } + size++; + } + *d = '\0'; + } + else { + for (; *s && slen; ++s, slen--) { + if (plus && *s == '+') { + found = 1; + } + else if (*s != '%') { + /* character unchanged */ + } + else { + if (!apr_isxdigit(*(s + 1)) || !apr_isxdigit(*(s + 2))) { + badesc = 1; + } + else { + char decoded; + decoded = x2c(s + 1); + if ((decoded == '\0') + || (forbid && strchr(forbid, decoded))) { + badpath = 1; + s += 2; + slen -= 2; + } + else if (reserved && strchr(reserved, decoded)) { + s += 2; + slen -= 2; + size += 2; + } + else { + s += 2; + slen -= 2; + found = 1; + } + } + } + size++; + } + } + } + + if (len) { + *len = size; + } + if (badesc) { + return APR_EINVAL; + } + else if (badpath) { + return APR_BADCH; + } + else if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_punescape_url(apr_pool_t *p, const char *url, + const char *forbid, const char *reserved, int plus) +{ + apr_size_t len; + + switch (apr_unescape_url(NULL, url, APR_ESCAPE_STRING, forbid, reserved, + plus, &len)) { + case APR_SUCCESS: { + char *buf = apr_palloc(p, len); + apr_unescape_url(buf, url, APR_ESCAPE_STRING, forbid, reserved, plus, + NULL); + return buf; + } + case APR_EINVAL: + case APR_BADCH: { + return NULL; + } + case APR_NOTFOUND: { + break; + } + } + + return url; +} + +/* c2x takes an unsigned, and expects the caller has guaranteed that + * 0 <= what < 256... which usually means that you have to cast to + * unsigned char first, because (unsigned)(char)(x) first goes through + * signed extension to an int before the unsigned cast. + * + * The reason for this assumption is to assist gcc code generation -- + * the unsigned char -> unsigned extension is already done earlier in + * both uses of this code, so there's no need to waste time doing it + * again. + */ +static const char c2x_table[] = "0123456789abcdef"; + +static APR_INLINE unsigned char *c2x(unsigned what, unsigned char prefix, + unsigned char *where) +{ +#if APR_CHARSET_EBCDIC + what = convert_e2a[(unsigned char)what]; +#endif /*APR_CHARSET_EBCDIC*/ + *where++ = prefix; + *where++ = c2x_table[what >> 4]; + *where++ = c2x_table[what & 0xf]; + return where; +} + +APR_DECLARE(apr_status_t) apr_escape_path_segment(char *escaped, + const char *str, apr_ssize_t slen, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (s) { + if (d) { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_PATH_SEGMENT)) { + d = c2x(c, '%', d); + size += 2; + found = 1; + } + else { + *d++ = c; + } + ++s; + size++; + slen--; + } + *d = '\0'; + } + else { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_PATH_SEGMENT)) { + size += 2; + found = 1; + } + ++s; + size++; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_path_segment(apr_pool_t *p, + const char *str) +{ + apr_size_t len; + + switch (apr_escape_path_segment(NULL, str, APR_ESCAPE_STRING, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_escape_path_segment(cmd, str, APR_ESCAPE_STRING, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +APR_DECLARE(apr_status_t) apr_escape_path(char *escaped, const char *path, + apr_ssize_t slen, int partial, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) path; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (!path) { + return APR_NOTFOUND; + } + + if (!partial) { + const char *colon = strchr(path, ':'); + const char *slash = strchr(path, '/'); + + if (colon && (!slash || colon < slash)) { + if (d) { + *d++ = '.'; + *d++ = '/'; + } + size += 2; + found = 1; + } + } + if (d) { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_OS_ESCAPE_PATH)) { + d = c2x(c, '%', d); + size += 2; + found = 1; + } + else { + *d++ = c; + } + ++s; + size++; + slen--; + } + *d = '\0'; + } + else { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_OS_ESCAPE_PATH)) { + size += 2; + found = 1; + } + ++s; + size++; + slen--; + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_path(apr_pool_t *p, const char *str, + int partial) +{ + apr_size_t len; + + switch (apr_escape_path(NULL, str, APR_ESCAPE_STRING, partial, &len)) { + case APR_SUCCESS: { + char *path = apr_palloc(p, len); + apr_escape_path(path, str, APR_ESCAPE_STRING, partial, NULL); + return path; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +APR_DECLARE(apr_status_t) apr_escape_urlencoded(char *escaped, const char *str, + apr_ssize_t slen, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (s) { + if (d) { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_URLENCODED)) { + d = c2x(c, '%', d); + size += 2; + found = 1; + } + else if (c == ' ') { + *d++ = '+'; + found = 1; + } + else { + *d++ = c; + } + ++s; + size++; + slen--; + } + *d = '\0'; + } + else { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_URLENCODED)) { + size += 2; + found = 1; + } + else if (c == ' ') { + found = 1; + } + ++s; + size++; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_urlencoded(apr_pool_t *p, const char *str) +{ + apr_size_t len; + + switch (apr_escape_urlencoded(NULL, str, APR_ESCAPE_STRING, &len)) { + case APR_SUCCESS: { + char *encoded = apr_palloc(p, len); + apr_escape_urlencoded(encoded, str, APR_ESCAPE_STRING, NULL); + return encoded; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +APR_DECLARE(apr_status_t) apr_escape_entity(char *escaped, const char *str, + apr_ssize_t slen, int toasc, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (s) { + if (d) { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_XML)) { + switch (c) { + case '>': { + memcpy(d, ">", 4); + size += 4; + d += 4; + break; + } + case '<': { + memcpy(d, "<", 4); + size += 4; + d += 4; + break; + } + case '&': { + memcpy(d, "&", 5); + size += 5; + d += 5; + break; + } + case '\"': { + memcpy(d, """, 6); + size += 6; + d += 6; + break; + } + case '\'': { + memcpy(d, "'", 6); + size += 6; + d += 6; + break; + } + } + found = 1; + } + else if (toasc && !apr_isascii(c)) { + int offset = apr_snprintf((char *) d, 6, "&#%3.3d;", c); + size += offset; + d += offset; + found = 1; + } + else { + *d++ = c; + size++; + } + ++s; + slen--; + } + *d = '\0'; + } + else { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_XML)) { + switch (c) { + case '>': { + size += 4; + break; + } + case '<': { + size += 4; + break; + } + case '&': { + size += 5; + break; + } + case '\"': { + size += 6; + break; + } + case '\'': { + size += 6; + break; + } + } + found = 1; + } + else if (toasc && !apr_isascii(c)) { + char buf[8]; + size += apr_snprintf(buf, 6, "&#%3.3d;", c); + found = 1; + } + else { + size++; + } + ++s; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_entity(apr_pool_t *p, const char *str, + int toasc) +{ + apr_size_t len; + + switch (apr_escape_entity(NULL, str, APR_ESCAPE_STRING, toasc, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_escape_entity(cmd, str, APR_ESCAPE_STRING, toasc, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +/* maximum length of any ISO-LATIN-1 HTML entity name. */ +#define MAXENTLEN (6) + +APR_DECLARE(apr_status_t) apr_unescape_entity(char *unescaped, const char *str, + apr_ssize_t slen, apr_size_t *len) +{ + int found = 0; + apr_size_t size = 1; + int val, i, j; + char *d = unescaped; + const char *s = str; + const char *ents; + static const char * const entlist[MAXENTLEN + 1] = + { + NULL, /* 0 */ + NULL, /* 1 */ + "lt\074gt\076", /* 2 */ + "amp\046ETH\320eth\360", /* 3 */ + "quot\042Auml\304Euml\313Iuml\317Ouml\326Uuml\334auml\344euml" + "\353iuml\357ouml\366uuml\374yuml\377", /* 4 */ + "Acirc\302Aring\305AElig\306Ecirc\312Icirc\316Ocirc\324Ucirc" + "\333THORN\336szlig\337acirc\342aring\345aelig\346ecirc\352" + "icirc\356ocirc\364ucirc\373thorn\376", /* 5 */ + "Agrave\300Aacute\301Atilde\303Ccedil\307Egrave\310Eacute\311" + "Igrave\314Iacute\315Ntilde\321Ograve\322Oacute\323Otilde" + "\325Oslash\330Ugrave\331Uacute\332Yacute\335agrave\340" + "aacute\341atilde\343ccedil\347egrave\350eacute\351igrave" + "\354iacute\355ntilde\361ograve\362oacute\363otilde\365" + "oslash\370ugrave\371uacute\372yacute\375" /* 6 */ + }; + + if (s) { + if (d) { + for (; *s != '\0' && slen; s++, d++, size++, slen--) { + if (*s != '&') { + *d = *s; + continue; + } + /* find end of entity */ + for (i = 1; s[i] != ';' && s[i] != '\0' && (slen - i) != 0; + i++) { + continue; + } + + if (s[i] == '\0' || (slen - i) == 0) { /* treat as normal data */ + *d = *s; + continue; + } + + /* is it numeric ? */ + if (s[1] == '#') { + for (j = 2, val = 0; j < i && apr_isdigit(s[j]); j++) { + val = val * 10 + s[j] - '0'; + } + s += i; + if (j < i || val <= 8 || (val >= 11 && val <= 31) + || (val >= 127 && val <= 160) || val >= 256) { + d--; /* no data to output */ + size--; + } + else { + *d = TO_ASCII(val); + found = 1; + } + } + else { + j = i - 1; + if (j > MAXENTLEN || entlist[j] == NULL) { + /* wrong length */ + *d = '&'; + continue; /* skip it */ + } + for (ents = entlist[j]; *ents != '\0'; ents += i) { + if (strncmp(s + 1, ents, j) == 0) { + break; + } + } + + if (*ents == '\0') { + *d = '&'; /* unknown */ + } + else { + *d = TO_ASCII(ents[j]); + s += i; + slen -= i; + found = 1; + } + } + } + *d = '\0'; + } + else { + for (; *s != '\0' && slen; s++, size++, slen--) { + if (*s != '&') { + continue; + } + /* find end of entity */ + for (i = 1; s[i] != ';' && s[i] != '\0' && (slen - i) != 0; + i++) { + continue; + } + + if (s[i] == '\0' || (slen - i) == 0) { /* treat as normal data */ + continue; + } + + /* is it numeric ? */ + if (s[1] == '#') { + for (j = 2, val = 0; j < i && apr_isdigit(s[j]); j++) { + val = val * 10 + s[j] - '0'; + } + s += i; + if (j < i || val <= 8 || (val >= 11 && val <= 31) + || (val >= 127 && val <= 160) || val >= 256) { + /* no data to output */ + size--; + } + else { + found = 1; + } + } + else { + j = i - 1; + if (j > MAXENTLEN || entlist[j] == NULL) { + /* wrong length */ + continue; /* skip it */ + } + for (ents = entlist[j]; *ents != '\0'; ents += i) { + if (strncmp(s + 1, ents, j) == 0) { + break; + } + } + + if (*ents == '\0') { + /* unknown */ + } + else { + s += i; + slen -= i; + found = 1; + } + } + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_punescape_entity(apr_pool_t *p, const char *str) +{ + apr_size_t len; + + switch (apr_unescape_entity(NULL, str, APR_ESCAPE_STRING, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_unescape_entity(cmd, str, APR_ESCAPE_STRING, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +APR_DECLARE(apr_status_t) apr_escape_echo(char *escaped, const char *str, + apr_ssize_t slen, int quote, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (s) { + if (d) { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_ECHO)) { + *d++ = '\\'; + size++; + switch (c) { + case '\a': + *d++ = 'a'; + size++; + found = 1; + break; + case '\b': + *d++ = 'b'; + size++; + found = 1; + break; + case '\f': + *d++ = 'f'; + size++; + found = 1; + break; + case '\n': + *d++ = 'n'; + size++; + found = 1; + break; + case '\r': + *d++ = 'r'; + size++; + found = 1; + break; + case '\t': + *d++ = 't'; + size++; + found = 1; + break; + case '\v': + *d++ = 'v'; + size++; + found = 1; + break; + case '\\': + *d++ = '\\'; + size++; + found = 1; + break; + case '"': + if (quote) { + *d++ = c; + size++; + found = 1; + } + else { + d[-1] = c; + } + break; + default: + c2x(c, 'x', d); + d += 3; + size += 3; + found = 1; + break; + } + } + else { + *d++ = c; + size++; + } + ++s; + slen--; + } + *d = '\0'; + } + else { + while ((c = *s) && slen) { + if (TEST_CHAR(c, T_ESCAPE_ECHO)) { + size++; + switch (c) { + case '\a': + case '\b': + case '\f': + case '\n': + case '\r': + case '\t': + case '\v': + case '\\': + size++; + found = 1; + break; + case '"': + if (quote) { + size++; + found = 1; + } + break; + default: + size += 3; + found = 1; + break; + } + } + else { + size++; + } + ++s; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_echo(apr_pool_t *p, const char *str, + int quote) +{ + apr_size_t len; + + switch (apr_escape_echo(NULL, str, APR_ESCAPE_STRING, quote, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_escape_echo(cmd, str, APR_ESCAPE_STRING, quote, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return str; +} + +APR_DECLARE(apr_status_t) apr_escape_hex(char *dest, const void *src, + apr_size_t srclen, int colon, apr_size_t *len) +{ + const unsigned char *in = src; + apr_size_t size; + + if (!src) { + return APR_NOTFOUND; + } + + if (dest) { + for (size = 0; size < srclen; size++) { + if (colon && size) { + *dest++ = ':'; + } + *dest++ = c2x_table[in[size] >> 4]; + *dest++ = c2x_table[in[size] & 0xf]; + } + *dest = '\0'; + } + + if (len) { + if (colon && srclen) { + *len = srclen * 3; + } + else { + *len = srclen * 2 + 1; + } + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_hex(apr_pool_t *p, const void *src, + apr_size_t srclen, int colon) +{ + apr_size_t len; + + switch (apr_escape_hex(NULL, src, srclen, colon, &len)) { + case APR_SUCCESS: { + char *cmd = apr_palloc(p, len); + apr_escape_hex(cmd, src, srclen, colon, NULL); + return cmd; + } + case APR_NOTFOUND: { + break; + } + } + + return src; +} + +APR_DECLARE(apr_status_t) apr_unescape_hex(void *dest, const char *str, + apr_ssize_t slen, int colon, apr_size_t *len) +{ + apr_size_t size = 0; + int flip = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) dest; + unsigned c; + unsigned char u = 0; + + if (s) { + if (d) { + while ((c = *s) && slen) { + + if (!flip) { + u = 0; + } + + if (colon && c == ':' && !flip) { + ++s; + slen--; + continue; + } + else if (apr_isdigit(c)) { + u |= c - '0'; + } + else if (apr_isupper(c) && c <= 'F') { + u |= c - ('A' - 10); + } + else if (apr_islower(c) && c <= 'f') { + u |= c - ('a' - 10); + } + else { + return APR_BADCH; + } + + if (flip) { + *d++ = u; + size++; + } + else { + u <<= 4; + *d = u; + } + flip = !flip; + + ++s; + slen--; + } + } + else { + while ((c = *s) && slen) { + + if (colon && c == ':' && !flip) { + ++s; + slen--; + continue; + } + else if (apr_isdigit(c)) { + /* valid */ + } + else if (apr_isupper(c) && c <= 'F') { + /* valid */ + } + else if (apr_islower(c) && c <= 'f') { + /* valid */ + } + else { + return APR_BADCH; + } + + if (flip) { + size++; + } + flip = !flip; + + ++s; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!s) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const void *) apr_punescape_hex(apr_pool_t *p, const char *str, + int colon, apr_size_t *len) +{ + apr_size_t size; + + switch (apr_unescape_hex(NULL, str, APR_ESCAPE_STRING, colon, &size)) { + case APR_SUCCESS: { + void *cmd = apr_palloc(p, size); + apr_unescape_hex(cmd, str, APR_ESCAPE_STRING, colon, len); + return cmd; + } + case APR_BADCH: + case APR_NOTFOUND: { + break; + } + } + + return NULL; +} + +APR_DECLARE(apr_status_t) apr_escape_ldap(char *escaped, const void *str, + apr_ssize_t slen, int flags, apr_size_t *len) +{ + apr_size_t size = 1; + int found = 0; + const unsigned char *s = (const unsigned char *) str; + unsigned char *d = (unsigned char *) escaped; + unsigned c; + + if (s) { + if (d) { + while (((c = *s) && slen) || (slen > 0)) { + if (((flags & APR_ESCAPE_LDAP_DN) && TEST_CHAR(c, T_ESCAPE_LDAP_DN)) + || ((flags & APR_ESCAPE_LDAP_FILTER) && TEST_CHAR(c, T_ESCAPE_LDAP_FILTER))) { + d = c2x(c, '\\', d); + size += 2; + found = 1; + } + else { + *d++ = c; + } + ++s; + size++; + slen--; + } + *d = '\0'; + } + else { + while (((c = *s) && slen) || (slen > 0)) { + if (((flags & APR_ESCAPE_LDAP_DN) && TEST_CHAR(c, T_ESCAPE_LDAP_DN)) + || ((flags & APR_ESCAPE_LDAP_FILTER) && TEST_CHAR(c, T_ESCAPE_LDAP_FILTER))) { + size += 2; + found = 1; + } + ++s; + size++; + slen--; + } + } + } + + if (len) { + *len = size; + } + if (!found) { + return APR_NOTFOUND; + } + + return APR_SUCCESS; +} + +APR_DECLARE(const char *) apr_pescape_ldap(apr_pool_t *p, const void *src, + apr_ssize_t srclen, int flags) +{ + apr_size_t len; + + switch (apr_escape_ldap(NULL, src, srclen, flags, &len)) { + case APR_SUCCESS: { + char *encoded = apr_palloc(p, len); + apr_escape_ldap(encoded, src, srclen, flags, NULL); + return encoded; + } + case APR_NOTFOUND: { + break; + } + } + + return src; +} + |