Вопросы оптимизации

[Sandr0]

Требовалась прога по ведению логов запуска и останова процессов.
Сделал на скорую руку, но встал вопрос что при постоянном контроле (таймер) програ отжирает ресурсов почти 80%.
Лог писал в MDB, т.к. из него удобней извлекать отчеты.
Может у кого есть предложения по оптимизации? уж очень не устраивать большая загрузка проца и увеличение интервала таймер.

зы. прога шибко сырая, т.ч. прошу без язвительности

[alibek]

Этот код бесполезно оптимизировать.
Если тебе так нужна скорость, используй другой подход.

[alibek]

И, разумеется, это последнее предупреждение касательно 120 постингов.

[cooler]

думаю надо делать что-то типа перехвата вызова функции CreateProcess или типа того

[Twister]

думаю надо делать что-то типа перехвата вызова функции CreateProcess или типа того

Перехватывать нужно Zw(Nt)CreateProcess.

[keks-n]

В ядре И не забудь ZwTerminateProcess - в конечном итоге ExitProcess приводит к нему

[Ennor]

Вообще-то, все уже сделано до нас - Event Viewer \ Security. Поставить фильтр на создание / уничтожение процесса - и все, собственно. Более того, чтобы получить данные за последнюю, скажем, неделю, программе необязательно быть всю эту неделю запущенной.

[Twister]

Блин, пора писать статью про перехват API в юзермоде, правда на чистом VB это проблематично будет...

<- 1111

[AjaxVS]

Хехе.. интересные вы все такие +_+
Я счас чем то похожим занимаюсь..

Код: Выделить всё

set wmi = getobject("winmgmts:")
set oQ = wmi.ExecNotificationQuery("select * from __InstanceOperationEvent within 3 where TargetInstance ISA 'Win32_Process'")
set oE = oQ.NextEvent
s0 = oE.TargetInstance.Name
If oE.path_.Class = "__InstanceDeletionEvent" then
s0 = "Программа " & s0 & " закрылась"
elseif oE.path_.Class = "__InstanceCreationEvent" then
s0 = "Программа " & s0 & " запустилась"
end if


Ну, приблизительно так.. И все! Перехватчики апи, млин.. Все вам поперехватывать хочется +_+

ЗЫ. Проц почти не загружен. У меня показывает 0%.
ЗЗЫ. Это не надо совать в таймер!!! +_+

[Twister]

Перехватчики апи, млин

Мне не нравится твой тон, AjaxVS. Видишь ли, за последнее время на форуме проскальзывало не мало вопросов, решение которых так или иначе связано с перехватом. И этот в том числе.

[AjaxVS]

Перехват АПИ в данном случае - самый плохой вариант.
Тон? Гм.. Что-то вы черезчур серьезные, господин Twister..

[Twister]

Перехват АПИ в данном случае - самый плохой вариант.

Самый плохой - слежение по таймеру.

Тон? Гм.. Что-то вы черезчур серьезные, господин Twister..

Черезчур? Нет. Все в пределах допустимого.

[Sandr0]

Twister
Я согласен, что перехват по таймеру самый плохой вариант, но других способов пока не знаю, точнее другими пока не владею.
прогу я все-таки немного оптимизировал
сделал последовательную запись протокола в тхт файл - полегчало ей бедненькой.
но естестно сильно урезались возможности анализа протокола работы
надо попробовать вариант с использованием записи протокола на sql-сервер

зы. покрайней мере в таком варианте курсовую и экзамен защитил на отлично

[RUSYA]

1) Сохранять лог не сразу в БД, а при закрытие своего приложения... правдо риск если обвалится, но тут карты в руки, делай так чтоб не вылетало...

2)Сохранять лог раз в определённое время...
Вариант с таймером однозначно плох, но даже если с ним, зачем ему интервал 1? Можно и 1000! поставить, ведь ничего страшного если лог времени запуска/остановки процесса будет на 1-2 сек. отличатся от реальной...