Spaceraven/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Fix C to ASM http lib bridge

Browse Source 
git-svn-id: svn://kolibrios.org@6898 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
ashmew2 2017-05-15 20:43:01 +00:00
parent 7efe02d623
commit 712eb4cd4b
1 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
contrib/C_Layer/ASM/loadhttp.asm
View File

@ -16,24 +16,29 @@ virtual at 0
http_msg http_msg http_msg http_msg
end virtual end virtual
public init_network as '_kolibri_http_init' public init_network as '_init_network_asm'
;;; Returns 0 on success. -1 on failure. ;;; Returns 0 on success. -1 on failure.
proc init_network proc init_network
pusha
mcall 68,11
stdcall dll.Load, @IMPORT stdcall dll.Load, @IMPORT
popa test eax, eax
jnz error
mov eax, 0
ret ret
endp
error:
mov eax, -1
ret
endp
@IMPORT: @IMPORT:
library lib_http, 'http.obj' library lib_http, 'http.obj'
import lib_http, \ import lib_http, \
HTTP_get , 'get' , \ HTTP_get , 'get' , \
HTTP_head , 'head' , \ HTTP_head , 'head' , \
HTTP_post , 'post' , \ HTTP_post , 'post' , \
HTTP_find_header_field , 'find_header_field' , \ HTTP_find_header_field , 'find_header_field' , \
@ -43,7 +48,7 @@ import lib_http, \
HTTP_free , 'free' , \ HTTP_free , 'free' , \
HTTP_escape , 'escape' , \ HTTP_escape , 'escape' , \
HTTP_unescape , 'unescape' HTTP_unescape , 'unescape'
public HTTP_get as '_http_get_asm' public HTTP_get as '_http_get_asm'
public HTTP_head as '_http_head_asm' public HTTP_head as '_http_head_asm'
public HTTP_post as '_http_post_asm' public HTTP_post as '_http_post_asm'