Subversion Repositories Kolibri OS

Rev

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

Rev 5094 Rev 5534
Line 1... Line 1...
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;;                                                                 ;;
2
;;                                                                 ;;
3
;; Copyright (C) KolibriOS team 2009-2013. All rights reserved.    ;;
3
;; Copyright (C) KolibriOS team 2009-2015. All rights reserved.    ;;
4
;; Distributed under terms of the GNU General Public License       ;;
4
;; Distributed under terms of the GNU General Public License       ;;
5
;;                                                                 ;;
5
;;                                                                 ;;
6
;;  downloader.asm - HTTP client for KolibriOS                     ;;
6
;;  downloader.asm - HTTP client for KolibriOS                     ;;
7
;;                                                                 ;;
7
;;                                                                 ;;
8
;;                                                                 ;;
8
;;                                                                 ;;
Line 166... Line 166...
166
        mcall
166
        mcall
167
;---------------------------------------------------------------------
167
;---------------------------------------------------------------------
168
download_1:
168
download_1:
169
        DEBUGF  1, "Starting download\n"
169
        DEBUGF  1, "Starting download\n"
Line 170... Line 170...
170
 
170
 
171
        invoke  HTTP_get, params, 0
171
        invoke  HTTP_get, 0, 0, params, 0
172
        test    eax, eax
172
        test    eax, eax
173
        jz      fail
173
        jz      fail
Line 174... Line 174...
174
        mov     [identifier], eax
174
        mov     [identifier], eax
175
 
175
 
176
  .loop:
176
  .loop:
177
        invoke  HTTP_process, [identifier]
177
        invoke  HTTP_receive, [identifier]
178
        test    eax, eax
178
        test    eax, eax
179
        jnz     .loop
179
        jnz     .loop
180
	ret
180
        ret
Line 282... Line 282...
282
        box_lib,        'box_lib.obj', \
282
        box_lib,        'box_lib.obj', \
283
        proc_lib,       'proc_lib.obj'
283
        proc_lib,       'proc_lib.obj'
Line 284... Line 284...
284
 
284
 
285
import  lib_http, \
285
import  lib_http, \
286
        HTTP_get                , 'get' , \
286
        HTTP_get                , 'get', \
287
        HTTP_process            , 'process'     ,\
287
        HTTP_receive            , 'receive', \
Line 288... Line 288...
288
        HTTP_free               , 'free'
288
        HTTP_free               , 'free'
289
 
289
 
290
import  box_lib, \
290
import  box_lib, \