[Lua] Removed lua simulation support

[simgrid.git] / src / bindings / lua / lua_platf.c

diff --git a/src/bindings/lua/lua_platf.c b/src/bindings/lua/lua_platf.c
index d953dfc..f8733f9 100644 (file)
--- a/src/bindings/lua/lua_platf.c
+++ b/src/bindings/lua/lua_platf.c
@@ -177,10 +177,10 @@ int console_add_host(lua_State *L) {
   lua_pop(L, 1);
 
   // get power value
-  lua_pushstring(L, "power");
+  lua_pushstring(L, "speed");
   type = lua_gettable(L, -2);
   if (type != LUA_TSTRING && type != LUA_TNUMBER) {
-    XBT_ERROR("Attribute 'power' must be specified for host and must either be a string (in the correct format; check documentation) or a number.");
+    XBT_ERROR("Attribute 'speed' must be specified for host and must either be a string (in the correct format; check documentation) or a number.");
   }
   host.speed_peak = xbt_dynar_new(sizeof(double), NULL);
   xbt_dynar_push_as(host.speed_peak, double, get_cpu_speed(lua_tostring(L, -1)));
@@ -620,3 +620,33 @@ void sglua_register_platf_functions(lua_State* L)
   lua_pop(L, 1);                   /* -- */
 }
 
+void sglua_register_routing_constants(lua_State* L)
+{
+  lua_getglobal(L, "simgrid");     /* simgrid */
+  lua_newtable(L);                 /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "Cluster");    /* simgrid simgrid.routing Cluster */
+  lua_setfield(L, -2, "CLUSTER");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "Dijkstra");    /* simgrid simgrid.routing Dijkstra */
+  lua_setfield(L, -2, "DIJKSTRA");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "DijkstraCache");    /* simgrid simgrid.routing DijkstraCache */
+  lua_setfield(L, -2, "DIJKSTRA_CACHE");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "Floyd");    /* simgrid simgrid.routing Floyd */
+  lua_setfield(L, -2, "FLOYD");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "Full");       /* simgrid simgrid.routing Full */
+  lua_setfield(L, -2, "FULL");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "None");    /* simgrid simgrid.routing None */
+  lua_setfield(L, -2, "NONE");     /* simgrid simgrid.routing */
+
+  lua_pushstring(L, "Vivaldi");    /* simgrid simgrid.routing Vivaldi */
+  lua_setfield(L, -2, "FULL");     /* simgrid simgrid.routing */
+
+  lua_setfield(L, -2, "routing");  /* simgrid */
+
+  lua_pop(L, 1);                   /* -- */
+}