Author: Pekka Riikonen <priikone@silcnet.org>
- Copyright (C) 2002 Pekka Riikonen
+ Copyright (C) 2002 - 2003 Pekka Riikonen
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
/* Encodes data into PEM encoding. Returns NULL terminated PEM encoded
- data string. Note: This is originally public domain code and is
- still PD. */
+ data string. */
char *silc_pem_encode(unsigned char *data, SilcUInt32 len)
{
return pem2;
}
-/* Decodes PEM into data. Returns the decoded data. Note: This is
- originally public domain code and is still PD. */
+/* Decodes PEM into data. Returns the decoded data. */
unsigned char *silc_pem_decode(unsigned char *pem, SilcUInt32 pem_len,
SilcUInt32 *ret_len)
return bin_len;
}
+ if (bin_encoding == SILC_STRING_LANGUAGE) {
+#if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) && defined(CODESET)
+ char *fromconv, *icp, *ocp;
+ iconv_t icd;
+ size_t inlen, outlen;
+
+ setlocale(LC_CTYPE, "");
+ fromconv = nl_langinfo(CODESET);
+ if (fromconv && strlen(fromconv)) {
+ icd = iconv_open("UTF-8", fromconv);
+ icp = (char *)bin;
+ ocp = (char *)utf8;
+ inlen = bin_len;
+ outlen = utf8_size;
+ if (icp && ocp && icd != (iconv_t)-1) {
+ if (iconv(icd, &icp, &inlen, &ocp, &outlen) != -1) {
+ utf8_size -= outlen;
+ iconv_close(icd);
+ return utf8_size;
+ }
+ }
+ if (icd != (iconv_t)-1)
+ iconv_close(icd);
+ }
+#endif
+
+ /* Fallback to 8-bit ASCII */
+ bin_encoding = SILC_STRING_ASCII;
+ }
+
for (i = 0; i < bin_len; i++) {
switch (bin_encoding) {
case SILC_STRING_ASCII:
charval = bin[i];
break;
case SILC_STRING_ASCII_ESC:
+ SILC_NOT_IMPLEMENTED("SILC_STRING_ASCII_ESC");
+ return 0;
break;
case SILC_STRING_BMP:
+ if (i + 1 >= bin_len)
+ return 0;
+ SILC_GET16_MSB(charval, bin + i);
+ i += 1;
+ break;
+ case SILC_STRING_BMP_LSB:
+ if (i + 1 >= bin_len)
+ return 0;
+ SILC_GET16_LSB(charval, bin + i);
+ i += 1;
break;
case SILC_STRING_UNIVERSAL:
+ if (i + 3 >= bin_len)
+ return 0;
+ SILC_GET32_MSB(charval, bin + i);
+ i += 3;
+ break;
+ case SILC_STRING_UNIVERSAL_LSB:
+ if (i + 3 >= bin_len)
+ return 0;
+ SILC_GET32_LSB(charval, bin + i);
+ i += 3;
+ break;
+ default:
+ return 0;
break;
}
if (!utf8 || !utf8_len)
return 0;
+ if (bin_encoding == SILC_STRING_LANGUAGE) {
+#if defined(HAVE_ICONV) && defined(HAVE_NL_LANGINFO) && defined(CODESET)
+ char *toconv, *icp, *ocp;
+ iconv_t icd;
+ size_t inlen, outlen;
+
+ setlocale(LC_CTYPE, "");
+ toconv = nl_langinfo(CODESET);
+ if (toconv && strlen(toconv)) {
+ icd = iconv_open(toconv, "UTF-8");
+ icp = (char *)utf8;
+ ocp = (char *)bin;
+ inlen = utf8_len;
+ outlen = bin_size;
+ if (icp && ocp && icd != (iconv_t)-1) {
+ if (iconv(icd, &icp, &inlen, &ocp, &outlen) != -1) {
+ bin_size -= outlen;
+ iconv_close(icd);
+ return bin_size;
+ }
+ }
+ if (icd != (iconv_t)-1)
+ iconv_close(icd);
+ }
+#endif
+
+ /* Fallback to 8-bit ASCII */
+ bin_encoding = SILC_STRING_ASCII;
+ }
+
for (i = 0; i < utf8_len; i++) {
if ((utf8[i] & 0x80) == 0x00) {
charval = utf8[i] & 0x7f;
} else if ((utf8[i] & 0xe0) == 0xc0) {
- if (utf8_len < 2)
- return 0;
+ if (i + 1 >= utf8_len)
+ return 0;
if ((utf8[i + 1] & 0xc0) != 0x80)
return 0;
if (charval < 0x80)
return 0;
} else if ((utf8[i] & 0xf0) == 0xe0) {
- if (utf8_len < 3)
- return 0;
+ if (i + 2 >= utf8_len)
+ return 0;
if (((utf8[i + 1] & 0xc0) != 0x80) ||
((utf8[i + 2] & 0xc0) != 0x80))
if (charval < 0x800)
return 0;
} else if ((utf8[i] & 0xf8) == 0xf0) {
- if (utf8_len < 4)
- return 0;
+ if (i + 3 >= utf8_len)
+ return 0;
if (((utf8[i + 1] & 0xc0) != 0x80) ||
((utf8[i + 2] & 0xc0) != 0x80) ||
if (charval < 0x10000)
return 0;
} else if ((utf8[i] & 0xfc) == 0xf8) {
- if (utf8_len < 5)
- return 0;
+ if (i + 4 >= utf8_len)
+ return 0;
if (((utf8[i + 1] & 0xc0) != 0x80) ||
((utf8[i + 2] & 0xc0) != 0x80) ||
if (charval < 0x200000)
return 0;
} else if ((utf8[i] & 0xfe) == 0xfc) {
- if (utf8_len < 6)
- return 0;
+ if (i + 5 >= utf8_len)
+ return 0;
if (((utf8[i + 1] & 0xc0) != 0x80) ||
((utf8[i + 2] & 0xc0) != 0x80) ||
enclen++;
break;
case SILC_STRING_ASCII_ESC:
+ SILC_NOT_IMPLEMENTED("SILC_STRING_ASCII_ESC");
return 0;
break;
case SILC_STRING_BMP:
- return 0;
+ if (bin)
+ SILC_PUT16_MSB(charval, bin + enclen);
+ enclen += 2;
+ break;
+ case SILC_STRING_BMP_LSB:
+ if (bin)
+ SILC_PUT16_LSB(charval, bin + enclen);
+ enclen += 2;
break;
case SILC_STRING_UNIVERSAL:
+ if (bin)
+ SILC_PUT32_MSB(charval, bin + enclen);
+ enclen += 4;
+ break;
+ case SILC_STRING_UNIVERSAL_LSB:
+ if (bin)
+ SILC_PUT32_LSB(charval, bin + enclen);
+ enclen += 4;
+ break;
+ default:
return 0;
break;
}
return silc_utf8_encode(bin, bin_len, bin_encoding, NULL, 0);
}
+/* Returns the length of decoded string if the `bin' of encoding of
+ `bin_encoding' is decoded with silc_utf8_decode. */
+
+SilcUInt32 silc_utf8_decoded_len(const unsigned char *bin, SilcUInt32 bin_len,
+ SilcStringEncoding bin_encoding)
+{
+ return silc_utf8_decode(bin, bin_len, bin_encoding, NULL, 0);
+}
+
/* Returns TRUE if the `utf8' string of length of `utf8_len' is valid
UTF-8 encoded string, FALSE if it is not UTF-8 encoded string. */
return TRUE;
}
+
+/* Concatenates the `src' into `dest'. If `src_len' is more than the
+ size of the `dest' (minus NULL at the end) the `src' will be
+ truncated to fit. */
+
+char *silc_strncat(char *dest, SilcUInt32 dest_size,
+ const char *src, SilcUInt32 src_len)
+{
+ int len;
+
+ dest[dest_size - 1] = '\0';
+
+ len = dest_size - 1 - strlen(dest);
+ if (len < src_len) {
+ if (len > 0)
+ strncat(dest, src, len);
+ } else {
+ strncat(dest, src, src_len);
+ }
+
+ return dest;
+}
projects / silc.git / blobdiff