protoserver.c

Path MPICH-V for MPICH the MPI Implementation

#include <unistd.h>
#include <stdio.h>
#include "server.h"
#include "debug.h"

int main(int argc, char *argv[])
{
  int dispatcher;
  int listen;
  struct gengetopt_args_info *c;
  
  c = initialize_mpichv_service("proto", argc, argv, &dispatcher, &listen);

  printi("printi", "printi is working");

  fprintf(stderr, "I am connected to the dispatcher (%d) and able to accept connection on %d\n", dispatcher, listen);
  fprintf(stderr, " Here are the values of my arguments :\n");
  fprintf(stderr, " n_procs = %d\n", c->n_procs_arg);
  fprintf(stderr, " jobid   = %d\n", c->jobid_arg);
  fprintf(stderr, " runtime-ip = %s\n", c->runtime_ip_arg);
  fprintf(stderr, " runtime-port = %hu\n", c->runtime_port_arg);
  fprintf(stderr, " port = %hu\n", c->port_arg);
  fprintf(stderr, " working_dir = %s\n", c->working_dir_arg);
  fprintf(stderr, " tmp_dir = %s\n", c->tmp_dir_arg);
  fprintf(stderr, " helpers_dir = %s\n", c->helpers_dir_arg);
  fprintf(stderr, " master_sched = %s\n", c->master_sched_arg);
  fprintf(stderr, " ckpt_timeout = %d\n", c->ckpt_timeout_arg);
  fprintf(stderr, " debug = %s\n", c->debug_arg);

  sleep(5);

  close(listen);
  close(dispatcher);
  return 0;
}