Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
For win64 it is cast unsigned long long.
[simgrid.git] / src / xbt / win32_ucontext.c
index cbbe8eb..757eb43 100644 (file)
  *      Lesser General Public License for more details.\r
  *\r
  *      You should have received a copy of the GNU Lesser General Public\r
- *      License along with QueueUserAPCEx in the file COPYING.LIB;\r
+ *      License along with SimGrid in the file LICENSE-LGPL-2.1;\r
  *      if not, write to the Free Software Foundation, Inc.,\r
  *      59 Temple Place - Suite 330, Boston, MA 02111-1307, USA\r
  */  \r
     \r
 #include "win32_ucontext.h"\r
 int getcontext(ucontext_t * ucp) \r
-{
-  \rint ret;
-  \r\r
+{\r
+  int ret;\r
+  \r
       /* Retrieve the full machine context */ \r
-      ucp->uc_mcontext.ContextFlags = CONTEXT_FULL;
-  \rret = GetThreadContext(GetCurrentThread(), &ucp->uc_mcontext);
-  \rreturn (ret == 0) ? -1 : 0;
-\r}
-
-\r\rint setcontext(const ucontext_t * ucp) \r
-{
-  \rint ret;
-  \r\r
+      ucp->uc_mcontext.ContextFlags = CONTEXT_FULL;\r
+  ret = GetThreadContext(GetCurrentThread(), &ucp->uc_mcontext);\r
+  return (ret == 0) ? -1 : 0;\r
+}\r
+\r
+int setcontext(const ucontext_t * ucp) \r
+{\r
+  int ret;\r
+  \r
       /* Restore the full machine context (already set) */ \r
-      ret = SetThreadContext(GetCurrentThread(), &ucp->uc_mcontext);
-  \rreturn (ret == 0) ? -1 : 0;
-\r}
-
-\r\rint makecontext(ucontext_t * ucp, void (*func) (), int argc, ...) \r
-{
-  \rint i;
-  \rva_list ap;
-  \rchar *sp;
-  \r\r
+      ret = SetThreadContext(GetCurrentThread(), &ucp->uc_mcontext);\r
+  return (ret == 0) ? -1 : 0;\r
+}\r
+\r
+int makecontext(ucontext_t * ucp, void (*func) (), int argc, ...) \r
+{\r
+  int i;\r
+  va_list ap;\r
+  char *sp;\r
+  \r
       /* Stack grows down */ \r
-      sp = (char *) (size_t) ucp->uc_stack.ss_sp + ucp->uc_stack.ss_size;
-  \r\r
+      sp = (char *) (size_t) ucp->uc_stack.ss_sp + ucp->uc_stack.ss_size;\r
+  \r
       /* Reserve stack space for the arguments (maximum possible: argc*(8 bytes per argument)) */ \r
-      sp -= argc * 8;
-  \rif (sp < (char *) ucp->uc_stack.ss_sp) {
-    \r\r
+      sp -= argc * 8;\r
+  if (sp < (char *) ucp->uc_stack.ss_sp) {\r
+    \r
         /* errno = ENOMEM; */ \r
-        return -1;
-  \r}
-  \r\r
-      /* Set the instruction and the stack pointer */ \r
-      ucp->uc_mcontext.Eip = (unsigned long) func;
-  \rucp->uc_mcontext.Esp = (unsigned long) sp - 4;
-  \r\r
+        return -1;\r
+  }\r
+  \r
+      /* Set the instruction and the stack pointer */\r
+  #ifdef I_X86_\r
+  ucp->uc_mcontext.Eip = (unsigned long) func;\r
+  ucp->uc_mcontext.Esp = (unsigned long) sp - 4;\r
+  #endif\r
+  #ifdef _IA64_\r
+  #  error "_IA64_"\r
+  #endif\r
+  #ifdef _AMD64_\r
+  ucp->uc_mcontext.Rip = (unsigned long long) func;\r
+  ucp->uc_mcontext.Rsp = (unsigned long long) sp - 8;\r
+  #endif\r
+\r
       /* Save/Restore the full machine context */ \r
-      ucp->uc_mcontext.ContextFlags = CONTEXT_FULL;
-  \r\r
+      ucp->uc_mcontext.ContextFlags = CONTEXT_FULL;\r
+  \r
       /* Copy the arguments */ \r
-      va_start(ap, argc);
-  \rfor (i = 0; i < argc; i++) {
-    \rmemcpy(sp, ap, 8);
-    \rap += 8;
-    \rsp += 8;
-  \r}
-  \rva_end(ap);
-  \rreturn 0;
-\r}
-
-\r\rint swapcontext(ucontext_t * oucp, const ucontext_t * ucp) \r
-{
-  \rint ret;
-  \rif ((oucp == NULL) || (ucp == NULL)) {
-    \r\r
+      va_start(ap, argc);\r
+  for (i = 0; i < argc; i++) {\r
+    memcpy(sp, ap, 8);\r
+    ap += 8;\r
+    sp += 8;\r
+  }\r
+  va_end(ap);\r
+  return 0;\r
+}\r
+\r
+int swapcontext(ucontext_t * oucp, const ucontext_t * ucp) \r
+{\r
+  int ret;\r
+  if ((oucp == NULL) || (ucp == NULL)) {\r
+    \r
         /*errno = EINVAL; */ \r
-        return -1;
-  \r}
-  \rret = getcontext(oucp);
-  \rif (ret == 0) {
-    \rret = setcontext(ucp);
-  \r}
-  \rreturn ret;
-\r}
-
-\r\r\r
+        return -1;\r
+  }\r
+  ret = getcontext(oucp);\r
+  if (ret == 0) {\r
+    ret = setcontext(ucp);\r
+  }\r
+  return ret;\r
+}\r
+\r