2 * Copyright (C) Volition, Inc. 1999. All rights reserved.
4 * All source code herein is the property of Volition, Inc. You may not sell
5 * or otherwise commercially exploit the source or things you created based on
10 * $Logfile: /Freespace2/code/Network/Psnet2.cpp $
15 * C file containing application level network-interface.
18 * Revision 1.14 2005/10/02 09:30:10 taylor
19 * sync up rest of big-endian network changes. it should at least be as good as what's in FS2_Open now, only better :)
21 * Revision 1.13 2005/10/01 22:01:28 taylor
22 * some cleanup of earlier big-endian changes
24 * Revision 1.12 2004/07/04 11:39:06 taylor
25 * fix missing debrief text, crash on exit, path separator's, warning fixes, no GR_SOFT
27 * Revision 1.11 2004/06/11 01:52:15 tigital
28 * byte-swapping changes for bigendian systems
30 * Revision 1.10 2003/08/03 16:10:30 taylor
31 * cleanup; compile warning fixes
33 * Revision 1.9 2002/07/27 19:52:54 relnev
34 * add missing structure packing
36 * Revision 1.8 2002/06/09 04:41:24 relnev
37 * added copyright header
39 * Revision 1.7 2002/06/02 05:31:17 relnev
42 * Revision 1.6 2002/06/02 02:29:39 relnev
45 * Revision 1.5 2002/05/27 04:04:43 relnev
46 * 155 undefined references left
48 * Revision 1.4 2002/05/26 21:27:53 theoddone33
49 * More progress (I hate psnet2)
51 * Revision 1.3 2002/05/26 20:49:54 theoddone33
54 * Revision 1.2 2002/05/07 03:16:48 theoddone33
55 * The Great Newline Fix
57 * Revision 1.1.1.1 2002/05/03 03:28:10 root
61 * 25 9/14/99 2:21p Dave
62 * Fixed observer mode joining and ingame stuff.
64 * 24 9/10/99 9:44p Dave
65 * Bumped version # up. Make server reliable connects not have such a huge
68 * 23 9/07/99 4:01p Dave
69 * Fixed up a string.tbl paroblem (self destruct message). Make sure IPX
70 * does everything properly (setting up address when binding). Remove
71 * black rectangle background from UI_INPUTBOX.
73 * 22 8/26/99 8:51p Dave
74 * Gave multiplayer TvT messaging a heavy dose of sanity. Cheat codes.
76 * 21 8/16/99 4:06p Dave
77 * Big honking checkin.
79 * 20 7/26/99 5:50p Dave
80 * Revised ingame join. Better? We'll see....
82 * 19 7/20/99 1:49p Dave
83 * Peter Drake build. Fixed some release build warnings.
85 * 18 7/15/99 9:20a Andsager
86 * FS2_DEMO initial checkin
88 * 17 7/03/99 4:08p Dave
89 * Fixed wss_slots size issues. Fixed potentially nasty bug in low level
92 * 16 6/25/99 5:02p Jasenw
93 * Removed old debug code.
95 * 15 6/07/99 9:51p Dave
96 * Consolidated all multiplayer ports into one.
98 * 14 4/30/99 12:18p Dave
99 * Several minor bug fixes.
101 * 13 4/27/99 5:55p Dave
102 * Fixed Ras_connected bug with VSDK code.
104 * 12 4/27/99 2:59p Dave
105 * Potential fix for reliable socket connection problem.
107 * 11 4/23/99 11:07a Dave
108 * Added lots of debug multi.log output to psnet2
110 * 10 4/12/99 10:07p Dave
111 * Made network startup more forgiving. Added checkmarks to dogfight
112 * screen for players who hit commit.
114 * 9 3/10/99 6:50p Dave
115 * Changed the way we buffer packets for all clients. Optimized turret
116 * fired packets. Did some weapon firing optimizations.
118 * 8 3/09/99 6:24p Dave
119 * More work on object update revamping. Identified several sources of
120 * unnecessary bandwidth.
122 * 7 3/08/99 7:03p Dave
123 * First run of new object update system. Looks very promising.
125 * 6 1/24/99 11:37p Dave
126 * First full rev of beam weapons. Very customizable. Removed some bogus
127 * Int3()'s in low level net code.
129 * 5 1/06/99 2:24p Dave
130 * Stubs and release build fixes.
132 * 4 11/20/98 11:16a Dave
133 * Fixed up IPX support a bit. Making sure that switching modes and
134 * loading/saving pilot files maintains proper state.
136 * 3 11/19/98 4:19p Dave
137 * Put IPX sockets back in psnet. Consolidated all multiplayer config
140 * 2 11/19/98 8:04a Dave
141 * Full support for D3-style reliable sockets. Revamped packet lag/loss
142 * system, made it receiver side and at the lowest possible level.
149 #include <windowsx.h>
154 #include <raserror.h>
156 #include <sys/types.h>
157 #include <sys/socket.h>
158 #include <netinet/in.h>
159 #include <arpa/inet.h>
169 #include "multiutil.h"
170 #include "multilag.h"
171 #include "osregistry.h"
173 #include "multi_log.h"
174 #include "multi_rate.h"
179 // -------------------------------------------------------------------------------------------------------
180 // PSNET 2 DEFINES/VARS
183 int Psnet_my_addr_valid;
184 net_addr_t Psnet_my_addr;
186 ubyte Null_address[6];
189 int Can_broadcast; // can we do broadcasting on our socket?
190 int Ipx_can_broadcast = 0;
191 int Tcp_can_broadcast = 0;
197 int Tcp_failure_code = 0;
198 int Ipx_failure_code = 0;
200 int Psnet_connection;
202 ushort Psnet_default_port;
204 // specified their internet connnection type
205 #define NETWORK_CONNECTION_NONE 1
206 #define NETWORK_CONNECTION_DIALUP 2
207 #define NETWORK_CONNECTION_LAN 3
209 // defines and variables to indicate network connection status
210 #define NETWORK_STATUS_NOT_INITIALIZED 1
211 #define NETWORK_STATUS_NO_WINSOCK 2 // winsock failed to initialize
212 #define NETWORK_STATUS_NO_PROTOCOL 3 // TCP/IP doesn't appear to be loaded
213 #define NETWORK_STATUS_NO_RELIABLE 4
214 #define NETWORK_STATUS_RUNNING 5 // everything should be running
216 // defintion of structures that actually leave this machine. psnet_send give us only
217 // the data that we want to send. We will add a header onto this data (packet sequence
218 // number, possibly a checksum). We must include a 2 byte flags variable into both structure
219 // since the receiving end of this packet must know whether or not to checksum the packet.
221 #define MAX_TOP_LAYER_PACKET_SIZE 680
223 // use the pack pragma to pack these structures to 2 byte aligment. Really only needed for
225 #define MAX_PACKET_BUFFERS 75
228 #pragma pack(push, 2)
231 // definition for a non-checksum packet
232 typedef struct network_packet
236 ubyte data[MAX_TOP_LAYER_PACKET_SIZE];
237 } network_naked_packet;
239 // structure definition for our packet buffers
240 typedef struct network_packet_buffer
244 net_addr_t from_addr;
245 ubyte data[MAX_TOP_LAYER_PACKET_SIZE];
246 } network_packet_buffer;
248 // struct for a bunch of network packet buffers
249 typedef struct network_packet_buffer_list {
250 network_packet_buffer psnet_buffers[MAX_PACKET_BUFFERS];
251 int psnet_seq_number;
253 int psnet_highest_id;
254 } network_packet_buffer_list;
261 #define MAXHOSTNAME 128
263 #define MAX_RECEIVE_BUFSIZE 4096 // 32 K, eh?
264 #define MAX_SEND_RETRIES 20 // number of retries when sending would block
265 #define MAX_LINGER_TIME 0 // in seconds -- when lingering to close a socket
268 //*******************************
269 #define MAXNETBUFFERS 150 // Maximum network buffers (For between network and upper level functions, which is
270 // required in case of out of order packets
271 #define NETRETRYTIME 0.75f // Time after sending before we resend
272 #define MIN_NET_RETRYTIME 0.2f
273 #define NETTIMEOUT 30 // Time after receiving the last packet before we drop that user
274 #define NETHEARTBEATTIME 3 // How often to send a heartbeat
275 #define MAXRELIABLESOCKETS 40 // Max reliable sockets to open at once...
276 #define NETBUFFERSIZE 600 // Max size of a network packet
278 #define RELIABLE_CONNECT_TIME 7 // how long we'll wait for a response when doing a reliable connect
280 int Nettimeout = NETTIMEOUT;
282 // Reliable packet stuff
283 #define RNT_ACK 1 // ACK Packet
284 #define RNT_DATA 2 // Data Packet
285 #define RNT_DATA_COMP 3 // Compressed Data Packet
286 #define RNT_REQ_CONN 4 // Requesting a connection
287 #define RNT_DISCONNECT 5 // Disconnecting a connection
288 #define RNT_HEARTBEAT 6 // Heartbeat -- send every NETHEARTBEATTIME
289 #define RNT_I_AM_HERE 7
292 #pragma pack(push,r_udp)
296 #define PACKED __attribute__((packed))
300 ubyte type; // packet type
302 ushort seq; // sequence packet 0-65535 used for ACKing also
303 ushort data_len; // length of data
304 float send_time; // Time the packet was sent, if an ACK the time the packet being ACK'd was sent.
305 ubyte data[NETBUFFERSIZE]; // Packet data
306 } PACKED reliable_header;
308 #define RELIABLE_PACKET_HEADER_ONLY_SIZE (sizeof(reliable_header)-NETBUFFERSIZE)
309 #define MAX_PING_HISTORY 10
312 ubyte buffer[NETBUFFERSIZE];
314 } PACKED reliable_net_sendbuffer;
317 ubyte buffer[NETBUFFERSIZE];
318 } PACKED reliable_net_rcvbuffer;
321 reliable_net_sendbuffer *sbuffers[MAXNETBUFFERS]; // This is an array of pointers for quick sorting
322 unsigned short ssequence[MAXNETBUFFERS]; // This is the sequence number of the given packet
323 float timesent[MAXNETBUFFERS];
324 int send_len[MAXNETBUFFERS];
325 reliable_net_rcvbuffer *rbuffers[MAXNETBUFFERS];
326 int recv_len[MAXNETBUFFERS];
327 unsigned short rsequence[MAXNETBUFFERS]; // This is the sequence number of the given packet
328 float last_packet_received; // For a given connection, this is the last packet we received
329 float last_packet_sent;
330 struct sockaddr addr; // struct sockaddr of our peer
331 ushort status; // Status of this connection
332 unsigned short oursequence; // This is the next sequence number the application is expecting
333 unsigned short theirsequence; // This is the next sequence number the peer is expecting
334 net_addr_t net_addr; // A FS2 network address structure
335 ubyte connection_type; // IPX, IP, modem, etc.
336 float pings[MAX_PING_HISTORY];
338 unsigned int num_ping_samples;
342 reliable_socket Reliable_sockets[MAXRELIABLESOCKETS];
344 // sockets for IPX and TCP (unreliable)
348 // the sockets that the game will use when selecting network type
349 SOCKET Unreliable_socket = INVALID_SOCKET;
352 // SOCKET Reliable_UDP_socket = INVALID_SOCKET;
353 // SOCKET Reliable_IPX_socket = INVALID_SOCKET;
355 float First_sent_iamhere = 0;
356 float Last_sent_iamhere = 0;
358 #define CONNECTSEQ 0x142 // Magic number for starting a connection, just so it isn't 0
360 unsigned int Serverconn = 0xffffffff;
363 #pragma pack(pop,r_udp)
367 //*******************************
370 network_packet_buffer_list Psnet_top_buffers[PSNET_NUM_TYPES];
372 // -------------------------------------------------------------------------------------------------------
373 // PSNET 2 FORWARD DECLARATIONS
376 // if the string is a legally formatted ip string
377 int psnet_is_valid_numeric_ip(char *ip);
379 // functions to get the status of a RAS connection
380 unsigned int psnet_ras_status();
382 // set some options on a socket
383 void psnet_socket_options( SOCKET sock );
385 // initialize ipx socket
386 int psnet_init_ipx();
388 // initialize tcp socket
389 int psnet_init_tcp();
391 // get time in seconds
392 float psnet_get_time();
394 // returns the ip address of this machine. use for calling bind() with to associate with the proper
395 // IP address and network device.
398 // initialize reliable sockets
399 int psnet_init_rel_tcp(int port, int should_listen);
400 int psnet_init_rel_ipx(int port, int should_listen);
402 // shutdown reliable sockets
403 void psnet_rel_close();
405 // initialize the buffering system
406 void psnet_buffer_init(network_packet_buffer_list *l);
408 // buffer a packet (maintain order!)
409 void psnet_buffer_packet(network_packet_buffer_list *l, ubyte *data, int length, net_addr_t *from);
411 // get the index of the next packet in order!
412 int psnet_buffer_get_next(network_packet_buffer_list *l, ubyte *data, int *length, net_addr_t *from);
415 // -------------------------------------------------------------------------------------------------------
416 // PSNET 2 TOP LAYER FUNCTIONS - these functions simply buffer and store packets based upon type (see PSNET_TYPE_* defines)
419 // wrappers around select() and recvfrom() for lagging/losing data
420 int RECVFROM(SOCKET s, char *buf, int len, int flags, sockaddr *from, int *fromlen, int psnet_type)
422 network_packet_buffer_list *l;
428 SDL_assert((psnet_type >= 0) && (psnet_type < PSNET_NUM_TYPES));
429 if((psnet_type < 0) || (psnet_type >= PSNET_NUM_TYPES)){
432 l = &Psnet_top_buffers[psnet_type];
434 // if we have no buffer! The user should have made sure this wasn't the case by calling SELECT()
435 ret = psnet_buffer_get_next(l, (ubyte*)buf, &ret_len, &addr);
441 // otherwise, stuff the outgoing data
442 switch ( Socket_type ) {
447 ((SOCKADDR_IPX*)from)->sa_socket = htons(addr.port);
448 memcpy(((SOCKADDR_IPX*)from)->sa_nodenum, addr.addr, 6);
449 memcpy(((SOCKADDR_IPX*)from)->sa_netnum, addr.net_id, 4);
450 ((SOCKADDR_IPX*)from)->sa_family = AF_IPX;
451 *fromlen = sizeof(SOCKADDR_IPX);
456 ((struct sockaddr_in*)from)->sin_port = htons(addr.port);
458 memcpy(&((struct sockaddr_in*)from)->sin_addr.s_addr, addr.addr, 4);
460 memcpy(&((struct sockaddr_in*)from)->sin_addr.S_un.S_addr, addr.addr, 4);
462 ((struct sockaddr_in*)from)->sin_family = AF_INET;
463 *fromlen = sizeof(struct sockaddr_in);
478 // wrappers around select() and recvfrom() for lagging/losing data
479 int SELECT(int nfds, fd_set FAR * readfds, fd_set FAR * writefds, fd_set FAR * exceptfds, struct timeval FAR * timeout, int psnet_type)
481 network_packet_buffer_list *l;
483 // if this is a check for writability, just return the select
484 if(writefds != NULL){
485 return select(nfds, readfds, writefds, exceptfds, timeout);
489 SDL_assert((psnet_type >= 0) && (psnet_type < PSNET_NUM_TYPES));
490 if((psnet_type < 0) || (psnet_type >= PSNET_NUM_TYPES)){
493 l = &Psnet_top_buffers[psnet_type];
495 // do we have any buffers in here?
496 if((l->psnet_lowest_id == -1) || (l->psnet_lowest_id > l->psnet_highest_id)){
504 // wrappers around sendto to sorting through different packet types
505 int SENDTO(SOCKET s, char * buf, int len, int flags, sockaddr *to, int tolen, int psnet_type)
507 char outbuf[MAX_TOP_LAYER_PACKET_SIZE + 150];
510 outbuf[0] = (char)psnet_type;
511 memcpy(&outbuf[1], buf, len);
513 // is the socket writeable?
516 return sendto(s, outbuf, len + 1, flags, (struct sockaddr*)to, tolen);
519 // call this once per frame to read everything off of our socket
520 void PSNET_TOP_LAYER_PROCESS()
523 struct sockaddr_in ip_addr; // UDP/TCP socket structure
525 SOCKADDR_IPX ipx_addr; // IPX socket structure
535 net_addr_t from_addr;
536 network_naked_packet packet_read;
538 // clear the addresses to remove compiler warnings
539 memset(&ip_addr, 0, sizeof(struct sockaddr_in));
541 memset(&ipx_addr, 0, sizeof(SOCKADDR_IPX));
544 if ( Network_status != NETWORK_STATUS_RUNNING ) {
545 ml_printf("Network ==> socket not inited in PSNET_TOP_LAYER_PROCESS\n");
550 // check if there is any data on the socket to be read. The amount of data that can be
551 // atomically read is stored in len.
554 FD_SET( Unreliable_socket, &rfds );
559 if ( select( -1, &rfds, NULL, NULL, &timeout) == SOCKET_ERROR ) {
561 if ( select( Unreliable_socket+1, &rfds, NULL, NULL, &timeout) == SOCKET_ERROR ) {
563 ml_printf("Error %d doing a socket select on read\n", WSAGetLastError());
567 // if the read file descriptor is not set, then bail!
568 if ( !FD_ISSET(Unreliable_socket, &rfds) ){
572 // get data off the socket and process
573 read_len = SOCKET_ERROR;
574 switch ( Socket_type ) {
577 from_len = sizeof(SOCKADDR_IPX);
578 read_len = recvfrom( Unreliable_socket, (char*)packet_read.data, MAX_TOP_LAYER_PACKET_SIZE, 0, (struct sockaddr*)&ipx_addr, &from_len);
583 from_len = sizeof(struct sockaddr_in);
584 read_len = recvfrom( Unreliable_socket, (char*)packet_read.data, MAX_TOP_LAYER_PACKET_SIZE, 0, (struct sockaddr*)&ip_addr, &from_len);
592 // set the from_addr for storage into the packet buffer structure
593 from_addr.type = Socket_type;
595 switch ( Socket_type ) {
598 from_addr.port = ntohs( ipx_addr.sa_socket );
599 memcpy(from_addr.addr, ipx_addr.sa_nodenum, 6 );
600 memcpy(from_addr.net_id, ipx_addr.sa_netnum, 4 );
605 from_addr.port = ntohs( ip_addr.sin_port );
606 memset(from_addr.addr, 0x00, 6);
608 memcpy(from_addr.addr, &ip_addr.sin_addr.S_un.S_addr, 4);
610 memcpy(from_addr.addr, &ip_addr.sin_addr.s_addr, 4);
620 if ( read_len == SOCKET_ERROR ) {
621 // int x = WSAGetLastError();
622 ml_printf("Socket error on socket_get_data()");
626 // determine the packet type
627 int packet_type = packet_read.data[0];
628 // mprintf(("TOP LAYER PACKET %d!\n", packet_type));
629 if((packet_type < 0) || (packet_type >= PSNET_NUM_TYPES)){
633 psnet_buffer_packet(&Psnet_top_buffers[packet_type], packet_read.data + 1, read_len - 1, &from_addr);
639 // -------------------------------------------------------------------------------------------------------
643 // initialize psnet to use the specified port
644 void psnet_init( int protocol, int port_num )
646 const char *internet_connection;
654 #if defined(DEMO) || defined(OEM_BUILD) // not for FS2_DEMO
658 // GAME PORT INITIALIZATION STUFF
659 if ( Network_status == NETWORK_STATUS_RUNNING ){
660 ml_string("Skipping psnet_init() because network already running");
664 internet_connection = os_config_read_string(NULL, "NetworkConnection", "none");
665 if ( !SDL_strcasecmp(internet_connection, NOX("dialup")) ) {
666 ml_string("psnet_init() detected dialup connection");
668 Psnet_connection = NETWORK_CONNECTION_DIALUP;
669 } else if ( !SDL_strcasecmp(internet_connection, NOX("lan")) ) {
670 ml_string("psnet_init() detected lan connection");
672 Psnet_connection = NETWORK_CONNECTION_LAN;
674 ml_string("psnet_init() detected no connection");
676 Psnet_connection = NETWORK_CONNECTION_NONE;
679 Network_status = NETWORK_STATUS_NO_WINSOCK;
681 if (WSAStartup(0x101, &wsa_data )){
686 // get the port for running this game on. Be careful that it cannot be out of bounds
687 Psnet_default_port = DEFAULT_GAME_PORT;
688 if ( (port_num > 1023) && (port_num < USHRT_MAX) ) {
689 Psnet_default_port = (ushort)port_num;
692 // initialize TCP now
694 if(!psnet_init_tcp()){
695 ml_printf("Error on TCP startup %d\n", Tcp_failure_code);
699 if(!psnet_init_rel_tcp(Psnet_default_port + 1, 0)){
700 ml_printf("Network", "Error on TCP startup %d\n", Tcp_failure_code);
706 // clear reliable sockets
707 reliable_socket *rsocket;
709 for(j=0; j<MAXRELIABLESOCKETS; j++){
710 rsocket=&Reliable_sockets[j];
711 memset(rsocket,0,sizeof(reliable_socket));
714 // initialize IPX not
717 if(!psnet_init_ipx()){
718 ml_printf("Network", "Error on IPX startup %d\n", Ipx_failure_code);
722 if(!psnet_init_rel_ipx(Psnet_default_port + 1, 0)){
723 ml_printf("Network", "Error on IPX startup %d\n", Ipx_failure_code);
732 // determine if we've successfully initialized the protocol we want
733 if(!Tcp_active && !Ipx_active){
734 Network_status = NETWORK_STATUS_NO_PROTOCOL;
736 ml_string("No protocol in psnet_init()!");
739 // specified network timeout
740 Nettimeout = NETTIMEOUT;
741 if(Cmdline_timeout > 0){
742 Nettimeout = Cmdline_timeout;
748 if(Network_status != NETWORK_STATUS_NO_PROTOCOL){
749 // set network to be running
750 Network_status = NETWORK_STATUS_RUNNING;
752 // determine if our socket can broadcast
753 Can_broadcast = Tcp_can_broadcast || Ipx_can_broadcast;
755 // initialize all packet type buffers
756 for(idx=0; idx<PSNET_NUM_TYPES; idx++){
757 psnet_buffer_init(&Psnet_top_buffers[idx]);
765 if ( Network_status != NETWORK_STATUS_RUNNING ){
770 WSACancelBlockingCall();
773 if ( TCP_socket != (int)INVALID_SOCKET ) {
774 shutdown( TCP_socket, 1 );
775 closesocket( TCP_socket );
778 if ( IPX_socket != (int)INVALID_SOCKET ) {
779 shutdown( IPX_socket, 1 );
780 closesocket( IPX_socket );
785 //Warning( LOCATION, "Error closing wsock!\n" );
789 // close down all reliable sockets - this forces them to
790 // send a disconnect to any remote machines
793 Network_status = NETWORK_STATUS_NOT_INITIALIZED;
796 // set the protocol to use
797 int psnet_use_protocol( int protocol )
801 SOCKADDR_IPX ipx_addr;
805 struct sockaddr_in ip_addr;
807 // zero out my address
808 Psnet_my_addr_valid = 0;
809 memset( &Psnet_my_addr, 0, sizeof(Psnet_my_addr) );
811 // wait until we choose a protocol to determine if we can broadcast
814 ml_string("In psnet_use_protocol()");
816 switch ( protocol ) {
819 ml_string("psnet_use_protocol() selecting IPX");
821 // assign the IPX_* sockets to the socket values used elsewhere
822 Unreliable_socket = IPX_socket;
824 Can_broadcast = Ipx_can_broadcast;
826 ml_printf("Psnet : IPX broadcast\n");
829 // get the socket name for the IPX_socket, and put it into My_addr
830 len = sizeof(SOCKADDR_IPX);
831 if ( getsockname(IPX_socket, (struct sockaddr *)&ipx_addr, &len) == SOCKET_ERROR ) {
832 ml_printf("Unable to get sock name for IPX unreliable socket (%d)\n", WSAGetLastError() );
836 memcpy(Psnet_my_addr.net_id, ipx_addr.sa_netnum, 4);
837 memcpy(Psnet_my_addr.addr, ipx_addr.sa_nodenum, 6);
838 Psnet_my_addr.port = Psnet_default_port;
840 ml_printf("Psnet using - NET_IPX\n");
845 if ( Network_status != NETWORK_STATUS_RUNNING ){
846 ml_string("Network_status != NETWORK_STATUS_RUNNING in NET_TCP in psnet_use_protocol()");
850 // assign the TCP_* sockets to the socket values used elsewhere
851 Unreliable_socket = TCP_socket;
853 Can_broadcast = Tcp_can_broadcast;
855 ml_printf("Psnet : TCP broadcast\n");
858 // get the socket name for the IPX_socket, and put it into My_addr
859 len = sizeof(struct sockaddr_in);
860 if ( getsockname(TCP_socket, (struct sockaddr *)&ip_addr, &len) == SOCKET_ERROR ) {
861 ml_printf("Unable to get sock name for TCP unreliable socket (%d)\n", WSAGetLastError() );
866 memset(Psnet_my_addr.net_id, 0, 4);
867 memcpy(Psnet_my_addr.addr, &ip_addr.sin_addr, 6);
868 Psnet_my_addr.port = Psnet_default_port;
870 ml_printf("Psnet using - NET_TCP\n");
878 Psnet_my_addr.type = protocol;
879 Socket_type = protocol;
884 // get the status of the network
885 int psnet_get_network_status()
887 // first case is when "none" is selected
888 if ( Psnet_connection == NETWORK_CONNECTION_NONE ) {
889 return NETWORK_ERROR_NO_TYPE;
892 // first, check the connection status of the network
893 if ( Network_status == NETWORK_STATUS_NO_WINSOCK )
894 return NETWORK_ERROR_NO_WINSOCK;
896 if ( Network_status == NETWORK_STATUS_NO_PROTOCOL ){
897 return NETWORK_ERROR_NO_PROTOCOL;
900 // network is running -- be sure that the RAS people know to connect if they currently cannot.
902 if ( Psnet_connection == NETWORK_CONNECTION_DIALUP ) {
903 // if on a dialup connection, be sure that RAS is active.
904 if ( !Ras_connected ) {
905 return NETWORK_ERROR_CONNECT_TO_ISP;
907 } else if ( Psnet_connection == NETWORK_CONNECTION_LAN ) {
908 // if on a LAN, and they have a dialup connection active, return error to indicate that they need
909 // to pick the right connection type
910 if ( Ras_connected ) {
911 return NETWORK_ERROR_LAN_AND_RAS;
914 return NETWORK_ERROR_NONE;
917 // convert a net_addr to a string
918 char* psnet_addr_to_string( char * text, const int max_textlen, net_addr_t * address )
921 if ( Network_status != NETWORK_STATUS_RUNNING ) {
922 SDL_strlcpy( text, XSTR("[no networking]",910), max_textlen );
928 switch ( address->type ) {
930 SDL_snprintf(text, max_textlen, "%x %x %x %x: %x %x %x %x %x %x", address->net_id[0],
943 memcpy(&temp_addr.s_addr, address->addr, 4);
944 SDL_strlcpy( text, inet_ntoa(temp_addr), max_textlen );
956 // convert a string to a net addr
957 void psnet_string_to_addr( net_addr_t * address, char * text, const int max_textlen )
960 char str[255], *c, *port;
963 if ( Network_status != NETWORK_STATUS_RUNNING ) {
964 SDL_strlcpy( text, XSTR("[no networking]",910), max_textlen );
968 // copy the text string to local storage to look for ports
969 SDL_assert( strlen(text) < 255 );
970 SDL_strlcpy(str, text, sizeof(str));
971 c = strrchr(str, ':');
978 switch ( address->type ) {
980 Int3(); // no support for this yet
984 addr.s_addr = inet_addr(str);
985 // if we get INADDR_NONE returns, then we need to try and resolve the host
987 if ( addr.s_addr == INADDR_NONE ) {
988 he = gethostbyname( str );
989 // returns a non-null pointer if successful, so get the address
991 addr.s_addr = ((in_addr *)(he->h_addr))->s_addr; // this is the address in network byte order
993 addr.s_addr = INADDR_NONE;
997 memset(address->addr, 0x00, 6);
998 memcpy(address->addr, &addr.s_addr, 4);
1000 address->port = (ushort)(atoi(port));
1011 // compare 2 addresses
1012 int psnet_same( net_addr_t * a1, net_addr_t * a2 )
1014 return !memcmp(a1->addr, a2->addr, 6);
1017 // send data unreliably
1018 int psnet_send( net_addr_t * who_to, void * data, int len, int np_index )
1020 // send data unreliably
1022 struct sockaddr_in sockaddr; // UDP/TCP socket structure
1024 SOCKADDR_IPX ipx_addr; // IPX socket structure
1027 ubyte iaddr[6], *send_data;
1030 struct timeval timeout;
1032 // always use the reliable socket
1033 send_sock = Unreliable_socket;
1035 if ( Network_status != NETWORK_STATUS_RUNNING ) {
1036 ml_printf("Network ==> Socket not inited in psnet_send\n");
1040 if ( psnet_same( who_to, &Psnet_my_addr) ){
1044 memset(iaddr, 0x00, 6);
1045 memcpy(iaddr, who_to->addr, 6);
1047 if ( memcmp(iaddr, Null_address, 6) == 0) {
1048 ml_printf("Network ==> send to address is 0 in psnet_send\n");
1052 port = who_to->port;
1055 ml_printf("Network ==> destination port %d invalid in psnet_send\n", port);
1059 // stuff the data with the type
1060 send_data = (ubyte*)data;
1064 FD_SET( send_sock, &wfds );
1066 timeout.tv_usec = 0;
1069 if ( SELECT( -1, NULL, &wfds, NULL, &timeout, PSNET_TYPE_UNRELIABLE) == SOCKET_ERROR ) {
1071 if ( SELECT( send_sock+1, NULL, &wfds, NULL, &timeout, PSNET_TYPE_UNRELIABLE) == SOCKET_ERROR ) {
1073 ml_printf("Error on blocking select for write %d\n", WSAGetLastError() );
1077 // if the write file descriptor is not set, then bail!
1078 if ( !FD_ISSET(send_sock, &wfds ) ){
1083 switch ( who_to->type ) {
1086 ipx_addr.sa_socket = htons(port);
1087 ipx_addr.sa_family = AF_IPX;
1088 memcpy(ipx_addr.sa_nodenum, iaddr, 6);
1089 memcpy(ipx_addr.sa_netnum, who_to->net_id, 4);
1091 ret = SENDTO(send_sock, (char *)send_data, send_len, 0, (struct sockaddr*)&ipx_addr, sizeof(ipx_addr), PSNET_TYPE_UNRELIABLE);
1093 multi_rate_add(np_index, "ipx", send_len);
1094 if ( (ret != SOCKET_ERROR) && (ret != send_len) ){
1095 // ml_printf("requested to send %d bytes -- sent %d instead!!!\n", send_len, ret);
1101 sockaddr.sin_family = AF_INET;
1102 memcpy(&sockaddr.sin_addr.s_addr, iaddr, 4);
1103 sockaddr.sin_port = htons(port);
1105 multi_rate_add(np_index, "udp(h)", send_len + UDP_HEADER_SIZE);
1106 multi_rate_add(np_index, "udp", send_len);
1107 ret = SENDTO( send_sock, (char *)send_data, send_len, 0, (struct sockaddr*)&sockaddr, sizeof(sockaddr), PSNET_TYPE_UNRELIABLE );
1111 SDL_assert(0); // unknown protocol
1116 if ( ret != SOCKET_ERROR ) {
1119 //Warning( LOCATION, "Couldn't send data (0x%x)!\n", WSAGetLastError() );
1123 // get data from the unreliable socket
1124 int psnet_get( void * data, net_addr_t * from_addr )
1128 // try and get a free buffer and return its size
1129 if(psnet_buffer_get_next(&Psnet_top_buffers[PSNET_TYPE_UNRELIABLE], (ubyte*)data, &buffer_size, from_addr)){
1137 // broadcast data on unreliable socket
1138 int psnet_broadcast( net_addr_t * who_to, void * data, int len )
1140 if ( Network_status != NETWORK_STATUS_RUNNING ) {
1141 ml_printf("Network ==> Socket not inited in psnet_broadcast\n");
1145 if ( !Can_broadcast ) {
1146 ml_printf("Cannot broadcast -- returning without doing anything\n");
1150 ubyte broadcast[6] = {0xff, 0xff, 0xff, 0xff, 0xff, 0xff};
1152 // broadcasting works on a local subnet which is all we really want to do for now anyway.
1153 // we might keep this in as an option for freespace later.
1154 switch ( who_to->type ) {
1157 memcpy(who_to->addr, broadcast, 6);
1158 psnet_send(who_to, data, len);
1166 // flush all sockets
1169 ubyte data[MAX_TOP_LAYER_PACKET_SIZE + 250];
1170 net_addr_t from_addr;
1172 while ( psnet_get( data, &from_addr ) > 0 ) ;
1175 // if the passed string is a valid IP string
1176 int psnet_is_valid_ip_string( char *ip_string, int allow_port )
1179 struct hostent *host_ent;
1182 // our addresses may have ports, so make local copy and remove port number
1183 SDL_assert( strlen(ip_string) < 255 );
1184 SDL_strlcpy(str, ip_string, sizeof(str));
1185 c = strrchr(str, ':');
1190 addr.s_addr = inet_addr(ip_string);
1191 if ( addr.s_addr != INADDR_NONE ){
1192 // make sure the ip string is a valid format string
1193 if(psnet_is_valid_numeric_ip(ip_string)){
1198 // try name resolution
1199 host_ent = gethostbyname( ip_string );
1204 // valid host entry so return 1;
1209 // -------------------------------------------------------------------------------------------------------
1210 // PSNET 2 RELIABLE SOCKET FUNCTIONS
1214 int psnet_rel_ping_compare( const void *arg1, const void *arg2 )
1216 float *ping1 = (float *)arg1;
1217 float *ping2 = (float *)arg2;
1219 if(*ping1==*ping2) return 0;
1220 else if(*ping1>*ping2) return 1;
1221 else if(*ping1<*ping2) return -1;
1226 void psnet_rel_send_ack(struct sockaddr *raddr, unsigned int sig, ubyte link_type, float time_sent)
1229 reliable_header ack_header;
1230 ack_header.type = RNT_ACK;
1231 ack_header.data_len = sizeof(unsigned int);
1232 ack_header.send_time = INTEL_FLOAT( time_sent );
1233 sig_tmp = INTEL_INT( sig );
1234 memcpy(&ack_header.data,&sig_tmp,sizeof(unsigned int));
1235 switch (link_type) {
1238 ml_string("No IPX in rel_send_ack()");
1241 SENDTO(Unreliable_socket, (char *)&ack_header, RELIABLE_PACKET_HEADER_ONLY_SIZE+sizeof(unsigned int), 0, raddr, sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1245 ml_string("No TCP in rel_send_ack()");
1248 SENDTO(Unreliable_socket, (char *)&ack_header, RELIABLE_PACKET_HEADER_ONLY_SIZE+sizeof(unsigned int), 0, raddr, sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1251 ml_string("Unknown protocol type in nw_SendReliable()");
1257 // function to shutdown and close the given socket. It takes a couple of things into consideration
1258 // when closing, such as possibly reiniting reliable sockets if they are closed here.
1259 void psnet_rel_close_socket( PSNET_SOCKET_RELIABLE *sockp )
1261 reliable_header diss_conn_header;
1263 // if the socket is out of range
1264 if(*sockp>=MAXRELIABLESOCKETS)
1266 ml_printf("Invalid socket id passed to nw_NewCloseSocket() -- %d\n",*sockp);
1269 ml_printf("Closing socket %d\n",*sockp);
1271 // go through every buffer and "free it up(tm)"
1273 for(i=0;i<MAXNETBUFFERS;i++){
1274 if(Reliable_sockets[*sockp].rbuffers[i]){
1275 if(Reliable_sockets[*sockp].rbuffers[i] != NULL){
1276 free(Reliable_sockets[*sockp].rbuffers[i]);
1278 Reliable_sockets[*sockp].rbuffers[i] = NULL;
1279 Reliable_sockets[*sockp].rsequence[i] = 0;
1281 if(Reliable_sockets[*sockp].sbuffers[i]){
1282 if(Reliable_sockets[*sockp].sbuffers[i] != NULL){
1283 free(Reliable_sockets[*sockp].sbuffers[i]);
1285 Reliable_sockets[*sockp].sbuffers[i] = NULL;
1286 Reliable_sockets[*sockp].rsequence[i] = 0;
1290 // send a disconnect packet to the socket on the other end
1291 diss_conn_header.type = RNT_DISCONNECT;
1292 diss_conn_header.seq = CONNECTSEQ;
1293 diss_conn_header.data_len = 0;
1294 if(*sockp==Serverconn){
1295 Serverconn = 0xffffffff;
1297 switch ( Reliable_sockets[*sockp].connection_type ) {
1302 SENDTO(Unreliable_socket, (char *)&diss_conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&Reliable_sockets[*sockp].addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1308 SENDTO(Unreliable_socket, (char *)&diss_conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&Reliable_sockets[*sockp].addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1311 ml_printf("Unknown protocol type in nw_CloseSocket()!\n");
1315 memset(&Reliable_sockets[*sockp],0,sizeof(reliable_socket));
1316 Reliable_sockets[*sockp].status = RNF_UNUSED;
1319 // function to check the status of the reliable socket and try to re-initialize it if necessary.
1320 // win95 seems to have trouble doing a reinit of the socket immediately after close, so this
1321 // function exists to check the status, and reinitialize if we need to
1322 int psnet_rel_check()
1327 // send data reliably
1328 int psnet_rel_send(PSNET_SOCKET_RELIABLE socketid, ubyte *data, int length, int np_index)
1332 reliable_socket *rsocket;
1334 if(socketid >= MAXRELIABLESOCKETS){
1335 ml_printf("Invalid socket id passed to psnet_rel_send() -- %d\n",socketid);
1339 SDL_assert( length < (int)(sizeof(reliable_header)) );
1342 rsocket=&Reliable_sockets[socketid];
1343 if(rsocket->status!=RNF_CONNECTED) {
1344 //We can't send because this isn't a connected reliable socket.
1345 ml_printf("Can't send packet because of status %d in nw_SendReliable(). socket = %d\n",rsocket->status,socketid);
1349 // Add the new packet to the sending list and send it.
1350 for(i=0;i<MAXNETBUFFERS;i++){
1351 if(NULL==rsocket->sbuffers[i]){
1352 reliable_header send_header;
1353 int send_this_packet=1;
1355 rsocket->send_len[i] = length;
1356 rsocket->sbuffers[i] = (reliable_net_sendbuffer *)malloc(sizeof(reliable_net_sendbuffer));
1358 memcpy(rsocket->sbuffers[i]->buffer,data,length);
1360 send_header.seq = INTEL_SHORT( rsocket->theirsequence );
1361 rsocket->ssequence[i] = rsocket->theirsequence;
1363 memcpy(send_header.data,data,length);
1364 send_header.data_len = INTEL_SHORT( (ushort)length );
1365 send_header.type = RNT_DATA;
1366 send_header.send_time = psnet_get_time();
1367 send_header.send_time = INTEL_FLOAT( send_header.send_time );
1368 // struct sockaddr_in * rsockaddr = (struct sockaddr_in *)&rsocket->addr;
1370 if (send_this_packet){
1371 switch ( rsocket->connection_type ){
1376 bytesout = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE+rsocket->send_len[i],0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1382 multi_rate_add(np_index, "tcp(h)", RELIABLE_PACKET_HEADER_ONLY_SIZE+rsocket->send_len[i]);
1383 bytesout = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE+rsocket->send_len[i],0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1386 ml_printf("Unknown protocol type in nw_SendReliable()!\n");
1391 if((bytesout==SOCKET_ERROR)&&(WSAEWOULDBLOCK==WSAGetLastError())){
1392 //This will cause it to try to send again next frame. (or sooner)
1393 rsocket->timesent[i] = psnet_get_time()-(NETRETRYTIME*4);
1395 rsocket->timesent[i] = psnet_get_time();
1399 rsocket->theirsequence++;
1403 ml_printf("PSNET RELIABLE SEND BUFFER OVERRUN. socket = %d\n",socketid);
1409 // -1 socket not connected
1410 // 0 No packet ready to receive
1411 // >0 Buffer filled with the number of bytes recieved
1412 int psnet_rel_get(PSNET_SOCKET socketid, ubyte *buffer, int max_len)
1416 reliable_socket *rsocket = NULL;
1418 if(socketid >= MAXRELIABLESOCKETS){
1419 ml_printf("Invalid socket id passed to nw_NewReceiveReliable() -- %d\n",socketid);
1422 rsocket = &Reliable_sockets[socketid];
1423 if( (RNF_CONNECTED!=rsocket->status) && (RNF_LIMBO!=rsocket->status) ){
1424 ml_printf("Can't receive packet because it isn't connected in nw_ReceiveReliable(). socket = %d\n",socketid);
1427 //If the buffer position is the position we are waiting for, fill in
1428 //the buffer we received in the call to this function and return true
1430 for(i=0; i<MAXNETBUFFERS; i++){
1431 if((rsocket->rsequence[i] == rsocket->oursequence) && rsocket->rbuffers[i]){
1432 memcpy(buffer,rsocket->rbuffers[i]->buffer, rsocket->recv_len[i]);
1433 free(rsocket->rbuffers[i]);
1434 rsocket->rbuffers[i] = NULL;
1435 rsocket->rsequence[i] = 0;
1436 rsocket->oursequence++;
1437 return rsocket->recv_len[i];
1444 // process all active reliable sockets
1445 void psnet_rel_work()
1449 int max_len = NETBUFFERSIZE;
1451 struct timeval timeout;
1452 static reliable_header rcv_buff;
1453 static struct sockaddr rcv_addr;
1455 int addrlen = sizeof(struct sockaddr);
1459 PSNET_TOP_LAYER_PROCESS();
1461 // negotitate initial connection with the server
1462 reliable_socket *rsocket = NULL;
1463 if(Serverconn != 0xffffffff){
1464 //Check to see if we need to send a packet out.
1465 if((Reliable_sockets[Serverconn].status==RNF_LIMBO) && ((Serverconn != 0xffffffff) && fl_abs((psnet_get_time() - Last_sent_iamhere))>NETRETRYTIME) ){
1466 reliable_header conn_header;
1467 //Now send I_AM_HERE packet
1468 conn_header.type = RNT_I_AM_HERE;
1469 conn_header.seq = (ushort)(~CONNECTSEQ);
1470 conn_header.data_len = 0;
1471 Last_sent_iamhere = psnet_get_time();
1472 int ret = SOCKET_ERROR;
1473 switch ( Reliable_sockets[Serverconn].connection_type ) {
1476 ml_printf("Unable to use this network connection type in nw_WorkReliable()\n");
1480 ret = SENDTO(Unreliable_socket, (char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&Reliable_sockets[Serverconn].addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1484 ml_printf("Unable to use this network connection type in nw_WorkReliable()\n");
1488 ret = SENDTO(Unreliable_socket, (char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&Reliable_sockets[Serverconn].addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1491 ml_printf("Unknown protocol type in nw_WorkReliable()!\n");
1496 if((ret == SOCKET_ERROR) && (WSAEWOULDBLOCK == WSAGetLastError())){
1497 Reliable_sockets[Serverconn].last_packet_sent = psnet_get_time()-NETRETRYTIME;
1499 Reliable_sockets[Serverconn].last_packet_sent = psnet_get_time();
1505 net_addr_t d3_rcv_addr;
1506 struct sockaddr_in *rcvaddr;
1507 int ipx_has_data = 0;
1508 int udp_has_data = 0;
1512 if(Ipx_active && (Socket_type == NET_IPX)){
1514 FD_SET(Unreliable_socket, &read_fds);
1516 ipx_has_data = SELECT(0,&read_fds,NULL,NULL,&timeout, PSNET_TYPE_RELIABLE);
1518 ipx_has_data = SELECT(Unreliable_socket+1,&read_fds,NULL,NULL,&timeout, PSNET_TYPE_RELIABLE);
1521 if(Tcp_active && (Socket_type == NET_TCP)){
1523 FD_SET(Unreliable_socket, &read_fds);
1525 udp_has_data = SELECT(0,&read_fds,NULL,NULL,&timeout, PSNET_TYPE_RELIABLE);
1527 udp_has_data = SELECT(Unreliable_socket+1,&read_fds,NULL,NULL,&timeout, PSNET_TYPE_RELIABLE);
1531 addrlen = sizeof(struct sockaddr);
1534 SOCKADDR_IPX *ipx_addr = (SOCKADDR_IPX *)&rcv_addr;
1535 memset(&d3_rcv_addr,0,sizeof(net_addr_t));
1536 memset(&rcv_addr,0,sizeof(struct sockaddr));
1537 bytesin = RECVFROM(Unreliable_socket, (char *)&rcv_buff,sizeof(reliable_header),0,(struct sockaddr *)&rcv_addr,&addrlen, PSNET_TYPE_RELIABLE);
1538 memcpy(d3_rcv_addr.addr, ipx_addr->sa_nodenum, 6);
1539 memcpy(d3_rcv_addr.net_id, ipx_addr->sa_netnum, 4);
1540 d3_rcv_addr.type = NET_IPX;
1541 link_type = NET_IPX;
1543 } else if(udp_has_data){
1544 struct sockaddr_in *tcp_addr = (struct sockaddr_in *)&rcv_addr;
1545 memset(&d3_rcv_addr,0,sizeof(net_addr_t));
1546 memset(&rcv_addr,0,sizeof(struct sockaddr));
1547 bytesin = RECVFROM(Unreliable_socket, (char *)&rcv_buff,sizeof(reliable_header), 0, (struct sockaddr *)&rcv_addr,&addrlen, PSNET_TYPE_RELIABLE);
1548 rcv_buff.seq = INTEL_SHORT( rcv_buff.seq );
1549 rcv_buff.data_len = INTEL_SHORT( rcv_buff.data_len );
1550 rcv_buff.send_time = INTEL_FLOAT( rcv_buff.send_time );
1551 memcpy(d3_rcv_addr.addr, &tcp_addr->sin_addr.s_addr, 4);
1552 d3_rcv_addr.port = tcp_addr->sin_port;
1553 d3_rcv_addr.type = NET_TCP;
1554 link_type = NET_TCP;
1556 //Neither socket had data waiting
1561 ml_printf("recvfrom returned an error! -- %d\n",WSAGetLastError());
1562 //Int3();//See Kevin
1566 //Someone wants to connect, so find a slot
1567 if(rcv_buff.type == RNT_REQ_CONN){
1568 for(i=1; i<MAXRELIABLESOCKETS; i++){
1569 if( (Reliable_sockets[i].status == RNF_CONNECTED) || (Reliable_sockets[i].status == RNF_LIMBO) ){
1570 //if(memcmp(&rcv_addr,&reliable_sockets[i].addr,sizeof(struct sockaddr))==0)
1571 if(memcmp(&d3_rcv_addr, &Reliable_sockets[i].net_addr, sizeof(net_addr_t)) == 0){
1572 //We already have a reliable link to this user, so we will ignore it...
1573 ml_printf("Received duplicate connection request. %d\n",i);
1574 //reliable_sockets[i].last_packet_received = timer_GetTime();
1575 psnet_rel_send_ack(&Reliable_sockets[i].addr, rcv_buff.seq, link_type, rcv_buff.send_time);
1576 //We will change this as a hack to prevent later code from hooking us up
1577 rcv_buff.type = 0xff;
1582 for(i=1; i<MAXRELIABLESOCKETS; i++){
1583 if(Reliable_sockets[i].status == RNF_UNUSED){
1584 //Add the new connection here.
1585 Reliable_sockets[i].connection_type=link_type;
1586 memcpy(&Reliable_sockets[i].net_addr, &d3_rcv_addr, sizeof(net_addr_t));
1587 memcpy(&Reliable_sockets[i].addr ,&rcv_addr, sizeof(struct sockaddr));
1588 Reliable_sockets[i].ping_pos = 0;
1589 Reliable_sockets[i].num_ping_samples = 0;
1590 Reliable_sockets[i].status = RNF_LIMBO;
1591 Reliable_sockets[i].last_packet_received = psnet_get_time();
1592 rsocket = &Reliable_sockets[i];
1593 rcvaddr = (struct sockaddr_in *)&rcv_addr;
1594 ml_printf("Connect from %s:%d\n", inet_ntoa(rcvaddr->sin_addr), htons(rcvaddr->sin_port));
1598 if(i==MAXRELIABLESOCKETS){
1599 //No more connections!
1600 ml_printf("Out of incoming reliable connection sockets\n");
1601 //Int3();//See Kevin
1604 psnet_rel_send_ack(&rsocket->addr, rcv_buff.seq, link_type, rcv_buff.send_time);
1607 //Find out if this is a packet from someone we were expecting a packet.
1608 rcvaddr = (struct sockaddr_in *)&rcv_addr;
1609 for(i=1; i<MAXRELIABLESOCKETS; i++){
1610 if(memcmp(&d3_rcv_addr,&Reliable_sockets[i].net_addr,sizeof(net_addr_t)) == 0){
1611 rsocket=&Reliable_sockets[i];
1615 if(rsocket == NULL){
1616 ml_printf("Received reliable data from unconnected client.\n");
1617 ml_printf("Received from %s:%d\n",inet_ntoa(rcvaddr->sin_addr),rcvaddr->sin_port);
1620 rsocket->last_packet_received = psnet_get_time();
1622 if(rsocket->status != RNF_CONNECTED){
1624 if(rsocket->status == RNF_LIMBO){
1625 //this is our connection to the server
1626 if(Serverconn != 0xffffffff){
1627 if(rcv_buff.type == RNT_ACK){
1628 ushort *acknum = (ushort *)&rcv_buff.data;
1629 if(*acknum == (~CONNECTSEQ & 0xffff)){
1630 rsocket->status = RNF_CONNECTED;
1631 ml_printf("Got ACK for IAMHERE!\n");
1635 } else if(rcv_buff.type == RNT_I_AM_HERE){
1636 rsocket->status = RNF_CONNECTING;
1637 psnet_rel_send_ack(&rsocket->addr, rcv_buff.seq, link_type, rcv_buff.send_time);
1638 ml_printf("Got IAMHERE!\n");
1642 if((rcv_buff.type == RNT_DATA) && (Serverconn != 0xffffffff)){
1643 rsocket->status = RNF_CONNECTED;
1645 rsocket->last_packet_received = psnet_get_time();
1649 //Update the last recv variable so we don't need a heartbeat
1650 rsocket->last_packet_received = psnet_get_time();
1652 if(rcv_buff.type == RNT_HEARTBEAT){
1655 if(rcv_buff.type == RNT_ACK){
1657 rsocket->num_ping_samples++;
1659 rsocket->pings[rsocket->ping_pos] = rsocket->last_packet_received - rcv_buff.send_time;
1660 if(rsocket->num_ping_samples >= MAX_PING_HISTORY){
1661 float sort_ping[MAX_PING_HISTORY];
1662 for(int a=0;a<MAX_PING_HISTORY;a++){
1663 sort_ping[a] = rsocket->pings[a];
1666 qsort(sort_ping ,MAX_PING_HISTORY, sizeof(float), psnet_rel_ping_compare);
1667 rsocket->mean_ping = ((sort_ping[MAX_PING_HISTORY/2]+sort_ping[(MAX_PING_HISTORY/2)+1]))/2;
1669 rsocket->ping_pos++;
1670 if(rsocket->ping_pos >= MAX_PING_HISTORY){
1671 rsocket->ping_pos=0;
1674 // if this is an ack for a send buffer on the socket, kill the send buffer. its done
1675 for(i=0; i<MAXNETBUFFERS; i++){
1676 unsigned int *acksig = (unsigned int *)&rcv_buff.data;
1678 if(rsocket->sbuffers[i]){
1679 if(rsocket->ssequence[i] == INTEL_INT(*acksig) ){
1680 SDL_assert(rsocket->sbuffers[i] != NULL);
1681 free(rsocket->sbuffers[i]);
1682 rsocket->sbuffers[i] = NULL;
1683 rsocket->ssequence[i] = 0;
1688 //remove that packet from the send buffer
1689 rsocket->last_packet_received = psnet_get_time();
1693 if(rcv_buff.type == RNT_DATA_COMP){
1695 //Decompress it. Put it back in the buffer. Process it as RNT_DATA
1696 rcv_buff.type = RNT_DATA;
1698 if(rcv_buff.type == RNT_DATA){
1699 //If the data is out of order by >= MAXNETBUFFERS-1 ignore that packet for now
1701 seqdelta = rcv_buff.seq - rsocket->oursequence;
1702 if(seqdelta<0) seqdelta = seqdelta*-1;
1703 if(seqdelta>=MAXNETBUFFERS - 1){
1704 ml_printf("Received reliable packet out of order!\n");
1705 //It's out of order, so we won't ack it, which will mean we will get it again soon.
1708 //else move data into the proper buffer position
1711 if(rsocket->oursequence < (0xffff - (MAXNETBUFFERS-1))){
1712 if (rsocket->oursequence > rcv_buff.seq){
1716 //Sequence is high, so prepare for wrap around
1717 if( ((unsigned short)(rcv_buff.seq + rsocket->oursequence)) > (MAXNETBUFFERS-1)){
1722 for(i=0; i<MAXNETBUFFERS; i++){
1723 if( (NULL != rsocket->rbuffers[i]) && (rsocket->rsequence[i] == rcv_buff.seq)){
1724 //Received duplicate packet!
1729 for(i=0; i<MAXNETBUFFERS; i++){
1730 if(NULL == rsocket->rbuffers[i]){
1731 if(rcv_buff.data_len>max_len){
1732 rsocket->recv_len[i] = rcv_buff.data_len;
1734 rsocket->recv_len[i] = rcv_buff.data_len;
1736 rsocket->rbuffers[i] = (reliable_net_rcvbuffer *)malloc(sizeof(reliable_net_rcvbuffer));
1737 memcpy(rsocket->rbuffers[i]->buffer,rcv_buff.data,rsocket->recv_len[i]);
1738 rsocket->rsequence[i] = rcv_buff.seq;
1743 psnet_rel_send_ack(&rsocket->addr, rcv_buff.seq, link_type, rcv_buff.send_time);
1747 } while((ipx_has_data>0) || (udp_has_data>0));
1749 // Go through each reliable socket that is connected and do any needed work.
1750 for(j=0; j<MAXRELIABLESOCKETS; j++){
1751 rsocket=&Reliable_sockets[j];
1753 if(Serverconn == 0xffffffff){
1754 if(rsocket->status==RNF_LIMBO){
1755 if(fl_abs((psnet_get_time() - rsocket->last_packet_received))>Nettimeout){
1756 ml_printf("Reliable (but in limbo) socket (%d) timed out in nw_WorkReliable().\n",j);
1757 memset(rsocket,0,sizeof(reliable_socket));
1758 rsocket->status = RNF_UNUSED;//Won't work if this is an outgoing connection.
1762 if((rsocket->status == RNF_LIMBO) && (fl_abs((psnet_get_time() - First_sent_iamhere)) > Nettimeout)){
1763 rsocket->status = RNF_BROKEN;
1764 ml_printf("Reliable socket (%d) timed out in nw_WorkReliable().\n",j);
1768 if(rsocket->status == RNF_CONNECTED){
1769 float retry_packet_time;
1770 if((rsocket->mean_ping==0) || (rsocket->mean_ping > (NETRETRYTIME*4))){
1771 retry_packet_time = NETRETRYTIME;
1773 if(rsocket->mean_ping<MIN_NET_RETRYTIME) {
1774 retry_packet_time = (float)MIN_NET_RETRYTIME;
1776 retry_packet_time = ((float)(float)rsocket->mean_ping * (float)1.25);
1779 //Iterate through send buffers.
1780 for(i=0;i<MAXNETBUFFERS;i++){
1782 if((rsocket->sbuffers[i]) && (fl_abs((psnet_get_time() - rsocket->timesent[i])) >= retry_packet_time)) {
1783 reliable_header send_header;
1784 send_header.send_time = psnet_get_time();
1785 send_header.send_time = INTEL_FLOAT( send_header.send_time );
1786 send_header.seq = INTEL_SHORT( rsocket->ssequence[i] );
1787 memcpy(send_header.data,rsocket->sbuffers[i]->buffer,rsocket->send_len[i]);
1788 send_header.data_len = INTEL_SHORT( (ushort)rsocket->send_len[i] );
1789 send_header.type = RNT_DATA;
1790 if(rsocket->connection_type == NET_TCP){
1791 rcode = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE+rsocket->send_len[i],0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1792 } else if(rsocket->connection_type == NET_IPX){
1793 rcode = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE+rsocket->send_len[i],0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1795 if((rcode == SOCKET_ERROR) && (WSAEWOULDBLOCK == WSAGetLastError())){
1796 //The packet didn't get sent, flag it to try again next frame
1797 rsocket->timesent[i] = psnet_get_time()-(NETRETRYTIME*4);
1799 rsocket->last_packet_sent = psnet_get_time();
1800 rsocket->timesent[i] = psnet_get_time();
1806 if((rsocket->status == RNF_CONNECTED) && (fl_abs((psnet_get_time() - rsocket->last_packet_sent)) > NETHEARTBEATTIME)) {
1807 reliable_header send_header;
1808 send_header.send_time = psnet_get_time();
1809 send_header.send_time = INTEL_FLOAT( send_header.send_time );
1810 send_header.seq = 0;
1811 send_header.data_len = 0;
1812 send_header.type = RNT_HEARTBEAT;
1815 if(rsocket->connection_type == NET_TCP){
1816 rcode = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1817 } else if(rsocket->connection_type == NET_IPX){
1818 rcode = SENDTO(Unreliable_socket, (char *)&send_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,&rsocket->addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
1820 if((rcode != SOCKET_ERROR) && (WSAEWOULDBLOCK != WSAGetLastError())){
1821 //It must have been sent
1822 rsocket->last_packet_sent = psnet_get_time();
1826 if((rsocket->status == RNF_CONNECTED) && (fl_abs((psnet_get_time() - rsocket->last_packet_received))>Nettimeout)){
1827 //This socket is hosed.....inform someone?
1828 ml_printf("Reliable Socket (%d) timed out in nw_WorkReliable().\n",j);
1829 rsocket->status = RNF_BROKEN;
1835 // get the status of a reliable socket, see RNF_* defines above
1836 int psnet_rel_get_status(PSNET_SOCKET_RELIABLE socketid)
1838 if(socketid >= MAXRELIABLESOCKETS){
1842 return Reliable_sockets[socketid].status;
1845 // function which checks the Listen_socket for possibly incoming requests to be connected.
1846 // returns 0 on error or nothing waiting. 1 if we should try to accept
1847 int psnet_rel_check_for_listen(net_addr_t *from_addr)
1849 struct sockaddr_in *ip_addr; // UDP/TCP socket structure
1851 SOCKADDR_IPX *ipx_addr; // IPX socket structure
1856 for(i=1; i<MAXRELIABLESOCKETS; i++){
1857 if(Reliable_sockets[i].status == RNF_CONNECTING){
1858 Reliable_sockets[i].status = RNF_CONNECTED;
1859 //memcpy(from_addr,&reliable_sockets[i].addr,sizeof(struct sockaddr));
1860 ml_printf("New reliable connection in nw_CheckListenSocket().\n");
1862 switch ( Reliable_sockets[i].connection_type ){
1865 ipx_addr = (SOCKADDR_IPX *)&Reliable_sockets[i].addr;
1866 memset(from_addr, 0x00, sizeof(net_addr_t));
1867 from_addr->port = ntohs( ipx_addr->sa_socket );
1868 from_addr->type = NET_IPX;
1869 memcpy(from_addr->addr, ipx_addr->sa_nodenum, 6 );
1870 memcpy(from_addr->net_id, ipx_addr->sa_netnum, 4 );
1875 ip_addr = (struct sockaddr_in *)&Reliable_sockets[i].addr;
1876 memset(from_addr, 0x00, sizeof(net_addr_t));
1877 from_addr->port = ntohs( ip_addr->sin_port );
1878 from_addr->type = NET_TCP;
1880 memcpy(from_addr->addr, &ip_addr->sin_addr.S_un.S_addr, 4);
1882 memcpy(from_addr->addr, &ip_addr->sin_addr.s_addr, 4);
1891 char dbg_output[50];
1892 nw_GetNumbersFromHostAddress(from_addr,dbg_output);
1893 mprintf((0,"Got address from: %s\n",dbg_output));
1898 return INVALID_SOCKET;
1901 // attacmpt to connect() to the server's tcp socket. socket parameter is simply assigned to the
1902 // Reliable_socket socket created in psnet_init
1903 void psnet_rel_connect_to_server(PSNET_SOCKET *socket, net_addr_t *server_addr)
1905 //Send out a RNT_REQ_CONN packet, and wait for it to be acked.
1906 struct sockaddr_in sockaddr; // UDP/TCP socket structure
1908 SOCKADDR_IPX ipx_addr; // IPX socket structure
1910 struct sockaddr *addr = NULL; // pointer to struct sockaddr to make coding easier
1911 struct sockaddr rcv_addr;
1915 // float time_sent_req = 0;
1916 float first_sent_req = 0;
1917 static reliable_header conn_header;
1918 static reliable_header ack_header;
1920 struct timeval timeout;
1923 *socket = INVALID_SOCKET;
1925 memset(iaddr, 0x00, 6);
1926 memcpy(iaddr, &server_addr->addr, 6);
1927 port = (ushort)(server_addr->port); // Talk to the server listen port
1929 conn_header.type = RNT_REQ_CONN;
1930 conn_header.seq = CONNECTSEQ;
1931 conn_header.data_len = 0;
1936 if((server_addr->type == NET_IPX) && (!Ipx_active)){
1939 if((server_addr->type == NET_TCP) && (!Tcp_active)){
1942 //Flush out any left overs
1943 if(Tcp_active && (Socket_type == NET_TCP)){
1945 FD_SET(Unreliable_socket, &read_fds);
1947 while(SELECT(0, &read_fds, NULL, NULL, &timeout, PSNET_TYPE_RELIABLE)){
1949 while(SELECT(Unreliable_socket+1, &read_fds, NULL, NULL, &timeout, PSNET_TYPE_RELIABLE)){
1951 addrlen = sizeof(struct sockaddr);
1952 bytesin = RECVFROM(Unreliable_socket, (char *)&ack_header,sizeof(reliable_header),0,(struct sockaddr *)&rcv_addr,&addrlen, PSNET_TYPE_RELIABLE);
1954 //Int3();//See Kevin
1955 ml_printf("UDP recvfrom returned an error! -- %d\n",WSAGetLastError());
1960 FD_SET(Unreliable_socket, &read_fds);
1963 if(Ipx_active && (Socket_type == NET_IPX)){
1965 FD_SET(Unreliable_socket, &read_fds);
1967 while(SELECT(0, &read_fds, NULL, NULL, &timeout, PSNET_TYPE_RELIABLE))
1969 while(SELECT(Unreliable_socket+1, &read_fds, NULL, NULL, &timeout, PSNET_TYPE_RELIABLE))
1972 addrlen = sizeof(struct sockaddr);
1973 bytesin = RECVFROM(Unreliable_socket, (char *)&ack_header,sizeof(reliable_header),0,(struct sockaddr *)&rcv_addr,&addrlen, PSNET_TYPE_RELIABLE);
1976 //Int3();//See Kevin
1977 ml_printf("IPX recvfrom returned an error! -- %d\n",WSAGetLastError());
1981 FD_SET(Unreliable_socket, &read_fds);
1984 memset(&ack_header,0,sizeof(reliable_header));
1986 SOCKET typeless_sock = 0;
1987 net_addr_t d3_rcv_addr;
1988 memset(&d3_rcv_addr,0,sizeof(net_addr_t));
1990 switch ( server_addr->type ){
1993 ipx_addr.sa_family = AF_IPX;
1994 memcpy(ipx_addr.sa_nodenum, iaddr, 6);
1995 memcpy(ipx_addr.sa_netnum, server_addr->net_id, 4);
1996 ipx_addr.sa_socket = htons(port);
1997 addr = (struct sockaddr *)&ipx_addr;
1998 if( SOCKET_ERROR == SENDTO(Unreliable_socket, (char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE) ){
1999 ml_printf("Unable to send IPX packet in nw_ConnectToServer()! -- %d\n",WSAGetLastError());
2002 typeless_sock = Unreliable_socket;
2003 memcpy(d3_rcv_addr.addr,ipx_addr.sa_nodenum, 6);
2004 memcpy(d3_rcv_addr.net_id,ipx_addr.sa_netnum, 4);
2005 d3_rcv_addr.type = NET_IPX;
2009 sockaddr.sin_family = AF_INET;
2010 memcpy(&sockaddr.sin_addr.s_addr, iaddr, 4);
2011 sockaddr.sin_port = htons(port);
2012 addr = (struct sockaddr *)&sockaddr;
2013 if( SOCKET_ERROR == SENDTO(Unreliable_socket, (char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE) ){
2014 ml_printf("Unable to send UDP packet in nw_ConnectToServer()! -- %d\n",WSAGetLastError());
2017 memcpy(d3_rcv_addr.addr, &sockaddr.sin_addr.s_addr, 4);
2018 d3_rcv_addr.port = sockaddr.sin_port;
2019 d3_rcv_addr.type = NET_TCP;
2020 typeless_sock = Unreliable_socket;
2024 ml_printf("Network","Unknown protocol type in nw_ConnectToServer()!\n");
2030 first_sent_req = psnet_get_time();
2031 // time_sent_req = psnet_get_time();
2033 //Wait until we get a response from the server or we timeout
2036 PSNET_TOP_LAYER_PROCESS();
2039 FD_SET(typeless_sock, &read_fds);
2041 if(SELECT(0, &read_fds, NULL,NULL,&timeout, PSNET_TYPE_RELIABLE)){
2043 if(SELECT(typeless_sock+1, &read_fds, NULL,NULL,&timeout, PSNET_TYPE_RELIABLE)){
2045 ml_string("selected() in psnet_rel_connect_to_server()");
2047 addrlen = sizeof(struct sockaddr);
2048 bytesin = RECVFROM(typeless_sock,(char *)&ack_header,sizeof(reliable_header),0,(struct sockaddr *)&rcv_addr,&addrlen, PSNET_TYPE_RELIABLE);
2050 ml_printf("recvfrom returned an error! -- %d\n",WSAGetLastError());
2055 ml_string("received data after select in psnet_rel_connect_to_server()");
2057 ml_string("about to check ack_header.type");
2058 if(ack_header.type == RNT_ACK){
2059 short *acknum = (short *)&ack_header.data;
2060 if(*acknum == CONNECTSEQ){
2061 for(i=1; i<MAXRELIABLESOCKETS; i++){
2062 if(Reliable_sockets[i].status==RNF_UNUSED){
2063 //Add the new connection here.
2064 memset(&Reliable_sockets[i],0,sizeof(reliable_socket));
2065 Reliable_sockets[i].connection_type = (ubyte)server_addr->type;
2066 memcpy(&Reliable_sockets[i].net_addr,&d3_rcv_addr,sizeof(net_addr_t));
2067 Reliable_sockets[i].last_packet_received = psnet_get_time();
2068 memcpy(&Reliable_sockets[i].addr,&rcv_addr,sizeof(struct sockaddr));
2069 Reliable_sockets[i].status = RNF_LIMBO;
2071 ml_printf("Succesfully connected to server in nw_ConnectToServer().\n");
2072 //Now send I_AM_HERE packet
2073 conn_header.type = RNT_I_AM_HERE;
2074 conn_header.seq = (ushort)(~CONNECTSEQ);
2075 conn_header.data_len = 0;
2077 First_sent_iamhere = psnet_get_time();
2078 Last_sent_iamhere = psnet_get_time();
2079 int rcode = SENDTO(typeless_sock,(char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
2080 if(rcode == SOCKET_ERROR){
2081 *socket = INVALID_SOCKET;
2082 Reliable_sockets[i].status = RNF_UNUSED;
2083 memset(&Reliable_sockets[i],0,sizeof(reliable_socket));
2084 ml_printf("Unable to send packet in nw_ConnectToServer()\n");
2087 Reliable_sockets[i].last_packet_sent = psnet_get_time();
2089 f = psnet_get_time();
2090 while((fl_abs((psnet_get_time() - f))<2) && (Reliable_sockets[i].status != RNF_CONNECTING)){
2097 ml_printf("Out of reliable socket space in nw_ConnectToServer().\n");
2099 } else ml_printf("Received out of sequence ACK in nw_ConnectToServer().\n");
2100 } else ml_printf("Received something that isn't an ACK in nw_ConnectToServer().\n");
2101 } else ml_printf("Received 0 bytes from recvfrom() in nw_ConnectToServer().\n");
2104 if((psnet_get_time()-time_sent_req)>2)
2106 ml_printf("Resending connect request.\n");
2107 int ret = SENDTO(typeless_sock,(char *)&conn_header,RELIABLE_PACKET_HEADER_ONLY_SIZE,0,addr,sizeof(struct sockaddr), PSNET_TYPE_RELIABLE);
2108 if(ret != SOCKET_ERROR){
2109 time_sent_req = psnet_get_time();
2111 ml_printf("Error sending connection request! -- %d\n",WSAGetLastError() );
2116 } while(fl_abs((psnet_get_time() - first_sent_req)) < RELIABLE_CONNECT_TIME);
2119 // returns the ip address of this computer
2121 int psnet_rel_get_ip()
2125 struct sockaddr_in local_address;
2128 // Get the local host name
2129 memset(&local_address, 0, sizeof(local_address));
2130 ret = gethostname(local, 255 );
2131 if (ret != SOCKET_ERROR ){
2132 // Resolve host name for local address
2133 hostent = gethostbyname((char *)local);
2135 local_address.sin_addr.s_addr = *((u_long FAR *)(hostent->h_addr));
2138 ml_string("SOCKET_ERROR in psnet_rel_get_ip()!");
2140 ml_printf(%s:%d\n", inet_ntoa(rcvaddr->sin_addr), htons(rcvaddr->sin_port)
2141 return local_address.sin_addr.s_addr;
2145 // returns the ip address of this computer
2148 struct sockaddr_in local_address;
2150 if(Psnet_connection == NETWORK_CONNECTION_DIALUP){
2151 local_address.sin_addr.s_addr = psnet_ras_status();
2152 if(local_address.sin_addr.s_addr == INADDR_NONE){
2153 local_address.sin_addr.s_addr = INADDR_ANY;
2156 // Init local address to zero
2157 local_address.sin_addr.s_addr = INADDR_ANY;
2160 // NOTE: for memeory checkers, do NOT try to free this
2161 ml_printf("psnet_get_ip() reports IP : %s\n", inet_ntoa(local_address.sin_addr));
2163 return local_address.sin_addr.s_addr;
2166 // initialize reliable sockets
2167 int psnet_init_rel_tcp(int port, int should_listen)
2170 struct sockaddr_in sockaddr;
2172 sockaddr.sin_port = htons((ushort)port);
2173 sockaddr.sin_family = AF_INET;
2175 ml_printf("Setting up reliable sockets.\n");
2177 my_ip = psnet_get_ip();
2179 memcpy(&sockaddr.sin_addr.s_addr, &my_ip, sizeof(uint));
2181 Reliable_UDP_socket = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP );
2182 if(INVALID_SOCKET == Reliable_UDP_socket){
2183 ml_printf("Unable to create reliable UDP socket -- %d\n", WSAGetLastError() );
2186 } else if(bind(Reliable_UDP_socket,(struct sockaddr *)&sockaddr,sizeof(struct sockaddr))!=0){
2187 ml_printf("Unable to bind reliable socket -- %d\n", WSAGetLastError() );
2192 // make any reliable sockets which we create that aren't listening non-blocking sockets
2197 error = ioctlsocket( Reliable_UDP_socket, FIONBIO, &arg );
2198 if ( error == SOCKET_ERROR ) {
2199 ml_printf("Unable to make reliable UDP socket non-blocking -- %d\n", WSAGetLastError() );
2209 // initialize reliable sockets
2210 int psnet_init_rel_ipx(int port, int should_listen)
2216 SOCKADDR_IPX ipx_addr;
2218 memset(&ipx_addr, 0, sizeof(SOCKADDR_IPX));
2219 ipx_addr.sa_family = AF_IPX;
2220 ipx_addr.sa_socket = htons((ushort)port);
2222 Reliable_IPX_socket = socket(AF_IPX, SOCK_DGRAM, NSPROTO_IPX);
2223 if(INVALID_SOCKET == Reliable_IPX_socket){
2224 ml_printf("Unable to create reliable IPX socket -- %d\n", WSAGetLastError() );
2227 } else if(bind(Reliable_IPX_socket,(struct sockaddr *)&ipx_addr,sizeof(struct sockaddr))!=0){
2228 ml_printf("Unable to bind reliable IPX socket -- %d\n", WSAGetLastError() );
2233 // make any reliable sockets which we create that aren't listening non-blocking sockets
2238 error = ioctlsocket( Reliable_IPX_socket, FIONBIO, &arg );
2239 if ( error == SOCKET_ERROR ) {
2240 ml_printf("Unable to make reliable IPX socket non-blocking -- %d\n", WSAGetLastError() );
2251 void psnet_rel_close()
2254 PSNET_SOCKET_RELIABLE sock;
2257 for(idx=0; idx<MAXRELIABLESOCKETS; idx++){
2258 if(Reliable_sockets[idx].status != RNF_UNUSED){
2260 psnet_rel_close_socket(&sock);
2265 // ------------------------------------------------------------------------------------------------------
2266 // PACKET BUFFERING FUNCTIONS
2269 // initialize the buffering system
2270 void psnet_buffer_init(network_packet_buffer_list *l)
2274 // blast the buffer clean
2275 memset(l->psnet_buffers, 0, sizeof(network_packet_buffer) * MAX_PACKET_BUFFERS);
2277 // set all buffer sequence #'s to -1
2278 for(idx=0;idx<MAX_PACKET_BUFFERS;idx++){
2279 l->psnet_buffers[idx].sequence_number = -1;
2282 // initialize the sequence #
2283 l->psnet_seq_number = 0;
2284 l->psnet_lowest_id = -1;
2285 l->psnet_highest_id = -1;
2288 // buffer a packet (maintain order!)
2289 void psnet_buffer_packet(network_packet_buffer_list *l, ubyte *data, int length, net_addr_t *from)
2294 // find the first empty packet
2295 for(idx=0;idx<MAX_PACKET_BUFFERS;idx++){
2296 if(l->psnet_buffers[idx].sequence_number == -1){
2302 // if we didn't find the buffer, report an overrun
2304 ml_printf("WARNING - Buffer overrun in psnet\n");
2307 memcpy(l->psnet_buffers[idx].data, data, length);
2308 l->psnet_buffers[idx].len = length;
2309 memcpy(&l->psnet_buffers[idx].from_addr, from, sizeof(net_addr_t));
2310 l->psnet_buffers[idx].sequence_number = l->psnet_seq_number;
2312 // keep track of the highest id#
2313 l->psnet_highest_id = l->psnet_seq_number++;
2315 // set the lowest id# for the first time
2316 if(l->psnet_lowest_id == -1){
2317 l->psnet_lowest_id = l->psnet_highest_id;
2322 // get the index of the next packet in order!
2323 int psnet_buffer_get_next(network_packet_buffer_list *l, ubyte *data, int *length, net_addr_t *from)
2328 // if there are no buffers, do nothing
2329 if((l->psnet_lowest_id == -1) || (l->psnet_lowest_id > l->psnet_highest_id)){
2333 // search until we find the lowest packet index id#
2334 for(idx=0;idx<MAX_PACKET_BUFFERS;idx++){
2335 // if we found the buffer
2336 if(l->psnet_buffers[idx].sequence_number == l->psnet_lowest_id){
2342 // at this point, we should _always_ have found the buffer
2343 SDL_assert(found_buf);
2345 // copy out the buffer data
2346 memcpy(data, l->psnet_buffers[idx].data, l->psnet_buffers[idx].len);
2347 *length = l->psnet_buffers[idx].len;
2348 memcpy(from, &l->psnet_buffers[idx].from_addr, sizeof(net_addr_t));
2350 // now we need to cleanup the packet list
2352 // mark the buffer as free
2353 l->psnet_buffers[idx].sequence_number = -1;
2354 l->psnet_lowest_id++;
2359 // -------------------------------------------------------------------------------------------------------
2360 // PSNET 2 FORWARD DEFINITIONS
2363 // if the string is a legally formatted ip string
2364 int psnet_is_valid_numeric_ip(char *ip)
2368 int val1,val2,val3,val4;
2370 // get the first ip value
2371 SDL_strlcpy(copy, ip, sizeof(copy));
2372 token = strtok(copy,".");
2376 // get the value of the token
2378 if((val1 < 0) || (val1 > 255)){
2384 token = strtok(NULL,".");
2388 // get the value of the token
2390 if((val2 < 0) || (val2 > 255)){
2396 token = strtok(NULL,".");
2400 // get the value of the token
2402 if((val3 < 0) || (val3 > 255)){
2408 token = strtok(NULL,"");
2412 // get the value of the token
2414 if((val4 < 0) || (val4 > 255)){
2419 // make sure he hasn't entered all 0's
2420 if((val1 == 0) && (val2 == 0) && (val3 == 0) && (val4 == 0)){
2428 // function called from high level FreeSpace code to determine the status of the networking
2429 // code returns one of a handful of macros
2431 DWORD (__stdcall *pRasEnumConnections)(LPRASCONN lprasconn, LPDWORD lpcb, LPDWORD lpcConnections) = NULL;
2432 DWORD (__stdcall *pRasGetConnectStatus)(HRASCONN hrasconn, LPRASCONNSTATUS lprasconnstatus ) = NULL;
2433 DWORD (__stdcall *pRasGetProjectionInfo)(HRASCONN hrasconn, RASPROJECTION rasprojection, LPVOID lpprojection, LPDWORD lpcb ) = NULL;
2435 // functions to get the status of a RAS connection
2436 unsigned int psnet_ras_status()
2439 unsigned long size, num_connections, i;
2440 RASCONN rasbuffer[25];
2441 HINSTANCE ras_handle;
2442 unsigned long rasip=0;
2443 RASPPPIP projection;
2444 // int Ras_connected;
2448 // first, call a LoadLibrary to load the RAS api
2449 ras_handle = LoadLibrary( (LPCWSTR)"rasapi32.dll" );
2450 if ( ras_handle == NULL ) {
2454 pRasEnumConnections = (DWORD (__stdcall *)(LPRASCONN, LPDWORD, LPDWORD))GetProcAddress(ras_handle, "RasEnumConnectionsA");
2455 if (!pRasEnumConnections) {
2456 FreeLibrary( ras_handle );
2459 pRasGetConnectStatus = (DWORD (__stdcall *)(HRASCONN, LPRASCONNSTATUS))GetProcAddress(ras_handle, "RasGetConnectStatusA");
2460 if (!pRasGetConnectStatus) {
2461 FreeLibrary( ras_handle );
2464 pRasGetProjectionInfo = (DWORD (__stdcall *)(HRASCONN, RASPROJECTION, LPVOID, LPDWORD))GetProcAddress(ras_handle, "RasGetProjectionInfoA");
2465 if (!pRasGetProjectionInfo) {
2466 FreeLibrary( ras_handle );
2470 size = sizeof(rasbuffer);
2471 rasbuffer[0].dwSize = sizeof(RASCONN);
2473 rval = pRasEnumConnections( rasbuffer, &size, &num_connections );
2475 FreeLibrary( ras_handle );
2479 // JAS: My computer gets to this point, but I have no RAS connections,
2481 if ( num_connections < 1 ) {
2482 ml_string("Found no RAS connections");
2483 FreeLibrary( ras_handle );
2487 ml_printf("Found %d connections", num_connections);
2489 for (i = 0; i < num_connections; i++ ) {
2490 RASCONNSTATUS status;
2493 ml_printf("Connection %d:", i);
2494 ml_printf("Entry Name: %s", rasbuffer[i].szEntryName);
2495 ml_printf("Device Type: %s", rasbuffer[i].szDeviceType);
2496 ml_printf("Device Name: %s", rasbuffer[i].szDeviceName);
2498 // get the connection status
2499 status.dwSize = sizeof(RASCONNSTATUS);
2500 rval = pRasGetConnectStatus(rasbuffer[i].hrasconn, &status);
2502 FreeLibrary( ras_handle );
2506 // get the projection informatiom
2507 size = sizeof(projection);
2508 projection.dwSize = size;
2509 rval = pRasGetProjectionInfo(rasbuffer[i].hrasconn, RASP_PppIp, &projection, &size );
2511 FreeLibrary( ras_handle );
2515 ml_printf("IP Address: %s", projection.szIpAddress);
2520 FreeLibrary( ras_handle );
2521 rasip = inet_addr((const char *)projection.szIpAddress);
2522 if(rasip==INADDR_NONE){
2526 //The ip of the RAS connection
2530 unsigned int psnet_ras_status()
2538 // functions to get the status of a RAS connection
2540 void psnet_ras_status()
2543 unsigned long size, num_connections, i;
2544 RASCONN rasbuffer[25];
2545 HINSTANCE ras_handle;
2549 // first, call a LoadLibrary to load the RAS api
2550 ras_handle = LoadLibrary( NOX("rasapi32.dll") );
2551 if ( ras_handle == NULL ) {
2555 pRasEnumConnections = (DWORD (__stdcall *)(LPRASCONN, LPDWORD, LPDWORD))GetProcAddress(ras_handle, NOX("RasEnumConnectionsA"));
2556 if (!pRasEnumConnections) {
2557 FreeLibrary( ras_handle );
2560 pRasGetConnectStatus = (DWORD (__stdcall *)(HRASCONN, LPRASCONNSTATUS))GetProcAddress(ras_handle, NOX("RasGetConnectStatusA"));
2561 if (!pRasGetConnectStatus) {
2562 FreeLibrary( ras_handle );
2565 pRasGetProjectionInfo = (DWORD (__stdcall *)(HRASCONN, RASPROJECTION, LPVOID, LPDWORD))GetProcAddress(ras_handle, NOX("RasGetProjectionInfoA"));
2566 if (!pRasGetProjectionInfo) {
2567 FreeLibrary( ras_handle );
2571 size = sizeof(rasbuffer);
2572 rasbuffer[0].dwSize = sizeof(RASCONN);
2574 rval = pRasEnumConnections( rasbuffer, &size, &num_connections );
2576 FreeLibrary( ras_handle );
2580 // JAS: My computer gets to this point, but I have no RAS connections,
2582 if ( num_connections < 1 ) {
2583 ml_printf("Found no connections\n" );
2584 FreeLibrary( ras_handle );
2588 ml_printf("Found %d connections\n", num_connections);
2590 for (i = 0; i < num_connections; i++ ) {
2591 RASCONNSTATUS status;
2592 RASPPPIP projection;
2595 ml_printf("Connection %d:\n", i);
2596 ml_printf("Entry Name: %s\n", rasbuffer[i].szEntryName);
2597 ml_printf("Device Type: %s\n", rasbuffer[i].szDeviceType);
2598 ml_printf("Device Name: %s\n", rasbuffer[i].szDeviceName);
2600 // get the connection status
2601 status.dwSize = sizeof(RASCONNSTATUS);
2602 rval = pRasGetConnectStatus(rasbuffer[i].hrasconn, &status);
2604 FreeLibrary( ras_handle );
2608 ml_printf("\tStatus: %s\n", (status.rasconnstate==RASCS_Connected)?"Connected":"Not Connected");
2610 // get the projection informatiom
2611 size = sizeof(projection);
2612 projection.dwSize = size;
2613 rval = pRasGetProjectionInfo(rasbuffer[i].hrasconn, RASP_PppIp, &projection, &size );
2615 FreeLibrary( ras_handle );
2619 ml_printf("IP Address: %s", projection.szIpAddress));
2624 FreeLibrary( ras_handle );
2628 // set some options on a socket
2629 void psnet_socket_options( SOCKET sock )
2631 int broadcast;//, ret;
2633 int cursize, cursizesize, bufsize;
2635 socklen_t cursize, cursizesize, bufsize;
2638 // Set the mode of the socket to allow broadcasting. We need to be able to broadcast
2639 // when a game is searched for in IPX mode.
2641 if(setsockopt(sock, SOL_SOCKET, SO_BROADCAST, (char *)&broadcast, sizeof(broadcast) )){
2648 // setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (char *)&broadcast, sizeof(broadcast) );
2650 // try and increase the size of my receive buffer
2651 bufsize = MAX_RECEIVE_BUFSIZE;
2653 // set the current size of the receive buffer
2654 cursizesize = sizeof(int);
2655 getsockopt(sock, SOL_SOCKET, SO_RCVBUF, (char *)&cursize, &cursizesize);
2656 // for ( trysize = bufsize; trysize >= cursize; trysize >>= 1 ) {
2657 /*ret =*/ setsockopt(sock, SOL_SOCKET, SO_RCVBUF, (char *)&bufsize, sizeof(bufsize));
2658 /*if ( ret == SOCKET_ERROR ) {
2661 wserr = WSAGetLastError();
2662 // if ( (wserr == WSAENOPROTOOPT) || (wserr == WSAEINVAL) )
2666 getsockopt(sock, SOL_SOCKET, SO_RCVBUF, (char *)&cursize, &cursizesize);
2667 ml_printf("Receive buffer set to %d\n", cursize);
2669 // set the current size of the send buffer
2670 cursizesize = sizeof(int);
2671 getsockopt(sock, SOL_SOCKET, SO_SNDBUF, (char *)&cursize, &cursizesize);
2672 // for ( trysize = bufsize; trysize >= cursize; trysize >>= 1 ) {
2673 /*ret =*/ setsockopt(sock, SOL_SOCKET, SO_SNDBUF, (char *)&bufsize, sizeof(bufsize));
2674 /*if ( ret == SOCKET_ERROR ) {
2677 wserr = WSAGetLastError();
2678 // if ( (wserr == WSAENOPROTOOPT) || (wserr == WSAEINVAL) ){
2682 getsockopt(sock, SOL_SOCKET, SO_SNDBUF, (char *)&cursize, &cursizesize);
2683 ml_printf("Send buffer set to %d\n", cursize);
2686 // initialize ipx socket
2687 int psnet_init_ipx()
2692 SOCKADDR_IPX sockaddr;
2694 IPX_socket = INVALID_SOCKET;
2696 IPX_socket = socket( AF_IPX, SOCK_DGRAM, NSPROTO_IPX );
2697 if ( IPX_socket == INVALID_SOCKET ) {
2698 Ipx_failure_code = WSAGetLastError();
2699 ml_printf("Error on IPX startup %d\n", Ipx_failure_code);
2704 memset(&sockaddr,0,sizeof(SOCKADDR_IPX));
2705 sockaddr.sa_family = AF_IPX;
2706 sockaddr.sa_socket = htons( Psnet_default_port );
2707 if ( bind(IPX_socket, (struct sockaddr*)&sockaddr, sizeof (SOCKADDR_IPX)) == SOCKET_ERROR) {
2708 Ipx_failure_code = WSAGetLastError();
2709 ml_printf("Couldn't bind IPX socket (%d)! Invalidating IPX\n", Ipx_failure_code );
2713 // set socket options
2714 psnet_socket_options( IPX_socket );
2715 Ipx_can_broadcast = Can_broadcast;
2722 // initialize tcp socket
2723 int psnet_init_tcp()
2725 struct sockaddr_in sockaddr;
2727 TCP_socket = INVALID_SOCKET;
2729 TCP_socket = socket( AF_INET, SOCK_DGRAM, 0 );
2730 if ( TCP_socket == (int)INVALID_SOCKET ) {
2731 Tcp_failure_code = WSAGetLastError();
2732 ml_printf("Error on TCP startup %d\n", Tcp_failure_code);
2737 memset(&sockaddr,0,sizeof(struct sockaddr_in));
2738 sockaddr.sin_family = AF_INET;
2739 sockaddr.sin_addr.s_addr = psnet_get_ip();
2740 sockaddr.sin_port = htons( Psnet_default_port );
2741 if ( bind(TCP_socket, (struct sockaddr*)&sockaddr, sizeof (sockaddr)) == SOCKET_ERROR) {
2742 Tcp_failure_code = WSAGetLastError();
2743 ml_printf("Couldn't bind TCP socket (%d)! Invalidating TCP\n", Tcp_failure_code );
2747 // set socket options
2748 psnet_socket_options( TCP_socket );
2749 Tcp_can_broadcast = Can_broadcast;
2755 // get time in seconds
2756 float psnet_get_time()
2758 return (float)timer_get_milliseconds() / 1000.0f;
2761 // mark a socket as having received data
2762 void psnet_mark_received(PSNET_SOCKET_RELIABLE socket)
2765 if((socket == 0xffffffff) || (socket >= MAXRELIABLESOCKETS)){
2770 Reliable_sockets[socket].last_packet_received = psnet_get_time();