1/* $NetBSD: localencoding.c,v 1.2.6.1 2012/06/06 18:18:07 bouyer Exp $ */ 2 3#ifndef lint 4static char *rcsid = "Id: localencoding.c,v 1.1 2003/06/04 00:25:53 marka Exp "; 5#endif 6 7/* 8 * Copyright (c) 2000 Japan Network Information Center. All rights reserved. 9 * 10 * By using this file, you agree to the terms and conditions set forth bellow. 11 * 12 * LICENSE TERMS AND CONDITIONS 13 * 14 * The following License Terms and Conditions apply, unless a different 15 * license is obtained from Japan Network Information Center ("JPNIC"), 16 * a Japanese association, Kokusai-Kougyou-Kanda Bldg 6F, 2-3-4 Uchi-Kanda, 17 * Chiyoda-ku, Tokyo 101-0047, Japan. 18 * 19 * 1. Use, Modification and Redistribution (including distribution of any 20 * modified or derived work) in source and/or binary forms is permitted 21 * under this License Terms and Conditions. 22 * 23 * 2. Redistribution of source code must retain the copyright notices as they 24 * appear in each source code file, this License Terms and Conditions. 25 * 26 * 3. Redistribution in binary form must reproduce the Copyright Notice, 27 * this License Terms and Conditions, in the documentation and/or other 28 * materials provided with the distribution. For the purposes of binary 29 * distribution the "Copyright Notice" refers to the following language: 30 * "Copyright (c) 2000-2002 Japan Network Information Center. All rights reserved." 31 * 32 * 4. The name of JPNIC may not be used to endorse or promote products 33 * derived from this Software without specific prior written approval of 34 * JPNIC. 35 * 36 * 5. Disclaimer/Limitation of Liability: THIS SOFTWARE IS PROVIDED BY JPNIC 37 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 38 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A 39 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL JPNIC BE LIABLE 40 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 41 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 42 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 43 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 44 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 45 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 46 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. 47 */ 48 49#include <config.h> 50 51#ifdef WIN32 52#include <windows.h> 53#endif 54#include <stddef.h> 55#include <stdlib.h> 56#include <stdio.h> 57#include <string.h> 58 59#ifdef HAVE_LOCALE_H 60#include <locale.h> 61#endif 62#ifdef HAVE_LANGINFO_H 63#include <langinfo.h> 64#endif 65 66#include <idn/logmacro.h> 67#include <idn/localencoding.h> 68#include <idn/debug.h> 69 70#ifdef ENABLE_MDNKIT_COMPAT 71#include <mdn/localencoding.h> 72#endif 73 74const char * 75idn_localencoding_name(void) { 76 char *name; 77 78 TRACE(("idn_localencoding_name()\n")); 79 80 if ((name = getenv(IDN_LOCALCS_ENV)) != NULL) { 81 TRACE(("local encoding=\"%-.30s\"\n", 82 name == NULL ? "<null>" : name)); 83 return (name); 84 } 85#ifdef ENABLE_MDNKIT_COMPAT 86 if ((name = getenv(MDN_LOCALCS_ENV)) != NULL) { 87 TRACE(("local encoding=\"%-.30s\"\n", 88 name == NULL ? "<null>" : name)); 89 return (name); 90 } 91#endif 92 93#ifdef WIN32 94 { 95 static char cp_str[40]; /* enough */ 96 (void)sprintf(cp_str, "CP%u", GetACP()); 97 TRACE(("local encoding(codepage)=\"%-.30s\"\n", cp_str)); 98 return (cp_str); 99 } 100#else /* WIN32 */ 101#ifdef HAVE_LIBCHARSET 102 name = locale_charset(); 103 TRACE(("local encoding=\"%-.30s\"\n", 104 name == NULL ? "<null>" : name)); 105 return (name); 106#endif 107 108#if defined(HAVE_NL_LANGINFO) && defined(CODESET) 109 if ((name = nl_langinfo(CODESET)) != NULL) { 110 TRACE(("local encoding=\"%-.30s\"\n", 111 name == NULL ? "<null>" : name)); 112 return (name); 113 } 114#endif 115 (void)( 116#ifdef HAVE_SETLOCALE 117 (name = setlocale(LC_CTYPE, NULL)) || 118#endif 119 (name = getenv("LC_ALL")) || 120 (name = getenv("LC_CTYPE")) || 121 (name = getenv("LANG"))); 122 TRACE(("local encoding=\"%-.30s\"\n", name == NULL ? "<null>" : name)); 123 return (name); 124#endif /* WIN32 */ 125} 126