/* * * * * * * * * * * * * * * * * * * 
 *                                   *
 * EE1K2: Mars Rover Project         *
 *                                   *
 * Mitchell Kent; Richard Rushby     *
 * Phil Neal; Steve Xiang            *
 *                                   *
 * Function List                     *
 *                                   *
 * * * * * * * * * * * * * * * * * * */

#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <string.h>


//Structures Being declared

typedef struct // structure for each position on the map (same as below)
{

	int Gridx, Gridy, ObjType, ObjId, Movable, Passable, Live, Health;

}location;


typedef struct //Creating another structure to store the object type, name and description. 
{
	int* objtype;
	char** objname;
	char** objdesc;
}object;


typedef struct
{
  location  **map;
  int       Current_x;
  int       Current_y;
  int		power;
  int		mapsizex, mapsizey;
} rover;
 

object* status(object *, rover *, location **); 


// Initiating Rover structure

void initRover(rover *myRover, location **map)
{
  myRover->map = map;
  myRover->Current_x = 5;
  myRover->Current_y = 5;
  myRover->power=100;
  myRover->mapsizex=18;
  myRover->mapsizey=18;
}
 
 /*  Code not relavant:
 
 
/* move command should initally look up the enxt square and see if it is movable. */

void move(rover *myRover, location **map)  
{

	int mapsizex, mapsizey;
	char dir;

	
	mapsizex=myRover->mapsizex;
	mapsizey=myRover->mapsizey;


	

	
	
	printf("\n\nIn which direction would you like to move?\nPlease enter N,E,S, or W\n\n");
	scanf("%c",&dir);
	

	
	if(dir=='N')
	{
		
	
		if( ((myRover->Current_x&&myRover->Current_y)>=0)&&((myRover->Current_x<=(mapsizex-1))&&(myRover->Current_y<=(mapsizey-1))))
		{
			(myRover->Current_y)=(myRover->Current_y+1);
			(myRover->power)--;
		}

		else("\nSorry you are at the edge of the map\n");

	}

	else if(dir=='S')
	{
		if( (myRover->Current_x&&myRover->Current_y)>=0 )
		{
			(myRover->Current_y)=(myRover->Current_y-1);
			(myRover->power)--;
		}

	}

	else if(dir=='E')
	{
		if( (myRover->Current_x&&myRover->Current_y)>=0 )
		{
			(myRover->Current_x)=(myRover->Current_x+1);
			(myRover->power)--;
		}

	}

	else if(dir=='W')
	{
		if( (myRover->Current_x&&myRover->Current_y)>=0 )
		{
			(myRover->Current_x)=(myRover->Current_x-1);
			(myRover->power)--;
		}

	}

	else
	{
		printf("\nThe direction must be given as a capital letter, N,S,E or W\nyou entered: %c \n\n",dir);
	}

	printf("%d %d", myRover->Current_x, myRover->Current_y);




}

*/


/*This function works when called first time, but nto second */


object * object_type_name_description(object *p1, rover *myRover, location **map) //Creating a function to print the object
{													 //type, name and description.
	FILE *obj_name_desc; //Declaring the file
	char buffer[3][100]; //This buffer will store all the temporary data.
	int i, scan, length;



	obj_name_desc=fopen("objname.txt","r"); //Opening the file

	//Allocating memory for the object type, name and description.
	p1->objtype=(int*)(malloc(17*sizeof(int)));
	p1->objname=(char**)(malloc(17*sizeof(char*)));
	p1->objdesc=(char**)(malloc(17*sizeof(char*)));

	for(i=0; (i<17)||(scan==EOF); i++)
	{
		scan=fscanf(obj_name_desc,"%s %s %s", buffer[0], buffer[1], buffer[2]); //Scaning from
																					//the file.
		p1->objtype[i]=atoi(buffer[0]); //Converting strings into integers.

		length=strlen(buffer[1]);
		p1->objname[i]=(char*)(malloc(length*sizeof(char)));
		strcpy(p1->objname[i], buffer[1]); //Copying from buffer to objname.

		length=strlen(buffer[2]);
		p1->objdesc[i]=(char*)(malloc(length*sizeof(char)));
		strcpy(p1->objdesc[i], buffer[2]); //Copying from buffer to objname.


	}

	for(i=0; i<17; i++)
		printf("%d %s %s\n", p1->objtype[i], p1->objname[i], p1->objdesc[i]);

//	p1->objtype[map[myRover->Current_x][myRover->Current_y].ObjId]=map[myRover->Current_x][myRover->Current_y].ObjId;
	
	
	printf("%d %s %s\n", p1->objtype[map[myRover->Current_x][myRover->Current_y].ObjId], p1->objname[map[myRover->Current_x][myRover->Current_y].ObjId], p1->objdesc[map[myRover->Current_x][myRover->Current_y].ObjId]);
	
	return p1;


}


/*It is when calling this function and calling obj_descript_function from within here that i get the errors*/


object* status(object *p1, rover *myRover, location **map)
{
	




//	p1->objtype=map[myRover->Current_x][myRover->Current_y].ObjId;


	printf("\n=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=");
	printf("\n\n");
	
	printf("         Mars Rover Monitor\n\n");


	printf("=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=");

	printf("\n\nStatus: \n\n");

	printf("Power: %d%\n\n",myRover->power);
	printf("Position: (%d, %d)", myRover->Current_x, myRover->Current_y);


	printf("\n%d\n",map[myRover->Current_x][myRover->Current_y].ObjId); 

	printf("%d ERROR CHECK\n\n", map[myRover->Current_x][myRover->Current_y].ObjId);

//The line below *could* be the problem,but whole thing crashes without it.
	p1->objtype[map[myRover->Current_x][myRover->Current_y].ObjId]=map[myRover->Current_x][myRover->Current_y].ObjId;

//and this is the line that on second running produces an error.

	printf("%d %s %s\n", p1->objtype[map[myRover->Current_x][myRover->Current_y].ObjId], p1->objname[map[myRover->Current_x][myRover->Current_y].ObjId], p1->objdesc[map[myRover->Current_x][myRover->Current_y].ObjId]);

	return p1;


}


/* code used to initialise map



location ** make_map(rover *myRover, location **map)
{


	
	int x, y, mapsizex, mapsizey;

	mapsizex=myRover->mapsizex;
	mapsizey=myRover->mapsizey;

	printf("\n\n Map Dimensions :D *********%d %d\n\n", mapsizex, mapsizey);


	//create the map, dynamically allocating memory for each location

	//allocate memory for rows
    
	map=(location**)(malloc((mapsizex)*sizeof(location*)));
    

	//allocate memory for each row of the matrix
    
	for(x=0;x<=(mapsizex);x++)
		map[x]=(location*)(malloc((mapsizey)*sizeof(location)));


	//Matrix of Structures complete

	  srand(time(NULL));
	  

	  //Set the terrain type 1=water, 2=land, 3=mountain etc


	  for(y=0; y<=mapsizey; y++)
		  for(x=0; x<=mapsizex; x++)
			  map[x][y].ObjId=rand()%17;


	  for(y=0; y<mapsizey; y++)
		  for(x=0; x<mapsizex; x++)
			  printf("%d ", map[x][y].ObjId);

      printf("\n\n\n");
		  
	//set whether the map position is passable	
	  
	  for(y=0; y<mapsizey; y++)
		  for(x=0; x<mapsizex; x++)
			  map[x][y].Movable=rand()%2;

 	  for(y=0; y<mapsizey; y++)
		  for(x=0; x<mapsizex; x++)
			  printf("%d ", map[x][y].Movable);


	  for(y=0; y<mapsizey; y++)
		  for(x=0; x<mapsizex; x++)
		  {
			  map[x][y].Gridx=x;
			  map[x][y].Gridy=y;
		  }


		printf("\n\n\n");
		  
	  for(y=0; y<mapsizey; y++)
	  {
		  printf("\n\n | \n\n");
		  for(x=0; x<mapsizex; x++)
		  {
			  printf("%d ", map[x][y].Gridx);
			  printf("%d ", map[x][y].Gridy);
			  printf("/ ");
		  }

	  }

	  return map;


}

end of make map function */

int main(void)
{

	int go=1;
	rover myRover;
	location **map;
	object A;
	object *p1;
	
	p1=&A;



	
	
	//put the if==1 if you want them to go, if==0 if you dont want them to
	
	initRover (&myRover, map);	


	if(go==1)
		map=make_map(&myRover, map);
 
	

	
	printf("\n\n===---===---===\n%d %d\n\n===---===---===\n", map[4][8].Gridx, map[4][8].Gridy);
	

	p1=object_type_name_description(&p1, &myRover, map); //a function to print the object

	printf("Object description function completed succesfully");

	if(go==1)
		move(&myRover, map);


	if(go==1)
		status(&p1, &myRover, map);

	printf("\n\n\n***\n\n\n");



	return 0;

}

  object *p1;