Можно ли мгновенно выключить компьютер?

[The_Darkness]

ща поищу где-то пример валялся =)

Буду премного благодарен

[Ring0Sn]

Сообщение от JTG

Естевственно возможно, из режима пользователя - через ntShutdownSystem, ща поищу где-то пример валялся =)

SHUTDOWN_ACTION = (ShutdownNoReboot, ShutdownReboot, ShutdownPowerOff);

function NtShutdownSystem(Action: SHUTDOWN_ACTION): DWord; stdcall;
                                               external 'NTDLL.DLL';

Она вроде по обычному выключает, или нет oO?

[JTG]

Она выключает типо выключили из розетки, по крайней мере если заюзать системный сервис NtShutdownSystem.

[B_N]

NtShutdownSystem выключает так же, как и ExitWindowsEx, только "без предупреждения".

[JTG]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

  _SHUTDOWN_ACTION = (
    ShutdownNoReboot,
    ShutdownReboot,
    ShutdownPowerOff);
  SHUTDOWN_ACTION = _SHUTDOWN_ACTION;
  TShutdownAction = SHUTDOWN_ACTION;

  NTSTATUS = Longint;
  PNTSTATUS = ^NTSTATUS;
  TNTStatus = NTSTATUS;

  function  NtShutdownSystem(Action : SHUTDOWN_ACTION): NTSTATUS; stdcall; external 'ntdll.dll';

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var   
  hToken: THandle;
  tkp, prevst: TTokenPrivileges;   
  rl: DWORD;   
begin
  OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, hToken);

  LookupPrivilegeValue(nil, 'SeShutdownPrivilege', tkp.Privileges[0].Luid);
  tkp.PrivilegeCount := 1;
  tkp.Privileges[0].Attributes := 2;

  AdjustTokenPrivileges(hToken, FALSE, tkp, SizeOf(prevst), prevst, rl);

  NtShutdownSystem(ShutdownPowerOff);
end;

end.

Та ну блин, всё ж прекрасно отрубается, "мементо море"

[B_N]

JTG, да это всё понятно, можно даже так:

void main()
{
	long action = 2;
	__asm {
		mov eax, 0xF9
		lea edx, action
		int 2eh
	}
}

Но привилегии всё равно нужно поднимать.

[Ring0Sn]

Сообщение от B_N

Но привилегии всё равно нужно поднимать.

в Ring3 постоянно нужны привелегии, даже на то чтоб сходить посса*ь

[The_Darkness]

В общем если я получаю привелегии,
этим:

NtShutdownSystem(ShutdownPowerOff);

Я вырублю комп, так?

[The_Darkness]

в Ring3 постоянно нужны привелегии, даже на то чтоб сходить посса*ь

Интересно какое сообщение отправляет виндовс на это действие?
P.S. Сори за флуд

[rpy3uH]

NtShutdownSystem(ShutdownPowerOff);

нет, это не мгновенно.
из Ring3 мгновенно не получится. Конечно есть такой вариант: подсоединить к компьютеру (через USB или LPT) такое устройство, которое по сигналу нажимало на кнопку на сетевом фильтре, либо какую-нибудь механическую руку, которая бы вытащина вилку из розетки!