mirror of
https://github.com/bobbimanners/emailler.git
synced 2024-09-08 21:54:28 +00:00
git-svn-id: http://svn.code.sf.net/p/netboot65/code@147 93682198-c243-4bdb-bd91-e943c89aac3b
This commit is contained in:
parent
7ea0f9d354
commit
c05f0c7ca1
@ -677,7 +677,7 @@ tcp_process:
|
|||||||
bne @fin
|
bne @fin
|
||||||
jmp @not_fin
|
jmp @not_fin
|
||||||
@fin:
|
@fin:
|
||||||
|
.byte $92
|
||||||
;is this the current connection?
|
;is this the current connection?
|
||||||
jsr check_current_connection
|
jsr check_current_connection
|
||||||
bcc :+
|
bcc :+
|
||||||
|
@ -240,12 +240,13 @@ init:
|
|||||||
stax tcp_connect_ip+2
|
stax tcp_connect_ip+2
|
||||||
|
|
||||||
|
|
||||||
lda #0
|
|
||||||
sta cxn_closed
|
|
||||||
ldax #80
|
ldax #80
|
||||||
jsr tcp_connect
|
jsr tcp_connect
|
||||||
jsr check_for_error
|
jsr check_for_error
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta cxn_closed
|
||||||
|
|
||||||
ldax #http_get_length
|
ldax #http_get_length
|
||||||
stax tcp_send_data_len
|
stax tcp_send_data_len
|
||||||
ldax #http_get_msg
|
ldax #http_get_msg
|
||||||
@ -254,10 +255,12 @@ init:
|
|||||||
|
|
||||||
@loop_till_end:
|
@loop_till_end:
|
||||||
jsr ip65_process
|
jsr ip65_process
|
||||||
lda cxn_closed
|
lda #1
|
||||||
cmp #1
|
cmp cxn_closed
|
||||||
|
|
||||||
beq @loop_till_end
|
beq @loop_till_end
|
||||||
|
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
ldax #tcp_callback_routine
|
ldax #tcp_callback_routine
|
||||||
@ -295,6 +298,7 @@ init:
|
|||||||
tcp_callback_routine:
|
tcp_callback_routine:
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
lda tcp_inbound_data_length
|
lda tcp_inbound_data_length
|
||||||
cmp #$ff
|
cmp #$ff
|
||||||
bne @not_end_of_file
|
bne @not_end_of_file
|
||||||
|
Loading…
Reference in New Issue
Block a user