ожидание завершения процесса

Сейчас на форуме: tyns777, zds, JustLife, 2nd, morgot, Rio (+5 невидимых)

Посл.ответ	Сообщение
Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 26 июля 2009 23:15 · Личное сообщение · #1 Может кто программку накидать, чтобы к процессу по имени аттачилась и ждала пока он завершится после завершения отправить комп в спящий режим (WinXP) ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh

Azur1d Ранг: 129.7 (ветеран), 2thx Активность: 0.07↘0 Статус: Участник	Создано: 26 июля 2009 23:30 · Личное сообщение · #2 Прогу накидывать лень, но функа WaitForSingleObject должна помочь.
Valemox Ранг: 116.5 (ветеран), 3thx Активность: 0.07↘0 Статус: Участник	Создано: 27 июля 2009 00:10 · Поправил: Valemox · Личное сообщение · #3 Azur1d пишет: но функа WaitForSingleObject должна помочь +1 Точна, с параметром INFINITE - будет ожидать завершения.
Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 27 июля 2009 01:06 · Личное сообщение · #4 спасибо, самое главное похоже уже есть какие апишки ещё для всего этого будут необходимы? как вернусь домой, разберусь со всем этим и сделаю прогу наконец... довольно часто нужна подобная прога, да никак руки не дойдут ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
Azur1d Ранг: 129.7 (ветеран), 2thx Активность: 0.07↘0 Статус: Участник	Создано: 27 июля 2009 01:15 · Личное сообщение · #5 Isaev пишет: какие апишки ещё для всего этого будут необходимы? В части поиска вот примерчик на делфе. Не помню где нашел. Code: function KillProcessByExeName(ExeFileName: string): integer; const PROCESS_TERMINATE=$0001; var ContinueLoop : BOOL; FSnapshotHandle : THandle; FProcessEntry32 : TProcessEntry32; hProcess : Cardinal; begin result := 0; FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0); FProcessEntry32.dwSize := Sizeof(FProcessEntry32); ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32); ExeFileName := UpperCase(ExeFileName); while integer(ContinueLoop) <> 0 do begin if ( (UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) = ExeFileName) or (UpperCase(FProcessEntry32.szExeFile) = ExeFileName) ) then begin hProcess := OpenProcess(PROCESS_TERMINATE, False, FProcessEntry32.th32ProcessID); Result := Integer(TerminateProcess(hProcess, 0)); end; ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32); end; CloseHandle(FSnapshotHandle); end;
mak Ранг: 673.3 (! !), 400thx Активность: 0.4↘0.31 Статус: Участник CyberMonk	Создано: 27 июля 2009 02:04 · Личное сообщение · #6 В спящий режим сам можешь доделать Code: .386 .model flat, stdcall option casemap:none include c:\masm32\include\windows.inc includelib c:\masm32\lib\user32.lib includelib c:\masm32\lib\comctl32.lib include c:\masm32\include\user32.inc include c:\masm32\include\kernel32.inc includelib c:\masm32\lib\kernel32.lib include c:\masm32\include\comctl32.inc includelib c:\masm32\lib\wsock32.lib include c:\masm32\include\wsock32.inc include c:\masm32\include\gdi32.inc includelib c:\masm32\lib\gdi32.lib include c:\masm32\include\shell32.inc includelib c:\masm32\lib\shell32.lib includelib c:\masm32\lib\ws2_32.lib include c:\masm32\include\advapi32.inc includelib c:\masm32\lib\advapi32.lib includelib \masm32\lib\winmm.lib include c:\masm32\include\Comctl32.inc includelib c:\masm32\lib\Comctl32.lib include \masm32\include\masm32rt.inc run_synch_process PROTO :DWORD, :DWORD ;The timeout parameter must be set to INFINITE or the process ceases to be synchronous once the timeout has lapsed. RUN_SYNCH_PROCESS STRUCT priority dd HIGH_PRIORITY_CLASS ; priority setting timeout dd INFINITE ; timeout interval rvcreate dd ? ; create process return value exitcode dd ? ; run process exit code rvwait dd ? ; wait return value RUN_SYNCH_PROCESS ENDS ;Set the priority and timeout in the structure BEFORE passing it to the procedure. ;HIGH_PRIORITY_CLASS Specify this class for a process that performs ;time-critical tasks that must be executed immediately. The threads of the ;process preempt the threads of normal or idle priority class processes. An ;example is Windows Task List, which must respond quickly when called by the ;user, regardless of the load on the operating system. Use extreme care when ;using the high-priority class, because a high-priority class application can ;use nearly all available CPU time. ;IDLE_PRIORITY_CLASS Specify this class for a process whose threads run only ;when the system is idle. The threads of the process are preempted by the ;threads of any process running in a higher priority class. An example is a ;screen saver. The idle-priority class is inherited by child processes. ;NORMAL_PRIORITY_CLASS Specify this class for a process with no special ;scheduling needs. ;REALTIME_PRIORITY_CLASS Specify this class for a process that has the ;highest possible priority. The threads of the process preempt the threads of ;all other processes, including operating system processes performing important ;tasks. For example, a real-time process that executes for more than a very ;brief interval can cause disk caches not to flush or cause the mouse to be ;unresponsive. ;««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««« .data? .data RUN RUN_SYNCH_PROCESS <> filename db "hdd2.exe",0 .code start: invoke run_synch_process,addr filename,addr RUN invoke ExitProcess,0 ;align 4 run_synch_process proc lpfilename:DWORD,lpstruct:DWORD LOCAL priority :DWORD LOCAL timeout :DWORD LOCAL rvcreate :DWORD ; create process return value LOCAL exitcode :DWORD ; run process exit code LOCAL rvwait :DWORD ; wait return value LOCAL xc :DWORD LOCAL st_info :STARTUPINFO LOCAL pr_info :PROCESS_INFORMATION mov eax, lpstruct mov ecx, (RUN_SYNCH_PROCESS PTR [eax]).priority mov priority, ecx mov ecx, (RUN_SYNCH_PROCESS PTR [eax]).timeout mov timeout, ecx ; --------------------- ; zero fill STARTUPINFO ; --------------------- mov ecx, 17 ; 68 bytes SIZEOF STARTUPINFO lea edx, st_info xor eax, eax @@: mov [edx], eax add edx, 4 sub ecx, 1 jnz @B mov st_info.cb, 68 ; set the structure size member invoke CreateProcess,NULL,lpfilename,NULL,NULL, NULL,NULL,NULL,NULL, ADDR st_info, ADDR pr_info mov rvcreate, eax test eax, eax ; if CreateProcess fails jz quit invoke SetPriorityClass,pr_info.hProcess,priority invoke WaitForSingleObjectEx,pr_info.hProcess,timeout,0 mov rvwait, eax invoke GetExitCodeProcess,pr_info.hProcess,ADDR exitcode invoke CloseHandle, pr_info.hThread invoke CloseHandle, pr_info.hProcess mov eax, lpstruct mov ecx, rvcreate mov (RUN_SYNCH_PROCESS PTR [eax]).rvcreate, ecx mov ecx, exitcode mov (RUN_SYNCH_PROCESS PTR [eax]).exitcode, ecx mov ecx, rvwait mov (RUN_SYNCH_PROCESS PTR [eax]).rvwait, ecx mov eax, rvwait mov ecx, exitcode ret quit: mov eax, lpstruct mov (RUN_SYNCH_PROCESS PTR [eax]).rvcreate, 0 mov (RUN_SYNCH_PROCESS PTR [eax]).exitcode, 0 mov (RUN_SYNCH_PROCESS PTR [eax]).rvwait, 0 ret run_synch_process endp ; ««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««« end start ----- RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube
Lumen Ранг: 111.1 (ветеран) Активность: 0.04↘0 Статус: Участник	Создано: 27 июля 2009 06:08 · Личное сообщение · #7 Для спящего и ждущего режима можно воспользоваться SetSystemPowerState, тока сначала нужно разрешить использование спящего режима в управлении электропитанием ----- The truth is out of there...
mak Ранг: 673.3 (! !), 400thx Активность: 0.4↘0.31 Статус: Участник CyberMonk	Создано: 27 июля 2009 14:47 · Личное сообщение · #8 Isaev на вот , накатал по быстрому , 90 кб звук большой но это для веса. ХЗ работает или нет , не тестил. Есть для безопасности 10 секундная пауза , можно отменить перезагрузку или стэндбай, если не успел то происходит выполнение. Также можно по таймеру поставить задачу или другие функции. 3121_27.07.2009_CRACKLAB.rU.tgz - Kibernator.exe ----- RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube
Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 27 июля 2009 15:27 · Личное сообщение · #9 Kibernator Mak! работает, теперь даже стимул отбил самому писать сделай к процессам текущим аттач уж до кучи ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
Lumen Ранг: 111.1 (ветеран) Активность: 0.04↘0 Статус: Участник	Создано: 27 июля 2009 22:18 · Личное сообщение · #10 В смысле чтобы ждала пока несколько определенных процессов завершатся? Тогда WaitForMultipleObjects и передавай указатель на массив с pID'ами процессов, ну и длину не забудь указать ----- The truth is out of there...
Clerk Ранг: 255.8 (наставник), 19thx Активность: 0.15↘0.01 Статус: Участник vx	Создано: 27 июля 2009 22:21 · Личное сообщение · #11 Lumen > Тогда WaitForMultipleObjects и передавай указатель на массив с pID'ами процессов С идентификатором ничего нельзя сделать, манипуляции выполняются с хэндлами. Нужно открыть процессы и ждать на массиве описателей.
Lumen Ранг: 111.1 (ветеран) Активность: 0.04↘0 Статус: Участник	Создано: 28 июля 2009 01:02 · Личное сообщение · #12 Упс... точно, попутался. разумеется все манипуляции с хэндлами полученными от OpenProcess либо CreateProcess из структуры PROCESS_INFORMATION ----- The truth is out of there...
mak Ранг: 673.3 (! !), 400thx Активность: 0.4↘0.31 Статус: Участник CyberMonk	Создано: 28 июля 2009 11:31 · Поправил: mak · Личное сообщение · #13 Уже перешли к мульти событиям, вроде это не имеллось ввиду , но тоже пригодится. Можно на ночь расчеты ставить , но что если программа сторонняя , она закончит работу и не завершится. Много прог которые не имеют таймера. Как регулировать такие проги Clerk Когда ты мне расскажешь о более глубоком устройстве кернел ? Оч надо. Isaev Пологаю ты в отпуске Так вот я тоже))) напишу как комп привезут , аттач можно по раззному сделать. Как лучше не знаю. ЗЫ. sniper раз пошол вопрос о просветленнии то нужно знать . что без мастера полной реализации не достичь , все уже сто раз прочитано, думай что пишешь. А модераторов прошу удалить пост , товарища sniper. Пусть сначала общаться научится. SLV пишет: sniper прав, хуесосить знания не вариант если хочешь сделать чтото полезное. Надо изучать самому. Интересно кто из модеров удалил адекватный пост. Ты читал ? За такие адекватные посты в реале бьют сразу в лицо. Читай зомбу лучше по поводу вирусных драк, и самоизучении. Много найдешь по поводу своего поста. А твой пост нужно тоже улалить. ----- RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube
Ratinsh Ранг: 191.8 (ветеран), 46thx Активность: 0.17↘0 Статус: Участник	Создано: 28 июля 2009 15:04 · Личное сообщение · #14 и вот эту 5 раз www.infanata.org/computers/prog/1146109620-ispolzovanie-microsoft-windows-driver-mode.html
userdom Ранг: 69.8 (постоянный) Активность: 0.04↘0 Статус: Участник	Создано: 28 июля 2009 20:11 · Личное сообщение · #15 Ratinsh, дык на www.infanata.org надо регистрироваться, чтобы ссылку увидеть. Тогда уж лучше progbook.ru/c/450-ispolzovanie-microsoft-windows-driver-model.html. Там на нескольких зеркалах и сама книга, и исходники.
Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 28 июля 2009 23:35 · Поправил: Isaev · Личное сообщение · #16 mak пишет: пологаю ты в отпуске в общем да ... да мне не к спеху Lumen пишет: В смысле чтобы ждала пока несколько определенных процессов завершатся? не, несколько это перебор, т.к. изначально вроде бы не надо, да и не ыло практической надобности, но интересно... надо попробовать Ratinsh - гений по литературе! Всегда вовремя и очень в тему. спасибо PS: SLV - ni rasu ne prav! Tebe baby chtoli ne dajut, chto ty takoj scuko sloj? ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
SLV Ранг: 309.8 (мудрец), 21thx Активность: 0.17↘0 Статус: Участник	Создано: 29 июля 2009 00:19 · Личное сообщение · #17 sniper прав, хуесосить знания не вариант если хочешь сделать чтото полезное. Надо изучать самому. Интересно кто из модеров удалил адекватный пост. ----- Shalom ebanats!

Для печати