浏览代码

examples

master
test2 1年前
父节点
当前提交
c354ae1fae
共有 3 个文件被更改,包括 40 次插入0 次删除
  1. 30
    0
      examples/mpi_hello_world.c
  2. 5
    0
      swarmlab/run
  3. 5
    0
      swarmlab/runbefore

+ 30
- 0
examples/mpi_hello_world.c 查看文件

@@ -0,0 +1,30 @@
#include <mpi.h>
#include <stdio.h>

int main(int argc, char** argv) {
// Initialize the MPI environment. The two arguments to MPI Init are not
// currently used by MPI implementations, but are there in case future
// implementations might need the arguments.
MPI_Init(NULL, NULL);

// Get the number of processes
int world_size;
MPI_Comm_size(MPI_COMM_WORLD, &world_size);

// Get the rank of the process
int world_rank;
MPI_Comm_rank(MPI_COMM_WORLD, &world_rank);

// Get the name of the processor
char processor_name[MPI_MAX_PROCESSOR_NAME];
int name_len;
MPI_Get_processor_name(processor_name, &name_len);

// Print off a hello world message
printf("Hello world from processor %s, rank %d out of %d processors\n",
processor_name, world_rank, world_size);

// Finalize the MPI environment. No more MPI calls can be made after this
MPI_Finalize();
}


+ 5
- 0
swarmlab/run 查看文件

@@ -0,0 +1,5 @@
#!/bin/bash

mpicc -o /project/mpi_hello_world ../examples/mpi_hello_world.c
sudo -u mpi scp /projects/mpi_hello_world mpi@10.0.8.10:/project/mpi_hello_world
sudo -u mpi mpirun -n 10 -f /projects/hosts /project/mpi_hello_world 2>&1 | tee /project/output.log

+ 5
- 0
swarmlab/runbefore 查看文件

@@ -0,0 +1,5 @@
#!/bin/bash

IP_ADDR=$(ip addr show | grep "inet " | grep "eth0" | awk '{print $2}')
nmap -sP $IP_ADDR | grep ondemand_mpi_worker | awk -F "[()]" '{ for (i=2; i<NF; i+=2) print $i }' > /project/hosts


正在加载...
取消
保存