openmpi/ompi/mca/osc/pt2pt/osc_pt2pt_header.h

/*
 * Copyright (c) 2004-2005 The Trustees of Indiana University.
 *                         All rights reserved.
 * Copyright (c) 2004-2005 The Trustees of the University of Tennessee.
 *                         All rights reserved.
 * Copyright (c) 2004-2005 High Performance Computing Center Stuttgart, 
 *                         University of Stuttgart.  All rights reserved.
 * Copyright (c) 2004-2005 The Regents of the University of California.
 *                         All rights reserved.
 * $COPYRIGHT$
 * 
 * Additional copyrights may follow
 * 
 * $HEADER$
 */

#ifndef OMPI_MCA_OSC_PT2PT_HDR_H
#define OMPI_MCA_OSC_PT2PT_HDR_H

#ifdef HAVE_NETINET_IN_H
#include <netinet/in.h>
#endif

struct ompi_osc_pt2pt_type_header_t {
    uint8_t hdr_type;
};
typedef struct ompi_osc_pt2pt_type_header_t ompi_osc_pt2pt_type_header_t;

struct ompi_osc_pt2pt_send_header_t {
    uint8_t hdr_type;
    uint32_t hdr_windx;

    int32_t hdr_origin;
    ompi_ptr_t hdr_origin_sendreq;
    int32_t hdr_origin_tag;

    int16_t hdr_target_dt_id;
    int32_t hdr_target_disp;
    int32_t hdr_target_count;
    int32_t hdr_target_op;

    int32_t hdr_msg_length; /* 0 if payload is not included */
};
typedef struct ompi_osc_pt2pt_send_header_t ompi_osc_pt2pt_send_header_t;

struct ompi_osc_pt2pt_reply_header_t {
    uint8_t hdr_type;
    ompi_ptr_t hdr_origin_sendreq;

    int32_t hdr_target_tag;
    int32_t hdr_msg_length;
};
typedef struct ompi_osc_pt2pt_reply_header_t ompi_osc_pt2pt_reply_header_t;

struct ompi_osc_pt2pt_control_header_t {
    uint8_t hdr_type;
    int32_t hdr_windx;
    int32_t hdr_value;
};
typedef struct ompi_osc_pt2pt_control_header_t ompi_osc_pt2pt_control_header_t;

#define OMPI_OSC_PT2PT_HDR_PUT      0x0001
#define OMPI_OSC_PT2PT_HDR_ACC      0x0002
#define OMPI_OSC_PT2PT_HDR_GET      0x0004
#define OMPI_OSC_PT2PT_HDR_REPLY    0x0008
#define OMPI_OSC_PT2PT_HDR_POST     0x0010
#define OMPI_OSC_PT2PT_HDR_COMPLETE 0x0020

/*
 * Convert a 64 bit value to network byte order.
 */
static inline uint64_t hton64(uint64_t val)
{ 
    union { uint64_t ll;                
            uint32_t l[2]; 
    } w, r;      

    /* platform already in network byte order? */
    if(htonl(1) == 1L)
        return val;
    w.ll = val;
    r.l[0] = htonl(w.l[1]);
    r.l[1] = htonl(w.l[0]);
    return r.ll; 
}


/*
 * Convert a 64 bit value from network to host byte order.
 */
static inline uint64_t ntoh64(uint64_t val)
{ 
    union { uint64_t ll;                
            uint32_t l[2]; 
    } w, r;      

    /* platform already in network byte order? */
    if(htonl(1) == 1L)
        return val;
    w.ll = val;
    r.l[0] = ntohl(w.l[1]);
    r.l[1] = ntohl(w.l[0]);
    return r.ll; 
}


#define OMPI_OSC_PT2PT_REQ_HDR_HTON(hdr) \
    do { \
        (hdr).hdr_windx = htonl((hdr).hdr_windx); \
        (hdr).hdr_origin = htonl((hdr).hdr_origin); \
        (hdr).hdr_origin_sendreq = hton64((hdr).hdr_origin_sendreq); \
        (hdr).hdr_origin_tag = htonl((hdr).hdr_origin_tag); \
        (hdr).hdr_target_dt_id = htons((hdr).hdr_target_dt_id); \
        (hdr).hdr_target_disp = htonl((hdr).hdr_target_disp); \
        (hdr).hdr_target_count = htonl((hdr).hdr_target_count); \
        (hdr).hdr_msg_length = htonl((hdr).hdr_msg_length); \
        (hdr).hdr_target_op = htonl((hdr).hdr_target_op); \
    } while (0)

#define OMPI_OSC_PT2PT_REQ_HDR_NTOH(hdr) \
    do { \
        (hdr).hdr_windx = ntohl((hdr).hdr_windx); \
        (hdr).hdr_origin = ntohl((hdr).hdr_origin); \
        (hdr).hdr_origin_sendreq = ntoh64((hdr).hdr_origin_sendreq); \
        (hdr).hdr_origin_tag = ntohl((hdr).hdr_origin_tag); \
        (hdr).hdr_target_dt_id = ntohs((hdr).hdr_target_dt_id); \
        (hdr).hdr_target_disp = ntohl((hdr).hdr_target_disp); \
        (hdr).hdr_target_count = ntohl((hdr).hdr_target_count); \
        (hdr).hdr_msg_length = ntohl((hdr).hdr_msg_length); \
        (hdr).hdr_target_op = ntohl((hdr).hdr_target_op); \
    } while (0)

#define OMPI_OSC_PT2PT_REPLY_HDR_HTON(hdr) \
    do { \
        (hdr).hdr_origin_sendreq = hton64((hdr).hdr_origin_sendreq); \
        (hdr).hdr_target_tag = htonl((hdr).hdr_target_tag); \
        (hdr).hdr_msg_length = htonl((hdr).hdr_msg_length); \
    } while (0)

#define OMPI_OSC_PT2PT_REPLY_HDR_NTOH(hdr) \
    do { \
        (hdr).hdr_origin_sendreq = ntoh64((hdr).hdr_origin_sendreq); \
        (hdr).hdr_target_tag = ntohl((hdr).hdr_target_tag); \
        (hdr).hdr_msg_length = ntohl((hdr).hdr_msg_length); \
    } while (0)

#endif /* OMPI_MCA_OSC_PT2PT_HDR_H */