ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

[Delphi]Моментально вырубить комп и ...
  #1  
Старый 06.03.2008, 08:56
Mob-X
Новичок
Регистрация: 05.03.2008
Сообщений: 8
Провел на форуме:
114155

Репутация: 0
Question [Delphi]Моментально вырубить комп и ...

Итак нужно в Delphi сделать так так чтоб по нажатию кнопки комп вырубался мгновенно (как при нажатии reset на системном блоке, тока без последующей перезагрузки), а не как через пуск - выключить, так шо shutdown и ewx_force не годятся.

И есчо скажите плиз где хранятся файлы журнала или как его удалить, и где храниться история оперы(в каком файле).

Знаю мож такие темы были но нет времени читать, ответьте, плиз!
 
Ответить с цитированием

  #2  
Старый 06.03.2008, 10:18
spider-intruder
Постоянный
Регистрация: 10.12.2005
Сообщений: 939
Провел на форуме:
3886281

Репутация: 929


Отправить сообщение для spider-intruder с помощью ICQ
По умолчанию

1)
Напиши драйвер Я тебя уверяю что если по кнопке ты будешь его стартовать и при этом никогда их не писал - система упадет мгновенно :-) Добиться резета а не бсода тоже не так сложно...

2)
Приатачься к системному процесу и убей свой процес убив этим же и системный процесс.
3)
Код:
HANDLE hToken;
TOKEN_PRIVILEGES* NewState;
OpenProcessToken (GetCurrentProcess (), TOKEN_ADJUST_PRIVILEGES, &hToken);
 
 
 
 NewState = (TOKEN_PRIVILEGES*) malloc (sizeof (TOKEN_PRIVILEGES) + sizeof (LUID_AND_ATTRIBUTES));
 
 
 
 NewState->PrivilegeCount = 1;
 
 
 
 LookupPrivilegeValue (NULL, SE_SHUTDOWN_NAME, &NewState->Privileges[0].Luid);
 
 
 
 NewState->Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
 
 
 
 AdjustTokenPrivileges (hToken, FALSE, NewState, NULL, NULL, NULL);
 
 
 
 free (NewState);
 
 
 
 CloseHandle (hToken);
 
 
 
 ExitWindowsEx (EWX_REBOOT, 0);

Последний раз редактировалось spider-intruder; 06.03.2008 в 10:35..
 
Ответить с цитированием

  #3  
Старый 06.03.2008, 11:16
krypt3r
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186

Репутация: 905


По умолчанию

Позаумней будет разработать внешний девайс для нажатия кнопки RESET, подключаемый, например, к усб компа, и драйвер, активно его юзающий. Ну и компонент или класс в делфи соорудить для доступа к сему девайсу. Вот тогда и можно будет обрабатывать событие OnClick класса TButton
 
Ответить с цитированием

  #4  
Старый 06.03.2008, 11:17
Xserg
Участник форума
Регистрация: 09.12.2006
Сообщений: 135
Провел на форуме:
426226

Репутация: 726
По умолчанию

Чтобы нажать кнопку ресет нужно выполнить в ring0:
mov al, $FE
out $64, al
а чтобы не перезагрузился предворительно запортить системные файлы.

все на Delphi:
http://forum.antichat.ru/thread42447.html

Последний раз редактировалось Xserg; 07.03.2008 в 10:35.. Причина: модератор контекст испортил
 
Ответить с цитированием

  #5  
Старый 06.03.2008, 11:23
x0man
Познающий
Регистрация: 24.02.2006
Сообщений: 34
Провел на форуме:
136883

Репутация: 50
По умолчанию

у меня ресетом является тупо...
Код:
xor eax, eax
mov [eax], eax
хотя говорят по идее BSOD Должен быть... хз...
 
Ответить с цитированием

  #6  
Старый 06.03.2008, 11:26
sandalwood
Banned
Регистрация: 13.01.2008
Сообщений: 22
Провел на форуме:
240245

Репутация: 37
По умолчанию

http://bugtraq.ru/library/internals/shut.html
переделай на делфи [s]если ума хватит[/s]
 
Ответить с цитированием

  #7  
Старый 06.03.2008, 11:43
x0man
Познающий
Регистрация: 24.02.2006
Сообщений: 34
Провел на форуме:
136883

Репутация: 50
По умолчанию

Цитата:
Сообщение от sandalwood  
http://bugtraq.ru/library/internals/shut.html
переделай на делфи [s]если ума хватит[/s]
а у тя хватит? ))
 
Ответить с цитированием

  #8  
Старый 06.03.2008, 11:55
nerezus
Pagan Heart
Регистрация: 12.08.2004
Сообщений: 3,791
Провел на форуме:
6490435

Репутация: 2290


Отправить сообщение для nerezus с помощью ICQ
По умолчанию

Через Lpt-порт цепляешь реле на отключение.
 
Ответить с цитированием

  #9  
Старый 06.03.2008, 18:58
nc.STRIEM
Members of Antichat - Level 5
Регистрация: 05.04.2006
Сообщений: 1,066
Провел на форуме:
3493315

Репутация: 1228


Отправить сообщение для nc.STRIEM с помощью ICQ
По умолчанию

Цитата:
Сообщение от x0man  
у меня ресетом является тупо...
Код:
xor eax, eax
mov [eax], eax
хотя говорят по идее BSOD Должен быть... хз...
есле на ring0 то будет BSOD, есле просто, то ошибка выскачит.
Reset ты никак не имитируеш, разве что как нерезус сказал
 
Ответить с цитированием

  #10  
Старый 06.03.2008, 20:21
x0man
Познающий
Регистрация: 24.02.2006
Сообщений: 34
Провел на форуме:
136883

Репутация: 50
По умолчанию

Цитата:
Сообщение от nc.STRIEM  
есле на ring0 то будет BSOD, есле просто, то ошибка выскачит.
Reset ты никак не имитируеш, разве что как нерезус сказал
читаете вы между строк скажу я вам...
походу не достаточно дохотчиво объяснил...

я имел ввиду, что, у меня в ринг0 при
Код:
xor eax, eax
mov dword ptr [eax], eax
и других ошибках доступа, и т.д.
ресетится кампег, как после нажатия кнопочки ресет... никакого BSOD... =\\\
вам это понятно? или снять всё на камеру и выложить чтоб вы поняли окончательно... =\\\
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как забекдорить чела за Nat и т.п..? Nightmarе Windows 16 19.05.2008 15:47
Комп шлепнулся Isis Болталка 40 17.02.2008 18:33
как вырубить комп в сети из командной строки? Дикс Windows 7 08.01.2008 14:08
ВХОДЛ В ЧУЖЕЙ КОМП azeri_hacker Болталка 4 24.05.2005 19:55



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ