mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-11-28 19:53:12 +03:00
217 lines
4.8 KiB
PHP
217 lines
4.8 KiB
PHP
;
|
|
; Ghost Monitor - óòèëèòà (ñòðåññ) òåñòèðîâàíèÿ è ìîíèòîðèíãà ñèñòåìû
|
|
; Copyright (C) 2005, 2006, 2007 Mihailov Ilia (ghost.nsk@mail.ru)
|
|
; All Right Reserved
|
|
|
|
; ABIT uGuru
|
|
;
|
|
; Chip Temp Volt Fan ISA SMBus LPC
|
|
; W83L950D(?) 3 11 5 - - +
|
|
|
|
|
|
; uGuru ports
|
|
UGURU_CMD_PORT equ 0x0e0
|
|
UGURU_DATA_PORT equ 0x0e4
|
|
; temp sensors
|
|
UGURU_CPUTEMP equ 0x2100
|
|
UGURU_SYSTEMP equ 0x2101
|
|
UGURU_PWMTEMP equ 0x210f
|
|
; fans. These are placed at bank 2
|
|
SENS_CPUFAN equ 0x2600
|
|
SENS_NBFAN equ 0x2601
|
|
SENS_SYSFAN equ 0x2602
|
|
SENS_AUXFAN1 equ 0x2603
|
|
SENS_AUXFAN2 equ 0x2604
|
|
; Voltage sensors
|
|
SENS_VCORE equ 0x2103 ; 3.49V max
|
|
SENS_DDRVDD equ 0x2104 ; 3.49V max
|
|
SENS_DDRVTT equ 0x210A ; 3.49V max
|
|
SENS_NBVDD equ 0x2108 ; 3.49V max
|
|
SENS_SBVDD equ 0x210E ; 3.49V max
|
|
SENS_HTV equ 0x2102 ; 3.49V max
|
|
SENS_AGP equ 0x2109 ; 3.49V max
|
|
SENS_5V equ 0x2106 ; 6.25V max
|
|
SENS_3V3 equ 0x2105 ; 4.36V max
|
|
SENS_5VSB equ 0x210B ; 6.25V max
|
|
SENS_3VDUAL equ 0x210D ; 4.36V max
|
|
; Voltage ADC multipliers
|
|
MLTP_3V49 equ 0.0136862745098039
|
|
MLTP_4V36 equ 0.0170980392156863
|
|
MLTP_6V25 equ 0.0245098039215686
|
|
|
|
|
|
v_addr: dw SENS_VCORE, SENS_DDRVDD, SENS_DDRVTT, SENS_NBVDD, SENS_SBVDD
|
|
dw SENS_HTV, SENS_AGP, SENS_5V, SENS_3V3, SENS_5VSB, SENS_3VDUAL
|
|
|
|
v_mult: dd MLTP_3V49, MLTP_3V49, MLTP_3V49, MLTP_3V49, MLTP_3V49, MLTP_3V49
|
|
dd MLTP_3V49, MLTP_6V25, MLTP_4V36, MLTP_6V25, MLTP_4V36
|
|
|
|
|
|
msg_uguru: db 'ABIT uGuru', 0
|
|
|
|
;-----------------------------------
|
|
uGuru_init:
|
|
; Ïðîâåðêà íàëè÷èÿ è èíèöèàëèçàöèÿ
|
|
; OUT - CF = 1 - error
|
|
cmp byte[acc_type], 2 ; Special IO interface
|
|
jne .uGuru_no
|
|
pusha
|
|
mov ecx, UGURU_CMD_PORT
|
|
mov edx, UGURU_DATA_PORT
|
|
call ReservePorts
|
|
jc .no_lpc
|
|
in al, UGURU_CMD_PORT
|
|
test al, al
|
|
jz @f
|
|
cmp al, 0xac
|
|
jne .bad_sig
|
|
@@: in al, UGURU_DATA_PORT
|
|
test al, al
|
|
jz @f
|
|
cmp al, 8
|
|
jne .bad_sig
|
|
@@: mov [hwm_chip_name], msg_uguru
|
|
popa
|
|
clc
|
|
ret
|
|
.bad_sig:
|
|
; popa ;
|
|
; clc ; <- uncomment this three line, if you certain that you
|
|
; ret ; have ABIT uGuru but he is not defined
|
|
.no_lpc:
|
|
mov ecx, UGURU_CMD_PORT
|
|
mov edx, UGURU_DATA_PORT
|
|
call FreePorts
|
|
popa
|
|
.uGuru_no:
|
|
stc
|
|
ret
|
|
;-----------------------------------
|
|
uGuru_getparam:
|
|
; Temperature
|
|
mov ax, UGURU_CPUTEMP
|
|
call uGuru_ReadSensor
|
|
mov [hwm_temps + 0], al
|
|
mov ax, UGURU_SYSTEMP
|
|
call uGuru_ReadSensor
|
|
mov [hwm_temps + 1], al
|
|
mov ax, UGURU_PWMTEMP
|
|
call uGuru_ReadSensor
|
|
mov [hwm_temps + 2], al
|
|
; Fan speed
|
|
mov ax, SENS_CPUFAN
|
|
call uGuru_ReadSensor
|
|
mov dl, 60
|
|
mul dl
|
|
mov word[hwm_rpms + 0 ], ax
|
|
mov ax, SENS_NBFAN
|
|
call uGuru_ReadSensor
|
|
mov dl, 60
|
|
mul dl
|
|
mov word[hwm_rpms + 4 ], ax
|
|
mov ax, SENS_SYSFAN
|
|
call uGuru_ReadSensor
|
|
mov dl, 60
|
|
mul dl
|
|
mov word[hwm_rpms + 8 ], ax
|
|
mov ax, SENS_AUXFAN1
|
|
call uGuru_ReadSensor
|
|
mov dl, 60
|
|
mul dl
|
|
mov word[hwm_rpms + 12], ax
|
|
mov ax, SENS_AUXFAN2
|
|
call uGuru_ReadSensor
|
|
mov dl, 60
|
|
mul dl
|
|
mov word[hwm_rpms + 16], ax
|
|
; voltages
|
|
cld ; Paranoia
|
|
xor ecx, ecx
|
|
mov esi, v_addr
|
|
@@: push ecx
|
|
lodsw
|
|
call uGuru_ReadSensor
|
|
movzx eax, al
|
|
fld dword[v_mult + ecx * 4]
|
|
push eax
|
|
fild dword [esp]
|
|
fmulp st1, st0
|
|
fstp dword [hwm_voltages + ecx * 4]
|
|
pop eax
|
|
pop ecx
|
|
inc ecx
|
|
cmp ecx, 11 ; <-- êîëè÷åñòâî äàò÷èêîâ (ADC Vin)
|
|
jne @b
|
|
|
|
ret
|
|
;-----------------------------------
|
|
uGuru_ReadSensor:
|
|
; Read a sensor
|
|
; In : ax - sensorID
|
|
; Out : al - result
|
|
mov ebx, eax ; Ask to read from uGuru
|
|
shr eax, 8
|
|
out UGURU_DATA_PORT, al
|
|
mov ecx, 1000 ; I guess this is to se if uGuru is ready to take a command
|
|
.is_ready:
|
|
in al, UGURU_DATA_PORT
|
|
dec ecx
|
|
jnz @f
|
|
xor al, al
|
|
ret
|
|
@@: cmp al, 8
|
|
jne .is_ready
|
|
mov al, bl ; Whitch sensor to read?
|
|
out UGURU_CMD_PORT, al
|
|
mov ecx, 1000 ; Wait until uGuru is ready to be read
|
|
.is_ready2:
|
|
in al, UGURU_DATA_PORT
|
|
dec ecx
|
|
jnz @f
|
|
xor al, al
|
|
ret
|
|
@@: cmp al, 1
|
|
jne .is_ready2
|
|
in al, UGURU_CMD_PORT ; Read the sensor
|
|
push eax
|
|
call uGuru_Ready ; Put the chip in ready state
|
|
pop eax ; Return the result of the sensor
|
|
ret
|
|
;-----------------------------------
|
|
uGuru_Ready:
|
|
; Put uGuru in ready state. uGuru will hold 0x08 at Data port and 0xAC at Command port after this.
|
|
; Out : CF = 1 - error
|
|
; Wait until uGuru is in ready-state
|
|
; The loop shouldn't be needed to execut more then one time
|
|
mov edx, 1000
|
|
.nxt: in al, UGURU_DATA_PORT
|
|
cmp al, 8
|
|
je .ok
|
|
xor al, al ; after 0x00 is written to Data port
|
|
out UGURU_DATA_PORT, al
|
|
mov ecx, 1000 ; Wait until 0x09 is read at Data port
|
|
.is_ready:
|
|
in al, UGURU_DATA_PORT
|
|
dec ecx
|
|
jnz @f
|
|
stc
|
|
ret
|
|
@@: cmp al, 9
|
|
jne .is_ready
|
|
mov ecx, 1000 ; Wait until 0xAC is read at Cmd port
|
|
.is_ready2:
|
|
in al, UGURU_CMD_PORT
|
|
dec ecx
|
|
jnz @f
|
|
stc
|
|
ret
|
|
@@: cmp al, 0xAC
|
|
jne .is_ready2
|
|
dec edx ; Prevent a lockup
|
|
jnz .nxt
|
|
stc
|
|
ret
|
|
.ok: clc
|
|
ret
|
|
|