//exits - problem sending
//0 - flow outside range, no link
//dst_num - sent all ff
int module_send_flow(struct fins_module *module, struct finsFrame *ff, uint32_t flow) {
PRINT_DEBUG("Entered: module=%p, ff=%p, flow=%u", module, ff, flow);
struct fins_module_table *mt = (struct fins_module_table *) module->data;
PRINT_DEBUG("table: flows_num=%u", mt->flows_num);
if (flow >= mt->flows_num) {
PRINT_DEBUG("Exited: module=%p, ff=%p, flow=%u, ret=%d", module, ff, flow, 0);
return 0;
}
PRINT_DEBUG("flow=%u, link_id=%u, link=%p", flow, mt->flows[flow].link_id, mt->flows[flow].link);
if (mt->flows[flow].link_id == LINK_NULL) {
PRINT_DEBUG("Exited: module=%p, ff=%p, flow=%u, ret=%d", module, ff, flow, 0);
return 0;
}
if (mt->flows[flow].link == NULL) {
PRINT_DEBUG("Exited: module=%p, ff=%p, flow=%u, ret=%d", module, ff, flow, 0);
return 0;
}
#ifdef DEBUG
link_print(mt->flows[flow].link);
#endif
if (mt->flows[flow].link->dsts_num == 0) {
PRINT_DEBUG("Exited: module=%p, ff=%p, flow=%u, ret=%d", module, ff, flow, 0);
return 0;
} else {
struct finsFrame *ff_clone;
int i;
for (i = 1; i < mt->flows[flow].link->dsts_num; i++) {
ff_clone = cloneFinsFrame(ff);
ff_clone->destinationID = mt->flows[flow].link->dsts_index[i];
module_to_switch(module, ff_clone);
}
ff->destinationID = mt->flows[flow].link->dsts_index[0];
module_to_switch(module, ff);
PRINT_DEBUG("Exited: module=%p, ff=%p, flow=%u, ret=%d", module, ff, flow, mt->flows[flow].link->dsts_num);
return mt->flows[flow].link->dsts_num;
}
}
void udp_out_fdf(struct fins_module *module, struct finsFrame* ff) {
struct udp_data *md = (struct udp_data *) module->data;
//struct udp_metadata_parsed parsed_meta;
//struct udp_packet packet_host;
struct udp_packet *packet_netw;
uint16_t packet_length;
/* read the FDF and make sure everything is correct*/
PRINT_DEBUG("UDP_out, ff=%p, meta=%p", ff, ff->metaData);
//print_finsFrame(ff);
packet_length = ff->dataFrame.pduLength + U_HEADER_LEN;
if (packet_length > IP_MAXLEN) {
PRINT_ERROR("todo error, data too long max 65536, len=%d", packet_length);
}
uint8_t *udp_dataunit = (uint8_t *) secure_malloc(packet_length);
packet_netw = (struct udp_packet *) udp_dataunit;
uint8_t *pdu = ff->dataFrame.pdu;
/** constructs the UDP packet from the FDF and the meta data */
//#########################
#ifdef DEBUG
if (1) {
uint8_t *temp = (uint8_t *) secure_malloc(ff->dataFrame.pduLength + 1);
memcpy(temp, pdu, ff->dataFrame.pduLength);
temp[ff->dataFrame.pduLength] = '\0';
PRINT_DEBUG("pduLen=%d, pdu='%s'", ff->dataFrame.pduLength, temp);
free(temp);
}
#endif
//#########################
uint32_t dst_port;
uint32_t src_port;
uint32_t dst_ip;
uint32_t src_ip;
uint32_t family;
secure_metadata_readFromElement(ff->metaData, "send_family", &family);
secure_metadata_readFromElement(ff->metaData, "send_src_ipv4", &src_ip);
secure_metadata_readFromElement(ff->metaData, "send_src_port", &src_port);
secure_metadata_readFromElement(ff->metaData, "send_dst_ipv4", &dst_ip);
secure_metadata_readFromElement(ff->metaData, "send_dst_port", &dst_port);
uint32_t protocol = UDP_PROTOCOL;
secure_metadata_writeToElement(ff->metaData, "send_protocol", &protocol, META_TYPE_INT32);
/** fixing the values because of the conflict between uint16 type and
* the 32 bit META_INT_TYPE
*/
//packet_host.u_src = srcbuf16;
//packet_host.u_dst = dstbuf16;
//packet_host.u_len = packet_length;
//packet_host.u_cksum = 0;
packet_netw->u_src = htons((uint16_t) src_port);
packet_netw->u_dst = htons((uint16_t) dst_port);
packet_netw->u_len = htons(packet_length);
packet_netw->u_cksum = 0;
memcpy(packet_netw->u_data, pdu, ff->dataFrame.pduLength);
PRINT_DEBUG("src=%u:%u, dst=%u:%u, pkt_len=%u", src_ip, (uint16_t)src_port, dst_ip, (uint16_t)dst_port, packet_length);
uint16_t checksum = UDP_checksum(packet_netw, htonl(src_ip), htonl(dst_ip));
packet_netw->u_cksum = htons(checksum);
//packet_netw->u_cksum = 0;
PRINT_DEBUG("checksum (h):0x%x", checksum);
//PRINT_DEBUG("%u,%u", src_ip, dst_ip);
PRINT_DEBUG("pkt_netw: %d,%d,%d,0x%x", packet_netw->u_src, packet_netw->u_dst, packet_netw->u_len, packet_netw->u_cksum);
//ff->dataFrame.pdu = udp_dataunit;
/* creates a new FDF to be sent out */
PRINT_DEBUG("%p", udp_dataunit);
ff->dataFrame.pduLength = packet_length;
ff->dataFrame.pdu = udp_dataunit;
md->stats.totalSent++;
struct finsFrame *ff_clone = cloneFinsFrame(ff);
//TODO add switch & move between ipv4/ipv6
if (!module_send_flow(module, ff, UDP_FLOW_IPV4)) {
PRINT_ERROR("send to switch error, ff=%p", ff);
freeFinsFrame(ff);
}
struct udp_sent *sent = udp_sent_create(ff_clone, src_ip, src_port, dst_ip, dst_port);
if (list_has_space(md->sent_packet_list)) {
list_append(md->sent_packet_list, sent);
PRINT_DEBUG("sent_packet_list=%p, len=%u, max=%u", md->sent_packet_list, md->sent_packet_list->len, md->sent_packet_list->max);
gettimeofday(&sent->stamp, 0);
} else {
//PRINT_DEBUG("Clearing sent_packet_list");
//udp_sent_list_gc(udp_sent_packet_list, UDP_MSL_TO_DEFAULT);
//if (!udp_sent_list_has_space(udp_sent_packet_list)) {
PRINT_DEBUG("Dropping head of sent_packet_list");
struct udp_sent *old = (struct udp_sent *) list_remove_front(md->sent_packet_list);
udp_sent_free(old);
//}
list_append(md->sent_packet_list, sent);
PRINT_DEBUG("sent_packet_list=%p, len=%u, max=%u", md->sent_packet_list, md->sent_packet_list->len, md->sent_packet_list->max);
gettimeofday(&sent->stamp, 0);
}
PRINT_DEBUG("Freeing: pdu=%p", pdu);
free(pdu);
}
