libgcc: Add {unsigned ,}__int128 <-> _Decimal{32,64,128} conversion support [PR65833]

The following patch adds the missing
{unsigned ,}__int128 <-> _Decimal{32,64,128}
conversion support into libgcc.a on top of the _BitInt support
(doing it without that would be larger amount of code and I hope all
the targets which support __int128 will eventually support _BitInt,
after all it is a required part of C23) and because it is in libgcc.a
only, it doesn't hurt that much if it is added for some architectures
only in GCC 15.
Initially I thought about doing this on the compiler side, but doing
it on the library side seems to be easier and more -Os friendly.
The tests currently require bitint effective target, that can be
removed when all the int128 targets support bitint.

2023-11-09  Jakub Jelinek  <jakub@redhat.com>

	PR libgcc/65833
libgcc/
	* config/t-softfp (softfp_bid_list): Add
	{U,}TItype <-> _Decimal{32,64,128} conversions.
	* soft-fp/floattisd.c: New file.
	* soft-fp/floattidd.c: New file.
	* soft-fp/floattitd.c: New file.
	* soft-fp/floatuntisd.c: New file.
	* soft-fp/floatuntidd.c: New file.
	* soft-fp/floatuntitd.c: New file.
	* soft-fp/fixsdti.c: New file.
	* soft-fp/fixddti.c: New file.
	* soft-fp/fixtdti.c: New file.
	* soft-fp/fixunssdti.c: New file.
	* soft-fp/fixunsddti.c: New file.
	* soft-fp/fixunstdti.c: New file.
gcc/testsuite/
	* gcc.dg/dfp/int128-1.c: New test.
	* gcc.dg/dfp/int128-2.c: New test.
	* gcc.dg/dfp/int128-3.c: New test.
	* gcc.dg/dfp/int128-4.c: New test.

13 files changed, 639 insertions, 1 deletions

diff --git a/libgcc/config/t-softfp b/libgcc/config/t-softfp
index 093d925..a51ac7a 100644
--- a/libgcc/config/t-softfp
+++ b/libgcc/config/t-softfp
@@ -69,7 +69,9 @@ softfp_bid_list :=
 ifeq ($(decimal_float),yes)
 ifeq ($(enable_decimal_float),bid)
 softfp_bid_list += bitintpow10 \
-		   $(foreach m,sd dd td,fix$(m)bitint floatbitint$(m))
+		   $(foreach m,sd dd td,fix$(m)bitint floatbitint$(m) \
+					fix$(m)ti fixuns$(m)ti \
+					floatti$(m) floatunti$(m))
 endif
 endif
 
diff --git a/libgcc/soft-fp/fixddti.c b/libgcc/soft-fp/fixddti.c
new file mode 100644
index 0000000..c27ae8b
--- /dev/null
+++ b/libgcc/soft-fp/fixddti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal64 to 128bit signed integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixddbitint (UBILtype *, SItype, _Decimal64);
+extern TItype __bid_fixddti (_Decimal64);
+
+TItype
+__bid_fixddti (_Decimal64 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixddbitint (rb, -128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/fixsdti.c b/libgcc/soft-fp/fixsdti.c
new file mode 100644
index 0000000..8477ace
--- /dev/null
+++ b/libgcc/soft-fp/fixsdti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal32 to 128bit signed integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixsdbitint (UBILtype *, SItype, _Decimal32);
+extern TItype __bid_fixsdti (_Decimal32);
+
+TItype
+__bid_fixsdti (_Decimal32 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixsdbitint (rb, -128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/fixtdti.c b/libgcc/soft-fp/fixtdti.c
new file mode 100644
index 0000000..9ac1333
--- /dev/null
+++ b/libgcc/soft-fp/fixtdti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal128 to 128bit signed integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixtdbitint (UBILtype *, SItype, _Decimal128);
+extern TItype __bid_fixtdti (_Decimal128);
+
+TItype
+__bid_fixtdti (_Decimal128 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixtdbitint (rb, -128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/fixunsddti.c b/libgcc/soft-fp/fixunsddti.c
new file mode 100644
index 0000000..7551e00
--- /dev/null
+++ b/libgcc/soft-fp/fixunsddti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal64 to 128bit unsigned integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixddbitint (UBILtype *, SItype, _Decimal64);
+extern UTItype __bid_fixunsddti (_Decimal64);
+
+UTItype
+__bid_fixunsddti (_Decimal64 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixddbitint (rb, 128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/fixunssdti.c b/libgcc/soft-fp/fixunssdti.c
new file mode 100644
index 0000000..8d71b2c
--- /dev/null
+++ b/libgcc/soft-fp/fixunssdti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal32 to 128bit unsigned integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixsdbitint (UBILtype *, SItype, _Decimal32);
+extern UTItype __bid_fixunssdti (_Decimal32);
+
+UTItype
+__bid_fixunssdti (_Decimal32 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixsdbitint (rb, 128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/fixunstdti.c b/libgcc/soft-fp/fixunstdti.c
new file mode 100644
index 0000000..41ae9741
--- /dev/null
+++ b/libgcc/soft-fp/fixunstdti.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert _Decimal128 to 128bit unsigned integer.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern void __bid_fixtdbitint (UBILtype *, SItype, _Decimal128);
+extern UTItype __bid_fixunstdti (_Decimal128);
+
+UTItype
+__bid_fixunstdti (_Decimal128 a)
+{
+  UBILtype rb[128 / BIL_TYPE_SIZE];
+  __bid_fixtdbitint (rb, 128, a);
+#if BIL_TYPE_SIZE == 128
+  return rb[0];
+#elif BIL_TYPE_SIZE == 64
+  return ((((UTItype) rb[BITINT_END (0, 1)]) << 64)
+	  | rb[BITINT_END (1, 0)]);
+#elif BIL_TYPE_SIZE == 32
+  return ((((UTItype) rb[BITINT_END (0, 3)]) << 96)
+	  | (((UTItype) rb[BITINT_END (1, 2)]) << 64)
+	  | (((UTItype) rb[BITINT_END (2, 1)]) << 32)
+	  | rb[BITINT_END (3, 0)]);
+#else
+#error Unsupported UBILtype
+#endif
+}
+#endif
diff --git a/libgcc/soft-fp/floattidd.c b/libgcc/soft-fp/floattidd.c
new file mode 100644
index 0000000..31ad9d0
--- /dev/null
+++ b/libgcc/soft-fp/floattidd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit signed integer to _Decimal64.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal64 __bid_floatbitintdd (const UBILtype *, SItype);
+extern _Decimal64 __bid_floattidd (TItype);
+
+_Decimal64
+__bid_floattidd (TItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitintdd (ib, -128);
+}
+#endif
diff --git a/libgcc/soft-fp/floattisd.c b/libgcc/soft-fp/floattisd.c
new file mode 100644
index 0000000..37a24a3
--- /dev/null
+++ b/libgcc/soft-fp/floattisd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit signed integer to _Decimal32.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal32 __bid_floatbitintsd (const UBILtype *, SItype);
+extern _Decimal32 __bid_floattisd (TItype);
+
+_Decimal32
+__bid_floattisd (TItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitintsd (ib, -128);
+}
+#endif
diff --git a/libgcc/soft-fp/floattitd.c b/libgcc/soft-fp/floattitd.c
new file mode 100644
index 0000000..edc0b37
--- /dev/null
+++ b/libgcc/soft-fp/floattitd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit signed integer to _Decimal128.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal128 __bid_floatbitinttd (const UBILtype *, SItype);
+extern _Decimal128 __bid_floattitd (TItype);
+
+_Decimal128
+__bid_floattitd (TItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitinttd (ib, -128);
+}
+#endif
diff --git a/libgcc/soft-fp/floatuntidd.c b/libgcc/soft-fp/floatuntidd.c
new file mode 100644
index 0000000..ea4108f
--- /dev/null
+++ b/libgcc/soft-fp/floatuntidd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit unsigned integer to _Decimal64.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal64 __bid_floatbitintdd (const UBILtype *, SItype);
+extern _Decimal64 __bid_floatunstidd (UTItype);
+
+_Decimal64
+__bid_floatunstidd (UTItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitintdd (ib, 128);
+}
+#endif
diff --git a/libgcc/soft-fp/floatuntisd.c b/libgcc/soft-fp/floatuntisd.c
new file mode 100644
index 0000000..d907353e
--- /dev/null
+++ b/libgcc/soft-fp/floatuntisd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit unsigned integer to _Decimal32.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal32 __bid_floatbitintsd (const UBILtype *, SItype);
+extern _Decimal32 __bid_floatunstisd (UTItype);
+
+_Decimal32
+__bid_floatunstisd (UTItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitintsd (ib, 128);
+}
+#endif
diff --git a/libgcc/soft-fp/floatuntitd.c b/libgcc/soft-fp/floatuntitd.c
new file mode 100644
index 0000000..5731f2a
--- /dev/null
+++ b/libgcc/soft-fp/floatuntitd.c
@@ -0,0 +1,53 @@
+/* Software floating-point emulation.
+   Convert a 128bit unsigned integer to _Decimal128.
+
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC 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.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+<http://www.gnu.org/licenses/>.  */
+
+#include "soft-fp.h"
+#include "bitint.h"
+
+#if defined(__BITINT_MAXWIDTH__) && defined(__SIZEOF_INT128__)
+extern _Decimal128 __bid_floatbitinttd (const UBILtype *, SItype);
+extern _Decimal128 __bid_floatunstitd (UTItype);
+
+_Decimal128
+__bid_floatunstitd (UTItype i)
+{
+  UBILtype ib[128 / BIL_TYPE_SIZE];
+#if BIL_TYPE_SIZE == 128
+  ib[0] = i;
+#elif BIL_TYPE_SIZE == 64
+  ib[BITINT_END (0, 1)] = i >> 64;
+  ib[BITINT_END (1, 0)] = i;
+#elif BIL_TYPE_SIZE == 32
+  ib[BITINT_END (0, 3)] = i >> 96;
+  ib[BITINT_END (1, 2)] = i >> 64;
+  ib[BITINT_END (2, 1)] = i >> 32;
+  ib[BITINT_END (3, 0)] = i;
+#else
+#error Unsupported UBILtype
+#endif
+  return __bid_floatbitinttd (ib, 128);
+}
+#endif