#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "pvm3.h"

#define EXEC "hello_combined_swarm"
#define BUFF 100

int main(int argc, char **argv){
  int cc, tid[BUFF], mytid, ptid, ntask;
  char buf[BUFF];

  mytid = pvm_mytid();
  ptid = pvm_parent();

  if(ptid == PvmNoParent){
    if((argc != 2) || ((ntask = atoi(argv[1])) == 0)){
      printf("Usage: %s <ntask>\n", argv[0]);
      exit(0);
    }

    cc = pvm_spawn(EXEC, (char**)0, 0, "", ntask, tid);

    if(cc == ntask){
      int i;
      for(i=0;i<ntask;i++){
	cc = pvm_recv(-1, -1);
	pvm_bufinfo(cc, (int*)0, (int*)0, tid);
	pvm_upkstr(buf);
	printf("from t%x: %s\n", mytid, buf);
      }
    } else
      printf("Only spawned %d children.\n", cc);
  }
  else{
    strcpy(buf, "hello, world from ");
    gethostname(buf + strlen(buf), 64);
    pvm_initsend(PvmDataDefault);
    pvm_pkstr(buf);
    pvm_send(ptid, 1);
  }

  pvm_exit();
  exit(0);
}