lsd_mkb/lsd_mkb_superlu/superlu_threads/pxgstrf_synch.h

Go to the documentation of this file.

/*
 * -- SuperLU MT routine (version 2.2) --
 * Lawrence Berkeley National Lab, Univ. of California Berkeley,
 * and Xerox Palo Alto Research Center.
 * September 10, 2007
 *
 * Last modified: 
 * -- 8/29/2013: added lock to access Stack memory supplied by user
 */

#ifndef __SUPERLU_SYNCH /* allow multiple inclusions */
#define __SUPERLU_SYNCH

/* Structure for the globally shared work queue */

typedef int_t qitem_t;

typedef struct {
    int_t       head, tail, count;
    qitem_t   *queue;
} queue_t;

typedef enum {
    ULOCK,       /* locked once per column */
    LLOCK,       /* locked once per supernode */
    LULOCK,      /* locked once per column in L-supernode */
    NSUPER_LOCK, /* locked once per supernode */
    SCHED_LOCK,  /* locked once per panel, if succeeded each time */
    STACK_LOCK,  /* locked when upating Stack memory supplied by User */
    NO_GLU_LOCKS
} lu_locks_t;

typedef enum {
    RELAXED_SNODE,
    TREE_DOMAIN,   /* domain */
    REGULAR_PANEL  /* non-domain */
} panel_t;

typedef enum {
    DONE,
    BUSY,
    CANGO,
    CANPIPE,
    UNREADY
} pipe_state_t;

typedef struct {
    panel_t      type;  /* panel type: 0 -- relaxed, also domain
                           1 -- domain
                           2 -- regular, non-domain */
    pipe_state_t state; /* one of the 5 states in which the panel can be */
    int_t          size;  /* in the leading column, the panel size is stored;
                       in the other columns, the offset (negative)
                   to the leading column is stored */
    int_t          ukids; /* number of kids not yet finished
             * In linear pipeline --
             *   if ukids[firstcol] = 0 then
             *      the panel becomes a leaf (CANGO)
             *   if ukids[firstcol] = 1 then
             *      the panel can be taken as CANPIPE
             */
} pan_status_t;


/* The structure to record a relaxed supernode. */
typedef struct {
    int_t fcol;    /* first column of the relaxed supernode */
    int_t size;    /* size of the relaxed supernode */
} pxgstrf_relax_t;



/* *********************
   Function prototypes
   *********************/

#ifdef __cplusplus
extern "C" {
#endif

extern int_t await(volatile int_t *);

#ifdef __cplusplus
       }
#endif

#endif /* __SUPERLU_SYNCH */

---