diff options
Diffstat (limited to 'intl')
-rw-r--r-- | intl/bindtextdom.c | 140 | ||||
-rw-r--r-- | intl/dcgettext.c | 3 | ||||
-rw-r--r-- | intl/dcigettext.c | 34 | ||||
-rw-r--r-- | intl/dcngettext.c | 3 | ||||
-rw-r--r-- | intl/dgettext.c | 5 | ||||
-rw-r--r-- | intl/dngettext.c | 3 | ||||
-rw-r--r-- | intl/explodename.c | 5 | ||||
-rw-r--r-- | intl/finddomain.c | 5 | ||||
-rw-r--r-- | intl/gettext.c | 3 | ||||
-rw-r--r-- | intl/gettext.h | 5 | ||||
-rw-r--r-- | intl/gettextP.h | 6 | ||||
-rw-r--r-- | intl/hash-string.h | 5 | ||||
-rw-r--r-- | intl/l10nflist.c | 5 | ||||
-rw-r--r-- | intl/libintl.h | 3 | ||||
-rw-r--r-- | intl/loadmsgcat.c | 3 | ||||
-rw-r--r-- | intl/localealias.c | 5 | ||||
-rw-r--r-- | intl/ngettext.c | 3 | ||||
-rw-r--r-- | intl/textdomain.c | 64 |
18 files changed, 157 insertions, 143 deletions
diff --git a/intl/bindtextdom.c b/intl/bindtextdom.c index be78ae0f23..dde7eb131d 100644 --- a/intl/bindtextdom.c +++ b/intl/bindtextdom.c @@ -1,8 +1,5 @@ /* Implementation of the bindtextdomain(3) function - Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. + Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as @@ -50,6 +47,16 @@ void free (); #include "gettext.h" #include "gettextP.h" +#ifdef _LIBC +/* We have to handle multi-threaded applications. */ +# include <bits/libc-lock.h> +#else +/* Provide dummy implementation if this is outside glibc. */ +# define __libc_lock_define_initialized (CLASS, NAME) +# define __libc_lock_lock(NAME) +# define __libc_lock_unlock(NAME) +#endif + /* @@ end of prolog @@ */ /* Contains the default location of the message catalogs. */ @@ -58,6 +65,9 @@ extern const char _nl_default_dirname[]; /* List with bindings of specific domains. */ extern struct binding *_nl_domain_bindings; +/* Lock variable to protect the global data in the gettext implementation. */ +__libc_rwlock_define (extern, _nl_state_lock) + /* Names for the libintl functions are a problem. They must not clash with existing names and they should follow ANSI C. But this source @@ -80,11 +90,14 @@ BINDTEXTDOMAIN (domainname, dirname) const char *dirname; { struct binding *binding; + char *result; /* Some sanity checks. */ if (domainname == NULL || domainname[0] == '\0') return NULL; + __libc_rwlock_wrlock (_nl_state_lock); + for (binding = _nl_domain_bindings; binding != NULL; binding = binding->next) { int compare = strcmp (domainname, binding->domainname); @@ -101,104 +114,97 @@ BINDTEXTDOMAIN (domainname, dirname) if (dirname == NULL) /* The current binding has be to returned. */ - return binding == NULL ? (char *) _nl_default_dirname : binding->dirname; - - if (binding != NULL) + result = binding == NULL ? (char *) _nl_default_dirname : binding->dirname; + else if (binding != NULL) { /* The domain is already bound. If the new value and the old one are equal we simply do nothing. Otherwise replace the old binding. */ - if (strcmp (dirname, binding->dirname) != 0) + result = binding->dirname; + if (strcmp (dirname, result) != 0) { - char *new_dirname; - if (strcmp (dirname, _nl_default_dirname) == 0) - new_dirname = (char *) _nl_default_dirname; + result = (char *) _nl_default_dirname; else { #if defined _LIBC || defined HAVE_STRDUP - new_dirname = strdup (dirname); - if (new_dirname == NULL) - return NULL; + result = strdup (dirname); #else size_t len = strlen (dirname) + 1; - new_dirname = (char *) malloc (len); - if (new_dirname == NULL) - return NULL; - - memcpy (new_dirname, dirname, len); + result = (char *) malloc (len); + if (result != NULL) + memcpy (result, dirname, len); #endif } - if (binding->dirname != _nl_default_dirname) - free (binding->dirname); + if (result != NULL) + { + if (binding->dirname != _nl_default_dirname) + free (binding->dirname); - binding->dirname = new_dirname; + binding->dirname = result; + } } } else { /* We have to create a new binding. */ -#if !defined _LIBC && !defined HAVE_STRDUP - size_t len; -#endif + size_t len = strlen (domainname) + 1; struct binding *new_binding = - (struct binding *) malloc (sizeof (*new_binding)); + (struct binding *) malloc (sizeof (*new_binding) + len); if (new_binding == NULL) - return NULL; - -#if defined _LIBC || defined HAVE_STRDUP - new_binding->domainname = strdup (domainname); - if (new_binding->domainname == NULL) - return NULL; -#else - len = strlen (domainname) + 1; - new_binding->domainname = (char *) malloc (len); - if (new_binding->domainname == NULL) - return NULL; - memcpy (new_binding->domainname, domainname, len); -#endif - - if (strcmp (dirname, _nl_default_dirname) == 0) - new_binding->dirname = (char *) _nl_default_dirname; + result = NULL; else { + memcpy (new_binding->domainname, domainname, len); + + if (strcmp (dirname, _nl_default_dirname) == 0) + result = new_binding->dirname = (char *) _nl_default_dirname; + else + { #if defined _LIBC || defined HAVE_STRDUP - new_binding->dirname = strdup (dirname); - if (new_binding->dirname == NULL) - return NULL; + result = new_binding->dirname = strdup (dirname); #else - len = strlen (dirname) + 1; - new_binding->dirname = (char *) malloc (len); - if (new_binding->dirname == NULL) - return NULL; - memcpy (new_binding->dirname, dirname, len); + len = strlen (dirname) + 1; + result = new_binding->dirname = (char *) malloc (len); + if (result != NULL) + memcpy (new_binding->dirname, dirname, len); #endif + } } - /* Now enqueue it. */ - if (_nl_domain_bindings == NULL - || strcmp (domainname, _nl_domain_bindings->domainname) < 0) - { - new_binding->next = _nl_domain_bindings; - _nl_domain_bindings = new_binding; - } - else + if (result != NULL) { - binding = _nl_domain_bindings; - while (binding->next != NULL - && strcmp (domainname, binding->next->domainname) > 0) - binding = binding->next; + /* Now enqueue it. */ + if (_nl_domain_bindings == NULL + || strcmp (domainname, _nl_domain_bindings->domainname) < 0) + { + new_binding->next = _nl_domain_bindings; + _nl_domain_bindings = new_binding; + } + else + { + binding = _nl_domain_bindings; + while (binding->next != NULL + && strcmp (domainname, binding->next->domainname) > 0) + binding = binding->next; - new_binding->next = binding->next; - binding->next = new_binding; + new_binding->next = binding->next; + binding->next = new_binding; + } } - - binding = new_binding; + else if (new_binding != NULL) + free (new_binding); } - return binding->dirname; + /* For a succesful call we flush the caches. */ + if (result != NULL) + ++_nl_msg_cat_cntr; + + __libc_rwlock_unlock (_nl_state_lock); + + return result; } #ifdef _LIBC diff --git a/intl/dcgettext.c b/intl/dcgettext.c index 5be8e4ff70..8115d5c54e 100644 --- a/intl/dcgettext.c +++ b/intl/dcgettext.c @@ -1,9 +1,6 @@ /* Implementation of the dcgettext(3) function. Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/dcigettext.c b/intl/dcigettext.c index e11fd06147..be312ce967 100644 --- a/intl/dcigettext.c +++ b/intl/dcigettext.c @@ -1,9 +1,6 @@ /* Implementation of the internal dcigettext function. Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the @@ -99,6 +96,11 @@ void free (); /* Thread safetyness. */ #ifdef _LIBC # include <bits/libc-lock.h> +#else +/* Provide dummy implementation if this is outside glibc. */ +# define __libc_lock_define_initialized (CLASS, NAME) +# define __libc_lock_lock(NAME) +# define __libc_lock_unlock(NAME) #endif /* @@ end of prolog @@ */ @@ -306,6 +308,9 @@ struct block_list # define DCIGETTEXT dcigettext__ #endif +/* Lock variable to protect the global data in the gettext implementation. */ +__libc_rwlock_define_initialized (, _nl_state_lock) + /* Checking whether the binaries runs SUID must be done and glibc provides easier methods therefore we make a difference here. */ #ifdef _LIBC @@ -358,6 +363,8 @@ DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category) if (msgid1 == NULL) return NULL; + __libc_rwlock_rdlock (_nl_state_lock); + #if defined HAVE_TSEARCH || defined _LIBC if (plural == 0) { @@ -372,7 +379,10 @@ DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category) foundp = (struct known_translation_t **) tfind (search, &root, transcmp); if (foundp != NULL && (*foundp)->counter == _nl_msg_cat_cntr) - return (char *) (*foundp)->translation; + { + __libc_rwlock_unlock (_nl_state_lock); + return (char *) (*foundp)->translation; + } } #endif @@ -501,6 +511,7 @@ DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category) || strcmp (single_locale, "POSIX") == 0) { FREE_BLOCKS (block_list); + __libc_rwlock_unlock (_nl_state_lock); __set_errno (saved_errno); return (plural == 0 ? (char *) msgid1 @@ -539,7 +550,10 @@ DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category) foundp = (struct known_translation_t **) tfind (search, &root, transcmp); if (foundp != NULL && (*foundp)->counter == _nl_msg_cat_cntr) - return (char *) (*foundp)->translation; + { + __libc_rwlock_unlock (_nl_state_lock); + return (char *) (*foundp)->translation; + } } #endif @@ -596,6 +610,7 @@ DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category) (*foundp)->translation = retval; } #endif + __libc_rwlock_unlock (_nl_state_lock); return retval; } } @@ -981,12 +996,9 @@ free_mem (void) struct binding *runp; for (runp = _nl_domain_bindings; runp != NULL; runp = runp->next) - { - free (runp->domainname); - if (runp->dirname != _nl_default_dirname) - /* Yes, this is a pointer comparison. */ - free (runp->dirname); - } + if (runp->dirname != _nl_default_dirname) + /* Yes, this is a pointer comparison. */ + free (runp->dirname); if (_nl_current_default_domain != _nl_default_default_domain) /* Yes, again a pointer comparison. */ diff --git a/intl/dcngettext.c b/intl/dcngettext.c index ef1dc349b6..d10f4a6363 100644 --- a/intl/dcngettext.c +++ b/intl/dcngettext.c @@ -1,9 +1,6 @@ /* Implementation of the dcngettext(3) function. Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/dgettext.c b/intl/dgettext.c index f7899579f7..85770d2bc7 100644 --- a/intl/dgettext.c +++ b/intl/dgettext.c @@ -1,8 +1,5 @@ /* Implementation of the dgettext(3) function. - Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. + Copyright (C) 1995, 1996, 1997, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as diff --git a/intl/dngettext.c b/intl/dngettext.c index 2fb861c6e4..050144641c 100644 --- a/intl/dngettext.c +++ b/intl/dngettext.c @@ -1,9 +1,6 @@ /* Implementation of the dngettext(3) function. Copyright (C) 1995, 1996, 1997, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/explodename.c b/intl/explodename.c index 8fe928f312..f89c7c93f9 100644 --- a/intl/explodename.c +++ b/intl/explodename.c @@ -1,9 +1,6 @@ -/* Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc. +/* Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, 1995. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/finddomain.c b/intl/finddomain.c index 7f6d35c198..09f6a91fc2 100644 --- a/intl/finddomain.c +++ b/intl/finddomain.c @@ -1,10 +1,7 @@ /* Handle list of needed message catalogs - Copyright (C) 1995, 1996, 1997, 1998, 1999 Free Software Foundation, Inc. + Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. Written by Ulrich Drepper <drepper@gnu.org>, 1995. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/gettext.c b/intl/gettext.c index 74eab14419..c9ba112b55 100644 --- a/intl/gettext.c +++ b/intl/gettext.c @@ -1,9 +1,6 @@ /* Implementation of gettext(3) function. Copyright (C) 1995, 1997, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/gettext.h b/intl/gettext.h index 804b219ee2..a8bd7b513e 100644 --- a/intl/gettext.h +++ b/intl/gettext.h @@ -1,8 +1,5 @@ /* Internal header for GNU gettext internationalization functions. - Copyright (C) 1995, 1997 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. + Copyright (C) 1995, 1997, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as diff --git a/intl/gettextP.h b/intl/gettextP.h index d210dc6c4e..26d9de0e77 100644 --- a/intl/gettextP.h +++ b/intl/gettextP.h @@ -136,8 +136,12 @@ struct loaded_domain struct binding { struct binding *next; - char *domainname; char *dirname; +#ifdef __GNUC__ + char domainname[0]; +#else + char domainname[1]; +#endif }; extern int _nl_msg_cat_cntr; diff --git a/intl/hash-string.h b/intl/hash-string.h index 32ca018bda..107514c34f 100644 --- a/intl/hash-string.h +++ b/intl/hash-string.h @@ -1,8 +1,5 @@ /* Implements a string hashing function. - Copyright (C) 1995, 1997, 1998 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. + Copyright (C) 1995, 1997, 1998, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as diff --git a/intl/l10nflist.c b/intl/l10nflist.c index 871b42814e..ef599361a9 100644 --- a/intl/l10nflist.c +++ b/intl/l10nflist.c @@ -1,9 +1,6 @@ -/* Copyright (C) 1995, 1996, 1997, 1998, 1999 Free Software Foundation, Inc. +/* Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, 1995. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/libintl.h b/intl/libintl.h index a301dc5407..91e73265dc 100644 --- a/intl/libintl.h +++ b/intl/libintl.h @@ -2,9 +2,6 @@ Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. This file is derived from the file libgettext.h in the GNU gettext package. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/loadmsgcat.c b/intl/loadmsgcat.c index b017d710e8..a03fe0d809 100644 --- a/intl/loadmsgcat.c +++ b/intl/loadmsgcat.c @@ -1,9 +1,6 @@ /* Load needed message catalogs. Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/localealias.c b/intl/localealias.c index 9f2c510428..d2b5ae8895 100644 --- a/intl/localealias.c +++ b/intl/localealias.c @@ -1,8 +1,5 @@ /* Handle aliases for locale names. - Copyright (C) 1995, 1996, 1997, 1998, 1999 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. + Copyright (C) 1995-1999, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as diff --git a/intl/ngettext.c b/intl/ngettext.c index 99e74d9938..3ffdc6996f 100644 --- a/intl/ngettext.c +++ b/intl/ngettext.c @@ -1,9 +1,6 @@ /* Implementation of ngettext(3) function. Copyright (C) 1995, 1997, 2000 Free Software Foundation, Inc. - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. - The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the diff --git a/intl/textdomain.c b/intl/textdomain.c index 5dd4003a8e..726b5bb8e3 100644 --- a/intl/textdomain.c +++ b/intl/textdomain.c @@ -1,8 +1,5 @@ /* Implementation of the textdomain(3) function. - Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc. - - This file is part of the GNU C Library. Its master source is NOT part of - the C library, however. The master source lives in /gd/gnu/lib. + Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as @@ -41,6 +38,18 @@ #else # include "libgettext.h" #endif +#include "gettext.h" +#include "gettextP.h" + +#ifdef _LIBC +/* We have to handle multi-threaded applications. */ +# include <bits/libc-lock.h> +#else +/* Provide dummy implementation if this is outside glibc. */ +# define __libc_lock_define_initialized (CLASS, NAME) +# define __libc_lock_lock(NAME) +# define __libc_lock_unlock(NAME) +#endif /* @@ end of prolog @@ */ @@ -64,6 +73,9 @@ extern const char *_nl_current_default_domain; # define TEXTDOMAIN textdomain__ #endif +/* Lock variable to protect the global data in the gettext implementation. */ +__libc_rwlock_define (extern, _nl_state_lock) + /* Set the current default message catalog to DOMAINNAME. If DOMAINNAME is null, return the current default. If DOMAINNAME is "", reset to the default of "messages". */ @@ -71,38 +83,60 @@ char * TEXTDOMAIN (domainname) const char *domainname; { - char *old; + char *new_domain; + char *old_domain; /* A NULL pointer requests the current setting. */ if (domainname == NULL) return (char *) _nl_current_default_domain; - old = (char *) _nl_current_default_domain; + __libc_rwlock_wrlock (_nl_state_lock); + + old_domain = (char *) _nl_current_default_domain; /* If domain name is the null string set to default domain "messages". */ if (domainname[0] == '\0' || strcmp (domainname, _nl_default_default_domain) == 0) - _nl_current_default_domain = _nl_default_default_domain; + { + _nl_current_default_domain = _nl_default_default_domain; + new_domain = (char *) _nl_current_default_domain; + } + else if (strcmp (domainname, old_domain) == 0) + /* This can happen and people will use it to signal that some + environment variable changed. */ + new_domain = old_domain; else { /* If the following malloc fails `_nl_current_default_domain' will be NULL. This value will be returned and so signals we are out of core. */ #if defined _LIBC || defined HAVE_STRDUP - _nl_current_default_domain = strdup (domainname); + new_domain = strdup (domainname); #else size_t len = strlen (domainname) + 1; - char *cp = (char *) malloc (len); - if (cp != NULL) - memcpy (cp, domainname, len); - _nl_current_default_domain = cp; + new_domain = (char *) malloc (len); + if (new_domain != NULL) + memcpy (new_domain, domainname, len); #endif + + if (new_domain != NULL) + _nl_current_default_domain = new_domain; + } + + /* We use this possibility to signal a change of the loaded catalogs + since this is most likely the case and there is no other easy we + to do it. Do it only when the call was successful. */ + if (new_domain != NULL) + { + ++_nl_msg_cat_cntr; + + if (old_domain != new_domain && old_domain != _nl_default_default_domain) + free (old_domain); } - if (old != _nl_default_default_domain) - free (old); + __libc_rwlock_unlock (_nl_state_lock); - return (char *) _nl_current_default_domain; + return new_domain; } #ifdef _LIBC |