Mercurial > hg > octave-lojdl > gnulib-hg
changeset 3062:e9f1d0258cae
(locale_charset): Add support for Win32.
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Tue, 19 Dec 2000 08:16:09 +0000 |
| parents | 18a033ddacdf |
| children | e0287ca43594 |
| files | lib/localcharset.c |
| diffstat | 1 files changed, 44 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/localcharset.c +++ b/lib/localcharset.c @@ -37,12 +37,22 @@ # include <stdlib.h> #endif -#if HAVE_LANGINFO_CODESET -# include <langinfo.h> -#else -# if HAVE_SETLOCALE -# include <locale.h> +#if defined _WIN32 || defined __WIN32__ +# undef WIN32 /* avoid warning on mingw32 */ +# define WIN32 +#endif + +#ifndef WIN32 +# if HAVE_LANGINFO_CODESET +# include <langinfo.h> +# else +# if HAVE_SETLOCALE +# include <locale.h> +# endif # endif +#else /* WIN32 */ +# define WIN32_LEAN_AND_MEAN +# include <windows.h> #endif #ifndef DIRECTORY_SEPARATOR @@ -73,6 +83,7 @@ cp = charset_aliases; if (cp == NULL) { +#ifndef WIN32 FILE *fp; const char *dir = LIBDIR; const char *base = "charset.alias"; @@ -157,9 +168,20 @@ } } - charset_aliases = cp; if (file_name != NULL) free (file_name); + +#else /* WIN32 */ + + /* To avoid the troubles of installing a separate file in the same + directory as the DLL and of retrieving the DLL's directory at + runtime, simply inline the aliases here. */ + + cp = "CP936" "\0" "GBK" "\0" + "CP1361" "\0" "JOHAB" "\0"; +#endif + + charset_aliases = cp; } return cp; @@ -180,19 +202,21 @@ const char *codeset; const char *aliases; -#if HAVE_LANGINFO_CODESET +#ifndef WIN32 + +# if HAVE_LANGINFO_CODESET /* Most systems support nl_langinfo (CODESET) nowadays. */ codeset = nl_langinfo (CODESET); -#else +# else /* On old systems which lack it, use setlocale and getenv. */ const char *locale = NULL; -# if HAVE_SETLOCALE +# if HAVE_SETLOCALE locale = setlocale (LC_CTYPE, NULL); -# endif +# endif if (locale == NULL || locale[0] == '\0') { locale = getenv ("LC_ALL"); @@ -209,6 +233,16 @@ through the charset.alias file. */ codeset = locale; +# endif + +#else /* WIN32 */ + + static char buf[2 + 10 + 1]; + + /* Win32 has a function returning the locale's codepage as a number. */ + sprintf (buf, "CP%u", GetACP ()); + codeset = buf; + #endif if (codeset != NULL && codeset[0] != '\0')