icuSources/i18n/gender.cpp

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