File: mtl_portals4_message.h

package info (click to toggle)
openmpi 5.0.7-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 202,312 kB
  • sloc: ansic: 612,441; makefile: 42,495; sh: 11,230; javascript: 9,244; f90: 7,052; java: 6,404; perl: 5,154; python: 1,856; lex: 740; fortran: 61; cpp: 20; tcl: 12
file content (62 lines) | stat: -rw-r--r-- 1,606 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil -*- */
/*
 * Copyright (c) 2012      Sandia National Laboratories.  All rights reserved.
 * Copyright (c) 2015      Los Alamos National Security, LLC. All rights
 *                         reserved.
 * $COPYRIGHT$
 *
 * Additional copyrights may follow
 *
 * $HEADER$
 */

#ifndef MTL_PORTALS4_MESSAGE_H
#define MTL_PORTALS4_MESSAGE_H

#include "ompi_config.h"

#include "mtl_portals4.h"

struct ompi_mtl_portals4_message_t {
    opal_free_list_item_t super;
    ptl_event_t ev;
    void *buffer;
};
typedef struct ompi_mtl_portals4_message_t ompi_mtl_portals4_message_t;
OBJ_CLASS_DECLARATION(ompi_mtl_portals4_message_t);


static inline ompi_mtl_portals4_message_t*
ompi_mtl_portals4_message_alloc(const ptl_event_t *ev)
{
    opal_free_list_item_t *tmp;
    ompi_mtl_portals4_message_t* message;

    tmp = opal_free_list_get (&ompi_mtl_portals4.fl_message);
    if (NULL == tmp) return NULL;

    message = (ompi_mtl_portals4_message_t*) tmp;

    message->ev = *ev;

    if (0 == ev->mlength) {
        message->buffer = NULL;
    } else {
        /* once we've finished processing the event, an AUTO_FREE
           event might be next, rendering the data in ev.start
           invalid.  Copy it away... */
        memcpy(message->buffer, ev->start, ev->mlength);
        message->ev.start = message->buffer;
    }

    return message;
}

static inline void
ompi_mtl_portals4_message_free(ompi_mtl_portals4_message_t *message)
{
    opal_free_list_return (&ompi_mtl_portals4.fl_message,
                           &message->super);
}

#endif