forked from KolibriOS/kolibrios
App allows controlling pins of FTDI chip in SyncBB mode. Very first version, UI problems
git-svn-id: svn://kolibrios.org@5034 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
gtament
parent
05b46beb07
commit
69c37e86f7
386
programs/other/ft232cc/ft232cc.asm
Normal file
386
programs/other/ft232cc/ft232cc.asm
Normal file
@ -0,0 +1,386 @@
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; ;;
|
||||
;; Copyright (C) KolibriOS team 2004-2014. All rights reserved. ;;
|
||||
;; Distributed under terms of the GNU General Public License ;;
|
||||
;; ;;
|
||||
;; FT232 SyncBB mode demonstration for KolibriOS ;;
|
||||
;; ;;
|
||||
;; Written by gtament@gmail.com ;;
|
||||
;; ;;
|
||||
;; GNU GENERAL PUBLIC LICENSE ;;
|
||||
;; Version 2, June 1991 ;;
|
||||
;; ;;
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
format binary as ""
|
||||
use32
|
||||
org 0x0
|
||||
|
||||
; The header
|
||||
|
||||
db 'MENUET01'
|
||||
dd 0x01
|
||||
dd INIT
|
||||
dd I_END
|
||||
dd 0x100000
|
||||
dd 0x7fff0
|
||||
dd 0, 0
|
||||
|
||||
; The code area
|
||||
|
||||
include '../../macros.inc'
|
||||
include '../../debug.inc'
|
||||
|
||||
struct IOCTL
|
||||
handle dd ?
|
||||
io_code dd ?
|
||||
input dd ?
|
||||
inp_size dd ?
|
||||
output dd ?
|
||||
out_size dd ?
|
||||
ends
|
||||
|
||||
BUTTONXSIZE = 60
|
||||
BUTTONYSIZE = 60
|
||||
BUTTONXSTART= 20
|
||||
BUTTONYSTART= 50
|
||||
BUTTONXSPACE= 10
|
||||
BUTTONCOUNT = 8
|
||||
ONCOLOR = 0x0018c015
|
||||
OFFCOLOR = 0x00db2521
|
||||
|
||||
INIT:
|
||||
mov [btn_state], 0xFF
|
||||
mov [btn_io], 0xFF
|
||||
|
||||
mcall 68, 11
|
||||
call draw_window
|
||||
mov edi, drv_name
|
||||
mcall 68, 16, edi
|
||||
cmp eax, 0
|
||||
jnz @f
|
||||
debug_print 'Error while loading driver\n'
|
||||
@@:
|
||||
mov [IOCTLs+IOCTL.handle], eax
|
||||
mov eax, 8
|
||||
mov [IOCTLs+IOCTL.inp_size], eax
|
||||
mov [IOCTLs+IOCTL.out_size], eax
|
||||
mov eax, out_buf
|
||||
mov [IOCTLs+IOCTL.output], eax
|
||||
mov eax, in_buf
|
||||
mov [IOCTLs+IOCTL.input], eax
|
||||
|
||||
call drivercomm.getlist
|
||||
call drivercomm.getlock
|
||||
call drivercomm.bitmode
|
||||
call drivercomm.baud
|
||||
|
||||
event_wait:
|
||||
mov eax, 10
|
||||
mcall
|
||||
|
||||
cmp eax, 1 ; Event redraw request ?
|
||||
je redraw
|
||||
|
||||
cmp eax, 2 ; Event key in buffer ?
|
||||
je key
|
||||
|
||||
cmp eax, 3 ; Event button in buffer ?
|
||||
je button
|
||||
|
||||
jmp event_wait
|
||||
|
||||
redraw:
|
||||
call draw_window
|
||||
jmp event_wait
|
||||
|
||||
key:
|
||||
mcall 2
|
||||
cmp ah, '8'
|
||||
jg event_wait
|
||||
cmp ah, '1'
|
||||
jl event_wait
|
||||
sub ah, 0x2F
|
||||
jmp button.noclose
|
||||
|
||||
button:
|
||||
mov eax,17
|
||||
mcall
|
||||
|
||||
cmp ah, 1
|
||||
jle .noclose
|
||||
call drivercomm.unlock
|
||||
mov eax, -1
|
||||
mcall
|
||||
|
||||
.noclose:
|
||||
cmp ah, 10
|
||||
jge .toggleb
|
||||
movzx edx, ah
|
||||
dec ah
|
||||
dec ah
|
||||
mov cl, ah
|
||||
mov ah ,1
|
||||
shl ah, cl
|
||||
xor byte[btn_state], ah
|
||||
push edx
|
||||
call drivercomm.write
|
||||
call drivercomm.read
|
||||
pop edx
|
||||
call redraw_obutton
|
||||
jmp event_wait
|
||||
|
||||
.toggleb:
|
||||
cmp ah, 18
|
||||
jg event_wait
|
||||
movzx edx, ah
|
||||
mov cl, ah
|
||||
sub cl, 10
|
||||
mov ah, 1
|
||||
shl ah, cl
|
||||
xor byte[btn_io], ah
|
||||
call draw_tbutton
|
||||
jmp event_wait
|
||||
|
||||
drivercomm: ;Driver communication procs
|
||||
.baud:
|
||||
mov [IOCTLs+IOCTL.io_code], 10
|
||||
mov edi, in_buf
|
||||
mov eax, [pid]
|
||||
mov [edi], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
mov [edi+8], dword 9600
|
||||
mcall 68, 17, IOCTLs
|
||||
ret
|
||||
|
||||
.write:
|
||||
mov [IOCTLs+IOCTL.io_code], 8
|
||||
mov edi, in_buf
|
||||
mov eax, [pid]
|
||||
mov [edi], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
mov [edi+8], dword 1
|
||||
mov al, [btn_state]
|
||||
mov byte[edi+12], al
|
||||
mcall 68, 17, IOCTLs
|
||||
ret
|
||||
|
||||
.read:
|
||||
mov [IOCTLs+IOCTL.io_code], 9
|
||||
mov edi, in_buf
|
||||
mov eax, [pid]
|
||||
mov [edi], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
mov [edi+8], dword 1
|
||||
mcall 68, 17, IOCTLs
|
||||
mov al, byte[out_buf]
|
||||
mov [btn_state], al
|
||||
newline
|
||||
ret
|
||||
|
||||
.getlock:
|
||||
mcall 9, thread_inf, 0
|
||||
mov eax, dword[thread_inf+30]
|
||||
mov [pid], eax
|
||||
mov edi, in_buf
|
||||
mov [edi], eax
|
||||
mov eax, 2
|
||||
mov [IOCTLs+IOCTL.io_code], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
mov eax, 8
|
||||
mov [IOCTLs+IOCTL.inp_size], eax
|
||||
mcall 68, 17, IOCTLs
|
||||
ret
|
||||
|
||||
.getlist:
|
||||
mov eax, 1
|
||||
mov [IOCTLs+IOCTL.io_code], eax
|
||||
mcall 68, 17, IOCTLs
|
||||
mov edi, out_buf
|
||||
mov eax, [edi+12]
|
||||
mov [dev], eax
|
||||
ret
|
||||
|
||||
.bitmode:
|
||||
mov [IOCTLs+IOCTL.io_code], 11
|
||||
mov edi, in_buf
|
||||
mov eax, [pid]
|
||||
mov [edi], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
xor eax, eax
|
||||
mov al, [btn_io]
|
||||
mov ah, 0x04
|
||||
mov [edi+8], eax
|
||||
mcall 68, 17, IOCTLs
|
||||
ret
|
||||
|
||||
.unlock:
|
||||
mov eax, [pid]
|
||||
mov edi, in_buf
|
||||
mov [edi], eax
|
||||
mov eax, 3
|
||||
mov [IOCTLs+IOCTL.io_code], eax
|
||||
mov eax, [dev]
|
||||
mov [edi+4], eax
|
||||
mov eax, 8
|
||||
mov [IOCTLs+IOCTL.inp_size], eax
|
||||
mcall 68, 17, IOCTLs
|
||||
ret
|
||||
|
||||
; *********************************************
|
||||
; ****** WINDOW DEFINITIONS AND DRAW ********
|
||||
; *********************************************
|
||||
|
||||
draw_window:
|
||||
mov eax, 12
|
||||
mov ebx, 1
|
||||
mcall
|
||||
|
||||
mov eax, 0
|
||||
mov ebx, 100 * 65536 + (BUTTONXSIZE+BUTTONXSPACE)*BUTTONCOUNT+BUTTONXSTART*2
|
||||
mov ecx, 100 * 65536 + 120
|
||||
mov edx, 0x14E1E1E1
|
||||
mov esi, 0x808899ff
|
||||
mov edi, title
|
||||
mcall
|
||||
|
||||
mov edx, BUTTONCOUNT+1
|
||||
.oloop:
|
||||
push edx
|
||||
call draw_obutton
|
||||
pop edx
|
||||
dec edx
|
||||
cmp edx, 1
|
||||
jnz .oloop
|
||||
|
||||
mov edx, BUTTONCOUNT+9
|
||||
.tloop:
|
||||
push edx
|
||||
call draw_tbutton
|
||||
pop edx
|
||||
dec edx
|
||||
cmp edx, 9
|
||||
jnz .tloop
|
||||
|
||||
mov eax, 12
|
||||
mov ebx, 2
|
||||
mcall
|
||||
ret
|
||||
|
||||
redraw_obutton:
|
||||
mov eax, 8
|
||||
push edx
|
||||
or edx, 0x80 shl 24
|
||||
mcall
|
||||
pop edx
|
||||
draw_obutton:
|
||||
mov ecx, edx
|
||||
dec ecx
|
||||
dec ecx
|
||||
xor ebx, ebx
|
||||
mov bl, [btn_state]
|
||||
mov bh, 1
|
||||
shl bh, cl
|
||||
and bl, bh
|
||||
jz .off
|
||||
mov esi, ONCOLOR
|
||||
jmp .aftercolor
|
||||
.off:
|
||||
mov esi, OFFCOLOR
|
||||
.aftercolor:
|
||||
mov bl, [btn_io]
|
||||
and bl, bh
|
||||
jne .output
|
||||
or edx, 1 shl 29
|
||||
.output:
|
||||
push ecx
|
||||
imul bx, cx, word(BUTTONXSPACE+BUTTONXSIZE)
|
||||
add bx, BUTTONXSTART
|
||||
imul ebx, 65536
|
||||
add ebx, BUTTONXSIZE
|
||||
mov ecx, BUTTONYSTART*65536+BUTTONYSIZE
|
||||
mcall 8
|
||||
pop ecx
|
||||
xor ebx, ebx
|
||||
mov bl, [btn_io]
|
||||
mov bh, 1
|
||||
shl bh, cl
|
||||
and bl, bh
|
||||
jnz .text
|
||||
ret
|
||||
.text:
|
||||
mov bl, [btn_state]
|
||||
and bl, bh
|
||||
jz .off_text
|
||||
mov edx, on_text
|
||||
jmp .aftertext
|
||||
.off_text:
|
||||
mov edx, off_text
|
||||
.aftertext:
|
||||
imul bx, cx, word(BUTTONXSPACE+BUTTONXSIZE)
|
||||
add bx, (BUTTONXSTART + (BUTTONXSIZE/2)-5)
|
||||
shl ebx, 16
|
||||
add ebx, BUTTONYSTART + (BUTTONYSIZE/2)
|
||||
mcall 4,,1 shl 31
|
||||
ret
|
||||
|
||||
draw_tbutton:
|
||||
mov ecx, edx
|
||||
sub ecx, 10
|
||||
push edx ecx
|
||||
or edx, 1 shl 31
|
||||
mcall 8
|
||||
xor edi, edi
|
||||
imul di, cx, word(BUTTONXSPACE+BUTTONXSIZE)
|
||||
push edi
|
||||
shl edi, 16
|
||||
mov ebx, (BUTTONXSTART)*65536+BUTTONYSTART-12
|
||||
add ebx, edi
|
||||
mcall 4,, 1 shl 31, i_text
|
||||
mov ebx, (BUTTONXSTART+5)*65536+BUTTONXSIZE-5*2
|
||||
add ebx, edi
|
||||
mcall 13,, (BUTTONYSTART-13)*65536+9, 0xFFFFFF
|
||||
mov ebx, (BUTTONXSTART+BUTTONXSIZE-4)*65536+BUTTONYSTART-12
|
||||
add ebx, edi
|
||||
mcall 4,, 1 shl 31, o_text
|
||||
pop edi ecx edx
|
||||
mov ebx, edi
|
||||
add ebx, (BUTTONXSTART+7)
|
||||
mov al, [btn_io]
|
||||
mov ah, 1
|
||||
shl ah, cl
|
||||
and al, ah
|
||||
jz .input
|
||||
add ebx, (BUTTONXSIZE-14)/2
|
||||
.input:
|
||||
shl ebx, 16
|
||||
add ebx, (BUTTONXSIZE-14)/2
|
||||
mcall 8,,(BUTTONYSTART-12)*65536+6,, 0x00576B8C
|
||||
ret
|
||||
|
||||
; *********************************************
|
||||
; ************* DATA AREA *****************
|
||||
; *********************************************
|
||||
|
||||
btn_state db ?
|
||||
btn_io db ?
|
||||
dev dd ?
|
||||
pid dd ?
|
||||
counter dd ?
|
||||
drv_name db 'usbother', 0
|
||||
off_text db 'OFF', 0
|
||||
on_text db 'ON', 0
|
||||
i_text db 'I', 0
|
||||
o_text db 'O', 0
|
||||
out_buf rd 10
|
||||
in_buf rd 10
|
||||
IOCTLs rd 6
|
||||
thread_inf rb 1024
|
||||
title db "FT232 Control Center", 0
|
||||
|
||||
I_END:
|
||||
Loading…
Reference in New Issue
Block a user