Page MenuHomePhabricator
Differential D42523 Diff 136259 runtime/test/ompt/misc/api_calls_places.c

Changeset View

Standalone View

View Options

runtime/test/ompt/misc/api_calls_places.c

  • This file was moved from runtime/test/ompt/misc/api_calls.c.
// RUN: %libomp-compile && env OMP_PLACES=cores %libomp-run | FileCheck %s // RUN: %libomp-compile && env OMP_PLACES=cores %libomp-run | FileCheck %s
// REQUIRES: ompt, linux // REQUIRES: ompt, linux
#include "callback.h" #include "callback.h"
#include <omp.h> #include <omp.h>
#define __USE_GNU #define __USE_GNU
#include <sched.h> #include <sched.h>
#undef __USE_GNU #undef __USE_GNU
void print_list(char* function_name, int list[]) void print_list(char *function_name, int size, int list[]) {
{ printf("%" PRIu64 ": %s(0)=(%d", ompt_get_thread_data()->value, function_name,
printf("%" PRIu64 ": %s(0)=(%d", ompt_get_thread_data()->value, function_name, list[0]); list[0]);
int i; int i;
for(i = 1; i < omp_get_place_num_procs(0); i++) for (i = 1; i < size; i++) {
{
printf(",%d", list[i]); printf(",%d", list[i]);
} }
printf(")\n"); printf(")\n");
} }
int main() int main() {
{
#pragma omp parallel num_threads(1) #pragma omp parallel num_threads(1)
{ {
printf("%" PRIu64 ": omp_get_num_places()=%d\n", ompt_get_thread_data()->value, omp_get_num_places()); printf("%" PRIu64 ": omp_get_num_places()=%d\n",
printf("%" PRIu64 ": ompt_get_num_places()=%d\n", ompt_get_thread_data()->value, ompt_get_num_places()); ompt_get_thread_data()->value, omp_get_num_places());
printf("%" PRIu64 ": ompt_get_num_places()=%d\n",
ompt_get_thread_data()->value, ompt_get_num_places());
int omp_ids[omp_get_place_num_procs(0)]; int omp_ids_size = omp_get_place_num_procs(0);
int omp_ids[omp_ids_size];
omp_get_place_proc_ids(0, omp_ids); omp_get_place_proc_ids(0, omp_ids);
print_list("omp_get_place_proc_ids" ,omp_ids); print_list("omp_get_place_proc_ids", omp_ids_size, omp_ids);
int ompt_ids[omp_get_place_num_procs(0)]; int ompt_ids_size = ompt_get_place_proc_ids(0, 0, NULL);
ompt_get_place_proc_ids(0, omp_get_place_num_procs(0), ompt_ids); int ompt_ids[ompt_ids_size];
print_list("ompt_get_place_proc_ids", ompt_ids); ompt_get_place_proc_ids(0, ompt_ids_size, ompt_ids);
print_list("ompt_get_place_proc_ids", ompt_ids_size, ompt_ids);
printf("%" PRIu64 ": omp_get_place_num()=%d\n", ompt_get_thread_data()->value, omp_get_place_num());
printf("%" PRIu64 ": ompt_get_place_num()=%d\n", ompt_get_thread_data()->value, ompt_get_place_num()); printf("%" PRIu64 ": omp_get_place_num()=%d\n",
ompt_get_thread_data()->value, omp_get_place_num());
printf("%" PRIu64 ": ompt_get_place_num()=%d\n",
ompt_get_thread_data()->value, ompt_get_place_num());
int omp_nums[omp_get_partition_num_places()]; int omp_nums_size = omp_get_partition_num_places();
int omp_nums[omp_nums_size];
omp_get_partition_place_nums(omp_nums); omp_get_partition_place_nums(omp_nums);
print_list("omp_get_partition_place_nums" ,omp_nums); print_list("omp_get_partition_place_nums", omp_nums_size, omp_nums);
int ompt_nums[omp_get_partition_num_places()]; int ompt_nums_size = ompt_get_partition_place_nums(0, NULL);
ompt_get_partition_place_nums(omp_get_partition_num_places(), ompt_nums); int ompt_nums[ompt_nums_size];
print_list("ompt_get_partition_place_nums", ompt_nums); ompt_get_partition_place_nums(ompt_nums_size, ompt_nums);
print_list("ompt_get_partition_place_nums", ompt_nums_size, ompt_nums);
printf("%" PRIu64 ": sched_getcpu()=%d\n", ompt_get_thread_data()->value, sched_getcpu());
printf("%" PRIu64 ": ompt_get_proc_id()=%d\n", ompt_get_thread_data()->value, ompt_get_proc_id()); printf("%" PRIu64 ": sched_getcpu()=%d\n", ompt_get_thread_data()->value,
sched_getcpu());
printf("%" PRIu64 ": omp_get_num_procs()=%d\n", ompt_get_thread_data()->value, omp_get_num_procs()); printf("%" PRIu64 ": ompt_get_proc_id()=%d\n",
printf("%" PRIu64 ": ompt_get_num_procs()=%d\n", ompt_get_thread_data()->value, ompt_get_num_procs()); ompt_get_thread_data()->value, ompt_get_proc_id());
printf("%" PRIu64 ": omp_get_num_procs()=%d\n",
ompt_get_thread_data()->value, omp_get_num_procs());
printf("%" PRIu64 ": ompt_get_num_procs()=%d\n",
ompt_get_thread_data()->value, ompt_get_num_procs());
} }
// Check if libomp supports the callbacks for this test. // Check if libomp supports the callbacks for this test.
// CHECK: 0: NULL_POINTER=[[NULL:.*$]] // CHECK: 0: NULL_POINTER=[[NULL:.*$]]
// CHECK: {{^}}[[MASTER_ID:[0-9]+]]: omp_get_num_places()=[[NUM_PLACES:[0-9]+]] // CHECK: {{^}}[[MASTER_ID:[0-9]+]]: omp_get_num_places()=
protze.joachimUnsubmitted
Not Done
ReplyInline Actions

I suggest to move "=" to the next line to ensure that NUM_PLACES matches the right number?

protze.joachim: I suggest to move "=" to the next line to ensure that NUM_PLACES matches the right number?
HahnfeldUnsubmitted
Not Done
ReplyInline Actions

(and I think you can readd a space between CHECK-SAME: and the rest, FileCheck should strip the whitespace from begin and end)

Hahnfeld: (and I think you can readd a space between `CHECK-SAME:` and the rest, `FileCheck` //should//…
// CHECK-SAME:[[NUM_PLACES:[0-9]+]]
// CHECK: {{^}}[[MASTER_ID]]: ompt_get_num_places()=[[NUM_PLACES]] // CHECK: {{^}}[[MASTER_ID]]: ompt_get_num_places()=[[NUM_PLACES]]
// CHECK: {{^}}[[MASTER_ID]]: omp_get_place_proc_ids(0)=([[PROC_IDS:[0-9\,]+]]) // CHECK: {{^}}[[MASTER_ID]]: omp_get_place_proc_ids(0)=
// CHECK-SAME:([[PROC_IDS:[0-9\,]+]])
// CHECK: {{^}}[[MASTER_ID]]: ompt_get_place_proc_ids(0)=([[PROC_IDS]]) // CHECK: {{^}}[[MASTER_ID]]: ompt_get_place_proc_ids(0)=([[PROC_IDS]])
// CHECK: {{^}}[[MASTER_ID]]: omp_get_place_num()=[[PLACE_NUM:[-]?[0-9]+]] // CHECK: {{^}}[[MASTER_ID]]: omp_get_place_num()=[[PLACE_NUM:[-]?[0-9]+]]
// CHECK: {{^}}[[MASTER_ID]]: ompt_get_place_num()=[[PLACE_NUM]] // CHECK: {{^}}[[MASTER_ID]]: ompt_get_place_num()=[[PLACE_NUM]]
// CHECK: {{^}}[[MASTER_ID]]: sched_getcpu()=[[CPU_ID:[0-9]+]] // CHECK: {{^}}[[MASTER_ID]]: sched_getcpu()=[[CPU_ID:[0-9]+]]
// CHECK: {{^}}[[MASTER_ID]]: ompt_get_proc_id()=[[CPU_ID]] // CHECK: {{^}}[[MASTER_ID]]: ompt_get_proc_id()=[[CPU_ID]]
// CHECK: {{^}}[[MASTER_ID]]: omp_get_num_procs()=[[NUM_PROCS:[-]?[0-9]+]] // CHECK: {{^}}[[MASTER_ID]]: omp_get_num_procs()=[[NUM_PROCS:[-]?[0-9]+]]
// CHECK: {{^}}[[MASTER_ID]]: ompt_get_num_procs()=[[NUM_PROCS]] // CHECK: {{^}}[[MASTER_ID]]: ompt_get_num_procs()=[[NUM_PROCS]]
return 0; return 0;
} }