QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-05 07:40:24 +00:00
Code Releases Wiki Activity

Make tcp_out try harder to send data.

Browse source 
The function now interprets the return value from send() and recalls if
needed to transmit all data.
This commit is contained in:
Luke Ceddia 2016-01-30 19:10:14 +11:00
parent 6d49cff3ee
commit 264ad29f22
1 changed files with 13 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
internal/c/libqb.cpp
View file

@ -22975,6 +22975,7 @@ int32 func__printwidth(qbs* text, int32 screenhandle, int32 passed){
//Referenced: http://johnnie.jerrata.com/winsocktutorial/
//Much of the unix sockets code based on http://beej.us/guide/bgnet/
#ifdef QB64_WINDOWS
#include <winsock2.h>
WSADATA wsaData;
@ -23250,21 +23251,22 @@ int32 func__printwidth(qbs* text, int32 screenhandle, int32 passed){
void tcp_out(void *connection,void *offset,ptrszint bytes){
#if !defined(DEPENDENCY_SOCKETS)
#elif defined(QB64_WINDOWS) || defined(QB64_LINUX)
static tcp_connection *tcp; tcp=(tcp_connection*)connection;
static int nret;
//should check nret to make sure all data is sent
//MSG_NOSIGNAL?
nret = send(tcp->socket,
(char*)offset,
bytes,
0);
tcp_connection *tcp; tcp=(tcp_connection*)connection;
int total = 0; // how many bytes we've sent
int bytesleft = bytes; // how many we have left to send
int n;
while(total < bytes) {
n = send(tcp->socket, (char*)(offset + total), bytesleft, 0);
if (n == -1) break;
total += n;
bytesleft -= n;
}
//if (n == -1) error occured.
#else
#endif
}
int32 cloud_port_redirect=-1;
struct connection_struct{
int8 in_use;//0=not being used, 1=in use