+ xbt_assert2(pd,"process '%s' on '%s' didn't run gras_process_init! (ie, gras_init)",
+ MSG_process_get_name(p),MSG_host_get_name(MSG_process_get_host(p)));
+
+ return gras_libdata_by_name_from_procdata(name, pd);
+}
+
+const char* xbt_procname(void) {
+ const char *res = NULL;
+ m_process_t process = MSG_process_self();
+ if ((process != NULL) && (process->simdata))
+ res = MSG_process_get_name(process);
+ if (res)
+ return res;
+ else
+ return "";
+}
+
+long int gras_os_getpid(void) {
+ m_process_t process = MSG_process_self();
+ if ((process != NULL) && (process->simdata))
+ return (long int)MSG_process_get_PID(MSG_process_self());
+ else
+ return (long int)0;
+}