1 /* 2 ******************************************************************************* 3 * Copyright (C) 2008-2012, International Business Machines Corporation and 4 * others. All Rights Reserved. 5 ******************************************************************************* 6 * 7 * 8 * File GENDER.CPP 9 * 10 * Modification History:* 11 * Date Name Description 12 * 13 ******************************************************************************** 14 */ 15 16 #include "unicode/utypes.h" 17 18 #if !UCONFIG_NO_FORMATTING 19 20 #include "unicode/gender.h" 21 #include "unicode/ugender.h" 22 #include "unicode/ures.h" 23 24 #include "cmemory.h" 25 #include "cstring.h" 26 #include "mutex.h" 27 #include "ucln_in.h" 28 #include "umutex.h" 29 #include "uhash.h" 30 31 static UHashtable* gGenderInfoCache = NULL; 32 static UMutex gGenderMetaLock = U_MUTEX_INITIALIZER; 33 static const char* gNeutralStr = "neutral"; 34 static const char* gMailTaintsStr = "maleTaints"; 35 static const char* gMixedNeutralStr = "mixedNeutral"; 36 static icu::GenderInfo* gObjs = NULL; 37 38 enum GenderStyle { 39 NEUTRAL, 40 MIXED_NEUTRAL, 41 MALE_TAINTS, 42 GENDER_STYLE_LENGTH 43 }; 44 45 U_CDECL_BEGIN 46 47 static UBool U_CALLCONV gender_cleanup(void) { 48 if (gGenderInfoCache != NULL) { 49 uhash_close(gGenderInfoCache); 50 gGenderInfoCache = NULL; 51 delete [] gObjs; 52 } 53 return TRUE; 54 } 55 56 U_CDECL_END 57 58 U_NAMESPACE_BEGIN 59 60 GenderInfo::GenderInfo() { 61 } 62 63 GenderInfo::~GenderInfo() { 64 } 65 66 const GenderInfo* GenderInfo::getInstance(const Locale& locale, UErrorCode& status) { 67 if (U_FAILURE(status)) { 68 return NULL; 69 } 70 71 // Make sure our cache exists. 72 UBool needed; 73 UMTX_CHECK(&gGenderMetaLock, (gGenderInfoCache == NULL), needed); 74 if (needed) { 75 Mutex lock(&gGenderMetaLock); 76 if (gGenderInfoCache == NULL) { 77 gObjs = new GenderInfo[GENDER_STYLE_LENGTH]; 78 if (gObjs == NULL) { 79 status = U_MEMORY_ALLOCATION_ERROR; 80 return NULL; 81 } 82 for (int i = 0; i < GENDER_STYLE_LENGTH; i++) { 83 gObjs[i]._style = i; 84 } 85 gGenderInfoCache = uhash_open(uhash_hashChars, uhash_compareChars, NULL, &status); 86 if (U_FAILURE(status)) { 87 delete [] gObjs; 88 return NULL; 89 } 90 uhash_setKeyDeleter(gGenderInfoCache, uprv_free); 91 ucln_i18n_registerCleanup(UCLN_I18N_GENDERINFO, gender_cleanup); 92 } 93 } 94 95 const GenderInfo* result = NULL; 96 const char* key = locale.getName(); 97 { 98 Mutex lock(&gGenderMetaLock); 99 result = (const GenderInfo*) uhash_get(gGenderInfoCache, key); 100 } 101 if (result) { 102 return result; 103 } 104 105 // On cache miss, try to create GenderInfo from CLDR data 106 result = loadInstance(locale, status); 107 if (U_FAILURE(status)) { 108 return NULL; 109 } 110 111 // Try to put our GenderInfo object in cache. If there is a race condition, 112 // favor the GenderInfo object that is already in the cache. 113 { 114 Mutex lock(&gGenderMetaLock); 115 GenderInfo* temp = (GenderInfo*) uhash_get(gGenderInfoCache, key); 116 if (temp) { 117 result = temp; 118 } else { 119 uhash_put(gGenderInfoCache, uprv_strdup(key), (void*) result, &status); 120 if (U_FAILURE(status)) { 121 return NULL; 122 } 123 } 124 } 125 return result; 126 } 127 128 const GenderInfo* GenderInfo::loadInstance(const Locale& locale, UErrorCode& status) { 129 LocalUResourceBundlePointer rb( 130 ures_openDirect(NULL, "genderList", &status)); 131 if (U_FAILURE(status)) { 132 return NULL; 133 } 134 LocalUResourceBundlePointer locRes(ures_getByKey(rb.getAlias(), "genderList", NULL, &status)); 135 if (U_FAILURE(status)) { 136 return NULL; 137 } 138 int32_t resLen = 0; 139 const char* curLocaleName = locale.getName(); 140 UErrorCode key_status = U_ZERO_ERROR; 141 const UChar* s = ures_getStringByKey(locRes.getAlias(), curLocaleName, &resLen, &key_status); 142 if (s == NULL) { 143 key_status = U_ZERO_ERROR; 144 char parentLocaleName[ULOC_FULLNAME_CAPACITY]; 145 uprv_strcpy(parentLocaleName, curLocaleName); 146 while (s == NULL && uloc_getParent(parentLocaleName, parentLocaleName, ULOC_FULLNAME_CAPACITY, &key_status) > 0) { 147 key_status = U_ZERO_ERROR; 148 resLen = 0; 149 s = ures_getStringByKey(locRes.getAlias(), parentLocaleName, &resLen, &key_status); 150 key_status = U_ZERO_ERROR; 151 } 152 } 153 if (s == NULL) { 154 return &gObjs[NEUTRAL]; 155 } 156 char type_str[256]; 157 u_UCharsToChars(s, type_str, resLen + 1); 158 if (uprv_strcmp(type_str, gNeutralStr) == 0) { 159 return &gObjs[NEUTRAL]; 160 } 161 if (uprv_strcmp(type_str, gMixedNeutralStr) == 0) { 162 return &gObjs[MIXED_NEUTRAL]; 163 } 164 if (uprv_strcmp(type_str, gMailTaintsStr) == 0) { 165 return &gObjs[MALE_TAINTS]; 166 } 167 return &gObjs[NEUTRAL]; 168 } 169 170 UGender GenderInfo::getListGender(const UGender* genders, int32_t length, UErrorCode& status) const { 171 if (U_FAILURE(status)) { 172 return UGENDER_OTHER; 173 } 174 if (length == 0) { 175 return UGENDER_OTHER; 176 } 177 if (length == 1) { 178 return genders[0]; 179 } 180 UBool has_female = FALSE; 181 UBool has_male = FALSE; 182 switch (_style) { 183 case NEUTRAL: 184 return UGENDER_OTHER; 185 case MIXED_NEUTRAL: 186 for (int32_t i = 0; i < length; ++i) { 187 switch (genders[i]) { 188 case UGENDER_OTHER: 189 return UGENDER_OTHER; 190 break; 191 case UGENDER_FEMALE: 192 if (has_male) { 193 return UGENDER_OTHER; 194 } 195 has_female = TRUE; 196 break; 197 case UGENDER_MALE: 198 if (has_female) { 199 return UGENDER_OTHER; 200 } 201 has_male = TRUE; 202 break; 203 default: 204 break; 205 } 206 } 207 return has_male ? UGENDER_MALE : UGENDER_FEMALE; 208 break; 209 case MALE_TAINTS: 210 for (int32_t i = 0; i < length; ++i) { 211 if (genders[i] != UGENDER_FEMALE) { 212 return UGENDER_MALE; 213 } 214 } 215 return UGENDER_FEMALE; 216 break; 217 default: 218 return UGENDER_OTHER; 219 break; 220 } 221 } 222 223 const GenderInfo* GenderInfo::getNeutralInstance() { 224 return &gObjs[NEUTRAL]; 225 } 226 227 const GenderInfo* GenderInfo::getMixedNeutralInstance() { 228 return &gObjs[MIXED_NEUTRAL]; 229 } 230 231 const GenderInfo* GenderInfo::getMaleTaintsInstance() { 232 return &gObjs[MALE_TAINTS]; 233 } 234 235 U_NAMESPACE_END 236 237 U_CAPI const UGenderInfo* U_EXPORT2 238 ugender_getInstance(const char* locale, UErrorCode* status) { 239 return (const UGenderInfo*) icu::GenderInfo::getInstance(locale, *status); 240 } 241 242 U_CAPI UGender U_EXPORT2 243 ugender_getListGender(const UGenderInfo* genderInfo, const UGender* genders, int32_t size, UErrorCode* status) { 244 return ((const icu::GenderInfo *)genderInfo)->getListGender(genders, size, *status); 245 } 246 247 #endif /* #if !UCONFIG_NO_FORMATTING */ 248
