summaryrefslogtreecommitdiffstats
path: root/encoding
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-17 06:23:09 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-17 06:23:09 +0000
commit30d479c28c831a0d4f1fdb54a9e346b0fc176be1 (patch)
treeaa35d7414ce9f1326abf6f723f6dfa5b0aa08b1d /encoding
parentInitial commit. (diff)
downloadapr-30d479c28c831a0d4f1fdb54a9e346b0fc176be1.tar.xz
apr-30d479c28c831a0d4f1fdb54a9e346b0fc176be1.zip
Adding upstream version 1.7.2.upstream/1.7.2upstream
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'encoding')
-rw-r--r--encoding/apr_encode.c1577
-rw-r--r--encoding/apr_escape.c1214
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, "&gt;", 4);
+ size += 4;
+ d += 4;
+ break;
+ }
+ case '<': {
+ memcpy(d, "&lt;", 4);
+ size += 4;
+ d += 4;
+ break;
+ }
+ case '&': {
+ memcpy(d, "&amp;", 5);
+ size += 5;
+ d += 5;
+ break;
+ }
+ case '\"': {
+ memcpy(d, "&quot;", 6);
+ size += 6;
+ d += 6;
+ break;
+ }
+ case '\'': {
+ memcpy(d, "&apos;", 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;
+}
+