185 строки
5.5 KiB
C
185 строки
5.5 KiB
C
/*
|
|
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
* Copyright (c) 2010 Oracle and/or its affiliates. All rights reserved.
|
|
*
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*
|
|
* When this component is used, this file is included in the rest of
|
|
* the OPAL/ORTE/OMPI code base via opal/mca/event/event.h. As such,
|
|
* this header represents the public interface to this static component.
|
|
*/
|
|
|
|
#ifndef MCA_OPAL_EVENT_LIBEVENT2013_H
|
|
#define MCA_OPAL_EVENT_LIBEVENT2013_H
|
|
|
|
#include "opal_config.h"
|
|
|
|
#ifdef HAVE_SYS_TYPES_H
|
|
#include <sys/types.h>
|
|
#endif
|
|
|
|
#ifdef WIN32
|
|
#define WIN32_LEAN_AND_MEAN
|
|
#include <windows.h>
|
|
#undef WIN32_LEAN_AND_MEAN
|
|
#endif
|
|
#ifdef HAVE_SYS_TIME_H
|
|
#include <sys/time.h>
|
|
#endif
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#ifndef WIN32
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
#endif
|
|
#include <errno.h>
|
|
#include <signal.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
#include <time.h>
|
|
|
|
#include "opal/class/opal_object.h"
|
|
#include "opal/threads/mutex.h"
|
|
#include "opal/threads/threads.h"
|
|
#include "opal/util/output.h"
|
|
#include "opal/constants.h"
|
|
#include "opal/util/argv.h"
|
|
#include "opal/mca/base/mca_base_param.h"
|
|
#include "opal/mca/event/base/base.h"
|
|
|
|
#include "libevent/event.h"
|
|
#include "libevent/include/event2/thread.h"
|
|
|
|
#include "opal/mca/event/event.h"
|
|
|
|
typedef struct event opal_event_t;
|
|
/*** Overload the event_base_t struct ***/
|
|
/* This may (hopefully) be a temporary change
|
|
* to deal with cross-base sync. Specifically,
|
|
* when an event in one base needs to release
|
|
* a condition_wait in another base, we need
|
|
* to "wakeup" the event base in the second base
|
|
* so the condition_wait can be checked
|
|
*
|
|
* On a more permanent level, use this to update
|
|
* the event base when it is being progressed in
|
|
* a separate thread.
|
|
*/
|
|
typedef struct {
|
|
struct event_base *base;
|
|
opal_event_t update_event;
|
|
int update_pipe[2];
|
|
} opal_event_base_t;
|
|
|
|
typedef struct {
|
|
opal_event_t *ev;
|
|
uint8_t op;
|
|
} opal_event_update_t;
|
|
|
|
#define OPAL_EVENT_NOOP 0x00
|
|
#define OPAL_EVENT_ADD 0x01
|
|
#define OPAL_EVENT_DEL 0x02
|
|
|
|
#if OPAL_EVENT_HAVE_THREAD_SUPPORT
|
|
#define OPAL_UPDATE_EVBASE(b, evt, ad)
|
|
#else
|
|
#define OPAL_UPDATE_EVBASE(b, evt, ad) \
|
|
do { \
|
|
opal_event_update_t up; \
|
|
up.ev = (evt); \
|
|
up.op = (ad); \
|
|
opal_fd_write((b)->update_pipe[1], sizeof(opal_event_update_t), &up); \
|
|
} while(0);
|
|
#endif
|
|
|
|
BEGIN_C_DECLS
|
|
|
|
/* Temporary global - will be replaced by layer-specific event bases */
|
|
OPAL_DECLSPEC extern opal_event_base_t *opal_event_base;
|
|
|
|
#define OPAL_EV_TIMEOUT EV_TIMEOUT
|
|
#define OPAL_EV_READ EV_READ
|
|
#define OPAL_EV_WRITE EV_WRITE
|
|
#define OPAL_EV_SIGNAL EV_SIGNAL
|
|
/* Persistent event: won't get removed automatically when activated. */
|
|
#define OPAL_EV_PERSIST EV_PERSIST
|
|
|
|
#define OPAL_EVLOOP_ONCE EVLOOP_ONCE /**< Block at most once. */
|
|
#define OPAL_EVLOOP_NONBLOCK EVLOOP_NONBLOCK /**< Do not block. */
|
|
|
|
/* Global function to create and release an event base */
|
|
OPAL_DECLSPEC opal_event_base_t* opal_event_base_create(void);
|
|
OPAL_DECLSPEC void opal_event_base_finalize(opal_event_base_t *base);
|
|
|
|
OPAL_DECLSPEC int opal_event_init(void);
|
|
|
|
OPAL_DECLSPEC int opal_event_reinit(opal_event_base_t *base);
|
|
|
|
OPAL_DECLSPEC struct timeval *opal_event_base_init_common_timeout (opal_event_base_t *evbase,
|
|
struct timeval *tv_in);
|
|
|
|
/* thread support APIs */
|
|
#if OPAL_EVENT_HAVE_THREAD_SUPPORT
|
|
#ifdef WIN32
|
|
#define opal_event_use_threads(x) evthread_use_windows_threads(x)
|
|
#else
|
|
#define opal_event_use_threads(x) evthread_use_pthreads(x)
|
|
#endif
|
|
#else
|
|
#define opal_event_use_threads(x)
|
|
#endif
|
|
|
|
/* Basic event APIs */
|
|
#define opal_event_set_debug_output(x) event_set_debug_output((x))
|
|
|
|
#define opal_event_set(b, ev, fd, fg, cb, arg) event_assign((ev), (b)->base, (fd), (fg), (event_callback_fn) (cb), (arg))
|
|
|
|
#define opal_event_add(ev, tv) event_add((ev), (tv))
|
|
|
|
#define opal_event_del(ev) event_del((ev))
|
|
|
|
#define opal_event_active(x, y, z) event_active((x), (y), (z))
|
|
|
|
#define opal_event_new(b, fd, fg, cb, arg) event_new((b)->base, (fd), (fg), (event_callback_fn) (cb), (arg))
|
|
|
|
#define opal_event_free(x) event_free((x))
|
|
|
|
/* Timer APIs */
|
|
#define opal_event_evtimer_new(b, cb, arg) event_new((b)->base, -1, 0, (event_callback_fn) (cb), (arg))
|
|
|
|
#define opal_event_evtimer_add(ev, tv) event_add((ev), (tv))
|
|
|
|
#define opal_event_evtimer_set(b, ev, cb, arg) event_assign((ev), (b)->base, -1, 0, (event_callback_fn) (cb), (arg))
|
|
|
|
#define opal_event_evtimer_del(ev) event_del((ev))
|
|
|
|
#define opal_event_evtimer_pending(ev, tv) event_pending((ev), EV_TIMEOUT, (tv))
|
|
|
|
#define opal_event_evtimer_initialized(ev) event_initialized((ev))
|
|
|
|
/* Signal APIs */
|
|
#define opal_event_signal_add(ev, tv) event_add((ev), (tv))
|
|
|
|
#define opal_event_signal_set(b, ev, fd, cb, arg) event_assign((ev), (b)->base, (fd), EV_SIGNAL|EV_PERSIST, (event_callback_fn) (cb), (arg))
|
|
|
|
#define opal_event_signal_del(ev) event_del((ev))
|
|
|
|
#define opal_event_signal_pending(ev, tv) event_pending((ev), EV_SIGNAL, (tv))
|
|
|
|
#define opal_event_signal_initalized(ev) event_initialized((ev))
|
|
|
|
#define opal_event_get_signal(ev) event_get_signal((ev))
|
|
|
|
#define opal_event_loop(b, fg) event_base_loop((b->base), (fg))
|
|
|
|
#define opal_event_dispatch(b) event_base_loop((b)->base, 0)
|
|
|
|
END_C_DECLS
|
|
|
|
#endif /* MCA_OPAL_EVENT_LIBEVENT2013_H */
|