Subversion Repositories Kolibri OS

red_logon:

    call draw_window_logon	 ; at first, draw the window

still_logon:			 ; main cycle of application begins here

    mov  eax,10     ; wait here for event

    int  0x40

checkevent_logon:	  ; Check what event was called _logon: this will be used to return from textbox focus

    dec  eax	    ; redraw request ?

    jz	 red_logon

    dec  eax	    ; key in buffer ?

    jz	 key_logon

    dec  eax	    ; button in buffer ?

    jz	 button_logon

    jmp  still_logon

  key_logon:		 ; key event handler

    mov  al,2		 ; eax was zero so will now be 2

    int  0x40		 ; just read it and ignore

    cmp  ah,13

    jne  still_logon	 ; return to main loop

    ret 		 ; enter key was pressed => return to logon

  button_logon: 	 ; eax was zero so will now be 17

    mov  al,17		 ; get id

    int  0x40

    cmp  ah,1		 ; close ?

    jz	 close_logon

    cmp  ah,2		 ; logon ?

    je	 connect_logon

    cmp  ah,5		 ; first ?

    jz	 dstbtn_logon

  srcbtn_logon:

    mov  dword[addr],first

    jmp  rk_logon

  dstbtn_logon:

    mov  dword[addr],second

  rk_logon:

    mov  edi,[addr]	 ; load the address of the string

    xor  al,al		 ; mov  al,0          ; the symbol we will search for

    mov  ecx,STRLEN+1	 ; length of the string (+1)

    cld 		 ; search forward

  repne  scasb		 ; do search now

    inc  ecx		 ; we've found a zero or ecx became 0

    mov  eax,STRLEN+1

    sub  eax,ecx	 ; eax = address of <0> character

    mov  [temp],eax	 ; position

    cmp  dword[addr],dword second

    jne  @f

    mov  dword [passlen],eax

   @@:

    call print_text_logon

    mov  edi,[addr]	 ; address of string

    add  edi,[temp]	 ; cursor position

  .waitev_logon:

    mov  eax,10 	 ; wait for event

    int  0x40

    cmp  eax,2		 ; button presed ?

    jne  checkevent_logon    ; a key is pressed or redraw is nessesary, goto checkevent

    int  0x40		 ; eax = 2, read button

    shr  eax,8

    cmp  eax,8

    jnz  .nobs_logon	 ; BACKSPACE

    cmp  edi,[addr]

    jz	 .waitev_logon

    dec  edi

    mov  byte[edi],0

    cmp  dword[addr],second

    jne  @f

    dec  [passlen]

   @@:

    call print_text_logon

    jmp  .waitev_logon

  .nobs_logon:

    cmp  eax,13        ; ENTER

    je	 still_logon

    cmp  eax,192

    jne  .noclear_logon

    xor  al,al

    mov  edi,[addr]

    mov  ecx,STRLEN

    rep  stosb

    mov  edi,[addr]

    call print_text_logon

    jmp  .waitev_logon

  .noclear_logon:

    mov  [edi],al

    cmp  dword[addr],second

    jne  @f

    inc  [passlen]

   @@:

    call print_text_logon

    inc  edi

    mov  esi,[addr]

    add  esi,STRLEN

    cmp  esi,edi

    jnz  .waitev_logon

    jmp  still_logon

; print strings (source & destination)

print_text_logon:

pusha

    mov  eax, 8

    mov  ebx, 105*65536+200

    mov  ecx, 33*65536+12

    mov  edx, 4

    mov  esi, 0xEBEBEB

    int  0x40

    cmp  byte[mode],0

    je	 @f

    mov  ecx, 49*65536+12

    inc  edx

    int  0x40

   @@:

    mov  eax, 4 			; function 4 _logon: write text to window

    mov  ebx, 107*65536+34		; [x start] *65536 + [y start]

    xor  ecx, ecx			; color of text RRGGBB

    mov  edx, first			; pointer to text beginning

    mov  esi, STRLEN			; text length

    int  0x40

    cmp  byte[mode],0

    je	 dont_draw_pass

    add  ebx,16

    mov  edi,[passlen]

   @@:

    cmp  edi,0

    jle  dont_draw_pass

    dec  edi

    mov  edx, passchar

    mov  esi, 1

    int  0x40

    add  ebx,6*65536

    jmp  @r

  dont_draw_pass:

popa

    ret

close_logon:

    mov  eax,-1

    int  0x40

connect_logon:

    ret

draw_window_logon:

    mov  eax, 12			; function 12_logon:tell os about windowdraw

    mov  ebx, 1 			; 1, start of draw

    int  0x40

    pusha

					; DRAW WINDOW

    xor  eax, eax			; function 0 _logon: define and draw window

    mov  ebx, 160*65536+330		; [x start] *65536 + [x size]

    mov  ecx, 160*65536+100		; [y start] *65536 + [y size]

    mov  edx, 0x03DDDDDD		; color of work area RRGGBB

    int  0x40

    mov  eax, 8 			; LOGON BUTTON

    mov  ebx, 220*65536+85

    mov  ecx, 63*65536+16

    mov  edx, 2

    mov  esi, 0xCCCCCC

    int  0x40

    call print_text_logon

					; WINDOW LABEL

    mov  eax, 4 			; function 4 _logon: write text to window

    mov  ebx, 8*65536+8 		; [x start] *65536 + [y start]

    mov  ecx, 0x10ffffff		; color of text RRGGBB

    mov  edx, labelt			; pointer to text beginning

    mov  esi, labellen-labelt		; text length

    int  0x40

    cmp  byte[mode],0

    je	 servermode_

    mov  ebx, 25*65536+33		; [x start] *65536 + [y start]

    xor  ecx, ecx

    mov  edx, userstr			; pointer to text beginning

    mov  esi, passstr-userstr		; text length

    int  0x40

    add  bl,16

    mov  edx, passstr			; pointer to text beginning

    mov  esi, connect-passstr		; text length

    int  0x40

    jmp  drawtherest_

   servermode_:

    mov  ebx, 25*65536+33		; [x start] *65536 + [y start]

    xor  ecx, ecx

    mov  edx, serverstr 		; pointer to text beginning

    mov  esi, userstr-serverstr 	; text length

    int  0x40

   drawtherest_:

    mov  ebx, 240*65536+67		; [x start] *65536 + [y start]

    mov  edx, connect			; pointer to text beginning

    mov  esi, connect_e-connect 	; text length

    int  0x40

    popa

    inc   ebx

    int  0x40

    ret

; DATA AREA

labelt:  db 'Kolibrios VNC client by HIDNPLAYR'

labellen:

first:	      db '192.168.1.5'

	      rb STRLEN

second:       rb STRLEN

passchar      db '*'

passlen       dd 0

addr	      dd 0

temp	      dd 0

mode	      db 0 ; 0 = connection details, 1 = authentication

serverstr:    db 'server:'

userstr:      db 'username:'

passstr:      db 'password:'

connect:      db 'connect !'

connect_e:

I_END_logon: