135 lines
4.1 KiB
C
135 lines
4.1 KiB
C
|
/* 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.
|
||
|
*/
|
||
|
|
||
|
#include "apr.h"
|
||
|
#include "apr_errno.h"
|
||
|
#include "apr_general.h"
|
||
|
#include "apr_strings.h"
|
||
|
#include "apr_xlate.h"
|
||
|
#include "abts.h"
|
||
|
#include "testutil.h"
|
||
|
|
||
|
#if APR_HAS_XLATE
|
||
|
|
||
|
static const char test_utf8[] = "Edelwei\xc3\x9f";
|
||
|
static const char test_utf7[] = "Edelwei+AN8-";
|
||
|
static const char test_latin1[] = "Edelwei\xdf";
|
||
|
static const char test_latin2[] = "Edelwei\xdf";
|
||
|
|
||
|
static void test_conversion(abts_case *tc, apr_xlate_t *convset,
|
||
|
const char *inbuf, const char *expected)
|
||
|
{
|
||
|
static char buf[1024];
|
||
|
apr_size_t inbytes_left = strlen(inbuf);
|
||
|
apr_size_t outbytes_left = sizeof(buf) - 1;
|
||
|
apr_status_t rv;
|
||
|
|
||
|
rv = apr_xlate_conv_buffer(convset, inbuf, &inbytes_left, buf, &outbytes_left);
|
||
|
ABTS_INT_EQUAL(tc, APR_SUCCESS, rv);
|
||
|
|
||
|
if (rv != APR_SUCCESS)
|
||
|
return;
|
||
|
|
||
|
rv = apr_xlate_conv_buffer(convset, NULL, NULL, buf + sizeof(buf) -
|
||
|
outbytes_left - 1, &outbytes_left);
|
||
|
ABTS_INT_EQUAL(tc, APR_SUCCESS, rv);
|
||
|
|
||
|
buf[sizeof(buf) - outbytes_left - 1] = '\0';
|
||
|
|
||
|
ABTS_STR_EQUAL(tc, expected, buf);
|
||
|
}
|
||
|
|
||
|
static void one_test(abts_case *tc, const char *cs1, const char *cs2,
|
||
|
const char *str1, const char *str2,
|
||
|
apr_pool_t *pool)
|
||
|
{
|
||
|
apr_status_t rv;
|
||
|
apr_xlate_t *convset;
|
||
|
|
||
|
rv = apr_xlate_open(&convset, cs2, cs1, pool);
|
||
|
ABTS_INT_EQUAL(tc, APR_SUCCESS, rv);
|
||
|
|
||
|
if (rv != APR_SUCCESS)
|
||
|
return;
|
||
|
|
||
|
test_conversion(tc, convset, str1, str2);
|
||
|
|
||
|
rv = apr_xlate_close(convset);
|
||
|
ABTS_INT_EQUAL(tc, APR_SUCCESS, rv);
|
||
|
}
|
||
|
|
||
|
#if APU_HAVE_APR_ICONV
|
||
|
/* it is a bug if iconv_open() fails */
|
||
|
static int is_transform_supported(abts_case *tc, const char *cs1,
|
||
|
const char *cs2, apr_pool_t *pool) {
|
||
|
return 1;
|
||
|
}
|
||
|
#else
|
||
|
/* some iconv implementations don't support all tested transforms;
|
||
|
* example: 8859-1 <-> 8859-2 using native Solaris iconv
|
||
|
*/
|
||
|
static int is_transform_supported(abts_case *tc, const char *cs1,
|
||
|
const char *cs2, apr_pool_t *pool) {
|
||
|
apr_status_t rv;
|
||
|
apr_xlate_t *convset;
|
||
|
|
||
|
rv = apr_xlate_open(&convset, cs2, cs1, pool);
|
||
|
if (rv != APR_SUCCESS) {
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
rv = apr_xlate_close(convset);
|
||
|
ABTS_INT_EQUAL(tc, APR_SUCCESS, rv);
|
||
|
|
||
|
return 1;
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
static void test_transformation(abts_case *tc, void *data)
|
||
|
{
|
||
|
/* 1. Identity transformation: UTF-8 -> UTF-8 */
|
||
|
one_test(tc, "UTF-8", "UTF-8", test_utf8, test_utf8, p);
|
||
|
|
||
|
/* 2. UTF-8 <-> ISO-8859-1 */
|
||
|
one_test(tc, "UTF-8", "ISO-8859-1", test_utf8, test_latin1, p);
|
||
|
one_test(tc, "ISO-8859-1", "UTF-8", test_latin1, test_utf8, p);
|
||
|
|
||
|
/* 3. ISO-8859-1 <-> ISO-8859-2, identity */
|
||
|
if (is_transform_supported(tc, "ISO-8859-1", "ISO-8859-2", p)) {
|
||
|
one_test(tc, "ISO-8859-1", "ISO-8859-2", test_latin1, test_latin2, p);
|
||
|
}
|
||
|
if (is_transform_supported(tc, "ISO-8859-2", "ISO-8859-1", p)) {
|
||
|
one_test(tc, "ISO-8859-2", "ISO-8859-1", test_latin2, test_latin1, p);
|
||
|
}
|
||
|
|
||
|
/* 4. Transformation using charset aliases */
|
||
|
one_test(tc, "UTF-8", "UTF-7", test_utf8, test_utf7, p);
|
||
|
one_test(tc, "UTF-7", "UTF-8", test_utf7, test_utf8, p);
|
||
|
}
|
||
|
|
||
|
#endif /* APR_HAS_XLATE */
|
||
|
|
||
|
abts_suite *testxlate(abts_suite *suite)
|
||
|
{
|
||
|
suite = ADD_SUITE(suite);
|
||
|
|
||
|
#if APR_HAS_XLATE
|
||
|
abts_run_test(suite, test_transformation, NULL);
|
||
|
#endif
|
||
|
|
||
|
return suite;
|
||
|
}
|