Монитор Ресурсов

Всем привет!
Будучи счастливым обладателем небольшого сервера задался вопросом, а что же грузит сервер ночью. Вашему вниманию программа монитор ресурсов: Изначально ReS_MoN задумывалась как программа, которая будет информировать о процессах, которые избыточно потребляют ресурсы на сервере. С возможностью отправки уведомлений на различные сервисы.


Возможности:
1. Отправка отчетов на почту при превышения порогов потребления ресурсов;
2. Отправка отчетов на FTP при превышения порогов потребления ресурсов;;
3. Куча всего другого;
3. Поддержка оси Win 7/8/8.1/10 (для трех последних нужна права админа);
4. Авто обновление, отправка статистики на почту (FTP);
5. Логи, Ини и тд.

Проект не закончен. Руки не доходят дописать для MEM и HDD. Если кто то желаем помочь, пожалуйста исходники в комплекте..На сегодня работает довольно таки стабильно.

Отдельная благодарность за помощь Dragokas

Миниатюры

   

Вложения

	pack_Source.7z (93.4 Кб, 12 просмотров)
	pack_Bin.7z (1.87 Мб, 15 просмотров)

0

Добрый день!
Замечательно, выручите...

0

0

По теме, я сделал исправление, но там возникает ошибка еще не разобрался в чем причина.

1

Сообщение от The trick Да, он только под 32 бита рассчитан. ProcessExplorer в свою очередь в ресурсах содержит 64 битную версию, которая извлекается и запускается в случае запуска на 64 битной системе. Я знаю способ исправить, на днях исправлю.

По прежнему ждем...

0

0

Если что, здесь пример чтения памяти 64-битных процессов: https://github.com/dragokas/hi... .bas#L1419

1

Сообщение от Dragokas Если что, здесь пример чтения памяти 64-битных процессов: https://github.com/dragokas/hi... .bas#L1419

Спасибо!
Если не трудно выложи проект сюда...
И второй вопрос, подобное решение с загрузкой CPU процессами для 64битных систем у Вас есть?

0

Проект открыт и доступен для скачивания без регистрации, зеленая кнопка Download: https://github.com/dragokas/hijackthis

Для расчета нагрузки на CPU, если список процессов составлять функцией NtQuerySystemInformation с параметром SystemProcessInformation (есть в проекте выше), то нету необходимости открывать процесс, просто читайте поля SYSTEM_PROCESS_INFORMATION -> UserTime и KernelTime и вычисляйте по этой формуле: GetCPUUsage.

0

Сообщение от The trick По теме, я сделал исправление, но там возникает ошибка еще не разобрался в чем причина.

Ошибку удалось победить, но причина неясна. Либо это баг в ОС, либо баг в архитектуре процессора, по крайней мере мне не удалось выяснить причину. Крастко, при переключении в Long-Mode и обратно необходимо перезагружать сегментный регистр SS. Обсуждение можно почитать на васме.

В своем коде я решил не изменять принцип работы - я также получаю через счетчики как это делает GetProcessMemoryInfo через NtQueryInformationProcess c параметром ProcessVmCounters только для 64 битного режима вызывается 64-битная функция NtQueryInformationProcess посредством переключения в 64 битный режим из VB кода. Эта функция совместима с 64-битными приложениями поскольку мы не имеем прослойки WoW64.

Я добавил удобный модуль для работы с 64-битной ntdll. Можно вызывать большинство функций из нее посредством функции CallX64. Стоит отметить что все указатели в 64 битном режиме 64 битные, поэтому их стоит передавать как Currency если кто-то захочет работать с другими 64-битными приложениями через нее. Если работа идет с 32-битными то можно передавать обычные указатели, т.к. они автоматически расширяются до 64-бит с занулением старшей части.

GetModuleHandle64 позволяет получить хендл 64 битной библиотеки в текущем процессе по имени.

GetProcAddress64 позволяет получить адрес функций из 64-битной DLL в текущем процессе (функционал неполный т.к. она не поддерживает редиректы, но я не могу представить ситуацию когда это может пригодится в таком режиме работы). Я не проверял, но я думаю можно даже загрузить внешние 64 битные DLL в текущий процесс, но они должны обращаться только к Native API.

Код обновил в блоге. Там добавил еще сортировку.

0

Респектище за x64 трамплин. Пригодится и еще как! Можно сказать гигантский рывок для VB6.

P.S. Странно, не могу откомментировать в блоге, тупо зависает запрос.

0

0

Сообщение от The trick Код обновил в блоге. Там добавил еще сортировку.

И снова, что то не так....
На Win10 пустые поля

Миниатюры

 

0

Пробовал на Win 2012 Server R2 все ок.
Под Win 10 пробовал запускать со среды/компиляция в P-Code. Увы пустые поля.

0

Сообщение от The trick Код обновил в блоге.

Что за блог? На данном форуме не вижу новых записей в блоге.

0

Сообщение от IDK Что за блог? На данном форуме не вижу новых записей в блоге.

https://www.cyberforum.ru/blog... g2134.html

0

kreotodr, посмотрю

0

Посмотрел. Причина была в WOW64 слое который в Win10 рассматривает хендлы как беззнаковые при конвертации из 32 в 64 бит. Поэтому команды NtWow64ReadVirtualMemory выдавали ошибку т.к. -1 преобразовывался в 4294967295 вместо -1. Win7:

Win10:

Проект выложил не гитхабе для удобного обновления.

3

спасибо

0

The trick,
NtWow64QueryInformationProcess64, NtWow64ReadVirtualMemory – недокументированные функции, т.е. описания нет?

NtWow64QueryInformationProcess64 при хэндле процесса = -1 возвращает указатель на PEB64 копии процесса в 64-битном режиме? Для копии загружаются 64-битные экземпляры dll оригинального проекта?

Указатель, полученный из 64-битной копии процесса имеет значение в пределах wow? Или wow распознает адресное пространство, к которому принадлежит указатель?

0

Сообщение от IDK NtWow64QueryInformationProcess64, NtWow64ReadVirtualMemory – недокументированные функции, т.е. описания нет?

Да, недокументированные.

Сообщение от IDK NtWow64QueryInformationProcess64 при хэндле процесса = -1 возвращает указатель на PEB64 копии процесса в 64-битном режиме? Для копии загружаются 64-битные экземпляры dll оригинального проекта?

У 32 битного процесса в 64 битном окружении 2 версии ntdll. Одна 32 битная, другая 64 битная. Помимо ntdll там еще библиотеки WoW64 слоя. Т.к. 32 битный процесс по сути является таким же 64 битным процессом, то у него также есть 64 битные TEB и PEB.

Сообщение от IDK Указатель, полученный из 64-битной копии процесса имеет значение в пределах wow? Или wow распознает адресное пространство, к которому принадлежит указатель?

Адресное пространство 64-битное, в том числе у 32 битного процесса. К примеру на Win8 64 битная ntdll загружается далеко за пределами 4ГБ, поэтому просто так в 32 битном режиме ее не прочитать. Можно даже к примеру выделить память за пределами 4ГБ и там хранить данные, либо попробовать выделить > 4ГБ на 32 битный процесс (не проверял, т.к. там может лимит стоять).

1