; ; Ghost Monitor - утилита (стресс) тестирования и мониторинга системы ; ВОЗМОЖНА ПОРЧА ОБОРУДОВАНИЯ! ; ИСПОЛЬЗУЙТЕ НА СВОЙ СТРАХ И РИСК! ; ; Заметки : ; Дописать запуск тестов (rtst) (нет реакции на ошибку запуска) ; Переделать обновление графика (сделать отдельным процессом) ; Добавить реакцию на параметры датчиков ; ; История : ; 09/2005 - начало ; 04/10/2005 - откомментировал код ; 09/11/2005 - дописаны тесты (пока нет теста памяти) ; 30/01/2006 - добавленны графики ; 02/02/2006 - Добавлена настройка времени обновления ; 10/02/2006 - добавленна еще информация с датчиков, опт. wb_get_chip_name ; 01/03/2006 - добавленна еще информация с датчиков ; 16/03/2006 - оптимизирована по размеру ; 17/03/2006 - подсветка изменённых параметров, оптимизация, about ; 20/03/2006 - Публикация ; --- v 0.2 --- ; 24/03/2006 - Добавленна поддержка IT8705F, IT8712F и SIS950 ; 25/03/2006 - Вывод трёх температур и трёх вентилей ; 28/03/2006 - График temp3 и изменение цвета графиков, обработка отрицательных значений графика ; 30/03/2006 - Оптимизация по размеру версии от 28/03/2006, переписал рисование графика ; 14/04/2006 - Исправил график (jle -> jbe), добавил mem usage, вычисление длинны чисел, закрытие по Esc ; 19/04/2006 - Очистка неинициализированных данных ; --- v 0.3 --- ; 01/07/2006 - Различие ITE 8705F, ITE 8712F и IT8716F ; 04/07/2006 - Добавленны напруги для чипов Winbond ; 10/07/2006 - добавленны напруги для чипов ITE, множители для AMD K6, Intel P6, P7, оптимизация по размеру ; 11/07/2006 - Реакция на изменение напруги, оптимизация по размеру ; 12/07/2006 - it87_get_fan_speed bug fix, завершение теста по 18/18 ; 13/07/2006 - it87_get_fan_speed bug fix, исправлен вывод чисел с плавающей точкой ; 14/07/2006 - исправленны показания -12V для Winbond, осталась пробленма с -5V ; 17/07/2006 - исправленна ошибка определения множителя для P6, добавленны множители ; 18/07/2006 - Уличшил вывод множителя, исправленны множители для P6 Tualatin, config.inc ; 22/07/2006 - P6 multiplier bugfix ; 30/07/2006 - P6 multiplier bugfix ; --- v 0.4 --- ; 10/08/2006 - начата работа по поддержке SMBus, переписаны функции для чипов мониторинга ; 24/08/2006 - добавленна частота процессора ; 10/09/2006 - bugfix ; 25/11/2006 - добавлен ABIT uGuru ; 20/12/2006 - W83627DHG, W83627EHF, W83627EHG ; ; Эй! У меня нет много времени. ; Внешние файлы : ; hwm*.inc - процедуры работы с датчиками мониторинга ; system.inc - вычисление загрузки процессора, завершение теста, etc... ; tests.inc - тесты ;-) ; diag.inc - поддержка диаграм ; tab_*.inc - процедуры отрисовки соответствуюших вкладок ; Идентификаторы кнопок : ; 01 - Exit ; 02 - Info tab ; 03 - Tests tab ; 04 - Config tab ; 05 - About tab ; 06 - P5 test ; 07 - P6 test ; 08 - K6 test ; 09 - K7 test ; 10 - MMX test - not used ; 11 - Update time increment ; 12 - Update time decriment ; 13..17 - Изменение цвета CPU_load, Mem_usage, Temp1, Temp2, Temp3 include 'config.inc' include 'macros.inc' tcol equ 0x5080d0 atcol equ 0x4070c0 val_mod equ 0x3090 MEOS_APP_START include "tests.inc" ; <-- Много выравниваний, лучше здесь CODE ;--- Init ------------------------------------------------------------ ; Очищаем неинициализированные данные mov ecx, __memory - __udata mov edi, __udata xor eax, eax rep stosb xor eax, eax cpuid ; Узнаём производителя проца mov [Vendor + 0], ebx mov [Vendor + 4], edx mov [Vendor + 8], ecx mov eax, 1 cpuid ; Есть ли MMX ? mov ecx, eax shr al, 4 and ax, 0x0F0F mov [CPU_fam], ah mov [CPU_mod], al shr edx, 23 and dl, 1 mov [CPU_mmx], dl shr ecx, 12 and cl, 11b mov [CPU_type], cl ; ! Цвета из массива colors mov dword[d_cpu_load], 0xFF00 ; инициализируем график загрузки АЛУ mov dword[d_mem_usage], 0x8BA169 ; -- mem usega mov dword[d_temp1], 0xFF0000 ; -- график температуры ЦПУ mov dword[d_temp2], 0xFF ; -- график температуры МП mov dword[d_temp3], 0xFF7E23 call hwm_init ; Инициализируем чип мониторинга jmp draw_window ;--- Wait & translate event ------------------------------------------ wait_for_event: mov byte[diag_add_v], 0 ; добавляем данные к графику только по таймеру mov ebx, [update_time] mov eax, 23 int 0x40 test eax, eax jnz @f inc byte [diag_add_v] inc eax ; перерисуем окно (eax := 1) @@: dec eax ; redraw request ? jz draw_window dec eax ; key in buffer ? jz key dec eax ; button in buffer ? jz button jmp wait_for_event ;--- Key pressed ----------------------------------------------------- key: mov eax, 2 int 0x40 cmp ah, 27 ; Esc - завершение работы je exit jmp wait_for_event ;--- Button down ----------------------------------------------------- button: mov eax, 17 ; get id int 0x40 cmp ah, 1 ; button id == 1 ? jne noexit exit: cmp byte[test_id], 0 je @f call stop_test @@: mov eax, -1 ; close this program int 0x40 noexit: ; кнопки вкладок (2 .. 5) cmp ah, 5 jg no_tabs mov byte[act_tab], ah jmp draw_window no_tabs: ; кнопки запуска тество (6 .. 10) cmp ah, 10 jg no_test_bt ; если нет запущеных тестов - запускаем выбранный cmp byte[test_id], 0 je run_test ; если кнопка активного теста - останавливаем тест, иначе ничего не делаем cmp [test_id], ah jne wait_for_event call stop_test jmp draw_window tsts: dd p5, p6, k6, k7 run_test: push eax movzx ecx, ah mov ecx, [tsts + (ecx * 4) - (6 * 4)] rtst: mov eax, 51 mov edx, stp mov ebx, 1 int 0x40 cmp eax, 0xFFFFFFF0 ; -16 je wait_for_event ; <-- ошибка запуска теста, ПЕРЕПИСАТЬ mov [test_pid], eax pop eax mov byte [test_id], ah jmp draw_window ;------------------------- ; кнопки изменения времени обновления no_test_bt: cmp ah, 11 jne no_ut_inc add dword[update_time], 10 jmp draw_window no_ut_inc: cmp ah, 12 jne no_ut_dec cmp dword[update_time], 10 jng wait_for_event sub dword[update_time], 10 jmp draw_window no_ut_dec: ;------------------------- ; кнопки изменения цвета графиков (13..17) cmp ah, 17 jg no_change_color sub ah, 13 movzx ecx, ah mov esi, [d_colors + ecx * 4] mov eax, [esi] mov ecx, (colors_end - colors) / 4 ; количество цветов @@: dec ecx cmp eax, [colors + ecx * 4] jne @b mov ebx, [colors + ecx * 4 - 4] mov [esi], ebx jmp draw_window no_change_color: jmp wait_for_event ;--------------------------------------------------------------------- draw_window: mov eax,12 mov ebx,1 int 0x40 ; Создаём окно xor eax, eax mov ebx, 300 * 65536 + 309 mov ecx, 150 * 65536 + 450 mov edx, tcol + 0x3000000 ; color of work area RRGGBB,8->color mov esi, 0x805080d0 ; color of grab bar RRGGBB,8->color mov edi, 0x005080d0 ; color of frames RRGGBB int 0x40 ; Создаём рамку графика mov eax, 13 mov ebx, 10 * 65536 + 290 mov ecx, 138 * 65536 + 105 mov edx, atcol int 0x40 mov ebx, 12 * 65536 + 286 mov ecx, 140 * 65536 + 101 mov edx, tcol int 0x40 mov eax, 38 mov edx, atcol mov ebx, 12 * 65536 + 286 + 12 mov ecx, 140 * 65536 + 140 @@: add ecx, 10 * 65536 + 10 int 0x40 cmp cx, 230 ; привязано к координатам окна jl @b ; Пишим заголовок mov eax, 4 mov ebx, 8 * 65536 + 8 mov edx, title mov ecx, 0x10FFFFFF mov esi, 29 int 0x40 ; Пишим названия параметров (Cpu load, temper, etc...) mov edx, msgs_mon mov ebx, 17 * 65536 + 30 call show_text mov edx, msgs_mon2 mov ebx, 156 * 65536 + 30 call show_text ; Рисуем кнопки смены цвета mov eax, 8 mov ebx, 112 * 65536 + 5 mov ecx, 30 * 65536 + 6 mov edx, 13 @@: mov esi, [d_colors - 13 * 4 + edx * 4] mov esi, [esi] int 0x40 add ecx, 10 * 65536 inc edx cmp edx, 13 + 5 ; 5 кнопок jne @b ; Пишим загрузку процессора call cpu_usage ;--- добавляем на график --- mov esi, d_cpu_load call d_add call d_show ;--------------------------- movzx ecx, al mov eax, 47 mov edx, 121 * 65536 + 30 xor esi, esi call digit_len int 0x40 ; Пишим используемую память call mem_usage ;--- добавляем на график --- mov esi, d_mem_usage call d_add call d_show ;--------------------------- movzx ecx, al mov eax, 47 mov edx, 121 * 65536 + 40 xor esi, esi call digit_len int 0x40 cmp byte[hwm_enable], 0 jne show_mon ; Нет датчиков - пишем NO mov ecx, 8 ;<- количество параметров mov eax, 4 mov ebx, 121 * 65536 + 50 mov edx, msg_no mov esi, 3 @@: int 0x40 add ebx, 10 loop @b mov ecx, 7 ;<- количество параметров mov ebx, 260 * 65536 + 30 @@: int 0x40 add ebx, 10 loop @b jmp no_monitor show_mon: ;Есть датчики пишим инфу call hwm_get_params ;--------------------------- ; Температуру mov ecx, 3 mov esi, hwm_temps mov edx, 121 * 65536 + 50 xor eax, eax sh_temp:push ecx lodsw push esi ; реакция на изменения xor esi, esi cmp [old_t1 + ecx * 4 - 4], eax je @f mov [old_t1 + ecx * 4 - 4], eax mov esi, val_mod @@: movzx ecx, al push eax mov eax, 47 mov ebx, 0x20000 int 0x40 pop eax mov cl, ah mov eax, 47 mov ebx, 0x10000 add edx, 15 * 65536 int 0x40 sub edx, 15 * 65536 - 10 pop esi pop ecx loop sh_temp ;;--- добавляем на график temp1 --- movzx eax, word[hwm_temps] mov esi, d_temp1 call d_add call d_show ;;--- добавляем на график temp2 --- movzx eax, word[hwm_temps + 2] mov esi, d_temp2 call d_add call d_show ;;--- добавляем на график temp3 --- movzx eax, word[hwm_temps + 4] mov esi, d_temp3 call d_add call d_show ;--------------------------- ; Скорости врашения вентилей mov ecx, 5 mov esi, hwm_rpms mov edx, 121 * 65536 + 80 sh_fan: push ecx lodsd push esi ;реакция на изменения xor esi, esi cmp [old_f1 + ecx * 4 - 4], eax je @f mov [old_f1 + ecx * 4 - 4], eax mov esi, val_mod @@: mov ecx, eax call digit_len mov eax, 47 int 0x40 add edx, 10 pop esi pop ecx loop sh_fan ;--------------------------- ; Напруги mov esi, hwm_voltages mov edi, old_volts mov ecx, 7 mov ebx, 260 * 65536 + 30 mov edx, Data_String volt_nxt: push ecx push esi call ftoa ;реакция на изменения xor ecx, ecx fld dword [esi] fsub dword [edi] fabs ; fcomp dword [c_eps] ; bug in MeOsEmul ; fstsw ax fcom dword [c_eps] ; 0xBADCODE fstsw ax finit sahf jc @f mov ecx, val_mod @@: mov esi, Data_String ; считаем кол-во символов @@: lodsb test al, al jnz @b sub esi, Data_String mov eax, 4 int 0x40 add ebx, 10 pop esi pop ecx movsd loop volt_nxt no_monitor: ;--------------------------- ; Создаём кнопки вкладок mov edi, 250 * 65536 + 25 mov ecx, 4 mov eax, 8 mov ebx, 10 * 65536 + 70 mov edx, 2 n_bt: push ecx mov ecx, edi mov esi, tcol cmp byte [act_tab], dl jne na1 mov esi, atcol na1: int 0x40 inc edx add ebx, 73 * 65536 pop ecx loop n_bt ; Пишим названия вкладок mov eax, 4 mov ebx, 35 * 65536 + 260 mov edx, tab_lab mov ecx, 0x10000000 mov esi, 39 int 0x40 ; создаём рамку внизу экрана mov eax, 13 mov ebx, 10 * 65536 + 290 mov ecx, 275 * 65536 + 160 mov edx, atcol int 0x40 mov ebx, 12 * 65536 + 286 mov ecx, 277 * 65536 + 156 mov edx, tcol int 0x40 ; рисуем выбранную вкладку mov al, [act_tab] cmp al, 2 je info_tab cmp al, 3 je test_tab cmp al, 4 je config_tab jmp about_tab end_drow_tab: mov eax, 12 mov ebx, 2 int 0x40 jmp wait_for_event ;--- Drow Info tab --------------- info_tab: include "tab_info.inc" ;--- Drow test tab --------------- test_tab: include "tab_test.inc" ;--- Drow Config tab ------------- config_tab: include "tab_conf.inc" ;--- Drow About tab -------------- about_tab: include "tab_about.inc" ;--------------------------------------------------------------------- include "system.inc" include "hwm.inc" include "diag.inc" DATA act_tab db 2 ; Номер активной вкладки tab_lab db 'Info Tests Configs About' title db 'Ghost Monitor v0.4 [20/12/06]' msgs_mon mls \ 'CPU Load (%)',\ 'Mem Usage(%)',\ 'Temp1',\ 'Temp2',\ 'Temp3',\ 'Fan1',\ 'Fan2',\ 'Fan3',\ 'Fan4',\ 'Fan5' msgs_mon2 mls \ 'Vcore',\ 'AGP',\ '+3.3V',\ 'AVcc (+5V)',\ '+12V',\ '-12V',\ '-5V' msg_yes db 'Yes' msg_no db 'N/A' update_time dd 300 ; период обновления в сотых долях секунды d_colors dd d_cpu_load, d_mem_usage, d_temp1, d_temp2, d_temp3 c_eps dd 0.01 ; Цвета графиков colors: dd 0xff0000, 0xff00, 0xff, 0xffffff, tcol, 0xFF7E23, 0x8BA169, 0xff0000 ; первый и последний равны colors_end: ;--------------------------------------------------------------------- UDATA test_pid dd ? ; если test_id == 0 - не имеет смысла test_id db ? ; 0 - тест не запушен (соответствует № кнопки 6..10) diag_add_v db ? ; 0 - не добавлять данные на график, !0 - добавлять Vendor: times 12 db ? CPU_fam: db ? CPU_mod: db ? CPU_type: db ? CPU_mmx: db ? ; Для реакции на изменения old_t1: dd ? ; последнее значение temp1 old_t2: dd ? ; ... old_t3: dd ? old_f1: dd ? old_f2: dd ? old_f3: dd ? old_volts: times 7 dd ? ; Грфики diag_beg: d_cpu_load: dd ? times 286 db ? d_mem_usage: dd ? times 286 db ? d_temp1: dd ? times 286 db ? d_temp2: dd ? times 286 db ? d_temp3: dd ? times 286 db ? diag_end: ; --- стек теста, воизбежание глюков не переносить в другое место ---- th_stack: times 1024 db ? stp: ;--------------------------------------------------------------------- MEOS_APP_END