Retro68/gcc/libcilkrts/runtime/pedigrees.h
2017-10-07 02:16:47 +02:00

142 lines
4.8 KiB
C++

/* pedigrees.h -*-C++-*-
*
*************************************************************************
*
* Copyright (C) 2009-2016, Intel Corporation
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
*
* * Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* * Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in
* the documentation and/or other materials provided with the
* distribution.
* * Neither the name of Intel Corporation nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
* A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
* HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY
* WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*
* *********************************************************************
*
* PLEASE NOTE: This file is a downstream copy of a file mainitained in
* a repository at cilkplus.org. Changes made to this file that are not
* submitted through the contribution process detailed at
* http://www.cilkplus.org/submit-cilk-contribution will be lost the next
* time that a new version is released. Changes only submitted to the
* GNU compiler collection or posted to the git repository at
* https://bitbucket.org/intelcilkruntime/intel-cilk-runtime.git are
* not tracked.
*
* We welcome your contributions to this open source project. Thank you
* for your assistance in helping us improve Cilk Plus.
**************************************************************************/
#ifndef INCLUDED_PEDIGREES_DOT_H
#define INCLUDED_PEDIGREES_DOT_H
#include <cilk/common.h>
#include <internal/abi.h>
#include "rts-common.h"
#include "global_state.h"
#include "os.h"
__CILKRTS_BEGIN_EXTERN_C
/**
* @file pedigrees.h
*
* @brief pedigrees.h declares common routines related to pedigrees
* and the pedigree API.
*/
/**
* @brief Sets the leaf pedigree node for the current user thread.
*
* A typical implementation stores this pedigree node in thread-local
* storage.
*
* Preconditions:
* - Current thread should be a user thread.
*
* @param leaf The pedigree node to store as a leaf.
*/
COMMON_PORTABLE
void __cilkrts_set_pedigree_leaf(__cilkrts_pedigree* leaf);
/**
* Load the pedigree leaf node from thread-local storage into the
* current user worker. This method should execute as a part of
* binding the user thread to a worker.
*
* Preconditions:
*
* - w should be the worker for the current thread
* - w should be a user thread.
*/
COMMON_PORTABLE
void load_pedigree_leaf_into_user_worker(__cilkrts_worker *w);
/**
* Save the pedigree leaf node from the worker into thread-local
* storage. This method should execute as part of unbinding a user
* thread from a worker.
*
* Preconditions:
*
* - w should be the worker for the current thread
* - w should be a user thread.
*/
COMMON_PORTABLE
void save_pedigree_leaf_from_user_worker(__cilkrts_worker *w);
/**
* Update pedigree for a worker when leaving a frame.
*
* If this is the frame of a spawn helper (indicated by the
* CILK_FRAME_DETACHED flag) we must update the pedigree. The
* pedigree points to nodes allocated on the stack. Failing to
* update it will result in a accvio/segfault if the pedigree is
* walked. This must happen for all spawn helper frames, even if
* we're processing an exception.
*/
COMMON_PORTABLE
inline void update_pedigree_on_leave_frame(__cilkrts_worker *w,
__cilkrts_stack_frame *sf)
{
// Update the worker's pedigree information if this is an ABI 1 or later
// frame
if (CILK_FRAME_VERSION_VALUE(sf->flags) >= 1)
{
w->pedigree.rank = sf->spawn_helper_pedigree.rank + 1;
w->pedigree.parent = sf->spawn_helper_pedigree.parent;
}
}
__CILKRTS_END_EXTERN_C
#endif // ! defined(INCLUDED_PEDIGREES_DOT_H)