static const char * /* O - Filename */
http_gnutls_make_path(
char *buffer, /* I - Filename buffer */
size_t bufsize, /* I - Size of buffer */
const char *dirname, /* I - Directory */
const char *filename, /* I - Filename (usually hostname) */
const char *ext) /* I - Extension */
{
char *bufptr, /* Pointer into buffer */
*bufend = buffer + bufsize - 1; /* End of buffer */
snprintf(buffer, bufsize, "%s/", dirname);
bufptr = buffer + strlen(buffer);
while (*filename && bufptr < bufend)
{
if (_cups_isalnum(*filename) || *filename == '-' || *filename == '.')
*bufptr++ = *filename;
else
*bufptr++ = '_';
filename ++;
}
if (bufptr < bufend)
*bufptr++ = '.';
strlcpy(bufptr, ext, (size_t)(bufend - bufptr + 1));
return (buffer);
}
cups_lang_t * /* O - Language data */
cupsLangGet(const char *language) /* I - Language or locale */
{
int i; /* Looping var */
#ifndef __APPLE__
char locale[255]; /* Copy of locale name */
#endif /* !__APPLE__ */
char langname[16], /* Requested language name */
country[16], /* Country code */
charset[16], /* Character set */
*csptr, /* Pointer to CODESET string */
*ptr, /* Pointer into language/charset */
real[48]; /* Real language name */
cups_encoding_t encoding; /* Encoding to use */
cups_lang_t *lang; /* Current language... */
static const char * const locale_encodings[] =
{ /* Locale charset names */
"ASCII", "ISO88591", "ISO88592", "ISO88593",
"ISO88594", "ISO88595", "ISO88596", "ISO88597",
"ISO88598", "ISO88599", "ISO885910", "UTF8",
"ISO885913", "ISO885914", "ISO885915", "CP874",
"CP1250", "CP1251", "CP1252", "CP1253",
"CP1254", "CP1255", "CP1256", "CP1257",
"CP1258", "KOI8R", "KOI8U", "ISO885911",
"ISO885916", "MACROMAN", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"CP932", "CP936", "CP949", "CP950",
"CP1361", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"", "", "", "",
"EUCCN", "EUCJP", "EUCKR", "EUCTW",
"SHIFT_JISX0213"
};
DEBUG_printf(("2cupsLangGet(language=\"%s\")", language));
#ifdef __APPLE__
/*
* Set the character set to UTF-8...
*/
strlcpy(charset, "UTF8", sizeof(charset));
/*
* Apple's setlocale doesn't give us the user's localization
* preference so we have to look it up this way...
*/
if (!language)
{
if (!getenv("SOFTWARE") || (language = getenv("LANG")) == NULL)
language = appleLangDefault();
DEBUG_printf(("4cupsLangGet: language=\"%s\"", language));
}
#else
/*
* Set the charset to "unknown"...
*/
charset[0] = '\0';
/*
* Use setlocale() to determine the currently set locale, and then
* fallback to environment variables to avoid setting the locale,
* since setlocale() is not thread-safe!
*/
if (!language)
{
/*
* First see if the locale has been set; if it is still "C" or
* "POSIX", use the environment to get the default...
*/
# ifdef LC_MESSAGES
ptr = setlocale(LC_MESSAGES, NULL);
# else
ptr = setlocale(LC_ALL, NULL);
# endif /* LC_MESSAGES */
DEBUG_printf(("4cupsLangGet: current locale is \"%s\"", ptr));
if (!ptr || !strcmp(ptr, "C") || !strcmp(ptr, "POSIX"))
{
/*
* Get the character set from the LC_CTYPE locale setting...
*/
if ((ptr = getenv("LC_CTYPE")) == NULL)
if ((ptr = getenv("LC_ALL")) == NULL)
if ((ptr = getenv("LANG")) == NULL)
ptr = "en_US";
if ((csptr = strchr(ptr, '.')) != NULL)
{
/*
* Extract the character set from the environment...
*/
for (ptr = charset, csptr ++; *csptr; csptr ++)
if (ptr < (charset + sizeof(charset) - 1) && _cups_isalnum(*csptr))
*ptr++ = *csptr;
*ptr = '\0';
}
/*
* Get the locale for messages from the LC_MESSAGES locale setting...
*/
if ((ptr = getenv("LC_MESSAGES")) == NULL)
if ((ptr = getenv("LC_ALL")) == NULL)
if ((ptr = getenv("LANG")) == NULL)
ptr = "en_US";
}
if (ptr)
{
strlcpy(locale, ptr, sizeof(locale));
language = locale;
/*
* CUPS STR #2575: Map "nb" to "no" for back-compatibility...
*/
if (!strncmp(locale, "nb", 2))
locale[1] = 'o';
DEBUG_printf(("4cupsLangGet: new language value is \"%s\"", language));
}
}
#endif /* __APPLE__ */
/*
* If "language" is NULL at this point, then chances are we are using
* a language that is not installed for the base OS.
*/
if (!language)
{
/*
* Switch to the POSIX ("C") locale...
*/
language = "C";
}
#ifdef CODESET
/*
* On systems that support the nl_langinfo(CODESET) call, use
* this value as the character set...
*/
if (!charset[0] && (csptr = nl_langinfo(CODESET)) != NULL)
{
/*
* Copy all of the letters and numbers in the CODESET string...
*/
for (ptr = charset; *csptr; csptr ++)
if (_cups_isalnum(*csptr) && ptr < (charset + sizeof(charset) - 1))
*ptr++ = *csptr;
*ptr = '\0';
DEBUG_printf(("4cupsLangGet: charset set to \"%s\" via "
"nl_langinfo(CODESET)...", charset));
}
#endif /* CODESET */
/*
* If we don't have a character set by now, default to UTF-8...
*/
if (!charset[0])
strlcpy(charset, "UTF8", sizeof(charset));
/*
* Parse the language string passed in to a locale string. "C" is the
* standard POSIX locale and is copied unchanged. Otherwise the
* language string is converted from ll-cc[.charset] (language-country)
* to ll_CC[.CHARSET] to match the file naming convention used by all
* POSIX-compliant operating systems. Invalid language names are mapped
* to the POSIX locale.
*/
country[0] = '\0';
if (language == NULL || !language[0] ||
!strcmp(language, "POSIX"))
strlcpy(langname, "C", sizeof(langname));
else
{
/*
* Copy the parts of the locale string over safely...
*/
for (ptr = langname; *language; language ++)
if (*language == '_' || *language == '-' || *language == '.')
break;
else if (ptr < (langname + sizeof(langname) - 1))
*ptr++ = (char)tolower(*language & 255);
*ptr = '\0';
if (*language == '_' || *language == '-')
{
/*
* Copy the country code...
*/
for (language ++, ptr = country; *language; language ++)
if (*language == '.')
break;
else if (ptr < (country + sizeof(country) - 1))
*ptr++ = (char)toupper(*language & 255);
*ptr = '\0';
}
if (*language == '.' && !charset[0])
{
/*
* Copy the encoding...
*/
for (language ++, ptr = charset; *language; language ++)
if (_cups_isalnum(*language) && ptr < (charset + sizeof(charset) - 1))
*ptr++ = (char)toupper(*language & 255);
*ptr = '\0';
}
/*
* Force a POSIX locale for an invalid language name...
*/
if (strlen(langname) != 2)
{
strlcpy(langname, "C", sizeof(langname));
country[0] = '\0';
charset[0] = '\0';
}
}
DEBUG_printf(("4cupsLangGet: langname=\"%s\", country=\"%s\", charset=\"%s\"",
langname, country, charset));
/*
* Figure out the desired encoding...
*/
encoding = CUPS_AUTO_ENCODING;
if (charset[0])
{
for (i = 0;
i < (int)(sizeof(locale_encodings) / sizeof(locale_encodings[0]));
i ++)
if (!_cups_strcasecmp(charset, locale_encodings[i]))
{
encoding = (cups_encoding_t)i;
break;
}
if (encoding == CUPS_AUTO_ENCODING)
{
/*
* Map alternate names for various character sets...
*/
if (!_cups_strcasecmp(charset, "iso-2022-jp") ||
!_cups_strcasecmp(charset, "sjis"))
encoding = CUPS_WINDOWS_932;
else if (!_cups_strcasecmp(charset, "iso-2022-cn"))
encoding = CUPS_WINDOWS_936;
else if (!_cups_strcasecmp(charset, "iso-2022-kr"))
encoding = CUPS_WINDOWS_949;
else if (!_cups_strcasecmp(charset, "big5"))
encoding = CUPS_WINDOWS_950;
}
}
DEBUG_printf(("4cupsLangGet: encoding=%d(%s)", encoding,
encoding == CUPS_AUTO_ENCODING ? "auto" :
lang_encodings[encoding]));
/*
* See if we already have this language/country loaded...
*/
if (country[0])
snprintf(real, sizeof(real), "%s_%s", langname, country);
else
strlcpy(real, langname, sizeof(real));
_cupsMutexLock(&lang_mutex);
if ((lang = cups_cache_lookup(real, encoding)) != NULL)
{
_cupsMutexUnlock(&lang_mutex);
DEBUG_printf(("3cupsLangGet: Using cached copy of \"%s\"...", real));
return (lang);
}
/*
* See if there is a free language available; if so, use that
* record...
*/
for (lang = lang_cache; lang != NULL; lang = lang->next)
if (lang->used == 0)
break;
if (lang == NULL)
{
/*
* Allocate memory for the language and add it to the cache.
*/
if ((lang = calloc(sizeof(cups_lang_t), 1)) == NULL)
{
_cupsMutexUnlock(&lang_mutex);
return (NULL);
}
lang->next = lang_cache;
lang_cache = lang;
}
else
{
/*
* Free all old strings as needed...
*/
_cupsMessageFree(lang->strings);
lang->strings = NULL;
}
/*
* Then assign the language and encoding fields...
*/
lang->used ++;
strlcpy(lang->language, real, sizeof(lang->language));
if (encoding != CUPS_AUTO_ENCODING)
lang->encoding = encoding;
else
lang->encoding = CUPS_UTF8;
/*
* Return...
*/
_cupsMutexUnlock(&lang_mutex);
return (lang);
}
