1,6 → 1,6 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;; ;; |
;; Copyright (C) KolibriOS team 2014. All rights reserved. ;; |
;; Copyright (C) KolibriOS team 2014-2015. All rights reserved. ;; |
;; Distributed under terms of the GNU General Public License ;; |
;; ;; |
;; pasta.asm - Paste text to paste.kolibrios.org from a file or ;; |
101,13 → 101,13 |
pop [clipboard_data] |
|
; Connect to the server |
invoke HTTP_get, sz_url, 0 |
invoke HTTP_get, sz_url, 0, 0, 0 |
test eax, eax |
jz error_free_clip |
mov [identifier], eax |
|
.again: |
invoke HTTP_process, [identifier] |
invoke HTTP_receive, [identifier] |
test eax, eax |
jnz .again |
|
139,7 → 139,7 |
|
mov ecx, [clipboard_data_length] |
add ecx, sz_paste_head.length + sz_paste_tail.length |
invoke HTTP_post, sz_url, sz_cookie, sz_ctype, ecx |
invoke HTTP_post, sz_url, 0, 0, sz_cookie, sz_ctype, ecx |
test eax, eax |
jz error_free_clip |
mov [identifier], eax |
154,7 → 154,7 |
mcall 68, 13, [clipboard_data] |
|
.again2: |
invoke HTTP_process, [identifier] |
invoke HTTP_receive, [identifier] |
test eax, eax |
jnz .again2 |
|
224,11 → 224,10 |
|
import lib_http, \ |
HTTP_get, 'get', \ |
HTTP_process, 'process', \ |
HTTP_free, 'free', \ |
HTTP_stop, 'stop', \ |
HTTP_post, 'post', \ |
HTTP_receive, 'receive', \ |
HTTP_find_header_field, 'find_header_field', \ |
HTTP_free, 'free', \ |
HTTP_escape, 'escape' |
|
IM_END: |