-/* Copyright (c) 2013-2014. The SimGrid Team.
+/* 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"
XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_network, surf,
"Logging specific to the SURF network module");
+/*********
+ * C API *
+ *********/
+
+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 *
*************/
-surf_callback(void, NetworkLinkPtr) networkLinkCreatedCallbacks;
-surf_callback(void, NetworkLinkPtr) networkLinkDestructedCallbacks;
-surf_callback(void, NetworkLinkPtr) networkLinkStateChangedCallbacks;
-surf_callback(void, NetworkActionPtr) networkActionStateChangedCallbacks;
+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 *
*********/
-NetworkModelPtr surf_network_model = NULL;
+simgrid::surf::NetworkModel *surf_network_model = NULL;
+
+namespace simgrid {
+namespace surf {
double NetworkModel::latencyFactor(double /*size*/) {
return sg_latency_factor;
return rate;
}
+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 *
************/
-NetworkLink::NetworkLink(NetworkModelPtr model, const char *name, xbt_dict_t props)
-: Resource(model, name, props)
-, p_latEvent(NULL)
+Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props)
+: Resource(model, name),
+ PropertyHolder(props)
{
- surf_callback_emit(networkLinkCreatedCallbacks, this);
+ links->insert({name, this});
+
+ XBT_DEBUG("Create link '%s'",name);
}
-NetworkLink::NetworkLink(NetworkModelPtr model, const char *name, xbt_dict_t props,
+Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props,
lmm_constraint_t constraint,
- tmgr_history_t history,
+ sg_future_evt_set_t fes,
tmgr_trace_t state_trace)
-: Resource(model, name, props, constraint),
- p_latEvent(NULL)
+: Resource(model, name, constraint),
+ PropertyHolder(props)
{
- surf_callback_emit(networkLinkCreatedCallbacks, this);
if (state_trace)
- p_stateEvent = tmgr_history_add_trace(history, state_trace, 0.0, 0, static_cast<ResourcePtr>(this));
+ p_stateEvent = fes->add_trace(state_trace, 0.0, 0, this);
+
+ links->insert({name, this});
+ XBT_DEBUG("Create link '%s'",name);
+
}
-NetworkLink::~NetworkLink()
+/** @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()
{
- surf_callback_emit(networkLinkDestructedCallbacks, this);
+ if (!currentlyDestroying_) {
+ currentlyDestroying_ = true;
+ onDestruction(this);
+ delete this;
+ }
}
-bool NetworkLink::isUsed()
+bool Link::isUsed()
{
return lmm_constraint_used(getModel()->getMaxminSystem(), getConstraint());
}
-double NetworkLink::getLatency()
+double Link::getLatency()
{
return m_latCurrent;
}
-double NetworkLink::getBandwidth()
+double Link::getBandwidth()
{
- return p_power.peak * p_power.scale;
+ return p_speed.peak * p_speed.scale;
}
-bool NetworkLink::isShared()
+int Link::sharingPolicy()
{
- return lmm_constraint_is_shared(getConstraint());
+ return lmm_constraint_sharing_policy(getConstraint());
}
-void NetworkLink::setState(e_surf_resource_state_t state){
- Resource::setState(state);
- surf_callback_emit(networkLinkStateChangedCallbacks, this);
+void Link::turnOn(){
+ if (isOff()) {
+ Resource::turnOn();
+ onStateChange(this, 0, 1);
+ }
+}
+void Link::turnOff(){
+ if (isOn()) {
+ Resource::turnOff();
+ onStateChange(this, 1, 0);
+ }
}
/**********
**********/
void NetworkAction::setState(e_surf_action_state_t state){
+ e_surf_action_state_t old = getState();
Action::setState(state);
- surf_callback_emit(networkActionStateChangedCallbacks, this);
+ networkActionStateChangedCallbacks(this, old, state);
+}
+
+}
}
#endif /* NETWORK_INTERFACE_CPP_ */
