WebSVN – Kolibri OS – Diff – /programs/network/vncc/logon.inc

+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;                                                                 ;;
+;; Copyright (C) KolibriOS team 2010-2015. All rights reserved.    ;;
+;; Distributed under terms of the GNU General Public License       ;;
+;;                                                                 ;;
+;;  VNC client for KolibriOS                                       ;;
+;;                                                                 ;;
-red_logon:
+;;  Written by hidnplayr@kolibrios.org                             ;;
+;;                                                                 ;;
+;;          GNU GENERAL PUBLIC LICENSE                             ;;
-    call draw_window_logon       ; at first, draw the window
+;;             Version 2, June 1991                                ;;
+;;                                                                 ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-still_logon:                     ; main cycle of application begins here
-    mov  eax,10     ; wait here for event
-    mcall
-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
-    mcall                ; 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
-    mcall
-    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
-    mcall
-    cmp  eax,2           ; button presed ?
-    jne  checkevent_logon    ; a key is pressed or redraw is nessesary, goto checkevent
-    mcall                ; 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, 31*65536+13
-    mov  edx, 4
-    mov  esi, 0xEBEBEB
-    mcall
-    cmp  byte[mode],0
-    je   @f
-    mov  ecx, 49*65536+12
-    inc  edx
-    mcall
-   @@:
+logon:
-    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
-    mcall
-    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
-    mcall
-    add  ebx,6*65536
-    jmp  @r
-  dont_draw_pass:
-popa
-    ret
-close_logon:
-    or  eax,-1
-    mcall
-connect_logon:
-    ret
+        mcall   40, EVM_MOUSE + EVM_MOUSE_FILTER + EVM_REDRAW + EVM_BUTTON + EVM_KEY
 draw_window_logon:
   .redraw:
-    mcall 12, 1      ; start window draw
+        mcall   12, 1           ; start window draw
-    pusha
+        pusha
-                                        ; DRAW WINDOW
+                                                ; DRAW WINDOW
-    xor  eax, eax                       ; function 0 _logon: define and draw window
+        xor     eax, eax                        ; function 0 _logon: define and draw window
-    mov  ebx, 160*65536+330             ; [x start] *65536 + [x size]
+        mov     ebx, 160 shl 16 + 330           ; [x start]:[x size]
-    mov  ecx, 160*65536+100             ; [y start] *65536 + [y size]
+        mov     ecx, 160 shl 16 + 100           ; [y start]:[y size]
-    mov  edx, 0x13DDDDDD                ; color of work area RRGGBB
+        mov     edx, 0x34DDDDDD                 ; color of work area RRGGBB
-    mov  edi, title                     ; WINDOW LABEL
+        mov     edi, name                       ; WINDOW LABEL
-    mcall
+        mcall
-    mov  eax, 8                         ; LOGON BUTTON
+        mov     eax, 8                          ; LOGON BUTTON
-    mov  ebx, 220*65536+85
+        mov     ebx, 220 shl 16 + 85
-    mov  ecx, 63*65536+16
+        mov     ecx, 47 shl 16 + 16
-    mov  edx, 2
-    mov  esi, 0xCCCCCC
-    mcall
         mov     edx, 2
+        mov     esi, 0xCCCCCC
-    call print_text_logon
+        mcall
-    cmp  byte[mode], 0
+        cmp     byte[mode], 0
-    je   servermode_
+        je      .servermode
-    mov  eax, 4                         ; function 4 write text to window
+        mov     eax, 4                          ; function 4 write text to window
-    mov  ebx, 25*65536+33               ; [x start] *65536 + [y start]
+        mov     ebx, 25 shl 16 + 15             ; [x start]:[y start]
-    xor  ecx, ecx
+        xor     ecx, ecx
-    mov  edx, userstr                   ; pointer to text beginning
+        mov     edx, userstr                    ; pointer to text beginning
-    mov  esi, passstr-userstr           ; text length
+        mov     esi, passstr-userstr            ; text length
-    mcall
+        mcall
-    add  bl,19
-    mov  edx, passstr                   ; pointer to text beginning
+        add     bl, 19
-    mov  esi, connectstr-passstr           ; text length
+        mov     edx, passstr                    ; pointer to text beginning
-    mcall
+        mov     esi, connectstr-passstr         ; text length
         mcall
     jmp  drawtherest_
         jmp     .drawtherest
-   servermode_:
+   .servermode:
+        mov     eax, 4                          ; function 4 write text to window
-    mov  eax, 4                         ; function 4 write text to window
+        mov     ebx, 25 shl 16 + 15             ; [x start] *65536 + [y start]
-    mov  ebx, 25*65536+33               ; [x start] *65536 + [y start]
+        xor     ecx, ecx
-    xor  ecx, ecx
+        mov     edx, serverstr                  ; pointer to text beginning
-    mov  edx, serverstr                 ; pointer to text beginning
+        mov     esi, userstr-serverstr          ; text length
-    mov  esi, userstr-serverstr         ; text length
+        mcall
     mcall
+        invoke  edit_box_draw, URLbox
+   .drawtherest:
+        mov     ebx, 240 shl 16 + 49            ; [x start] *65536 + [y start]
+        mov     edx, connectstr                 ; pointer to text beginning
+        mov     esi, connect_e-connectstr       ; text length
+        mcall
+        popa
+        inc     ebx
+        mcall
+  .loop:
+        mcall   10                      ; wait for event
+        dec     eax             ; redraw request ?
+        jz      .redraw
+        dec     eax             ; key in buffer ?
+        jz      .key
+        dec     eax             ; button in buffer ?
+        jz      .btn
+        sub     eax, 3
+        jz      .mouse
+        jmp     .loop
+  .key:                         ; key event handler
         mcall   2               ; read key
+        test    [URLbox.flags], ed_focus
+        jz      mainloop
+        cmp     ah, 13          ; enter (return) key
+        je      .go
+        invoke  edit_box_key, URLbox
+        jmp     .loop
+  .go:
-   drawtherest_:
+        mov     eax, [URLbox.pos]
+        mov     byte[serveraddr+eax], 0
+        ret
+  .btn:
-    mov  ebx, 240*65536+67              ; [x start] *65536 + [y start]
+        mcall   17              ; get id
-    mov  edx, connectstr                   ; pointer to text beginning
+        cmp     ah, 1           ; close ?
+        jz      .close
-    mov  esi, connect_e-connectstr         ; text length
+        cmp     ah, 2           ; logon ?
-    mcall
+        je      .go
-    popa
+        jmp     .loop
     inc   ebx
-    mcall
+  .mouse:
+        mcall   23
-    ret
+        invoke  edit_box_mouse, URLbox
+        jmp     .loop
 ; DATA AREA
-title  db 'Kolibrios VNC client by HIDNPLAYR',0
+  .close:

Subversion Repositories Kolibri OS

(root)/programs/network/vncc/logon.inc – Rev 3545 → 5663