-/*
- * network_interface.cpp
- *
- * Created on: Nov 29, 2013
- * Author: bedaride
- */
+/* Copyright (c) 2013-2015. The SimGrid Team.
+ * All rights reserved. */
+
+/* This program is free software; you can redistribute it and/or modify it
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+
+#include <algorithm>
+
#include "network_interface.hpp"
#include "simgrid/sg_config.h"
#ifndef NETWORK_INTERFACE_CPP_
#define NETWORK_INTERFACE_CPP_
+XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_network, surf,
+ "Logging specific to the SURF network module");
-NetworkModelPtr surf_network_model = NULL;
+/*********
+ * C API *
+ *********/
-xbt_dynar_t NetworkModel::getRoute(RoutingEdgePtr src, RoutingEdgePtr dst)
-{
- xbt_dynar_t route = NULL;
- routing_platf->getRouteAndLatency(src, dst, &route, NULL);
- return route;
+extern "C" {
+
+const char* sg_link_name(Link *link) {
+ return link->getName();
+}
+Link * sg_link_by_name(const char* name) {
+ return Link::byName(name);
+}
+
+int sg_link_is_shared(Link *link){
+ return link->sharingPolicy();
+}
+double sg_link_bandwidth(Link *link){
+ return link->getBandwidth();
+}
+double sg_link_latency(Link *link){
+ return link->getLatency();
+}
+void* sg_link_data(Link *link) {
+ return link->getData();
+}
+void sg_link_data_set(Link *link,void *data) {
+ link->setData(data);
+}
+int sg_link_count(void) {
+ return Link::linksCount();
+}
+Link** sg_link_list(void) {
+ return Link::linksList();
+}
+void sg_link_exit(void) {
+ Link::linksExit();
+}
+
+}
+
+/*****************
+ * List of links *
+ *****************/
+
+namespace simgrid {
+namespace surf {
+
+boost::unordered_map<std::string,Link *> *Link::links = new boost::unordered_map<std::string,Link *>();
+Link *Link::byName(const char* name) {
+ Link * res = NULL;
+ try {
+ res = links->at(name);
+ } catch (std::out_of_range& e) {}
+
+ return res;
+}
+/** @brief Returns the amount of links in the platform */
+int Link::linksCount() {
+ return links->size();
+}
+/** @brief Returns a list of all existing links */
+Link **Link::linksList() {
+ Link **res = xbt_new(Link*, (int)links->size());
+ int i=0;
+ for (auto kv : *links) {
+ res[i++] = kv.second;
+ }
+ return res;
+}
+/** @brief destructor of the static data */
+void Link::linksExit() {
+ for (auto kv : *links)
+ (kv.second)->destroy();
+ delete links;
+}
+
+/*************
+ * Callbacks *
+ *************/
+
+simgrid::xbt::signal<void(simgrid::surf::Link*)> Link::onCreation;
+simgrid::xbt::signal<void(simgrid::surf::Link*)> Link::onDestruction;
+simgrid::xbt::signal<void(simgrid::surf::Link*, int, int)> Link::onStateChange; // signature: wasOn, currentlyOn
+
+simgrid::xbt::signal<void(simgrid::surf::NetworkAction*, e_surf_action_state_t, e_surf_action_state_t)> networkActionStateChangedCallbacks;
+simgrid::xbt::signal<void(simgrid::surf::NetworkAction*, simgrid::surf::NetCard *src, simgrid::surf::NetCard *dst, double size, double rate)> networkCommunicateCallbacks;
+
+}
+}
+
+void netlink_parse_init(sg_platf_link_cbarg_t link){
+ if (link->policy == SURF_LINK_FULLDUPLEX) {
+ char *link_id;
+ link_id = bprintf("%s_UP", link->id);
+ surf_network_model->createLink(link_id,
+ link->bandwidth,
+ link->bandwidth_trace,
+ link->latency,
+ link->latency_trace,
+ link->initiallyOn,
+ link->state_trace, link->policy, link->properties);
+ xbt_free(link_id);
+ link_id = bprintf("%s_DOWN", link->id);
+ surf_network_model->createLink(link_id,
+ link->bandwidth,
+ link->bandwidth_trace,
+ link->latency,
+ link->latency_trace,
+ link->initiallyOn,
+ link->state_trace, link->policy, link->properties);
+ xbt_free(link_id);
+ } else {
+ surf_network_model->createLink(link->id,
+ link->bandwidth,
+ link->bandwidth_trace,
+ link->latency,
+ link->latency_trace,
+ link->initiallyOn,
+ link->state_trace, link->policy, link->properties);
+ }
}
+/*********
+ * Model *
+ *********/
+
+simgrid::surf::NetworkModel *surf_network_model = NULL;
+
+namespace simgrid {
+namespace surf {
+
double NetworkModel::latencyFactor(double /*size*/) {
return sg_latency_factor;
}
return rate;
}
-bool NetworkLinkLmm::isUsed()
+double NetworkModel::shareResourcesFull(double now)
+{
+ NetworkAction *action = NULL;
+ ActionList *runningActions = surf_network_model->getRunningActionSet();
+ double minRes;
+
+ minRes = shareResourcesMaxMin(runningActions, surf_network_model->p_maxminSystem, surf_network_model->f_networkSolve);
+
+ for(ActionList::iterator it(runningActions->begin()), itend(runningActions->end())
+ ; it != itend ; ++it) {
+ action = static_cast<NetworkAction*>(&*it);
+#ifdef HAVE_LATENCY_BOUND_TRACKING
+ if (lmm_is_variable_limited_by_latency(action->getVariable())) {
+ action->m_latencyLimited = 1;
+ } else {
+ action->m_latencyLimited = 0;
+ }
+#endif
+ if (action->m_latency > 0) {
+ minRes = (minRes < 0) ? action->m_latency : std::min(minRes, action->m_latency);
+ }
+ }
+
+ XBT_DEBUG("Min of share resources %f", minRes);
+
+ return minRes;
+}
+
+/************
+ * Resource *
+ ************/
+
+Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props)
+: Resource(model, name),
+ PropertyHolder(props)
{
- return lmm_constraint_used(p_model->p_maxminSystem, p_constraint);
+ links->insert({name, this});
+
+ XBT_DEBUG("Create link '%s'",name);
}
-double NetworkLink::getLatency()
+Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props,
+ lmm_constraint_t constraint,
+ sg_future_evt_set_t fes,
+ tmgr_trace_t state_trace)
+: Resource(model, name, constraint),
+ PropertyHolder(props)
+{
+ if (state_trace)
+ p_stateEvent = fes->add_trace(state_trace, 0.0, 0, this);
+
+ links->insert({name, this});
+ XBT_DEBUG("Create link '%s'",name);
+
+}
+
+/** @brief use destroy() instead of this destructor */
+Link::~Link() {
+ xbt_assert(currentlyDestroying_, "Don't delete Links directly. Call destroy() instead.");
+}
+/** @brief Fire the require callbacks and destroy the object
+ *
+ * Don't delete directly an Link, call l->destroy() instead.
+ */
+void Link::destroy()
+{
+ if (!currentlyDestroying_) {
+ currentlyDestroying_ = true;
+ onDestruction(this);
+ delete this;
+ }
+}
+
+bool Link::isUsed()
+{
+ return lmm_constraint_used(getModel()->getMaxminSystem(), getConstraint());
+}
+
+double Link::getLatency()
{
return m_latCurrent;
}
-double NetworkLinkLmm::getBandwidth()
+double Link::getBandwidth()
{
- return p_power.peak * p_power.scale;
+ return p_speed.peak * p_speed.scale;
}
-bool NetworkLinkLmm::isShared()
+int Link::sharingPolicy()
{
- return lmm_constraint_is_shared(p_constraint);
+ return lmm_constraint_sharing_policy(getConstraint());
+}
+
+void Link::turnOn(){
+ if (isOff()) {
+ Resource::turnOn();
+ onStateChange(this, 0, 1);
+ }
+}
+void Link::turnOff(){
+ if (isOn()) {
+ Resource::turnOff();
+ onStateChange(this, 1, 0);
+ }
+}
+
+/**********
+ * Action *
+ **********/
+
+void NetworkAction::setState(e_surf_action_state_t state){
+ e_surf_action_state_t old = getState();
+ Action::setState(state);
+ networkActionStateChangedCallbacks(this, old, state);
+}
+
+}
}
#endif /* NETWORK_INTERFACE_CPP_ */
