<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
font-size:11.0pt;
font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:#0563C1;
text-decoration:underline;}
span.xelementtoproof
{mso-style-name:x_elementtoproof;}
span.EmailStyle20
{mso-style-type:personal-reply;
font-family:"Calibri",sans-serif;
color:windowtext;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;
mso-ligatures:none;}
@page WordSection1
{size:8.5in 11.0in;
margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
{page:WordSection1;}
--></style>
</head>
<body lang="EN-US" link="#0563C1" vlink="#954F72" style="word-wrap:break-word">
<div class="WordSection1">
<p class="MsoNormal">FWIW, you can workaround the bug in older versions by setting MPIR_CVAR_DEVICE_COLLECTIVES=none in your environment.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Ken<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in">
<p class="MsoNormal" style="margin-left:.5in"><b><span style="font-size:12.0pt;color:black">From:
</span></b><span style="font-size:12.0pt;color:black">"Raffenetti, Ken via discuss" <discuss@mpich.org><br>
<b>Reply-To: </b>"discuss@mpich.org" <discuss@mpich.org><br>
<b>Date: </b>Thursday, June 8, 2023 at 3:45 PM<br>
<b>To: </b>"discuss@mpich.org" <discuss@mpich.org><br>
<b>Cc: </b>"Raffenetti, Ken" <raffenet@anl.gov><br>
<b>Subject: </b>Re: [mpich-discuss] MPI Reduce with MPI_IN_PLACE fails with non-0 root rank for message sizes over 256 with MPI version 4 and after<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:.5in"><o:p> </o:p></p>
</div>
<p class="MsoNormal" style="margin-left:.5in">Hi,<o:p></o:p></p>
<p class="MsoNormal" style="margin-left:.5in"><o:p> </o:p></p>
<p class="MsoNormal" style="margin-left:.5in">I believe this bug was recently fixed in
<a href="https://github.com/pmodels/mpich/pull/6543">https://github.com/pmodels/mpich/pull/6543</a>. The fix is part of the MPICH 4.1.2 release just posted to our website and Github. I confirmed that your test program works as expected now vs. an older 4.1
release.<o:p></o:p></p>
<p class="MsoNormal" style="margin-left:.5in"><o:p> </o:p></p>
<p class="MsoNormal" style="margin-left:.5in">Ken<o:p></o:p></p>
<p class="MsoNormal" style="margin-left:.5in"><o:p> </o:p></p>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in">
<p class="MsoNormal" style="margin-left:1.0in"><b><span style="font-size:12.0pt;color:black">From:
</span></b><span style="font-size:12.0pt;color:black">"Solomonik, Edgar via discuss" <discuss@mpich.org><br>
<b>Reply-To: </b>"discuss@mpich.org" <discuss@mpich.org><br>
<b>Date: </b>Thursday, June 8, 2023 at 3:37 PM<br>
<b>To: </b>"discuss@mpich.org" <discuss@mpich.org><br>
<b>Cc: </b>"Solomonik, Edgar" <solomon2@illinois.edu><br>
<b>Subject: </b>[mpich-discuss] MPI Reduce with MPI_IN_PLACE fails with non-0 root rank for message sizes over 256 with MPI version 4 and after<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><o:p> </o:p></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span class="xelementtoproof"><span style="font-size:12.0pt;color:black;background:white">Hello,</span></span><span style="font-size:12.0pt;color:black"><o:p></o:p></span></p>
</div>
<div>
<div>
<p class="MsoNormal" style="margin-left:1.0in;background:white"><span style="font-size:12.0pt;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in;background:white"><span style="font-size:12.0pt;color:black">Our library's autobuild (CTF, which uses MPI extensively and in relatively sophisticated ways) started failing on multiple architectures after github
workflows moved to later OS versions (and so later MPI versions). I believe I have narrowed the issue to an MPI bug associated with very basic usage of MPI Reduce. The following test code runs into a segmentation fault inside MPI when running with 2 MPI processes
with the latest Ubuntu MPI build and MPI 4.0. It works for smaller values of message size (n) or if the root is rank 0. The usage of MPI_IN_PLACE adheres with the MPI standard.<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in;background:white"><span style="font-size:12.0pt;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in;background:white"><span style="font-size:12.0pt;color:black">Best,<o:p></o:p></span></p>
</div>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span class="xelementtoproof"><span style="font-size:12.0pt;color:black;background:white">Edgar Solomonik</span></span><span style="font-size:12.0pt;color:black"><o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span class="xelementtoproof"><span style="font-size:12.0pt;color:black;background:white">#include <mpi.h>
</span><span style="background:white"><o:p></o:p></span></span></p>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white">#include <iostream></span><o:p></o:p></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white">int main(int argc, char ** argv){<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> int64_t n = 257;<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> MPI_Init(&argc, &argv);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> int rank;<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> MPI_Comm_rank(MPI_COMM_WORLD, &rank);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> double * A = (double*)malloc(sizeof(double)*n);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> for (int i=0; i<n; i++){<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> A[i] = (double)i;<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> }<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> if (rank == 1){<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> MPI_Reduce(MPI_IN_PLACE, A, n, MPI_DOUBLE, MPI_SUM, 1, MPI_COMM_WORLD);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> } else {<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> MPI_Reduce(A, NULL, n, MPI_DOUBLE, MPI_SUM, 1, MPI_COMM_WORLD);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> }<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> free(A);<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> MPI_Finalize();<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white"> return 0;<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black;background:white">}<o:p></o:p></span></p>
</div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal" style="margin-left:1.0in"><span style="font-size:12.0pt;color:black"><o:p> </o:p></span></p>
</div>
</div>
</body>
</html>