mpirun.v3run.c

来自「Path MPICH-V for MPICH the MPI Implement」· C语言 代码 · 共 63 行

/*
  MPICH-V3
  Copyright (C) 2002, 2003 Groupe Cluster et Grid, LRI, Universite de Paris Sud


  This file is part of MPICH-V3.

  MPICH-V3 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 2 of the License, or
  (at your option) any later version.

  MPICH-V3 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.

  You should have received a copy of the GNU General Public License
  along with MPICH-V3; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

  $Id: mpirun.v3run.c,v 1.1 2004/02/10 23:35:11 gk Exp $
*/

/* This is the program that will ask each local mpirun on each cluster to launch the different nodes */

/* We make the assertion that we have access to a ssh/rsh system on each of the local dispatchers, and assume we can open a socket connection with them */

#include "v3run_general.h"
#include <stdio.h>

void usage(char * programName) {
  printf("%s -clusterfile <clusterfile name>\n");
}

boolean parseArguments(int argc, char **argv, JS *js) {

  if (argc < 3) {
    fprintf(stdout, "Error: not enough arguments\n");
    fflush(stdout);
    return(false);
  }
}


int main(int argc, char ** argv) {
  JS * js;

  if (!parseArguments(argc, argv, js)) {
    usage(argv[0]);
    exit(1);
  }
  /* We read the cluster file */
  parseClusterFile(js);
  /* If we will do the rsh, we do them */ 
  /* We wait for the connection from the local dispatchers */
  waitConnectFromLocalDispatchers(js);
  /* We control that no one is getting disconnected or wait for a finalize or abort message */
  /* We do some cleanup */
}