| OLD | NEW |
| (Empty) |
| 1 /* | |
| 2 ******************************************************************************* | |
| 3 * | |
| 4 * Copyright (C) 2003-2013, International Business Machines | |
| 5 * Corporation and others. All Rights Reserved. | |
| 6 * | |
| 7 ******************************************************************************* | |
| 8 * file name: testidn.cpp | |
| 9 * encoding: US-ASCII | |
| 10 * tab size: 8 (not used) | |
| 11 * indentation:4 | |
| 12 * | |
| 13 * created on: 2003-02-06 | |
| 14 * created by: Ram Viswanadha | |
| 15 * | |
| 16 * This program reads the rfc3454_*.txt files, | |
| 17 * parses them, and extracts the data for Nameprep conformance. | |
| 18 * It then preprocesses it and writes a binary file for efficient use | |
| 19 * in various IDNA conversion processes. | |
| 20 */ | |
| 21 | |
| 22 #include "unicode/utypes.h" | |
| 23 | |
| 24 #if !UCONFIG_NO_IDNA && !UCONFIG_NO_TRANSLITERATION | |
| 25 | |
| 26 #define USPREP_TYPE_NAMES_ARRAY | |
| 27 | |
| 28 #include "unicode/uchar.h" | |
| 29 #include "unicode/putil.h" | |
| 30 #include "cmemory.h" | |
| 31 #include "cstring.h" | |
| 32 #include "unicode/udata.h" | |
| 33 #include "unicode/utf16.h" | |
| 34 #include "unewdata.h" | |
| 35 #include "uoptions.h" | |
| 36 #include "uparse.h" | |
| 37 #include "utrie.h" | |
| 38 #include "umutex.h" | |
| 39 #include "sprpimpl.h" | |
| 40 #include "testidna.h" | |
| 41 #include "punyref.h" | |
| 42 #include <stdlib.h> | |
| 43 | |
| 44 UBool beVerbose=FALSE, haveCopyright=TRUE; | |
| 45 | |
| 46 /* prototypes --------------------------------------------------------------- */ | |
| 47 | |
| 48 | |
| 49 static void | |
| 50 parseMappings(const char *filename, UBool reportError,TestIDNA& test, UErrorCode
*pErrorCode); | |
| 51 | |
| 52 static void | |
| 53 compareMapping(uint32_t codepoint, uint32_t* mapping, int32_t mapLength, | |
| 54 UStringPrepType option); | |
| 55 | |
| 56 static void | |
| 57 compareFlagsForRange(uint32_t start, uint32_t end,UStringPrepType option); | |
| 58 | |
| 59 static void | |
| 60 testAllCodepoints(TestIDNA& test); | |
| 61 | |
| 62 static TestIDNA* pTestIDNA =NULL; | |
| 63 | |
| 64 static const char* fileNames[] = { | |
| 65 "rfc3491.txt" | |
| 66 }; | |
| 67 static const UTrie *idnTrie = NULL; | |
| 68 static const int32_t *indexes = NULL; | |
| 69 static const uint16_t *mappingData = NULL; | |
| 70 /* -------------------------------------------------------------------------- */ | |
| 71 | |
| 72 /* file definitions */ | |
| 73 #define DATA_TYPE "icu" | |
| 74 | |
| 75 #define SPREP_DIR "sprep" | |
| 76 | |
| 77 extern int | |
| 78 testData(TestIDNA& test) { | |
| 79 char *basename=NULL; | |
| 80 UErrorCode errorCode=U_ZERO_ERROR; | |
| 81 char *saveBasename =NULL; | |
| 82 | |
| 83 LocalUStringPrepProfilePointer profile(usprep_openByType(USPREP_RFC3491_NAME
PREP, &errorCode)); | |
| 84 if(U_FAILURE(errorCode)){ | |
| 85 test.errcheckln(errorCode, "Failed to load IDNA data file. " + UnicodeSt
ring(u_errorName(errorCode))); | |
| 86 return errorCode; | |
| 87 } | |
| 88 | |
| 89 char* filename = (char*) malloc(strlen(IntlTest::pathToDataDirectory())*1024
); | |
| 90 //TODO get the srcDir dynamically | |
| 91 const char *srcDir=IntlTest::pathToDataDirectory(); | |
| 92 | |
| 93 idnTrie = &profile->sprepTrie; | |
| 94 indexes = profile->indexes; | |
| 95 mappingData = profile->mappingData; | |
| 96 | |
| 97 //initialize | |
| 98 pTestIDNA = &test; | |
| 99 | |
| 100 /* prepare the filename beginning with the source dir */ | |
| 101 if(uprv_strchr(srcDir,U_FILE_SEP_CHAR) == NULL){ | |
| 102 filename[0] = 0x2E; | |
| 103 filename[1] = U_FILE_SEP_CHAR; | |
| 104 uprv_strcpy(filename+2,srcDir); | |
| 105 }else{ | |
| 106 uprv_strcpy(filename, srcDir); | |
| 107 } | |
| 108 basename=filename+uprv_strlen(filename); | |
| 109 if(basename>filename && *(basename-1)!=U_FILE_SEP_CHAR) { | |
| 110 *basename++=U_FILE_SEP_CHAR; | |
| 111 } | |
| 112 | |
| 113 /* process unassigned */ | |
| 114 basename=filename+uprv_strlen(filename); | |
| 115 if(basename>filename && *(basename-1)!=U_FILE_SEP_CHAR) { | |
| 116 *basename++=U_FILE_SEP_CHAR; | |
| 117 } | |
| 118 | |
| 119 /* first copy misc directory */ | |
| 120 saveBasename = basename; | |
| 121 (void)saveBasename; // Suppress set but not used warning. | |
| 122 uprv_strcpy(basename,SPREP_DIR); | |
| 123 basename = basename + uprv_strlen(SPREP_DIR); | |
| 124 *basename++=U_FILE_SEP_CHAR; | |
| 125 | |
| 126 /* process unassigned */ | |
| 127 uprv_strcpy(basename,fileNames[0]); | |
| 128 parseMappings(filename,TRUE, test,&errorCode); | |
| 129 if(U_FAILURE(errorCode)) { | |
| 130 test.errln( "Could not open file %s for reading \n", filename); | |
| 131 return errorCode; | |
| 132 } | |
| 133 | |
| 134 testAllCodepoints(test); | |
| 135 | |
| 136 pTestIDNA = NULL; | |
| 137 free(filename); | |
| 138 return errorCode; | |
| 139 } | |
| 140 U_CDECL_BEGIN | |
| 141 | |
| 142 static void U_CALLCONV | |
| 143 strprepProfileLineFn(void * /*context*/, | |
| 144 char *fields[][2], int32_t fieldCount, | |
| 145 UErrorCode *pErrorCode) { | |
| 146 uint32_t mapping[40]; | |
| 147 char *end, *map; | |
| 148 uint32_t code; | |
| 149 int32_t length; | |
| 150 /*UBool* mapWithNorm = (UBool*) context;*/ | |
| 151 const char* typeName; | |
| 152 uint32_t rangeStart=0,rangeEnd =0; | |
| 153 const char *s; | |
| 154 | |
| 155 s = u_skipWhitespace(fields[0][0]); | |
| 156 if (*s == '@') { | |
| 157 /* a special directive introduced in 4.2 */ | |
| 158 return; | |
| 159 } | |
| 160 | |
| 161 if(fieldCount != 3){ | |
| 162 *pErrorCode = U_INVALID_FORMAT_ERROR; | |
| 163 return; | |
| 164 } | |
| 165 | |
| 166 typeName = fields[2][0]; | |
| 167 map = fields[1][0]; | |
| 168 | |
| 169 if(uprv_strstr(typeName, usprepTypeNames[USPREP_UNASSIGNED])!=NULL){ | |
| 170 | |
| 171 u_parseCodePointRange(s, &rangeStart,&rangeEnd, pErrorCode); | |
| 172 | |
| 173 /* store the range */ | |
| 174 compareFlagsForRange(rangeStart,rangeEnd,USPREP_UNASSIGNED); | |
| 175 | |
| 176 }else if(uprv_strstr(typeName, usprepTypeNames[USPREP_PROHIBITED])!=NULL){ | |
| 177 | |
| 178 u_parseCodePointRange(s, &rangeStart,&rangeEnd, pErrorCode); | |
| 179 | |
| 180 /* store the range */ | |
| 181 compareFlagsForRange(rangeStart,rangeEnd,USPREP_PROHIBITED); | |
| 182 | |
| 183 }else if(uprv_strstr(typeName, usprepTypeNames[USPREP_MAP])!=NULL){ | |
| 184 /* get the character code, field 0 */ | |
| 185 code=(uint32_t)uprv_strtoul(s, &end, 16); | |
| 186 | |
| 187 /* parse the mapping string */ | |
| 188 length=u_parseCodePoints(map, mapping, sizeof(mapping)/4, pErrorCode); | |
| 189 | |
| 190 /* store the mapping */ | |
| 191 compareMapping(code,mapping, length,USPREP_MAP); | |
| 192 | |
| 193 }else{ | |
| 194 *pErrorCode = U_INVALID_FORMAT_ERROR; | |
| 195 } | |
| 196 | |
| 197 } | |
| 198 | |
| 199 U_CDECL_END | |
| 200 | |
| 201 static void | |
| 202 parseMappings(const char *filename,UBool reportError, TestIDNA& test, UErrorCode
*pErrorCode) { | |
| 203 char *fields[3][2]; | |
| 204 | |
| 205 if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { | |
| 206 return; | |
| 207 } | |
| 208 | |
| 209 u_parseDelimitedFile(filename, ';', fields, 3, strprepProfileLineFn, (void*)
filename, pErrorCode); | |
| 210 | |
| 211 //fprintf(stdout,"Number of code points that have mappings with length >1 :
%i\n",len); | |
| 212 | |
| 213 if(U_FAILURE(*pErrorCode) && (reportError || *pErrorCode!=U_FILE_ACCESS_ERRO
R)) { | |
| 214 test.errln( "testidn error: u_parseDelimitedFile(\"%s\") failed - %s\n",
filename, u_errorName(*pErrorCode)); | |
| 215 } | |
| 216 } | |
| 217 | |
| 218 | |
| 219 static inline UStringPrepType | |
| 220 getValues(uint32_t result, int32_t& value, UBool& isIndex){ | |
| 221 | |
| 222 UStringPrepType type; | |
| 223 | |
| 224 if(result == 0){ | |
| 225 /* | |
| 226 * Initial value stored in the mapping table | |
| 227 * just return USPREP_TYPE_LIMIT .. so that | |
| 228 * the source codepoint is copied to the destination | |
| 229 */ | |
| 230 type = USPREP_TYPE_LIMIT; | |
| 231 isIndex =FALSE; | |
| 232 value = 0; | |
| 233 }else if(result >= _SPREP_TYPE_THRESHOLD){ | |
| 234 type = (UStringPrepType) (result - _SPREP_TYPE_THRESHOLD); | |
| 235 isIndex =FALSE; | |
| 236 value = 0; | |
| 237 }else{ | |
| 238 /* get the state */ | |
| 239 type = USPREP_MAP; | |
| 240 /* ascertain if the value is index or delta */ | |
| 241 if(result & 0x02){ | |
| 242 isIndex = TRUE; | |
| 243 value = result >> 2; //mask off the lower 2 bits and shift | |
| 244 | |
| 245 }else{ | |
| 246 isIndex = FALSE; | |
| 247 value = (int16_t)result; | |
| 248 value = (value >> 2); | |
| 249 | |
| 250 } | |
| 251 if((result>>2) == _SPREP_MAX_INDEX_VALUE){ | |
| 252 type = USPREP_DELETE; | |
| 253 isIndex =FALSE; | |
| 254 value = 0; | |
| 255 } | |
| 256 } | |
| 257 return type; | |
| 258 } | |
| 259 | |
| 260 | |
| 261 | |
| 262 static void | |
| 263 testAllCodepoints(TestIDNA& test){ | |
| 264 /* | |
| 265 { | |
| 266 UChar str[19] = { | |
| 267 0xC138, 0xACC4, 0xC758, 0xBAA8, 0xB4E0, 0xC0AC, 0xB7
8C, 0xB4E4, 0xC774, | |
| 268 0x070F,//prohibited | |
| 269 0xD55C, 0xAD6D, 0xC5B4, 0xB97C, 0xC774, 0xD574, 0xD5
5C, 0xB2E4, 0xBA74 | |
| 270 }; | |
| 271 uint32_t in[19] = {0}; | |
| 272 UErrorCode status = U_ZERO_ERROR; | |
| 273 int32_t inLength=0, outLength=100; | |
| 274 char output[100] = {0}; | |
| 275 punycode_status error; | |
| 276 u_strToUTF32((UChar32*)in,19,&inLength,str,19,&status); | |
| 277 | |
| 278 error= punycode_encode(inLength, in, NULL, (uint32_t*)&outLength, output
); | |
| 279 printf(output); | |
| 280 | |
| 281 } | |
| 282 */ | |
| 283 | |
| 284 uint32_t i = 0; | |
| 285 int32_t unassigned = 0; | |
| 286 int32_t prohibited = 0; | |
| 287 int32_t mappedWithNorm = 0; | |
| 288 int32_t mapped = 0; | |
| 289 int32_t noValueInTrie = 0; | |
| 290 | |
| 291 UStringPrepType type; | |
| 292 int32_t value; | |
| 293 UBool isIndex = FALSE; | |
| 294 | |
| 295 for(i=0;i<=0x10FFFF;i++){ | |
| 296 uint32_t result = 0; | |
| 297 UTRIE_GET16(idnTrie,i, result); | |
| 298 type = getValues(result,value, isIndex); | |
| 299 if(type != USPREP_TYPE_LIMIT ){ | |
| 300 if(type == USPREP_UNASSIGNED){ | |
| 301 unassigned++; | |
| 302 } | |
| 303 if(type == USPREP_PROHIBITED){ | |
| 304 prohibited++; | |
| 305 } | |
| 306 if(type == USPREP_MAP){ | |
| 307 mapped++; | |
| 308 } | |
| 309 }else{ | |
| 310 noValueInTrie++; | |
| 311 if(result > 0){ | |
| 312 test.errln("The return value for 0x%06X is wrong. %i\n",i,result
); | |
| 313 } | |
| 314 } | |
| 315 } | |
| 316 | |
| 317 test.logln("Number of Unassinged code points : %i \n",unassigned); | |
| 318 test.logln("Number of Prohibited code points : %i \n",prohibited); | |
| 319 test.logln("Number of Mapped code points : %i \n",mapped); | |
| 320 test.logln("Number of Mapped with NFKC code points : %i \n",mappedWithNorm); | |
| 321 test.logln("Number of code points that have no value in Trie: %i \n",noValue
InTrie); | |
| 322 | |
| 323 | |
| 324 } | |
| 325 | |
| 326 static void | |
| 327 compareMapping(uint32_t codepoint, uint32_t* mapping,int32_t mapLength, | |
| 328 UStringPrepType type){ | |
| 329 uint32_t result = 0; | |
| 330 UTRIE_GET16(idnTrie,codepoint, result); | |
| 331 | |
| 332 int32_t length=0; | |
| 333 UBool isIndex; | |
| 334 UStringPrepType retType; | |
| 335 int32_t value, index=0, delta=0; | |
| 336 | |
| 337 retType = getValues(result,value,isIndex); | |
| 338 | |
| 339 | |
| 340 if(type != retType && retType != USPREP_DELETE){ | |
| 341 | |
| 342 pTestIDNA->errln( "Did not get the assigned type for codepoint 0x%08X. E
xpected: %i Got: %i\n",codepoint, USPREP_MAP, type); | |
| 343 | |
| 344 } | |
| 345 | |
| 346 if(isIndex){ | |
| 347 index = value; | |
| 348 if(index >= indexes[_SPREP_ONE_UCHAR_MAPPING_INDEX_START] && | |
| 349 index < indexes[_SPREP_TWO_UCHARS_MAPPING_INDEX_START]){ | |
| 350 length = 1; | |
| 351 }else if(index >= indexes[_SPREP_TWO_UCHARS_MAPPING_INDEX_START] && | |
| 352 index < indexes[_SPREP_THREE_UCHARS_MAPPING_INDEX_START]){ | |
| 353 length = 2; | |
| 354 }else if(index >= indexes[_SPREP_THREE_UCHARS_MAPPING_INDEX_START] && | |
| 355 index < indexes[_SPREP_FOUR_UCHARS_MAPPING_INDEX_START]){ | |
| 356 length = 3; | |
| 357 }else{ | |
| 358 length = mappingData[index++]; | |
| 359 } | |
| 360 }else{ | |
| 361 delta = value; | |
| 362 length = (retType == USPREP_DELETE)? 0 : 1; | |
| 363 } | |
| 364 | |
| 365 int32_t realLength =0; | |
| 366 /* figure out the real length */ | |
| 367 for(int32_t j=0; j<mapLength; j++){ | |
| 368 if(mapping[j] > 0xFFFF){ | |
| 369 realLength +=2; | |
| 370 }else{ | |
| 371 realLength++; | |
| 372 } | |
| 373 } | |
| 374 | |
| 375 if(realLength != length){ | |
| 376 pTestIDNA->errln( "Did not get the expected length. Expected: %i Got: %i
\n", mapLength, length); | |
| 377 } | |
| 378 | |
| 379 if(isIndex){ | |
| 380 for(int8_t i =0; i< mapLength; i++){ | |
| 381 if(mapping[i] <= 0xFFFF){ | |
| 382 if(mappingData[index+i] != (uint16_t)mapping[i]){ | |
| 383 pTestIDNA->errln("Did not get the expected result. Expected:
0x%04X Got: 0x%04X \n", mapping[i], mappingData[index+i]); | |
| 384 } | |
| 385 }else{ | |
| 386 UChar lead = U16_LEAD(mapping[i]); | |
| 387 UChar trail = U16_TRAIL(mapping[i]); | |
| 388 if(mappingData[index+i] != lead || | |
| 389 mappingData[index+i+1] != trail){ | |
| 390 pTestIDNA->errln( "Did not get the expected result. Expected
: 0x%04X 0x%04X Got: 0x%04X 0x%04X", lead, trail, mappingData[index+i], mapping
Data[index+i+1]); | |
| 391 } | |
| 392 } | |
| 393 } | |
| 394 }else{ | |
| 395 if(retType!=USPREP_DELETE && (codepoint-delta) != (uint16_t)mapping[0]){ | |
| 396 pTestIDNA->errln("Did not get the expected result. Expected: 0x%04X
Got: 0x%04X \n", mapping[0],(codepoint-delta)); | |
| 397 } | |
| 398 } | |
| 399 | |
| 400 } | |
| 401 | |
| 402 static void | |
| 403 compareFlagsForRange(uint32_t start, uint32_t end, | |
| 404 UStringPrepType type){ | |
| 405 | |
| 406 uint32_t result =0 ; | |
| 407 UStringPrepType retType; | |
| 408 UBool isIndex=FALSE; | |
| 409 int32_t value=0; | |
| 410 /* | |
| 411 // supplementary code point | |
| 412 UChar __lead16=U16_LEAD(0x2323E); | |
| 413 int32_t __offset; | |
| 414 | |
| 415 // get data for lead surrogate | |
| 416 (result)=_UTRIE_GET_RAW((&idnTrie), index, 0, (__lead16)); | |
| 417 __offset=(&idnTrie)->getFoldingOffset(result); | |
| 418 | |
| 419 // get the real data from the folded lead/trail units | |
| 420 if(__offset>0) { | |
| 421 (result)=_UTRIE_GET_RAW((&idnTrie), index, __offset, (0x2323E)&0x3ff); | |
| 422 } else { | |
| 423 (result)=(uint32_t)((&idnTrie)->initialValue); | |
| 424 } | |
| 425 | |
| 426 UTRIE_GET16(&idnTrie,0x2323E, result); | |
| 427 */ | |
| 428 while(start < end+1){ | |
| 429 UTRIE_GET16(idnTrie,start, result); | |
| 430 retType = getValues(result,value,isIndex); | |
| 431 if(result > _SPREP_TYPE_THRESHOLD){ | |
| 432 if(retType != type){ | |
| 433 pTestIDNA->errln( "FAIL: Did not get the expected type for 0x%06
X. Expected: %s Got: %s\n",start,usprepTypeNames[type], usprepTypeNames[retType]
); | |
| 434 } | |
| 435 }else{ | |
| 436 if(type == USPREP_PROHIBITED && ((result & 0x01) != 0x01)){ | |
| 437 pTestIDNA->errln( "FAIL: Did not get the expected type for 0x%06
X. Expected: %s Got: %s\n",start,usprepTypeNames[type], usprepTypeNames[retType]
); | |
| 438 } | |
| 439 } | |
| 440 | |
| 441 start++; | |
| 442 } | |
| 443 | |
| 444 } | |
| 445 | |
| 446 | |
| 447 #endif /* #if !UCONFIG_NO_IDNA */ | |
| 448 | |
| 449 /* | |
| 450 * Hey, Emacs, please set the following: | |
| 451 * | |
| 452 * Local Variables: | |
| 453 * indent-tabs-mode: nil | |
| 454 * End: | |
| 455 * | |
| 456 */ | |
| OLD | NEW |