mirror of git://git.sysmocom.de/ofono
1022 lines
22 KiB
C
1022 lines
22 KiB
C
/*
|
|
*
|
|
* oFono - Open Source Telephony
|
|
*
|
|
* Copyright (C) 2008-2011 Intel Corporation. All rights reserved.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License version 2 as
|
|
* published by the Free Software Foundation.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include <config.h>
|
|
#endif
|
|
|
|
#include <string.h>
|
|
#include <strings.h>
|
|
#include <stdio.h>
|
|
#include <assert.h>
|
|
#include <glib.h>
|
|
#include <ell/ell.h>
|
|
|
|
#include "util.h"
|
|
|
|
static const bool VERBOSE = false;
|
|
|
|
const unsigned char invalid_gsm_extended[] = {
|
|
0x1b, 0x15
|
|
};
|
|
|
|
const unsigned char invalid_gsm_extended_len[] = {
|
|
0x1b, 0x28, 0x1b
|
|
};
|
|
|
|
const unsigned char invalid_ucs2[] = {
|
|
0x03, 0x93, 0x00, 0x00
|
|
};
|
|
|
|
unsigned short gsm_to_unicode_map[] =
|
|
{
|
|
0x00, 0x0040,
|
|
0x01, 0x00A3,
|
|
0x02, 0x0024,
|
|
0x03, 0x00A5,
|
|
0x04, 0x00E8,
|
|
0x05, 0x00E9,
|
|
0x06, 0x00F9,
|
|
0x07, 0x00EC,
|
|
0x08, 0x00F2,
|
|
0x09, 0x00C7,
|
|
0x0A, 0x000A,
|
|
0x0B, 0x00D8,
|
|
0x0C, 0x00F8,
|
|
0x0D, 0x000D,
|
|
0x0E, 0x00C5,
|
|
0x0F, 0x00E5,
|
|
0x10, 0x0394,
|
|
0x11, 0x005F,
|
|
0x12, 0x03A6,
|
|
0x13, 0x0393,
|
|
0x14, 0x039B,
|
|
0x15, 0x03A9,
|
|
0x16, 0x03A0,
|
|
0x17, 0x03A8,
|
|
0x18, 0x03A3,
|
|
0x19, 0x0398,
|
|
0x1A, 0x039E,
|
|
/*0x1B, 0x00A0,*/
|
|
0x1B0A, 0x000C,
|
|
0x1B14, 0x005E,
|
|
0x1B28, 0x007B,
|
|
0x1B29, 0x007D,
|
|
0x1B2F, 0x005C,
|
|
0x1B3C, 0x005B,
|
|
0x1B3D, 0x007E,
|
|
0x1B3E, 0x005D,
|
|
0x1B40, 0x007C,
|
|
0x1B65, 0x20AC,
|
|
0x1C, 0x00C6,
|
|
0x1D, 0x00E6,
|
|
0x1E, 0x00DF,
|
|
0x1F, 0x00C9,
|
|
0x20, 0x0020,
|
|
0x21, 0x0021,
|
|
0x22, 0x0022,
|
|
0x23, 0x0023,
|
|
0x24, 0x00A4,
|
|
0x25, 0x0025,
|
|
0x26, 0x0026,
|
|
0x27, 0x0027,
|
|
0x28, 0x0028,
|
|
0x29, 0x0029,
|
|
0x2A, 0x002A,
|
|
0x2B, 0x002B,
|
|
0x2C, 0x002C,
|
|
0x2D, 0x002D,
|
|
0x2E, 0x002E,
|
|
0x2F, 0x002F,
|
|
0x30, 0x0030,
|
|
0x31, 0x0031,
|
|
0x32, 0x0032,
|
|
0x33, 0x0033,
|
|
0x34, 0x0034,
|
|
0x35, 0x0035,
|
|
0x36, 0x0036,
|
|
0x37, 0x0037,
|
|
0x38, 0x0038,
|
|
0x39, 0x0039,
|
|
0x3A, 0x003A,
|
|
0x3B, 0x003B,
|
|
0x3C, 0x003C,
|
|
0x3D, 0x003D,
|
|
0x3E, 0x003E,
|
|
0x3F, 0x003F,
|
|
0x40, 0x00A1,
|
|
0x41, 0x0041,
|
|
0x42, 0x0042,
|
|
0x43, 0x0043,
|
|
0x44, 0x0044,
|
|
0x45, 0x0045,
|
|
0x46, 0x0046,
|
|
0x47, 0x0047,
|
|
0x48, 0x0048,
|
|
0x49, 0x0049,
|
|
0x4A, 0x004A,
|
|
0x4B, 0x004B,
|
|
0x4C, 0x004C,
|
|
0x4D, 0x004D,
|
|
0x4E, 0x004E,
|
|
0x4F, 0x004F,
|
|
0x50, 0x0050,
|
|
0x51, 0x0051,
|
|
0x52, 0x0052,
|
|
0x53, 0x0053,
|
|
0x54, 0x0054,
|
|
0x55, 0x0055,
|
|
0x56, 0x0056,
|
|
0x57, 0x0057,
|
|
0x58, 0x0058,
|
|
0x59, 0x0059,
|
|
0x5A, 0x005A,
|
|
0x5B, 0x00C4,
|
|
0x5C, 0x00D6,
|
|
0x5D, 0x00D1,
|
|
0x5E, 0x00DC,
|
|
0x5F, 0x00A7,
|
|
0x60, 0x00BF,
|
|
0x61, 0x0061,
|
|
0x62, 0x0062,
|
|
0x63, 0x0063,
|
|
0x64, 0x0064,
|
|
0x65, 0x0065,
|
|
0x66, 0x0066,
|
|
0x67, 0x0067,
|
|
0x68, 0x0068,
|
|
0x69, 0x0069,
|
|
0x6A, 0x006A,
|
|
0x6B, 0x006B,
|
|
0x6C, 0x006C,
|
|
0x6D, 0x006D,
|
|
0x6E, 0x006E,
|
|
0x6F, 0x006F,
|
|
0x70, 0x0070,
|
|
0x71, 0x0071,
|
|
0x72, 0x0072,
|
|
0x73, 0x0073,
|
|
0x74, 0x0074,
|
|
0x75, 0x0075,
|
|
0x76, 0x0076,
|
|
0x77, 0x0077,
|
|
0x78, 0x0078,
|
|
0x79, 0x0079,
|
|
0x7A, 0x007A,
|
|
0x7B, 0x00E4,
|
|
0x7C, 0x00F6,
|
|
0x7D, 0x00F1,
|
|
0x7E, 0x00FC,
|
|
0x7F, 0x00E0,
|
|
};
|
|
|
|
unsigned short gsm_turkish_to_unicode_map[] =
|
|
{
|
|
0x00, 0x0040,
|
|
0x01, 0x00A3,
|
|
0x02, 0x0024,
|
|
0x03, 0x00A5,
|
|
0x04, 0x20AC,
|
|
0x05, 0x00E9,
|
|
0x06, 0x00F9,
|
|
0x07, 0x0131,
|
|
0x08, 0x00F2,
|
|
0x09, 0x00C7,
|
|
0x0A, 0x000A,
|
|
0x0B, 0x011E,
|
|
0x0C, 0x011F,
|
|
0x0D, 0x000D,
|
|
0x0E, 0x00C5,
|
|
0x0F, 0x00E5,
|
|
0x10, 0x0394,
|
|
0x11, 0x005F,
|
|
0x12, 0x03A6,
|
|
0x13, 0x0393,
|
|
0x14, 0x039B,
|
|
0x15, 0x03A9,
|
|
0x16, 0x03A0,
|
|
0x17, 0x03A8,
|
|
0x18, 0x03A3,
|
|
0x19, 0x0398,
|
|
0x1A, 0x039E,
|
|
/* We're not including some of the single shift codes to this map,
|
|
* because the turkish variant isn't symmetric, i.e., the same
|
|
* character is present in both the locking shift table as well as the
|
|
* single shift table */
|
|
0x1B0A, 0x000C,
|
|
0x1B14, 0x005E,
|
|
0x1B28, 0x007B,
|
|
0x1B29, 0x007D,
|
|
0x1B2F, 0x005C,
|
|
0x1B3C, 0x005B,
|
|
0x1B3D, 0x007E,
|
|
0x1B3E, 0x005D,
|
|
0x1B40, 0x007C,
|
|
/*0x1B47, 0x011E,*/
|
|
/*0x1B49, 0x0130,*/
|
|
/*0x1B53, 0x015E,*/
|
|
/*0x1B63, 0x00E7,*/
|
|
/*0x1B65, 0x20AC,*/
|
|
/*0x1B67, 0x011F,*/
|
|
/*0x1B69, 0x0131,*/
|
|
/*0x1B73, 0x015F,*/
|
|
0x1C, 0x015E,
|
|
0x1D, 0x015F,
|
|
0x1E, 0x00DF,
|
|
0x1F, 0x00C9,
|
|
0x20, 0x0020,
|
|
0x21, 0x0021,
|
|
0x22, 0x0022,
|
|
0x23, 0x0023,
|
|
0x24, 0x00A4,
|
|
0x25, 0x0025,
|
|
0x26, 0x0026,
|
|
0x27, 0x0027,
|
|
0x28, 0x0028,
|
|
0x29, 0x0029,
|
|
0x2A, 0x002A,
|
|
0x2B, 0x002B,
|
|
0x2C, 0x002C,
|
|
0x2D, 0x002D,
|
|
0x2E, 0x002E,
|
|
0x2F, 0x002F,
|
|
0x30, 0x0030,
|
|
0x31, 0x0031,
|
|
0x32, 0x0032,
|
|
0x33, 0x0033,
|
|
0x34, 0x0034,
|
|
0x35, 0x0035,
|
|
0x36, 0x0036,
|
|
0x37, 0x0037,
|
|
0x38, 0x0038,
|
|
0x39, 0x0039,
|
|
0x40, 0x0130,
|
|
0x3A, 0x003A,
|
|
0x3B, 0x003B,
|
|
0x3C, 0x003C,
|
|
0x3D, 0x003D,
|
|
0x3E, 0x003E,
|
|
0x3F, 0x003F,
|
|
0x40, 0x0130,
|
|
0x41, 0x0041,
|
|
0x42, 0x0042,
|
|
0x43, 0x0043,
|
|
0x44, 0x0044,
|
|
0x45, 0x0045,
|
|
0x46, 0x0046,
|
|
0x47, 0x0047,
|
|
0x48, 0x0048,
|
|
0x49, 0x0049,
|
|
0x4A, 0x004A,
|
|
0x4B, 0x004B,
|
|
0x4C, 0x004C,
|
|
0x4D, 0x004D,
|
|
0x4E, 0x004E,
|
|
0x4F, 0x004F,
|
|
0x50, 0x0050,
|
|
0x51, 0x0051,
|
|
0x52, 0x0052,
|
|
0x53, 0x0053,
|
|
0x54, 0x0054,
|
|
0x55, 0x0055,
|
|
0x56, 0x0056,
|
|
0x57, 0x0057,
|
|
0x58, 0x0058,
|
|
0x59, 0x0059,
|
|
0x5A, 0x005A,
|
|
0x5B, 0x00C4,
|
|
0x5C, 0x00D6,
|
|
0x5D, 0x00D1,
|
|
0x5E, 0x00DC,
|
|
0x5F, 0x00A7,
|
|
0x60, 0x00E7,
|
|
0x61, 0x0061,
|
|
0x62, 0x0062,
|
|
0x63, 0x0063,
|
|
0x64, 0x0064,
|
|
0x65, 0x0065,
|
|
0x66, 0x0066,
|
|
0x67, 0x0067,
|
|
0x68, 0x0068,
|
|
0x69, 0x0069,
|
|
0x6A, 0x006A,
|
|
0x6B, 0x006B,
|
|
0x6C, 0x006C,
|
|
0x6D, 0x006D,
|
|
0x6E, 0x006E,
|
|
0x6F, 0x006F,
|
|
0x70, 0x0070,
|
|
0x71, 0x0071,
|
|
0x72, 0x0072,
|
|
0x73, 0x0073,
|
|
0x74, 0x0074,
|
|
0x75, 0x0075,
|
|
0x76, 0x0076,
|
|
0x77, 0x0077,
|
|
0x78, 0x0078,
|
|
0x79, 0x0079,
|
|
0x7A, 0x007A,
|
|
0x7B, 0x00E4,
|
|
0x7C, 0x00F6,
|
|
0x7D, 0x00F1,
|
|
0x7E, 0x00FC,
|
|
0x7F, 0x00E0
|
|
};
|
|
|
|
#define UTF8_LENGTH(c) \
|
|
((c) < 0x80 ? 1 : \
|
|
((c) < 0x800 ? 2 : 3))
|
|
|
|
static void test_invalid(void)
|
|
{
|
|
long nwritten;
|
|
long nread;
|
|
short unsigned int exp_code;
|
|
long exp_res_length;
|
|
char *res, *exp_res = NULL;
|
|
unsigned char *gsm;
|
|
|
|
res = convert_gsm_to_utf8(invalid_gsm_extended, 0, &nread, &nwritten,
|
|
0);
|
|
g_assert(res);
|
|
g_assert(nread == 0);
|
|
g_assert(nwritten == 0);
|
|
g_assert(res[0] == '\0');
|
|
l_free(res);
|
|
|
|
/*
|
|
* In case of invalid GSM extended code, we should display
|
|
* the character of the main default alphabet table.
|
|
*/
|
|
res = convert_gsm_to_utf8(invalid_gsm_extended,
|
|
sizeof(invalid_gsm_extended),
|
|
&nread, &nwritten, 0);
|
|
|
|
exp_code = gsm_to_unicode_map[invalid_gsm_extended[1]*2 + 1];
|
|
|
|
exp_res_length = UTF8_LENGTH(exp_code);
|
|
exp_res = l_new(char, exp_res_length + 1);
|
|
l_utf8_from_wchar(exp_code, exp_res);
|
|
|
|
g_assert(!strcmp(res, exp_res));
|
|
g_assert(nread == exp_res_length);
|
|
l_free(exp_res);
|
|
l_free(res);
|
|
|
|
res = convert_gsm_to_utf8(invalid_gsm_extended_len,
|
|
sizeof(invalid_gsm_extended_len),
|
|
&nread, &nwritten, 0);
|
|
g_assert(res == NULL);
|
|
g_assert(nread == 3);
|
|
|
|
gsm = convert_ucs2_to_gsm(invalid_ucs2,
|
|
sizeof(invalid_ucs2),
|
|
&nread, &nwritten, 0);
|
|
g_assert(gsm == NULL);
|
|
g_assert(nread == 2);
|
|
|
|
nread = 0;
|
|
gsm = convert_ucs2_to_gsm(invalid_ucs2,
|
|
sizeof(invalid_ucs2) - 1,
|
|
&nread, &nwritten, 0);
|
|
g_assert(gsm == NULL);
|
|
g_assert(nread == 0);
|
|
}
|
|
|
|
static void test_valid(void)
|
|
{
|
|
long nwritten;
|
|
long nread;
|
|
char *res;
|
|
int i;
|
|
long size;
|
|
wchar_t verify;
|
|
unsigned char *back;
|
|
|
|
unsigned char buf[2];
|
|
|
|
static int map_size =
|
|
sizeof(gsm_to_unicode_map) / sizeof(unsigned short) / 2;
|
|
|
|
for (i = 0; i < map_size; i++) {
|
|
unsigned short c = gsm_to_unicode_map[i*2];
|
|
|
|
if (c & 0x1b00) {
|
|
buf[0] = 0x1b;
|
|
buf[1] = c & 0x7f;
|
|
size = 2;
|
|
} else {
|
|
size = 1;
|
|
buf[0] = c & 0x7f;
|
|
}
|
|
|
|
res = convert_gsm_to_utf8(buf, size, &nread, &nwritten, 0);
|
|
g_assert(res);
|
|
|
|
if (VERBOSE)
|
|
printf("size: %ld, nread:%ld, nwritten:%ld, %s\n",
|
|
size, nread, nwritten, res);
|
|
|
|
g_assert(nread == size);
|
|
|
|
g_assert(l_utf8_get_codepoint(res, nwritten, &verify) > 0);
|
|
g_assert(verify == gsm_to_unicode_map[i*2+1]);
|
|
g_assert(nwritten == UTF8_LENGTH(verify));
|
|
|
|
back = convert_utf8_to_gsm(res, -1, &nread, &nwritten, 0);
|
|
g_assert(back);
|
|
g_assert(nwritten == size);
|
|
|
|
if (c & 0x1b00) {
|
|
g_assert(back[0] == 0x1b);
|
|
g_assert(back[1] == (c & 0x7f));
|
|
} else {
|
|
g_assert(back[0] == (c & 0x7f));
|
|
}
|
|
|
|
l_free(back);
|
|
l_free(res);
|
|
}
|
|
}
|
|
|
|
static void test_valid_turkish(void)
|
|
{
|
|
long nwritten;
|
|
long nread;
|
|
char *res;
|
|
int i;
|
|
long size;
|
|
wchar_t verify;
|
|
unsigned char *back;
|
|
|
|
unsigned char buf[2];
|
|
|
|
static int map_size =
|
|
sizeof(gsm_turkish_to_unicode_map) / sizeof(unsigned short) / 2;
|
|
|
|
for (i = 0; i < map_size; i++) {
|
|
unsigned short c = gsm_turkish_to_unicode_map[i*2];
|
|
|
|
if (c & 0x1b00) {
|
|
buf[0] = 0x1b;
|
|
buf[1] = c & 0x7f;
|
|
size = 2;
|
|
} else {
|
|
size = 1;
|
|
buf[0] = c & 0x7f;
|
|
}
|
|
|
|
res = convert_gsm_to_utf8_with_lang(buf, size, &nread,
|
|
&nwritten, 0, 1, 1);
|
|
g_assert(res);
|
|
|
|
if (VERBOSE)
|
|
printf("size: %ld, nread:%ld, nwritten:%ld, %s\n",
|
|
size, nread, nwritten, res);
|
|
|
|
g_assert(nread == size);
|
|
|
|
g_assert(l_utf8_get_codepoint(res, nwritten, &verify) > 0);
|
|
g_assert(verify == gsm_turkish_to_unicode_map[i*2+1]);
|
|
g_assert(nwritten == UTF8_LENGTH(verify));
|
|
|
|
back = convert_utf8_to_gsm_with_lang(res, -1, &nread,
|
|
&nwritten, 0, 1, 1);
|
|
g_assert(back);
|
|
g_assert(nwritten == size);
|
|
|
|
if (c & 0x1b00) {
|
|
g_assert(back[0] == 0x1b);
|
|
g_assert(back[1] == (c & 0x7f));
|
|
} else {
|
|
g_assert(back[0] == (c & 0x7f));
|
|
}
|
|
|
|
l_free(back);
|
|
l_free(res);
|
|
}
|
|
}
|
|
|
|
static const char hex_packed_sms[] = "493A283D0795C3F33C88FE06C9CB6132885EC6D34"
|
|
"1EDF27C1E3E97E7207B3A0C0A5241E377BB1D"
|
|
"7693E72E";
|
|
static const char expected[] = "It is easy to read text messages via AT "
|
|
"commands.";
|
|
static int reported_text_size = 49;
|
|
|
|
static void test_decode_encode(void)
|
|
{
|
|
const char *sms = hex_packed_sms;
|
|
unsigned char *decoded, *packed;
|
|
char *utf8, *hex_packed;
|
|
unsigned char *gsm, *gsm_encoded;
|
|
size_t hex_decoded_size;
|
|
long unpacked_size, packed_size;
|
|
long gsm_encoded_size;
|
|
|
|
if (VERBOSE)
|
|
printf("Size of the orig string: %u\n",
|
|
(unsigned int)strlen(sms));
|
|
|
|
decoded = l_util_from_hexstring(sms, &hex_decoded_size);
|
|
g_assert(decoded != NULL);
|
|
|
|
if (VERBOSE)
|
|
printf("Decode to %zu bytes\n", hex_decoded_size);
|
|
|
|
if (VERBOSE) {
|
|
size_t i;
|
|
|
|
printf("%s\n", sms);
|
|
|
|
for (i = 0; i < hex_decoded_size; i++)
|
|
printf("%02X", decoded[i]);
|
|
printf("\n");
|
|
}
|
|
|
|
gsm = unpack_7bit(decoded, hex_decoded_size, 0, false,
|
|
reported_text_size, &unpacked_size, 0xff);
|
|
|
|
g_assert(gsm != NULL);
|
|
|
|
if (VERBOSE)
|
|
printf("String unpacked to %ld bytes\n", unpacked_size);
|
|
|
|
utf8 = convert_gsm_to_utf8(gsm, -1, NULL, NULL, 0xff);
|
|
g_assert(utf8);
|
|
|
|
if (VERBOSE)
|
|
printf("String is: -->%s<--\n", utf8);
|
|
|
|
g_assert(strcmp(utf8, expected) == 0);
|
|
|
|
gsm_encoded = convert_utf8_to_gsm(utf8, -1, NULL,
|
|
&gsm_encoded_size, 0xff);
|
|
|
|
g_assert(gsm_encoded != NULL);
|
|
|
|
if (VERBOSE)
|
|
printf("Converted back to GSM string of %ld bytes\n",
|
|
gsm_encoded_size);
|
|
|
|
g_assert(gsm_encoded[gsm_encoded_size] == 0xff);
|
|
g_assert(gsm_encoded_size == unpacked_size);
|
|
g_assert(memcmp(gsm_encoded, gsm, gsm_encoded_size) == 0);
|
|
|
|
l_free(utf8);
|
|
l_free(gsm);
|
|
|
|
packed = pack_7bit(gsm_encoded, -1, 0, false, &packed_size, 0xff);
|
|
|
|
l_free(gsm_encoded);
|
|
|
|
g_assert(packed != NULL);
|
|
|
|
if (VERBOSE)
|
|
printf("Packed GSM to size of %ld bytes\n", packed_size);
|
|
|
|
if (VERBOSE) {
|
|
long i;
|
|
|
|
for (i = 0; i < packed_size; i++)
|
|
printf("%02X", packed[i]);
|
|
printf("\n");
|
|
}
|
|
|
|
g_assert((size_t) packed_size == hex_decoded_size);
|
|
g_assert(memcmp(packed, decoded, packed_size) == 0);
|
|
g_free(decoded);
|
|
|
|
hex_packed = l_util_hexstring(packed, packed_size);
|
|
g_assert(hex_packed != NULL);
|
|
l_free(packed);
|
|
|
|
if (VERBOSE)
|
|
printf("Hex encoded packed to size %ld bytes\n",
|
|
(long)strlen(hex_packed));
|
|
|
|
g_assert(strlen(hex_packed) == strlen(sms));
|
|
g_assert(strcasecmp(hex_packed, sms) == 0);
|
|
|
|
l_free(hex_packed);
|
|
}
|
|
|
|
static void test_pack_size(void)
|
|
{
|
|
unsigned char c1[] = { 'a' };
|
|
unsigned char c2[] = { 'a', 'b' };
|
|
unsigned char c3[] = { 'a', 'b', 'c' };
|
|
unsigned char c4[] = { 'a', 'b', 'c', 'd' };
|
|
unsigned char c5[] = { 'a', 'b', 'c', 'd', 'e' };
|
|
unsigned char c6[] = { 'a', 'b', 'c', 'd', 'e', 'f' };
|
|
unsigned char c7[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g' };
|
|
unsigned char c8[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h' };
|
|
|
|
unsigned char *packed;
|
|
long size;
|
|
|
|
packed = pack_7bit(c1, 1, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 1);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c2, 2, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 2);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c3, 3, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 3);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c4, 4, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 4);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c5, 5, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 5);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c6, 6, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 6);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c7, 7, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 7);
|
|
g_assert((packed[6] & 0xfe) == 0);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c7, 7, 0, true, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 7);
|
|
g_assert(((packed[6] & 0xfe) >> 1) == '\r');
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c8, 8, 0, false, &size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(size == 7);
|
|
l_free(packed);
|
|
}
|
|
|
|
static void test_cr_handling(void)
|
|
{
|
|
unsigned char c7[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g' };
|
|
unsigned char c7_expected[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g',
|
|
'\r' };
|
|
unsigned char c8[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g', '\r' };
|
|
unsigned char c8_expected[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g',
|
|
'\r', '\r' };
|
|
|
|
unsigned char *packed;
|
|
unsigned char *unpacked;
|
|
long packed_size;
|
|
long unpacked_size;
|
|
|
|
packed = pack_7bit(c8, 8, 0, true, &packed_size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 8);
|
|
g_assert(((packed[6] & 0xfe) >> 1) == '\r');
|
|
g_assert((packed[7] & 0x7f) == '\r');
|
|
|
|
unpacked = unpack_7bit(packed, 8, 0, true, -1, &unpacked_size, 0);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 9);
|
|
g_assert(memcmp(c8_expected, unpacked, 9) == 0);
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c7, 7, 0, true, &packed_size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 7);
|
|
g_assert(((packed[6] & 0xfe) >> 1) == '\r');
|
|
|
|
unpacked = unpack_7bit(packed, 7, 0, true, -1, &unpacked_size, 0);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 7);
|
|
g_assert(memcmp(c7, unpacked, 7) == 0);
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
|
|
/* As above, but now unpack using SMS style, we should now have cr at
|
|
* the end of the stream
|
|
*/
|
|
packed = pack_7bit(c7, 7, 0, true, &packed_size, 0);
|
|
unpacked = unpack_7bit(packed, 7, 0, false, 8, &unpacked_size, 0);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 8);
|
|
g_assert(memcmp(c7_expected, unpacked, 8) == 0);
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
}
|
|
|
|
static void test_sms_handling(void)
|
|
{
|
|
unsigned char c7[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g' };
|
|
|
|
unsigned char *packed;
|
|
unsigned char *unpacked;
|
|
long packed_size;
|
|
long unpacked_size;
|
|
|
|
packed = pack_7bit(c7, 7, 0, FALSE, &packed_size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 7);
|
|
|
|
unpacked = unpack_7bit(packed, 7, 0, FALSE, 8, &unpacked_size, 0xff);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 8);
|
|
g_assert(unpacked[7] == 0);
|
|
g_assert(unpacked[8] == 0xff);
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
|
|
packed = pack_7bit(c7, 7, 0, FALSE, &packed_size, 0);
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 7);
|
|
|
|
unpacked = unpack_7bit(packed, 7, 0, FALSE, 7, &unpacked_size, 0xff);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 7);
|
|
g_assert(unpacked[7] == 0xff);
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
}
|
|
|
|
static void test_offset_handling(void)
|
|
{
|
|
unsigned char c7[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g' };
|
|
unsigned char c8[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h' };
|
|
unsigned char c9[] = { 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i' };
|
|
unsigned char *packed;
|
|
unsigned char *unpacked;
|
|
long packed_size;
|
|
long unpacked_size;
|
|
|
|
/* Pack at offset = 2 bytes, e.g. starting with 21st bit */
|
|
packed = pack_7bit(c7, 6, 2, FALSE, &packed_size, 0);
|
|
|
|
if (VERBOSE)
|
|
printf("Packed to size: %ld\n", packed_size);
|
|
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 6);
|
|
|
|
unpacked = unpack_7bit(packed, 6, 2, FALSE, 6, &unpacked_size, 0xff);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 6);
|
|
g_assert(unpacked[6] == 0xff);
|
|
g_assert(unpacked[0] == 'a');
|
|
g_assert(unpacked[5] == 'f');
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
|
|
/* Pack at offset = 6 bytes, we should be able to fit one character
|
|
* into the first byte, and the other 7 characters into the following
|
|
* 7 bytes. The 7 MSB bits of the last byte should be 0 since
|
|
* we're not using CBS packing
|
|
*/
|
|
packed = pack_7bit(c8, 8, 6, FALSE, &packed_size, 0);
|
|
|
|
if (VERBOSE)
|
|
printf("Packed to size: %ld\n", packed_size);
|
|
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 8);
|
|
|
|
unpacked = unpack_7bit(packed, 8, 6, FALSE, 8, &unpacked_size, 0xff);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 8);
|
|
g_assert(unpacked[8] == 0xff);
|
|
g_assert(unpacked[0] == 'a');
|
|
g_assert(unpacked[7] == 'h');
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
|
|
/* Same as above, but instead pack in 9 characters */
|
|
packed = pack_7bit(c9, 9, 6, FALSE, &packed_size, 0);
|
|
|
|
if (VERBOSE)
|
|
printf("Packed to size: %ld\n", packed_size);
|
|
|
|
g_assert(packed != NULL);
|
|
g_assert(packed_size == 8);
|
|
|
|
unpacked = unpack_7bit(packed, 8, 6, FALSE, 9, &unpacked_size, 0xff);
|
|
if (VERBOSE)
|
|
printf("Unpacked to size: %ld\n", unpacked_size);
|
|
|
|
g_assert(unpacked != NULL);
|
|
g_assert(unpacked_size == 9);
|
|
g_assert(unpacked[9] == 0xff);
|
|
g_assert(unpacked[0] == 'a');
|
|
g_assert(unpacked[8] == 'i');
|
|
|
|
l_free(unpacked);
|
|
l_free(packed);
|
|
}
|
|
|
|
static unsigned char sim_7bit[] = { 0x6F, 0x46, 0x6F, 0x6E, 0x6F, 0xFF, 0xFF };
|
|
static unsigned char sim_80_1[] = { 0x80, 0x00, 0x6F, 0x00, 0x6E, 0x00,
|
|
0x6F };
|
|
static unsigned char sim_80_2[] = { 0x80, 0x00, 0x6F, 0x00, 0x6E, 0x00,
|
|
0x6F, 0xFF, 0xFF, 0xFF};
|
|
static unsigned char sim_80_3[] = { 0x80, 0x00, 0x6F, 0x00, 0x6E, 0x00,
|
|
0x6F, 0xFF, 0xFF};
|
|
static unsigned char sim_81_0[] = { 0x81, 0x05, 0x13, 0x53, 0x95, 0xA6,
|
|
0xA6, 0xFF, 0xFF };
|
|
static unsigned char sim_81_1[] = { 0x81, 0x03, 0x00, 0x6F, 0x6E, 0x6F, 0xFF };
|
|
static unsigned char sim_81_2[] = { 0x81, 0x05, 0x08, 0xB3, 0xB4, 0xB5, 0x53,
|
|
0x54, 0xFF, 0xFF, 0xFF };
|
|
static unsigned char sim_82_0[] = { 0x82, 0x05, 0x05, 0x30, 0x2D, 0x82,
|
|
0xD3, 0x2D, 0x31 };
|
|
static unsigned char sim_82_1[] = { 0x82, 0x05, 0x04, 0x00, 0x2D, 0xB3, 0xB4,
|
|
0x2D, 0x31 };
|
|
static unsigned char sim_82_2[] = { 0x82, 0x05, 0xD8, 0x00, 0x2D, 0xB3, 0xB4,
|
|
0x2D, 0x31 };
|
|
static unsigned char sim_7bit_empty[] = { 0xFF, 0xFF, 0xFF, 0xFF, 0xFF };
|
|
|
|
static void test_sim(void)
|
|
{
|
|
char *utf8;
|
|
|
|
utf8 = sim_string_to_utf8(sim_7bit, sizeof(sim_7bit));
|
|
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "oFono") == 0);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_80_1, sizeof(sim_80_1));
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "ono") == 0);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_80_2, sizeof(sim_80_2));
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "ono") == 0);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_80_3, sizeof(sim_80_3));
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "ono") == 0);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_81_0, sizeof(sim_81_0));
|
|
g_assert(utf8);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_81_2, sizeof(sim_81_2));
|
|
g_assert(utf8);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_81_1, sizeof(sim_81_1));
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "ono") == 0);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_82_0, sizeof(sim_82_0));
|
|
g_assert(utf8);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_82_1, sizeof(sim_82_1));
|
|
g_assert(utf8);
|
|
l_free(utf8);
|
|
|
|
utf8 = sim_string_to_utf8(sim_82_2, sizeof(sim_82_2));
|
|
g_assert(utf8 == NULL);
|
|
|
|
utf8 = sim_string_to_utf8(sim_7bit_empty, sizeof(sim_7bit_empty));
|
|
g_assert(utf8);
|
|
g_assert(strcmp(utf8, "") == 0);
|
|
l_free(utf8);
|
|
}
|
|
|
|
static void test_unicode_to_gsm(void)
|
|
{
|
|
long nwritten;
|
|
long nread;
|
|
int i;
|
|
unsigned char *res;
|
|
char *utf8;
|
|
unsigned char buf[2];
|
|
unsigned char *back;
|
|
uint16_t verify;
|
|
|
|
static int map_size =
|
|
sizeof(gsm_to_unicode_map) / sizeof(unsigned short) / 2;
|
|
|
|
for (i = 0; i < map_size; i++) {
|
|
unsigned short c = gsm_to_unicode_map[i*2+1];
|
|
|
|
buf[0] = c >> 8;
|
|
buf[1] = c & 0xff;
|
|
|
|
res = convert_ucs2_to_gsm(buf, 2, &nread, &nwritten, 0);
|
|
g_assert(res);
|
|
|
|
if (VERBOSE)
|
|
printf("nread:%ld, nwritten:%ld, %s\n",
|
|
nread, nwritten, res);
|
|
|
|
if (res[0] == 0x1B)
|
|
g_assert(nwritten == 2);
|
|
else
|
|
g_assert(nwritten == 1);
|
|
|
|
utf8 = l_utf8_from_ucs2be(buf, 2);
|
|
g_assert(utf8);
|
|
|
|
back = convert_utf8_to_gsm(utf8, strlen(utf8), &nread,
|
|
&nwritten, 0);
|
|
g_assert(back);
|
|
|
|
if (back[0] == 0x1B) {
|
|
g_assert(nwritten == 2);
|
|
verify = back[0] << 8 | back[1];
|
|
} else {
|
|
g_assert(nwritten == 1);
|
|
verify = back[0];
|
|
}
|
|
|
|
if (VERBOSE)
|
|
printf("nwritten:%ld, verify: 0x%x\n",
|
|
nwritten, verify);
|
|
|
|
g_assert(verify == gsm_to_unicode_map[i*2]);
|
|
|
|
l_free(res);
|
|
l_free(back);
|
|
l_free(utf8);
|
|
}
|
|
}
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
g_test_init(&argc, &argv, NULL);
|
|
|
|
g_test_add_func("/testutil/Invalid Conversions", test_invalid);
|
|
g_test_add_func("/testutil/Valid Conversions", test_valid);
|
|
g_test_add_func("/testutil/Valid Turkish National Variant Conversions",
|
|
test_valid_turkish);
|
|
g_test_add_func("/testutil/Decode Encode", test_decode_encode);
|
|
g_test_add_func("/testutil/Pack Size", test_pack_size);
|
|
g_test_add_func("/testutil/CBS CR Handling", test_cr_handling);
|
|
g_test_add_func("/testutil/SMS Handling", test_sms_handling);
|
|
g_test_add_func("/testutil/Offset Handling", test_offset_handling);
|
|
g_test_add_func("/testutil/SIM conversions", test_sim);
|
|
g_test_add_func("/testutil/Valid Unicode to GSM Conversion",
|
|
test_unicode_to_gsm);
|
|
|
|
return g_test_run();
|
|
}
|