924 lines
27 KiB
C++
924 lines
27 KiB
C++
/*
|
|
*******************************************************************************
|
|
*
|
|
* Copyright (C) 2003-2007, International Business Machines
|
|
* Corporation and others. All Rights Reserved.
|
|
*
|
|
*******************************************************************************
|
|
* file name: uidna.cpp
|
|
* encoding: US-ASCII
|
|
* tab size: 8 (not used)
|
|
* indentation:4
|
|
*
|
|
* created on: 2003feb1
|
|
* created by: Ram Viswanadha
|
|
*/
|
|
|
|
#include "unicode/utypes.h"
|
|
|
|
#if !UCONFIG_NO_IDNA
|
|
|
|
#include "unicode/uidna.h"
|
|
#include "unicode/ustring.h"
|
|
#include "unicode/usprep.h"
|
|
#include "punycode.h"
|
|
#include "ustr_imp.h"
|
|
#include "cmemory.h"
|
|
#include "uassert.h"
|
|
#include "sprpimpl.h"
|
|
|
|
/* it is official IDNA ACE Prefix is "xn--" */
|
|
static const UChar ACE_PREFIX[] ={ 0x0078,0x006E,0x002d,0x002d } ;
|
|
#define ACE_PREFIX_LENGTH 4
|
|
|
|
#define MAX_LABEL_LENGTH 63
|
|
/* The Max length of the labels should not be more than MAX_LABEL_LENGTH */
|
|
#define MAX_LABEL_BUFFER_SIZE 100
|
|
|
|
#define MAX_DOMAIN_NAME_LENGTH 255
|
|
/* The Max length of the domain names should not be more than MAX_DOMAIN_NAME_LENGTH */
|
|
#define MAX_IDN_BUFFER_SIZE MAX_DOMAIN_NAME_LENGTH+1
|
|
|
|
#define LOWER_CASE_DELTA 0x0020
|
|
#define HYPHEN 0x002D
|
|
#define FULL_STOP 0x002E
|
|
#define CAPITAL_A 0x0041
|
|
#define CAPITAL_Z 0x005A
|
|
|
|
#define DATA_FILE_NAME "uidna"
|
|
|
|
inline static UChar
|
|
toASCIILower(UChar ch){
|
|
if(CAPITAL_A <= ch && ch <= CAPITAL_Z){
|
|
return ch + LOWER_CASE_DELTA;
|
|
}
|
|
return ch;
|
|
}
|
|
|
|
inline static UBool
|
|
startsWithPrefix(const UChar* src , int32_t srcLength){
|
|
UBool startsWithPrefix = TRUE;
|
|
|
|
if(srcLength < ACE_PREFIX_LENGTH){
|
|
return FALSE;
|
|
}
|
|
|
|
for(int8_t i=0; i< ACE_PREFIX_LENGTH; i++){
|
|
if(toASCIILower(src[i]) != ACE_PREFIX[i]){
|
|
startsWithPrefix = FALSE;
|
|
}
|
|
}
|
|
return startsWithPrefix;
|
|
}
|
|
|
|
|
|
inline static int32_t
|
|
compareCaseInsensitiveASCII(const UChar* s1, int32_t s1Len,
|
|
const UChar* s2, int32_t s2Len){
|
|
|
|
int32_t minLength;
|
|
int32_t lengthResult;
|
|
|
|
// are we comparing different lengths?
|
|
if(s1Len != s2Len) {
|
|
if(s1Len < s2Len) {
|
|
minLength = s1Len;
|
|
lengthResult = -1;
|
|
} else {
|
|
minLength = s2Len;
|
|
lengthResult = 1;
|
|
}
|
|
} else {
|
|
// ok the lengths are equal
|
|
minLength = s1Len;
|
|
lengthResult = 0;
|
|
}
|
|
|
|
UChar c1,c2;
|
|
int32_t rc;
|
|
|
|
for(int32_t i =0;/* no condition */;i++) {
|
|
|
|
/* If we reach the ends of both strings then they match */
|
|
if(i == minLength) {
|
|
return lengthResult;
|
|
}
|
|
|
|
c1 = s1[i];
|
|
c2 = s2[i];
|
|
|
|
/* Case-insensitive comparison */
|
|
if(c1!=c2) {
|
|
rc=(int32_t)toASCIILower(c1)-(int32_t)toASCIILower(c2);
|
|
if(rc!=0) {
|
|
lengthResult=rc;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
return lengthResult;
|
|
}
|
|
|
|
|
|
/**
|
|
* Ascertain if the given code point is a label separator as
|
|
* defined by the IDNA RFC
|
|
*
|
|
* @param ch The code point to be ascertained
|
|
* @return true if the char is a label separator
|
|
* @stable ICU 2.8
|
|
*/
|
|
static inline UBool isLabelSeparator(UChar ch){
|
|
switch(ch){
|
|
case 0x002e:
|
|
case 0x3002:
|
|
case 0xFF0E:
|
|
case 0xFF61:
|
|
return TRUE;
|
|
default:
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
// returns the length of the label excluding the separator
|
|
// if *limit == separator then the length returned does not include
|
|
// the separtor.
|
|
static inline int32_t
|
|
getNextSeparator(UChar *src, int32_t srcLength,
|
|
UChar **limit, UBool *done){
|
|
if(srcLength == -1){
|
|
int32_t i;
|
|
for(i=0 ; ;i++){
|
|
if(src[i] == 0){
|
|
*limit = src + i; // point to null
|
|
*done = TRUE;
|
|
return i;
|
|
}
|
|
if(isLabelSeparator(src[i])){
|
|
*limit = src + (i+1); // go past the delimiter
|
|
return i;
|
|
|
|
}
|
|
}
|
|
}else{
|
|
int32_t i;
|
|
for(i=0;i<srcLength;i++){
|
|
if(isLabelSeparator(src[i])){
|
|
*limit = src + (i+1); // go past the delimiter
|
|
return i;
|
|
}
|
|
}
|
|
// we have not found the delimiter
|
|
// if(i==srcLength)
|
|
*limit = src+srcLength;
|
|
*done = TRUE;
|
|
|
|
return i;
|
|
}
|
|
}
|
|
static inline UBool isLDHChar(UChar ch){
|
|
// high runner case
|
|
if(ch>0x007A){
|
|
return FALSE;
|
|
}
|
|
//[\\u002D \\u0030-\\u0039 \\u0041-\\u005A \\u0061-\\u007A]
|
|
if( (ch==0x002D) ||
|
|
(0x0030 <= ch && ch <= 0x0039) ||
|
|
(0x0041 <= ch && ch <= 0x005A) ||
|
|
(0x0061 <= ch && ch <= 0x007A)
|
|
){
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
static int32_t
|
|
_internal_toASCII(const UChar* src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UStringPrepProfile* nameprep,
|
|
UParseError* parseError,
|
|
UErrorCode* status)
|
|
{
|
|
|
|
// TODO Revisit buffer handling. The label should not be over 63 ASCII characters. ICU4J may need to be updated too.
|
|
UChar b1Stack[MAX_LABEL_BUFFER_SIZE], b2Stack[MAX_LABEL_BUFFER_SIZE];
|
|
//initialize pointers to stack buffers
|
|
UChar *b1 = b1Stack, *b2 = b2Stack;
|
|
int32_t b1Len=0, b2Len,
|
|
b1Capacity = MAX_LABEL_BUFFER_SIZE,
|
|
b2Capacity = MAX_LABEL_BUFFER_SIZE ,
|
|
reqLength=0;
|
|
|
|
int32_t namePrepOptions = ((options & UIDNA_ALLOW_UNASSIGNED) != 0) ? USPREP_ALLOW_UNASSIGNED: 0;
|
|
UBool* caseFlags = NULL;
|
|
|
|
// the source contains all ascii codepoints
|
|
UBool srcIsASCII = TRUE;
|
|
// assume the source contains all LDH codepoints
|
|
UBool srcIsLDH = TRUE;
|
|
|
|
int32_t j=0;
|
|
|
|
//get the options
|
|
UBool useSTD3ASCIIRules = (UBool)((options & UIDNA_USE_STD3_RULES) != 0);
|
|
|
|
int32_t failPos = -1;
|
|
|
|
if(srcLength == -1){
|
|
srcLength = u_strlen(src);
|
|
}
|
|
|
|
if(srcLength > b1Capacity){
|
|
b1 = (UChar*) uprv_malloc(srcLength * U_SIZEOF_UCHAR);
|
|
if(b1==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
b1Capacity = srcLength;
|
|
}
|
|
|
|
// step 1
|
|
for( j=0;j<srcLength;j++){
|
|
if(src[j] > 0x7F){
|
|
srcIsASCII = FALSE;
|
|
}
|
|
b1[b1Len++] = src[j];
|
|
}
|
|
|
|
// step 2 is performed only if the source contains non ASCII
|
|
if(srcIsASCII == FALSE){
|
|
|
|
// step 2
|
|
b1Len = usprep_prepare(nameprep, src, srcLength, b1, b1Capacity, namePrepOptions, parseError, status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
// we do not have enough room so grow the buffer
|
|
if(b1 != b1Stack){
|
|
uprv_free(b1);
|
|
}
|
|
b1 = (UChar*) uprv_malloc(b1Len * U_SIZEOF_UCHAR);
|
|
if(b1==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b1Len = usprep_prepare(nameprep, src, srcLength, b1, b1Len, namePrepOptions, parseError, status);
|
|
}
|
|
}
|
|
// error bail out
|
|
if(U_FAILURE(*status)){
|
|
goto CLEANUP;
|
|
}
|
|
if(b1Len == 0){
|
|
*status = U_IDNA_ZERO_LENGTH_LABEL_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
// for step 3 & 4
|
|
srcIsASCII = TRUE;
|
|
for( j=0;j<b1Len;j++){
|
|
// check if output of usprep_prepare is all ASCII
|
|
if(b1[j] > 0x7F){
|
|
srcIsASCII = FALSE;
|
|
}else if(isLDHChar(b1[j])==FALSE){ // if the char is in ASCII range verify that it is an LDH character
|
|
srcIsLDH = FALSE;
|
|
failPos = j;
|
|
}
|
|
}
|
|
if(useSTD3ASCIIRules == TRUE){
|
|
// verify 3a and 3b
|
|
// 3(a) Verify the absence of non-LDH ASCII code points; that is, the
|
|
// absence of 0..2C, 2E..2F, 3A..40, 5B..60, and 7B..7F.
|
|
// 3(b) Verify the absence of leading and trailing hyphen-minus; that
|
|
// is, the absence of U+002D at the beginning and end of the
|
|
// sequence.
|
|
if( srcIsLDH == FALSE /* source at this point should not contain anyLDH characters */
|
|
|| b1[0] == HYPHEN || b1[b1Len-1] == HYPHEN){
|
|
*status = U_IDNA_STD3_ASCII_RULES_ERROR;
|
|
|
|
/* populate the parseError struct */
|
|
if(srcIsLDH==FALSE){
|
|
// failPos is always set the index of failure
|
|
uprv_syntaxError(b1,failPos, b1Len,parseError);
|
|
}else if(b1[0] == HYPHEN){
|
|
// fail position is 0
|
|
uprv_syntaxError(b1,0,b1Len,parseError);
|
|
}else{
|
|
// the last index in the source is always length-1
|
|
uprv_syntaxError(b1, (b1Len>0) ? b1Len-1 : b1Len, b1Len,parseError);
|
|
}
|
|
|
|
goto CLEANUP;
|
|
}
|
|
}
|
|
// Step 4: if the source is ASCII then proceed to step 8
|
|
if(srcIsASCII){
|
|
if(b1Len <= destCapacity){
|
|
uprv_memmove(dest, b1, b1Len * U_SIZEOF_UCHAR);
|
|
reqLength = b1Len;
|
|
}else{
|
|
reqLength = b1Len;
|
|
goto CLEANUP;
|
|
}
|
|
}else{
|
|
// step 5 : verify the sequence does not begin with ACE prefix
|
|
if(!startsWithPrefix(b1,b1Len)){
|
|
|
|
//step 6: encode the sequence with punycode
|
|
|
|
// do not preserve the case flags for now!
|
|
// TODO: Preserve the case while implementing the RFE
|
|
// caseFlags = (UBool*) uprv_malloc(b1Len * sizeof(UBool));
|
|
// uprv_memset(caseFlags,TRUE,b1Len);
|
|
|
|
b2Len = u_strToPunycode(b1,b1Len,b2,b2Capacity,caseFlags, status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
/* we do not have enough room so grow the buffer*/
|
|
b2 = (UChar*) uprv_malloc(b2Len * U_SIZEOF_UCHAR);
|
|
if(b2 == NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b2Len = u_strToPunycode(b1,b1Len,b2,b2Len,caseFlags, status);
|
|
}
|
|
//error bail out
|
|
if(U_FAILURE(*status)){
|
|
goto CLEANUP;
|
|
}
|
|
// TODO : Reconsider while implementing the case preserve RFE
|
|
// convert all codepoints to lower case ASCII
|
|
// toASCIILower(b2,b2Len);
|
|
reqLength = b2Len+ACE_PREFIX_LENGTH;
|
|
|
|
if(reqLength > destCapacity){
|
|
*status = U_BUFFER_OVERFLOW_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
//Step 7: prepend the ACE prefix
|
|
uprv_memcpy(dest,ACE_PREFIX,ACE_PREFIX_LENGTH * U_SIZEOF_UCHAR);
|
|
//Step 6: copy the contents in b2 into dest
|
|
uprv_memcpy(dest+ACE_PREFIX_LENGTH, b2, b2Len * U_SIZEOF_UCHAR);
|
|
|
|
}else{
|
|
*status = U_IDNA_ACE_PREFIX_ERROR;
|
|
//position of failure is 0
|
|
uprv_syntaxError(b1,0,b1Len,parseError);
|
|
goto CLEANUP;
|
|
}
|
|
}
|
|
// step 8: verify the length of label
|
|
if(reqLength > MAX_LABEL_LENGTH){
|
|
*status = U_IDNA_LABEL_TOO_LONG_ERROR;
|
|
}
|
|
|
|
CLEANUP:
|
|
if(b1 != b1Stack){
|
|
uprv_free(b1);
|
|
}
|
|
if(b2 != b2Stack){
|
|
uprv_free(b2);
|
|
}
|
|
uprv_free(caseFlags);
|
|
|
|
return u_terminateUChars(dest, destCapacity, reqLength, status);
|
|
}
|
|
|
|
static int32_t
|
|
_internal_toUnicode(const UChar* src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UStringPrepProfile* nameprep,
|
|
UParseError* parseError,
|
|
UErrorCode* status)
|
|
{
|
|
|
|
//get the options
|
|
//UBool useSTD3ASCIIRules = (UBool)((options & UIDNA_USE_STD3_RULES) != 0);
|
|
int32_t namePrepOptions = ((options & UIDNA_ALLOW_UNASSIGNED) != 0) ? USPREP_ALLOW_UNASSIGNED: 0;
|
|
|
|
// TODO Revisit buffer handling. The label should not be over 63 ASCII characters. ICU4J may need to be updated too.
|
|
UChar b1Stack[MAX_LABEL_BUFFER_SIZE], b2Stack[MAX_LABEL_BUFFER_SIZE], b3Stack[MAX_LABEL_BUFFER_SIZE];
|
|
|
|
//initialize pointers to stack buffers
|
|
UChar *b1 = b1Stack, *b2 = b2Stack, *b1Prime=NULL, *b3=b3Stack;
|
|
int32_t b1Len, b2Len, b1PrimeLen, b3Len,
|
|
b1Capacity = MAX_LABEL_BUFFER_SIZE,
|
|
b2Capacity = MAX_LABEL_BUFFER_SIZE,
|
|
b3Capacity = MAX_LABEL_BUFFER_SIZE,
|
|
reqLength=0;
|
|
|
|
b1Len = 0;
|
|
UBool* caseFlags = NULL;
|
|
|
|
UBool srcIsASCII = TRUE;
|
|
/*UBool srcIsLDH = TRUE;
|
|
int32_t failPos =0;*/
|
|
|
|
// step 1: find out if all the codepoints in src are ASCII
|
|
if(srcLength==-1){
|
|
srcLength = 0;
|
|
for(;src[srcLength]!=0;){
|
|
if(src[srcLength]> 0x7f){
|
|
srcIsASCII = FALSE;
|
|
}/*else if(isLDHChar(src[srcLength])==FALSE){
|
|
// here we do not assemble surrogates
|
|
// since we know that LDH code points
|
|
// are in the ASCII range only
|
|
srcIsLDH = FALSE;
|
|
failPos = srcLength;
|
|
}*/
|
|
srcLength++;
|
|
}
|
|
}else if(srcLength > 0){
|
|
for(int32_t j=0; j<srcLength; j++){
|
|
if(src[j]> 0x7f){
|
|
srcIsASCII = FALSE;
|
|
}/*else if(isLDHChar(src[j])==FALSE){
|
|
// here we do not assemble surrogates
|
|
// since we know that LDH code points
|
|
// are in the ASCII range only
|
|
srcIsLDH = FALSE;
|
|
failPos = j;
|
|
}*/
|
|
}
|
|
}else{
|
|
return 0;
|
|
}
|
|
|
|
if(srcIsASCII == FALSE){
|
|
// step 2: process the string
|
|
b1Len = usprep_prepare(nameprep, src, srcLength, b1, b1Capacity, namePrepOptions, parseError, status);
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
/* we do not have enough room so grow the buffer*/
|
|
b1 = (UChar*) uprv_malloc(b1Len * U_SIZEOF_UCHAR);
|
|
if(b1==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b1Len = usprep_prepare(nameprep, src, srcLength, b1, b1Len, namePrepOptions, parseError, status);
|
|
}
|
|
//bail out on error
|
|
if(U_FAILURE(*status)){
|
|
goto CLEANUP;
|
|
}
|
|
}else{
|
|
|
|
//just point src to b1
|
|
b1 = (UChar*) src;
|
|
b1Len = srcLength;
|
|
}
|
|
|
|
// The RFC states that
|
|
// <quote>
|
|
// ToUnicode never fails. If any step fails, then the original input
|
|
// is returned immediately in that step.
|
|
// </quote>
|
|
|
|
//step 3: verify ACE Prefix
|
|
if(startsWithPrefix(b1,b1Len)){
|
|
|
|
//step 4: Remove the ACE Prefix
|
|
b1Prime = b1 + ACE_PREFIX_LENGTH;
|
|
b1PrimeLen = b1Len - ACE_PREFIX_LENGTH;
|
|
|
|
//step 5: Decode using punycode
|
|
b2Len = u_strFromPunycode(b1Prime, b1PrimeLen, b2, b2Capacity, caseFlags,status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
/* we do not have enough room so grow the buffer*/
|
|
b2 = (UChar*) uprv_malloc(b2Len * U_SIZEOF_UCHAR);
|
|
if(b2==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b2Len = u_strFromPunycode(b1Prime, b1PrimeLen, b2, b2Len, caseFlags, status);
|
|
}
|
|
|
|
|
|
//step 6:Apply toASCII
|
|
b3Len = uidna_toASCII(b2, b2Len, b3, b3Capacity, options, parseError, status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
/* we do not have enough room so grow the buffer*/
|
|
b3 = (UChar*) uprv_malloc(b3Len * U_SIZEOF_UCHAR);
|
|
if(b3==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b3Len = uidna_toASCII(b2,b2Len,b3,b3Len,options,parseError, status);
|
|
|
|
}
|
|
//bail out on error
|
|
if(U_FAILURE(*status)){
|
|
goto CLEANUP;
|
|
}
|
|
|
|
//step 7: verify
|
|
if(compareCaseInsensitiveASCII(b1, b1Len, b3, b3Len) !=0){
|
|
// Cause the original to be returned.
|
|
*status = U_IDNA_VERIFICATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
//step 8: return output of step 5
|
|
reqLength = b2Len;
|
|
if(b2Len <= destCapacity) {
|
|
uprv_memmove(dest, b2, b2Len * U_SIZEOF_UCHAR);
|
|
}
|
|
}
|
|
else{
|
|
// See the start of this if statement for why this is commented out.
|
|
// verify that STD3 ASCII rules are satisfied
|
|
/*if(useSTD3ASCIIRules == TRUE){
|
|
if( srcIsLDH == FALSE // source contains some non-LDH characters
|
|
|| src[0] == HYPHEN || src[srcLength-1] == HYPHEN){
|
|
*status = U_IDNA_STD3_ASCII_RULES_ERROR;
|
|
|
|
// populate the parseError struct
|
|
if(srcIsLDH==FALSE){
|
|
// failPos is always set the index of failure
|
|
uprv_syntaxError(src,failPos, srcLength,parseError);
|
|
}else if(src[0] == HYPHEN){
|
|
// fail position is 0
|
|
uprv_syntaxError(src,0,srcLength,parseError);
|
|
}else{
|
|
// the last index in the source is always length-1
|
|
uprv_syntaxError(src, (srcLength>0) ? srcLength-1 : srcLength, srcLength,parseError);
|
|
}
|
|
|
|
goto CLEANUP;
|
|
}
|
|
}*/
|
|
// just return the source
|
|
//copy the source to destination
|
|
if(srcLength <= destCapacity){
|
|
uprv_memmove(dest,src,srcLength * U_SIZEOF_UCHAR);
|
|
}
|
|
reqLength = srcLength;
|
|
}
|
|
|
|
|
|
CLEANUP:
|
|
|
|
if(b1 != b1Stack && b1!=src){
|
|
uprv_free(b1);
|
|
}
|
|
if(b2 != b2Stack){
|
|
uprv_free(b2);
|
|
}
|
|
uprv_free(caseFlags);
|
|
|
|
// The RFC states that
|
|
// <quote>
|
|
// ToUnicode never fails. If any step fails, then the original input
|
|
// is returned immediately in that step.
|
|
// </quote>
|
|
// So if any step fails lets copy source to destination
|
|
if(U_FAILURE(*status)){
|
|
//copy the source to destination
|
|
if(dest && srcLength <= destCapacity){
|
|
// srcLength should have already been set earlier.
|
|
U_ASSERT(srcLength >= 0);
|
|
uprv_memmove(dest,src,srcLength * U_SIZEOF_UCHAR);
|
|
}
|
|
reqLength = srcLength;
|
|
*status = U_ZERO_ERROR;
|
|
}
|
|
|
|
return u_terminateUChars(dest, destCapacity, reqLength, status);
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
uidna_toASCII(const UChar* src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UParseError* parseError,
|
|
UErrorCode* status){
|
|
|
|
if(status == NULL || U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
if((src==NULL) || (srcLength < -1) || (destCapacity<0) || (!dest && destCapacity > 0)){
|
|
*status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
return 0;
|
|
}
|
|
|
|
UStringPrepProfile* nameprep = usprep_open(NULL,DATA_FILE_NAME, status);
|
|
|
|
if(U_FAILURE(*status)){
|
|
return -1;
|
|
}
|
|
|
|
int32_t retLen = _internal_toASCII(src, srcLength, dest, destCapacity, options, nameprep, parseError, status);
|
|
|
|
/* close the profile*/
|
|
usprep_close(nameprep);
|
|
|
|
return retLen;
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
uidna_toUnicode(const UChar* src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UParseError* parseError,
|
|
UErrorCode* status){
|
|
|
|
if(status == NULL || U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
if( (src==NULL) || (srcLength < -1) || (destCapacity<0) || (!dest && destCapacity > 0)){
|
|
*status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
return 0;
|
|
}
|
|
|
|
UStringPrepProfile* nameprep = usprep_open(NULL, DATA_FILE_NAME, status);
|
|
|
|
if(U_FAILURE(*status)){
|
|
return -1;
|
|
}
|
|
|
|
int32_t retLen = _internal_toUnicode(src, srcLength, dest, destCapacity, options, nameprep, parseError, status);
|
|
|
|
usprep_close(nameprep);
|
|
|
|
return retLen;
|
|
}
|
|
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
uidna_IDNToASCII( const UChar *src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UParseError *parseError,
|
|
UErrorCode *status){
|
|
|
|
if(status == NULL || U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
if((src==NULL) || (srcLength < -1) || (destCapacity<0) || (!dest && destCapacity > 0)){
|
|
*status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
return 0;
|
|
}
|
|
|
|
int32_t reqLength = 0;
|
|
|
|
UStringPrepProfile* nameprep = usprep_open(NULL, DATA_FILE_NAME, status);
|
|
|
|
if(U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
|
|
//initialize pointers
|
|
UChar *delimiter = (UChar*)src;
|
|
UChar *labelStart = (UChar*)src;
|
|
UChar *currentDest = (UChar*) dest;
|
|
int32_t remainingLen = srcLength;
|
|
int32_t remainingDestCapacity = destCapacity;
|
|
int32_t labelLen = 0, labelReqLength = 0;
|
|
UBool done = FALSE;
|
|
|
|
|
|
for(;;){
|
|
|
|
labelLen = getNextSeparator(labelStart,remainingLen, &delimiter,&done);
|
|
labelReqLength = 0;
|
|
if(!(labelLen==0 && done)){// make sure this is not a root label separator.
|
|
|
|
labelReqLength = _internal_toASCII( labelStart, labelLen,
|
|
currentDest, remainingDestCapacity,
|
|
options, nameprep,
|
|
parseError, status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
remainingDestCapacity = 0;
|
|
}
|
|
}
|
|
|
|
|
|
if(U_FAILURE(*status)){
|
|
break;
|
|
}
|
|
|
|
reqLength +=labelReqLength;
|
|
// adjust the destination pointer
|
|
if(labelReqLength < remainingDestCapacity){
|
|
currentDest = currentDest + labelReqLength;
|
|
remainingDestCapacity -= labelReqLength;
|
|
}else{
|
|
// should never occur
|
|
remainingDestCapacity = 0;
|
|
}
|
|
|
|
if(done == TRUE){
|
|
break;
|
|
}
|
|
|
|
// add the label separator
|
|
if(remainingDestCapacity > 0){
|
|
*currentDest++ = FULL_STOP;
|
|
remainingDestCapacity--;
|
|
}
|
|
reqLength++;
|
|
|
|
labelStart = delimiter;
|
|
if(remainingLen >0 ){
|
|
remainingLen = (int32_t)(srcLength - (delimiter - src));
|
|
}
|
|
|
|
}
|
|
|
|
if(reqLength > MAX_DOMAIN_NAME_LENGTH){
|
|
*status = U_IDNA_DOMAIN_NAME_TOO_LONG_ERROR;
|
|
}
|
|
|
|
usprep_close(nameprep);
|
|
|
|
return u_terminateUChars(dest, destCapacity, reqLength, status);
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
uidna_IDNToUnicode( const UChar* src, int32_t srcLength,
|
|
UChar* dest, int32_t destCapacity,
|
|
int32_t options,
|
|
UParseError* parseError,
|
|
UErrorCode* status){
|
|
|
|
if(status == NULL || U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
if((src==NULL) || (srcLength < -1) || (destCapacity<0) || (!dest && destCapacity > 0)){
|
|
*status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
return 0;
|
|
}
|
|
|
|
int32_t reqLength = 0;
|
|
|
|
UStringPrepProfile* nameprep = usprep_open(NULL, DATA_FILE_NAME, status);
|
|
|
|
if(U_FAILURE(*status)){
|
|
return 0;
|
|
}
|
|
|
|
//initialize pointers
|
|
UChar *delimiter = (UChar*)src;
|
|
UChar *labelStart = (UChar*)src;
|
|
UChar *currentDest = (UChar*) dest;
|
|
int32_t remainingLen = srcLength;
|
|
int32_t remainingDestCapacity = destCapacity;
|
|
int32_t labelLen = 0, labelReqLength = 0;
|
|
UBool done = FALSE;
|
|
|
|
for(;;){
|
|
|
|
labelLen = getNextSeparator(labelStart,remainingLen, &delimiter,&done);
|
|
|
|
// The RFC states that
|
|
// <quote>
|
|
// ToUnicode never fails. If any step fails, then the original input
|
|
// is returned immediately in that step.
|
|
// </quote>
|
|
// _internal_toUnicode will copy the label.
|
|
/*if(labelLen==0 && done==FALSE){
|
|
*status = U_IDNA_ZERO_LENGTH_LABEL_ERROR;
|
|
break;
|
|
}*/
|
|
|
|
labelReqLength = _internal_toUnicode(labelStart, labelLen,
|
|
currentDest, remainingDestCapacity,
|
|
options, nameprep,
|
|
parseError, status);
|
|
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
*status = U_ZERO_ERROR; // reset error
|
|
remainingDestCapacity = 0;
|
|
}
|
|
|
|
if(U_FAILURE(*status)){
|
|
break;
|
|
}
|
|
|
|
reqLength +=labelReqLength;
|
|
// adjust the destination pointer
|
|
if(labelReqLength < remainingDestCapacity){
|
|
currentDest = currentDest + labelReqLength;
|
|
remainingDestCapacity -= labelReqLength;
|
|
}else{
|
|
// should never occur
|
|
remainingDestCapacity = 0;
|
|
}
|
|
|
|
if(done == TRUE){
|
|
break;
|
|
}
|
|
|
|
// add the label separator
|
|
// Unlike the ToASCII operation we don't normalize the label separators
|
|
if(remainingDestCapacity > 0){
|
|
*currentDest++ = *(labelStart + labelLen);
|
|
remainingDestCapacity--;
|
|
}
|
|
reqLength++;
|
|
|
|
labelStart = delimiter;
|
|
if(remainingLen >0 ){
|
|
remainingLen = (int32_t)(srcLength - (delimiter - src));
|
|
}
|
|
|
|
}
|
|
|
|
if(reqLength > MAX_DOMAIN_NAME_LENGTH){
|
|
*status = U_IDNA_DOMAIN_NAME_TOO_LONG_ERROR;
|
|
}
|
|
|
|
usprep_close(nameprep);
|
|
|
|
return u_terminateUChars(dest, destCapacity, reqLength, status);
|
|
}
|
|
|
|
U_CAPI int32_t U_EXPORT2
|
|
uidna_compare( const UChar *s1, int32_t length1,
|
|
const UChar *s2, int32_t length2,
|
|
int32_t options,
|
|
UErrorCode* status){
|
|
|
|
if(status == NULL || U_FAILURE(*status)){
|
|
return -1;
|
|
}
|
|
|
|
UChar b1Stack[MAX_IDN_BUFFER_SIZE], b2Stack[MAX_IDN_BUFFER_SIZE];
|
|
UChar *b1 = b1Stack, *b2 = b2Stack;
|
|
int32_t b1Len, b2Len, b1Capacity = MAX_IDN_BUFFER_SIZE, b2Capacity = MAX_IDN_BUFFER_SIZE;
|
|
int32_t result=-1;
|
|
|
|
UParseError parseError;
|
|
|
|
b1Len = uidna_IDNToASCII(s1, length1, b1, b1Capacity, options, &parseError, status);
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
b1 = (UChar*) uprv_malloc(b1Len * U_SIZEOF_UCHAR);
|
|
if(b1==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b1Len = uidna_IDNToASCII(s1,length1,b1,b1Len, options, &parseError, status);
|
|
|
|
}
|
|
|
|
b2Len = uidna_IDNToASCII(s2,length2, b2,b2Capacity, options, &parseError, status);
|
|
if(*status == U_BUFFER_OVERFLOW_ERROR){
|
|
// redo processing of string
|
|
b2 = (UChar*) uprv_malloc(b2Len * U_SIZEOF_UCHAR);
|
|
if(b2==NULL){
|
|
*status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto CLEANUP;
|
|
}
|
|
|
|
*status = U_ZERO_ERROR; // reset error
|
|
|
|
b2Len = uidna_IDNToASCII(s2, length2, b2, b2Len, options, &parseError, status);
|
|
|
|
}
|
|
// when toASCII is applied all label separators are replaced with FULL_STOP
|
|
result = compareCaseInsensitiveASCII(b1,b1Len,b2,b2Len);
|
|
|
|
CLEANUP:
|
|
if(b1 != b1Stack){
|
|
uprv_free(b1);
|
|
}
|
|
|
|
if(b2 != b2Stack){
|
|
uprv_free(b2);
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
#endif /* #if !UCONFIG_NO_IDNA */
|