Home | History | Annotate | Download | only in i18n 
      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