diff options
Diffstat (limited to 'mpi')
-rw-r--r-- | mpi/Makefile | 21 | ||||
-rw-r--r-- | mpi/build/.gitignore | 2 | ||||
-rwxr-xr-x | mpi/gol | bin | 0 -> 155352 bytes | |||
-rw-r--r-- | mpi/include/create_grid.h | 12 | ||||
-rw-r--r-- | mpi/include/file.h | 11 | ||||
-rw-r--r-- | mpi/include/game.h | 19 | ||||
-rw-r--r-- | mpi/output/.gitignore | 2 | ||||
-rw-r--r-- | mpi/src/create_grid.c | 38 | ||||
-rw-r--r-- | mpi/src/file.c | 17 | ||||
-rw-r--r-- | mpi/src/game.c | 56 | ||||
-rw-r--r-- | mpi/src/main.c | 220 |
11 files changed, 398 insertions, 0 deletions
diff --git a/mpi/Makefile b/mpi/Makefile new file mode 100644 index 0000000..0a464a4 --- /dev/null +++ b/mpi/Makefile @@ -0,0 +1,21 @@ +.DEFAULT_GOAL := all + +INCLUDES = -I include/ +FLAGS= -std=c99 + +game.o: include/game.h src/game.c + mpicc -c src/game.c $(INCLUDES) $(FLAGS) -o build/game.o + +file.o: game.o include/file.h src/file.c + mpicc -c src/file.c $(INCLUDES) $(FLAGS) -o build/file.o + +create_grid.o: file.o game.o include/create_grid.h src/create_grid.c + mpicc -c src/create_grid.c $(INCLUDES) $(FLAGS) -o build/create_grid.o + +gol: game.o file.o create_grid.o + mpicc $(INCLUDES) $(FLAGS) -o gol build/game.o build/file.o build/create_grid.o src/main.c + +clean: + $(RM) build/*.o gol output/*.bin + +all: gol diff --git a/mpi/build/.gitignore b/mpi/build/.gitignore new file mode 100644 index 0000000..d6b7ef3 --- /dev/null +++ b/mpi/build/.gitignore @@ -0,0 +1,2 @@ +* +!.gitignore Binary files differdiff --git a/mpi/include/create_grid.h b/mpi/include/create_grid.h new file mode 100644 index 0000000..45ac891 --- /dev/null +++ b/mpi/include/create_grid.h @@ -0,0 +1,12 @@ +#include <stdio.h> +#include <stdlib.h> +#include "file.h" +#include "game.h" + +#ifndef CREATE_GRID_H +#define CREATE_GRID_H + +void print_grid(struct GAME* game); +void create_grid(int argc, char** argv); + +#endif // CREATE_GRID_H diff --git a/mpi/include/file.h b/mpi/include/file.h new file mode 100644 index 0000000..b2db380 --- /dev/null +++ b/mpi/include/file.h @@ -0,0 +1,11 @@ +#include "game.h" +#include <stdlib.h> +#include <stdio.h> + +#ifndef FILE_H +#define FILE_H + +void read_in(char* filename, struct GAME* game); +void write_out(char* filename, struct GAME* game); + +#endif //FILE_H diff --git a/mpi/include/game.h b/mpi/include/game.h new file mode 100644 index 0000000..135fd8a --- /dev/null +++ b/mpi/include/game.h @@ -0,0 +1,19 @@ +#include <stdlib.h> +#include <stdio.h> +#include <string.h> + +#ifndef GAME_H +#define GAME_H + +struct GAME { + unsigned char* grid; + int padding; + int width; + int height; +}; + +int neighbors(struct GAME* game, int x, int y, unsigned char* halo_above, unsigned char* halo_below); +void next(struct GAME* game, unsigned char* halo_above, unsigned char* halo_below); +void randomize(struct GAME* game); + +#endif // GAME_H diff --git a/mpi/output/.gitignore b/mpi/output/.gitignore new file mode 100644 index 0000000..d6b7ef3 --- /dev/null +++ b/mpi/output/.gitignore @@ -0,0 +1,2 @@ +* +!.gitignore diff --git a/mpi/src/create_grid.c b/mpi/src/create_grid.c new file mode 100644 index 0000000..b89d077 --- /dev/null +++ b/mpi/src/create_grid.c @@ -0,0 +1,38 @@ +#include "create_grid.h" + +void print_grid(struct GAME* game) { + printf("\n===GRID===\n"); + for (int y = 0; y < game->height; y++) { + for (int x = 0; x < game->width; x++) { + printf("%i ", game->grid[y*(game->width+game->padding*2) + x]); + } + printf("\n"); + } +} + +void create_grid(int argc, char** argv) { + char* filename; + struct GAME game; + game.padding = 0; + if (argc == 5) { + game.width = atoi(argv[2]); + game.height = atoi(argv[3]); + filename = argv[4]; + } else { + printf("Usage: ./gol create-grid <width> <height> <filename>\n"); + exit(1); + } + + int size = (game.width+game.padding*2) * (game.height+game.padding*2); + unsigned char* grid = (unsigned char*)malloc(sizeof(unsigned char) * size); + for (int y = 0; y < game.height; y++) { + printf("Row %i: ", y); + for (int x = 0; x < game.width; x++) { + char temp; + scanf("%i%c", (unsigned int*)&game.grid[y*(game.width+game.padding*2) + x],&temp); + } + } + game.grid = grid; + write_out(filename, &game); + print_grid(&game); +} diff --git a/mpi/src/file.c b/mpi/src/file.c new file mode 100644 index 0000000..46ba46a --- /dev/null +++ b/mpi/src/file.c @@ -0,0 +1,17 @@ +#include "file.h" + +void read_in(char* filename, struct GAME* game) { + FILE* file = fopen(filename, "rb"); + for (int i = game->padding; i < game->height+game->padding; i++) { + fread(&game->grid[i*(game->width + 2*game->padding) + game->padding], sizeof(unsigned char), game->width, file); + } + fclose(file); +} + +void write_out(char* filename, struct GAME* game) { + FILE* file = fopen(filename, "w+"); + for (int i = game->padding; i < game->height+game->padding; i++) { + fwrite(&game->grid[i*(game->width + 2*game->padding) + game->padding], sizeof(unsigned char), game->width, file); + } + fclose(file); +} diff --git a/mpi/src/game.c b/mpi/src/game.c new file mode 100644 index 0000000..de73f67 --- /dev/null +++ b/mpi/src/game.c @@ -0,0 +1,56 @@ +#include "game.h" + +int neighbors(struct GAME* game, int x, int y, unsigned char* halo_above, unsigned char* halo_below) { + int n = 0; + + for (int dy = -1; dy <= 1; dy++) { + for (int dx = -1; dx <= 1; dx++) { + if (!(dx == 0 && dy == 0) && (x+dx) > 0 && (x+dx) < game->width+(game->padding*2)) { + if (y+dy == -1 && halo_above != NULL) { + if (halo_above[x+dx]) { + n++; + } + } else if (y+dy == game->height && halo_below != NULL) { + if (halo_below[x+dx]) { + n++; + } + } else if (game->grid[(y+dy) * (game->width+game->padding*2) + (x+dx)]) { + n++; + } + } + } + } + return n; +} + +void next(struct GAME* game, unsigned char* halo_above, unsigned char* halo_below) { + unsigned char* newGrid = malloc(sizeof(unsigned char) * game->height * (game->width + 2*game->padding)); + for (int y = 0; y < game->height; y++) { + for (int x = 0; x < game->width + 2*game->padding; x++) { + int my_neighbors = neighbors(game, x, y, halo_above, halo_below); + int my_coord = y * (game->width+game->padding*2) + x; + newGrid[my_coord] = 0; // It's possible that there are artifacts from the last iteration + if (game->grid[my_coord]) { + if (my_neighbors < 2 || my_neighbors > 3) { + newGrid[my_coord] = 0; + } else { + newGrid[my_coord] = 1; + } + } else { + if (my_neighbors == 3) { + newGrid[my_coord] = 1; + } + } + } + } + free(game->grid); + game->grid = newGrid; +} + +void randomize(struct GAME* game) { + for (int y = game->padding; y < game->height+game->padding; y++) { + for (int x = game->padding; x < game->width+game->padding; x++) { + game->grid[y*(game->width+game->padding*2) + x] = (unsigned char) rand() & 1; + } + } +} diff --git a/mpi/src/main.c b/mpi/src/main.c new file mode 100644 index 0000000..9fed89e --- /dev/null +++ b/mpi/src/main.c @@ -0,0 +1,220 @@ +#include <stdlib.h> +#include <time.h> +#include <stdio.h> +#include <string.h> +#include <mpi.h> + +#include "file.h" +#include "game.h" +#include "create_grid.h" + +/* + Rules for life: + Any live cell with fewer than two live neighbors dies (underpopulation). + Any live cell with two or three live neighbors continues to live. + Any live cell with more than three live neighbors dies (overpopulation). + Any dead cell with exactly three live neighbors becomes a live cell (reproduction). + */ +#define PADDING 16 +//#define VERBOSE 1 +#define SEED 100 + +struct Args { + int process_count; + int iterations; + int log_each_step; + int width; + int height; + int padding; + int rows_per_proc; + int data_per_proc; +}; + +void broadcast_and_receive_input(MPI_Comm comm, struct Args* args) { + int blocks[8] = {1,1,1,1,1,1,1,1}; + MPI_Aint displacements[8]; + MPI_Datatype types[8] = {MPI_INT, MPI_INT, MPI_INT, MPI_INT, MPI_INT, MPI_INT, MPI_INT, MPI_INT}; + MPI_Datatype arg_t; + + displacements[0] = offsetof(struct Args, process_count); + displacements[1] = offsetof(struct Args, iterations); + displacements[2] = offsetof(struct Args, log_each_step); + displacements[3] = offsetof(struct Args, width); + displacements[4] = offsetof(struct Args, height); + displacements[5] = offsetof(struct Args, padding); + displacements[6] = offsetof(struct Args, rows_per_proc); + displacements[7] = offsetof(struct Args, data_per_proc); + + MPI_Type_create_struct(8, blocks, displacements, types, &arg_t); + MPI_Type_commit(&arg_t); + MPI_Bcast(args, 1, arg_t, 0, comm); +} + +void scatter_data(MPI_Comm comm, struct Args* args, unsigned char* local_data, int rank, int* data_counts, int* displacements, char* filename) { + unsigned char* data; + + int grid_size = (args->height + args->padding*2)*(args->width + args->padding*2); + if (rank == 0) { + struct GAME game; + game.width = args->width; + game.height = args->height; + game.padding = args->padding; + int size = sizeof(unsigned char)*grid_size; + data = malloc(size); + memset(data, 0, size); + game.grid = data; + if (strcmp(filename, "random") == 0) { + randomize(&game); + } else { + read_in(filename, &game); + } + } + MPI_Scatterv(data, data_counts, displacements, MPI_UNSIGNED_CHAR, local_data, data_counts[rank], MPI_UNSIGNED_CHAR, 0, comm); + + if (rank == 0) { + free(data); + } +} + + +void simulate(int argc, char** argv) { + srand(SEED); + double totalStart = MPI_Wtime(); + struct Args args; + args.padding = PADDING; + + int rank, process_count; + MPI_Comm comm; + MPI_Init(&argc, &argv); + comm = MPI_COMM_WORLD; + MPI_Comm_rank(comm, &rank); + MPI_Comm_size(comm, &args.process_count); + + char* filename; + if (rank == 0) { + if (argc == 7) { + filename = argv[2]; + args.width = atoi(argv[3]); + args.height = atoi(argv[4]); + args.iterations = atoi(argv[5]); + args.log_each_step = atoi(argv[6]); + } else { + printf("Usage: ./gol simulate <filename | random> <width> <height> <iterations> <log-each-step?1:0> <block-size>\n"); + filename = "random"; + args.height = 5; + args.width = 5; + args.iterations = 5; + args.log_each_step = 0; + } + + args.rows_per_proc = (args.height + args.padding*2)/args.process_count; + args.data_per_proc = args.rows_per_proc * (args.width + args.padding*2); + } + + broadcast_and_receive_input(comm, &args); + + int grid_size = ((args.width + args.padding*2)*(args.height + args.padding*2)); + int* data_counts = malloc(sizeof(int) * args.process_count); + int* displacements = malloc(sizeof(int) * args.process_count); + for (int i = 0; i < args.process_count; i++) { + data_counts[i] = args.data_per_proc; + displacements[i] = args.data_per_proc*sizeof(unsigned char)*i; + } + data_counts[args.process_count-1] += grid_size % (args.data_per_proc * args.process_count); + unsigned char* local_data = malloc(data_counts[rank]*sizeof(unsigned char)); + memset(local_data, 0, sizeof(unsigned char) * data_counts[rank]); + scatter_data(comm, &args, local_data, rank, data_counts, displacements, filename); + + // Allocate space for current grid (1 byte per tile) + char iteration_file[1024]; + + double timeComputingLife = 0; + float localTime = 0; + + struct GAME local_game; + local_game.grid = local_data; + local_game.width = args.width; + local_game.height = data_counts[rank] / (args.width + args.padding*2); + local_game.padding = args.padding; + unsigned char* halo_above = NULL; + unsigned char* halo_below = NULL; + if (rank > 0) { + halo_above = (unsigned char*)malloc(sizeof(unsigned char) * (args.width + args.padding*2)); + memset(halo_above, 0, sizeof(unsigned char) * (args.width + args.padding*2)); + } + if (rank < args.process_count-1) { + halo_below = (unsigned char*)malloc(sizeof(unsigned char) * (args.width + args.padding*2)); + memset(halo_below, 0, sizeof(unsigned char) * (args.width + args.padding*2)); + } + + unsigned char* global_data; + + for (int i = 0; i <= args.iterations; i++) { + if (i > 0) { + int total_width = args.width + args.padding*2; + if (rank < args.process_count - 1) { + MPI_Send(&local_game.grid[(local_game.height-1) * total_width], total_width, MPI_UNSIGNED_CHAR, rank+1, 1, comm); + } + if (rank > 0) { + MPI_Recv(halo_above, total_width, MPI_UNSIGNED_CHAR, rank-1, 1, comm, NULL); + MPI_Send(&local_game.grid[0], total_width, MPI_UNSIGNED_CHAR, rank-1, 0, comm); + } + if (rank < args.process_count - 1) { + MPI_Recv(halo_below, total_width, MPI_UNSIGNED_CHAR, rank+1, 0, comm, NULL); + } + MPI_Barrier(comm); + next(&local_game, halo_above, halo_below); + } + if (args.log_each_step) { + if (rank == 0) { + global_data = malloc(sizeof(unsigned char) * grid_size); + memset(global_data, 0, sizeof(unsigned char) * grid_size); + } + MPI_Gatherv(local_game.grid, data_counts[rank], MPI_UNSIGNED_CHAR, global_data, data_counts, displacements, MPI_UNSIGNED_CHAR, 0, comm); + if (rank == 0) { + #ifdef VERBOSE + printf("\n===Iteration %i===\n", i); + for (int y = args.padding; y < args.height+args.padding; y++) { + for (int x = args.padding; x < args.width+args.padding; x++) { + printf("%s ", global_data[y*(args.width+2*args.padding) + x] ? "X" : " "); + } + printf("\n"); + } + printf("===End iteration %i===\n", i); + #endif + + struct GAME global_game; + global_game.grid = global_data; + global_game.width = args.width; + global_game.height = args.height; + global_game.padding = args.padding; + sprintf(iteration_file, "output/iteration-%07d.bin", i); + write_out(iteration_file, &global_game); + } + } + } + + double totalEnd = MPI_Wtime(); + MPI_Finalize(); + if (rank == 0) { + printf("\n===Timing===\nTime computing life: %f\nClock time: %f\n", timeComputingLife, (totalEnd - totalStart)); + } + +} + +int main(int argc, char** argv) { + if (argc >= 2) { + if (strcmp(argv[1], "simulate") == 0) { + simulate(argc, argv); + } else if (strcmp(argv[1], "create-grid") == 0) { + create_grid(argc, argv); + } else { + printf("Unknown input: %s\n", argv[1]); + exit(1); + } + } else { + printf("Usage: ./gol <simulate | create-grid>\n"); + exit(1); + } + return 0; +} |