- XBT_DEBUG("Duration set to %f", surf_min);
-
- NOW = NOW + surf_min;
- /* FIXME: model_list or model_list_invoke? revisit here later */
- /* sequential version */
- xbt_dynar_foreach(all_existing_models, iter, model) {
- model->updateActionsState(NOW, surf_min);
- }
-
- TRACE_paje_dump_buffer (0);
-
- return surf_min;
-}
-
-void routing_get_route_and_latency(sg_netcard_t src, sg_netcard_t dst,
- xbt_dynar_t * route, double *latency){
- routing_platf->getRouteAndLatency(src, dst, route, latency);
-}
-
-/*********
- * MODEL *
- *********/
-
-surf_host_model_t surf_host_get_model(sg_host_t host)
-{
- simgrid::surf::Host* surf_host =
- (simgrid::surf::Host*) host->extension<simgrid::surf::Host>();
- return (surf_host_model_t) surf_host->getModel();
-}
-
-surf_action_t surf_model_extract_done_action_set(surf_model_t model){
- if (model->getDoneActionSet()->empty())
- return NULL;
- surf_action_t res = &model->getDoneActionSet()->front();
- model->getDoneActionSet()->pop_front();
- return res;
-}
-
-surf_action_t surf_model_extract_failed_action_set(surf_model_t model){
- if (model->getFailedActionSet()->empty())
- return NULL;
- surf_action_t res = &model->getFailedActionSet()->front();
- model->getFailedActionSet()->pop_front();
- return res;
-}
-
-surf_action_t surf_model_extract_ready_action_set(surf_model_t model){
- if (model->getReadyActionSet()->empty())
- return NULL;
- surf_action_t res = &model->getReadyActionSet()->front();
- model->getReadyActionSet()->pop_front();
- return res;
-}
-
-surf_action_t surf_model_extract_running_action_set(surf_model_t model){
- if (model->getRunningActionSet()->empty())
- return NULL;
- surf_action_t res = &model->getRunningActionSet()->front();
- model->getRunningActionSet()->pop_front();
- return res;
-}
-
-int surf_model_running_action_set_size(surf_model_t model){
- return model->getRunningActionSet()->size();
-}
-
-surf_action_t surf_host_model_execute_parallel_task(surf_host_model_t model,
- int host_nb,
- sg_host_t *host_list,
- double *flops_amount,
- double *bytes_amount,
- double rate){
- return static_cast<simgrid::surf::Action*>(
- model->executeParallelTask(host_nb, host_list, flops_amount, bytes_amount, rate));
-}
-
-xbt_dynar_t surf_host_model_get_route(surf_host_model_t /*model*/,
- sg_host_t src, sg_host_t dst){
- xbt_dynar_t route = NULL;
- routing_platf->getRouteAndLatency(
- get_casted_host(src)->p_netElm,
- get_casted_host(dst)->p_netElm, &route, NULL);
- return route;
-}
-
-void surf_vm_model_create(const char *name, sg_host_t ind_phys_host){
- surf_vm_model->createVM(name, ind_phys_host);
-}
-
-surf_action_t surf_network_model_communicate(surf_network_model_t model, sg_host_t src, sg_host_t dst, double size, double rate){
- return model->communicate(src->pimpl_netcard, dst->pimpl_netcard, size, rate);
-}
-
-const char *surf_resource_name(surf_cpp_resource_t resource){
- return resource->getName();
-}
-
-surf_action_t surf_host_sleep(sg_host_t host, double duration){
- return host->pimpl_cpu->sleep(duration);
-}
-
-xbt_dict_t sg_host_get_properties(sg_host_t host) {
- return get_casted_host(host)->getProperties();
-}
-
-double surf_host_get_available_speed(sg_host_t host){
- return host->pimpl_cpu->getAvailableSpeed();
-}
-
-double surf_host_get_current_power_peak(sg_host_t host){
- return host->pimpl_cpu->getCurrentPowerPeak();
-}
-
-double surf_host_get_power_peak_at(sg_host_t host, int pstate_index){
- return host->pimpl_cpu->getPowerPeakAt(pstate_index);
-}
-
-
-xbt_dict_t surf_host_get_mounted_storage_list(sg_host_t host){
- return get_casted_host(host)->getMountedStorageList();
-}
-
-xbt_dynar_t surf_host_get_attached_storage_list(sg_host_t host){
- return get_casted_host(host)->getAttachedStorageList();
-}
-
-surf_action_t surf_host_open(sg_host_t host, const char* fullpath){
- return get_casted_host(host)->open(fullpath);
-}
-
-surf_action_t surf_host_close(sg_host_t host, surf_file_t fd){
- return get_casted_host(host)->close(fd);
-}
-
-int surf_host_unlink(sg_host_t host, surf_file_t fd){
- return get_casted_host(host)->unlink(fd);
-}
-
-size_t surf_host_get_size(sg_host_t host, surf_file_t fd){
- return get_casted_host(host)->getSize(fd);
-}
-
-surf_action_t surf_host_read(sg_host_t host, surf_file_t fd, sg_size_t size){
- return get_casted_host(host)->read(fd, size);
-}
-
-surf_action_t surf_host_write(sg_host_t host, surf_file_t fd, sg_size_t size){
- return get_casted_host(host)->write(fd, size);
-}
-
-xbt_dynar_t surf_host_get_info(sg_host_t host, surf_file_t fd){
- return get_casted_host(host)->getInfo(fd);
-}
-
-size_t surf_host_file_tell(sg_host_t host, surf_file_t fd){
- return get_casted_host(host)->fileTell(fd);
-}
-
-int surf_host_file_seek(sg_host_t host, surf_file_t fd,
- sg_offset_t offset, int origin){
- return get_casted_host(host)->fileSeek(fd, offset, origin);
-}
-
-int surf_host_file_move(sg_host_t host, surf_file_t fd, const char* fullpath){
- return get_casted_host(host)->fileMove(fd, fullpath);
-}
-
-xbt_dynar_t surf_host_get_vms(sg_host_t host){
- xbt_dynar_t vms = get_casted_host(host)->getVms();
- xbt_dynar_t vms_ = xbt_dynar_new(sizeof(sg_host_t), NULL);
- unsigned int cpt;
- simgrid::surf::VirtualMachine *vm;
- xbt_dynar_foreach(vms, cpt, vm) {
- // TODO, use a backlink from simgrid::surf::Host to simgrid::Host
- sg_host_t vm_ = (sg_host_t) xbt_dict_get_elm_or_null(host_list, vm->getName());
- xbt_dynar_push(vms_, &vm_);
- }
- xbt_dynar_free(&vms);
- return vms_;
-}
-
-void surf_host_get_params(sg_host_t host, vm_params_t params){
- get_casted_host(host)->getParams(params);
-}