typed_adapters.h

Go to the documentation of this file.

#ifndef _LIBSAPLING_TYPED_ADAPTERS_H_
#define _LIBSAPLING_TYPED_ADAPTERS_H_
 
#include "libsapling/dm/graph.h"
 
// Include typed_common.h for convenience
#include "libsapling/dm/typed/typed_common.h"
 
#define CAST_USER_INFO(TYPE, VAR, INFO) \
TYPE VAR = ((struct info_insert *)INFO)->info
 
#define IMPLEMENT_TYPED_ADAPTERS(SYM, TYPE, IMPL)                             \
                                                                              \
typedef int (*SYM##__predicate_t)(const TYPE *data, void *info);              \
typedef void (*SYM##__apply_t)(TYPE *data, void *info);                       \
                                                                              \
static                                                                        \
int SYM##__predicate_0(UNUSED const TYPE *data, UNUSED void *info)            \
{                                                                             \
    return 0;                                                                 \
}                                                                             \
                                                                              \
static                                                                        \
int SYM##__predicate_1(UNUSED const TYPE *data, UNUSED void *info)            \
{                                                                             \
    return 1;                                                                 \
}                                                                             \
                                                                              \
struct SYM##__adapt {                                                         \
    size_t size;                                                              \
    void *data;                                                               \
    void *info;                                                               \
    SYM##__predicate_t predicate;                                             \
    SYM##__apply_t apply;                                                     \
};                                                                            \
                                                                              \
static                                                                        \
int SYM##__predicate_adapter(const node_t *ref,                               \
    const struct info_stack *info)                                            \
{                                                                             \
    node_t node = *ref;                                                       \
    struct SYM##__adapt *user = info->user;                                   \
                                                                              \
    return user->predicate((const TYPE *)IMPL##__data(node), user);           \
}                                                                             \
                                                                              \
static                                                                        \
void SYM##__apply_adapter(node_t *ref, const struct info_stack *info)         \
{                                                                             \
    node_t node = *ref;                                                       \
    struct SYM##__adapt *user = info->user;                                   \
                                                                              \
    if (*ref != NULL)                                                         \
        user->apply((TYPE *)IMPL##__data(node), user);                        \
}
 
#endif