From patchwork Fri May 24 23:39:50 2024 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: "H.J. Lu" X-Patchwork-Id: 1939188 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@legolas.ozlabs.org Authentication-Results: legolas.ozlabs.org; dkim=pass (2048-bit key; unprotected) header.d=gmail.com header.i=@gmail.com header.a=rsa-sha256 header.s=20230601 header.b=PWIKQUnc; dkim-atps=neutral Authentication-Results: legolas.ozlabs.org; spf=pass (sender SPF authorized) smtp.mailfrom=sourceware.org (client-ip=8.43.85.97; helo=server2.sourceware.org; envelope-from=libc-alpha-bounces+incoming=patchwork.ozlabs.org@sourceware.org; receiver=patchwork.ozlabs.org) Received: from server2.sourceware.org (server2.sourceware.org [8.43.85.97]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature ECDSA (secp384r1) server-digest SHA384) (No client certificate requested) by legolas.ozlabs.org (Postfix) with ESMTPS id 4VmM3S61JQz20PT for ; Sat, 25 May 2024 09:40:20 +1000 (AEST) Received: from server2.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id 28CDE385E45A for ; Fri, 24 May 2024 23:40:19 +0000 (GMT) X-Original-To: libc-alpha@sourceware.org Delivered-To: libc-alpha@sourceware.org Received: from mail-pf1-x429.google.com (mail-pf1-x429.google.com [IPv6:2607:f8b0:4864:20::429]) by sourceware.org (Postfix) with ESMTPS id 67FCD385E458 for ; Fri, 24 May 2024 23:39:55 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 67FCD385E458 Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=gmail.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmail.com ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 67FCD385E458 Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=2607:f8b0:4864:20::429 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1716593997; cv=none; b=HzBHal6hm7/c+IPGDTW298FCuVf48vxX41Db1tBSXj3n/NMmdOaXiB/jpfLypr/B/yAFtz2o0utmTTaJ8wdkN95zYfgTloWurNRRkf8Fq1z1tv96PFcj0kol2xREXCB+CSF+/E90rC+nDvuXD0JYueRXtUvd48nuk4ZmkOMcbf0= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1716593997; c=relaxed/simple; bh=VHf4hngIHK5DpTX+4U7sYkAQld+PPtq/mBW2XlI33ng=; h=DKIM-Signature:From:To:Subject:Date:Message-ID:MIME-Version; b=j5TuKU+qLfej4VxFKAUpgGMuVWHNu5CQG8XgiKt844rY1hTvyTST7izBCofvNcmZhdSvmJhD2Jvyw9KyO179QxxDKgO5qGtwlHzrP2g2SvcGsRXvFUKQkipWpZ1FR54vDUAK/etG2Se63XcJ8QBGxHDOpMGbMcW5yGqF1pD92is= ARC-Authentication-Results: i=1; server2.sourceware.org Received: by mail-pf1-x429.google.com with SMTP id d2e1a72fcca58-6f8e819cf60so1309219b3a.0 for ; Fri, 24 May 2024 16:39:55 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1716593993; x=1717198793; darn=sourceware.org; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:from:to:cc:subject:date :message-id:reply-to; bh=4qbT6yuDGTWLUCbA9At4ixYJ7vZr5HQkdMUL4RxvEoY=; b=PWIKQUncB0iC54LQnJwlr7yuMese1nu1waoYDIc9b3UnG3G8CIp4y48ToacjS9Q6WS /zcyicr8w3TLhDdkVgJm2AeZTY2qH6d63980XSXUatp8aiNAO7lP6SIMgqWmG9CY7ZMR 0p1KlGTHxWkF1hpXFPTU5hubCDIqSA33LuBZT+dfE3/CzPhXLM+Bvcx62I0x2SYoDvsK epPEsc5ijBgIVpA+WRZJIP8q8TDLltlsYgSbQLwuTaUR1pJbWCtCuyBsh1gkU3Y5ECSP BvHPtEM9iO32NC7xejpDApLFhRmTmfwEtP/XReGlAWqBaqrAIWcvzRVqaOGgZTx2qJ9U rWaA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1716593993; x=1717198793; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:x-gm-message-state:from:to:cc :subject:date:message-id:reply-to; bh=4qbT6yuDGTWLUCbA9At4ixYJ7vZr5HQkdMUL4RxvEoY=; b=oQ5ldVeq5sO9gjW2nK//+M/O8Q7ZH+x4nAyeQ3VPkwvxKu4xyEI3tDhi2U1DY6QJ7h zi+efPl3hlggVBd5dGUt2qgzalb+MtfMhH3wQpZXEBd2bQdpy4XcpHy2C7H9b0IHthnn vlTmMDuo0QA0jBkKSy/J5O0pa6Z5p3a+KOHnMpprKsCwgIZDEIsEGJUg1Fa2YALGehpF tf2IxTnmv3JUOoHCNhCMdvVh9tziMlx/IiY657qKoW8GvrWpWJrjpnN2Mq590yFMfyeS F3JIpuv31YmVVZu1aAQ9U6t5glT2ls7T6xSJk8b+fsKF87LE00RYstCjTcra93YF55EK P01Q== X-Gm-Message-State: AOJu0Ywul+wNlP49bmXHEnmzWtwqlH0DUkl/TB7ptHxz3XcK6lkbvZ18 1LDWRGwN503pGaAFX86od+W8avh/E8FVdmtTYFOHuGFXwVY/ZV5k0Mw+Tg== X-Google-Smtp-Source: AGHT+IGLaVTlRKIpsNVtpCWG//0ditshhOnabQBJOyN1C5WmXc5E47oPsF8WpH7z21cyZliQhuP55A== X-Received: by 2002:a05:6a20:3955:b0:1b1:f6a9:6b0b with SMTP id adf61e73a8af0-1b212e2c3a4mr5084409637.51.1716593993162; Fri, 24 May 2024 16:39:53 -0700 (PDT) Received: from gnu-cfl-3.localdomain ([172.59.129.178]) by smtp.gmail.com with ESMTPSA id 41be03b00d2f7-682227f1787sm1456148a12.44.2024.05.24.16.39.52 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 24 May 2024 16:39:52 -0700 (PDT) Received: from gnu-cfl-3.. (localhost [IPv6:::1]) by gnu-cfl-3.localdomain (Postfix) with ESMTP id 159197407C3; Fri, 24 May 2024 16:39:51 -0700 (PDT) From: "H.J. Lu" To: libc-alpha@sourceware.org Cc: fweimer@redhat.com Subject: [PATCH] Make __nldbl__IO_vfscanf a compat symbol [BZ #31776] Date: Fri, 24 May 2024 16:39:50 -0700 Message-ID: <20240524233950.1400154-2-hjl.tools@gmail.com> X-Mailer: git-send-email 2.45.1 In-Reply-To: <20240524233950.1400154-1-hjl.tools@gmail.com> References: <20240524233950.1400154-1-hjl.tools@gmail.com> MIME-Version: 1.0 X-Spam-Status: No, score=-3021.8 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, FREEMAIL_FROM, GIT_PATCH_0, KAM_SHORT, RCVD_IN_DNSWL_NONE, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org X-BeenThere: libc-alpha@sourceware.org X-Mailman-Version: 2.1.30 Precedence: list List-Id: Libc-alpha mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: libc-alpha-bounces+incoming=patchwork.ozlabs.org@sourceware.org Fix BZ #31776 by 1. Making __nldbl__IO_vfscanf a compat symbol. 2. Remove _IO_vfscanf from libnldbl_nonshared.a. Since _IO_vfscanf is a compat symbol, there is no point to provide it in libnldbl_nonshared.a. 3. Change libnldbl_nonshared.a to call __nldbl_vfscanf, instead of __nldbl__IO_vfscanf. Add fscanf/scanf/vfscanf/vscanf tests of long double as double without including . NB: Input files for fscanf tests must be under stdio-common. Otherwise, Rules won't pick them up. Signed-off-by: H.J. Lu --- .../test-nldbl-fscanf-redirect-static.input | 4 + stdio-common/test-nldbl-fscanf-redirect.input | 4 + sysdeps/ieee754/ldbl-opt/Makefile | 12 ++- sysdeps/ieee754/ldbl-opt/nldbl-compat.c | 4 + sysdeps/ieee754/ldbl-opt/nldbl-fscanf.c | 2 +- sysdeps/ieee754/ldbl-opt/nldbl-iovfscanf.c | 13 --- sysdeps/ieee754/ldbl-opt/nldbl-scanf.c | 2 +- sysdeps/ieee754/ldbl-opt/nldbl-vfscanf.c | 2 +- sysdeps/ieee754/ldbl-opt/nldbl-vscanf.c | 2 +- .../test-nldbl-fscanf-redirect-static.c | 1 + .../ldbl-opt/test-nldbl-fscanf-redirect.c | 98 +++++++++++++++++++ 11 files changed, 126 insertions(+), 18 deletions(-) create mode 100644 stdio-common/test-nldbl-fscanf-redirect-static.input create mode 100644 stdio-common/test-nldbl-fscanf-redirect.input delete mode 100644 sysdeps/ieee754/ldbl-opt/nldbl-iovfscanf.c create mode 100644 sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect-static.c create mode 100644 sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect.c diff --git a/stdio-common/test-nldbl-fscanf-redirect-static.input b/stdio-common/test-nldbl-fscanf-redirect-static.input new file mode 100644 index 0000000000..20859d314a --- /dev/null +++ b/stdio-common/test-nldbl-fscanf-redirect-static.input @@ -0,0 +1,4 @@ +25 24.5 thompson +25 24.5 thompson +25 24.5 thompson +25 24.5 thompson diff --git a/stdio-common/test-nldbl-fscanf-redirect.input b/stdio-common/test-nldbl-fscanf-redirect.input new file mode 100644 index 0000000000..20859d314a --- /dev/null +++ b/stdio-common/test-nldbl-fscanf-redirect.input @@ -0,0 +1,4 @@ +25 24.5 thompson +25 24.5 thompson +25 24.5 thompson +25 24.5 thompson diff --git a/sysdeps/ieee754/ldbl-opt/Makefile b/sysdeps/ieee754/ldbl-opt/Makefile index d1eda5d022..81cb5b3a53 100644 --- a/sysdeps/ieee754/ldbl-opt/Makefile +++ b/sysdeps/ieee754/ldbl-opt/Makefile @@ -101,7 +101,6 @@ libnldbl-calls = \ getpayload \ hypot \ ilogb \ - iovfscanf \ isinf \ isnan \ isoc23_fscanf \ @@ -428,11 +427,16 @@ endif ifeq ($(subdir), stdio-common) tests += \ + test-nldbl-fscanf-redirect \ + test-nldbl-fscanf-redirect-static \ tst-nldbl-scanf-binary-c11 \ tst-nldbl-scanf-binary-c23 \ tst-nldbl-scanf-binary-gnu11 \ tst-nldbl-scanf-binary-gnu89 \ # tests +tests-static += \ + test-nldbl-fscanf-redirect-static \ +# tests-static # Some versions of GCC supported for building glibc do not support -std=c23 # (added in GCC 14), or the older name -std=c2x (added in GCC 9), so @@ -446,6 +450,12 @@ CFLAGS-tst-nldbl-scanf-binary-gnu11.c += -mlong-double-64 -std=gnu11 \ -DOBJPFX=\"$(objpfx)\" CFLAGS-tst-nldbl-scanf-binary-gnu89.c += -mlong-double-64 -std=gnu89 \ -DOBJPFX=\"$(objpfx)\" +CFLAGS-test-nldbl-fscanf-redirect.c += -mlong-double-64 +CFLAGS-test-nldbl-fscanf-redirect-static.c += -mlong-double-64 +$(objpfx)test-nldbl-fscanf-redirect: \ + $(common-objpfx)math/libnldbl_nonshared.a +$(objpfx)test-nldbl-fscanf-redirect-static: \ + $(common-objpfx)math/libnldbl_nonshared.a endif diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-compat.c b/sysdeps/ieee754/ldbl-opt/nldbl-compat.c index f0bfb1e8a1..b05e47f185 100644 --- a/sysdeps/ieee754/ldbl-opt/nldbl-compat.c +++ b/sysdeps/ieee754/ldbl-opt/nldbl-compat.c @@ -1336,3 +1336,7 @@ compat_symbol (libc, __nldbl___fprintf_chk, __fprintf_chk, GLIBC_2_3_4); compat_symbol (libc, __nldbl___vprintf_chk, __vprintf_chk, GLIBC_2_3_4); compat_symbol (libc, __nldbl___vfprintf_chk, __vfprintf_chk, GLIBC_2_3_4); #endif +#if SHLIB_COMPAT (libc, LONG_DOUBLE_COMPAT_VERSION, GLIBC_2_29) +compat_symbol (libc, __nldbl__IO_vfscanf, __nldbl__IO_vfscanf, + LONG_DOUBLE_COMPAT_VERSION); +#endif diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-fscanf.c b/sysdeps/ieee754/ldbl-opt/nldbl-fscanf.c index 00507187f3..8f762944b9 100644 --- a/sysdeps/ieee754/ldbl-opt/nldbl-fscanf.c +++ b/sysdeps/ieee754/ldbl-opt/nldbl-fscanf.c @@ -13,7 +13,7 @@ fscanf (FILE *stream, const char *fmt, ...) int done; va_start (arg, fmt); - done = __nldbl__IO_vfscanf (stream, fmt, arg, NULL); + done = __nldbl_vfscanf (stream, fmt, arg); va_end (arg); return done; diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-iovfscanf.c b/sysdeps/ieee754/ldbl-opt/nldbl-iovfscanf.c deleted file mode 100644 index 6ed9b48624..0000000000 --- a/sysdeps/ieee754/ldbl-opt/nldbl-iovfscanf.c +++ /dev/null @@ -1,13 +0,0 @@ -/* This file defines one of the deprecated scanf variants. */ -#include -#undef __GLIBC_USE_DEPRECATED_SCANF -#define __GLIBC_USE_DEPRECATED_SCANF 1 - -#include "nldbl-compat.h" - -int -attribute_hidden -_IO_vfscanf (FILE *s, const char *fmt, va_list ap, int *errp) -{ - return __nldbl__IO_vfscanf (s, fmt, ap, errp); -} diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-scanf.c b/sysdeps/ieee754/ldbl-opt/nldbl-scanf.c index c10da284f2..c7dd1b7bd0 100644 --- a/sysdeps/ieee754/ldbl-opt/nldbl-scanf.c +++ b/sysdeps/ieee754/ldbl-opt/nldbl-scanf.c @@ -13,7 +13,7 @@ scanf (const char *fmt, ...) int done; va_start (arg, fmt); - done = __nldbl__IO_vfscanf (stdin, fmt, arg, NULL); + done = __nldbl_vfscanf (stdin, fmt, arg); va_end (arg); return done; diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-vfscanf.c b/sysdeps/ieee754/ldbl-opt/nldbl-vfscanf.c index 6f5ebc3045..076a06fe4f 100644 --- a/sysdeps/ieee754/ldbl-opt/nldbl-vfscanf.c +++ b/sysdeps/ieee754/ldbl-opt/nldbl-vfscanf.c @@ -9,7 +9,7 @@ int attribute_hidden __vfscanf (FILE *s, const char *fmt, va_list ap) { - return __nldbl__IO_vfscanf (s, fmt, ap, NULL); + return __nldbl_vfscanf (s, fmt, ap); } extern __typeof (__vfscanf) vfscanf attribute_hidden; weak_alias (__vfscanf, vfscanf) diff --git a/sysdeps/ieee754/ldbl-opt/nldbl-vscanf.c b/sysdeps/ieee754/ldbl-opt/nldbl-vscanf.c index 38f654aa73..7560ec5bac 100644 --- a/sysdeps/ieee754/ldbl-opt/nldbl-vscanf.c +++ b/sysdeps/ieee754/ldbl-opt/nldbl-vscanf.c @@ -10,5 +10,5 @@ attribute_hidden weak_function vscanf (const char *fmt, va_list ap) { - return __nldbl__IO_vfscanf (stdin, fmt, ap, NULL); + return __nldbl_vfscanf (stdin, fmt, ap); } diff --git a/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect-static.c b/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect-static.c new file mode 100644 index 0000000000..0e38f24b5a --- /dev/null +++ b/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect-static.c @@ -0,0 +1 @@ +#include "test-nldbl-fscanf-redirect.c" diff --git a/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect.c b/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect.c new file mode 100644 index 0000000000..507a3f4a7c --- /dev/null +++ b/sysdeps/ieee754/ldbl-opt/test-nldbl-fscanf-redirect.c @@ -0,0 +1,98 @@ +/* Test fscanf/scanf/vfscanf/vscanf of long double as double without + . + Copyright (C) 2024 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, see + . */ + +#include +#include + +#ifndef EXPECTED_LONG_DOUBLE_VALUE +# define EXPECTED_LONG_DOUBLE_VALUE 24.5 +#endif + +struct FILE; +extern struct FILE *stdin; +extern int fscanf (struct FILE *, const char *, ...); +extern int scanf (const char *, ...); +extern int vfscanf (struct FILE *, const char *, va_list); +extern int vscanf (const char *, va_list); +extern int printf (const char *format, ...); + +static int +wrap_vfscanf (struct FILE *fp, const char *format, ...) +{ + va_list ap; + va_start (ap, format); + int ret = vfscanf (fp, format, ap); + va_end (ap); + return ret; +} + +static int +wrap_vscanf (const char *format, ...) +{ + va_list ap; + va_start (ap, format); + int ret = vscanf (format, ap); + va_end (ap); + return ret; +} + +int +main (void) +{ + int n, i; + long double x; + char name[50]; + n = fscanf (stdin, "%d%Lf%s", &i, &x, name); + printf ("fscanf : n = %d, i = %d, x = %Lf, name = \"%.50s\"\n", + n, i, x, name); + if (n != 3 + || i != 25 + || x != EXPECTED_LONG_DOUBLE_VALUE + || strcmp (name, "thompson")) + return 1; + + n = scanf ("%d%Lf%s", &i, &x, name); + printf ("scanf : n = %d, i = %d, x = %Lf, name = \"%.50s\"\n", + n, i, x, name); + if (n != 3 + || i != 25 + || x != EXPECTED_LONG_DOUBLE_VALUE + || strcmp (name, "thompson")) + return 1; + + n = wrap_vfscanf (stdin, "%d%Lf%s", &i, &x, name); + printf ("vfscanf: n = %d, i = %d, x = %Lf, name = \"%.50s\"\n", + n, i, x, name); + if (n != 3 + || i != 25 + || x != EXPECTED_LONG_DOUBLE_VALUE + || strcmp (name, "thompson")) + return 1; + + n = wrap_vscanf ("%d%Lf%s", &i, &x, name); + printf ("vscanf : n = %d, i = %d, x = %Lf, name = \"%.50s\"\n", + n, i, x, name); + if (n != 3 + || i != 25 + || x != EXPECTED_LONG_DOUBLE_VALUE + || strcmp (name, "thompson")) + return 1; + + return 0; +}