#include "stdio.h"
#include "stdlib.h"
#define N 50		/* N is the number of rounds */
#define B 250		/* B is the message size (1K) */
#define P 16		/* P is the number of players */
#define C 50		/* C indicates amount of computation */
#define M 50		/* M is the number of messages */
 
/* This is a random topology program.  */
/* It sends M messages around N times among P entities. */ 
/* Adapted for Parsec v. 1.0 on 8-28-97 by Monnica Terwilliger */

/* Create global message types and declare entities */

message enemy {ename name;};
message bomb {int size[B];};
entity terrorist (int);

/* Driver creates terrorist entities */

entity driver ()
{
	int id, my_id, bombs, target;
	ename Terrorist[P];
	int bombarray[B];
	
	for (id=0; id<P; ++id)		/* Create entities */
		Terrorist[id] = new terrorist (id) at id;
	
	/* Send all names to each entity */

	for (my_id=0; my_id<P; ++my_id)
	{	for (id=0; id<P; ++id)
			send enemy{Terrorist[id]} to Terrorist[my_id];
		/* printf("Sent enemy names to terrorist %d.\n", my_id); */
	}

	/* Start the action */

	bombarray[0] = 0;		/* Initialize counter location */

	for (bombs=0; bombs<M; ++bombs)
	{	target = rand()%P;	/* Pick an entity to get message */
		send bomb {bombarray} to Terrorist[target];
	}
}

entity terrorist (int my_id)
{	int timer = 0; 
	int values, comp, id;
	int bombarray[B];
	ename my_enemy[P];

	for (id=0; id<P; ++id)
		receive (enemy his)
			my_enemy[id]=his.name;

	/* Wait for the message then send it to another entity  */

	while (timer < N)
	{	receive (bomb its)
			timer = its.size[0] + 1;	/* Increment counter */
		bombarray[0] = timer; 

		/* Random values between 0-300 are calculated 
		   and put into the message array in order */ 
	
		for (comp=1; comp < C; ++comp)
			bombarray[comp] = (rand()%101) * ((rand()%3)+1);

		id = rand()%P;  		/* Select an entity */
		send bomb{bombarray} to my_enemy[id];
		printf("Bomb to enemy %d on round %d.\n", id, timer); 
	}

	/* Game over -- terminate program */

	if (timer==N)
	{  	printf ("Ka-boom!!! Game over with %d bombs, of %d ",M,B*4);
		printf ("bytes each!\n");
		pc_exit(1);
	}
}