mpidpkt.h 31.6 KB
Newer Older
1
/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
2 3 4 5 6 7 8
/*
 *  (C) 2001 by Argonne National Laboratory.
 *      See COPYRIGHT in top-level directory.
 */

#ifndef HAVE_MPIDPKT_H
#define HAVE_MPIDPKT_H
9

10 11
#include "oputil.h"

12 13 14 15 16 17 18
#ifdef HAVE_STDINT_H
#  include <stdint.h>
#endif
#ifdef HAVE_INTTYPES_H
#  include <inttypes.h>
#endif

19 20 21
/* Enable the use of data within the message packet for small messages */
#define USE_EAGER_SHORT
#define MPIDI_EAGER_SHORT_INTS 4
22
/* FIXME: This appears to assume that sizeof(int) == 4 (or at least >= 4) */
23 24
#define MPIDI_EAGER_SHORT_SIZE 16

25
/* This is the number of ints that can be carried within an RMA packet */
Xin Zhao's avatar
Xin Zhao committed
26
#define MPIDI_RMA_IMMED_BYTES 16
27

28 29 30
/* Union over all types (integer, logical, and multi-language types) that are
   allowed in a CAS operation.  This is used to allocate enough space in the
   packet header for immediate data.  */
31
typedef union {
32
#define MPIR_OP_TYPE_MACRO(mpi_type_, c_type_, type_name_) c_type_ cas_##type_name_;
33 34 35 36 37 38 39 40
    MPIR_OP_TYPE_GROUP(C_INTEGER)
    MPIR_OP_TYPE_GROUP(FORTRAN_INTEGER)
    MPIR_OP_TYPE_GROUP(LOGICAL)
    MPIR_OP_TYPE_GROUP(BYTE)
    MPIR_OP_TYPE_GROUP(C_INTEGER_EXTRA)
    MPIR_OP_TYPE_GROUP(FORTRAN_INTEGER_EXTRA)
    MPIR_OP_TYPE_GROUP(LOGICAL_EXTRA)
    MPIR_OP_TYPE_GROUP(BYTE_EXTRA)
41
#undef MPIR_OP_TYPE_MACRO
42 43
} MPIDI_CH3_CAS_Immed_u;

44 45 46 47
/* Union over all types (all predefined types) that are allowed in a
   Fetch-and-op operation.  This can be too large for the packet header, so we
   limit the immediate space in the header to FOP_IMMED_INTS. */

48 49 50
/* *INDENT-OFF* */
/* Indentation turned off because "indent" is getting confused with
 * the lack of a semi-colon in the fields below */
51
typedef union {
52
#define MPIR_OP_TYPE_MACRO(mpi_type_, c_type_, type_name_) c_type_ fop##type_name_;
53 54
    MPIR_OP_TYPE_GROUP_ALL_BASIC
    MPIR_OP_TYPE_GROUP_ALL_EXTRA
55
#undef MPIR_OP_TYPE_MACRO
56
} MPIDI_CH3_FOP_Immed_u;
57
/* *INDENT-ON* */
58

59
/*
60
 * Predefined packet types.  This simplifies some of the code.
61
 */
62 63
/* FIXME: Having predefined names makes it harder to add new message types,
   such as different RMA types. */
Pavan Balaji's avatar
Pavan Balaji committed
64 65 66
/* We start with an arbitrarily chosen number (42), to help with
 * debugging when a packet type is not initialized or wrongly
 * initialized. */
67
typedef enum {
Pavan Balaji's avatar
Pavan Balaji committed
68
    MPIDI_CH3_PKT_EAGER_SEND = 42,
69
#if defined(USE_EAGER_SHORT)
70
    MPIDI_CH3_PKT_EAGERSHORT_SEND,
71
#endif /* defined(USE_EAGER_SHORT) */
72
    MPIDI_CH3_PKT_EAGER_SYNC_SEND,      /* FIXME: no sync eager */
73 74 75 76
    MPIDI_CH3_PKT_EAGER_SYNC_ACK,
    MPIDI_CH3_PKT_READY_SEND,
    MPIDI_CH3_PKT_RNDV_REQ_TO_SEND,
    MPIDI_CH3_PKT_RNDV_CLR_TO_SEND,
77
    MPIDI_CH3_PKT_RNDV_SEND,    /* FIXME: should be stream put */
78 79
    MPIDI_CH3_PKT_CANCEL_SEND_REQ,
    MPIDI_CH3_PKT_CANCEL_SEND_RESP,
80
    MPIDI_CH3_PKT_PUT,  /* RMA Packets begin here */
81 82 83 84 85
    MPIDI_CH3_PKT_GET,
    MPIDI_CH3_PKT_GET_RESP,
    MPIDI_CH3_PKT_ACCUMULATE,
    MPIDI_CH3_PKT_LOCK,
    MPIDI_CH3_PKT_LOCK_GRANTED,
86
    MPIDI_CH3_PKT_UNLOCK,
87
    MPIDI_CH3_PKT_FLUSH,
Xin Zhao's avatar
Xin Zhao committed
88
    MPIDI_CH3_PKT_FLUSH_ACK,
89
    MPIDI_CH3_PKT_DECR_AT_COUNTER,
90 91 92 93 94
    MPIDI_CH3_PKT_LOCK_PUT_UNLOCK,      /* optimization for single puts */
    MPIDI_CH3_PKT_LOCK_GET_UNLOCK,      /* optimization for single gets */
    MPIDI_CH3_PKT_LOCK_ACCUM_UNLOCK,    /* optimization for single accumulates */
    /* RMA Packets end here */
    MPIDI_CH3_PKT_ACCUM_IMMED,  /* optimization for short accumulate */
95
    /* FIXME: Add PUT, GET_IMMED packet types */
96 97
    MPIDI_CH3_PKT_CAS,
    MPIDI_CH3_PKT_CAS_RESP,
98 99
    MPIDI_CH3_PKT_FOP,
    MPIDI_CH3_PKT_FOP_RESP,
100 101
    MPIDI_CH3_PKT_GET_ACCUM,
    MPIDI_CH3_PKT_GET_ACCUM_RESP,
102
    MPIDI_CH3_PKT_FLOW_CNTL_UPDATE,     /* FIXME: Unused */
103
    MPIDI_CH3_PKT_CLOSE,
Wesley Bland's avatar
Wesley Bland committed
104
    MPIDI_CH3_PKT_REVOKE,
Pavan Balaji's avatar
Pavan Balaji committed
105
    MPIDI_CH3_PKT_END_CH3,
106
    /* The channel can define additional types by defining the value
107
     * MPIDI_CH3_PKT_ENUM */
108
# if defined(MPIDI_CH3_PKT_ENUM)
Pavan Balaji's avatar
Pavan Balaji committed
109
    MPIDI_CH3_PKT_ENUM,
110
# endif
Pavan Balaji's avatar
Pavan Balaji committed
111
    MPIDI_CH3_PKT_END_ALL,
112
    MPIDI_CH3_PKT_INVALID = -1  /* forces a signed enum to quash warnings */
Pavan Balaji's avatar
Pavan Balaji committed
113
} MPIDI_CH3_Pkt_type_t;
114

115
/* These flags can be "OR'ed" together */
116 117 118 119 120 121
typedef enum {
    MPIDI_CH3_PKT_FLAG_NONE = 0,
    MPIDI_CH3_PKT_FLAG_RMA_LOCK = 1,
    MPIDI_CH3_PKT_FLAG_RMA_UNLOCK = 2,
    MPIDI_CH3_PKT_FLAG_RMA_FLUSH = 4,
    MPIDI_CH3_PKT_FLAG_RMA_REQ_ACK = 8,
122
    MPIDI_CH3_PKT_FLAG_RMA_DECR_AT_COUNTER = 16,
123 124
    MPIDI_CH3_PKT_FLAG_RMA_NOCHECK = 32,
    MPIDI_CH3_PKT_FLAG_RMA_SHARED = 64,
125 126
    MPIDI_CH3_PKT_FLAG_RMA_EXCLUSIVE = 128,
    MPIDI_CH3_PKT_FLAG_RMA_FLUSH_ACK = 256
127
} MPIDI_CH3_Pkt_flags_t;
128

129
typedef struct MPIDI_CH3_Pkt_send {
130 131
    MPIDI_CH3_Pkt_type_t type;  /* XXX - uint8_t to conserve space ??? */
    MPIDI_Message_match match;
132
    MPI_Request sender_req_id;  /* needed for ssend and send cancel */
133 134 135
    MPIDI_msg_sz_t data_sz;
#if defined(MPID_USE_SEQUENCE_NUMBERS)
    MPID_Seqnum_t seqnum;
136 137
#endif
} MPIDI_CH3_Pkt_send_t;
138

139
/* NOTE: Normal and synchronous eager sends, as well as all ready-mode sends,
140 141 142 143
   use the same structure but have a different type value. */
typedef MPIDI_CH3_Pkt_send_t MPIDI_CH3_Pkt_eager_send_t;
typedef MPIDI_CH3_Pkt_send_t MPIDI_CH3_Pkt_eager_sync_send_t;
typedef MPIDI_CH3_Pkt_send_t MPIDI_CH3_Pkt_ready_send_t;
144 145

#if defined(USE_EAGER_SHORT)
146
typedef struct MPIDI_CH3_Pkt_eagershort_send {
147 148 149 150 151 152
    MPIDI_CH3_Pkt_type_t type;  /* XXX - uint8_t to conserve space ??? */
    MPIDI_Message_match match;
    MPIDI_msg_sz_t data_sz;
#if defined(MPID_USE_SEQUENCE_NUMBERS)
    MPID_Seqnum_t seqnum;
#endif
153 154
    int data[MPIDI_EAGER_SHORT_INTS];   /* FIXME: Experimental for now */
} MPIDI_CH3_Pkt_eagershort_send_t;
155
#endif /* defined(USE_EAGER_SHORT) */
156

157
typedef struct MPIDI_CH3_Pkt_eager_sync_ack {
158 159
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request sender_req_id;
160
} MPIDI_CH3_Pkt_eager_sync_ack_t;
161 162 163

typedef MPIDI_CH3_Pkt_send_t MPIDI_CH3_Pkt_rndv_req_to_send_t;

164
typedef struct MPIDI_CH3_Pkt_rndv_clr_to_send {
165 166 167
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request sender_req_id;
    MPI_Request receiver_req_id;
168
} MPIDI_CH3_Pkt_rndv_clr_to_send_t;
169

170
typedef struct MPIDI_CH3_Pkt_rndv_send {
171 172
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request receiver_req_id;
173
} MPIDI_CH3_Pkt_rndv_send_t;
174

175
typedef struct MPIDI_CH3_Pkt_cancel_send_req {
176 177 178
    MPIDI_CH3_Pkt_type_t type;
    MPIDI_Message_match match;
    MPI_Request sender_req_id;
179
} MPIDI_CH3_Pkt_cancel_send_req_t;
180

181
typedef struct MPIDI_CH3_Pkt_cancel_send_resp {
182 183 184
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request sender_req_id;
    int ack;
185
} MPIDI_CH3_Pkt_cancel_send_resp_t;
186

187 188 189
/* *INDENT-OFF* */
/* Indentation turned off because "indent" is getting confused with
 * the lack of a semi-colon in the field below */
190 191 192
#if defined(MPIDI_CH3_PKT_DEFS)
MPIDI_CH3_PKT_DEFS
#endif
193
/* *INDENT-ON* */
194

195 196 197
#define MPIDI_CH3_PKT_RMA_GET_TARGET_DATATYPE(pkt_, datatype_, err_)    \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
Xin Zhao's avatar
Xin Zhao committed
198
        switch((pkt_).type) {                                           \
199
        case (MPIDI_CH3_PKT_PUT):                                       \
Xin Zhao's avatar
Xin Zhao committed
200
            datatype_ = (pkt_).put.datatype;                            \
201 202
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
Xin Zhao's avatar
Xin Zhao committed
203
            datatype_ = (pkt_).get.datatype;                            \
204 205
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
Xin Zhao's avatar
Xin Zhao committed
206
            datatype_ = (pkt_).accum.datatype;                          \
207
            break;                                                      \
Xin Zhao's avatar
Xin Zhao committed
208
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
Xin Zhao's avatar
Xin Zhao committed
209
            datatype_ = (pkt_).get_accum.datatype;                      \
Xin Zhao's avatar
Xin Zhao committed
210
            break;                                                      \
211
        case (MPIDI_CH3_PKT_CAS):                                       \
Xin Zhao's avatar
Xin Zhao committed
212
            datatype_ = (pkt_).cas.datatype;                            \
213 214
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
Xin Zhao's avatar
Xin Zhao committed
215
            datatype_ = (pkt_).fop.datatype;                            \
216 217 218 219 220 221 222 223 224 225 226 227 228 229
            break;                                                      \
        case (MPIDI_CH3_PKT_LOCK_PUT_UNLOCK):                           \
            datatype_ = pkt_.lock_put_unlock.datatype;                  \
            break;                                                      \
        case (MPIDI_CH3_PKT_LOCK_GET_UNLOCK):                           \
            datatype_ = pkt_.lock_get_unlock.datatype;                  \
            break;                                                      \
        case (MPIDI_CH3_PKT_LOCK_ACCUM_UNLOCK):                         \
            datatype_ = pkt_.lock_accum_unlock.datatype;                \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUM_IMMED):                               \
            datatype_ = pkt_.accum_immed.datatype;                      \
            break;                                                      \
        default:                                                        \
Xin Zhao's avatar
Xin Zhao committed
230
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
231 232 233
        }                                                               \
    }

Xin Zhao's avatar
Xin Zhao committed
234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396
#define MPIDI_CH3_PKT_RMA_GET_LOCK_TYPE(pkt_, lock_type_, err_)         \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            lock_type_ = (pkt_).put.lock_type;                          \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            lock_type_ = (pkt_).get.lock_type;                          \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            lock_type_ = (pkt_).accum.lock_type;                        \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            lock_type_ = (pkt_).get_accum.lock_type;                    \
            break;                                                      \
        case (MPIDI_CH3_PKT_CAS):                                       \
            lock_type_ = (pkt_).cas.lock_type;                          \
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
            lock_type_ = (pkt_).fop.lock_type;                          \
            break;                                                      \
        case (MPIDI_CH3_PKT_LOCK):                                      \
            lock_type_ = (pkt_).lock.lock_type;                         \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }

#define MPIDI_CH3_PKT_RMA_GET_ORIGIN_RANK(pkt_, origin_rank_, err_)     \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            origin_rank_ = (pkt_).put.origin_rank;                      \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            origin_rank_ = (pkt_).get.origin_rank;                      \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            origin_rank_ = (pkt_).accum.origin_rank;                    \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            origin_rank_ = (pkt_).get_accum.origin_rank;                \
            break;                                                      \
        case (MPIDI_CH3_PKT_CAS):                                       \
            origin_rank_ = (pkt_).cas.origin_rank;                      \
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
            origin_rank_ = (pkt_).fop.origin_rank;                      \
            break;                                                      \
        case (MPIDI_CH3_PKT_LOCK):                                      \
            origin_rank_ = (pkt_).lock.origin_rank;                     \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }

#define MPIDI_CH3_PKT_RMA_GET_FLAGS(pkt_, flags_, err_)                 \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            flags_ = (pkt_).put.flags;                                  \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            flags_ = (pkt_).get.flags;                                  \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            flags_ = (pkt_).accum.flags;                                \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            flags_ = (pkt_).get_accum.flags;                            \
            break;                                                      \
        case (MPIDI_CH3_PKT_CAS):                                       \
            flags_ = (pkt_).cas.flags;                                  \
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
            flags_ = (pkt_).fop.flags;                                  \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }

#define MPIDI_CH3_PKT_RMA_UNSET_FLAG(pkt_, flag_, err_)                 \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            (pkt_).put.flags &= ~(flag_);                               \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            (pkt_).get.flags &= ~(flag_);                               \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            (pkt_).accum.flags &= ~(flag_);                             \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            (pkt_).get_accum.flags &= ~(flag_);                         \
            break;                                                      \
        case (MPIDI_CH3_PKT_CAS):                                       \
            (pkt_).cas.flags &= ~(flag_);                               \
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
            (pkt_).fop.flags &= ~(flag_);                               \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }

#define MPIDI_CH3_PKT_RMA_SET_FLAG(pkt_, flag_, err_)                   \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            (pkt_).put.flags |= (flag_);                                \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            (pkt_).get.flags |= (flag_);                                \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            (pkt_).accum.flags |= (flag_);                              \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            (pkt_).get_accum.flags |= (flag_);                          \
            break;                                                      \
        case (MPIDI_CH3_PKT_CAS):                                       \
            (pkt_).cas.flags |= (flag_);                                \
            break;                                                      \
        case (MPIDI_CH3_PKT_FOP):                                       \
            (pkt_).fop.flags |= (flag_);                                \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }

#define MPIDI_CH3_PKT_RMA_SET_DATALOOP_SIZE(pkt_, dataloop_size_, err_) \
    {                                                                   \
        err_ = MPI_SUCCESS;                                             \
        switch((pkt_).type) {                                           \
        case (MPIDI_CH3_PKT_PUT):                                       \
            (pkt_).put.dataloop_size = (dataloop_size_);                \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET):                                       \
            (pkt_).get.dataloop_size = (dataloop_size_);                \
            break;                                                      \
        case (MPIDI_CH3_PKT_ACCUMULATE):                                \
            (pkt_).accum.dataloop_size = (dataloop_size_);              \
            break;                                                      \
        case (MPIDI_CH3_PKT_GET_ACCUM):                                 \
            (pkt_).get_accum.dataloop_size = (dataloop_size_);          \
            break;                                                      \
        default:                                                        \
            MPIU_ERR_SETANDJUMP1(err_, MPI_ERR_OTHER, "**invalidpkt", "**invalidpkt %d", (pkt_).type); \
        }                                                               \
    }


397
typedef struct MPIDI_CH3_Pkt_put {
398
    MPIDI_CH3_Pkt_type_t type;
399
    MPIDI_CH3_Pkt_flags_t flags;
400 401 402
    void *addr;
    int count;
    MPI_Datatype datatype;
403 404 405 406 407 408 409 410
    int dataloop_size;          /* for derived datatypes */
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
    MPI_Win source_win_handle;  /* Used in the last RMA operation in an
                                 * epoch in the case of passive target rma
                                 * with shared locks. Otherwise set to NULL*/
Xin Zhao's avatar
Xin Zhao committed
411 412
    char data[MPIDI_RMA_IMMED_BYTES];
    size_t immed_len;
413 414 415
} MPIDI_CH3_Pkt_put_t;

typedef struct MPIDI_CH3_Pkt_get {
416
    MPIDI_CH3_Pkt_type_t type;
417
    MPIDI_CH3_Pkt_flags_t flags;
418 419 420
    void *addr;
    int count;
    MPI_Datatype datatype;
421
    int dataloop_size;          /* for derived datatypes */
422
    MPI_Request request_handle;
423 424 425 426 427 428 429 430 431 432
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
    MPI_Win source_win_handle;  /* Used in the last RMA operation in an
                                 * epoch in the case of passive target rma
                                 * with shared locks. Otherwise set to NULL*/
} MPIDI_CH3_Pkt_get_t;

typedef struct MPIDI_CH3_Pkt_get_resp {
433 434
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request request_handle;
435 436 437 438
    /* followings are used to decrement ack_counter at origin */
    int target_rank;
    MPI_Win source_win_handle;
    MPIDI_CH3_Pkt_flags_t flags;
439
} MPIDI_CH3_Pkt_get_resp_t;
440

441
typedef struct MPIDI_CH3_Pkt_accum {
442
    MPIDI_CH3_Pkt_type_t type;
443
    MPIDI_CH3_Pkt_flags_t flags;
444 445 446
    void *addr;
    int count;
    MPI_Datatype datatype;
447
    int dataloop_size;          /* for derived datatypes */
448
    MPI_Op op;
449 450 451 452 453 454 455
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
    MPI_Win source_win_handle;  /* Used in the last RMA operation in an
                                 * epoch in the case of passive target rma
                                 * with shared locks. Otherwise set to NULL*/
Xin Zhao's avatar
Xin Zhao committed
456 457
    char data[MPIDI_RMA_IMMED_BYTES];
    size_t immed_len;
458 459
} MPIDI_CH3_Pkt_accum_t;

Xin Zhao's avatar
Xin Zhao committed
460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475
typedef struct MPIDI_CH3_Pkt_get_accum {
    MPIDI_CH3_Pkt_type_t type;
    MPIDI_CH3_Pkt_flags_t flags;
    MPI_Request request_handle; /* For get_accumulate response */
    void *addr;
    int count;
    MPI_Datatype datatype;
    int dataloop_size;          /* for derived datatypes */
    MPI_Op op;
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
    MPI_Win source_win_handle;  /* Used in the last RMA operation in an
                                 * epoch in the case of passive target rma
                                 * with shared locks. Otherwise set to NULL*/
Xin Zhao's avatar
Xin Zhao committed
476 477
    char data[MPIDI_RMA_IMMED_BYTES];
    size_t immed_len;
Xin Zhao's avatar
Xin Zhao committed
478 479
} MPIDI_CH3_Pkt_get_accum_t;

480
typedef struct MPIDI_CH3_Pkt_get_accum_resp {
481 482
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request request_handle;
483 484 485 486
    /* followings are used to decrement ack_counter at origin */
    int target_rank;
    MPI_Win source_win_handle;
    MPIDI_CH3_Pkt_flags_t flags;
487
} MPIDI_CH3_Pkt_get_accum_resp_t;
488

489
typedef struct MPIDI_CH3_Pkt_accum_immed {
490
    MPIDI_CH3_Pkt_type_t type;
491
    MPIDI_CH3_Pkt_flags_t flags;
492 493 494 495 496 497
    void *addr;
    int count;
    /* FIXME: Compress datatype/op into a single word (immedate mode) */
    MPI_Datatype datatype;
    MPI_Op op;
    /* FIXME: do we need these (use a regular accum packet if we do?) */
498 499 500 501 502 503 504
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
    MPI_Win source_win_handle;  /* Used in the last RMA operation in an
                                 * epoch in the case of passive target rma
                                 * with shared locks. Otherwise set to NULL*/
505
    int data[MPIDI_RMA_IMMED_INTS];
506
} MPIDI_CH3_Pkt_accum_immed_t;
507

508
typedef struct MPIDI_CH3_Pkt_cas {
509
    MPIDI_CH3_Pkt_type_t type;
510
    MPIDI_CH3_Pkt_flags_t flags;
511
    MPI_Datatype datatype;
512
    void *addr;
513
    MPI_Request request_handle;
514
    MPI_Win source_win_handle;
515 516 517 518
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
519 520
    MPIDI_CH3_CAS_Immed_u origin_data;
    MPIDI_CH3_CAS_Immed_u compare_data;
521
} MPIDI_CH3_Pkt_cas_t;
522

523
typedef struct MPIDI_CH3_Pkt_cas_resp {
524 525 526
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request request_handle;
    MPIDI_CH3_CAS_Immed_u data;
527 528 529 530
    /* followings are used to decrement ack_counter at orign */
    int target_rank;
    MPI_Win source_win_handle;
    MPIDI_CH3_Pkt_flags_t flags;
531
} MPIDI_CH3_Pkt_cas_resp_t;
532

533
typedef struct MPIDI_CH3_Pkt_fop {
534
    MPIDI_CH3_Pkt_type_t type;
535
    MPIDI_CH3_Pkt_flags_t flags;
536 537 538 539
    MPI_Datatype datatype;
    void *addr;
    MPI_Op op;
    MPI_Request request_handle;
540
    MPI_Win source_win_handle;
541 542 543 544
    MPI_Win target_win_handle;  /* Used in the last RMA operation in each
                                 * epoch for decrementing rma op counter in
                                 * active target rma and for unlocking window
                                 * in passive target rma. Otherwise set to NULL*/
Xin Zhao's avatar
Xin Zhao committed
545 546
    char data[MPIDI_RMA_IMMED_BYTES];
    int immed_len;
547
} MPIDI_CH3_Pkt_fop_t;
548

549
typedef struct MPIDI_CH3_Pkt_fop_resp {
550 551
    MPIDI_CH3_Pkt_type_t type;
    MPI_Request request_handle;
Xin Zhao's avatar
Xin Zhao committed
552 553
    char data[MPIDI_RMA_IMMED_BYTES];
    int immed_len;
554 555 556 557
    /* followings are used to decrement ack_counter at orign */
    int target_rank;
    MPI_Win source_win_handle;
    MPIDI_CH3_Pkt_flags_t flags;
558
} MPIDI_CH3_Pkt_fop_resp_t;
559

560
typedef struct MPIDI_CH3_Pkt_lock {
561 562 563 564
    MPIDI_CH3_Pkt_type_t type;
    int lock_type;
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
565
    int target_rank;            /* Used in unluck/flush response to look up the
566
                                 * target state at the origin. */
567
    int origin_rank;
568
} MPIDI_CH3_Pkt_lock_t;
569

Xin Zhao's avatar
Xin Zhao committed
570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589
typedef struct MPIDI_CH3_Pkt_unlock {
    MPIDI_CH3_Pkt_type_t type;
    int lock_type;
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
    int target_rank;            /* Used in unluck/flush response to look up the
                                 * target state at the origin. */
    int origin_rank;
} MPIDI_CH3_Pkt_unlock_t;

typedef struct MPIDI_CH3_Pkt_flush {
    MPIDI_CH3_Pkt_type_t type;
    int lock_type;
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
    int target_rank;            /* Used in unluck/flush response to look up the
                                 * target state at the origin. */
    int origin_rank;
} MPIDI_CH3_Pkt_flush_t;

590
typedef struct MPIDI_CH3_Pkt_lock_granted {
591 592
    MPIDI_CH3_Pkt_type_t type;
    MPI_Win source_win_handle;
Xin Zhao's avatar
Xin Zhao committed
593
    int target_rank;            /* Used in flush_ack response to look up the
594 595
                                 * target state at the origin. */
} MPIDI_CH3_Pkt_lock_granted_t;
596

Xin Zhao's avatar
Xin Zhao committed
597 598 599 600 601 602
typedef struct MPIDI_CH3_Pkt_flush_ack {
    MPIDI_CH3_Pkt_type_t type;
    MPI_Win source_win_handle;
    int target_rank;            /* Used in flush_ack response to look up the
                                 * target state at the origin. */
} MPIDI_CH3_Pkt_flush_ack_t;
603

604 605 606 607 608
typedef struct MPIDI_CH3_Pkt_decr_at_counter {
    MPIDI_CH3_Pkt_type_t type;
    MPI_Win target_win_handle;
} MPIDI_CH3_Pkt_decr_at_counter_t;

609
typedef struct MPIDI_CH3_Pkt_lock_put_unlock {
610
    MPIDI_CH3_Pkt_type_t type;
611
    MPIDI_CH3_Pkt_flags_t flags;
612 613
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
614
    int origin_rank;
615 616 617 618
    int lock_type;
    void *addr;
    int count;
    MPI_Datatype datatype;
619
} MPIDI_CH3_Pkt_lock_put_unlock_t;
620

621
typedef struct MPIDI_CH3_Pkt_lock_get_unlock {
622
    MPIDI_CH3_Pkt_type_t type;
623
    MPIDI_CH3_Pkt_flags_t flags;
624 625
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
626
    int origin_rank;
627 628 629 630 631
    int lock_type;
    void *addr;
    int count;
    MPI_Datatype datatype;
    MPI_Request request_handle;
632
} MPIDI_CH3_Pkt_lock_get_unlock_t;
633

634
typedef struct MPIDI_CH3_Pkt_lock_accum_unlock {
635
    MPIDI_CH3_Pkt_type_t type;
636
    MPIDI_CH3_Pkt_flags_t flags;
637 638
    MPI_Win target_win_handle;
    MPI_Win source_win_handle;
639
    int origin_rank;
640 641 642 643 644
    int lock_type;
    void *addr;
    int count;
    MPI_Datatype datatype;
    MPI_Op op;
645
} MPIDI_CH3_Pkt_lock_accum_unlock_t;
646 647


648
typedef struct MPIDI_CH3_Pkt_close {
649 650
    MPIDI_CH3_Pkt_type_t type;
    int ack;
651
} MPIDI_CH3_Pkt_close_t;
652

653
typedef struct MPIDI_CH3_Pkt_revoke {
Wesley Bland's avatar
Wesley Bland committed
654 655
    MPIDI_CH3_Pkt_type_t type;
    MPIR_Context_id_t revoked_comm;
656
} MPIDI_CH3_Pkt_revoke_t;
Wesley Bland's avatar
Wesley Bland committed
657

658
typedef union MPIDI_CH3_Pkt {
659 660
    MPIDI_CH3_Pkt_type_t type;
    MPIDI_CH3_Pkt_eager_send_t eager_send;
661
#if defined(USE_EAGER_SHORT)
662
    MPIDI_CH3_Pkt_eagershort_send_t eagershort_send;
663
#endif                          /* defined(USE_EAGER_SHORT) */
664 665 666 667 668 669 670 671 672 673 674 675
    MPIDI_CH3_Pkt_eager_sync_send_t eager_sync_send;
    MPIDI_CH3_Pkt_eager_sync_ack_t eager_sync_ack;
    MPIDI_CH3_Pkt_eager_send_t ready_send;
    MPIDI_CH3_Pkt_rndv_req_to_send_t rndv_req_to_send;
    MPIDI_CH3_Pkt_rndv_clr_to_send_t rndv_clr_to_send;
    MPIDI_CH3_Pkt_rndv_send_t rndv_send;
    MPIDI_CH3_Pkt_cancel_send_req_t cancel_send_req;
    MPIDI_CH3_Pkt_cancel_send_resp_t cancel_send_resp;
    MPIDI_CH3_Pkt_put_t put;
    MPIDI_CH3_Pkt_get_t get;
    MPIDI_CH3_Pkt_get_resp_t get_resp;
    MPIDI_CH3_Pkt_accum_t accum;
676
    MPIDI_CH3_Pkt_accum_immed_t accum_immed;
Xin Zhao's avatar
Xin Zhao committed
677
    MPIDI_CH3_Pkt_get_accum_t get_accum;
678 679
    MPIDI_CH3_Pkt_lock_t lock;
    MPIDI_CH3_Pkt_lock_granted_t lock_granted;
680
    MPIDI_CH3_Pkt_unlock_t unlock;
681
    MPIDI_CH3_Pkt_flush_t flush;
Xin Zhao's avatar
Xin Zhao committed
682
    MPIDI_CH3_Pkt_flush_ack_t flush_ack;
683
    MPIDI_CH3_Pkt_decr_at_counter_t decr_at_cnt;
684 685 686 687
    MPIDI_CH3_Pkt_lock_put_unlock_t lock_put_unlock;
    MPIDI_CH3_Pkt_lock_get_unlock_t lock_get_unlock;
    MPIDI_CH3_Pkt_lock_accum_unlock_t lock_accum_unlock;
    MPIDI_CH3_Pkt_close_t close;
688 689
    MPIDI_CH3_Pkt_cas_t cas;
    MPIDI_CH3_Pkt_cas_resp_t cas_resp;
690 691
    MPIDI_CH3_Pkt_fop_t fop;
    MPIDI_CH3_Pkt_fop_resp_t fop_resp;
692
    MPIDI_CH3_Pkt_get_accum_resp_t get_accum_resp;
Wesley Bland's avatar
Wesley Bland committed
693
    MPIDI_CH3_Pkt_revoke_t revoke;
694
# if defined(MPIDI_CH3_PKT_DECL)
695
     MPIDI_CH3_PKT_DECL
696
# endif
697
} MPIDI_CH3_Pkt_t;
698 699

#if defined(MPID_USE_SEQUENCE_NUMBERS)
700
typedef struct MPIDI_CH3_Pkt_send_container {
701
    MPIDI_CH3_Pkt_send_t pkt;
702 703
    struct MPIDI_CH3_Pkt_send_container_s *next;
} MPIDI_CH3_Pkt_send_container_t;
704 705 706
#endif

#endif