Check in the pristine copy of ICU 4.6...

icu46/source/test/cintltst/nfsprep.c

+/*
+ *******************************************************************************
+ *
+ *   Copyright (C) 2003-2007, International Business Machines
+ *   Corporation and others.  All Rights Reserved.
+ *
+ *******************************************************************************
+ *   file name:  nfsprep.c
+ *   encoding:   US-ASCII
+ *   tab size:   8 (not used)
+ *   indentation:4
+ *
+ *   created on: 2003jul11
+ *   created by: Ram Viswanadha
+ */
+
+#include "unicode/utypes.h"
+
+#if !UCONFIG_NO_IDNA
+
+#include "nfsprep.h"
+#include "ustr_imp.h"
+#include "cintltst.h"
+
+#define LENGTHOF(array) (int32_t)(sizeof(array)/sizeof((array)[0]))
+#define NFS4_MAX_BUFFER_SIZE 1000
+#define PREFIX_SUFFIX_SEPARATOR 0x0040 /* '@' */
+
+
+const char* NFS4DataFileNames[5] ={
+    "nfscss",
+    "nfscsi",
+    "nfscis",
+    "nfsmxp",
+    "nfsmxs"
+};
+
+
+int32_t
+nfs4_prepare( const char* src, int32_t srcLength,
+              char* dest, int32_t destCapacity,
+              NFS4ProfileState state,
+              UParseError* parseError,
+              UErrorCode*  status){
+    
+    UChar b1Stack[NFS4_MAX_BUFFER_SIZE], 
+          b2Stack[NFS4_MAX_BUFFER_SIZE]; 
+    char  b3Stack[NFS4_MAX_BUFFER_SIZE];
+
+    /* initialize pointers to stack buffers */
+    UChar *b1 = b1Stack, *b2 = b2Stack;
+    char  *b3=b3Stack;
+    int32_t b1Len=0, b2Len=0, b3Len=0,
+            b1Capacity = NFS4_MAX_BUFFER_SIZE, 
+            b2Capacity = NFS4_MAX_BUFFER_SIZE,
+            b3Capacity = NFS4_MAX_BUFFER_SIZE,
+            reqLength=0;
+    
+    UStringPrepProfile* profile = NULL;
+    /* get the test data path */
+    const char *testdatapath = NULL;
+
+    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;
+    }
+    testdatapath = loadTestData(status);
+
+    /* convert the string from UTF-8 to UTF-16 */
+    u_strFromUTF8(b1,b1Capacity,&b1Len,src,srcLength,status);
+    if(*status == U_BUFFER_OVERFLOW_ERROR){
+
+        /* reset the status */
+        *status = U_ZERO_ERROR;
+        
+        b1 = (UChar*) malloc(b1Len * U_SIZEOF_UCHAR);
+        if(b1==NULL){
+            *status = U_MEMORY_ALLOCATION_ERROR;
+            goto CLEANUP;
+        }
+
+        b1Capacity = b1Len;
+        u_strFromUTF8(b1, b1Capacity, &b1Len, src, srcLength, status);
+    }
+
+    /* open the profile */
+    profile = usprep_open(testdatapath, NFS4DataFileNames[state],  status);
+    /* prepare the string */
+    b2Len = usprep_prepare(profile, b1, b1Len, b2, b2Capacity, USPREP_DEFAULT, parseError, status);
+    if(*status == U_BUFFER_OVERFLOW_ERROR){
+        *status = U_ZERO_ERROR;
+        b2 = (UChar*) malloc(b2Len * U_SIZEOF_UCHAR);
+        if(b2== NULL){
+            *status = U_MEMORY_ALLOCATION_ERROR;
+            goto CLEANUP;
+        }
+        b2Len = usprep_prepare(profile, b1, b1Len, b2, b2Len, USPREP_DEFAULT, parseError, status);
+    }
+    
+    /* convert the string back to UTF-8 */
+    u_strToUTF8(b3,b3Capacity, &b3Len, b2, b2Len, status);
+    if(*status == U_BUFFER_OVERFLOW_ERROR){
+        *status = U_ZERO_ERROR;
+        b3 = (char*) malloc(b3Len);
+        if(b3== NULL){
+            *status = U_MEMORY_ALLOCATION_ERROR;
+            goto CLEANUP;
+        }
+        b3Capacity = b3Len;
+        u_strToUTF8(b3,b3Capacity, &b3Len, b2, b2Len, status);
+    }
+
+    reqLength = b3Len;
+    if(dest!=NULL && reqLength <= destCapacity){
+        memmove(dest, b3, reqLength);
+    }
+
+CLEANUP:
+    if(b1!=b1Stack){
+        free(b1);
+    }
+    if(b2!=b2Stack){
+        free(b2);
+    }
+    if(b3!=b3Stack){
+        free(b3);
+    }
+
+    return u_terminateChars(dest, destCapacity, reqLength, status);
+}
+
+/* sorted array for binary search*/
+static const char* special_prefixes[]={
+    "\x0041\x004e\x004f\x004e\x0059\x004d\x004f\x0055\x0053",    
+    "\x0041\x0055\x0054\x0048\x0045\x004e\x0054\x0049\x0043\x0041\x0054\x0045\x0044",
+    "\x0042\x0041\x0054\x0043\x0048", 
+    "\x0044\x0049\x0041\x004c\x0055\x0050", 
+    "\x0045\x0056\x0045\x0052\x0059\x004f\x004e\x0045", 
+    "\x0047\x0052\x004f\x0055\x0050",
+    "\x0049\x004e\x0054\x0045\x0052\x0041\x0043\x0054\x0049\x0056\x0045",  
+    "\x004e\x0045\x0054\x0057\x004f\x0052\x004b", 
+    "\x004f\x0057\x004e\x0045\x0052",
+};
+
+
+/* binary search the sorted array */
+static int 
+findStringIndex(const char* const *sortedArr, int32_t sortedArrLen, const char* target, int32_t targetLen){
+
+    int left, middle, right,rc;
+
+    left =0;
+    right= sortedArrLen-1;
+
+    while(left <= right){
+        middle = (left+right)/2;
+        rc=strncmp(sortedArr[middle],target, targetLen);
+    
+        if(rc<0){
+            left = middle+1;
+        }else if(rc >0){
+            right = middle -1;
+        }else{
+            return middle;
+        }
+    }
+    return -1;
+}
+
+static void 
+getPrefixSuffix(const char *src, int32_t srcLength, 
+                const char **prefix, int32_t *prefixLen,
+                const char **suffix, int32_t *suffixLen,
+                UErrorCode *status){
+
+    int32_t i=0;
+    *prefix = src;
+    while(i<srcLength){
+        if(src[i] == PREFIX_SUFFIX_SEPARATOR){
+            if((i+1) == srcLength){
+                /* we reached the end of the string */
+                *suffix = NULL;
+                i++;
+                break;
+            }
+            i++;/* the prefix contains the separator */
+            *suffix = src + i;
+            break;
+        }
+        i++;
+    }
+    *prefixLen = i;
+    *suffixLen = srcLength - i;
+    /* special prefixes must not be followed by suffixes! */
+    if((findStringIndex(special_prefixes,LENGTHOF(special_prefixes), *prefix, *prefixLen-1) != -1) && (*suffix != NULL)){
+        *status = U_PARSE_ERROR;
+        return;
+    }
+            
+}
+
+int32_t
+nfs4_mixed_prepare( const char* src, int32_t srcLength,
+                    char* dest, int32_t destCapacity,
+                    UParseError* parseError,
+                    UErrorCode*  status){
+
+    const char *prefix = NULL, *suffix = NULL;
+    int32_t prefixLen=0, suffixLen=0;
+    char  pStack[NFS4_MAX_BUFFER_SIZE], 
+          sStack[NFS4_MAX_BUFFER_SIZE]; 
+    char *p=pStack, *s=sStack;
+    int32_t pLen=0, sLen=0, reqLen=0,
+            pCapacity = NFS4_MAX_BUFFER_SIZE,
+            sCapacity = NFS4_MAX_BUFFER_SIZE;
+
+
+    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;
+    }
+    if(srcLength == -1){
+        srcLength = (int32_t)strlen(src);
+    }
+    getPrefixSuffix(src, srcLength, &prefix, &prefixLen, &suffix, &suffixLen, status); 
+
+    /* prepare the prefix */
+    pLen = nfs4_prepare(prefix, prefixLen, p, pCapacity, NFS4_MIXED_PREP_PREFIX, parseError, status);
+    if(*status == U_BUFFER_OVERFLOW_ERROR){
+        *status = U_ZERO_ERROR;
+        p = (char*) malloc(pLen);
+        if(p == NULL){
+           *status = U_MEMORY_ALLOCATION_ERROR;
+           goto CLEANUP;
+        }
+        pLen = nfs4_prepare(prefix, prefixLen, p, pLen, NFS4_MIXED_PREP_PREFIX, parseError, status);
+    }
+
+    /* prepare the suffix */
+    if(suffix != NULL){
+        sLen = nfs4_prepare(suffix, suffixLen, s, sCapacity, NFS4_MIXED_PREP_SUFFIX, parseError, status);
+        if(*status == U_BUFFER_OVERFLOW_ERROR){
+            *status = U_ZERO_ERROR;
+            s = (char*) malloc(pLen);
+            if(s == NULL){
+               *status = U_MEMORY_ALLOCATION_ERROR;
+               goto CLEANUP;
+            }
+            sLen = nfs4_prepare(suffix, suffixLen, s, sLen, NFS4_MIXED_PREP_SUFFIX, parseError, status);
+        }
+    }
+    reqLen = pLen+sLen+1 /* for the delimiter */;
+    if(dest != NULL && reqLen <= destCapacity){
+        memmove(dest, p, pLen);
+        /* add the suffix */
+        if(suffix!=NULL){
+            dest[pLen++] = PREFIX_SUFFIX_SEPARATOR;
+            memmove(dest+pLen, s, sLen);
+        }
+    }
+
+CLEANUP:
+    if(p != pStack){
+        free(p);
+    }
+    if(s != sStack){
+        free(s);
+    }
+    
+    return u_terminateChars(dest, destCapacity, reqLen, status);
+}
+
+int32_t
+nfs4_cis_prepare(   const char* src, int32_t srcLength,
+                    char* dest, int32_t destCapacity,
+                    UParseError* parseError,
+                    UErrorCode*  status){
+    return nfs4_prepare(src, srcLength, dest, destCapacity, NFS4_CIS_PREP, parseError, status);
+}
+
+
+int32_t
+nfs4_cs_prepare(    const char* src, int32_t srcLength,
+                    char* dest, int32_t destCapacity,
+                    UBool isCaseSensitive,
+                    UParseError* parseError,
+                    UErrorCode*  status){
+    if(isCaseSensitive){
+        return nfs4_prepare(src, srcLength, dest, destCapacity, NFS4_CS_PREP_CS, parseError, status);
+    }else{
+        return nfs4_prepare(src, srcLength, dest, destCapacity, NFS4_CS_PREP_CI, parseError, status);
+    }
+}
+
+#endif
+/*
+ * Hey, Emacs, please set the following:
+ *
+ * Local Variables:
+ * indent-tabs-mode: nil
+ * End:
+ *
+ */
+