From 08da7047d0c61ed1e67d96edcc1e83501c241d3d Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Sun, 4 Jul 1999 10:38:37 +0000 Subject: . --- lib/hard-locale.c | 85 ++++++++++++++++++++++++++++++++++++++++++ lib/hard-locale.h | 18 +++++++++ lib/memcoll.c | 108 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ lib/memcoll.h | 18 +++++++++ 4 files changed, 229 insertions(+) create mode 100644 lib/hard-locale.c create mode 100644 lib/hard-locale.h create mode 100644 lib/memcoll.c create mode 100644 lib/memcoll.h (limited to 'lib') diff --git a/lib/hard-locale.c b/lib/hard-locale.c new file mode 100644 index 000000000..1c75b390a --- /dev/null +++ b/lib/hard-locale.c @@ -0,0 +1,85 @@ +/* hard-locale.c -- Determine whether a locale is hard. + Copyright 1997, 1998, 1999 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#if HAVE_CONFIG_H +# include +#endif + +#ifndef __GNUC__ +# ifdef HAVE_ALLOCA_H +# include +# else +# ifdef _AIX + # pragma alloca +# else +# ifdef _WIN32 +# include +# include +# else +# ifndef alloca +char *alloca (); +# endif +# endif +# endif +# endif +#endif + +#if HAVE_LOCALE_H +# include +#endif + +#if HAVE_STRING_H +# include +#endif + +/* Return nonzero if the current CATEGORY locale is hard, i.e. if you + can't get away with assuming traditional C or POSIX behavior. */ +int +hard_locale (int category) +{ +#if ! (defined ENABLE_NLS && HAVE_SETLOCALE) + return 0; +#else + + int hard = 1; + char const *p = setlocale (category, 0); + + if (p) + { +# if defined __GLIBC__ && __GLIBC__ >= 2 + if (strcmp (p, "C") == 0 || strcmp (p, "POSIX") == 0) + hard = 0; +# else + char *locale = alloca (strlen (p) + 1); + strcpy (locale, p); + + /* Temporarily set the locale to the "C" and "POSIX" locales to + find their names, so that we can determine whether one or the + other is the caller's locale. */ + if (((p = setlocale (category, "C")) && strcmp (p, locale) == 0) + || ((p = setlocale (category, "POSIX")) && strcmp (p, locale) == 0)) + hard = 0; + + /* Restore the caller's locale. */ + setlocale (category, locale); +# endif + } + + return hard; + +#endif +} diff --git a/lib/hard-locale.h b/lib/hard-locale.h new file mode 100644 index 000000000..5b054d9a5 --- /dev/null +++ b/lib/hard-locale.h @@ -0,0 +1,18 @@ +#ifndef HARD_LOCALE_H_ +# define HARD_LOCALE_H_ 1 + +# if HAVE_CONFIG_H +# include +# endif + +# ifndef PARAMS +# if defined PROTOTYPES || (defined __STDC__ && __STDC__) +# define PARAMS(Args) Args +# else +# define PARAMS(Args) () +# endif +# endif + +int hard_locale PARAMS ((int)); + +#endif /* HARD_LOCALE_H_ */ diff --git a/lib/memcoll.c b/lib/memcoll.c new file mode 100644 index 000000000..11a61ad60 --- /dev/null +++ b/lib/memcoll.c @@ -0,0 +1,108 @@ +/* Locale-specific memory comparison. + Copyright 1999 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +/* Contributed by Paul Eggert . */ + +#if HAVE_CONFIG_H +# include +#endif + +#ifndef __GNUC__ +# ifdef HAVE_ALLOCA_H +# include +# else +# ifdef _AIX + # pragma alloca +# else +# ifdef _WIN32 +# include +# include +# else +# ifndef alloca +char *alloca (); +# endif +# endif +# endif +# endif +#endif + +#if HAVE_STRING_H +# include +#endif + +/* Compare S1 (with length S1LEN) and S2 (with length S2LEN) according + to the LC_COLLATE locale. S1 and S2 do not overlap, but may be + adjacent. Temporarily modify the bytes after S1 and S2, but + restore their original contents before returning. */ +int +memcoll (char *s1, size_t s1len, char *s2, size_t s2len) +{ + int diff; + char n1; + char n2; + + /* We will temporarily set the bytes after S1 and S2 to zero, so if + S1 and S2 are adjacent, compare to a temporary copy of the + earlier, to avoid temporarily stomping on the later. */ + + if (s1 + s1len == s2) + { + char *s2copy = alloca (s2len + 1); + memcpy (s2copy, s2, s2len); + s2 = s2copy; + } + + if (s2 + s2len == s1) + { + char *s1copy = alloca (s1len + 1); + memcpy (s1copy, s1, s1len); + s1 = s1copy; + } + + n1 = s1[s1len]; s1[s1len++] = '\0'; + n2 = s2[s2len]; s2[s2len++] = '\0'; + + while (! (diff = strcoll (s1, s2))) + { + /* strcoll found no difference, but perhaps it was fooled by NUL + characters in the data. Work around this problem by advancing + past the NUL chars. */ + size_t size1 = strlen (s1) + 1; + size_t size2 = strlen (s2) + 1; + s1 += size1; + s2 += size2; + s1len -= size1; + s2len -= size2; + + if (s1len == 0) + { + if (s2len != 0) + diff = -1; + break; + } + else if (s2len == 0) + { + diff = 1; + break; + } + } + + s1[s1len - 1] = n1; + s2[s2len - 1] = n2; + + return diff; +} diff --git a/lib/memcoll.h b/lib/memcoll.h new file mode 100644 index 000000000..4909bddff --- /dev/null +++ b/lib/memcoll.h @@ -0,0 +1,18 @@ +#ifndef MEMCOLL_H_ +# define MEMCOLL_H_ 1 + +# if HAVE_CONFIG_H +# include +# endif + +# ifndef PARAMS +# if defined PROTOTYPES || (defined __STDC__ && __STDC__) +# define PARAMS(Args) Args +# else +# define PARAMS(Args) () +# endif +# endif + +int memcoll PARAMS ((char *, size_t, char *, size_t)); + +#endif /* MEMCOLL_H_ */ -- cgit v1.2.3-54-g00ecf