-NetworkSmpiModel::~NetworkSmpiModel(){
- if (gap_lookup) {
- xbt_dict_free(&gap_lookup);
- }
- if (smpi_bw_factor) {
- xbt_dynar_free(&smpi_bw_factor);
- smpi_bw_factor = NULL;
- }
- if (smpi_lat_factor) {
- xbt_dynar_free(&smpi_lat_factor);
- smpi_lat_factor = NULL;
- }
-}
-
-void NetworkSmpiModel::gapAppend(double size, Link* link, NetworkAction *act)
-{
- const char *src = link->getName();
- xbt_fifo_t fifo;
- NetworkCm02Action *action= static_cast<NetworkCm02Action*>(act);
-
- if (sg_sender_gap > 0.0) {
- if (!gap_lookup) {
- gap_lookup = xbt_dict_new_homogeneous(NULL);
- }
- fifo = (xbt_fifo_t) xbt_dict_get_or_null(gap_lookup, src);
- action->m_senderGap = 0.0;
- if (fifo && xbt_fifo_size(fifo) > 0) {
- /* Compute gap from last send */
- /*last_action =
- (surf_action_network_CM02_t)
- xbt_fifo_get_item_content(xbt_fifo_get_last_item(fifo));*/
- // bw = net_get_link_bandwidth(link);
- action->m_senderGap = sg_sender_gap;
- /* max(sg_sender_gap,last_action->sender.size / bw);*/
- action->m_latency += action->m_senderGap;
- }
- /* Append action as last send */
- /*action->sender.link_name = link->lmm_resource.generic_resource.name;
- fifo =
- (xbt_fifo_t) xbt_dict_get_or_null(gap_lookup,
- action->sender.link_name);
- if (!fifo) {
- fifo = xbt_fifo_new();
- xbt_dict_set(gap_lookup, action->sender.link_name, fifo, NULL);
- }
- action->sender.fifo_item = xbt_fifo_push(fifo, action);*/
- action->m_senderSize = size;
- }
-}