forked from KolibriOS/kolibrios
546 lines
11 KiB
NASM
546 lines
11 KiB
NASM
;
|
|
; Ghost Monitor - óòèëèòà (ñòðåññ) òåñòèðîâàíèÿ è ìîíèòîðèíãà ñèñòåìû
|
|
; Copyright (C) 2005, 2006, 2007 Mihailov Ilia (ghost.nsk@mail.ru)
|
|
; All Right Reserved
|
|
;
|
|
; ÂÎÇÌÎÆÍÀ ÏÎÐ×À ÎÁÎÐÓÄÎÂÀÍÈß!
|
|
; ÈÑÏÎËÜÇÓÉÒÅ ÍÀ ÑÂÎÉ ÑÒÐÀÕ È ÐÈÑÊ!
|
|
;
|
|
; Çàìåòêè :
|
|
; Äîïèñàòü çàïóñê òåñòîâ (rtst) (íåò ðåàêöèè íà îøèáêó çàïóñêà)
|
|
; Ïåðåäåëàòü îáíîâëåíèå ãðàôèêà (ñäåëàòü îòäåëüíûì ïðîöåññîì)
|
|
; Äîáàâèòü ðåàêöèþ íà ïàðàìåòðû äàò÷èêîâ
|
|
;
|
|
|
|
; Âíåøíèå ôàéëû :
|
|
; 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 (tab_test.inc)
|
|
; 07 - P6 test (tab_test.inc)
|
|
; 08 - K6 test (tab_test.inc)
|
|
; 09 - K7 test (tab_test.inc)
|
|
; 10 - MMX test - not used (tab_test.inc)
|
|
; 11 - Update time increment (tab_conf.inc)
|
|
; 12 - Update time decriment (tab_conf.inc)
|
|
; 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 + 0x14000000 ; color of work area RRGGBB,8->color
|
|
mov edi, title ; 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
|
|
|
|
; Ïèøèì íàçâàíèÿ ïàðàìåòðîâ (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 [23/05/07]',0
|
|
|
|
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
|