Subversion Repositories Kolibri OS

Rev

Rev 1297 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1297 Rev 1301
Line 442... Line 442...
442
    je      os_exit
442
    je      os_exit
Line 443... Line 443...
443
 
443
 
444
    ; The TCP/IP transmit queue is full; Wait a bit, then retry
444
    ; The TCP/IP transmit queue is full; Wait a bit, then retry
445
    pusha
445
    pusha
446
    mov     eax,5
446
    mov     eax,5
447
    mov     ebx,1                 ; Delay for up 100ms
447
    mov     ebx,1                 ; Delay for up 10ms
448
    mcall
448
    mcall
449
    popa
449
    popa
450
    jmp     outputStr
450
    jmp     outputStr
451
os_exit:
451
os_exit:
Line 479... Line 479...
479
    je      ods_exit
479
    je      ods_exit
Line 480... Line 480...
480
 
480
 
481
    ; The TCP/IP transmit queue is full; Wait a bit, then retry
481
    ; The TCP/IP transmit queue is full; Wait a bit, then retry
482
    pusha
482
    pusha
483
    mov     eax,5
483
    mov     eax,5
484
    mov     ebx,20           ; Delay for upto 200ms
484
    mov     ebx,1                 ; Delay for up 10ms
485
    mcall
485
    mcall
486
    popa
486
    popa
487
    jmp     outputDataStr
487
    jmp     outputDataStr
488
ods_exit:
488
ods_exit:
Line 1064... Line 1064...
1064
 
1064
 
1065
    ; init fileblock descriptor, for file read
1065
    ; init fileblock descriptor, for file read
1066
    mov     ebx, fileinfoblock
1066
    mov     ebx, fileinfoblock
1067
    and     dword [ebx], 0 ; read cmd
1067
    and     dword [ebx], 0 ; read cmd
-
 
1068
    and     dword [ebx+4], 0 ; first block
Line 1068... Line 1069...
1068
    and     dword [ebx+4], 0 ; first block
1069
    mov     dword [ebx+12], 0x400 ; block size
1069
 
1070
 
1070
sf002a:
1071
sf002a:
1071
    ; now read the file..
1072
    ; now read the file..
Line 1083... Line 1084...
1083
    pop     eax
1084
    pop     eax
1084
    test    eax, eax
1085
    test    eax, eax
1085
    jnz     sf_exit
1086
    jnz     sf_exit
1086
; wait a bit
1087
; wait a bit
1087
    mov     eax, 5
1088
    mov     eax, 5
1088
    mov     ebx, 10
1089
    mov     ebx, 1
1089
    mcall
1090
    mcall
1090
    mov     ebx, fileinfoblock
1091
    mov     ebx, fileinfoblock
1091
    add     dword [ebx+4], edx
1092
    add     dword [ebx+4], edx
1092
    jmp     sf002a
1093
    jmp     sf002a
Line 1138... Line 1139...
1138
    mcall
1139
    mcall
1139
    test    eax, eax
1140
    test    eax, eax
1140
    je      gf_sleep
1141
    je      gf_sleep
Line 1141... Line 1142...
1141
 
1142
 
1142
    mov     eax, 53
1143
    mov     eax, 53
1143
    mov     ebx, 3                  ; Get a byte from socket in bl
1144
    mov     ebx, 11                 ; Get a bytes from socket
1144
    mov     ecx, [DataSocket]
-
 
1145
    mcall                    ; returned data in bl
-
 
1146
 
1145
    mov     ecx, [DataSocket]
1147
    mov     esi, text + 0x1300
1146
    mov     edx, text + 0x1300
1148
    add     esi, dword [fsize]
1147
    add     edx, dword [fsize]
1149
    mov     [esi], bl
1148
    mcall                           ; returned data len in eax
1150
    inc     dword [fsize]
-
 
1151
 
-
 
1152
    ; dummy, write to screen
-
 
Line 1153... Line 1149...
1153
    ;call    printChar
1149
    add     dword [fsize], eax
Line 1154... Line 1150...
1154
 
1150
 
1155
    jmp     gf000
1151
    jmp     gf000
Line 1174... Line 1170...
1174
    ret                         ; Finished
1170
    ret                         ; Finished
Line 1175... Line 1171...
1175
 
1171
 
1176
gf001:
1172
gf001:
1177
    ; wait a bit
1173
    ; wait a bit
1178
    mov     eax,5
1174
    mov     eax,5
1179
    mov     ebx,10              ; Delay for up 100ms
1175
    mov     ebx,1               ; Delay for up 10ms
1180
    mcall
1176
    mcall