killp4

来自「MPICH是MPI的重要研究,提供了一系列的接口函数,为并行计算的实现提供了编程」· 代码 · 共 21 行

PGFILE=$1
PGM=$2
echo $PGM | \
awk '{if (NR == 1)
      {
	  $APGM=$1
          printf("echo starting local kill \n")
          printf("/usr/local/p4/bin/killipc & \n")
          printf("/usr/local/p4/bin/kj %s & \n",$APGM)
      }
      else if ($1 != "local"  &&  substr($1,1,1) != "#") 
      {
          printf("echo starting kill on %s \n",$1)
          printf("%s %s /usr/local/p4/bin/killipc & \n","rsh",$1)
          printf("%s %s /usr/local/p4/bin/kj %s & \n","rsh",$1,$APGM)
      }
     }
     END { printf("echo all kills started \n") }  
     ' - $PGFILE  |  \
sh