WebSVN – Kolibri OS – Diff – /programs/network/dhcp/trunk/dhcp.asm

+;
 ;    Compile with FASM for Menuet
+;
 include 'lang.inc'
-include 'macros.inc'
+include '..\..\..\macros.inc'
 use32
-                org     0x0
+               org    0x0
-                db      'MENUET00'              ; 8 byte id
+	       db     'MENUET01'	    ; 8 byte id
+	       dd     0x01		    ; header version
-                dd      38                      ; required os
+	       dd     START		    ; start of code
-                dd      START                   ; program start
+	       dd     I_END		    ; size of image
-                dd      I_END                   ; program image size
+	       dd     I_END+0x8000	    ; memory for app
-                dd      0x100000                ; required amount of memory
+	       dd     I_END+0x8000	    ; esp
-                dd      0x00000000              ; reserved=no extended header
+	       dd     0x0 , 0x0 	    ; I_Param , I_Icon
 START:                                      ; start of execution
-START:                                      ; start of execution
+    mov     eax,40                          ; Report events
-    mov     eax,40                          ; Report events
+    mov     ebx,10000111b                   ; Stack 8 + defaults
-    mov     ebx,10000111b                   ; Stack 8 + defaults
+    int     0x40
     int     0x40
 red:                            ; redraw
     call    draw_window                     ; at first, draw the window
 still:
     mov     eax,10                          ; wait here for event
-    int     0x40
-    cmp     eax,1                           ; redraw request ?
-    jz      red
-    cmp     eax,2                           ; key in buffer ?
-    jz      key
+    mcall
     cmp     eax,3                           ; button in buffer ?
-    jz      button
+    cmp     eax,1                           ; redraw request ?
     jz      red
-    jmp     still
+    cmp     eax,2                           ; key in buffer ?
     jz      key
-red:                            ; redraw
+    cmp     eax,3                           ; button in buffer ?
-    call    draw_window
+    jz      button
     jmp     still
     jmp     still
 key:                            ; Keys are not valid at this part of the
     mov     eax,2               ; loop. Just read it and ignore
-    int     0x40
+    mcall
     jmp     still
 button:                         ; button
     mov     eax,17              ; get id
-    int     0x40
+    mcall
     mov     eax, 53
     mov     ebx, 0
     mov     ecx, 68                 ; local port dhcp client
     mov     edx, 67                 ; remote port - dhcp server
     mov     esi, 0xffffffff         ; broadcast
-    int     0x40
+    mcall
     mov     [socketNum], eax
     mov     eax, 53
     mov     ebx, 4
     mov     ecx, [socketNum]
     mov     edx, [dhcpMsgLen]
     mov     esi, dhcpMsg
-    int     0x40
+    mcall
     ; Setup the DHCP buffer to receive response
     ; UI close
     ; or data from remote
 ctr001:
     mov     eax,10                 ; wait here for event
-    int     0x40
+    mcall
     cmp     eax,1                  ; redraw request ?
     je      ctr003
     ; Any data in the UDP receive buffer?
     mov     eax, 53
     mov     ebx, 2
     mov     ecx, [socketNum]
-    int     0x40
+    mcall
     cmp     eax, 0
     je      ctr001
     ; we have data - this will be the response
 ctr002:
     mov     eax, 53
     mov     ebx, 3
     mov     ecx, [socketNum]
-    int     0x40                ; read byte - block (high byte)
+    mcall                ; read byte - block (high byte)
     ; Store the data in the response buffer
     mov     eax, [dhcpMsgLen]
     mov     [eax], bl
     inc     dword [dhcpMsgLen]
     mov     eax, 53
     mov     ebx, 2
 ctr006:
     ; close socket
     mov     eax, 53
     mov     ebx, 1
     mov     ecx, [socketNum]
-    int     0x40
+    mcall
     mov     [socketNum], dword 0xFFFF
     call    draw_window
     jmp     ctr001
 ctr004:                         ; key
     mov     eax,2               ; just read it and ignore
-    int     0x40
+    mcall
     jmp     ctr001
 ctr005:                         ; button
     mov     eax,17              ; get id
-    int     0x40
+    mcall
     ; close socket
     mov     eax, 53
     mov     ebx, 1
     mov     ecx, [socketNum]
 ipdisplay:
     mov     eax,47
     push    ecx
     movzx   ecx,byte [edi]
-    int     0x40
+    mcall
     pop     ecx
     add     edx,6*4*65536
     inc     edi
     cmp     edi,ecx
     imul    edx,6
     shl     edx,16
     add     edx,1*65536+99
     mov     ecx,[esp+20]
     mov     esi,0xffffff
-    int     0x40
+    mcall
     popa
     sub     ecx,4
     ret
 draw_window:
     mov     eax,12                    ; function 12:tell os about windowdraw
     mov     ebx,1                     ; 1, start of draw
-    int     0x40
+    mcall
                                       ; DRAW WINDOW
     mov     eax,0                     ; function 0 : define and draw window
-    mov     ebx,100*65536+300         ; [x start] *65536 + [x size]
-    mov     ecx,100*65536+156         ; [y start] *65536 + [y size]
-    mov     edx,0x03224466            ; color of work area RRGGBB
-    mov     esi,0x00334455            ; color of grab bar  RRGGBB,8->color gl
+    mov     ebx,100*65536+300         ; [x start] *65536 + [x size]
-    mov     edi,0x00ddeeff            ; color of frames    RRGGBB
-    int     0x40
-                                      ; WINDOW LABEL
-    mov     eax,4                     ; function 4 : write text to window
-    mov     ebx,8*65536+8             ; [x start] *65536 + [y start]
-    mov     ecx,0x00ffffff            ; color of text RRGGBB
+    mov     ecx,100*65536+156         ; [y start] *65536 + [y size]
-    mov     edx,labelt                ; pointer to text beginning
+    mov     edx,0x13224466            ; color of work area RRGGBB
-    mov     esi,labellen-labelt       ; text length
+    mov     edi,title                 ; WINDOW LABEL
-    int     0x40
+    mcall
     mov     eax,8                     ; Resolve
     mov     ebx,20*65536+90
     mov     ecx,127*65536+15
     mov     edx,3
     mov     esi,0x557799
-    int     0x40
+    mcall
     mov     edi, dhcpLease
     call    drawDHMS
     ; Re-draw the screen text
+    cld
-    cld
+    mov     eax,4
     mov     ebx,25*65536+35           ; draw info text with function 4
     mov     ecx,0xffffff
     mov     edx,text
-    mov     esi,40
     mov     esi,40
 newline:
-    mov     eax,4
-    int     0x40
+    mcall
     add     ebx,16
     add     edx,40
     cmp     [edx],byte 'x'
     jnz     newline
     mov     eax,12                    ; function 12:tell os about windowdraw
 dhms      db   '   d   h   m   s'
-forever   db   'Forever         '
 forever   db   'Forever         '
 labelt:   db   'DHCP Client Test'
-labellen:
+title   db   'DHCP Client Test',0

Subversion Repositories Kolibri OS

(root)/programs/network/dhcp/trunk/dhcp.asm – Rev 109 → 485