- rb_process_bind(ruby_process,process);
- process->name = xbt_strdup(name);
- // Host
- m_host_t host = MSG_get_host_by_name(RSTRING(ht_name)->ptr);
- process->simdata->m_host = host;
-
- if(!(process->simdata->m_host)) { // Not Binded
- free(process->simdata);
- free(process->data);
- free(process);
- rb_raise(rb_eRuntimeError,"Host not bound while creating native process");
- }
-
- process->simdata->PID = msg_global->PID++;
-
- DEBUG7("fill in process %s/%s (pid=%d) %p (sd=%p , host=%p, host->sd=%p)",
- process->name , process->simdata->m_host->name,process->simdata->PID,
- process,process->simdata, process->simdata->m_host,
- process->simdata->m_host->simdata);
-
- /* FIXME: that's mainly for debugging. We could only allocate this if XBT_LOG_ISENABLED(ruby,debug) is true since I guess this leaks */
- char **argv=xbt_new(char*,2);
- argv[0] = bprintf("%s@%s",process->name,process->simdata->m_host->simdata->smx_host->name);
- argv[1] = NULL;
- process->simdata->s_process =
- SIMIX_process_create(process->name,
- (xbt_main_func_t)ruby_process,
- (void *) process,
- process->simdata->m_host->simdata->smx_host->name,
- 1,argv,NULL);
-
- DEBUG1("context created (s_process=%p)",process->simdata->s_process);
-
- if (SIMIX_process_self()) { // SomeOne Created Me !!
- process->simdata->PPID = MSG_process_get_PID(SIMIX_process_self()->data);
- } else {
- process->simdata->PPID = -1;
- }
- process->simdata->last_errno = MSG_OK;
- // let's Add the Process to the list of the Simulation's Processes
- xbt_fifo_unshift(msg_global->process_list,process);