1
/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
4
* (C) 2014 by Argonne National Laboratory.
5
* See COPYRIGHT in top-level directory.
12
int main(int argc, char **argv)
14
int rank, size, namelen;
17
char processor_name[MPI_MAX_PROCESSOR_NAME];
19
MPI_Init(&argc, &argv);
20
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
22
MPI_Get_processor_name(processor_name, &namelen);
24
fp = popen("grep Cpus_allowed_list /proc/$$/status", "r");
26
while (fgets(path, PATH_MAX, fp) != NULL) {
27
printf("%s[%d]: %s", processor_name, rank, path);