keXa/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Keyboard support for netstat (tab, pgup, pgdown)

Browse Source 
git-svn-id: svn://kolibrios.org@4742 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
hidnplayr 2014-04-03 18:39:49 +00:00
parent fd06243954
commit c7a37fb7d3
1 changed files with 45 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
programs/network/netstat/netstat.asm
View File

@ -40,13 +40,12 @@ macro DrawRectangle x, y, w, h, color
START:
mcall 40, EVM_REDRAW + EVM_BUTTON + EVM_STACK2
mcall 40, EVM_REDRAW + EVM_BUTTON + EVM_STACK2 + EVM_KEY
window_redraw:
mcall 12, 1
mcall 0, 100 shl 16 + 600, 100 shl 16 + 240, 0x34E1E1E1, , name ; draw window
DrawRectangle 0, 25, 400, 180, 0x777777
mcall 12, 2
redraw:
mcall 13, 1 shl 16 + 399, 26 shl 16 + 179, 0x00F3F3F3
@ -208,10 +207,10 @@ redraw:
mov edx, str_dumped
mcall
end_of_draw:
mcall 12, 2
draw_stats:
cmp [mode], 101
@ -536,10 +535,12 @@ mainloop:
mcall 23, 50 ; wait for event with timeout (0,5 s)
cmp eax, 1
cmp eax, EV_REDRAW
je window_redraw
cmp eax, 3
cmp eax, EV_BUTTON
je button
cmp eax, EV_KEY
je key
cmp eax, 11
je redraw
@ -559,6 +560,39 @@ button: ; button
mov [device], al
jmp redraw
key:
mcall 2
cmp ah, 9
je .tab
cmp ah, 183
je .pgdown
cmp ah, 184
je .pgup
jmp mainloop
.tab:
inc [mode]
cmp [mode], 106
jbe redraw
mov [mode], 101
jmp redraw
.pgdown:
inc [device]
mov al, [device]
cmp al, [last_device]
jbe redraw
mov [device], 0
jmp redraw
.pgup:
dec [device]
cmp [device], 0
jge redraw
mov al, [last_device]
mov [device], al
jmp redraw
exit:
mcall -1
@ -634,6 +668,8 @@ draw_interfaces:
mcall 74, -1 ; get number of active network devices
mov ecx, eax
dec al
mov [last_device], al
xor ebx, ebx ; get device type
.loop:
@ -681,9 +717,10 @@ draw_interfaces:
; DATA AREA
name db 'Netstat', 0
name db 'Network status', 0
mode db 101
device db 0
last_device db 0
device_type dd 0
last dd 0
modes db 'Physical IPv4 ARP ICMP UDP TCP', 0
@ -710,6 +747,4 @@ str_ARP_entry db ' . . . - - - - -', 0
namebuf rb 64
arp_buf ARP_entry
I_END:
I_END: