1 /* Copyright (c) 2010, 2012-2013. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
8 #include "../cpu_cas01.hpp"
10 /** @addtogroup SURF_plugin_energy
16 XBT_LOG_EXTERNAL_CATEGORY(surf_kernel);
17 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_energy, surf,
18 "Logging specific to the SURF energy plugin");
20 std::map<CpuPtr, CpuEnergyPtr> *surf_energy=NULL;
22 static void createCpuCallback(CpuPtr cpu){
23 (*surf_energy)[cpu] = new CpuEnergy(cpu);
26 static void deleteCpuCallback(CpuPtr cpu){
27 std::map<CpuPtr, CpuEnergyPtr>::iterator cpuIt = surf_energy->find(cpu);
28 xbt_assert(cpuIt != surf_energy->end(), "The cpu is not in surf_energy.");
29 XBT_INFO("Total energy (Joules) of host %s: %f", cpu->getName(), cpuIt->second->getConsumedEnergy());
31 surf_energy->erase(cpuIt);
34 static void updateActionEnergyCallback(CpuActionPtr action){
35 CpuPtr cpu = getActionCpu(action);
36 CpuEnergyPtr cpu_energy = (*surf_energy)[cpu];
38 if(cpu_energy->last_updated < surf_get_clock()) {
39 double cpu_load = lmm_constraint_get_usage(cpu->getConstraint()) / cpu->m_powerPeak;
40 double start_time = cpu_energy->last_updated;
41 double finish_time = surf_get_clock();
43 /*XBT_DEBUG("[cpu_update_energy] action time interval=(%f-%f), current power peak=%f, current pstate=%d",
44 start_time, finish_time, cpu->m_powerPeak, cpu->m_pstate);*/
45 XBT_DEBUG("[cpu_update_energy] action time interval=(%f-%f), current power peak=%f",
46 start_time, finish_time, cpu->m_powerPeak);
47 double current_energy = cpu_energy->total_energy;
48 double action_energy = cpu_energy->getCurrentWattsValue(cpu_load)*(finish_time-start_time);
50 cpu_energy->total_energy = current_energy + action_energy;
51 cpu_energy->last_updated = finish_time;
53 XBT_DEBUG("[cpu_update_energy] old_energy_value=%f, action_energy_value=%f", current_energy, action_energy);
57 /** \ingroup SURF_plugin_energy
58 * \brief Enable energy plugin
59 * \details Enable energy plugin to get joules consumption of each cpu.
61 void sg_energy_plugin_init() {
62 if (surf_energy == NULL) {
63 surf_energy = new std::map<CpuPtr, CpuEnergyPtr>();
64 surf_callback_connect(createCpuCallbacks, createCpuCallback);
65 surf_callback_connect(deleteCpuCallbacks, deleteCpuCallback);
66 surf_callback_connect(updateCpuActionCallbacks, updateActionEnergyCallback);
73 CpuEnergy::CpuEnergy(CpuPtr ptr)
77 power_range_watts_list = getWattsRangeList();
78 last_updated = surf_get_clock();
81 CpuEnergy::~CpuEnergy(){
83 xbt_dynar_t power_tuple = NULL;
84 xbt_dynar_foreach(power_range_watts_list, iter, power_tuple)
85 xbt_dynar_free(&power_tuple);
86 xbt_dynar_free(&power_range_watts_list);
91 * Computes the power consumed by the host according to the current pstate and processor load
94 double CpuEnergy::getCurrentWattsValue(double cpu_load)
96 xbt_dynar_t power_range_list = power_range_watts_list;
98 if (power_range_list == NULL)
100 XBT_DEBUG("No power range properties specified for host %s", cpu->getName());
103 /*xbt_assert(xbt_dynar_length(power_range_list) == xbt_dynar_length(cpu->p_powerPeakList),
104 "The number of power ranges in the properties does not match the number of pstates for host %s",
107 /* retrieve the power values associated with the current pstate */
108 xbt_dynar_t current_power_values = xbt_dynar_get_as(power_range_list, static_cast<CpuCas01Ptr>(cpu)->m_pstate, xbt_dynar_t);
110 /* min_power corresponds to the idle power (cpu load = 0) */
111 /* max_power is the power consumed at 100% cpu load */
112 double min_power = xbt_dynar_get_as(current_power_values, 0, double);
113 double max_power = xbt_dynar_get_as(current_power_values, 1, double);
114 double power_slope = max_power - min_power;
116 double current_power = min_power + cpu_load * power_slope;
118 XBT_DEBUG("[get_current_watts] min_power=%f, max_power=%f, slope=%f", min_power, max_power, power_slope);
119 XBT_DEBUG("[get_current_watts] Current power (watts) = %f, load = %f", current_power, cpu_load);
121 return current_power;
124 double CpuEnergy::getConsumedEnergy()
129 xbt_dynar_t CpuEnergy::getWattsRangeList()
131 xbt_dynar_t power_range_list;
132 xbt_dynar_t power_tuple;
133 int i = 0, pstate_nb=0;
134 xbt_dynar_t current_power_values;
135 double min_power, max_power;
137 if (cpu->getProperties() == NULL)
140 char* all_power_values_str = (char*)xbt_dict_get_or_null(cpu->getProperties(), "power_per_state");
142 if (all_power_values_str == NULL)
146 power_range_list = xbt_dynar_new(sizeof(xbt_dynar_t), NULL);
147 xbt_dynar_t all_power_values = xbt_str_split(all_power_values_str, ",");
149 pstate_nb = xbt_dynar_length(all_power_values);
150 for (i=0; i< pstate_nb; i++)
152 /* retrieve the power values associated with the current pstate */
153 current_power_values = xbt_str_split(xbt_dynar_get_as(all_power_values, i, char*), ":");
154 xbt_assert(xbt_dynar_length(current_power_values) > 1,
155 "Power properties incorrectly defined - could not retrieve min and max power values for host %s",
158 /* min_power corresponds to the idle power (cpu load = 0) */
159 /* max_power is the power consumed at 100% cpu load */
160 min_power = atof(xbt_dynar_get_as(current_power_values, 0, char*));
161 max_power = atof(xbt_dynar_get_as(current_power_values, 1, char*));
163 power_tuple = xbt_dynar_new(sizeof(double), NULL);
164 xbt_dynar_push_as(power_tuple, double, min_power);
165 xbt_dynar_push_as(power_tuple, double, max_power);
167 xbt_dynar_push_as(power_range_list, xbt_dynar_t, power_tuple);
168 xbt_dynar_free(¤t_power_values);
170 xbt_dynar_free(&all_power_values);
171 return power_range_list;