ofl-exp-beba.h

#ifndef OFL_EXP_BEBA_H
#define OFL_EXP_BEBA_H 1

#include "../lib/hmap.h"
#include "../udatapath/packet.h"
#include "../udatapath/pipeline.h"
#include "../oflib/ofl-structs.h"
#include "../oflib/ofl-messages.h"
#include "../oflib/oxm-match.h"
#include "../include/openflow/beba-ext.h"


#define MAX_EXTRACTION_FIELD_COUNT 6
#define MAX_STATE_KEY_LEN 48

#define STATE_DEFAULT 0
#define STATE_NULL UINT32_MAX
/**************************************************************************/
/*                        experimenter messages ofl_exp                   */
/**************************************************************************/
struct ofl_exp_beba_msg_header {
    struct ofl_msg_experimenter   header; /* BEBA_VENDOR_ID */

    uint32_t   type;
};

struct ofl_exp_beba_msg_multipart_request {
    struct ofl_msg_multipart_request_experimenter header; /* BEBA_VENDOR_ID */

    uint32_t type;
};

struct ofl_exp_beba_msg_multipart_reply {
    struct ofl_msg_multipart_reply_experimenter header; /* BEBA_VENDOR_ID */

    uint32_t type;
};
/************************
 * state mod messages
 ************************/

struct ofl_exp_msg_state_mod {
    struct ofl_exp_beba_msg_header header;   /* OFP_EXP_STATE_MOD */
    enum ofp_exp_msg_state_mod_commands command;
    uint8_t payload[13+OFPSC_MAX_KEY_LEN]; //ugly! for now it's ok XXX
};

struct ofl_exp_stateful_table_config {
    uint8_t table_id;
    uint8_t stateful;
};

struct ofl_exp_set_extractor {
    uint8_t table_id;
    uint8_t bit;
    uint32_t field_count;
    uint32_t fields[OFPSC_MAX_FIELD_COUNT];
};

struct ofl_exp_set_flow_state {
    uint8_t table_id;
    uint32_t key_len;
    uint32_t state;
    uint32_t state_mask;
    uint32_t hard_rollback;
    uint32_t idle_rollback;
    uint32_t hard_timeout;
    uint32_t idle_timeout;
    uint8_t key[OFPSC_MAX_KEY_LEN];
};

struct ofl_exp_del_flow_state {
    uint8_t table_id;
    uint32_t key_len;
    uint8_t key[OFPSC_MAX_KEY_LEN];
};

struct ofl_exp_set_global_state {
    uint32_t global_state;
    uint32_t global_state_mask;
};

/************************
 * pkttmp mod messages
 ************************/

struct ofl_exp_msg_pkttmp_mod {
    struct ofl_exp_beba_msg_header header;   /* OFP_EXP_PKTTMP_MOD */
    enum ofp_exp_msg_pkttmp_mod_commands command;
    uint8_t payload[12]; //(sizeof(ofl_exp_add_pkttmp)) ugly! for now it's ok XXX
};

struct ofl_exp_add_pkttmp {
	uint32_t pkttmp_id;
	size_t data_length;
	uint8_t *data;
};

struct ofl_exp_del_pkttmp {
	uint32_t pkttmp_id;
};


/*************************
* Multipart reply message: State entry statistics
*************************/
struct ofl_exp_state_entry{
    uint8_t             key_len;
    uint8_t             key[OFPSC_MAX_KEY_LEN];
    uint32_t            state;
};

struct ofl_exp_state_stats {
    uint8_t                         table_id;      /* ID of table flow came from. */
    uint32_t                        duration_sec;  /* Time state entry has been alive in secs. */
    uint32_t                        duration_nsec; /* Time state entry has been alive in nsecs beyond duration_sec. */
    uint32_t                        hard_rollback;
    uint32_t                        idle_rollback;
    uint32_t                        hard_timeout;  /* Number of seconds before expiration. */
    uint32_t                        idle_timeout;  /* Number of seconds idle before expiration. */
    struct ofl_exp_state_entry      entry;         /* Description of the state entry. */
};

struct ofl_exp_msg_multipart_request_state {
    struct ofl_exp_beba_msg_multipart_request   header; /* OFPMP_STATE */

    uint8_t                  table_id; /* ID of table to read
                                           (from ofp_table_multipart), 0xff for all
                                           tables. */
    uint8_t                  get_from_state;
    uint32_t                 state;
    struct ofl_match_header  *match;       /* Fields to match. */
};

struct ofl_exp_msg_multipart_reply_state {

    struct ofl_exp_beba_msg_multipart_reply   header; /* OFPMP_STATE */

    size_t                  stats_num;
    struct ofl_exp_state_stats **stats;
};

struct ofl_exp_msg_multipart_request_global_state {
    struct ofl_exp_beba_msg_multipart_request   header; /* OFPMP_GLOBAL_STATE */
};

struct ofl_exp_msg_multipart_reply_global_state {
    struct ofl_exp_beba_msg_multipart_reply   header; /* OFPMP_GLOBAL_STATE */
    uint32_t global_state;
};

/*************************************************************************/
/*                        experimenter actions ofl_exp                   */
/*************************************************************************/
struct ofl_exp_beba_act_header {
    struct ofl_action_experimenter   header; /* BEBA_VENDOR_ID */

    uint32_t   act_type;
};

struct ofl_exp_action_set_state {
    struct ofl_exp_beba_act_header  header; /* OFPAT_EXP_SET_STATE */

    uint32_t state;
    uint32_t state_mask;
    uint8_t table_id; /*we have 64 flow table in the pipeline*/
    uint32_t hard_rollback;
    uint32_t idle_rollback;
    uint32_t hard_timeout;
    uint32_t idle_timeout;
    uint8_t bit;
};

struct ofl_exp_action_set_global_state {
    struct ofl_exp_beba_act_header   header; /* OFPAT_EXP_SET_GLOBAL_STATE */

    uint32_t global_state;
    uint32_t global_state_mask;
};

struct ofl_exp_action_inc_state {
    struct ofl_exp_beba_act_header header; /* OFPAT_EXP_INC_STATE */

    uint8_t table_id;
};

/*************************************************************************/
/*                        experimenter state table						 */
/*************************************************************************/


struct key_extractor {
    uint8_t                     table_id;
    uint8_t                     bit;
    uint32_t                    field_count;
    uint32_t                    fields[MAX_EXTRACTION_FIELD_COUNT];
    uint32_t                    key_len;
};

struct state_entry {
    struct hmap_node            hmap_node;
    uint8_t             key[MAX_STATE_KEY_LEN];
    uint32_t                state;
    struct ofl_exp_state_stats   *stats;
    uint64_t                created;  /* time the entry was created at [us] */
    uint64_t                remove_at; /* time the entry should be removed at
                                           due to its hard timeout. [us] */
    uint64_t                last_used; /* last time the flow entry matched a packet [us]*/
};

struct state_table {
    struct key_extractor        lookup_key_extractor;
    struct key_extractor        update_key_extractor;
    struct key_extractor        bit_update_key_extractor;
    struct hmap                 state_entries;
    struct state_entry          default_state_entry;
    struct state_entry          null_state_entry;
    struct state_entry *        last_lookup_state_entry;
    bool                        update_scope_is_eq_lookup_scope;
    bool                        bit_update_scope_is_eq_lookup_scope;
    uint8_t stateful;
};

/*************************************************************************/
/*                        experimenter notifications                     */
/*************************************************************************/
/* State Sync: Notify the controller about a state change. */
struct ofl_exp_msg_notify_state_change {
    struct   ofl_exp_beba_msg_header header;

    uint8_t  table_id;
    uint32_t old_state;
    uint32_t new_state;
    uint32_t state_mask;
    uint32_t key_len;
    uint8_t  key[OFPSC_MAX_KEY_LEN];
};

/* State Sync: Notify the controller about a flow change. */
struct ofl_exp_msg_notify_flow_change {
    struct ofl_exp_beba_msg_header header;
    uint32_t table_id;
    uint32_t ntf_type;
    struct   ofl_match_header  *match;
    uint32_t instruction_num;
    uint32_t * instructions;
};

/*experimenter table functions*/
bool __extract_key(uint8_t *, struct key_extractor *, struct packet *);

struct state_table *
state_table_create(void);

void
state_table_destroy(struct state_table *);

bool state_table_is_enabled(struct state_table *table);

struct state_entry *
state_table_lookup(struct state_table*, struct packet *);

static  inline
void state_table_write_state_header(struct state_entry *entry, uint32_t *state)
{
    *state = entry->state;
}

bool
extractors_are_equal(struct key_extractor *ke1, struct key_extractor *ke2);

void
state_table_flush(struct state_table *table, uint64_t now_us);

/*
 * State Sync: One extra argument (i.e., ntf_message) is passed at the end of this function.
 */
ofl_err
state_table_set_state(struct state_table *, struct packet *, struct ofl_exp_set_flow_state *msg, struct ofl_exp_action_set_state *act, struct ofl_exp_msg_notify_state_change * ntf_message);

ofl_err
state_table_inc_state(struct state_table *, struct packet *);

ofl_err
state_table_configure_stateful(struct state_table *table, uint8_t stateful);

ofl_err
state_table_set_extractor(struct state_table *, struct key_extractor *, int);

ofl_err
state_table_del_state(struct state_table *, uint8_t *, uint32_t);

/*experimenter message functions*/

int
ofl_exp_beba_msg_pack(struct ofl_msg_experimenter const *msg, uint8_t **buf, size_t *buf_len, struct ofl_exp const *exp);

ofl_err
ofl_exp_beba_msg_unpack(struct ofp_header const *oh, size_t *len, struct ofl_msg_experimenter **msg, struct ofl_exp const *exp);

int
ofl_exp_beba_msg_free(struct ofl_msg_experimenter *msg);

char *
ofl_exp_beba_msg_to_string(struct ofl_msg_experimenter const *msg, struct ofl_exp const *exp);

/*experimenter action functions*/

int
ofl_exp_beba_act_pack(struct ofl_action_header const *src, struct ofp_action_header *dst);

ofl_err
ofl_exp_beba_act_unpack(struct ofp_action_header const *src, size_t *len, struct ofl_action_header **dst);

size_t
ofl_exp_beba_act_ofp_len(struct ofl_action_header const *act);

int
ofl_exp_beba_act_free(struct ofl_action_header *act);

char *
ofl_exp_beba_act_to_string(struct ofl_action_header const *act);

/*experimenter stats functions*/
int
ofl_exp_beba_stats_req_pack(struct ofl_msg_multipart_request_experimenter const *ext, uint8_t **buf, size_t *buf_len, struct ofl_exp const *exp);

int
ofl_exp_beba_stats_reply_pack(struct ofl_msg_multipart_reply_experimenter const *ext, uint8_t **buf, size_t *buf_len, struct ofl_exp const *exp);

char *
ofl_exp_beba_stats_request_to_string(struct ofl_msg_multipart_request_experimenter const *ext, struct ofl_exp const *exp);

char *
ofl_exp_beba_stats_reply_to_string(struct ofl_msg_multipart_reply_experimenter const *ext, struct ofl_exp const *exp);

ofl_err
ofl_exp_beba_stats_req_unpack(struct ofp_multipart_request const *os, uint8_t const *buf, size_t *len, struct ofl_msg_multipart_request_header **msg, struct ofl_exp const *exp);

ofl_err
ofl_exp_beba_stats_reply_unpack(struct ofp_multipart_reply const *os, uint8_t const *buf, size_t *len, struct ofl_msg_multipart_reply_header **msg, struct ofl_exp const *exp);

int
ofl_exp_beba_stats_req_free(struct ofl_msg_multipart_request_header *msg);

int
ofl_exp_beba_stats_reply_free(struct ofl_msg_multipart_reply_header *msg);

/*experimenter match fields functions*/
int
ofl_exp_beba_field_unpack(struct ofl_match *match, struct oxm_field const *f, void const *experimenter_id, void const *value, void const *mask);

void
ofl_exp_beba_field_pack(struct ofpbuf *buf, struct ofl_match_tlv const *oft);

void
ofl_exp_beba_field_match(struct ofl_match_tlv *f, int *packet_header, int *field_len, uint8_t **flow_val, uint8_t **flow_mask);

void
ofl_exp_beba_field_compare (struct ofl_match_tlv *value, uint8_t **packet_val);

void
ofl_exp_beba_field_match_std (struct ofl_match_tlv *flow_mod_match, struct ofl_match_tlv *flow_entry_match, int *field_len, uint8_t **flow_mod_val, uint8_t **flow_entry_val, uint8_t **flow_mod_mask, uint8_t **flow_entry_mask);

void
ofl_exp_beba_field_overlap_a (struct ofl_match_tlv *f_a, int *field_len, uint8_t **val_a, uint8_t **mask_a, int *header, int *header_m, uint64_t *all_mask);

void
ofl_exp_beba_field_overlap_b (struct ofl_match_tlv *f_b, int *field_len, uint8_t **val_b, uint8_t **mask_b, uint64_t *all_mask);

/*
 * Handles a state_mod message
 * State Sync: One extra argument (i.e., ntf_message) is passed at the end of this function
 */
ofl_err
handle_state_mod(struct pipeline *pl, struct ofl_exp_msg_state_mod *msg, const struct sender *sender, struct ofl_exp_msg_notify_state_change * ntf_message);

/* Handles a state stats request. */
ofl_err
handle_stats_request_state(struct pipeline *pl, struct ofl_exp_msg_multipart_request_state *msg, const struct sender *sender, struct ofl_exp_msg_multipart_reply_state **replies, size_t *replies_num);

/* Handles a global state stats request. */
ofl_err
handle_stats_request_global_state(struct pipeline *pl, const struct sender *sender, struct ofl_exp_msg_multipart_reply_global_state *reply);

void
state_table_stats(struct state_table *table, struct ofl_exp_msg_multipart_request_state *msg,
                 struct ofl_exp_state_stats ***stats, size_t *stats_size, size_t *stats_num, uint8_t table_id, bool delete_entries);

void
state_table_delete_states(struct state_table *table);

size_t
ofl_structs_state_stats_pack(struct ofl_exp_state_stats const *src, uint8_t *dst, struct ofl_exp const *exp);

size_t
ofl_structs_state_stats_short_pack(struct ofl_exp_state_stats const *src, uint8_t *dst, struct ofl_exp const *exp);

size_t
ofl_structs_state_stats_ofp_total_len(struct ofl_exp_state_stats ** stats, size_t stats_num, struct ofl_exp const *exp);

size_t
ofl_structs_state_stats_ofp_len(struct ofl_exp_state_stats *stats, struct ofl_exp const *exp);

size_t
ofl_structs_state_stats_short_ofp_total_len(struct ofl_exp_state_stats ** stats, size_t stats_num, struct ofl_exp const *exp);

size_t
ofl_structs_state_stats_short_ofp_len(struct ofl_exp_state_stats *stats, struct ofl_exp const *exp);

void
ofl_structs_state_entry_print(FILE *stream, uint32_t field, uint8_t *key, uint8_t *offset);

void
ofl_structs_state_entry_print_default(FILE *stream, uint32_t field);

void
ofl_structs_state_stats_print(FILE *stream, struct ofl_exp_state_stats *s, struct ofl_exp const *exp);

void
ofl_structs_state_stats_short_print(FILE *stream, struct ofl_exp_state_stats *s, struct ofl_exp const *exp);

ofl_err
ofl_structs_state_stats_unpack(struct ofp_exp_state_stats const *src, uint8_t const *buf, size_t *len, struct ofl_exp_state_stats **dst, struct ofl_exp const *exp);

ofl_err
ofl_structs_state_stats_short_unpack(struct ofp_exp_state_stats_short const *src, uint8_t const *buf, size_t *len, struct ofl_exp_state_stats **dst, struct ofl_exp const *exp);

ofl_err
ofl_utils_count_ofp_state_stats(void *data, size_t data_len, size_t *count);

ofl_err
ofl_utils_count_ofp_state_stats_short(void *data, size_t data_len, size_t *count);

/* instruction experimenter callback functions */
int
ofl_exp_beba_inst_pack (struct ofl_instruction_header const *src, struct ofp_instruction *dst);

ofl_err
ofl_exp_beba_inst_unpack (struct ofp_instruction const *src, size_t *len, struct ofl_instruction_header **dst);

int
ofl_exp_beba_inst_free (struct ofl_instruction_header *i);

size_t
ofl_exp_beba_inst_ofp_len (struct ofl_instruction_header const *i);

char *
ofl_exp_beba_inst_to_string (struct ofl_instruction_header const *i);

/* Experimenter erorrs callback functions */

void
ofl_exp_beba_error_pack (struct ofl_msg_exp_error const *msg, uint8_t **buf, size_t *buf_len);

void
ofl_exp_beba_error_free (struct ofl_msg_exp_error *msg);

char *
ofl_exp_beba_error_to_string(struct ofl_msg_exp_error const *msg);


void
ofl_exp_stats_type_print(FILE *stream, uint32_t type);

struct ofl_match_tlv *
ofl_structs_match_exp_put8(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint8_t value);

struct ofl_match_tlv *
ofl_structs_match_exp_put8m(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint8_t value, uint8_t mask);

struct ofl_match_tlv *
ofl_structs_match_exp_put16(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint16_t value);

struct ofl_match_tlv *
ofl_structs_match_exp_put16m(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint16_t value, uint16_t mask);

struct ofl_match_tlv *
ofl_structs_match_exp_put32(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint32_t value);

struct ofl_match_tlv *
ofl_structs_match_exp_put32m(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint32_t value, uint32_t mask);

struct ofl_match_tlv *
ofl_structs_match_exp_put64(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint64_t value);

struct ofl_match_tlv *
ofl_structs_match_exp_put64m(struct ofl_match *match, uint32_t header, uint32_t experimenter_id, uint64_t value, uint64_t mask);

/*************************************************************************/
/*                        experimenter instructions ofl_exp                   */
/*************************************************************************/
struct ofl_exp_beba_instr_header {
    struct ofl_instruction_experimenter   header; /* BEBA_VENDOR_ID */
    uint32_t   instr_type;
};

struct ofl_exp_instruction_in_switch_pkt_gen {
	struct ofl_exp_beba_instr_header  header; /* OFPIT_EXP_IN_SWITCH_PKT_GEN*/
	uint32_t				          pkttmp_id;
	size_t                     	      actions_num;
	struct ofl_action_header        **actions;
};

/*************************************************************************/
/*                        experimenter pkttmp table						 */
/*************************************************************************/

struct pkttmp_table {
    struct datapath  *dp;
	//struct ofl_msg_multipart_reply_group_features *features;
	size_t            entries_num;
    struct hmap       entries;
};

struct pkttmp_entry {
    struct hmap_node            node;

    uint32_t                    pkttmp_id;
    struct datapath             *dp;
    struct pkttmp_table         *table;
    uint64_t                    created;
    uint8_t                     *data;     /* to check if it is good for tmp implementation */
    size_t                      data_length;
};

/* experimenter pkttmp table functions*/

struct pkttmp_table *
pkttmp_table_create(struct datapath *dp);

void
pkttmp_table_destroy(struct pkttmp_table *table);

/* experimenter pkttmp entry functions */
struct pkttmp_entry *
pkttmp_entry_create(struct datapath *dp, struct pkttmp_table *table, struct ofl_exp_add_pkttmp *mod);

void
pkttmp_entry_destroy(struct pkttmp_entry *entry);

ofl_err
handle_pkttmp_mod(struct pipeline *pl, struct ofl_exp_msg_pkttmp_mod *msg,
                                                const struct sender *sender);

uint32_t
get_experimenter_id(struct ofl_msg_header const *msg);

uint32_t
get_experimenter_id_from_match(struct ofl_match const *flow_mod_match);

uint32_t
get_experimenter_id_from_action(struct ofl_instruction_actions const *act);

/*experimenter match fields*/

static inline void
oxm_put_exp_header(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id)
{
    uint32_t n_header = htonl(header);
    ofpbuf_put(buf, &n_header, sizeof n_header);
    ofpbuf_put(buf, &experimenter_id, EXP_ID_LEN);

}

static inline void
oxm_put_exp_8(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint8_t value)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
}

static inline void
oxm_put_exp_8w(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint8_t value, uint8_t mask)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
    ofpbuf_put(buf, &mask, sizeof mask);
}

static inline void
oxm_put_exp_16(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint16_t value)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
}

static inline void
oxm_put_exp_16w(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint16_t value, uint16_t mask)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
    ofpbuf_put(buf, &mask, sizeof mask);
}

static inline void
oxm_put_exp_32(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint32_t value)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
}

static inline void
oxm_put_exp_32w(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint32_t value, uint32_t mask)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
    ofpbuf_put(buf, &mask, sizeof mask);
}

static inline void
oxm_put_exp_64(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint64_t value)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
}

static inline void
oxm_put_exp_64w(struct ofpbuf *buf, uint32_t header, uint32_t experimenter_id, uint64_t value, uint64_t mask)
{
    oxm_put_exp_header(buf, header, experimenter_id);
    ofpbuf_put(buf, &value, sizeof value);
    ofpbuf_put(buf, &mask, sizeof mask);
}

#endif /* OFL_EXP_BEBA_H */