Convert more Perl build scripts to Python

Continue the slow trend of removing Perl from our build process, and
move to a more sustainable (at least by number of developers who know
the language) language: Python.

Use generative AI to convert 3 Perl scripts to Python: mpif-values.pl,
gen-mpi-mangling.pl, and gen-mpi-sizeof.pl.  Validate the results by
code review+inspection and diff'ing the results of the
Python-generated files with the original Perl-generated files.

Signed-off-by: Jeff Squyres <[email protected]>

Author: jsquyres

autogen.pl

@@ -10,8 +10,8 @@
 # Copyright (c) 2015-2022 IBM Corporation.  All rights reserved.
 # Copyright (c) 2020      Amazon.com, Inc. or its affiliates.
 #                         All Rights reserved.
-#
 # Copyright (c) 2025      Nanook Consulting  All rights reserved.
+# Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
 # $COPYRIGHT$
 #
 # Additional copyrights may follow
@@ -1609,7 +1609,7 @@ sub replace_config_sub_guess {
 # sync).
 
 my @scripts;
-push(@scripts, "ompi/include/mpif-values.pl");
+push(@scripts, "ompi/include/mpif-values.py");
 
 foreach my $s (@scripts) {
     verbose "=== $s\n";

ompi/communicator/comm_init.c

@@ -27,6 +27,7 @@
  *                         reserved.
  * Copyright (c) 2023-2024 Advanced Micro Devices, Inc. All rights reserved.
  * Copyright (c) 2023      NVIDIA Corporation.  All rights reserved.
+ * Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
  * $COPYRIGHT$
  *
  * Additional copyrights may follow
@@ -453,7 +454,7 @@ static void ompi_comm_construct(ompi_communicator_t* comm)
     comm->c_index_vec    = NULL;
 
     /*
-     * magic numerology - see TOPDIR/ompi/include/mpif-values.pl
+     * magic numerology - see TOPDIR/ompi/include/mpif-values.py
      */
     idx = (comm == (ompi_communicator_t*)ompi_mpi_comm_world_addr) ? 0 :
               (comm == (ompi_communicator_t*)ompi_mpi_comm_self_addr) ? 1 :

ompi/datatype/ompi_datatype_module.c

@@ -20,6 +20,7 @@
  * Copyright (c) 2016-2018 FUJITSU LIMITED.  All rights reserved.
  * Copyright (c) 2018-2021 Triad National Security, LLC. All rights
  *                         reserved.
+ * Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
  * $COPYRIGHT$
  *
  * Additional copyrights may follow
@@ -566,7 +567,7 @@ int32_t ompi_datatype_init( void )
     } while(0)
 
     /*
-     * This MUST match the order of ompi/include/mpif-values.pl
+     * This MUST match the order of ompi/include/mpif-values.py
      * Any change will break binary compatibility of Fortran programs.
      */
     MOOG(datatype_null, 0);

ompi/include/Makefile.am

@@ -15,6 +15,7 @@
 #                         and Technology (RIST).  All rights reserved.
 # Copyright (c) 2018      FUJITSU LIMITED.  All rights reserved.
 # Copyright (c) 2022      IBM Corporation.  All rights reserved.
+# Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
 # $COPYRIGHT$
 #
 # Additional copyrights may follow
@@ -66,7 +67,7 @@ endif
 
 include ompi/Makefile.am
 
-# This is complicated, but mpif-values.pl generates several
+# This is complicated, but mpif-values.py generates several
 # mpif-*.h files in this directory (during autogen.pl).
 # Hence, if any of those files change, it's safer to just force the
 # user to re-autogen.
@@ -75,17 +76,17 @@ include ompi/Makefile.am
 #	@ echo "ERROR: you must re-run autogen.pl (sorry!)"
 #	@ exit 1
 
-EXTRA_DIST = $(headers) mpif-values.pl
+EXTRA_DIST = $(headers) mpif-values.py
 
 #
 # mpif-sizeof.h is generated based on some results from configure tests.
 #
 
-sizeof_pl=$(top_srcdir)/ompi/mpi/fortran/base/gen-mpi-sizeof.pl
+sizeof_py=$(top_srcdir)/ompi/mpi/fortran/base/gen-mpi-sizeof.py
 mpif-sizeof.h: $(top_builddir)/config.status
-mpif-sizeof.h: $(sizeof_pl)
+mpif-sizeof.h: $(sizeof_py)
 mpif-sizeof.h:
-	$(OMPI_V_GEN) $(sizeof_pl) \
+	$(OMPI_V_GEN) $(python) $(sizeof_py) \
 	    --header=$@ --ierror=mandatory \
 	    --maxrank=$(OMPI_FORTRAN_MAX_ARRAY_RANK) \
 	    --generate=$(OMPI_FORTRAN_BUILD_SIZEOF) \
@@ -102,11 +103,11 @@ mpif-sizeof.h:
 # results from configure tests.
 #
 
-mpif_mangling_pl=$(top_srcdir)/ompi/mpi/fortran/base/gen-mpi-mangling.pl
+mpif_mangling_py=$(top_srcdir)/ompi/mpi/fortran/base/gen-mpi-mangling.py
 mpif-c-constants-decl.h: $(top_builddir)/config.status
-mpif-c-constants-decl.h: $(mpif_mangling_pl)
+mpif-c-constants-decl.h: $(mpif_mangling_py)
 mpif-c-constants-decl.h:
-	$(OMPI_V_GEN) $(mpif_mangling_pl) \
+	$(OMPI_V_GEN) $(python) $(mpif_mangling_py) \
 	    --caps $(OMPI_FORTRAN_CAPS) \
 	    --plain $(OMPI_FORTRAN_PLAIN) \
 	    --single $(OMPI_FORTRAN_SINGLE_UNDERSCORE) \

ompi/include/mpi.h.in

@@ -28,6 +28,7 @@
  * Copyright (c) 2018-2022 Triad National Security, LLC. All rights
  *                         reserved.
  * Copyright (c) 2025      Advanced Micro Devices, Inc. All rights reserved
+ * Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
  * $COPYRIGHT$
  *
  * Additional copyrights may follow
@@ -538,9 +539,9 @@ typedef MPI_Win_errhandler_function MPI_Win_errhandler_fn
  * Miscellaneous constants
  *
  * NOTE: Many of the integer constants below *also* appear in
- * ompi/include/mpif-values.pl.  If you change any of these integer
+ * ompi/include/mpif-values.py.  If you change any of these integer
  * values below, make sure to also change the corresponding values in
- * mpif-values.pl.
+ * mpif-values.py.
  */
 #define MPI_ANY_SOURCE         -1                      /* match any source rank */
 #define MPI_PROC_NULL          -2                      /* rank of null process */
@@ -583,7 +584,7 @@ typedef MPI_Win_errhandler_function MPI_Win_errhandler_fn
  * Constants for C code to access elements in Fortran MPI status array.
  *
  * NOTE: The MPI_F_SOURCE, MPI_F_TAG, MPI_F_ERROR are intentionally 1
- * smaller than their Fortran equivalents in mpif-values.pl (because C
+ * smaller than their Fortran equivalents in mpif-values.py (because C
  * is 0-indexed and Fortran is 1-indexed).
  */
 #define MPI_F_STATUS_SIZE OMPI_FORTRAN_STATUS_SIZE    /* Size of Fortran MPI status array */
@@ -761,7 +762,7 @@ enum {
  * Comparison results.  Don't change the order of these, the group
  * comparison functions rely on it.
  * Do not change the order of these without also modifying
- * mpif-values.pl.
+ * mpif-values.py.
  */
 enum {
   MPI_IDENT,
@@ -773,7 +774,7 @@ enum {
 /*
  * MPI_Init_thread constants
  * Do not change the order of these without also modifying
- * mpif-values.pl.
+ * mpif-values.py.
  */
 enum {
   MPI_THREAD_SINGLE,
@@ -785,7 +786,7 @@ enum {
 /*
  * Datatype combiners.
  * Do not change the order of these without also modifying
- * mpif-values.pl.
+ * mpif-values.py.
  */
 enum {
   MPI_COMBINER_NAMED,
@@ -837,7 +838,7 @@ enum {
 /*
  * Communicator split type constants.
  * Do not change the order of these without also modifying
- * mpif-values.pl.
+ * mpif-values.py.
  */
 enum {
   MPI_COMM_TYPE_SHARED,

ompi/include/mpif-sentinels.h

@@ -12,6 +12,7 @@
 !                         All rights reserved.
 ! Copyright (c) 2006-2012 Cisco Systems, Inc.  All rights reserved.
 ! Copyright (c) 2009      Oak Ridge National Labs.  All rights reserved.
+! Copyright (c) 2025      Jeffrey M. Squyres.  All rights reserved.
 ! $COPYRIGHT$
 !
 ! Additional copyrights may follow
@@ -26,7 +27,7 @@
 !
 !     - the "mpi" module bindings
 !     - the "mpi_f08" module bindings
-!     - ompi/mpi/fortran/base/gen-mpi-mangling.pl
+!     - ompi/mpi/fortran/base/gen-mpi-mangling.py
 !
 
 !     MPI_BOTTOM is only used where choice buffers can be used (meaning