xref: /llvm-project/openmp/runtime/test/ompt/synchronization/nest_lock.c (revision 6213ed062b6ec27af8d013dbd28a651025957407)
182e94a59SJoachim Protze // RUN: %libomp-compile-and-run | FileCheck %s
282e94a59SJoachim Protze // REQUIRES: ompt
382e94a59SJoachim Protze #include "callback.h"
482e94a59SJoachim Protze #include <omp.h>
582e94a59SJoachim Protze 
main()682e94a59SJoachim Protze int main()
782e94a59SJoachim Protze {
84c6a098aSKazuaki Ishizaki   //need to use an OpenMP construct so that OMPT will be initialized
982e94a59SJoachim Protze   #pragma omp parallel num_threads(1)
1082e94a59SJoachim Protze     print_ids(0);
1182e94a59SJoachim Protze 
1282e94a59SJoachim Protze   omp_nest_lock_t nest_lock;
13*6213ed06SJoachim Protze   printf("%" PRIu64 ": &nest_lock: %" PRIu64 "\n",
14*6213ed06SJoachim Protze          ompt_get_thread_data()->value, (ompt_wait_id_t)(uintptr_t)&nest_lock);
1582e94a59SJoachim Protze   omp_init_nest_lock(&nest_lock);
16723560d1SJonas Hahnfeld   print_fuzzy_address(1);
1782e94a59SJoachim Protze   omp_set_nest_lock(&nest_lock);
18723560d1SJonas Hahnfeld   print_fuzzy_address(2);
1982e94a59SJoachim Protze   omp_set_nest_lock(&nest_lock);
20723560d1SJonas Hahnfeld   print_fuzzy_address(3);
2182e94a59SJoachim Protze   omp_unset_nest_lock(&nest_lock);
22723560d1SJonas Hahnfeld   print_fuzzy_address(4);
2382e94a59SJoachim Protze   omp_unset_nest_lock(&nest_lock);
24723560d1SJonas Hahnfeld   print_fuzzy_address(5);
2582e94a59SJoachim Protze   omp_destroy_nest_lock(&nest_lock);
26723560d1SJonas Hahnfeld   print_fuzzy_address(6);
2782e94a59SJoachim Protze 
2882e94a59SJoachim Protze 
2982e94a59SJoachim Protze   // Check if libomp supports the callbacks for this test.
3082e94a59SJoachim Protze   // CHECK-NOT: {{^}}0: Could not register callback 'ompt_callback_mutex_acquire'
3182e94a59SJoachim Protze   // CHECK-NOT: {{^}}0: Could not register callback 'ompt_callback_mutex_acquired'
3282e94a59SJoachim Protze   // CHECK-NOT: {{^}}0: Could not register callback 'ompt_callback_mutex_released'
3382e94a59SJoachim Protze   // CHECK-NOT: {{^}}0: Could not register callback 'ompt_callback_nest_lock'
3482e94a59SJoachim Protze 
3582e94a59SJoachim Protze   // CHECK: 0: NULL_POINTER=[[NULL:.*$]]
3682e94a59SJoachim Protze 
37723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID:[0-9]+]]: ompt_event_init_nest_lock: wait_id=[[WAIT_ID:[0-9]+]], hint={{[0-9]+}}, impl={{[0-9]+}}, codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
38723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
39723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_wait_nest_lock: wait_id=[[WAIT_ID]], hint={{[0-9]+}}, impl={{[0-9]+}}, codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
40723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_acquired_nest_lock_first: wait_id=[[WAIT_ID]], codeptr_ra=[[RETURN_ADDRESS]]{{[0-f][0-f]}}
41723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
42723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_wait_nest_lock: wait_id=[[WAIT_ID]], hint={{[0-9]+}}, impl={{[0-9]+}}, codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
4382e94a59SJoachim Protze   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_acquired_nest_lock_next: wait_id=[[WAIT_ID]], codeptr_ra=[[RETURN_ADDRESS]]
44723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
45723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_release_nest_lock_prev: wait_id=[[WAIT_ID]], codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
46723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
47723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_release_nest_lock_last: wait_id=[[WAIT_ID]], codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
48723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
49723560d1SJonas Hahnfeld   // CHECK: {{^}}[[MASTER_ID]]: ompt_event_destroy_nest_lock: wait_id=[[WAIT_ID]], codeptr_ra=[[RETURN_ADDRESS:0x[0-f]+]]{{[0-f][0-f]}}
50723560d1SJonas Hahnfeld   // CHECK-NEXT: {{^}}[[MASTER_ID]]: fuzzy_address={{.*}}[[RETURN_ADDRESS]]
5182e94a59SJoachim Protze 
5282e94a59SJoachim Protze   return 0;
5382e94a59SJoachim Protze }
54