arch/all-mingw32/exec/shutdowna.c

   1 /*
   2     Copyright © 1995-2010, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: ShutdownA() - Shut down the operating system, Windows-hosted implementation.
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10
  11 #include "exec_intern.h"
  12
  13 AROS_LH1(ULONG, ShutdownA,
  14          AROS_LHA(ULONG, action, D0),
  15          struct ExecBase *, SysBase, 173, Exec)
  16 {
  17     AROS_LIBFUNC_INIT
  18
  19     /* WinAPI CreateProcess() call may silently abort if scheduler attempts task switching
  20        while it's running. There's no sense in this beyond this point, so we simply Disable() */
  21     Disable();
  22
  23     switch(action)
  24     {
  25     case SD_ACTION_POWEROFF:
  26         PD(SysBase).ExitProcess(0);
  27         break;
  28
  29     case SD_ACTION_COLDREBOOT:
  30         PD(SysBase).Reboot(FALSE);
  31         break;
  32     }
  33
  34     Enable();
  35     return 0;
  36
  37     AROS_LIBFUNC_EXIT
  38 }