Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merging changes done by Steven, Samuel and Luka, regarding simulation of StarPU-MPI
[simgrid.git] / src / surf / virtual_machine.cpp
1 /* Copyright (c) 2013-2015. The SimGrid Team.
2  * All rights reserved.                                                     */
3
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. */
6
7 #include "cpu_cas01.hpp"
8 #include "virtual_machine.hpp"
9
10 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_vm, surf,
11                                 "Logging specific to the SURF VM module");
12
13 simgrid::surf::VMModel *surf_vm_model = NULL;
14
15 namespace simgrid {
16 namespace surf {
17
18 /*************
19  * Callbacks *
20  *************/
21
22 surf_callback(void, simgrid::surf::VirtualMachine*) VMCreatedCallbacks;
23 surf_callback(void, simgrid::surf::VirtualMachine*) VMDestructedCallbacks;
24 surf_callback(void, simgrid::surf::VirtualMachine*) VMStateChangedCallbacks;
25
26 /*********
27  * Model *
28  *********/
29
30 VMModel::vm_list_t VMModel::ws_vms;
31
32 /************
33  * Resource *
34  ************/
35
36 VirtualMachine::VirtualMachine(Model *model, const char *name, xbt_dict_t props,
37                         RoutingEdge *netElm, Cpu *cpu)
38 : Host(model, name, props, NULL, netElm, cpu)
39 {
40   VMModel::ws_vms.push_back(*this);
41
42   xbt_lib_set(host_lib, name, SURF_HOST_LEVEL, this);
43 }
44
45 /*
46  * A physical host does not disappear in the current SimGrid code, but a VM may
47  * disappear during a simulation.
48  */
49 VirtualMachine::~VirtualMachine()
50 {
51   surf_callback_emit(VMDestructedCallbacks, this);
52   VMModel::ws_vms.erase(VMModel::vm_list_t::s_iterator_to(*this));
53 }
54
55 void VirtualMachine::setState(e_surf_resource_state_t state){
56   Resource::setState(state);
57   surf_callback_emit(VMStateChangedCallbacks, this);
58 }
59
60 /*
61  * A surf level object will be useless in the upper layer. Returning the
62  * dict_elm of the host.
63  **/
64 surf_resource_t VirtualMachine::getPm()
65 {
66   return xbt_lib_get_elm_or_null(host_lib, p_subWs->getName());
67 }
68
69 /**********
70  * Action *
71  **********/
72
73 //FIME:: handle action cancel
74
75 }
76 }