/src/icu/source/common/propname.cpp

Source (jump to first uncovered line)
// © 2016 and later: Unicode, Inc. and others.
// License & terms of use: http://www.unicode.org/copyright.html
/*
**********************************************************************
* Copyright (c) 2002-2014, International Business Machines
* Corporation and others.  All Rights Reserved.
**********************************************************************
* Author: Alan Liu
* Created: October 30 2002
* Since: ICU 2.4
* 2010nov19 Markus Scherer  Rewrite for formatVersion 2.
**********************************************************************
*/
#include "propname.h"
#include "unicode/uchar.h"
#include "unicode/udata.h"
#include "unicode/uscript.h"
#include "umutex.h"
#include "cmemory.h"
#include "cstring.h"
#include "uarrsort.h"
#include "uinvchar.h"

#define INCLUDED_FROM_PROPNAME_CPP
#include "propname_data.h"

U_CDECL_BEGIN

/**
 * Get the next non-ignorable ASCII character from a property name
 * and lowercases it.
 * @return ((advance count for the name)<<8)|character
 */
static inline int32_t
getASCIIPropertyNameChar(const char *name) {
    int32_t i;
    char c;

    /* Ignore delimiters '-', '_', and ASCII White_Space */
    for(i=0;
        (c=name[i++])==0x2d || c==0x5f ||
        c==0x20 || (0x09<=c && c<=0x0d);
    ) {}

    if(c!=0) {
        return (i<<8)|(uint8_t)uprv_asciitolower((char)c);
    } else {
        return i<<8;
    }
}

/**
 * Get the next non-ignorable EBCDIC character from a property name
 * and lowercases it.
 * @return ((advance count for the name)<<8)|character
 */
static inline int32_t
getEBCDICPropertyNameChar(const char *name) {
    int32_t i;
    char c;

    /* Ignore delimiters '-', '_', and EBCDIC White_Space */
    for(i=0;
        (c=name[i++])==0x60 || c==0x6d ||
        c==0x40 || c==0x05 || c==0x15 || c==0x25 || c==0x0b || c==0x0c || c==0x0d;
    ) {}

    if(c!=0) {
        return (i<<8)|(uint8_t)uprv_ebcdictolower((char)c);
    } else {
        return i<<8;
    }
}

/**
 * Unicode property names and property value names are compared "loosely".
 *
 * UCD.html 4.0.1 says:
 *   For all property names, property value names, and for property values for
 *   Enumerated, Binary, or Catalog properties, use the following
 *   loose matching rule:
 *
 *   LM3. Ignore case, whitespace, underscore ('_'), and hyphens.
 *
 * This function does just that, for (char *) name strings.
 * It is almost identical to ucnv_compareNames() but also ignores
 * C0 White_Space characters (U+0009..U+000d, and U+0085 on EBCDIC).
 *
 * @internal
 */

U_CAPI int32_t U_EXPORT2
uprv_compareASCIIPropertyNames(const char *name1, const char *name2) {
    int32_t rc, r1, r2;

    for(;;) {
        r1=getASCIIPropertyNameChar(name1);
        r2=getASCIIPropertyNameChar(name2);

        /* If we reach the ends of both strings then they match */
        if(((r1|r2)&0xff)==0) {
            return 0;
        }

        /* Compare the lowercased characters */
        if(r1!=r2) {
            rc=(r1&0xff)-(r2&0xff);
            if(rc!=0) {
                return rc;
            }
        }

        name1+=r1>>8;
        name2+=r2>>8;
    }
}

U_CAPI int32_t U_EXPORT2
uprv_compareEBCDICPropertyNames(const char *name1, const char *name2) {
    int32_t rc, r1, r2;

    for(;;) {
        r1=getEBCDICPropertyNameChar(name1);
        r2=getEBCDICPropertyNameChar(name2);

        /* If we reach the ends of both strings then they match */
        if(((r1|r2)&0xff)==0) {
            return 0;
        }

        /* Compare the lowercased characters */
        if(r1!=r2) {
            rc=(r1&0xff)-(r2&0xff);
            if(rc!=0) {
                return rc;
            }
        }

        name1+=r1>>8;
        name2+=r2>>8;
    }
}

U_CDECL_END

U_NAMESPACE_BEGIN

int32_t PropNameData::findProperty(int32_t property) {
    int32_t i=1;  // valueMaps index, initially after numRanges
    for(int32_t numRanges=valueMaps[0]; numRanges>0; --numRanges) {
        // Read and skip the start and limit of this range.
        int32_t start=valueMaps[i];
        int32_t limit=valueMaps[i+1];
        i+=2;
        if(property<start) {
            break;
        }
        if(property<limit) {
            return i+(property-start)*2;
        }
        i+=(limit-start)*2;  // Skip all entries for this range.
    }
    return 0;
}

int32_t PropNameData::findPropertyValueNameGroup(int32_t valueMapIndex, int32_t value) {
    if(valueMapIndex==0) {
        return 0;  // The property does not have named values.
    }
    ++valueMapIndex;  // Skip the BytesTrie offset.
    int32_t numRanges=valueMaps[valueMapIndex++];
    if(numRanges<0x10) {
        // Ranges of values.
        for(; numRanges>0; --numRanges) {
            // Read and skip the start and limit of this range.
            int32_t start=valueMaps[valueMapIndex];
            int32_t limit=valueMaps[valueMapIndex+1];
            valueMapIndex+=2;
            if(value<start) {
                break;
            }
            if(value<limit) {
                return valueMaps[valueMapIndex+value-start];
            }
            valueMapIndex+=limit-start;  // Skip all entries for this range.
        }
    } else {
        // List of values.
        int32_t valuesStart=valueMapIndex;
        int32_t nameGroupOffsetsStart=valueMapIndex+numRanges-0x10;
        do {
            int32_t v=valueMaps[valueMapIndex];
            if(value<v) {
                break;
            }
            if(value==v) {
                return valueMaps[nameGroupOffsetsStart+valueMapIndex-valuesStart];
            }
        } while(++valueMapIndex<nameGroupOffsetsStart);
    }
    return 0;
}

const char *PropNameData::getName(const char *nameGroup, int32_t nameIndex) {
    int32_t numNames=*nameGroup++;
    if(nameIndex<0 || numNames<=nameIndex) {
        return NULL;
    }
    // Skip nameIndex names.
    for(; nameIndex>0; --nameIndex) {
        nameGroup=uprv_strchr(nameGroup, 0)+1;
    }
    if(*nameGroup==0) {
        return NULL;  // no name (Property[Value]Aliases.txt has "n/a")
    }
    return nameGroup;
}

UBool PropNameData::containsName(BytesTrie &trie, const char *name) {
    if(name==NULL) {
        return FALSE;
    }
    UStringTrieResult result=USTRINGTRIE_NO_VALUE;
    char c;
    while((c=*name++)!=0) {
        c=uprv_invCharToLowercaseAscii(c);
        // Ignore delimiters '-', '_', and ASCII White_Space.
        if(c==0x2d || c==0x5f || c==0x20 || (0x09<=c && c<=0x0d)) {
            continue;
        }
        if(!USTRINGTRIE_HAS_NEXT(result)) {
            return FALSE;
        }
        result=trie.next((uint8_t)c);
    }
    return USTRINGTRIE_HAS_VALUE(result);
}

const char *PropNameData::getPropertyName(int32_t property, int32_t nameChoice) {
    int32_t valueMapIndex=findProperty(property);
    if(valueMapIndex==0) {
        return NULL;  // Not a known property.
    }
    return getName(nameGroups+valueMaps[valueMapIndex], nameChoice);
}

const char *PropNameData::getPropertyValueName(int32_t property, int32_t value, int32_t nameChoice) {
    int32_t valueMapIndex=findProperty(property);
    if(valueMapIndex==0) {
        return NULL;  // Not a known property.
    }
    int32_t nameGroupOffset=findPropertyValueNameGroup(valueMaps[valueMapIndex+1], value);
    if(nameGroupOffset==0) {
        return NULL;
    }
    return getName(nameGroups+nameGroupOffset, nameChoice);
}

int32_t PropNameData::getPropertyOrValueEnum(int32_t bytesTrieOffset, const char *alias) {
    BytesTrie trie(bytesTries+bytesTrieOffset);
    if(containsName(trie, alias)) {
        return trie.getValue();
    } else {
        return UCHAR_INVALID_CODE;
    }
}

int32_t PropNameData::getPropertyEnum(const char *alias) {
    return getPropertyOrValueEnum(0, alias);
}

int32_t PropNameData::getPropertyValueEnum(int32_t property, const char *alias) {
    int32_t valueMapIndex=findProperty(property);
    if(valueMapIndex==0) {
        return UCHAR_INVALID_CODE;  // Not a known property.
    }
    valueMapIndex=valueMaps[valueMapIndex+1];
    if(valueMapIndex==0) {
        return UCHAR_INVALID_CODE;  // The property does not have named values.
    }
    // valueMapIndex is the start of the property's valueMap,
    // where the first word is the BytesTrie offset.
    return getPropertyOrValueEnum(valueMaps[valueMapIndex], alias);
}
U_NAMESPACE_END

//----------------------------------------------------------------------
// Public API implementation

U_CAPI const char* U_EXPORT2
u_getPropertyName(UProperty property,
                  UPropertyNameChoice nameChoice) {
    U_NAMESPACE_USE
    return PropNameData::getPropertyName(property, nameChoice);
}

U_CAPI UProperty U_EXPORT2
u_getPropertyEnum(const char* alias) {
    U_NAMESPACE_USE
    return (UProperty)PropNameData::getPropertyEnum(alias);
}

U_CAPI const char* U_EXPORT2
u_getPropertyValueName(UProperty property,
                       int32_t value,
                       UPropertyNameChoice nameChoice) {
    U_NAMESPACE_USE
    return PropNameData::getPropertyValueName(property, value, nameChoice);
}

U_CAPI int32_t U_EXPORT2
u_getPropertyValueEnum(UProperty property,
                       const char* alias) {
    U_NAMESPACE_USE
    return PropNameData::getPropertyValueEnum(property, alias);
}

U_CAPI const char*  U_EXPORT2
uscript_getName(UScriptCode scriptCode){
    return u_getPropertyValueName(UCHAR_SCRIPT, scriptCode,
                                  U_LONG_PROPERTY_NAME);
}

U_CAPI const char*  U_EXPORT2
uscript_getShortName(UScriptCode scriptCode){
    return u_getPropertyValueName(UCHAR_SCRIPT, scriptCode,
                                  U_SHORT_PROPERTY_NAME);
}

Coverage Report

Created: 2025-01-28 06:38

Line	Count	Source (jump to first uncovered line)
1		// © 2016 and later: Unicode, Inc. and others.
2		// License & terms of use: http://www.unicode.org/copyright.html
3		/*
4		**********************************************************************
5		* Copyright (c) 2002-2014, International Business Machines
6		* Corporation and others. All Rights Reserved.
7		**********************************************************************
8		* Author: Alan Liu
9		* Created: October 30 2002
10		* Since: ICU 2.4
11		* 2010nov19 Markus Scherer Rewrite for formatVersion 2.
12		**********************************************************************
13		*/
14		#include "propname.h"
15		#include "unicode/uchar.h"
16		#include "unicode/udata.h"
17		#include "unicode/uscript.h"
18		#include "umutex.h"
19		#include "cmemory.h"
20		#include "cstring.h"
21		#include "uarrsort.h"
22		#include "uinvchar.h"
23
24		#define INCLUDED_FROM_PROPNAME_CPP
25		#include "propname_data.h"
26
27		U_CDECL_BEGIN
28
29		/**
30		* Get the next non-ignorable ASCII character from a property name
31		* and lowercases it.
32		* @return ((advance count for the name)<<8)\|character
33		*/
34		static inline int32_t
35	0	getASCIIPropertyNameChar(const char *name) {
36	0	int32_t i;
37	0	char c;
38
39		/* Ignore delimiters '-', '_', and ASCII White_Space */
40	0	for(i=0;
41	0	(c=name[i++])==0x2d \|\| c==0x5f \|\|
42	0	c==0x20 \|\| (0x09<=c && c<=0x0d);
43	0	) {}
44
45	0	if(c!=0) {
46	0	return (i<<8)\|(uint8_t)uprv_asciitolower((char)c);
47	0	} else {
48	0	return i<<8;
49	0	}
50	0	}
51
52		/**
53		* Get the next non-ignorable EBCDIC character from a property name
54		* and lowercases it.
55		* @return ((advance count for the name)<<8)\|character
56		*/
57		static inline int32_t
58	0	getEBCDICPropertyNameChar(const char *name) {
59	0	int32_t i;
60	0	char c;
61
62		/* Ignore delimiters '-', '_', and EBCDIC White_Space */
63	0	for(i=0;
64	0	(c=name[i++])==0x60 \|\| c==0x6d \|\|
65	0	c==0x40 \|\| c==0x05 \|\| c==0x15 \|\| c==0x25 \|\| c==0x0b \|\| c==0x0c \|\| c==0x0d;
66	0	) {}
67
68	0	if(c!=0) {
69	0	return (i<<8)\|(uint8_t)uprv_ebcdictolower((char)c);
70	0	} else {
71	0	return i<<8;
72	0	}
73	0	}
74
75		/**
76		* Unicode property names and property value names are compared "loosely".
77		*
78		* UCD.html 4.0.1 says:
79		* For all property names, property value names, and for property values for
80		* Enumerated, Binary, or Catalog properties, use the following
81		* loose matching rule:
82		*
83		* LM3. Ignore case, whitespace, underscore ('_'), and hyphens.
84		*
85		* This function does just that, for (char *) name strings.
86		* It is almost identical to ucnv_compareNames() but also ignores
87		* C0 White_Space characters (U+0009..U+000d, and U+0085 on EBCDIC).
88		*
89		* @internal
90		*/
91
92		U_CAPI int32_t U_EXPORT2
93	0	uprv_compareASCIIPropertyNames(const char name1, const char name2) {
94	0	int32_t rc, r1, r2;
95
96	0	for(;;) {
97	0	r1=getASCIIPropertyNameChar(name1);
98	0	r2=getASCIIPropertyNameChar(name2);
99
100		/* If we reach the ends of both strings then they match */
101	0	if(((r1\|r2)&0xff)==0) {
102	0	return 0;
103	0	}
104
105		/* Compare the lowercased characters */
106	0	if(r1!=r2) {
107	0	rc=(r1&0xff)-(r2&0xff);
108	0	if(rc!=0) {
109	0	return rc;
110	0	}
111	0	}
112
113	0	name1+=r1>>8;
114	0	name2+=r2>>8;
115	0	}
116	0	}
117
118		U_CAPI int32_t U_EXPORT2
119	0	uprv_compareEBCDICPropertyNames(const char name1, const char name2) {
120	0	int32_t rc, r1, r2;
121
122	0	for(;;) {
123	0	r1=getEBCDICPropertyNameChar(name1);
124	0	r2=getEBCDICPropertyNameChar(name2);
125
126		/* If we reach the ends of both strings then they match */
127	0	if(((r1\|r2)&0xff)==0) {
128	0	return 0;
129	0	}
130
131		/* Compare the lowercased characters */
132	0	if(r1!=r2) {
133	0	rc=(r1&0xff)-(r2&0xff);
134	0	if(rc!=0) {
135	0	return rc;
136	0	}
137	0	}
138
139	0	name1+=r1>>8;
140	0	name2+=r2>>8;
141	0	}
142	0	}
143
144		U_CDECL_END
145
146		U_NAMESPACE_BEGIN
147
148	0	int32_t PropNameData::findProperty(int32_t property) {
149	0	int32_t i=1; // valueMaps index, initially after numRanges
150	0	for(int32_t numRanges=valueMaps[0]; numRanges>0; --numRanges) {
151		// Read and skip the start and limit of this range.
152	0	int32_t start=valueMaps[i];
153	0	int32_t limit=valueMaps[i+1];
154	0	i+=2;
155	0	if(property<start) {
156	0	break;
157	0	}
158	0	if(property<limit) {
159	0	return i+(property-start)*2;
160	0	}
161	0	i+=(limit-start)*2; // Skip all entries for this range.
162	0	}
163	0	return 0;
164	0	}
165
166	0	int32_t PropNameData::findPropertyValueNameGroup(int32_t valueMapIndex, int32_t value) {
167	0	if(valueMapIndex==0) {
168	0	return 0; // The property does not have named values.
169	0	}
170	0	++valueMapIndex; // Skip the BytesTrie offset.
171	0	int32_t numRanges=valueMaps[valueMapIndex++];
172	0	if(numRanges<0x10) {
173		// Ranges of values.
174	0	for(; numRanges>0; --numRanges) {
175		// Read and skip the start and limit of this range.
176	0	int32_t start=valueMaps[valueMapIndex];
177	0	int32_t limit=valueMaps[valueMapIndex+1];
178	0	valueMapIndex+=2;
179	0	if(value<start) {
180	0	break;
181	0	}
182	0	if(value<limit) {
183	0	return valueMaps[valueMapIndex+value-start];
184	0	}
185	0	valueMapIndex+=limit-start; // Skip all entries for this range.
186	0	}
187	0	} else {
188		// List of values.
189	0	int32_t valuesStart=valueMapIndex;
190	0	int32_t nameGroupOffsetsStart=valueMapIndex+numRanges-0x10;
191	0	do {
192	0	int32_t v=valueMaps[valueMapIndex];
193	0	if(value<v) {
194	0	break;
195	0	}
196	0	if(value==v) {
197	0	return valueMaps[nameGroupOffsetsStart+valueMapIndex-valuesStart];
198	0	}
199	0	} while(++valueMapIndex<nameGroupOffsetsStart);
200	0	}
201	0	return 0;
202	0	}
203
204	0	const char PropNameData::getName(const char nameGroup, int32_t nameIndex) {
205	0	int32_t numNames=*nameGroup++;
206	0	if(nameIndex<0 \|\| numNames<=nameIndex) {
207	0	return NULL;
208	0	}
209		// Skip nameIndex names.
210	0	for(; nameIndex>0; --nameIndex) {
211	0	nameGroup=uprv_strchr(nameGroup, 0)+1;
212	0	}
213	0	if(*nameGroup==0) {
214	0	return NULL; // no name (Property[Value]Aliases.txt has "n/a")
215	0	}
216	0	return nameGroup;
217	0	}
218
219	0	UBool PropNameData::containsName(BytesTrie &trie, const char *name) {
220	0	if(name==NULL) {
221	0	return FALSE;
222	0	}
223	0	UStringTrieResult result=USTRINGTRIE_NO_VALUE;
224	0	char c;
225	0	while((c=*name++)!=0) {
226	0	c=uprv_invCharToLowercaseAscii(c);
227		// Ignore delimiters '-', '_', and ASCII White_Space.
228	0	if(c==0x2d \|\| c==0x5f \|\| c==0x20 \|\| (0x09<=c && c<=0x0d)) {
229	0	continue;
230	0	}
231	0	if(!USTRINGTRIE_HAS_NEXT(result)) {
232	0	return FALSE;
233	0	}
234	0	result=trie.next((uint8_t)c);
235	0	}
236	0	return USTRINGTRIE_HAS_VALUE(result);
237	0	}
238
239	0	const char *PropNameData::getPropertyName(int32_t property, int32_t nameChoice) {
240	0	int32_t valueMapIndex=findProperty(property);
241	0	if(valueMapIndex==0) {
242	0	return NULL; // Not a known property.
243	0	}
244	0	return getName(nameGroups+valueMaps[valueMapIndex], nameChoice);
245	0	}
246
247	0	const char *PropNameData::getPropertyValueName(int32_t property, int32_t value, int32_t nameChoice) {
248	0	int32_t valueMapIndex=findProperty(property);
249	0	if(valueMapIndex==0) {
250	0	return NULL; // Not a known property.
251	0	}
252	0	int32_t nameGroupOffset=findPropertyValueNameGroup(valueMaps[valueMapIndex+1], value);
253	0	if(nameGroupOffset==0) {
254	0	return NULL;
255	0	}
256	0	return getName(nameGroups+nameGroupOffset, nameChoice);
257	0	}
258
259	0	int32_t PropNameData::getPropertyOrValueEnum(int32_t bytesTrieOffset, const char *alias) {
260	0	BytesTrie trie(bytesTries+bytesTrieOffset);
261	0	if(containsName(trie, alias)) {
262	0	return trie.getValue();
263	0	} else {
264	0	return UCHAR_INVALID_CODE;
265	0	}
266	0	}
267
268	0	int32_t PropNameData::getPropertyEnum(const char *alias) {
269	0	return getPropertyOrValueEnum(0, alias);
270	0	}
271
272	0	int32_t PropNameData::getPropertyValueEnum(int32_t property, const char *alias) {
273	0	int32_t valueMapIndex=findProperty(property);
274	0	if(valueMapIndex==0) {
275	0	return UCHAR_INVALID_CODE; // Not a known property.
276	0	}
277	0	valueMapIndex=valueMaps[valueMapIndex+1];
278	0	if(valueMapIndex==0) {
279	0	return UCHAR_INVALID_CODE; // The property does not have named values.
280	0	}
281		// valueMapIndex is the start of the property's valueMap,
282		// where the first word is the BytesTrie offset.
283	0	return getPropertyOrValueEnum(valueMaps[valueMapIndex], alias);
284	0	}
285		U_NAMESPACE_END
286
287		//----------------------------------------------------------------------
288		// Public API implementation
289
290		U_CAPI const char* U_EXPORT2
291		u_getPropertyName(UProperty property,
292	0	UPropertyNameChoice nameChoice) {
293	0	U_NAMESPACE_USE
294	0	return PropNameData::getPropertyName(property, nameChoice);
295	0	}
296
297		U_CAPI UProperty U_EXPORT2
298	0	u_getPropertyEnum(const char* alias) {
299	0	U_NAMESPACE_USE
300	0	return (UProperty)PropNameData::getPropertyEnum(alias);
301	0	}
302
303		U_CAPI const char* U_EXPORT2
304		u_getPropertyValueName(UProperty property,
305		int32_t value,
306	0	UPropertyNameChoice nameChoice) {
307	0	U_NAMESPACE_USE
308	0	return PropNameData::getPropertyValueName(property, value, nameChoice);
309	0	}
310
311		U_CAPI int32_t U_EXPORT2
312		u_getPropertyValueEnum(UProperty property,
313	0	const char* alias) {
314	0	U_NAMESPACE_USE
315	0	return PropNameData::getPropertyValueEnum(property, alias);
316	0	}
317
318		U_CAPI const char* U_EXPORT2
319	0	uscript_getName(UScriptCode scriptCode){
320	0	return u_getPropertyValueName(UCHAR_SCRIPT, scriptCode,
321	0	U_LONG_PROPERTY_NAME);
322	0	}
323
324		U_CAPI const char* U_EXPORT2
325	0	uscript_getShortName(UScriptCode scriptCode){
326	0	return u_getPropertyValueName(UCHAR_SCRIPT, scriptCode,
327	0	U_SHORT_PROPERTY_NAME);
328	0	}