Mercurial > gnulib
view lib/strfmon_l.c @ 40198:5a34193cbc07
long-options: add parse_gnu_standard_options_only
Discussed in https://bugs.gnu.org/33468 .
* lib/long-options.c (parse_long_options): Use EXIT_SUCCESS instead
of 0.
(parse_gnu_standard_options_only): Add function to
process the GNU default options --help and --version and fail for any other
unknown long or short option. See
https://gnu.org/prep/standards/html_node/Command_002dLine-Interfaces.html .
* lib/long-options.h (parse_gnu_standard_options_only): Declare it.
* modules/long-options (depends-on): Add stdbool, exitfail.
* top/maint.mk (sc_prohibit_long_options_without_use): Update
syntax-check rule, add new function name.
author | Bernhard Voelker <mail@bernhard-voelker.de> |
---|---|
date | Thu, 29 Nov 2018 09:06:26 +0100 |
parents | b06060465f09 |
children | 02ed6264c100 |
line wrap: on
line source
/* strfmon_l override. Copyright (C) 2017-2019 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 3, 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, see <https://www.gnu.org/licenses/>. */ #include <config.h> /* Specification. */ #include <monetary.h> #include <locale.h> #include <stdarg.h> #undef strfmon_l /* This override can only support a limited number of arguments. */ #define MAX_ARG_WORDS 16 ssize_t rpl_strfmon_l (char *s, size_t maxsize, locale_t locale, const char *format, ...) { /* Work around glibc 2.23 bug <https://sourceware.org/bugzilla/show_bug.cgi?id=19633>. */ va_list argptr; double args[MAX_ARG_WORDS]; int i; locale_t orig_locale; ssize_t result; orig_locale = uselocale ((locale_t)0); if (uselocale (locale) == (locale_t)0) /* errno is set. */ return -1; va_start (argptr, format); /* Hack: Consume more arguments than those that are actually given. */ for (i = 0; i < MAX_ARG_WORDS; i++) args[i] = va_arg (argptr, double); result = strfmon_l (s, maxsize, locale, format, args[0], args[1], args[2], args[3], args[4], args[5], args[6], args[7], args[8], args[9], args[10], args[11], args[12], args[13], args[14], args[15]); va_end (argptr); if (uselocale (orig_locale) == (locale_t)0) /* errno is set. */ return -1; return result; }