Lines Matching refs:master_th
958 kmp_info_t *master_th, int master_gtid) { in __kmp_fork_team_threads() argument
967 master_th->th.th_info.ds.ds_tid = 0; in __kmp_fork_team_threads()
968 master_th->th.th_team = team; in __kmp_fork_team_threads()
969 master_th->th.th_team_nproc = team->t.t_nproc; in __kmp_fork_team_threads()
970 master_th->th.th_team_master = master_th; in __kmp_fork_team_threads()
971 master_th->th.th_team_serialized = FALSE; in __kmp_fork_team_threads()
972 master_th->th.th_dispatch = &team->t.t_dispatch[0]; in __kmp_fork_team_threads()
977 kmp_hot_team_ptr_t *hot_teams = master_th->th.th_hot_teams; in __kmp_fork_team_threads()
981 if (master_th->th.th_teams_microtask) { // are we inside the teams? in __kmp_fork_team_threads()
982 if (master_th->th.th_teams_size.nteams > 1) { in __kmp_fork_team_threads()
987 master_th->th.th_teams_level == team->t.t_level) { in __kmp_fork_team_threads()
1012 team->t.t_threads[0] = master_th; in __kmp_fork_team_threads()
1013 __kmp_initialize_info(master_th, team, 0, master_gtid); in __kmp_fork_team_threads()
1030 thr->th.th_teams_microtask = master_th->th.th_teams_microtask; in __kmp_fork_team_threads()
1031 thr->th.th_teams_level = master_th->th.th_teams_level; in __kmp_fork_team_threads()
1032 thr->th.th_teams_size = master_th->th.th_teams_size; in __kmp_fork_team_threads()
1399 kmp_info_t *master_th; in __kmp_fork_call() local
1432 master_th = __kmp_threads[gtid]; // AC: potentially unsafe, not in sync with in __kmp_fork_call()
1434 parent_team = master_th->th.th_team; in __kmp_fork_call()
1435 master_tid = master_th->th.th_info.ds.ds_tid; in __kmp_fork_call()
1436 master_this_cons = master_th->th.th_local.this_construct; in __kmp_fork_call()
1437 root = master_th->th.th_root; in __kmp_fork_call()
1439 master_set_numthreads = master_th->th.th_set_nproc; in __kmp_fork_call()
1460 teams_level = master_th->th.th_teams_level; in __kmp_fork_call()
1462 p_hot_teams = &master_th->th.th_hot_teams; in __kmp_fork_call()
1486 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
1490 master_th->th.th_ident = loc; in __kmp_fork_call()
1492 if (master_th->th.th_teams_microtask && ap && in __kmp_fork_call()
1504 if (parent_team == master_th->th.th_serial_team) { in __kmp_fork_call()
1516 __ompt_lw_taskteam_init(&lw_taskteam, master_th, gtid, in __kmp_fork_call()
1520 __ompt_lw_taskteam_link(&lw_taskteam, master_th, 0); in __kmp_fork_call()
1524 implicit_task_data = OMPT_CUR_TASK_DATA(master_th); in __kmp_fork_call()
1526 OMPT_CUR_TASK_INFO(master_th) in __kmp_fork_call()
1529 ompt_scope_begin, OMPT_CUR_TEAM_DATA(master_th), in __kmp_fork_call()
1531 OMPT_CUR_TASK_INFO(master_th)->thread_num, ompt_task_implicit); in __kmp_fork_call()
1535 master_th->th.ompt_thread_info.state = ompt_state_work_parallel; in __kmp_fork_call()
1558 OMPT_CUR_TASK_INFO(master_th)->frame.exit_frame = ompt_data_none; in __kmp_fork_call()
1562 OMPT_CUR_TASK_INFO(master_th)->thread_num, ompt_task_implicit); in __kmp_fork_call()
1564 ompt_parallel_data = *OMPT_CUR_TEAM_DATA(master_th); in __kmp_fork_call()
1565 __ompt_lw_taskteam_unlink(master_th); in __kmp_fork_call()
1568 &ompt_parallel_data, OMPT_CUR_TASK_DATA(master_th), in __kmp_fork_call()
1572 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
1583 parent_team->t.t_def_allocator = master_th->th.th_def_allocator; // save in __kmp_fork_call()
1588 __ompt_lw_taskteam_init(&lw_taskteam, master_th, gtid, in __kmp_fork_call()
1590 __ompt_lw_taskteam_link(&lw_taskteam, master_th, 1, true); in __kmp_fork_call()
1596 if (master_set_numthreads < master_th->th.th_teams_size.nth) { in __kmp_fork_call()
1605 master_th->th.th_set_nproc = 0; in __kmp_fork_call()
1619 root, parent_team, master_th, gtid)); in __kmp_fork_call()
1623 root, parent_team, master_th, gtid)); in __kmp_fork_call()
1643 KMP_DEBUG_ASSERT(master_th->th.th_task_team == in __kmp_fork_call()
1644 parent_team->t.t_task_team[master_th->th.th_task_state]); in __kmp_fork_call()
1649 master_th->th.th_current_task->td_icvs.max_active_levels) { in __kmp_fork_call()
1665 if ((get__max_active_levels(master_th) == 1 && in __kmp_fork_call()
1694 master_th->th.th_set_nproc = 0; in __kmp_fork_call()
1714 master_th->th.th_serial_team->t.t_ident = loc; in __kmp_fork_call()
1717 master_th->th.th_serial_team->t.t_level--; in __kmp_fork_call()
1728 __ompt_lw_taskteam_init(&lw_taskteam, master_th, gtid, in __kmp_fork_call()
1731 __ompt_lw_taskteam_link(&lw_taskteam, master_th, 0); in __kmp_fork_call()
1734 task_info = OMPT_CUR_TASK_INFO(master_th); in __kmp_fork_call()
1737 OMPT_CUR_TASK_INFO(master_th) in __kmp_fork_call()
1740 ompt_scope_begin, OMPT_CUR_TEAM_DATA(master_th), in __kmp_fork_call()
1742 OMPT_CUR_TASK_INFO(master_th)->thread_num, in __kmp_fork_call()
1747 master_th->th.ompt_thread_info.state = ompt_state_work_parallel; in __kmp_fork_call()
1771 OMPT_CUR_TASK_INFO(master_th)->thread_num, in __kmp_fork_call()
1774 ompt_parallel_data = *OMPT_CUR_TEAM_DATA(master_th); in __kmp_fork_call()
1775 __ompt_lw_taskteam_unlink(master_th); in __kmp_fork_call()
1782 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
1786 KMP_DEBUG_ASSERT(master_th->th.th_team == in __kmp_fork_call()
1787 master_th->th.th_serial_team); in __kmp_fork_call()
1788 team = master_th->th.th_team; in __kmp_fork_call()
1809 ompt_task_info_t *task_info = OMPT_CUR_TASK_INFO(master_th); in __kmp_fork_call()
1813 OMPT_CUR_TASK_INFO(master_th)->thread_num, ompt_task_initial); in __kmp_fork_call()
1821 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
1838 __ompt_lw_taskteam_init(&lw_taskteam, master_th, gtid, in __kmp_fork_call()
1840 __ompt_lw_taskteam_link(&lw_taskteam, master_th, 0); in __kmp_fork_call()
1842 task_info = OMPT_CUR_TASK_INFO(master_th); in __kmp_fork_call()
1846 implicit_task_data = OMPT_CUR_TASK_DATA(master_th); in __kmp_fork_call()
1849 ompt_scope_begin, OMPT_CUR_TEAM_DATA(master_th), in __kmp_fork_call()
1852 OMPT_CUR_TASK_INFO(master_th) in __kmp_fork_call()
1857 master_th->th.ompt_thread_info.state = ompt_state_work_parallel; in __kmp_fork_call()
1880 OMPT_CUR_TASK_INFO(master_th)->thread_num, in __kmp_fork_call()
1884 ompt_parallel_data = *OMPT_CUR_TEAM_DATA(master_th); in __kmp_fork_call()
1885 __ompt_lw_taskteam_unlink(master_th); in __kmp_fork_call()
1892 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
1899 __ompt_lw_taskteam_init(&lwt, master_th, gtid, &ompt_parallel_data, in __kmp_fork_call()
1903 __ompt_lw_taskteam_link(&lwt, master_th, 1); in __kmp_fork_call()
1924 parent_team->t.t_active_level, master_th, in __kmp_fork_call()
1925 master_th->th.th_current_task, in __kmp_fork_call()
1926 master_th->th.th_current_task->td_icvs.max_active_levels)); in __kmp_fork_call()
1930 master_th->th.th_current_task->td_flags.executing = 0; in __kmp_fork_call()
1932 if (!master_th->th.th_teams_microtask || level > teams_level) { in __kmp_fork_call()
1938 int nthreads_icv = master_th->th.th_current_task->td_icvs.nproc; in __kmp_fork_call()
1947 kmp_proc_bind_t proc_bind = master_th->th.th_set_proc_bind; in __kmp_fork_call()
1950 if (master_th->th.th_current_task->td_icvs.proc_bind == proc_bind_false) { in __kmp_fork_call()
1956 proc_bind = master_th->th.th_current_task->td_icvs.proc_bind; in __kmp_fork_call()
1964 master_th->th.th_current_task->td_icvs.proc_bind)) { in __kmp_fork_call()
1970 master_th->th.th_set_proc_bind = proc_bind_default; in __kmp_fork_call()
1974 copy_icvs(&new_icvs, &master_th->th.th_current_task->td_icvs); in __kmp_fork_call()
1990 argc USE_NESTED_HOT_ARG(master_th)); in __kmp_fork_call()
1999 &master_th->th.th_current_task->td_icvs, in __kmp_fork_call()
2000 argc USE_NESTED_HOT_ARG(master_th)); in __kmp_fork_call()
2017 if (!master_th->th.th_teams_microtask || level > teams_level) { in __kmp_fork_call()
2034 KMP_CHECK_UPDATE(team->t.t_def_allocator, master_th->th.th_def_allocator); in __kmp_fork_call()
2042 KMP_DEBUG_ASSERT(master_th->th.th_task_team == in __kmp_fork_call()
2043 parent_team->t.t_task_team[master_th->th.th_task_state]); in __kmp_fork_call()
2046 __kmp_gtid_from_thread(master_th), in __kmp_fork_call()
2047 master_th->th.th_task_team, parent_team, in __kmp_fork_call()
2048 team->t.t_task_team[master_th->th.th_task_state], team)); in __kmp_fork_call()
2050 if (active_level || master_th->th.th_task_team) { in __kmp_fork_call()
2052 KMP_DEBUG_ASSERT(master_th->th.th_task_state_memo_stack); in __kmp_fork_call()
2053 if (master_th->th.th_task_state_top >= in __kmp_fork_call()
2054 master_th->th.th_task_state_stack_sz) { // increase size in __kmp_fork_call()
2055 kmp_uint32 new_size = 2 * master_th->th.th_task_state_stack_sz; in __kmp_fork_call()
2059 for (i = 0; i < master_th->th.th_task_state_stack_sz; ++i) { in __kmp_fork_call()
2060 new_stack[i] = master_th->th.th_task_state_memo_stack[i]; in __kmp_fork_call()
2062 for (i = master_th->th.th_task_state_stack_sz; i < new_size; in __kmp_fork_call()
2066 old_stack = master_th->th.th_task_state_memo_stack; in __kmp_fork_call()
2067 master_th->th.th_task_state_memo_stack = new_stack; in __kmp_fork_call()
2068 master_th->th.th_task_state_stack_sz = new_size; in __kmp_fork_call()
2072 master_th->th in __kmp_fork_call()
2073 .th_task_state_memo_stack[master_th->th.th_task_state_top] = in __kmp_fork_call()
2074 master_th->th.th_task_state; in __kmp_fork_call()
2075 master_th->th.th_task_state_top++; in __kmp_fork_call()
2077 if (master_th->th.th_hot_teams && in __kmp_fork_call()
2079 team == master_th->th.th_hot_teams[active_level].hot_team) { in __kmp_fork_call()
2081 master_th->th.th_task_state = in __kmp_fork_call()
2082 master_th->th in __kmp_fork_call()
2083 .th_task_state_memo_stack[master_th->th.th_task_state_top]; in __kmp_fork_call()
2086 master_th->th.th_task_state = 0; in __kmp_fork_call()
2092 KMP_DEBUG_ASSERT((master_th->th.th_task_team == NULL) || in __kmp_fork_call()
2128 __kmp_fork_team_threads(root, team, master_th, gtid); in __kmp_fork_call()
2130 &master_th->th.th_current_task->td_icvs, loc); in __kmp_fork_call()
2133 master_th->th.ompt_thread_info.state = ompt_state_work_parallel; in __kmp_fork_call()
2140 && !master_th->th.th_teams_microtask) { // not in teams construct in __kmp_fork_call()
2149 master_th->th.th_frame_time = tmp_time; in __kmp_fork_call()
2168 root, team, master_th, gtid)); in __kmp_fork_call()
2184 root, team, master_th, gtid)); in __kmp_fork_call()
2224 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_fork_call()
2264 kmp_info_t *master_th; in __kmp_join_call() local
2271 master_th = __kmp_threads[gtid]; in __kmp_join_call()
2272 root = master_th->th.th_root; in __kmp_join_call()
2273 team = master_th->th.th_team; in __kmp_join_call()
2276 master_th->th.th_ident = loc; in __kmp_join_call()
2281 master_th->th.ompt_thread_info.state = ompt_state_overhead; in __kmp_join_call()
2289 __kmp_gtid_from_thread(master_th), team, in __kmp_join_call()
2290 team->t.t_task_team[master_th->th.th_task_state], in __kmp_join_call()
2291 master_th->th.th_task_team)); in __kmp_join_call()
2292 KMP_DEBUG_ASSERT(master_th->th.th_task_team == in __kmp_join_call()
2293 team->t.t_task_team[master_th->th.th_task_state]); in __kmp_join_call()
2298 if (master_th->th.th_teams_microtask) { in __kmp_join_call()
2301 int tlevel = master_th->th.th_teams_level; in __kmp_join_call()
2317 __kmp_join_restore_state(master_th, parent_team); in __kmp_join_call()
2331 master_th->th.th_task_state = in __kmp_join_call()
2351 !master_th->th.th_teams_microtask) { /* not in teams construct */ in __kmp_join_call()
2352 master_th->th.th_ident = loc; in __kmp_join_call()
2358 master_th->th.th_frame_time, 0, loc, in __kmp_join_call()
2359 master_th->th.th_team_nproc, 1); in __kmp_join_call()
2366 if (master_th->th.th_teams_microtask && !exit_teams && in __kmp_join_call()
2368 team->t.t_level == master_th->th.th_teams_level + 1) { in __kmp_join_call()
2380 OMPT_CUR_TASK_INFO(master_th)->thread_num, ompt_task_implicit); in __kmp_join_call()
2384 ompt_parallel_data = *OMPT_CUR_TEAM_DATA(master_th); in __kmp_join_call()
2385 __ompt_lw_taskteam_unlink(master_th); in __kmp_join_call()
2397 if (master_th->th.th_team_nproc < master_th->th.th_teams_size.nth) { in __kmp_join_call()
2398 int old_num = master_th->th.th_team_nproc; in __kmp_join_call()
2399 int new_num = master_th->th.th_teams_size.nth; in __kmp_join_call()
2419 other_threads[i]->th.th_task_state = master_th->th.th_task_state; in __kmp_join_call()
2426 __kmp_join_ompt(gtid, master_th, parent_team, &ompt_parallel_data, in __kmp_join_call()
2435 master_th->th.th_info.ds.ds_tid = team->t.t_master_tid; in __kmp_join_call()
2436 master_th->th.th_local.this_construct = team->t.t_master_this_cons; in __kmp_join_call()
2438 master_th->th.th_dispatch = &parent_team->t.t_dispatch[team->t.t_master_tid]; in __kmp_join_call()
2445 if (!master_th->th.th_teams_microtask || in __kmp_join_call()
2446 team->t.t_level > master_th->th.th_teams_level) { in __kmp_join_call()
2462 OMPT_CUR_TASK_INFO(master_th)->thread_num, flags); in __kmp_join_call()
2470 master_th, team)); in __kmp_join_call()
2471 __kmp_pop_current_task_from_thread(master_th); in __kmp_join_call()
2475 master_th->th.th_first_place = team->t.t_first_place; in __kmp_join_call()
2476 master_th->th.th_last_place = team->t.t_last_place; in __kmp_join_call()
2478 master_th->th.th_def_allocator = team->t.t_def_allocator; in __kmp_join_call()
2486 master_th)); // this will free worker threads in __kmp_join_call()
2493 master_th->th.th_team = parent_team; in __kmp_join_call()
2494 master_th->th.th_team_nproc = parent_team->t.t_nproc; in __kmp_join_call()
2495 master_th->th.th_team_master = parent_team->t.t_threads[0]; in __kmp_join_call()
2496 master_th->th.th_team_serialized = parent_team->t.t_serialized; in __kmp_join_call()
2500 parent_team != master_th->th.th_serial_team && in __kmp_join_call()
2503 master_th->th.th_serial_team USE_NESTED_HOT_ARG(NULL)); in __kmp_join_call()
2504 master_th->th.th_serial_team = parent_team; in __kmp_join_call()
2508 if (master_th->th.th_task_state_top > in __kmp_join_call()
2510 KMP_DEBUG_ASSERT(master_th->th.th_task_state_memo_stack); in __kmp_join_call()
2512 master_th->th.th_task_state_memo_stack[master_th->th.th_task_state_top] = in __kmp_join_call()
2513 master_th->th.th_task_state; in __kmp_join_call()
2514 --master_th->th.th_task_state_top; // pop in __kmp_join_call()
2516 master_th->th.th_task_state = in __kmp_join_call()
2517 master_th->th in __kmp_join_call()
2518 .th_task_state_memo_stack[master_th->th.th_task_state_top]; in __kmp_join_call()
2521 master_th->th.th_task_team = in __kmp_join_call()
2522 parent_team->t.t_task_team[master_th->th.th_task_state]; in __kmp_join_call()
2525 __kmp_gtid_from_thread(master_th), master_th->th.th_task_team, in __kmp_join_call()
2532 master_th->th.th_current_task->td_flags.executing = 1; in __kmp_join_call()
2542 __kmp_join_ompt(gtid, master_th, parent_team, parallel_data, flags, in __kmp_join_call()
4497 kmp_info_t *master_th = team->t.t_threads[0]; in __kmp_partition_places() local
4498 KMP_DEBUG_ASSERT(master_th != NULL); in __kmp_partition_places()
4500 int first_place = master_th->th.th_first_place; in __kmp_partition_places()
4501 int last_place = master_th->th.th_last_place; in __kmp_partition_places()
4502 int masters_place = master_th->th.th_current_place; in __kmp_partition_places()