3 #include <math.h> /* isfinite() */
5 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(simix);
7 static const char* request_names[] = {
8 #undef SIMIX_REQ_ENUM_ELEMENT
9 #define SIMIX_REQ_ENUM_ELEMENT(x) #x /* generate strings from the enumeration values */
11 #undef SIMIX_REQ_ENUM_ELEMENT
15 * \brief Returns a host given its name.
17 * \param name The name of the host to get
18 * \return The corresponding host
20 smx_host_t SIMIX_req_host_get_by_name(const char *name)
22 smx_req_t req = SIMIX_req_mine();
24 req->call = REQ_HOST_GET_BY_NAME;
25 req->host_get_by_name.name = name;
27 return req->host_get_by_name.result;
31 * \brief Returns the name of a host.
33 * \param host A SIMIX host
34 * \return The name of this host
36 const char* SIMIX_req_host_get_name(smx_host_t host)
38 smx_req_t req = SIMIX_req_mine();
40 req->call = REQ_HOST_GET_NAME;
41 req->host_get_name.host = host;
43 return req->host_get_name.result;
47 * \brief Returns a dict of the properties assigned to a host.
50 * \return The properties of this host
52 xbt_dict_t SIMIX_req_host_get_properties(smx_host_t host)
54 smx_req_t req = SIMIX_req_mine();
56 req->call = REQ_HOST_GET_PROPERTIES;
57 req->host_get_properties.host = host;
59 return req->host_get_properties.result;
63 * \brief Returns the speed of the processor.
65 * The speed returned does not take into account the current load on the machine.
66 * \param host A SIMIX host
67 * \return The speed of this host (in Mflop/s)
69 double SIMIX_req_host_get_speed(smx_host_t host)
71 smx_req_t req = SIMIX_req_mine();
73 req->call = REQ_HOST_GET_SPEED;
74 req->host_get_speed.host = host;
76 return req->host_get_speed.result;
80 * \brief Returns the available speed of the processor.
82 * \return Speed currently available (in Mflop/s)
84 double SIMIX_req_host_get_available_speed(smx_host_t host)
86 smx_req_t req = SIMIX_req_mine();
88 req->call = REQ_HOST_GET_AVAILABLE_SPEED;
89 req->host_get_available_speed.host = host;
91 return req->host_get_available_speed.result;
95 * \brief Returns the state of a host.
97 * Two states are possible: 1 if the host is active or 0 if it has crashed.
98 * \param host A SIMIX host
99 * \return 1 if the host is available, 0 otherwise
101 int SIMIX_req_host_get_state(smx_host_t host)
103 smx_req_t req = SIMIX_req_mine();
105 req->call = REQ_HOST_GET_STATE;
106 req->host_get_state.host = host;
107 SIMIX_request_push();
108 return req->host_get_state.result;
112 * \brief Returns the user data associated to a host.
114 * \param host SIMIX host
115 * \return the user data of this host
117 void* SIMIX_req_host_get_data(smx_host_t host)
119 smx_req_t req = SIMIX_req_mine();
121 req->call = REQ_HOST_GET_DATA;
122 req->host_get_data.host = host;
123 SIMIX_request_push();
124 return req->host_get_data.result;
128 * \brief Sets the user data associated to a host.
130 * The host must not have previous user data associated to it.
131 * \param A host SIMIX host
132 * \param data The user data to set
134 void SIMIX_req_host_set_data(smx_host_t host, void *data)
136 smx_req_t req = SIMIX_req_mine();
138 req->call = REQ_HOST_SET_DATA;
139 req->host_set_data.host = host;
140 req->host_set_data.data = data;
141 SIMIX_request_push();
144 /** \brief Creates an action that executes some computation of an host.
146 * This function creates a SURF action and allocates the data necessary
147 * to create the SIMIX action. It can raise a host_error exception if the host crashed.
149 * \param name Name of the execution action to create
150 * \param host SIMIX host where the action will be executed
151 * \param amount Computation amount (in bytes)
152 * \return A new SIMIX execution action
154 smx_action_t SIMIX_req_host_execute(const char *name, smx_host_t host,
155 double computation_amount,
158 /* checking for infinite values */
159 xbt_assert(isfinite(computation_amount), "computation_amount is not finite!");
160 xbt_assert(isfinite(priority), "priority is not finite!");
162 smx_req_t req = SIMIX_req_mine();
164 req->call = REQ_HOST_EXECUTE;
165 req->host_execute.name = name;
166 req->host_execute.host = host;
167 req->host_execute.computation_amount = computation_amount;
168 req->host_execute.priority = priority;
169 SIMIX_request_push();
170 return req->host_execute.result;
173 /** \brief Creates an action that may involve parallel computation on
174 * several hosts and communication between them.
176 * \param name Name of the execution action to create
177 * \param host_nb Number of hosts where the action will be executed
178 * \param host_list Array (of size host_nb) of hosts where the action will be executed
179 * \param computation_amount Array (of size host_nb) of computation amount of hosts (in bytes)
180 * \param communication_amount Array (of size host_nb * host_nb) representing the communication
181 * amount between each pair of hosts
182 * \param amount the SURF action amount
183 * \param rate the SURF action rate
184 * \return A new SIMIX execution action
186 smx_action_t SIMIX_req_host_parallel_execute(const char *name,
188 smx_host_t *host_list,
189 double *computation_amount,
190 double *communication_amount,
195 /* checking for infinite values */
196 for (i = 0 ; i < host_nb ; ++i) {
197 xbt_assert(isfinite(computation_amount[i]), "computation_amount[%d] is not finite!", i);
198 for (j = 0 ; j < host_nb ; ++j) {
199 xbt_assert(isfinite(communication_amount[i + host_nb * j]),
200 "communication_amount[%d+%d*%d] is not finite!", i, host_nb, j);
204 xbt_assert(isfinite(amount), "amount is not finite!");
205 xbt_assert(isfinite(rate), "rate is not finite!");
207 smx_req_t req = SIMIX_req_mine();
209 req->call = REQ_HOST_PARALLEL_EXECUTE;
210 req->host_parallel_execute.name = name;
211 req->host_parallel_execute.host_nb = host_nb;
212 req->host_parallel_execute.host_list = host_list;
213 req->host_parallel_execute.computation_amount = computation_amount;
214 req->host_parallel_execute.communication_amount = communication_amount;
215 req->host_parallel_execute.amount = amount;
216 req->host_parallel_execute.rate = rate;
217 SIMIX_request_push();
218 return req->host_parallel_execute.result;
222 * \brief Destroys an execution action.
224 * Destroys an action, freing its memory. This function cannot be called if there are a conditional waiting for it.
225 * \param action The execution action to destroy
227 void SIMIX_req_host_execution_destroy(smx_action_t execution)
229 smx_req_t req = SIMIX_req_mine();
231 req->call = REQ_HOST_EXECUTION_DESTROY;
232 req->host_execution_destroy.execution = execution;
233 SIMIX_request_push();
237 * \brief Cancels an execution action.
239 * This functions stops the execution. It calls a surf function.
240 * \param action The execution action to cancel
242 void SIMIX_req_host_execution_cancel(smx_action_t execution)
244 smx_req_t req = SIMIX_req_mine();
246 req->call = REQ_HOST_EXECUTION_CANCEL;
247 req->host_execution_cancel.execution = execution;
248 SIMIX_request_push();
252 * \brief Returns how much of an execution action remains to be done.
254 * \param Action The execution action
255 * \return The remaining amount
257 double SIMIX_req_host_execution_get_remains(smx_action_t execution)
259 smx_req_t req = SIMIX_req_mine();
261 req->call = REQ_HOST_EXECUTION_GET_REMAINS;
262 req->host_execution_get_remains.execution = execution;
263 SIMIX_request_push();
264 return req->host_execution_get_remains.result;
268 * \brief Returns the state of an execution action.
270 * \param execution The execution action
273 e_smx_state_t SIMIX_req_host_execution_get_state(smx_action_t execution)
275 smx_req_t req = SIMIX_req_mine();
277 req->call = REQ_HOST_EXECUTION_GET_STATE;
278 req->host_execution_get_state.execution = execution;
279 SIMIX_request_push();
280 return req->host_execution_get_state.result;
284 * \brief Changes the priority of an execution action.
286 * This functions changes the priority only. It calls a surf function.
287 * \param execution The execution action
288 * \param priority The new priority
290 void SIMIX_req_host_execution_set_priority(smx_action_t execution, double priority)
292 /* checking for infinite values */
293 xbt_assert(isfinite(priority), "priority is not finite!");
295 smx_req_t req = SIMIX_req_mine();
297 req->call = REQ_HOST_EXECUTION_SET_PRIORITY;
298 req->host_execution_set_priority.execution = execution;
299 req->host_execution_set_priority.priority = priority;
300 SIMIX_request_push();
304 * \brief Waits for the completion of an execution action and destroy it.
306 * \param execution The execution action
308 e_smx_state_t SIMIX_req_host_execution_wait(smx_action_t execution)
310 smx_req_t req = SIMIX_req_mine();
312 req->call = REQ_HOST_EXECUTION_WAIT;
313 req->host_execution_wait.execution = execution;
314 SIMIX_request_push();
315 return req->host_execution_wait.result;
319 * \brief Creates and runs a new SIMIX process.
321 * The structure and the corresponding thread are created and put in the list of ready processes.
323 * \param process the process created will be stored in this pointer
324 * \param name a name for the process. It is for user-level information and can be NULL.
325 * \param code the main function of the process
326 * \param data a pointer to any data one may want to attach to the new object. It is for user-level information and can be NULL.
327 * It can be retrieved with the function \ref SIMIX_req_process_get_data.
328 * \param hostname name of the host where the new agent is executed.
329 * \param argc first argument passed to \a code
330 * \param argv second argument passed to \a code
331 * \param properties the properties of the process
333 void SIMIX_req_process_create(smx_process_t *process, const char *name,
334 xbt_main_func_t code,
336 const char *hostname,
337 int argc, char **argv,
338 xbt_dict_t properties)
340 smx_req_t req = SIMIX_req_mine();
342 req->call = REQ_PROCESS_CREATE;
343 req->process_create.process = process;
344 req->process_create.name = name;
345 req->process_create.code = code;
346 req->process_create.data = data;
347 req->process_create.hostname = hostname;
348 req->process_create.argc = argc;
349 req->process_create.argv = argv;
350 req->process_create.properties = properties;
351 SIMIX_request_push();
354 /** \brief Kills a SIMIX process.
356 * This function simply kills a process.
358 * \param process poor victim
360 void SIMIX_req_process_kill(smx_process_t process)
362 smx_req_t req = SIMIX_req_mine();
364 req->call = REQ_PROCESS_KILL;
365 req->process_kill.process = process;
366 SIMIX_request_push();
369 /** \brief Kills all SIMIX processes.
371 void SIMIX_req_process_killall(void)
373 smx_req_t req = SIMIX_req_mine();
375 req->call = REQ_PROCESS_KILLALL;
376 SIMIX_request_push();
379 /** \brief Cleans up a SIMIX process.
380 * \param process poor victim (must have already been killed)
382 void SIMIX_req_process_cleanup(smx_process_t process)
384 smx_req_t req = SIMIX_req_mine();
386 req->call = REQ_PROCESS_CLEANUP;
387 req->process_cleanup.process = process;
388 SIMIX_request_push();
392 * \brief Migrates an agent to another location.
394 * This function changes the value of the host on which \a process is running.
396 * \param process the process to migrate
397 * \param source name of the previous host
398 * \param dest name of the new host
400 void SIMIX_req_process_change_host(smx_process_t process, smx_host_t dest)
402 smx_req_t req = SIMIX_req_mine();
404 req->call = REQ_PROCESS_CHANGE_HOST;
405 req->process_change_host.process = process;
406 req->process_change_host.dest = dest;
407 SIMIX_request_push();
411 * \brief Suspends a process.
413 * This function suspends the process by suspending the action
414 * it was waiting for completion.
416 * \param process a SIMIX process
418 void SIMIX_req_process_suspend(smx_process_t process)
420 xbt_assert(process, "Invalid parameters");
422 smx_req_t req = SIMIX_req_mine();
424 req->call = REQ_PROCESS_SUSPEND;
425 req->process_suspend.process = process;
426 SIMIX_request_push();
430 * \brief Resumes a suspended process.
432 * This function resumes a suspended process by resuming the action
433 * it was waiting for completion.
435 * \param process a SIMIX process
437 void SIMIX_req_process_resume(smx_process_t process)
439 smx_req_t req = SIMIX_req_mine();
441 req->call = REQ_PROCESS_RESUME;
442 req->process_resume.process = process;
443 SIMIX_request_push();
447 * \brief Returns the amount of SIMIX processes in the system
449 * Maestro internal process is not counted, only user code processes are
451 int SIMIX_req_process_count(void)
453 smx_req_t req = SIMIX_req_mine();
455 req->call = REQ_PROCESS_COUNT;
456 SIMIX_request_push();
457 return req->process_count.result;
461 * \brief Return the user data of a #smx_process_t.
463 * This functions checks whether \a process is a valid pointer or not and return the user data associated to \a process if it is possible.
464 * \param process SIMIX process
465 * \return A void pointer to the user data
467 void* SIMIX_req_process_get_data(smx_process_t process)
469 if (process == SIMIX_process_self()) {
470 /* avoid a request if this function is called by the process itself */
471 return SIMIX_process_self_get_data();
474 smx_req_t req = SIMIX_req_mine();
476 req->call = REQ_PROCESS_GET_DATA;
477 req->process_get_data.process = process;
478 SIMIX_request_push();
479 return req->process_get_data.result;
483 * \brief Set the user data of a #m_process_t.
485 * This functions checks whether \a process is a valid pointer or not and set the user data associated to \a process if it is possible.
486 * \param process SIMIX process
487 * \param data User data
489 void SIMIX_req_process_set_data(smx_process_t process, void *data)
491 if (process == SIMIX_process_self()) {
492 /* avoid a request if this function is called by the process itself */
493 SIMIX_process_self_set_data(data);
497 smx_req_t req = SIMIX_req_mine();
499 req->call = REQ_PROCESS_SET_DATA;
500 req->process_set_data.process = process;
501 req->process_set_data.data = data;
502 SIMIX_request_push();
507 * \brief Return the location on which an agent is running.
509 * This functions checks whether \a process is a valid pointer or not and return the m_host_t corresponding to the location on which \a process is running.
510 * \param process SIMIX process
513 smx_host_t SIMIX_req_process_get_host(smx_process_t process)
515 smx_req_t req = SIMIX_req_mine();
517 req->call = REQ_PROCESS_GET_HOST;
518 req->process_get_host.process = process;
519 SIMIX_request_push();
520 return req->process_get_host.result;
524 * \brief Return the name of an agent.
526 * This functions checks whether \a process is a valid pointer or not and return its name.
527 * \param process SIMIX process
528 * \return The process name
530 const char* SIMIX_req_process_get_name(smx_process_t process)
532 if (process == SIMIX_process_self()) {
533 /* avoid a request if this function is called by the process itself */
534 return process->name;
537 smx_req_t req = SIMIX_req_mine();
539 req->call = REQ_PROCESS_GET_NAME;
540 req->process_get_name.process = process;
541 SIMIX_request_push();
542 return req->process_get_name.result;
546 * \brief Returns true if the process is suspended .
548 * This checks whether a process is suspended or not by inspecting the task on which it was waiting for the completion.
549 * \param process SIMIX process
550 * \return 1, if the process is suspended, else 0.
552 int SIMIX_req_process_is_suspended(smx_process_t process)
554 smx_req_t req = SIMIX_req_mine();
556 req->call = REQ_PROCESS_IS_SUSPENDED;
557 req->process_is_suspended.process = process;
558 SIMIX_request_push();
559 return req->process_is_suspended.result;
562 /** \ingroup m_process_management
563 * \brief Return the properties
565 * This functions returns the properties associated with this process
567 xbt_dict_t SIMIX_req_process_get_properties(smx_process_t process)
569 smx_req_t req = SIMIX_req_mine();
571 req->call = REQ_PROCESS_GET_PROPERTIES;
572 req->process_get_properties.process = process;
573 SIMIX_request_push();
574 return req->process_get_properties.result;
577 /** \brief Creates a new sleep SIMIX action.
579 * This function creates a SURF action and allocates the data necessary
580 * to create the SIMIX action. It can raise a host_error exception if the
581 * host crashed. The default SIMIX name of the action is "sleep".
583 * \param duration Time duration of the sleep.
584 * \return A result telling whether the sleep was successful
586 e_smx_state_t SIMIX_req_process_sleep(double duration)
588 /* checking for infinite values */
589 xbt_assert(isfinite(duration), "duration is not finite!");
591 smx_req_t req = SIMIX_req_mine();
593 req->call = REQ_PROCESS_SLEEP;
594 req->process_sleep.duration = duration;
595 SIMIX_request_push();
596 return req->process_sleep.result;
600 * \brief Creates a new rendez-vous point
601 * \param name The name of the rendez-vous point
602 * \return The created rendez-vous point
604 smx_rdv_t SIMIX_req_rdv_create(const char *name)
606 smx_req_t req = SIMIX_req_mine();
608 req->call = REQ_RDV_CREATE;
609 req->rdv_create.name = name;
611 SIMIX_request_push();
612 return req->rdv_create.result;
617 * \brief Destroy a rendez-vous point
618 * \param name The rendez-vous point to destroy
620 void SIMIX_req_rdv_destroy(smx_rdv_t rdv)
622 smx_req_t req = SIMIX_req_mine();
624 req->call = REQ_RDV_DESTROY;
625 req->rdv_destroy.rdv = rdv;
627 SIMIX_request_push();
630 smx_rdv_t SIMIX_req_rdv_get_by_name(const char *name)
632 xbt_assert(name != NULL, "Invalid parameter for SIMIX_req_rdv_get_by_name (name is NULL)");
634 /* FIXME: this is a horrible lost of performance, so we hack it out by
635 * skipping the request (for now). It won't work on distributed but
636 * probably we will change MSG for that. */
638 smx_req_t req = SIMIX_req_mine();
639 req->call = REQ_RDV_GEY_BY_NAME;
640 req->rdv_get_by_name.name = name;
641 SIMIX_request_push();
642 return req->rdv_get_by_name.result;*/
644 return SIMIX_rdv_get_by_name(name);
648 * \brief counts the number of communication requests of a given host pending
649 * on a rendez-vous point
650 * \param rdv The rendez-vous point
651 * \param host The host to be counted
652 * \return The number of comm request pending in the rdv
654 int SIMIX_req_rdv_comm_count_by_host(smx_rdv_t rdv, smx_host_t host)
656 smx_req_t req = SIMIX_req_mine();
658 req->call = REQ_RDV_COMM_COUNT_BY_HOST;
659 req->rdv_comm_count_by_host.rdv = rdv;
660 req->rdv_comm_count_by_host.host = host;
662 SIMIX_request_push();
663 return req->rdv_comm_count_by_host.result;
667 * \brief returns the communication at the head of the rendez-vous
668 * \param rdv The rendez-vous point
669 * \return The communication or NULL if empty
671 smx_action_t SIMIX_req_rdv_get_head(smx_rdv_t rdv)
673 smx_req_t req = SIMIX_req_mine();
675 req->call = REQ_RDV_GET_HEAD;
676 req->rdv_get_head.rdv = rdv;
678 SIMIX_request_push();
679 return req->rdv_get_head.result;
682 void SIMIX_req_comm_send(smx_rdv_t rdv, double task_size, double rate,
683 void *src_buff, size_t src_buff_size,
684 int (*match_fun)(void *, void *), void *data,
687 /* checking for infinite values */
688 xbt_assert(isfinite(task_size), "task_size is not finite!");
689 xbt_assert(isfinite(rate), "rate is not finite!");
690 xbt_assert(isfinite(timeout), "timeout is not finite!");
692 xbt_assert(rdv, "No rendez-vous point defined for send");
695 /* the model-checker wants two separate requests */
696 smx_action_t comm = SIMIX_req_comm_isend(rdv, task_size, rate,
697 src_buff, src_buff_size, match_fun, data, 0);
698 SIMIX_req_comm_wait(comm, timeout);
701 smx_req_t req = SIMIX_req_mine();
703 req->call = REQ_COMM_SEND;
704 req->comm_send.rdv = rdv;
705 req->comm_send.task_size = task_size;
706 req->comm_send.rate = rate;
707 req->comm_send.src_buff = src_buff;
708 req->comm_send.src_buff_size = src_buff_size;
709 req->comm_send.match_fun = match_fun;
710 req->comm_send.data = data;
711 req->comm_send.timeout = timeout;
713 SIMIX_request_push();
717 smx_action_t SIMIX_req_comm_isend(smx_rdv_t rdv, double task_size, double rate,
718 void *src_buff, size_t src_buff_size,
719 int (*match_fun)(void *, void *), void *data,
722 /* checking for infinite values */
723 xbt_assert(isfinite(task_size), "task_size is not finite!");
724 xbt_assert(isfinite(rate), "rate is not finite!");
726 xbt_assert(rdv, "No rendez-vous point defined for isend");
728 smx_req_t req = SIMIX_req_mine();
730 req->call = REQ_COMM_ISEND;
731 req->comm_isend.rdv = rdv;
732 req->comm_isend.task_size = task_size;
733 req->comm_isend.rate = rate;
734 req->comm_isend.src_buff = src_buff;
735 req->comm_isend.src_buff_size = src_buff_size;
736 req->comm_isend.match_fun = match_fun;
737 req->comm_isend.data = data;
738 req->comm_isend.detached = detached;
740 SIMIX_request_push();
741 return req->comm_isend.result;
744 void SIMIX_req_comm_recv(smx_rdv_t rdv, void *dst_buff, size_t * dst_buff_size,
745 int (*match_fun)(void *, void *), void *data, double timeout)
747 xbt_assert(isfinite(timeout), "timeout is not finite!");
748 xbt_assert(rdv, "No rendez-vous point defined for recv");
751 /* the model-checker wants two separate requests */
752 smx_action_t comm = SIMIX_req_comm_irecv(rdv, dst_buff, dst_buff_size,
754 SIMIX_req_comm_wait(comm, timeout);
757 smx_req_t req = SIMIX_req_mine();
759 req->call = REQ_COMM_RECV;
760 req->comm_recv.rdv = rdv;
761 req->comm_recv.dst_buff = dst_buff;
762 req->comm_recv.dst_buff_size = dst_buff_size;
763 req->comm_recv.match_fun = match_fun;
764 req->comm_recv.data = data;
765 req->comm_recv.timeout = timeout;
767 SIMIX_request_push();
771 smx_action_t SIMIX_req_comm_irecv(smx_rdv_t rdv, void *dst_buff, size_t * dst_buff_size,
772 int (*match_fun)(void *, void *), void *data)
774 xbt_assert(rdv, "No rendez-vous point defined for irecv");
776 smx_req_t req = SIMIX_req_mine();
778 req->call = REQ_COMM_IRECV;
779 req->comm_irecv.rdv = rdv;
780 req->comm_irecv.dst_buff = dst_buff;
781 req->comm_irecv.dst_buff_size = dst_buff_size;
782 req->comm_irecv.match_fun = match_fun;
783 req->comm_irecv.data = data;
785 SIMIX_request_push();
786 return req->comm_irecv.result;
789 void SIMIX_req_comm_destroy(smx_action_t comm)
791 xbt_assert(comm, "Invalid parameter");
793 /* FIXME remove this request type: comms are auto-destroyed now,
794 * but what happens with unfinished comms? */
797 smx_req_t req = SIMIX_req_mine();
799 req->call = REQ_COMM_DESTROY;
800 req->comm_destroy.comm = comm;
802 SIMIX_request_push();
806 void SIMIX_req_comm_cancel(smx_action_t comm)
808 smx_req_t req = SIMIX_req_mine();
810 req->call = REQ_COMM_CANCEL;
811 req->comm_cancel.comm = comm;
813 SIMIX_request_push();
816 unsigned int SIMIX_req_comm_waitany(xbt_dynar_t comms)
818 smx_req_t req = SIMIX_req_mine();
820 req->call = REQ_COMM_WAITANY;
821 req->comm_waitany.comms = comms;
823 SIMIX_request_push();
824 return req->comm_waitany.result;
827 int SIMIX_req_comm_testany(xbt_dynar_t comms)
829 smx_req_t req = SIMIX_req_mine();
830 if (xbt_dynar_length(comms)==0)
833 req->call = REQ_COMM_TESTANY;
834 req->comm_testany.comms = comms;
836 SIMIX_request_push();
837 return req->comm_testany.result;
840 void SIMIX_req_comm_wait(smx_action_t comm, double timeout)
842 xbt_assert(isfinite(timeout), "timeout is not finite!");
844 smx_req_t req = SIMIX_req_mine();
846 req->call = REQ_COMM_WAIT;
847 req->comm_wait.comm = comm;
848 req->comm_wait.timeout = timeout;
850 SIMIX_request_push();
855 * \brief Set the category of an action.
857 * This functions changes the category only. It calls a surf function.
858 * \param execution The execution action
859 * \param category The tracing category
861 void SIMIX_req_set_category(smx_action_t action, const char *category)
863 if (category == NULL) {
867 smx_req_t req = SIMIX_req_mine();
869 req->call = REQ_SET_CATEGORY;
870 req->set_category.action = action;
871 req->set_category.category = category;
873 SIMIX_request_push();
877 int SIMIX_req_comm_test(smx_action_t comm)
879 smx_req_t req = SIMIX_req_mine();
881 req->call = REQ_COMM_TEST;
882 req->comm_test.comm = comm;
884 SIMIX_request_push();
885 return req->comm_test.result;
888 double SIMIX_req_comm_get_remains(smx_action_t comm)
890 smx_req_t req = SIMIX_req_mine();
892 req->call = REQ_COMM_GET_REMAINS;
893 req->comm_get_remains.comm = comm;
895 SIMIX_request_push();
896 return req->comm_get_remains.result;
899 e_smx_state_t SIMIX_req_comm_get_state(smx_action_t comm)
901 smx_req_t req = SIMIX_req_mine();
903 req->call = REQ_COMM_GET_STATE;
904 req->comm_get_state.comm = comm;
906 SIMIX_request_push();
907 return req->comm_get_state.result;
910 void *SIMIX_req_comm_get_src_data(smx_action_t comm)
912 smx_req_t req = SIMIX_req_mine();
914 req->call = REQ_COMM_GET_SRC_DATA;
915 req->comm_get_src_data.comm = comm;
917 SIMIX_request_push();
918 return req->comm_get_src_data.result;
921 void *SIMIX_req_comm_get_dst_data(smx_action_t comm)
923 smx_req_t req = SIMIX_req_mine();
925 req->call = REQ_COMM_GET_DST_DATA;
926 req->comm_get_dst_data.comm = comm;
928 SIMIX_request_push();
929 return req->comm_get_dst_data.result;
932 smx_process_t SIMIX_req_comm_get_src_proc(smx_action_t comm)
934 smx_req_t req = SIMIX_req_mine();
936 req->call = REQ_COMM_GET_SRC_PROC;
937 req->comm_get_src_proc.comm = comm;
939 SIMIX_request_push();
940 return req->comm_get_src_proc.result;
943 smx_process_t SIMIX_req_comm_get_dst_proc(smx_action_t comm)
945 smx_req_t req = SIMIX_req_mine();
947 req->call = REQ_COMM_GET_DST_PROC;
948 req->comm_get_dst_proc.comm = comm;
950 SIMIX_request_push();
951 return req->comm_get_dst_proc.result;
954 #ifdef HAVE_LATENCY_BOUND_TRACKING
955 int SIMIX_req_comm_is_latency_bounded(smx_action_t comm)
957 smx_req_t req = SIMIX_req_mine();
959 req->call = REQ_COMM_IS_LATENCY_BOUNDED;
960 req->comm_is_latency_bounded.comm = comm;
962 SIMIX_request_push();
963 return req->comm_is_latency_bounded.result;
967 smx_mutex_t SIMIX_req_mutex_init(void)
969 smx_req_t req = SIMIX_req_mine();
971 req->call = REQ_MUTEX_INIT;
973 SIMIX_request_push();
974 return req->mutex_init.result;
977 void SIMIX_req_mutex_destroy(smx_mutex_t mutex)
979 smx_req_t req = SIMIX_req_mine();
981 req->call = REQ_MUTEX_DESTROY;
982 req->mutex_destroy.mutex = mutex;
984 SIMIX_request_push();
987 void SIMIX_req_mutex_lock(smx_mutex_t mutex)
989 smx_req_t req = SIMIX_req_mine();
991 req->call = REQ_MUTEX_LOCK;
992 req->mutex_lock.mutex = mutex;
994 SIMIX_request_push();
997 int SIMIX_req_mutex_trylock(smx_mutex_t mutex)
999 smx_req_t req = SIMIX_req_mine();
1001 req->call = REQ_MUTEX_TRYLOCK;
1002 req->mutex_trylock.mutex = mutex;
1004 SIMIX_request_push();
1005 return req->mutex_trylock.result;
1008 void SIMIX_req_mutex_unlock(smx_mutex_t mutex)
1010 smx_req_t req = SIMIX_req_mine();
1012 req->call = REQ_MUTEX_UNLOCK;
1013 req->mutex_unlock.mutex = mutex;
1015 SIMIX_request_push();
1019 smx_cond_t SIMIX_req_cond_init(void)
1021 smx_req_t req = SIMIX_req_mine();
1023 req->call = REQ_COND_INIT;
1025 SIMIX_request_push();
1026 return req->cond_init.result;
1029 void SIMIX_req_cond_destroy(smx_cond_t cond)
1031 smx_req_t req = SIMIX_req_mine();
1033 req->call = REQ_COND_DESTROY;
1034 req->cond_destroy.cond = cond;
1036 SIMIX_request_push();
1039 void SIMIX_req_cond_signal(smx_cond_t cond)
1041 smx_req_t req = SIMIX_req_mine();
1043 req->call = REQ_COND_SIGNAL;
1044 req->cond_signal.cond = cond;
1046 SIMIX_request_push();
1049 void SIMIX_req_cond_wait(smx_cond_t cond, smx_mutex_t mutex)
1051 smx_req_t req = SIMIX_req_mine();
1053 req->call = REQ_COND_WAIT;
1054 req->cond_wait.cond = cond;
1055 req->cond_wait.mutex = mutex;
1057 SIMIX_request_push();
1060 void SIMIX_req_cond_wait_timeout(smx_cond_t cond,
1064 xbt_assert(isfinite(timeout), "timeout is not finite!");
1066 smx_req_t req = SIMIX_req_mine();
1068 req->call = REQ_COND_WAIT_TIMEOUT;
1069 req->cond_wait_timeout.cond = cond;
1070 req->cond_wait_timeout.mutex = mutex;
1071 req->cond_wait_timeout.timeout = timeout;
1073 SIMIX_request_push();
1076 void SIMIX_req_cond_broadcast(smx_cond_t cond)
1078 smx_req_t req = SIMIX_req_mine();
1080 req->call = REQ_COND_BROADCAST;
1081 req->cond_broadcast.cond = cond;
1083 SIMIX_request_push();
1087 smx_sem_t SIMIX_req_sem_init(int capacity)
1089 smx_req_t req = SIMIX_req_mine();
1091 req->call = REQ_SEM_INIT;
1092 req->sem_init.capacity = capacity;
1094 SIMIX_request_push();
1095 return req->sem_init.result;
1098 void SIMIX_req_sem_destroy(smx_sem_t sem)
1100 smx_req_t req = SIMIX_req_mine();
1102 req->call = REQ_SEM_DESTROY;
1103 req->sem_destroy.sem = sem;
1105 SIMIX_request_push();
1108 void SIMIX_req_sem_release(smx_sem_t sem)
1110 smx_req_t req = SIMIX_req_mine();
1112 req->call = REQ_SEM_RELEASE;
1113 req->sem_release.sem = sem;
1115 SIMIX_request_push();
1118 int SIMIX_req_sem_would_block(smx_sem_t sem)
1120 smx_req_t req = SIMIX_req_mine();
1122 req->call = REQ_SEM_WOULD_BLOCK;
1123 req->sem_would_block.sem = sem;
1125 SIMIX_request_push();
1126 return req->sem_would_block.result;
1129 void SIMIX_req_sem_acquire(smx_sem_t sem)
1131 smx_req_t req = SIMIX_req_mine();
1133 req->call = REQ_SEM_ACQUIRE;
1134 req->sem_acquire.sem = sem;
1136 SIMIX_request_push();
1139 void SIMIX_req_sem_acquire_timeout(smx_sem_t sem, double timeout)
1141 xbt_assert(isfinite(timeout), "timeout is not finite!");
1143 smx_req_t req = SIMIX_req_mine();
1145 req->call = REQ_SEM_ACQUIRE_TIMEOUT;
1146 req->sem_acquire_timeout.sem = sem;
1147 req->sem_acquire_timeout.timeout = timeout;
1149 SIMIX_request_push();
1152 int SIMIX_req_sem_get_capacity(smx_sem_t sem)
1154 smx_req_t req = SIMIX_req_mine();
1156 req->call = REQ_SEM_GET_CAPACITY;
1157 req->sem_get_capacity.sem = sem;
1159 SIMIX_request_push();
1160 return req->sem_get_capacity.result;
1162 /* ************************************************************************** */
1164 /** @brief returns a printable string representing the request kind */
1165 const char *SIMIX_request_name(int kind) {
1166 return request_names[kind];