]> git.xonotic.org Git - xonotic/darkplaces.git/blob - netconn.c
Make connections atomic. Disconnect before trying to connect.
[xonotic/darkplaces.git] / netconn.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3 Copyright (C) 2002 Mathieu Olivier
4 Copyright (C) 2003 Ashley Rose Hale (LadyHavoc)
5
6 This program is free software; you can redistribute it and/or
7 modify it under the terms of the GNU General Public License
8 as published by the Free Software Foundation; either version 2
9 of the License, or (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
14
15 See the GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20
21 */
22
23 #include "quakedef.h"
24 #include "thread.h"
25 #include "lhnet.h"
26
27 // for secure rcon authentication
28 #include "hmac.h"
29 #include "mdfour.h"
30 #include <time.h>
31
32 #define QWMASTER_PORT 27000
33 #define DPMASTER_PORT 27950
34
35 // note this defaults on for dedicated servers, off for listen servers
36 cvar_t sv_public = {CVAR_SERVER, "sv_public", "0", "1: advertises this server on the master server (so that players can find it in the server browser); 0: allow direct queries only; -1: do not respond to direct queries; -2: do not allow anyone to connect; -3: already block at getchallenge level"};
37 cvar_t sv_public_rejectreason = {CVAR_SERVER, "sv_public_rejectreason", "The server is closing.", "Rejection reason for connects when sv_public is -2"};
38 static cvar_t sv_heartbeatperiod = {CVAR_SERVER | CVAR_SAVE, "sv_heartbeatperiod", "120", "how often to send heartbeat in seconds (only used if sv_public is 1)"};
39 extern cvar_t sv_status_privacy;
40
41 static cvar_t sv_masters [] =
42 {
43         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_master1", "", "user-chosen master server 1"},
44         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_master2", "", "user-chosen master server 2"},
45         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_master3", "", "user-chosen master server 3"},
46         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_master4", "", "user-chosen master server 4"},
47         {CVAR_CLIENT | CVAR_SERVER, "sv_masterextra1", "dpmaster.deathmask.net", "dpmaster.deathmask.net - default master server 1 (admin: Willis)"}, // admin: Willis
48         {CVAR_CLIENT | CVAR_SERVER, "sv_masterextra2", "dpmaster.tchr.no", "dpmaster.tchr.no - default master server 2 (admin: tChr)"}, // admin: tChr
49         {0, NULL, NULL, NULL}
50 };
51
52 #ifdef CONFIG_MENU
53 static cvar_t sv_qwmasters [] =
54 {
55         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_qwmaster1", "", "user-chosen qwmaster server 1"},
56         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_qwmaster2", "", "user-chosen qwmaster server 2"},
57         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_qwmaster3", "", "user-chosen qwmaster server 3"},
58         {CVAR_CLIENT | CVAR_SERVER | CVAR_SAVE, "sv_qwmaster4", "", "user-chosen qwmaster server 4"},
59         {CVAR_CLIENT | CVAR_SERVER, "sv_qwmasterextra1", "master.quakeservers.net:27000", "Global master server. (admin: unknown)"},
60         {CVAR_CLIENT | CVAR_SERVER, "sv_qwmasterextra2", "asgaard.morphos-team.net:27000", "Global master server. (admin: unknown)"},
61         {CVAR_CLIENT | CVAR_SERVER, "sv_qwmasterextra3", "qwmaster.ocrana.de:27000", "German master server. (admin: unknown)"},
62         {CVAR_CLIENT | CVAR_SERVER, "sv_qwmasterextra4", "qwmaster.fodquake.net:27000", "Global master server. (admin: unknown)"},
63         {0, NULL, NULL, NULL}
64 };
65 #endif
66
67 static double nextheartbeattime = 0;
68
69 sizebuf_t cl_message;
70 sizebuf_t sv_message;
71 static unsigned char cl_message_buf[NET_MAXMESSAGE];
72 static unsigned char sv_message_buf[NET_MAXMESSAGE];
73 char cl_readstring[MAX_INPUTLINE];
74 char sv_readstring[MAX_INPUTLINE];
75
76 cvar_t net_test = {CVAR_CLIENT | CVAR_SERVER, "net_test", "0", "internal development use only, leave it alone (usually does nothing anyway)"};
77 cvar_t net_usesizelimit = {CVAR_SERVER, "net_usesizelimit", "2", "use packet size limiting (0: never, 1: in non-CSQC mode, 2: always)"};
78 cvar_t net_burstreserve = {CVAR_SERVER, "net_burstreserve", "0.3", "how much of the burst time to reserve for packet size spikes"};
79 cvar_t net_messagetimeout = {CVAR_CLIENT | CVAR_SERVER, "net_messagetimeout","300", "drops players who have not sent any packets for this many seconds"};
80 cvar_t net_connecttimeout = {CVAR_CLIENT | CVAR_SERVER, "net_connecttimeout","15", "after requesting a connection, the client must reply within this many seconds or be dropped (cuts down on connect floods). Must be above 10 seconds."};
81 cvar_t net_connectfloodblockingtimeout = {CVAR_SERVER, "net_connectfloodblockingtimeout", "5", "when a connection packet is received, it will block all future connect packets from that IP address for this many seconds (cuts down on connect floods). Note that this does not include retries from the same IP; these are handled earlier and let in."};
82 cvar_t net_challengefloodblockingtimeout = {CVAR_SERVER, "net_challengefloodblockingtimeout", "0.5", "when a challenge packet is received, it will block all future challenge packets from that IP address for this many seconds (cuts down on challenge floods). DarkPlaces clients retry once per second, so this should be <= 1. Failure here may lead to connect attempts failing."};
83 cvar_t net_getstatusfloodblockingtimeout = {CVAR_SERVER, "net_getstatusfloodblockingtimeout", "1", "when a getstatus packet is received, it will block all future getstatus packets from that IP address for this many seconds (cuts down on getstatus floods). DarkPlaces retries every 4 seconds, and qstat retries once per second, so this should be <= 1. Failure here may lead to server not showing up in the server list."};
84 cvar_t net_sourceaddresscheck = {CVAR_CLIENT, "net_sourceaddresscheck", "1", "compare the source IP address for replies (more secure, may break some bad multihoming setups"};
85 cvar_t hostname = {CVAR_SERVER | CVAR_SAVE, "hostname", "UNNAMED", "server message to show in server browser"};
86 cvar_t developer_networking = {CVAR_CLIENT | CVAR_SERVER, "developer_networking", "0", "prints all received and sent packets (recommended only for debugging)"};
87
88 cvar_t cl_netlocalping = {CVAR_CLIENT, "cl_netlocalping","0", "lags local loopback connection by this much ping time (useful to play more fairly on your own server with people with higher pings)"};
89 static cvar_t cl_netpacketloss_send = {CVAR_CLIENT, "cl_netpacketloss_send","0", "drops this percentage of outgoing packets, useful for testing network protocol robustness (jerky movement, prediction errors, etc)"};
90 static cvar_t cl_netpacketloss_receive = {CVAR_CLIENT, "cl_netpacketloss_receive","0", "drops this percentage of incoming packets, useful for testing network protocol robustness (jerky movement, effects failing to start, sounds failing to play, etc)"};
91 static cvar_t net_slist_queriespersecond = {CVAR_CLIENT, "net_slist_queriespersecond", "20", "how many server information requests to send per second"};
92 static cvar_t net_slist_queriesperframe = {CVAR_CLIENT, "net_slist_queriesperframe", "4", "maximum number of server information requests to send each rendered frame (guards against low framerates causing problems)"};
93 static cvar_t net_slist_timeout = {CVAR_CLIENT, "net_slist_timeout", "4", "how long to listen for a server information response before giving up"};
94 static cvar_t net_slist_pause = {CVAR_CLIENT, "net_slist_pause", "0", "when set to 1, the server list won't update until it is set back to 0"};
95 static cvar_t net_slist_maxtries = {CVAR_CLIENT, "net_slist_maxtries", "3", "how many times to ask the same server for information (more times gives better ping reports but takes longer)"};
96 static cvar_t net_slist_favorites = {CVAR_CLIENT | CVAR_SAVE | CVAR_NQUSERINFOHACK, "net_slist_favorites", "", "contains a list of IP addresses and ports to always query explicitly"};
97 static cvar_t net_tos_dscp = {CVAR_CLIENT | CVAR_SAVE, "net_tos_dscp", "32", "DiffServ Codepoint for network sockets (may need game restart to apply)"};
98 static cvar_t gameversion = {CVAR_SERVER, "gameversion", "0", "version of game data (mod-specific) to be sent to querying clients"};
99 static cvar_t gameversion_min = {CVAR_CLIENT | CVAR_SERVER, "gameversion_min", "-1", "minimum version of game data (mod-specific), when client and server gameversion mismatch in the server browser the server is shown as incompatible; if -1, gameversion is used alone"};
100 static cvar_t gameversion_max = {CVAR_CLIENT | CVAR_SERVER, "gameversion_max", "-1", "maximum version of game data (mod-specific), when client and server gameversion mismatch in the server browser the server is shown as incompatible; if -1, gameversion is used alone"};
101 static cvar_t rcon_restricted_password = {CVAR_SERVER | CVAR_PRIVATE, "rcon_restricted_password", "", "password to authenticate rcon commands in restricted mode; may be set to a string of the form user1:pass1 user2:pass2 user3:pass3 to allow multiple user accounts - the client then has to specify ONE of these combinations"};
102 static cvar_t rcon_restricted_commands = {CVAR_SERVER, "rcon_restricted_commands", "", "allowed commands for rcon when the restricted mode password was used"};
103 static cvar_t rcon_secure_maxdiff = {CVAR_SERVER, "rcon_secure_maxdiff", "5", "maximum time difference between rcon request and server system clock (to protect against replay attack)"};
104 extern cvar_t rcon_secure;
105 extern cvar_t rcon_secure_challengetimeout;
106
107 double masterquerytime = -1000;
108 int masterquerycount = 0;
109 int masterreplycount = 0;
110 int serverquerycount = 0;
111 int serverreplycount = 0;
112
113 challenge_t challenges[MAX_CHALLENGES];
114
115 #ifdef CONFIG_MENU
116 /// this is only false if there are still servers left to query
117 static qboolean serverlist_querysleep = true;
118 static qboolean serverlist_paused = false;
119 /// this is pushed a second or two ahead of realtime whenever a master server
120 /// reply is received, to avoid issuing queries while master replies are still
121 /// flooding in (which would make a mess of the ping times)
122 static double serverlist_querywaittime = 0;
123 #endif
124
125 static int cl_numsockets;
126 static lhnetsocket_t *cl_sockets[16];
127 static int sv_numsockets;
128 static lhnetsocket_t *sv_sockets[16];
129
130 netconn_t *netconn_list = NULL;
131 mempool_t *netconn_mempool = NULL;
132 void *netconn_mutex = NULL;
133
134 cvar_t cl_netport = {CVAR_CLIENT, "cl_port", "0", "forces client to use chosen port number if not 0"};
135 cvar_t sv_netport = {CVAR_SERVER, "port", "26000", "server port for players to connect to"};
136 cvar_t net_address = {CVAR_CLIENT | CVAR_SERVER, "net_address", "", "network address to open ipv4 ports on (if empty, use default interfaces)"};
137 cvar_t net_address_ipv6 = {CVAR_CLIENT | CVAR_SERVER, "net_address_ipv6", "", "network address to open ipv6 ports on (if empty, use default interfaces)"};
138
139 char cl_net_extresponse[NET_EXTRESPONSE_MAX][1400];
140 int cl_net_extresponse_count = 0;
141 int cl_net_extresponse_last = 0;
142
143 char sv_net_extresponse[NET_EXTRESPONSE_MAX][1400];
144 int sv_net_extresponse_count = 0;
145 int sv_net_extresponse_last = 0;
146
147 #ifdef CONFIG_MENU
148 // ServerList interface
149 serverlist_mask_t serverlist_andmasks[SERVERLIST_ANDMASKCOUNT];
150 serverlist_mask_t serverlist_ormasks[SERVERLIST_ORMASKCOUNT];
151
152 serverlist_infofield_t serverlist_sortbyfield;
153 int serverlist_sortflags;
154
155 int serverlist_viewcount = 0;
156 unsigned short serverlist_viewlist[SERVERLIST_VIEWLISTSIZE];
157
158 int serverlist_maxcachecount = 0;
159 int serverlist_cachecount = 0;
160 serverlist_entry_t *serverlist_cache = NULL;
161
162 qboolean serverlist_consoleoutput;
163
164 static int nFavorites = 0;
165 static lhnetaddress_t favorites[MAX_FAVORITESERVERS];
166 static int nFavorites_idfp = 0;
167 static char favorites_idfp[MAX_FAVORITESERVERS][FP64_SIZE+1];
168
169 void NetConn_UpdateFavorites(void)
170 {
171         const char *p;
172         nFavorites = 0;
173         nFavorites_idfp = 0;
174         p = net_slist_favorites.string;
175         while((size_t) nFavorites < sizeof(favorites) / sizeof(*favorites) && COM_ParseToken_Console(&p))
176         {
177                 if(com_token[0] != '[' && strlen(com_token) == FP64_SIZE && !strchr(com_token, '.'))
178                 // currently 44 bytes, longest possible IPv6 address: 39 bytes, so this works
179                 // (if v6 address contains port, it must start with '[')
180                 {
181                         strlcpy(favorites_idfp[nFavorites_idfp], com_token, sizeof(favorites_idfp[nFavorites_idfp]));
182                         ++nFavorites_idfp;
183                 }
184                 else 
185                 {
186                         if(LHNETADDRESS_FromString(&favorites[nFavorites], com_token, 26000))
187                                 ++nFavorites;
188                 }
189         }
190 }
191
192 /// helper function to insert a value into the viewset
193 /// spare entries will be removed
194 static void _ServerList_ViewList_Helper_InsertBefore( int index, serverlist_entry_t *entry )
195 {
196     int i;
197         if( serverlist_viewcount < SERVERLIST_VIEWLISTSIZE ) {
198                 i = serverlist_viewcount++;
199         } else {
200                 i = SERVERLIST_VIEWLISTSIZE - 1;
201         }
202
203         for( ; i > index ; i-- )
204                 serverlist_viewlist[ i ] = serverlist_viewlist[ i - 1 ];
205
206         serverlist_viewlist[index] = (int)(entry - serverlist_cache);
207 }
208
209 /// we suppose serverlist_viewcount to be valid, ie > 0
210 static void _ServerList_ViewList_Helper_Remove( int index )
211 {
212         serverlist_viewcount--;
213         for( ; index < serverlist_viewcount ; index++ )
214                 serverlist_viewlist[index] = serverlist_viewlist[index + 1];
215 }
216
217 /// \returns true if A should be inserted before B
218 static qboolean _ServerList_Entry_Compare( serverlist_entry_t *A, serverlist_entry_t *B )
219 {
220         int result = 0; // > 0 if for numbers A > B and for text if A < B
221
222         if( serverlist_sortflags & SLSF_CATEGORIES )
223         {
224                 result = A->info.category - B->info.category;
225                 if (result != 0)
226                         return result < 0;
227         }
228
229         if( serverlist_sortflags & SLSF_FAVORITES )
230         {
231                 if(A->info.isfavorite != B->info.isfavorite)
232                         return A->info.isfavorite;
233         }
234         
235         switch( serverlist_sortbyfield ) {
236                 case SLIF_PING:
237                         result = A->info.ping - B->info.ping;
238                         break;
239                 case SLIF_MAXPLAYERS:
240                         result = A->info.maxplayers - B->info.maxplayers;
241                         break;
242                 case SLIF_NUMPLAYERS:
243                         result = A->info.numplayers - B->info.numplayers;
244                         break;
245                 case SLIF_NUMBOTS:
246                         result = A->info.numbots - B->info.numbots;
247                         break;
248                 case SLIF_NUMHUMANS:
249                         result = A->info.numhumans - B->info.numhumans;
250                         break;
251                 case SLIF_FREESLOTS:
252                         result = A->info.freeslots - B->info.freeslots;
253                         break;
254                 case SLIF_PROTOCOL:
255                         result = A->info.protocol - B->info.protocol;
256                         break;
257                 case SLIF_CNAME:
258                         result = strcmp( B->info.cname, A->info.cname );
259                         break;
260                 case SLIF_GAME:
261                         result = strcasecmp( B->info.game, A->info.game );
262                         break;
263                 case SLIF_MAP:
264                         result = strcasecmp( B->info.map, A->info.map );
265                         break;
266                 case SLIF_MOD:
267                         result = strcasecmp( B->info.mod, A->info.mod );
268                         break;
269                 case SLIF_NAME:
270                         result = strcasecmp( B->info.name, A->info.name );
271                         break;
272                 case SLIF_QCSTATUS:
273                         result = strcasecmp( B->info.qcstatus, A->info.qcstatus ); // not really THAT useful, though
274                         break;
275                 case SLIF_CATEGORY:
276                         result = A->info.category - B->info.category;
277                         break;
278                 case SLIF_ISFAVORITE:
279                         result = !!B->info.isfavorite - !!A->info.isfavorite;
280                         break;
281                 default:
282                         Con_DPrint( "_ServerList_Entry_Compare: Bad serverlist_sortbyfield!\n" );
283                         break;
284         }
285
286         if (result != 0)
287         {
288                 if( serverlist_sortflags & SLSF_DESCENDING )
289                         return result > 0;
290                 else
291                         return result < 0;
292         }
293
294         // if the chosen sort key is identical, sort by index
295         // (makes this a stable sort, so that later replies from servers won't
296         //  shuffle the servers around when they have the same ping)
297         return A < B;
298 }
299
300 static qboolean _ServerList_CompareInt( int A, serverlist_maskop_t op, int B )
301 {
302         // This should actually be done with some intermediate and end-of-function return
303         switch( op ) {
304                 case SLMO_LESS:
305                         return A < B;
306                 case SLMO_LESSEQUAL:
307                         return A <= B;
308                 case SLMO_EQUAL:
309                         return A == B;
310                 case SLMO_GREATER:
311                         return A > B;
312                 case SLMO_NOTEQUAL:
313                         return A != B;
314                 case SLMO_GREATEREQUAL:
315                 case SLMO_CONTAINS:
316                 case SLMO_NOTCONTAIN:
317                 case SLMO_STARTSWITH:
318                 case SLMO_NOTSTARTSWITH:
319                         return A >= B;
320                 default:
321                         Con_DPrint( "_ServerList_CompareInt: Bad op!\n" );
322                         return false;
323         }
324 }
325
326 static qboolean _ServerList_CompareStr( const char *A, serverlist_maskop_t op, const char *B )
327 {
328         int i;
329         char bufferA[ 1400 ], bufferB[ 1400 ]; // should be more than enough
330         COM_StringDecolorize(A, 0, bufferA, sizeof(bufferA), false);
331         for (i = 0;i < (int)sizeof(bufferA)-1 && bufferA[i];i++)
332                 bufferA[i] = (bufferA[i] >= 'A' && bufferA[i] <= 'Z') ? (bufferA[i] + 'a' - 'A') : bufferA[i];
333         bufferA[i] = 0;
334         for (i = 0;i < (int)sizeof(bufferB)-1 && B[i];i++)
335                 bufferB[i] = (B[i] >= 'A' && B[i] <= 'Z') ? (B[i] + 'a' - 'A') : B[i];
336         bufferB[i] = 0;
337
338         // Same here, also using an intermediate & final return would be more appropriate
339         // A info B mask
340         switch( op ) {
341                 case SLMO_CONTAINS:
342                         return *bufferB && !!strstr( bufferA, bufferB ); // we want a real bool
343                 case SLMO_NOTCONTAIN:
344                         return !*bufferB || !strstr( bufferA, bufferB );
345                 case SLMO_STARTSWITH:
346                         //Con_Printf("startsWith: %s %s\n", bufferA, bufferB);
347                         return *bufferB && !memcmp(bufferA, bufferB, strlen(bufferB));
348                 case SLMO_NOTSTARTSWITH:
349                         return !*bufferB || memcmp(bufferA, bufferB, strlen(bufferB));
350                 case SLMO_LESS:
351                         return strcmp( bufferA, bufferB ) < 0;
352                 case SLMO_LESSEQUAL:
353                         return strcmp( bufferA, bufferB ) <= 0;
354                 case SLMO_EQUAL:
355                         return strcmp( bufferA, bufferB ) == 0;
356                 case SLMO_GREATER:
357                         return strcmp( bufferA, bufferB ) > 0;
358                 case SLMO_NOTEQUAL:
359                         return strcmp( bufferA, bufferB ) != 0;
360                 case SLMO_GREATEREQUAL:
361                         return strcmp( bufferA, bufferB ) >= 0;
362                 default:
363                         Con_DPrint( "_ServerList_CompareStr: Bad op!\n" );
364                         return false;
365         }
366 }
367
368 static qboolean _ServerList_Entry_Mask( serverlist_mask_t *mask, serverlist_info_t *info )
369 {
370         if( !_ServerList_CompareInt( info->ping, mask->tests[SLIF_PING], mask->info.ping ) )
371                 return false;
372         if( !_ServerList_CompareInt( info->maxplayers, mask->tests[SLIF_MAXPLAYERS], mask->info.maxplayers ) )
373                 return false;
374         if( !_ServerList_CompareInt( info->numplayers, mask->tests[SLIF_NUMPLAYERS], mask->info.numplayers ) )
375                 return false;
376         if( !_ServerList_CompareInt( info->numbots, mask->tests[SLIF_NUMBOTS], mask->info.numbots ) )
377                 return false;
378         if( !_ServerList_CompareInt( info->numhumans, mask->tests[SLIF_NUMHUMANS], mask->info.numhumans ) )
379                 return false;
380         if( !_ServerList_CompareInt( info->freeslots, mask->tests[SLIF_FREESLOTS], mask->info.freeslots ) )
381                 return false;
382         if( !_ServerList_CompareInt( info->protocol, mask->tests[SLIF_PROTOCOL], mask->info.protocol ))
383                 return false;
384         if( *mask->info.cname
385                 && !_ServerList_CompareStr( info->cname, mask->tests[SLIF_CNAME], mask->info.cname ) )
386                 return false;
387         if( *mask->info.game
388                 && !_ServerList_CompareStr( info->game, mask->tests[SLIF_GAME], mask->info.game ) )
389                 return false;
390         if( *mask->info.mod
391                 && !_ServerList_CompareStr( info->mod, mask->tests[SLIF_MOD], mask->info.mod ) )
392                 return false;
393         if( *mask->info.map
394                 && !_ServerList_CompareStr( info->map, mask->tests[SLIF_MAP], mask->info.map ) )
395                 return false;
396         if( *mask->info.name
397                 && !_ServerList_CompareStr( info->name, mask->tests[SLIF_NAME], mask->info.name ) )
398                 return false;
399         if( *mask->info.qcstatus
400                 && !_ServerList_CompareStr( info->qcstatus, mask->tests[SLIF_QCSTATUS], mask->info.qcstatus ) )
401                 return false;
402         if( *mask->info.players
403                 && !_ServerList_CompareStr( info->players, mask->tests[SLIF_PLAYERS], mask->info.players ) )
404                 return false;
405         if( !_ServerList_CompareInt( info->category, mask->tests[SLIF_CATEGORY], mask->info.category ) )
406                 return false;
407         if( !_ServerList_CompareInt( info->isfavorite, mask->tests[SLIF_ISFAVORITE], mask->info.isfavorite ))
408                 return false;
409         return true;
410 }
411
412 static void ServerList_ViewList_Insert( serverlist_entry_t *entry )
413 {
414         int start, end, mid, i;
415         lhnetaddress_t addr;
416
417         // reject incompatible servers
418         if(
419                 entry->info.gameversion != gameversion.integer
420                 &&
421                 !(
422                            gameversion_min.integer >= 0 // min/max range set by user/mod?
423                         && gameversion_max.integer >= 0
424                         && gameversion_min.integer <= entry->info.gameversion // version of server in min/max range?
425                         && gameversion_max.integer >= entry->info.gameversion
426                  )
427         )
428                 return;
429
430         // refresh the "favorite" status
431         entry->info.isfavorite = false;
432         if(LHNETADDRESS_FromString(&addr, entry->info.cname, 26000))
433         {
434                 char idfp[FP64_SIZE+1];
435                 for(i = 0; i < nFavorites; ++i)
436                 {
437                         if(LHNETADDRESS_Compare(&addr, &favorites[i]) == 0)
438                         {
439                                 entry->info.isfavorite = true;
440                                 break;
441                         }
442                 }
443                 if(Crypto_RetrieveHostKey(&addr, 0, NULL, 0, idfp, sizeof(idfp), NULL, NULL))
444                 {
445                         for(i = 0; i < nFavorites_idfp; ++i)
446                         {
447                                 if(!strcmp(idfp, favorites_idfp[i]))
448                                 {
449                                         entry->info.isfavorite = true;
450                                         break;
451                                 }
452                         }
453                 }
454         }
455
456         // refresh the "category"
457         entry->info.category = MR_GetServerListEntryCategory(entry);
458
459         // FIXME: change this to be more readable (...)
460         // now check whether it passes through the masks
461         for( start = 0 ; start < SERVERLIST_ANDMASKCOUNT && serverlist_andmasks[start].active; start++ )
462                 if( !_ServerList_Entry_Mask( &serverlist_andmasks[start], &entry->info ) )
463                         return;
464
465         for( start = 0 ; start < SERVERLIST_ORMASKCOUNT && serverlist_ormasks[start].active ; start++ )
466                 if( _ServerList_Entry_Mask( &serverlist_ormasks[start], &entry->info ) )
467                         break;
468         if( start == SERVERLIST_ORMASKCOUNT || (start > 0 && !serverlist_ormasks[start].active) )
469                 return;
470
471         if( !serverlist_viewcount ) {
472                 _ServerList_ViewList_Helper_InsertBefore( 0, entry );
473                 return;
474         }
475         // ok, insert it, we just need to find out where exactly:
476
477         // two special cases
478         // check whether to insert it as new first item
479         if( _ServerList_Entry_Compare( entry, ServerList_GetViewEntry(0) ) ) {
480                 _ServerList_ViewList_Helper_InsertBefore( 0, entry );
481                 return;
482         } // check whether to insert it as new last item
483         else if( !_ServerList_Entry_Compare( entry, ServerList_GetViewEntry(serverlist_viewcount - 1) ) ) {
484                 _ServerList_ViewList_Helper_InsertBefore( serverlist_viewcount, entry );
485                 return;
486         }
487         start = 0;
488         end = serverlist_viewcount - 1;
489         while( end > start + 1 )
490         {
491                 mid = (start + end) / 2;
492                 // test the item that lies in the middle between start and end
493                 if( _ServerList_Entry_Compare( entry, ServerList_GetViewEntry(mid) ) )
494                         // the item has to be in the upper half
495                         end = mid;
496                 else
497                         // the item has to be in the lower half
498                         start = mid;
499         }
500         _ServerList_ViewList_Helper_InsertBefore( start + 1, entry );
501 }
502
503 static void ServerList_ViewList_Remove( serverlist_entry_t *entry )
504 {
505         int i;
506         for( i = 0; i < serverlist_viewcount; i++ )
507         {
508                 if (ServerList_GetViewEntry(i) == entry)
509                 {
510                         _ServerList_ViewList_Helper_Remove(i);
511                         break;
512                 }
513         }
514 }
515
516 void ServerList_RebuildViewList(void)
517 {
518         int i;
519
520         serverlist_viewcount = 0;
521         for( i = 0 ; i < serverlist_cachecount ; i++ ) {
522                 serverlist_entry_t *entry = &serverlist_cache[i];
523                 // also display entries that are currently being refreshed [11/8/2007 Black]
524                 if( entry->query == SQS_QUERIED || entry->query == SQS_REFRESHING )
525                         ServerList_ViewList_Insert( entry );
526         }
527 }
528
529 void ServerList_ResetMasks(void)
530 {
531         int i;
532
533         memset( &serverlist_andmasks, 0, sizeof( serverlist_andmasks ) );
534         memset( &serverlist_ormasks, 0, sizeof( serverlist_ormasks ) );
535         // numbots needs to be compared to -1 to always succeed
536         for(i = 0; i < SERVERLIST_ANDMASKCOUNT; ++i)
537                 serverlist_andmasks[i].info.numbots = -1;
538         for(i = 0; i < SERVERLIST_ORMASKCOUNT; ++i)
539                 serverlist_ormasks[i].info.numbots = -1;
540 }
541
542 void ServerList_GetPlayerStatistics(int *numplayerspointer, int *maxplayerspointer)
543 {
544         int i;
545         int numplayers = 0, maxplayers = 0;
546         for (i = 0;i < serverlist_cachecount;i++)
547         {
548                 if (serverlist_cache[i].query == SQS_QUERIED)
549                 {
550                         numplayers += serverlist_cache[i].info.numhumans;
551                         maxplayers += serverlist_cache[i].info.maxplayers;
552                 }
553         }
554         *numplayerspointer = numplayers;
555         *maxplayerspointer = maxplayers;
556 }
557
558 #if 0
559 static void _ServerList_Test(void)
560 {
561         int i;
562         if (serverlist_maxcachecount <= 1024)
563         {
564                 serverlist_maxcachecount = 1024;
565                 serverlist_cache = (serverlist_entry_t *)Mem_Realloc(netconn_mempool, (void *)serverlist_cache, sizeof(serverlist_entry_t) * serverlist_maxcachecount);
566         }
567         for( i = 0 ; i < 1024 ; i++ ) {
568                 memset( &serverlist_cache[serverlist_cachecount], 0, sizeof( serverlist_entry_t ) );
569                 serverlist_cache[serverlist_cachecount].info.ping = 1000 + 1024 - i;
570                 dpsnprintf( serverlist_cache[serverlist_cachecount].info.name, sizeof(serverlist_cache[serverlist_cachecount].info.name), "Black's ServerList Test %i", i );
571                 serverlist_cache[serverlist_cachecount].finished = true;
572                 dpsnprintf( serverlist_cache[serverlist_cachecount].line1, sizeof(serverlist_cache[serverlist_cachecount].info.line1), "%i %s", serverlist_cache[serverlist_cachecount].info.ping, serverlist_cache[serverlist_cachecount].info.name );
573                 ServerList_ViewList_Insert( &serverlist_cache[serverlist_cachecount] );
574                 serverlist_cachecount++;
575         }
576 }
577 #endif
578
579 void ServerList_QueryList(qboolean resetcache, qboolean querydp, qboolean queryqw, qboolean consoleoutput)
580 {
581         masterquerytime = realtime;
582         masterquerycount = 0;
583         masterreplycount = 0;
584         if( resetcache ) {
585                 serverquerycount = 0;
586                 serverreplycount = 0;
587                 serverlist_cachecount = 0;
588                 serverlist_viewcount = 0;
589                 serverlist_maxcachecount = 0;
590                 serverlist_cache = (serverlist_entry_t *)Mem_Realloc(netconn_mempool, (void *)serverlist_cache, sizeof(serverlist_entry_t) * serverlist_maxcachecount);
591         } else {
592                 // refresh all entries
593                 int n;
594                 for( n = 0 ; n < serverlist_cachecount ; n++ ) {
595                         serverlist_entry_t *entry = &serverlist_cache[ n ];
596                         entry->query = SQS_REFRESHING;
597                         entry->querycounter = 0;
598                 }
599         }
600         serverlist_consoleoutput = consoleoutput;
601
602         //_ServerList_Test();
603
604         NetConn_QueryMasters(querydp, queryqw);
605 }
606 #endif
607
608 // rest
609
610 int NetConn_Read(lhnetsocket_t *mysocket, void *data, int maxlength, lhnetaddress_t *peeraddress)
611 {
612         int length;
613         int i;
614         if (mysocket->address.addresstype == LHNETADDRESSTYPE_LOOP && netconn_mutex)
615                 Thread_LockMutex(netconn_mutex);
616         length = LHNET_Read(mysocket, data, maxlength, peeraddress);
617         if (mysocket->address.addresstype == LHNETADDRESSTYPE_LOOP && netconn_mutex)
618                 Thread_UnlockMutex(netconn_mutex);
619         if (length == 0)
620                 return 0;
621         if (cl_netpacketloss_receive.integer)
622                 for (i = 0;i < cl_numsockets;i++)
623                         if (cl_sockets[i] == mysocket && (rand() % 100) < cl_netpacketloss_receive.integer)
624                                 return 0;
625         if (developer_networking.integer)
626         {
627                 char addressstring[128], addressstring2[128];
628                 LHNETADDRESS_ToString(LHNET_AddressFromSocket(mysocket), addressstring, sizeof(addressstring), true);
629                 if (length > 0)
630                 {
631                         LHNETADDRESS_ToString(peeraddress, addressstring2, sizeof(addressstring2), true);
632                         Con_Printf("LHNET_Read(%p (%s), %p, %i, %p) = %i from %s:\n", (void *)mysocket, addressstring, (void *)data, maxlength, (void *)peeraddress, length, addressstring2);
633                         Com_HexDumpToConsole((unsigned char *)data, length);
634                 }
635                 else
636                         Con_Printf("LHNET_Read(%p (%s), %p, %i, %p) = %i\n", (void *)mysocket, addressstring, (void *)data, maxlength, (void *)peeraddress, length);
637         }
638         return length;
639 }
640
641 int NetConn_Write(lhnetsocket_t *mysocket, const void *data, int length, const lhnetaddress_t *peeraddress)
642 {
643         int ret;
644         int i;
645         if (cl_netpacketloss_send.integer)
646                 for (i = 0;i < cl_numsockets;i++)
647                         if (cl_sockets[i] == mysocket && (rand() % 100) < cl_netpacketloss_send.integer)
648                                 return length;
649         if (mysocket->address.addresstype == LHNETADDRESSTYPE_LOOP && netconn_mutex)
650                 Thread_LockMutex(netconn_mutex);
651         ret = LHNET_Write(mysocket, data, length, peeraddress);
652         if (mysocket->address.addresstype == LHNETADDRESSTYPE_LOOP && netconn_mutex)
653                 Thread_UnlockMutex(netconn_mutex);
654         if (developer_networking.integer)
655         {
656                 char addressstring[128], addressstring2[128];
657                 LHNETADDRESS_ToString(LHNET_AddressFromSocket(mysocket), addressstring, sizeof(addressstring), true);
658                 LHNETADDRESS_ToString(peeraddress, addressstring2, sizeof(addressstring2), true);
659                 Con_Printf("LHNET_Write(%p (%s), %p, %i, %p (%s)) = %i%s\n", (void *)mysocket, addressstring, (void *)data, length, (void *)peeraddress, addressstring2, length, ret == length ? "" : " (ERROR)");
660                 Com_HexDumpToConsole((unsigned char *)data, length);
661         }
662         return ret;
663 }
664
665 int NetConn_WriteString(lhnetsocket_t *mysocket, const char *string, const lhnetaddress_t *peeraddress)
666 {
667         // note this does not include the trailing NULL because we add that in the parser
668         return NetConn_Write(mysocket, string, (int)strlen(string), peeraddress);
669 }
670
671 qboolean NetConn_CanSend(netconn_t *conn)
672 {
673         conn->outgoing_packetcounter = (conn->outgoing_packetcounter + 1) % NETGRAPH_PACKETS;
674         conn->outgoing_netgraph[conn->outgoing_packetcounter].time            = realtime;
675         conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes = NETGRAPH_NOPACKET;
676         conn->outgoing_netgraph[conn->outgoing_packetcounter].reliablebytes   = NETGRAPH_NOPACKET;
677         conn->outgoing_netgraph[conn->outgoing_packetcounter].ackbytes        = NETGRAPH_NOPACKET;
678         conn->outgoing_netgraph[conn->outgoing_packetcounter].cleartime       = conn->cleartime;
679         if (realtime > conn->cleartime)
680                 return true;
681         else
682         {
683                 conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes = NETGRAPH_CHOKEDPACKET;
684                 return false;
685         }
686 }
687
688 static void NetConn_UpdateCleartime(double *cleartime, int rate, int burstsize, int len)
689 {
690         double bursttime = burstsize / (double)rate;
691
692         // delay later packets to obey rate limit
693         if (*cleartime < realtime - bursttime)
694                 *cleartime = realtime - bursttime;
695         *cleartime = *cleartime + len / (double)rate;
696
697         // limit bursts to one packet in size ("dialup mode" emulating old behaviour)
698         if (net_test.integer)
699         {
700                 if (*cleartime < realtime)
701                         *cleartime = realtime;
702         }
703 }
704
705 static int NetConn_AddCryptoFlag(crypto_t *crypto)
706 {
707         // HACK: if an encrypted connection is used, randomly set some unused
708         // flags. When AES encryption is enabled, that will make resends differ
709         // from the original, so that e.g. substring filters in a router/IPS
710         // are unlikely to match a second time. See also "startkeylogger".
711         int flag = 0;
712         if (crypto->authenticated)
713         {
714                 // Let's always set at least one of the bits.
715                 int r = rand() % 7 + 1;
716                 if (r & 1)
717                         flag |= NETFLAG_CRYPTO0;
718                 if (r & 2)
719                         flag |= NETFLAG_CRYPTO1;
720                 if (r & 4)
721                         flag |= NETFLAG_CRYPTO2;
722         }
723         return flag;
724 }
725
726 int NetConn_SendUnreliableMessage(netconn_t *conn, sizebuf_t *data, protocolversion_t protocol, int rate, int burstsize, qboolean quakesignon_suppressreliables)
727 {
728         int totallen = 0;
729         unsigned char sendbuffer[NET_HEADERSIZE+NET_MAXMESSAGE];
730         unsigned char cryptosendbuffer[NET_HEADERSIZE+NET_MAXMESSAGE+CRYPTO_HEADERSIZE];
731
732         // if this packet was supposedly choked, but we find ourselves sending one
733         // anyway, make sure the size counting starts at zero
734         // (this mostly happens on level changes and disconnects and such)
735         if (conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes == NETGRAPH_CHOKEDPACKET)
736                 conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes = NETGRAPH_NOPACKET;
737
738         conn->outgoing_netgraph[conn->outgoing_packetcounter].cleartime = conn->cleartime;
739
740         if (protocol == PROTOCOL_QUAKEWORLD)
741         {
742                 int packetLen;
743                 qboolean sendreliable;
744
745                 // note that it is ok to send empty messages to the qw server,
746                 // otherwise it won't respond to us at all
747
748                 sendreliable = false;
749                 // if the remote side dropped the last reliable message, resend it
750                 if (conn->qw.incoming_acknowledged > conn->qw.last_reliable_sequence && conn->qw.incoming_reliable_acknowledged != conn->qw.reliable_sequence)
751                         sendreliable = true;
752                 // if the reliable transmit buffer is empty, copy the current message out
753                 if (!conn->sendMessageLength && conn->message.cursize)
754                 {
755                         memcpy (conn->sendMessage, conn->message.data, conn->message.cursize);
756                         conn->sendMessageLength = conn->message.cursize;
757                         SZ_Clear(&conn->message); // clear the message buffer
758                         conn->qw.reliable_sequence ^= 1;
759                         sendreliable = true;
760                 }
761                 // outgoing unreliable packet number, and outgoing reliable packet number (0 or 1)
762                 StoreLittleLong(sendbuffer, conn->outgoing_unreliable_sequence | (((unsigned int)sendreliable)<<31));
763                 // last received unreliable packet number, and last received reliable packet number (0 or 1)
764                 StoreLittleLong(sendbuffer + 4, conn->qw.incoming_sequence | (((unsigned int)conn->qw.incoming_reliable_sequence)<<31));
765                 packetLen = 8;
766                 conn->outgoing_unreliable_sequence++;
767                 // client sends qport in every packet
768                 if (conn == cls.netcon)
769                 {
770                         *((short *)(sendbuffer + 8)) = LittleShort(cls.qw_qport);
771                         packetLen += 2;
772                         // also update cls.qw_outgoing_sequence
773                         cls.qw_outgoing_sequence = conn->outgoing_unreliable_sequence;
774                 }
775                 if (packetLen + (sendreliable ? conn->sendMessageLength : 0) > 1400)
776                 {
777                         Con_Printf ("NetConn_SendUnreliableMessage: reliable message too big %u\n", data->cursize);
778                         return -1;
779                 }
780
781                 conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes += packetLen + 28;
782
783                 // add the reliable message if there is one
784                 if (sendreliable)
785                 {
786                         conn->outgoing_netgraph[conn->outgoing_packetcounter].reliablebytes += conn->sendMessageLength + 28;
787                         memcpy(sendbuffer + packetLen, conn->sendMessage, conn->sendMessageLength);
788                         packetLen += conn->sendMessageLength;
789                         conn->qw.last_reliable_sequence = conn->outgoing_unreliable_sequence;
790                 }
791
792                 // add the unreliable message if possible
793                 if (packetLen + data->cursize <= 1400)
794                 {
795                         conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes += data->cursize + 28;
796                         memcpy(sendbuffer + packetLen, data->data, data->cursize);
797                         packetLen += data->cursize;
798                 }
799
800                 NetConn_Write(conn->mysocket, (void *)&sendbuffer, packetLen, &conn->peeraddress);
801
802                 conn->packetsSent++;
803                 conn->unreliableMessagesSent++;
804
805                 totallen += packetLen + 28;
806         }
807         else
808         {
809                 unsigned int packetLen;
810                 unsigned int dataLen;
811                 unsigned int eom;
812                 const void *sendme;
813                 size_t sendmelen;
814
815                 // if a reliable message fragment has been lost, send it again
816                 if (conn->sendMessageLength && (realtime - conn->lastSendTime) > 1.0)
817                 {
818                         if (conn->sendMessageLength <= MAX_PACKETFRAGMENT)
819                         {
820                                 dataLen = conn->sendMessageLength;
821                                 eom = NETFLAG_EOM;
822                         }
823                         else
824                         {
825                                 dataLen = MAX_PACKETFRAGMENT;
826                                 eom = 0;
827                         }
828
829                         packetLen = NET_HEADERSIZE + dataLen;
830
831                         StoreBigLong(sendbuffer, packetLen | (NETFLAG_DATA | eom | NetConn_AddCryptoFlag(&conn->crypto)));
832                         StoreBigLong(sendbuffer + 4, conn->nq.sendSequence - 1);
833                         memcpy(sendbuffer + NET_HEADERSIZE, conn->sendMessage, dataLen);
834
835                         conn->outgoing_netgraph[conn->outgoing_packetcounter].reliablebytes += packetLen + 28;
836
837                         sendme = Crypto_EncryptPacket(&conn->crypto, &sendbuffer, packetLen, &cryptosendbuffer, &sendmelen, sizeof(cryptosendbuffer));
838                         if (sendme && NetConn_Write(conn->mysocket, sendme, (int)sendmelen, &conn->peeraddress) == (int)sendmelen)
839                         {
840                                 conn->lastSendTime = realtime;
841                                 conn->packetsReSent++;
842                         }
843
844                         totallen += (int)sendmelen + 28;
845                 }
846
847                 // if we have a new reliable message to send, do so
848                 if (!conn->sendMessageLength && conn->message.cursize && !quakesignon_suppressreliables)
849                 {
850                         if (conn->message.cursize > (int)sizeof(conn->sendMessage))
851                         {
852                                 Con_Printf("NetConn_SendUnreliableMessage: reliable message too big (%u > %u)\n", conn->message.cursize, (int)sizeof(conn->sendMessage));
853                                 conn->message.overflowed = true;
854                                 return -1;
855                         }
856
857                         if (developer_networking.integer && conn == cls.netcon)
858                         {
859                                 Con_Print("client sending reliable message to server:\n");
860                                 SZ_HexDumpToConsole(&conn->message);
861                         }
862
863                         memcpy(conn->sendMessage, conn->message.data, conn->message.cursize);
864                         conn->sendMessageLength = conn->message.cursize;
865                         SZ_Clear(&conn->message);
866
867                         if (conn->sendMessageLength <= MAX_PACKETFRAGMENT)
868                         {
869                                 dataLen = conn->sendMessageLength;
870                                 eom = NETFLAG_EOM;
871                         }
872                         else
873                         {
874                                 dataLen = MAX_PACKETFRAGMENT;
875                                 eom = 0;
876                         }
877
878                         packetLen = NET_HEADERSIZE + dataLen;
879
880                         StoreBigLong(sendbuffer, packetLen | (NETFLAG_DATA | eom | NetConn_AddCryptoFlag(&conn->crypto)));
881                         StoreBigLong(sendbuffer + 4, conn->nq.sendSequence);
882                         memcpy(sendbuffer + NET_HEADERSIZE, conn->sendMessage, dataLen);
883
884                         conn->nq.sendSequence++;
885
886                         conn->outgoing_netgraph[conn->outgoing_packetcounter].reliablebytes += packetLen + 28;
887
888                         sendme = Crypto_EncryptPacket(&conn->crypto, &sendbuffer, packetLen, &cryptosendbuffer, &sendmelen, sizeof(cryptosendbuffer));
889                         if(sendme)
890                                 NetConn_Write(conn->mysocket, sendme, (int)sendmelen, &conn->peeraddress);
891
892                         conn->lastSendTime = realtime;
893                         conn->packetsSent++;
894                         conn->reliableMessagesSent++;
895
896                         totallen += (int)sendmelen + 28;
897                 }
898
899                 // if we have an unreliable message to send, do so
900                 if (data->cursize)
901                 {
902                         packetLen = NET_HEADERSIZE + data->cursize;
903
904                         if (packetLen > (int)sizeof(sendbuffer))
905                         {
906                                 Con_Printf("NetConn_SendUnreliableMessage: message too big %u\n", data->cursize);
907                                 return -1;
908                         }
909
910                         StoreBigLong(sendbuffer, packetLen | NETFLAG_UNRELIABLE | NetConn_AddCryptoFlag(&conn->crypto));
911                         StoreBigLong(sendbuffer + 4, conn->outgoing_unreliable_sequence);
912                         memcpy(sendbuffer + NET_HEADERSIZE, data->data, data->cursize);
913
914                         conn->outgoing_unreliable_sequence++;
915
916                         conn->outgoing_netgraph[conn->outgoing_packetcounter].unreliablebytes += packetLen + 28;
917
918                         sendme = Crypto_EncryptPacket(&conn->crypto, &sendbuffer, packetLen, &cryptosendbuffer, &sendmelen, sizeof(cryptosendbuffer));
919                         if(sendme)
920                                 NetConn_Write(conn->mysocket, sendme, (int)sendmelen, &conn->peeraddress);
921
922                         conn->packetsSent++;
923                         conn->unreliableMessagesSent++;
924
925                         totallen += (int)sendmelen + 28;
926                 }
927         }
928
929         NetConn_UpdateCleartime(&conn->cleartime, rate, burstsize, totallen);
930
931         return 0;
932 }
933
934 qboolean NetConn_HaveClientPorts(void)
935 {
936         return !!cl_numsockets;
937 }
938
939 qboolean NetConn_HaveServerPorts(void)
940 {
941         return !!sv_numsockets;
942 }
943
944 void NetConn_CloseClientPorts(void)
945 {
946         for (;cl_numsockets > 0;cl_numsockets--)
947                 if (cl_sockets[cl_numsockets - 1])
948                         LHNET_CloseSocket(cl_sockets[cl_numsockets - 1]);
949 }
950
951 static void NetConn_OpenClientPort(const char *addressstring, lhnetaddresstype_t addresstype, int defaultport)
952 {
953         lhnetaddress_t address;
954         lhnetsocket_t *s;
955         int success;
956         char addressstring2[1024];
957         if (addressstring && addressstring[0])
958                 success = LHNETADDRESS_FromString(&address, addressstring, defaultport);
959         else
960                 success = LHNETADDRESS_FromPort(&address, addresstype, defaultport);
961         if (success)
962         {
963                 if ((s = LHNET_OpenSocket_Connectionless(&address)))
964                 {
965                         cl_sockets[cl_numsockets++] = s;
966                         LHNETADDRESS_ToString(LHNET_AddressFromSocket(s), addressstring2, sizeof(addressstring2), true);
967                         if (addresstype != LHNETADDRESSTYPE_LOOP)
968                                 Con_Printf("Client opened a socket on address %s\n", addressstring2);
969                 }
970                 else
971                 {
972                         LHNETADDRESS_ToString(&address, addressstring2, sizeof(addressstring2), true);
973                         Con_Printf("Client failed to open a socket on address %s\n", addressstring2);
974                 }
975         }
976         else
977                 Con_Printf("Client unable to parse address %s\n", addressstring);
978 }
979
980 void NetConn_OpenClientPorts(void)
981 {
982         int port;
983         NetConn_CloseClientPorts();
984
985         SV_LockThreadMutex(); // FIXME recursive?
986         Crypto_LoadKeys(); // client sockets
987         SV_UnlockThreadMutex();
988
989         port = bound(0, cl_netport.integer, 65535);
990         if (cl_netport.integer != port)
991                 Cvar_SetValueQuick(&cl_netport, port);
992         if(port == 0)
993                 Con_Printf("Client using an automatically assigned port\n");
994         else
995                 Con_Printf("Client using port %i\n", port);
996         NetConn_OpenClientPort(NULL, LHNETADDRESSTYPE_LOOP, 2);
997         NetConn_OpenClientPort(net_address.string, LHNETADDRESSTYPE_INET4, port);
998 #ifndef NOSUPPORTIPV6
999         NetConn_OpenClientPort(net_address_ipv6.string, LHNETADDRESSTYPE_INET6, port);
1000 #endif
1001 }
1002
1003 void NetConn_CloseServerPorts(void)
1004 {
1005         for (;sv_numsockets > 0;sv_numsockets--)
1006                 if (sv_sockets[sv_numsockets - 1])
1007                         LHNET_CloseSocket(sv_sockets[sv_numsockets - 1]);
1008 }
1009
1010 static qboolean NetConn_OpenServerPort(const char *addressstring, lhnetaddresstype_t addresstype, int defaultport, int range)
1011 {
1012         lhnetaddress_t address;
1013         lhnetsocket_t *s;
1014         int port;
1015         char addressstring2[1024];
1016         int success;
1017
1018         for (port = defaultport; port <= defaultport + range; port++)
1019         {
1020                 if (addressstring && addressstring[0])
1021                         success = LHNETADDRESS_FromString(&address, addressstring, port);
1022                 else
1023                         success = LHNETADDRESS_FromPort(&address, addresstype, port);
1024                 if (success)
1025                 {
1026                         if ((s = LHNET_OpenSocket_Connectionless(&address)))
1027                         {
1028                                 sv_sockets[sv_numsockets++] = s;
1029                                 LHNETADDRESS_ToString(LHNET_AddressFromSocket(s), addressstring2, sizeof(addressstring2), true);
1030                                 if (addresstype != LHNETADDRESSTYPE_LOOP)
1031                                         Con_Printf("Server listening on address %s\n", addressstring2);
1032                                 return true;
1033                         }
1034                         else
1035                         {
1036                                 LHNETADDRESS_ToString(&address, addressstring2, sizeof(addressstring2), true);
1037                                 Con_Printf("Server failed to open socket on address %s\n", addressstring2);
1038                         }
1039                 }
1040                 else
1041                 {
1042                         Con_Printf("Server unable to parse address %s\n", addressstring);
1043                         // if it cant parse one address, it wont be able to parse another for sure
1044                         return false;
1045                 }
1046         }
1047         return false;
1048 }
1049
1050 void NetConn_OpenServerPorts(int opennetports)
1051 {
1052         int port;
1053         NetConn_CloseServerPorts();
1054
1055         SV_LockThreadMutex(); // FIXME recursive?
1056         Crypto_LoadKeys(); // server sockets
1057         SV_UnlockThreadMutex();
1058
1059         NetConn_UpdateSockets();
1060         port = bound(0, sv_netport.integer, 65535);
1061         if (port == 0)
1062                 port = 26000;
1063         Con_Printf("Server using port %i\n", port);
1064         if (sv_netport.integer != port)
1065                 Cvar_SetValueQuick(&sv_netport, port);
1066         if (cls.state != ca_dedicated)
1067                 NetConn_OpenServerPort(NULL, LHNETADDRESSTYPE_LOOP, 1, 1);
1068         if (opennetports)
1069         {
1070 #ifndef NOSUPPORTIPV6
1071                 qboolean ip4success = NetConn_OpenServerPort(net_address.string, LHNETADDRESSTYPE_INET4, port, 100);
1072                 NetConn_OpenServerPort(net_address_ipv6.string, LHNETADDRESSTYPE_INET6, port, ip4success ? 1 : 100);
1073 #else
1074                 NetConn_OpenServerPort(net_address.string, LHNETADDRESSTYPE_INET4, port, 100);
1075 #endif
1076         }
1077         if (sv_numsockets == 0)
1078                 Host_Error("NetConn_OpenServerPorts: unable to open any ports!");
1079 }
1080
1081 lhnetsocket_t *NetConn_ChooseClientSocketForAddress(lhnetaddress_t *address)
1082 {
1083         int i, a = LHNETADDRESS_GetAddressType(address);
1084         for (i = 0;i < cl_numsockets;i++)
1085                 if (cl_sockets[i] && LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(cl_sockets[i])) == a)
1086                         return cl_sockets[i];
1087         return NULL;
1088 }
1089
1090 lhnetsocket_t *NetConn_ChooseServerSocketForAddress(lhnetaddress_t *address)
1091 {
1092         int i, a = LHNETADDRESS_GetAddressType(address);
1093         for (i = 0;i < sv_numsockets;i++)
1094                 if (sv_sockets[i] && LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(sv_sockets[i])) == a)
1095                         return sv_sockets[i];
1096         return NULL;
1097 }
1098
1099 netconn_t *NetConn_Open(lhnetsocket_t *mysocket, lhnetaddress_t *peeraddress)
1100 {
1101         netconn_t *conn;
1102         conn = (netconn_t *)Mem_Alloc(netconn_mempool, sizeof(*conn));
1103         conn->mysocket = mysocket;
1104         conn->peeraddress = *peeraddress;
1105         conn->lastMessageTime = realtime;
1106         conn->message.data = conn->messagedata;
1107         conn->message.maxsize = sizeof(conn->messagedata);
1108         conn->message.cursize = 0;
1109         // LadyHavoc: (inspired by ProQuake) use a short connect timeout to
1110         // reduce effectiveness of connection request floods
1111         conn->timeout = realtime + net_connecttimeout.value;
1112         LHNETADDRESS_ToString(&conn->peeraddress, conn->address, sizeof(conn->address), true);
1113         conn->next = netconn_list;
1114         netconn_list = conn;
1115         return conn;
1116 }
1117
1118 void NetConn_ClearFlood(lhnetaddress_t *peeraddress, server_floodaddress_t *floodlist, size_t floodlength);
1119 void NetConn_Close(netconn_t *conn)
1120 {
1121         netconn_t *c;
1122         // remove connection from list
1123
1124         // allow the client to reconnect immediately
1125         NetConn_ClearFlood(&(conn->peeraddress), sv.connectfloodaddresses, sizeof(sv.connectfloodaddresses) / sizeof(sv.connectfloodaddresses[0]));
1126
1127         if (conn == netconn_list)
1128                 netconn_list = conn->next;
1129         else
1130         {
1131                 for (c = netconn_list;c;c = c->next)
1132                 {
1133                         if (c->next == conn)
1134                         {
1135                                 c->next = conn->next;
1136                                 break;
1137                         }
1138                 }
1139                 // not found in list, we'll avoid crashing here...
1140                 if (!c)
1141                         return;
1142         }
1143         // free connection
1144         Mem_Free(conn);
1145 }
1146
1147 static int clientport = -1;
1148 static int clientport2 = -1;
1149 static int hostport = -1;
1150 void NetConn_UpdateSockets(void)
1151 {
1152         int i, j;
1153
1154         // TODO add logic to automatically close sockets if needed
1155         LHNET_DefaultDSCP(net_tos_dscp.integer);
1156
1157         if (cls.state != ca_dedicated)
1158         {
1159                 if (clientport2 != cl_netport.integer)
1160                 {
1161                         clientport2 = cl_netport.integer;
1162                         if (cls.state == ca_connected)
1163                                 Con_Print("Changing \"cl_port\" will not take effect until you reconnect.\n");
1164                 }
1165                 if (cls.state == ca_disconnected && clientport != clientport2)
1166                 {
1167                         clientport = clientport2;
1168                         NetConn_CloseClientPorts();
1169                 }
1170                 if (cl_numsockets == 0)
1171                         NetConn_OpenClientPorts();
1172         }
1173
1174         if (hostport != sv_netport.integer)
1175         {
1176                 hostport = sv_netport.integer;
1177                 if (sv.active)
1178                         Con_Print("Changing \"port\" will not take effect until \"map\" command is executed.\n");
1179         }
1180
1181         for (j = 0;j < MAX_RCONS;j++)
1182         {
1183                 i = (cls.rcon_ringpos + j + 1) % MAX_RCONS;
1184                 if(cls.rcon_commands[i][0])
1185                 {
1186                         if(realtime > cls.rcon_timeout[i])
1187                         {
1188                                 char s[128];
1189                                 LHNETADDRESS_ToString(&cls.rcon_addresses[i], s, sizeof(s), true);
1190                                 Con_Printf("rcon to %s (for command %s) failed: challenge request timed out\n", s, cls.rcon_commands[i]);
1191                                 cls.rcon_commands[i][0] = 0;
1192                                 --cls.rcon_trying;
1193                                 break;
1194                         }
1195                 }
1196         }
1197 }
1198
1199 static int NetConn_ReceivedMessage(netconn_t *conn, const unsigned char *data, size_t length, protocolversion_t protocol, double newtimeout)
1200 {
1201         int originallength = (int)length;
1202         unsigned char sendbuffer[NET_HEADERSIZE+NET_MAXMESSAGE];
1203         unsigned char cryptosendbuffer[NET_HEADERSIZE+NET_MAXMESSAGE+CRYPTO_HEADERSIZE];
1204         unsigned char cryptoreadbuffer[NET_HEADERSIZE+NET_MAXMESSAGE+CRYPTO_HEADERSIZE];
1205         if (length < 8)
1206                 return 0;
1207
1208         if (protocol == PROTOCOL_QUAKEWORLD)
1209         {
1210                 unsigned int sequence, sequence_ack;
1211                 qboolean reliable_ack, reliable_message;
1212                 int count;
1213                 //int qport;
1214
1215                 sequence = LittleLong(*((int *)(data + 0)));
1216                 sequence_ack = LittleLong(*((int *)(data + 4)));
1217                 data += 8;
1218                 length -= 8;
1219
1220                 if (conn != cls.netcon)
1221                 {
1222                         // server only
1223                         if (length < 2)
1224                                 return 0;
1225                         // TODO: use qport to identify that this client really is who they say they are?  (and elsewhere in the code to identify the connection without a port match?)
1226                         //qport = LittleShort(*((int *)(data + 8)));
1227                         data += 2;
1228                         length -= 2;
1229                 }
1230
1231                 conn->packetsReceived++;
1232                 reliable_message = (sequence >> 31) != 0;
1233                 reliable_ack = (sequence_ack >> 31) != 0;
1234                 sequence &= ~(1<<31);
1235                 sequence_ack &= ~(1<<31);
1236                 if (sequence <= conn->qw.incoming_sequence)
1237                 {
1238                         //Con_DPrint("Got a stale datagram\n");
1239                         return 0;
1240                 }
1241                 count = sequence - (conn->qw.incoming_sequence + 1);
1242                 if (count > 0)
1243                 {
1244                         conn->droppedDatagrams += count;
1245                         //Con_DPrintf("Dropped %u datagram(s)\n", count);
1246                         // If too may packets have been dropped, only write the
1247                         // last NETGRAPH_PACKETS ones to the netgraph. Why?
1248                         // Because there's no point in writing more than
1249                         // these as the netgraph is going to be full anyway.
1250                         if (count > NETGRAPH_PACKETS)
1251                                 count = NETGRAPH_PACKETS;
1252                         while (count--)
1253                         {
1254                                 conn->incoming_packetcounter = (conn->incoming_packetcounter + 1) % NETGRAPH_PACKETS;
1255                                 conn->incoming_netgraph[conn->incoming_packetcounter].time            = realtime;
1256                                 conn->incoming_netgraph[conn->incoming_packetcounter].cleartime       = conn->incoming_cleartime;
1257                                 conn->incoming_netgraph[conn->incoming_packetcounter].unreliablebytes = NETGRAPH_LOSTPACKET;
1258                                 conn->incoming_netgraph[conn->incoming_packetcounter].reliablebytes   = NETGRAPH_NOPACKET;
1259                                 conn->incoming_netgraph[conn->incoming_packetcounter].ackbytes        = NETGRAPH_NOPACKET;
1260                         }
1261                 }
1262                 conn->incoming_packetcounter = (conn->incoming_packetcounter + 1) % NETGRAPH_PACKETS;
1263                 conn->incoming_netgraph[conn->incoming_packetcounter].time            = realtime;
1264                 conn->incoming_netgraph[conn->incoming_packetcounter].cleartime       = conn->incoming_cleartime;
1265                 conn->incoming_netgraph[conn->incoming_packetcounter].unreliablebytes = originallength + 28;
1266                 conn->incoming_netgraph[conn->incoming_packetcounter].reliablebytes   = NETGRAPH_NOPACKET;
1267                 conn->incoming_netgraph[conn->incoming_packetcounter].ackbytes        = NETGRAPH_NOPACKET;
1268                 NetConn_UpdateCleartime(&conn->incoming_cleartime, cl_rate.integer, cl_rate_burstsize.integer, originallength + 28);
1269
1270                 // limit bursts to one packet in size ("dialup mode" emulating old behaviour)
1271                 if (net_test.integer)
1272                 {
1273                         if (conn->cleartime < realtime)
1274                                 conn->cleartime = realtime;
1275                 }
1276
1277                 if (reliable_ack == conn->qw.reliable_sequence)
1278                 {
1279                         // received, now we will be able to send another reliable message
1280                         conn->sendMessageLength = 0;
1281                         conn->reliableMessagesReceived++;
1282                 }
1283                 conn->qw.incoming_sequence = sequence;
1284                 if (conn == cls.netcon)
1285                         cls.qw_incoming_sequence = conn->qw.incoming_sequence;
1286                 conn->qw.incoming_acknowledged = sequence_ack;
1287                 conn->qw.incoming_reliable_acknowledged = reliable_ack;
1288                 if (reliable_message)
1289                         conn->qw.incoming_reliable_sequence ^= 1;
1290                 conn->lastMessageTime = realtime;
1291                 conn->timeout = realtime + newtimeout;
1292                 conn->unreliableMessagesReceived++;
1293                 if (conn == cls.netcon)
1294                 {
1295                         SZ_Clear(&cl_message);
1296                         SZ_Write(&cl_message, data, (int)length);
1297                         MSG_BeginReading(&cl_message);
1298                 }
1299                 else
1300                 {
1301                         SZ_Clear(&sv_message);
1302                         SZ_Write(&sv_message, data, (int)length);
1303                         MSG_BeginReading(&sv_message);
1304                 }
1305                 return 2;
1306         }
1307         else
1308         {
1309                 unsigned int count;
1310                 unsigned int flags;
1311                 unsigned int sequence;
1312                 size_t qlength;
1313                 const void *sendme;
1314                 size_t sendmelen;
1315
1316                 originallength = (int)length;
1317                 data = (const unsigned char *) Crypto_DecryptPacket(&conn->crypto, data, length, cryptoreadbuffer, &length, sizeof(cryptoreadbuffer));
1318                 if(!data)
1319                         return 0;
1320                 if(length < 8)
1321                         return 0;
1322
1323                 qlength = (unsigned int)BuffBigLong(data);
1324                 flags = qlength & ~NETFLAG_LENGTH_MASK;
1325                 qlength &= NETFLAG_LENGTH_MASK;
1326                 // control packets were already handled
1327                 if (!(flags & NETFLAG_CTL) && qlength == length)
1328                 {
1329                         sequence = BuffBigLong(data + 4);
1330                         conn->packetsReceived++;
1331                         data += 8;
1332                         length -= 8;
1333                         if (flags & NETFLAG_UNRELIABLE)
1334                         {
1335                                 if (sequence >= conn->nq.unreliableReceiveSequence)
1336                                 {
1337                                         if (sequence > conn->nq.unreliableReceiveSequence)
1338                                         {
1339                                                 count = sequence - conn->nq.unreliableReceiveSequence;
1340                                                 conn->droppedDatagrams += count;
1341                                                 //Con_DPrintf("Dropped %u datagram(s)\n", count);
1342                                                 // If too may packets have been dropped, only write the
1343                                                 // last NETGRAPH_PACKETS ones to the netgraph. Why?
1344                                                 // Because there's no point in writing more than
1345                                                 // these as the netgraph is going to be full anyway.
1346                                                 if (count > NETGRAPH_PACKETS)
1347                                                         count = NETGRAPH_PACKETS;
1348                                                 while (count--)
1349                                                 {
1350                                                         conn->incoming_packetcounter = (conn->incoming_packetcounter + 1) % NETGRAPH_PACKETS;
1351                                                         conn->incoming_netgraph[conn->incoming_packetcounter].time            = realtime;
1352                                                         conn->incoming_netgraph[conn->incoming_packetcounter].cleartime       = conn->incoming_cleartime;
1353                                                         conn->incoming_netgraph[conn->incoming_packetcounter].unreliablebytes = NETGRAPH_LOSTPACKET;
1354                                                         conn->incoming_netgraph[conn->incoming_packetcounter].reliablebytes   = NETGRAPH_NOPACKET;
1355                                                         conn->incoming_netgraph[conn->incoming_packetcounter].ackbytes        = NETGRAPH_NOPACKET;
1356                                                 }
1357                                         }
1358                                         conn->incoming_packetcounter = (conn->incoming_packetcounter + 1) % NETGRAPH_PACKETS;
1359                                         conn->incoming_netgraph[conn->incoming_packetcounter].time            = realtime;
1360                                         conn->incoming_netgraph[conn->incoming_packetcounter].cleartime       = conn->incoming_cleartime;
1361                                         conn->incoming_netgraph[conn->incoming_packetcounter].unreliablebytes = originallength + 28;
1362                                         conn->incoming_netgraph[conn->incoming_packetcounter].reliablebytes   = NETGRAPH_NOPACKET;
1363                                         conn->incoming_netgraph[conn->incoming_packetcounter].ackbytes        = NETGRAPH_NOPACKET;
1364                                         NetConn_UpdateCleartime(&conn->incoming_cleartime, cl_rate.integer, cl_rate_burstsize.integer, originallength + 28);
1365
1366                                         conn->nq.unreliableReceiveSequence = sequence + 1;
1367                                         conn->lastMessageTime = realtime;
1368                                         conn->timeout = realtime + newtimeout;
1369                                         conn->unreliableMessagesReceived++;
1370                                         if (length > 0)
1371                                         {
1372                                                 if (conn == cls.netcon)
1373                                                 {
1374                                                         SZ_Clear(&cl_message);
1375                                                         SZ_Write(&cl_message, data, (int)length);
1376                                                         MSG_BeginReading(&cl_message);
1377                                                 }
1378                                                 else
1379                                                 {
1380                                                         SZ_Clear(&sv_message);
1381                                                         SZ_Write(&sv_message, data, (int)length);
1382                                                         MSG_BeginReading(&sv_message);
1383                                                 }
1384                                                 return 2;
1385                                         }
1386                                 }
1387                                 //else
1388                                 //      Con_DPrint("Got a stale datagram\n");
1389                                 return 1;
1390                         }
1391                         else if (flags & NETFLAG_ACK)
1392                         {
1393                                 conn->incoming_netgraph[conn->incoming_packetcounter].ackbytes += originallength + 28;
1394                                 NetConn_UpdateCleartime(&conn->incoming_cleartime, cl_rate.integer, cl_rate_burstsize.integer, originallength + 28);
1395
1396                                 if (sequence == (conn->nq.sendSequence - 1))
1397                                 {
1398                                         if (sequence == conn->nq.ackSequence)
1399                                         {
1400                                                 conn->nq.ackSequence++;
1401                                                 if (conn->nq.ackSequence != conn->nq.sendSequence)
1402                                                         Con_DPrint("ack sequencing error\n");
1403                                                 conn->lastMessageTime = realtime;
1404                                                 conn->timeout = realtime + newtimeout;
1405                                                 if (conn->sendMessageLength > MAX_PACKETFRAGMENT)
1406                                                 {
1407                                                         unsigned int packetLen;
1408                                                         unsigned int dataLen;
1409                                                         unsigned int eom;
1410
1411                                                         conn->sendMessageLength -= MAX_PACKETFRAGMENT;
1412                                                         memmove(conn->sendMessage, conn->sendMessage+MAX_PACKETFRAGMENT, conn->sendMessageLength);
1413
1414                                                         if (conn->sendMessageLength <= MAX_PACKETFRAGMENT)
1415                                                         {
1416                                                                 dataLen = conn->sendMessageLength;
1417                                                                 eom = NETFLAG_EOM;
1418                                                         }
1419                                                         else
1420                                                         {
1421                                                                 dataLen = MAX_PACKETFRAGMENT;
1422                                                                 eom = 0;
1423                                                         }
1424
1425                                                         packetLen = NET_HEADERSIZE + dataLen;
1426
1427                                                         StoreBigLong(sendbuffer, packetLen | (NETFLAG_DATA | eom | NetConn_AddCryptoFlag(&conn->crypto)));
1428                                                         StoreBigLong(sendbuffer + 4, conn->nq.sendSequence);
1429                                                         memcpy(sendbuffer + NET_HEADERSIZE, conn->sendMessage, dataLen);
1430
1431                                                         conn->nq.sendSequence++;
1432
1433                                                         sendme = Crypto_EncryptPacket(&conn->crypto, &sendbuffer, packetLen, &cryptosendbuffer, &sendmelen, sizeof(cryptosendbuffer));
1434                                                         if (sendme && NetConn_Write(conn->mysocket, sendme, (int)sendmelen, &conn->peeraddress) == (int)sendmelen)
1435                                                         {
1436                                                                 conn->lastSendTime = realtime;
1437                                                                 conn->packetsSent++;
1438                                                         }
1439                                                 }
1440                                                 else
1441                                                         conn->sendMessageLength = 0;
1442                                         }
1443                                         //else
1444                                         //      Con_DPrint("Duplicate ACK received\n");
1445                                 }
1446                                 //else
1447                                 //      Con_DPrint("Stale ACK received\n");
1448                                 return 1;
1449                         }
1450                         else if (flags & NETFLAG_DATA)
1451                         {
1452                                 unsigned char temppacket[8];
1453                                 conn->incoming_netgraph[conn->incoming_packetcounter].reliablebytes   += originallength + 28;
1454                                 NetConn_UpdateCleartime(&conn->incoming_cleartime, cl_rate.integer, cl_rate_burstsize.integer, originallength + 28);
1455
1456                                 conn->outgoing_netgraph[conn->outgoing_packetcounter].ackbytes        += 8 + 28;
1457
1458                                 StoreBigLong(temppacket, 8 | NETFLAG_ACK | NetConn_AddCryptoFlag(&conn->crypto));
1459                                 StoreBigLong(temppacket + 4, sequence);
1460                                 sendme = Crypto_EncryptPacket(&conn->crypto, temppacket, 8, &cryptosendbuffer, &sendmelen, sizeof(cryptosendbuffer));
1461                                 if(sendme)
1462                                         NetConn_Write(conn->mysocket, sendme, (int)sendmelen, &conn->peeraddress);
1463                                 if (sequence == conn->nq.receiveSequence)
1464                                 {
1465                                         conn->lastMessageTime = realtime;
1466                                         conn->timeout = realtime + newtimeout;
1467                                         conn->nq.receiveSequence++;
1468                                         if( conn->receiveMessageLength + length <= (int)sizeof( conn->receiveMessage ) ) {
1469                                                 memcpy(conn->receiveMessage + conn->receiveMessageLength, data, length);
1470                                                 conn->receiveMessageLength += (int)length;
1471                                         } else {
1472                                                 Con_Printf( "Reliable message (seq: %i) too big for message buffer!\n"
1473                                                                         "Dropping the message!\n", sequence );
1474                                                 conn->receiveMessageLength = 0;
1475                                                 return 1;
1476                                         }
1477                                         if (flags & NETFLAG_EOM)
1478                                         {
1479                                                 conn->reliableMessagesReceived++;
1480                                                 length = conn->receiveMessageLength;
1481                                                 conn->receiveMessageLength = 0;
1482                                                 if (length > 0)
1483                                                 {
1484                                                         if (conn == cls.netcon)
1485                                                         {
1486                                                                 SZ_Clear(&cl_message);
1487                                                                 SZ_Write(&cl_message, conn->receiveMessage, (int)length);
1488                                                                 MSG_BeginReading(&cl_message);
1489                                                         }
1490                                                         else
1491                                                         {
1492                                                                 SZ_Clear(&sv_message);
1493                                                                 SZ_Write(&sv_message, conn->receiveMessage, (int)length);
1494                                                                 MSG_BeginReading(&sv_message);
1495                                                         }
1496                                                         return 2;
1497                                                 }
1498                                         }
1499                                 }
1500                                 else
1501                                         conn->receivedDuplicateCount++;
1502                                 return 1;
1503                         }
1504                 }
1505         }
1506         return 0;
1507 }
1508
1509 static void NetConn_ConnectionEstablished(lhnetsocket_t *mysocket, lhnetaddress_t *peeraddress, protocolversion_t initialprotocol)
1510 {
1511         crypto_t *crypto;
1512         cls.connect_trying = false;
1513 #ifdef CONFIG_MENU
1514         M_Update_Return_Reason("");
1515 #endif
1516         // if we're connecting to a remote server, shut down any local server
1517         if (LHNETADDRESS_GetAddressType(peeraddress) != LHNETADDRESSTYPE_LOOP && sv.active)
1518         {
1519                 SV_LockThreadMutex();
1520                 Host_ShutdownServer ();
1521                 SV_UnlockThreadMutex();
1522         }
1523         // allocate a net connection to keep track of things
1524         cls.netcon = NetConn_Open(mysocket, peeraddress);
1525         crypto = &cls.netcon->crypto;
1526         if(cls.crypto.authenticated)
1527         {
1528                 Crypto_FinishInstance(crypto, &cls.crypto);
1529                 Con_Printf("%s connection to %s has been established: server is %s@%s%.*s, I am %.*s@%s%.*s\n",
1530                                 crypto->use_aes ? "Encrypted" : "Authenticated",
1531                                 cls.netcon->address,
1532                                 crypto->server_idfp[0] ? crypto->server_idfp : "-",
1533                                 (crypto->server_issigned || !crypto->server_keyfp[0]) ? "" : "~",
1534                                 crypto_keyfp_recommended_length, crypto->server_keyfp[0] ? crypto->server_keyfp : "-",
1535                                 crypto_keyfp_recommended_length, crypto->client_idfp[0] ? crypto->client_idfp : "-",
1536                                 (crypto->client_issigned || !crypto->client_keyfp[0]) ? "" : "~",
1537                                 crypto_keyfp_recommended_length, crypto->client_keyfp[0] ? crypto->client_keyfp : "-"
1538                                 );
1539         }
1540         Con_Printf("Connection accepted to %s\n", cls.netcon->address);
1541         key_dest = key_game;
1542 #ifdef CONFIG_MENU
1543         m_state = m_none;
1544 #endif
1545         cls.demonum = -1;                       // not in the demo loop now
1546         cls.state = ca_connected;
1547         cls.signon = 0;                         // need all the signon messages before playing
1548         cls.protocol = initialprotocol;
1549         // reset move sequence numbering on this new connection
1550         cls.servermovesequence = 0;
1551         if (cls.protocol == PROTOCOL_QUAKEWORLD)
1552                 Cmd_ForwardStringToServer("new");
1553         if (cls.protocol == PROTOCOL_QUAKE)
1554         {
1555                 // write a keepalive (clc_nop) as it seems to greatly improve the
1556                 // chances of connecting to a netquake server
1557                 sizebuf_t msg;
1558                 unsigned char buf[4];
1559                 memset(&msg, 0, sizeof(msg));
1560                 msg.data = buf;
1561                 msg.maxsize = sizeof(buf);
1562                 MSG_WriteChar(&msg, clc_nop);
1563                 NetConn_SendUnreliableMessage(cls.netcon, &msg, cls.protocol, 10000, 0, false);
1564         }
1565 }
1566
1567 int NetConn_IsLocalGame(void)
1568 {
1569         if (cls.state == ca_connected && sv.active && cl.maxclients == 1)
1570                 return true;
1571         return false;
1572 }
1573
1574 #ifdef CONFIG_MENU
1575 static int NetConn_ClientParsePacket_ServerList_ProcessReply(const char *addressstring)
1576 {
1577         int n;
1578         int pingtime;
1579         serverlist_entry_t *entry = NULL;
1580
1581         // search the cache for this server and update it
1582         for (n = 0;n < serverlist_cachecount;n++) {
1583                 entry = &serverlist_cache[ n ];
1584                 if (!strcmp(addressstring, entry->info.cname))
1585                         break;
1586         }
1587
1588         if (n == serverlist_cachecount)
1589         {
1590                 // LAN search doesnt require an answer from the master server so we wont
1591                 // know the ping nor will it be initialized already...
1592
1593                 // find a slot
1594                 if (serverlist_cachecount == SERVERLIST_TOTALSIZE)
1595                         return -1;
1596
1597                 if (serverlist_maxcachecount <= serverlist_cachecount)
1598                 {
1599                         serverlist_maxcachecount += 64;
1600                         serverlist_cache = (serverlist_entry_t *)Mem_Realloc(netconn_mempool, (void *)serverlist_cache, sizeof(serverlist_entry_t) * serverlist_maxcachecount);
1601                 }
1602                 entry = &serverlist_cache[n];
1603
1604                 memset(entry, 0, sizeof(*entry));
1605                 // store the data the engine cares about (address and ping)
1606                 strlcpy(entry->info.cname, addressstring, sizeof(entry->info.cname));
1607                 entry->info.ping = 100000;
1608                 entry->querytime = realtime;
1609                 // if not in the slist menu we should print the server to console
1610                 if (serverlist_consoleoutput)
1611                         Con_Printf("querying %s\n", addressstring);
1612                 ++serverlist_cachecount;
1613         }
1614         // if this is the first reply from this server, count it as having replied
1615         pingtime = (int)((realtime - entry->querytime) * 1000.0 + 0.5);
1616         pingtime = bound(0, pingtime, 9999);
1617         if (entry->query == SQS_REFRESHING) {
1618                 entry->info.ping = pingtime;
1619                 entry->query = SQS_QUERIED;
1620         } else {
1621                 // convert to unsigned to catch the -1
1622                 // I still dont like this but its better than the old 10000 magic ping number - as in easier to type and read :( [11/8/2007 Black]
1623                 entry->info.ping = min((unsigned) entry->info.ping, (unsigned) pingtime);
1624                 serverreplycount++;
1625         }
1626         
1627         // other server info is updated by the caller
1628         return n;
1629 }
1630
1631 static void NetConn_ClientParsePacket_ServerList_UpdateCache(int n)
1632 {
1633         serverlist_entry_t *entry = &serverlist_cache[n];
1634         serverlist_info_t *info = &entry->info;
1635         // update description strings for engine menu and console output
1636         dpsnprintf(entry->line1, sizeof(serverlist_cache[n].line1), "^%c%5d^7 ^%c%3u^7/%3u %-65.65s", info->ping >= 300 ? '1' : (info->ping >= 200 ? '3' : '7'), (int)info->ping, ((info->numhumans > 0 && info->numhumans < info->maxplayers) ? (info->numhumans >= 4 ? '7' : '3') : '1'), info->numplayers, info->maxplayers, info->name);
1637         dpsnprintf(entry->line2, sizeof(serverlist_cache[n].line2), "^4%-21.21s %-19.19s ^%c%-17.17s^4 %-20.20s", info->cname, info->game,
1638                         (
1639                          info->gameversion != gameversion.integer
1640                          &&
1641                          !(
1642                                     gameversion_min.integer >= 0 // min/max range set by user/mod?
1643                                  && gameversion_max.integer >= 0
1644                                  && gameversion_min.integer <= info->gameversion // version of server in min/max range?
1645                                  && gameversion_max.integer >= info->gameversion
1646                           )
1647                         ) ? '1' : '4',
1648                         info->mod, info->map);
1649         if (entry->query == SQS_QUERIED)
1650         {
1651                 if(!serverlist_paused)
1652                         ServerList_ViewList_Remove(entry);
1653         }
1654         // if not in the slist menu we should print the server to console (if wanted)
1655         else if( serverlist_consoleoutput )
1656                 Con_Printf("%s\n%s\n", serverlist_cache[n].line1, serverlist_cache[n].line2);
1657         // and finally, update the view set
1658         if(!serverlist_paused)
1659                 ServerList_ViewList_Insert( entry );
1660         //      update the entry's state
1661         serverlist_cache[n].query = SQS_QUERIED;
1662 }
1663
1664 // returns true, if it's sensible to continue the processing
1665 static qboolean NetConn_ClientParsePacket_ServerList_PrepareQuery( int protocol, const char *ipstring, qboolean isfavorite ) {
1666         int n;
1667         serverlist_entry_t *entry;
1668
1669         //      ignore the rest of the message if the serverlist is full
1670         if( serverlist_cachecount == SERVERLIST_TOTALSIZE )
1671                 return false;
1672         //      also ignore     it      if      we      have already queried    it      (other master server    response)
1673         for( n =        0 ; n   < serverlist_cachecount ; n++   )
1674                 if( !strcmp( ipstring, serverlist_cache[ n ].info.cname ) )
1675                         break;
1676
1677         if( n < serverlist_cachecount ) {
1678                 // the entry has already been queried once or 
1679                 return true;
1680         }
1681
1682         if (serverlist_maxcachecount <= n)
1683         {
1684                 serverlist_maxcachecount += 64;
1685                 serverlist_cache = (serverlist_entry_t *)Mem_Realloc(netconn_mempool, (void *)serverlist_cache, sizeof(serverlist_entry_t) * serverlist_maxcachecount);
1686         }
1687
1688         entry = &serverlist_cache[n];
1689
1690         memset(entry, 0, sizeof(*entry));
1691         entry->protocol =       protocol;
1692         //      store   the data        the engine cares about (address and     ping)
1693         strlcpy (entry->info.cname, ipstring, sizeof(entry->info.cname));
1694
1695         entry->info.isfavorite = isfavorite;
1696         
1697         // no, then reset the ping right away
1698         entry->info.ping = -1;
1699         // we also want to increase the serverlist_cachecount then
1700         serverlist_cachecount++;
1701         serverquerycount++;
1702
1703         entry->query =  SQS_QUERYING;
1704
1705         return true;
1706 }
1707
1708 static void NetConn_ClientParsePacket_ServerList_ParseDPList(lhnetaddress_t *senderaddress, const unsigned char *data, int length, qboolean isextended)
1709 {
1710         masterreplycount++;
1711         if (serverlist_consoleoutput)
1712                 Con_Printf("received DarkPlaces %sserver list...\n", isextended ? "extended " : "");
1713         while (length >= 7)
1714         {
1715                 char ipstring [128];
1716
1717                 // IPv4 address
1718                 if (data[0] == '\\')
1719                 {
1720                         unsigned short port = data[5] * 256 + data[6];
1721
1722                         if (port != 0 && (data[1] != 0xFF || data[2] != 0xFF || data[3] != 0xFF || data[4] != 0xFF))
1723                                 dpsnprintf (ipstring, sizeof (ipstring), "%u.%u.%u.%u:%hu", data[1], data[2], data[3], data[4], port);
1724
1725                         // move on to next address in packet
1726                         data += 7;
1727                         length -= 7;
1728                 }
1729                 // IPv6 address
1730                 else if (data[0] == '/' && isextended && length >= 19)
1731                 {
1732                         unsigned short port = data[17] * 256 + data[18];
1733
1734                         if (port != 0)
1735                         {
1736 #ifdef WHY_JUST_WHY
1737                                 const char *ifname;
1738                                 char ifnamebuf[16];
1739
1740                                 /// \TODO: make some basic checks of the IP address (broadcast, ...)
1741
1742                                 ifname = LHNETADDRESS_GetInterfaceName(senderaddress, ifnamebuf, sizeof(ifnamebuf));
1743                                 if (ifname != NULL)
1744                                 {
1745                                         dpsnprintf (ipstring, sizeof (ipstring), "[%x:%x:%x:%x:%x:%x:%x:%x%%%s]:%hu",
1746                                                                 (data[1] << 8) | data[2], (data[3] << 8) | data[4], (data[5] << 8) | data[6], (data[7] << 8) | data[8],
1747                                                                 (data[9] << 8) | data[10], (data[11] << 8) | data[12], (data[13] << 8) | data[14], (data[15] << 8) | data[16],
1748                                                                 ifname, port);
1749                                 }
1750                                 else
1751 #endif
1752                                 {
1753                                         dpsnprintf (ipstring, sizeof (ipstring), "[%x:%x:%x:%x:%x:%x:%x:%x]:%hu",
1754                                                                 (data[1] << 8) | data[2], (data[3] << 8) | data[4], (data[5] << 8) | data[6], (data[7] << 8) | data[8],
1755                                                                 (data[9] << 8) | data[10], (data[11] << 8) | data[12], (data[13] << 8) | data[14], (data[15] << 8) | data[16],
1756                                                                 port);
1757                                 }
1758                         }
1759
1760                         // move on to next address in packet
1761                         data += 19;
1762                         length -= 19;
1763                 }
1764                 else
1765                 {
1766                         Con_Print("Error while parsing the server list\n");
1767                         break;
1768                 }
1769
1770                 if (serverlist_consoleoutput && developer_networking.integer)
1771                         Con_Printf("Requesting info from DarkPlaces server %s\n", ipstring);
1772                 
1773                 if( !NetConn_ClientParsePacket_ServerList_PrepareQuery( PROTOCOL_DARKPLACES7, ipstring, false ) ) {
1774                         break;
1775                 }
1776
1777         }
1778
1779         // begin or resume serverlist queries
1780         serverlist_querysleep = false;
1781         serverlist_querywaittime = realtime + 3;
1782 }
1783 #endif
1784
1785 static int NetConn_ClientParsePacket(lhnetsocket_t *mysocket, unsigned char *data, int length, lhnetaddress_t *peeraddress)
1786 {
1787         qboolean fromserver;
1788         int ret, c;
1789         char *string, addressstring2[128];
1790         char stringbuf[16384];
1791         char senddata[NET_HEADERSIZE+NET_MAXMESSAGE+CRYPTO_HEADERSIZE];
1792         size_t sendlength;
1793 #ifdef CONFIG_MENU
1794         char infostringvalue[MAX_INPUTLINE];
1795         char ipstring[32];
1796         const char *s;
1797 #endif
1798
1799         // quakeworld ingame packet
1800         fromserver = cls.netcon && mysocket == cls.netcon->mysocket && !LHNETADDRESS_Compare(&cls.netcon->peeraddress, peeraddress);
1801
1802         // convert the address to a string incase we need it
1803         LHNETADDRESS_ToString(peeraddress, addressstring2, sizeof(addressstring2), true);
1804
1805         if (length >= 5 && data[0] == 255 && data[1] == 255 && data[2] == 255 && data[3] == 255)
1806         {
1807                 // received a command string - strip off the packaging and put it
1808                 // into our string buffer with NULL termination
1809                 data += 4;
1810                 length -= 4;
1811                 length = min(length, (int)sizeof(stringbuf) - 1);
1812                 memcpy(stringbuf, data, length);
1813                 stringbuf[length] = 0;
1814                 string = stringbuf;
1815
1816                 if (developer_networking.integer)
1817                 {
1818                         Con_Printf("NetConn_ClientParsePacket: %s sent us a command:\n", addressstring2);
1819                         Com_HexDumpToConsole(data, length);
1820                 }
1821
1822                 sendlength = sizeof(senddata) - 4;
1823                 switch(Crypto_ClientParsePacket(string, length, senddata+4, &sendlength, peeraddress))
1824                 {
1825                         case CRYPTO_NOMATCH:
1826                                 // nothing to do
1827                                 break;
1828                         case CRYPTO_MATCH:
1829                                 if(sendlength)
1830                                 {
1831                                         memcpy(senddata, "\377\377\377\377", 4);
1832                                         NetConn_Write(mysocket, senddata, (int)sendlength+4, peeraddress);
1833                                 }
1834                                 break;
1835                         case CRYPTO_DISCARD:
1836                                 if(sendlength)
1837                                 {
1838                                         memcpy(senddata, "\377\377\377\377", 4);
1839                                         NetConn_Write(mysocket, senddata, (int)sendlength+4, peeraddress);
1840                                 }
1841                                 return true;
1842                                 break;
1843                         case CRYPTO_REPLACE:
1844                                 string = senddata+4;
1845                                 length = (int)sendlength;
1846                                 break;
1847                 }
1848
1849                 if (length >= 10 && !memcmp(string, "challenge ", 10) && cls.rcon_trying)
1850                 {
1851                         int i = 0, j;
1852                         for (j = 0;j < MAX_RCONS;j++)
1853                         {
1854                                 // note: this value from i is used outside the loop too...
1855                                 i = (cls.rcon_ringpos + j) % MAX_RCONS;
1856                                 if(cls.rcon_commands[i][0])
1857                                         if (!LHNETADDRESS_Compare(peeraddress, &cls.rcon_addresses[i]))
1858                                                 break;
1859                         }
1860                         if (j < MAX_RCONS)
1861                         {
1862                                 char buf[1500];
1863                                 char argbuf[1500];
1864                                 const char *e;
1865                                 int n;
1866                                 dpsnprintf(argbuf, sizeof(argbuf), "%s %s", string + 10, cls.rcon_commands[i]);
1867                                 memcpy(buf, "\377\377\377\377srcon HMAC-MD4 CHALLENGE ", 29);
1868
1869                                 e = strchr(rcon_password.string, ' ');
1870                                 n = e ? e-rcon_password.string : (int)strlen(rcon_password.string);
1871
1872                                 if(HMAC_MDFOUR_16BYTES((unsigned char *) (buf + 29), (unsigned char *) argbuf, (int)strlen(argbuf), (unsigned char *) rcon_password.string, n))
1873                                 {
1874                                         int k;
1875                                         buf[45] = ' ';
1876                                         strlcpy(buf + 46, argbuf, sizeof(buf) - 46);
1877                                         NetConn_Write(mysocket, buf, 46 + (int)strlen(buf + 46), peeraddress);
1878                                         cls.rcon_commands[i][0] = 0;
1879                                         --cls.rcon_trying;
1880
1881                                         for (k = 0;k < MAX_RCONS;k++)
1882                                                 if(cls.rcon_commands[k][0])
1883                                                         if (!LHNETADDRESS_Compare(peeraddress, &cls.rcon_addresses[k]))
1884                                                                 break;
1885                                         if(k < MAX_RCONS)
1886                                         {
1887                                                 int l;
1888                                                 NetConn_WriteString(mysocket, "\377\377\377\377getchallenge", peeraddress);
1889                                                 // extend the timeout on other requests as we asked for a challenge
1890                                                 for (l = 0;l < MAX_RCONS;l++)
1891                                                         if(cls.rcon_commands[l][0])
1892                                                                 if (!LHNETADDRESS_Compare(peeraddress, &cls.rcon_addresses[l]))
1893                                                                         cls.rcon_timeout[l] = realtime + rcon_secure_challengetimeout.value;
1894                                         }
1895
1896                                         return true; // we used up the challenge, so we can't use this oen for connecting now anyway
1897                                 }
1898                         }
1899                 }
1900                 if (length >= 10 && !memcmp(string, "challenge ", 10) && cls.connect_trying)
1901                 {
1902                         // darkplaces or quake3
1903                         char protocolnames[1400];
1904                         Con_DPrintf("\"%s\" received, sending connect request back to %s\n", string, addressstring2);
1905                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
1906                                 Con_DPrintf("challenge message from wrong server %s\n", addressstring2);
1907                                 return true;
1908                         }
1909                         Protocol_Names(protocolnames, sizeof(protocolnames));
1910 #ifdef CONFIG_MENU
1911                         M_Update_Return_Reason("Got challenge response");
1912 #endif
1913                         // update the server IP in the userinfo (QW servers expect this, and it is used by the reconnect command)
1914                         InfoString_SetValue(cls.userinfo, sizeof(cls.userinfo), "*ip", addressstring2);
1915                         // TODO: add userinfo stuff here instead of using NQ commands?
1916                         memcpy(senddata, "\377\377\377\377", 4);
1917                         dpsnprintf(senddata+4, sizeof(senddata)-4, "connect\\protocol\\darkplaces 3\\protocols\\%s%s\\challenge\\%s", protocolnames, cls.connect_userinfo, string + 10);
1918                         NetConn_WriteString(mysocket, senddata, peeraddress);
1919                         return true;
1920                 }
1921                 if (length == 6 && !memcmp(string, "accept", 6) && cls.connect_trying)
1922                 {
1923                         // darkplaces or quake3
1924                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
1925                                 Con_DPrintf("accept message from wrong server %s\n", addressstring2);
1926                                 return true;
1927                         }
1928 #ifdef CONFIG_MENU
1929                         M_Update_Return_Reason("Accepted");
1930 #endif
1931                         NetConn_ConnectionEstablished(mysocket, peeraddress, PROTOCOL_DARKPLACES3);
1932                         return true;
1933                 }
1934                 if (length > 7 && !memcmp(string, "reject ", 7) && cls.connect_trying)
1935                 {
1936                         char rejectreason[128];
1937                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
1938                                 Con_DPrintf("reject message from wrong server %s\n", addressstring2);
1939                                 return true;
1940                         }
1941                         cls.connect_trying = false;
1942                         string += 7;
1943                         length = min(length - 7, (int)sizeof(rejectreason) - 1);
1944                         memcpy(rejectreason, string, length);
1945                         rejectreason[length] = 0;
1946 #ifdef CONFIG_MENU
1947                         M_Update_Return_Reason(rejectreason);
1948 #endif
1949                         return true;
1950                 }
1951 #ifdef CONFIG_MENU
1952                 if (length >= 15 && !memcmp(string, "statusResponse\x0A", 15))
1953                 {
1954                         serverlist_info_t *info;
1955                         char *p;
1956                         int n;
1957
1958                         string += 15;
1959                         // search the cache for this server and update it
1960                         n = NetConn_ClientParsePacket_ServerList_ProcessReply(addressstring2);
1961                         if (n < 0)
1962                                 return true;
1963
1964                         info = &serverlist_cache[n].info;
1965                         info->game[0] = 0;
1966                         info->mod[0]  = 0;
1967                         info->map[0]  = 0;
1968                         info->name[0] = 0;
1969                         info->qcstatus[0] = 0;
1970                         info->players[0] = 0;
1971                         info->protocol = -1;
1972                         info->numplayers = 0;
1973                         info->numbots = -1;
1974                         info->maxplayers  = 0;
1975                         info->gameversion = 0;
1976
1977                         p = strchr(string, '\n');
1978                         if(p)
1979                         {
1980                                 *p = 0; // cut off the string there
1981                                 ++p;
1982                         }
1983                         else
1984                                 Con_Printf("statusResponse without players block?\n");
1985
1986                         if ((s = InfoString_GetValue(string, "gamename"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->game, s, sizeof (info->game));
1987                         if ((s = InfoString_GetValue(string, "modname"      , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->mod , s, sizeof (info->mod ));
1988                         if ((s = InfoString_GetValue(string, "mapname"      , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->map , s, sizeof (info->map ));
1989                         if ((s = InfoString_GetValue(string, "hostname"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->name, s, sizeof (info->name));
1990                         if ((s = InfoString_GetValue(string, "protocol"     , infostringvalue, sizeof(infostringvalue))) != NULL) info->protocol = atoi(s);
1991                         if ((s = InfoString_GetValue(string, "clients"      , infostringvalue, sizeof(infostringvalue))) != NULL) info->numplayers = atoi(s);
1992                         if ((s = InfoString_GetValue(string, "bots"         , infostringvalue, sizeof(infostringvalue))) != NULL) info->numbots = atoi(s);
1993                         if ((s = InfoString_GetValue(string, "sv_maxclients", infostringvalue, sizeof(infostringvalue))) != NULL) info->maxplayers = atoi(s);
1994                         if ((s = InfoString_GetValue(string, "gameversion"  , infostringvalue, sizeof(infostringvalue))) != NULL) info->gameversion = atoi(s);
1995                         if ((s = InfoString_GetValue(string, "qcstatus"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->qcstatus, s, sizeof(info->qcstatus));
1996                         if (p                                                                                         != NULL) strlcpy(info->players, p, sizeof(info->players));
1997                         info->numhumans = info->numplayers - max(0, info->numbots);
1998                         info->freeslots = info->maxplayers - info->numplayers;
1999
2000                         NetConn_ClientParsePacket_ServerList_UpdateCache(n);
2001
2002                         return true;
2003                 }
2004                 if (length >= 13 && !memcmp(string, "infoResponse\x0A", 13))
2005                 {
2006                         serverlist_info_t *info;
2007                         int n;
2008
2009                         string += 13;
2010                         // search the cache for this server and update it
2011                         n = NetConn_ClientParsePacket_ServerList_ProcessReply(addressstring2);
2012                         if (n < 0)
2013                                 return true;
2014
2015                         info = &serverlist_cache[n].info;
2016                         info->game[0] = 0;
2017                         info->mod[0]  = 0;
2018                         info->map[0]  = 0;
2019                         info->name[0] = 0;
2020                         info->qcstatus[0] = 0;
2021                         info->players[0] = 0;
2022                         info->protocol = -1;
2023                         info->numplayers = 0;
2024                         info->numbots = -1;
2025                         info->maxplayers  = 0;
2026                         info->gameversion = 0;
2027
2028                         if ((s = InfoString_GetValue(string, "gamename"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->game, s, sizeof (info->game));
2029                         if ((s = InfoString_GetValue(string, "modname"      , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->mod , s, sizeof (info->mod ));
2030                         if ((s = InfoString_GetValue(string, "mapname"      , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->map , s, sizeof (info->map ));
2031                         if ((s = InfoString_GetValue(string, "hostname"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->name, s, sizeof (info->name));
2032                         if ((s = InfoString_GetValue(string, "protocol"     , infostringvalue, sizeof(infostringvalue))) != NULL) info->protocol = atoi(s);
2033                         if ((s = InfoString_GetValue(string, "clients"      , infostringvalue, sizeof(infostringvalue))) != NULL) info->numplayers = atoi(s);
2034                         if ((s = InfoString_GetValue(string, "bots"         , infostringvalue, sizeof(infostringvalue))) != NULL) info->numbots = atoi(s);
2035                         if ((s = InfoString_GetValue(string, "sv_maxclients", infostringvalue, sizeof(infostringvalue))) != NULL) info->maxplayers = atoi(s);
2036                         if ((s = InfoString_GetValue(string, "gameversion"  , infostringvalue, sizeof(infostringvalue))) != NULL) info->gameversion = atoi(s);
2037                         if ((s = InfoString_GetValue(string, "qcstatus"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->qcstatus, s, sizeof(info->qcstatus));
2038                         info->numhumans = info->numplayers - max(0, info->numbots);
2039                         info->freeslots = info->maxplayers - info->numplayers;
2040
2041                         NetConn_ClientParsePacket_ServerList_UpdateCache(n);
2042
2043                         return true;
2044                 }
2045                 if (!strncmp(string, "getserversResponse\\", 19) && serverlist_cachecount < SERVERLIST_TOTALSIZE)
2046                 {
2047                         // Extract the IP addresses
2048                         data += 18;
2049                         length -= 18;
2050                         NetConn_ClientParsePacket_ServerList_ParseDPList(peeraddress, data, length, false);
2051                         return true;
2052                 }
2053                 if (!strncmp(string, "getserversExtResponse", 21) && serverlist_cachecount < SERVERLIST_TOTALSIZE)
2054                 {
2055                         // Extract the IP addresses
2056                         data += 21;
2057                         length -= 21;
2058                         NetConn_ClientParsePacket_ServerList_ParseDPList(peeraddress, data, length, true);
2059                         return true;
2060                 }
2061                 if (!memcmp(string, "d\n", 2) && serverlist_cachecount < SERVERLIST_TOTALSIZE)
2062                 {
2063                         // Extract the IP addresses
2064                         data += 2;
2065                         length -= 2;
2066                         masterreplycount++;
2067                         if (serverlist_consoleoutput)
2068                                 Con_Printf("received QuakeWorld server list from %s...\n", addressstring2);
2069                         while (length >= 6 && (data[0] != 0xFF || data[1] != 0xFF || data[2] != 0xFF || data[3] != 0xFF) && data[4] * 256 + data[5] != 0)
2070                         {
2071                                 dpsnprintf (ipstring, sizeof (ipstring), "%u.%u.%u.%u:%u", data[0], data[1], data[2], data[3], data[4] * 256 + data[5]);
2072                                 if (serverlist_consoleoutput && developer_networking.integer)
2073                                         Con_Printf("Requesting info from QuakeWorld server %s\n", ipstring);
2074                                 
2075                                 if( !NetConn_ClientParsePacket_ServerList_PrepareQuery( PROTOCOL_QUAKEWORLD, ipstring, false ) ) {
2076                                         break;
2077                                 }
2078
2079                                 // move on to next address in packet
2080                                 data += 6;
2081                                 length -= 6;
2082                         }
2083                         // begin or resume serverlist queries
2084                         serverlist_querysleep = false;
2085                         serverlist_querywaittime = realtime + 3;
2086                         return true;
2087                 }
2088 #endif
2089                 if (!strncmp(string, "extResponse ", 12))
2090                 {
2091                         ++cl_net_extresponse_count;
2092                         if(cl_net_extresponse_count > NET_EXTRESPONSE_MAX)
2093                                 cl_net_extresponse_count = NET_EXTRESPONSE_MAX;
2094                         cl_net_extresponse_last = (cl_net_extresponse_last + 1) % NET_EXTRESPONSE_MAX;
2095                         dpsnprintf(cl_net_extresponse[cl_net_extresponse_last], sizeof(cl_net_extresponse[cl_net_extresponse_last]), "\"%s\" %s", addressstring2, string + 12);
2096                         return true;
2097                 }
2098                 if (!strncmp(string, "ping", 4))
2099                 {
2100                         if (developer_extra.integer)
2101                                 Con_DPrintf("Received ping from %s, sending ack\n", addressstring2);
2102                         NetConn_WriteString(mysocket, "\377\377\377\377ack", peeraddress);
2103                         return true;
2104                 }
2105                 if (!strncmp(string, "ack", 3))
2106                         return true;
2107                 // QuakeWorld compatibility
2108                 if (length > 1 && string[0] == 'c' && (string[1] == '-' || (string[1] >= '0' && string[1] <= '9')) && cls.connect_trying)
2109                 {
2110                         // challenge message
2111                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
2112                                 Con_DPrintf("c message from wrong server %s\n", addressstring2);
2113                                 return true;
2114                         }
2115                         Con_Printf("challenge %s received, sending QuakeWorld connect request back to %s\n", string + 1, addressstring2);
2116 #ifdef CONFIG_MENU
2117                         M_Update_Return_Reason("Got QuakeWorld challenge response");
2118 #endif
2119                         cls.qw_qport = qport.integer;
2120                         // update the server IP in the userinfo (QW servers expect this, and it is used by the reconnect command)
2121                         InfoString_SetValue(cls.userinfo, sizeof(cls.userinfo), "*ip", addressstring2);
2122                         memcpy(senddata, "\377\377\377\377", 4);
2123                         dpsnprintf(senddata+4, sizeof(senddata)-4, "connect %i %i %i \"%s%s\"\n", 28, cls.qw_qport, atoi(string + 1), cls.userinfo, cls.connect_userinfo);
2124                         NetConn_WriteString(mysocket, senddata, peeraddress);
2125                         return true;
2126                 }
2127                 if (length >= 1 && string[0] == 'j' && cls.connect_trying)
2128                 {
2129                         // accept message
2130                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
2131                                 Con_DPrintf("j message from wrong server %s\n", addressstring2);
2132                                 return true;
2133                         }
2134 #ifdef CONFIG_MENU
2135                         M_Update_Return_Reason("QuakeWorld Accepted");
2136 #endif
2137                         NetConn_ConnectionEstablished(mysocket, peeraddress, PROTOCOL_QUAKEWORLD);
2138                         return true;
2139                 }
2140                 if (length > 2 && !memcmp(string, "n\\", 2))
2141                 {
2142 #ifdef CONFIG_MENU
2143                         serverlist_info_t *info;
2144                         int n;
2145
2146                         // qw server status
2147                         if (serverlist_consoleoutput && developer_networking.integer >= 2)
2148                                 Con_Printf("QW server status from server at %s:\n%s\n", addressstring2, string + 1);
2149
2150                         string += 1;
2151                         // search the cache for this server and update it
2152                         n = NetConn_ClientParsePacket_ServerList_ProcessReply(addressstring2);
2153                         if (n < 0)
2154                                 return true;
2155
2156                         info = &serverlist_cache[n].info;
2157                         strlcpy(info->game, "QuakeWorld", sizeof(info->game));
2158                         if ((s = InfoString_GetValue(string, "*gamedir"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->mod , s, sizeof (info->mod ));else info->mod[0]  = 0;
2159                         if ((s = InfoString_GetValue(string, "map"          , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->map , s, sizeof (info->map ));else info->map[0]  = 0;
2160                         if ((s = InfoString_GetValue(string, "hostname"     , infostringvalue, sizeof(infostringvalue))) != NULL) strlcpy(info->name, s, sizeof (info->name));else info->name[0] = 0;
2161                         info->protocol = 0;
2162                         info->numplayers = 0; // updated below
2163                         info->numhumans = 0; // updated below
2164                         if ((s = InfoString_GetValue(string, "maxclients"   , infostringvalue, sizeof(infostringvalue))) != NULL) info->maxplayers = atoi(s);else info->maxplayers  = 0;
2165                         if ((s = InfoString_GetValue(string, "gameversion"  , infostringvalue, sizeof(infostringvalue))) != NULL) info->gameversion = atoi(s);else info->gameversion = 0;
2166
2167                         // count active players on server
2168                         // (we could gather more info, but we're just after the number)
2169                         s = strchr(string, '\n');
2170                         if (s)
2171                         {
2172                                 s++;
2173                                 while (s < string + length)
2174                                 {
2175                                         for (;s < string + length && *s != '\n';s++)
2176                                                 ;
2177                                         if (s >= string + length)
2178                                                 break;
2179                                         info->numplayers++;
2180                                         info->numhumans++;
2181                                         s++;
2182                                 }
2183                         }
2184
2185                         NetConn_ClientParsePacket_ServerList_UpdateCache(n);
2186 #endif
2187                         return true;
2188                 }
2189                 if (string[0] == 'n')
2190                 {
2191                         // qw print command, used by rcon replies too
2192                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address) && LHNETADDRESS_Compare(peeraddress, &cls.rcon_address)) {
2193                                 Con_DPrintf("n message from wrong server %s\n", addressstring2);
2194                                 return true;
2195                         }
2196                         Con_Printf("QW print command from server at %s:\n%s\n", addressstring2, string + 1);
2197                 }
2198                 // we may not have liked the packet, but it was a command packet, so
2199                 // we're done processing this packet now
2200                 return true;
2201         }
2202         // quakeworld ingame packet
2203         if (fromserver && cls.protocol == PROTOCOL_QUAKEWORLD && length >= 8 && (ret = NetConn_ReceivedMessage(cls.netcon, data, length, cls.protocol, net_messagetimeout.value)) == 2)
2204         {
2205                 ret = 0;
2206                 CL_ParseServerMessage();
2207                 return ret;
2208         }
2209         // netquake control packets, supported for compatibility only
2210         if (length >= 5 && BuffBigLong(data) == ((int)NETFLAG_CTL | length) && !ENCRYPTION_REQUIRED)
2211         {
2212 #ifdef CONFIG_MENU
2213                 int n;
2214                 serverlist_info_t *info;
2215 #endif
2216
2217                 data += 4;
2218                 length -= 4;
2219                 SZ_Clear(&cl_message);
2220                 SZ_Write(&cl_message, data, length);
2221                 MSG_BeginReading(&cl_message);
2222                 c = MSG_ReadByte(&cl_message);
2223                 switch (c)
2224                 {
2225                 case CCREP_ACCEPT:
2226                         if (developer_extra.integer)
2227                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREP_ACCEPT from %s.\n", addressstring2);
2228                         if (cls.connect_trying)
2229                         {
2230                                 lhnetaddress_t clientportaddress;
2231                                 if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address)) {
2232                                         Con_DPrintf("CCREP_ACCEPT message from wrong server %s\n", addressstring2);
2233                                         break;
2234                                 }
2235                                 clientportaddress = *peeraddress;
2236                                 LHNETADDRESS_SetPort(&clientportaddress, MSG_ReadLong(&cl_message));
2237                                 // extra ProQuake stuff
2238                                 if (length >= 6)
2239                                         cls.proquake_servermod = MSG_ReadByte(&cl_message); // MOD_PROQUAKE
2240                                 else
2241                                         cls.proquake_servermod = 0;
2242                                 if (length >= 7)
2243                                         cls.proquake_serverversion = MSG_ReadByte(&cl_message); // version * 10
2244                                 else
2245                                         cls.proquake_serverversion = 0;
2246                                 if (length >= 8)
2247                                         cls.proquake_serverflags = MSG_ReadByte(&cl_message); // flags (mainly PQF_CHEATFREE)
2248                                 else
2249                                         cls.proquake_serverflags = 0;
2250                                 if (cls.proquake_servermod == 1)
2251                                         Con_Printf("Connected to ProQuake %.1f server, enabling precise aim\n", cls.proquake_serverversion / 10.0f);
2252                                 // update the server IP in the userinfo (QW servers expect this, and it is used by the reconnect command)
2253                                 InfoString_SetValue(cls.userinfo, sizeof(cls.userinfo), "*ip", addressstring2);
2254 #ifdef CONFIG_MENU
2255                                 M_Update_Return_Reason("Accepted");
2256 #endif
2257                                 NetConn_ConnectionEstablished(mysocket, &clientportaddress, PROTOCOL_QUAKE);
2258                         }
2259                         break;
2260                 case CCREP_REJECT:
2261                         if (developer_extra.integer) {
2262                                 Con_DPrintf("CCREP_REJECT message from wrong server %s\n", addressstring2);
2263                                 break;
2264                         }
2265                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.connect_address))
2266                                 break;
2267                         cls.connect_trying = false;
2268 #ifdef CONFIG_MENU
2269                         M_Update_Return_Reason((char *)MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)));
2270 #endif
2271                         break;
2272                 case CCREP_SERVER_INFO:
2273                         if (developer_extra.integer)
2274                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREP_SERVER_INFO from %s.\n", addressstring2);
2275 #ifdef CONFIG_MENU
2276                         // LadyHavoc: because the quake server may report weird addresses
2277                         // we just ignore it and keep the real address
2278                         MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
2279                         // search the cache for this server and update it
2280                         n = NetConn_ClientParsePacket_ServerList_ProcessReply(addressstring2);
2281                         if (n < 0)
2282                                 break;
2283
2284                         info = &serverlist_cache[n].info;
2285                         strlcpy(info->game, "Quake", sizeof(info->game));
2286                         strlcpy(info->mod , "", sizeof(info->mod)); // mod name is not specified
2287                         strlcpy(info->name, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(info->name));
2288                         strlcpy(info->map , MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(info->map));
2289                         info->numplayers = MSG_ReadByte(&cl_message);
2290                         info->maxplayers = MSG_ReadByte(&cl_message);
2291                         info->protocol = MSG_ReadByte(&cl_message);
2292
2293                         NetConn_ClientParsePacket_ServerList_UpdateCache(n);
2294 #endif
2295                         break;
2296                 case CCREP_RCON: // RocketGuy: ProQuake rcon support
2297                         if (net_sourceaddresscheck.integer && LHNETADDRESS_Compare(peeraddress, &cls.rcon_address)) {
2298                                 Con_DPrintf("CCREP_RCON message from wrong server %s\n", addressstring2);
2299                                 break;
2300                         }
2301                         if (developer_extra.integer)
2302                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREP_RCON from %s.\n", addressstring2);
2303
2304                         Con_Printf("%s\n", MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)));
2305                         break;
2306                 case CCREP_PLAYER_INFO:
2307                         // we got a CCREP_PLAYER_INFO??
2308                         //if (developer_extra.integer)
2309                                 Con_Printf("Datagram_ParseConnectionless: received CCREP_PLAYER_INFO from %s.\n", addressstring2);
2310                         break;
2311                 case CCREP_RULE_INFO:
2312                         // we got a CCREP_RULE_INFO??
2313                         //if (developer_extra.integer)
2314                                 Con_Printf("Datagram_ParseConnectionless: received CCREP_RULE_INFO from %s.\n", addressstring2);
2315                         break;
2316                 default:
2317                         break;
2318                 }
2319                 SZ_Clear(&cl_message);
2320                 // we may not have liked the packet, but it was a valid control
2321                 // packet, so we're done processing this packet now
2322                 return true;
2323         }
2324         ret = 0;
2325         if (fromserver && length >= (int)NET_HEADERSIZE && (ret = NetConn_ReceivedMessage(cls.netcon, data, length, cls.protocol, net_messagetimeout.value)) == 2)
2326                 CL_ParseServerMessage();
2327         return ret;
2328 }
2329
2330 #ifdef CONFIG_MENU
2331 void NetConn_QueryQueueFrame(void)
2332 {
2333         int index;
2334         int queries;
2335         int maxqueries;
2336         double timeouttime;
2337         static double querycounter = 0;
2338
2339         if(!net_slist_pause.integer && serverlist_paused)
2340                 ServerList_RebuildViewList();
2341         serverlist_paused = net_slist_pause.integer != 0;
2342
2343         if (serverlist_querysleep)
2344                 return;
2345
2346         // apply a cool down time after master server replies,
2347         // to avoid messing up the ping times on the servers
2348         if (serverlist_querywaittime > realtime)
2349                 return;
2350
2351         // each time querycounter reaches 1.0 issue a query
2352         querycounter += cl.realframetime * net_slist_queriespersecond.value;
2353         maxqueries = (int)querycounter;
2354         maxqueries = bound(0, maxqueries, net_slist_queriesperframe.integer);
2355         querycounter -= maxqueries;
2356
2357         if( maxqueries == 0 ) {
2358                 return;
2359         }
2360
2361         //      scan serverlist and issue queries as needed
2362         serverlist_querysleep = true;
2363
2364         timeouttime     = realtime - net_slist_timeout.value;
2365         for( index = 0, queries = 0 ;   index   < serverlist_cachecount &&      queries < maxqueries    ; index++ )
2366         {
2367                 serverlist_entry_t *entry = &serverlist_cache[ index ];
2368                 if( entry->query != SQS_QUERYING && entry->query != SQS_REFRESHING )
2369                 {
2370                         continue;
2371                 }
2372
2373                 serverlist_querysleep   = false;
2374                 if( entry->querycounter !=      0 && entry->querytime > timeouttime     )
2375                 {
2376                         continue;
2377                 }
2378
2379                 if( entry->querycounter !=      (unsigned) net_slist_maxtries.integer )
2380                 {
2381                         lhnetaddress_t  address;
2382                         int socket;
2383
2384                         LHNETADDRESS_FromString(&address, entry->info.cname, 0);
2385                         if      (entry->protocol == PROTOCOL_QUAKEWORLD)
2386                         {
2387                                 for (socket     = 0; socket     < cl_numsockets ;       socket++)
2388                                         NetConn_WriteString(cl_sockets[socket], "\377\377\377\377status\n", &address);
2389                         }
2390                         else
2391                         {
2392                                 for (socket     = 0; socket     < cl_numsockets ;       socket++)
2393                                         NetConn_WriteString(cl_sockets[socket], "\377\377\377\377getstatus", &address);
2394                         }
2395
2396                         //      update the entry fields
2397                         entry->querytime = realtime;
2398                         entry->querycounter++;
2399
2400                         // if not in the slist menu we should print the server to console
2401                         if (serverlist_consoleoutput)
2402                                 Con_Printf("querying %25s (%i. try)\n", entry->info.cname, entry->querycounter);
2403
2404                         queries++;
2405                 }
2406                 else
2407                 {
2408                         // have we tried to refresh this server?
2409                         if( entry->query == SQS_REFRESHING ) {
2410                                 // yes, so update the reply count (since its not responding anymore)
2411                                 serverreplycount--;
2412                                 if(!serverlist_paused)
2413                                         ServerList_ViewList_Remove(entry);
2414                         }
2415                         entry->query = SQS_TIMEDOUT;
2416                 }
2417         }
2418 }
2419 #endif
2420
2421 void NetConn_ClientFrame(void)
2422 {
2423         int i, length;
2424         lhnetaddress_t peeraddress;
2425         unsigned char readbuffer[NET_HEADERSIZE+NET_MAXMESSAGE];
2426         NetConn_UpdateSockets();
2427         if (cls.connect_trying && cls.connect_nextsendtime < realtime)
2428         {
2429 #ifdef CONFIG_MENU
2430                 if (cls.connect_remainingtries == 0)
2431                         M_Update_Return_Reason("Connect: Waiting 10 seconds for reply");
2432 #endif
2433                 cls.connect_nextsendtime = realtime + 1;
2434                 cls.connect_remainingtries--;
2435                 if (cls.connect_remainingtries <= -10)
2436                 {
2437                         cls.connect_trying = false;
2438 #ifdef CONFIG_MENU
2439                         M_Update_Return_Reason("Connect: Failed");
2440 #endif
2441                         return;
2442                 }
2443                 // try challenge first (newer DP server or QW)
2444                 NetConn_WriteString(cls.connect_mysocket, "\377\377\377\377getchallenge", &cls.connect_address);
2445                 // then try netquake as a fallback (old server, or netquake)
2446                 SZ_Clear(&cl_message);
2447                 // save space for the header, filled in later
2448                 MSG_WriteLong(&cl_message, 0);
2449                 MSG_WriteByte(&cl_message, CCREQ_CONNECT);
2450                 MSG_WriteString(&cl_message, "QUAKE");
2451                 MSG_WriteByte(&cl_message, NET_PROTOCOL_VERSION);
2452                 // extended proquake stuff
2453                 MSG_WriteByte(&cl_message, 1); // mod = MOD_PROQUAKE
2454                 // this version matches ProQuake 3.40, the first version to support
2455                 // the NAT fix, and it only supports the NAT fix for ProQuake 3.40 or
2456                 // higher clients, so we pretend we are that version...
2457                 MSG_WriteByte(&cl_message, 34); // version * 10
2458                 MSG_WriteByte(&cl_message, 0); // flags
2459                 MSG_WriteLong(&cl_message, 0); // password
2460                 // write the packetsize now...
2461                 StoreBigLong(cl_message.data, NETFLAG_CTL | (cl_message.cursize & NETFLAG_LENGTH_MASK));
2462                 NetConn_Write(cls.connect_mysocket, cl_message.data, cl_message.cursize, &cls.connect_address);
2463                 SZ_Clear(&cl_message);
2464         }
2465         for (i = 0;i < cl_numsockets;i++)
2466         {
2467                 while (cl_sockets[i] && (length = NetConn_Read(cl_sockets[i], readbuffer, sizeof(readbuffer), &peeraddress)) > 0)
2468                 {
2469 //                      R_TimeReport("clientreadnetwork");
2470                         NetConn_ClientParsePacket(cl_sockets[i], readbuffer, length, &peeraddress);
2471 //                      R_TimeReport("clientparsepacket");
2472                 }
2473         }
2474 #ifdef CONFIG_MENU
2475         NetConn_QueryQueueFrame();
2476 #endif
2477         if (cls.netcon && realtime > cls.netcon->timeout && !sv.active)
2478         {
2479                 Con_Print("Connection timed out\n");
2480                 CL_Disconnect();
2481                 SV_LockThreadMutex();
2482                 Host_ShutdownServer ();
2483                 SV_UnlockThreadMutex();
2484         }
2485 }
2486
2487 static void NetConn_BuildChallengeString(char *buffer, int bufferlength)
2488 {
2489         int i;
2490         char c;
2491         for (i = 0;i < bufferlength - 1;i++)
2492         {
2493                 do
2494                 {
2495                         c = rand () % (127 - 33) + 33;
2496                 } while (c == '\\' || c == ';' || c == '"' || c == '%' || c == '/');
2497                 buffer[i] = c;
2498         }
2499         buffer[i] = 0;
2500 }
2501
2502 /// (div0) build the full response only if possible; better a getinfo response than no response at all if getstatus won't fit
2503 static qboolean NetConn_BuildStatusResponse(const char* challenge, char* out_msg, size_t out_size, qboolean fullstatus)
2504 {
2505         prvm_prog_t *prog = SVVM_prog;
2506         char qcstatus[256];
2507         unsigned int nb_clients = 0, nb_bots = 0, i;
2508         int length;
2509         char teambuf[3];
2510         const char *crypto_idstring;
2511         const char *worldstatusstr;
2512
2513         // How many clients are there?
2514         for (i = 0;i < (unsigned int)svs.maxclients;i++)
2515         {
2516                 if (svs.clients[i].active)
2517                 {
2518                         nb_clients++;
2519                         if (!svs.clients[i].netconnection)
2520                                 nb_bots++;
2521                 }
2522         }
2523
2524         *qcstatus = 0;
2525         worldstatusstr = PRVM_GetString(prog, PRVM_serverglobalstring(worldstatus));
2526         if(worldstatusstr && *worldstatusstr)
2527         {
2528                 char *p;
2529                 const char *q;
2530                 p = qcstatus;
2531                 for(q = worldstatusstr; *q && (size_t)(p - qcstatus) < (sizeof(qcstatus) - 1); ++q)
2532                         if(*q != '\\' && *q != '\n')
2533                                 *p++ = *q;
2534                 *p = 0;
2535         }
2536
2537         /// \TODO: we should add more information for the full status string
2538         crypto_idstring = Crypto_GetInfoResponseDataString();
2539         length = dpsnprintf(out_msg, out_size,
2540                                                 "\377\377\377\377%s\x0A"
2541                                                 "\\gamename\\%s\\modname\\%s\\gameversion\\%d\\sv_maxclients\\%d"
2542                                                 "\\clients\\%d\\bots\\%d\\mapname\\%s\\hostname\\%s\\protocol\\%d"
2543                                                 "%s%s"
2544                                                 "%s%s"
2545                                                 "%s%s"
2546                                                 "%s",
2547                                                 fullstatus ? "statusResponse" : "infoResponse",
2548                                                 gamenetworkfiltername, com_modname, gameversion.integer, svs.maxclients,
2549                                                 nb_clients, nb_bots, sv.worldbasename, hostname.string, NET_PROTOCOL_VERSION,
2550                                                 *qcstatus ? "\\qcstatus\\" : "", qcstatus,
2551                                                 challenge ? "\\challenge\\" : "", challenge ? challenge : "",
2552                                                 crypto_idstring ? "\\d0_blind_id\\" : "", crypto_idstring ? crypto_idstring : "",
2553                                                 fullstatus ? "\n" : "");
2554
2555         // Make sure it fits in the buffer
2556         if (length < 0)
2557                 goto bad;
2558
2559         if (fullstatus)
2560         {
2561                 char *ptr;
2562                 int left;
2563                 int savelength;
2564
2565                 savelength = length;
2566
2567                 ptr = out_msg + length;
2568                 left = (int)out_size - length;
2569
2570                 for (i = 0;i < (unsigned int)svs.maxclients;i++)
2571                 {
2572                         client_t *client = &svs.clients[i];
2573                         if (client->active)
2574                         {
2575                                 int nameind, cleanind, pingvalue;
2576                                 char curchar;
2577                                 char cleanname [sizeof(client->name)];
2578                                 const char *statusstr;
2579                                 prvm_edict_t *ed;
2580
2581                                 // Remove all characters '"' and '\' in the player name
2582                                 nameind = 0;
2583                                 cleanind = 0;
2584                                 do
2585                                 {
2586                                         curchar = client->name[nameind++];
2587                                         if (curchar != '"' && curchar != '\\')
2588                                         {
2589                                                 cleanname[cleanind++] = curchar;
2590                                                 if (cleanind == sizeof(cleanname) - 1)
2591                                                         break;
2592                                         }
2593                                 } while (curchar != '\0');
2594                                 cleanname[cleanind] = 0; // cleanind is always a valid index even at this point
2595
2596                                 pingvalue = (int)(client->ping * 1000.0f);
2597                                 if(client->netconnection)
2598                                         pingvalue = bound(1, pingvalue, 9999);
2599                                 else
2600                                         pingvalue = 0;
2601
2602                                 *qcstatus = 0;
2603                                 ed = PRVM_EDICT_NUM(i + 1);
2604                                 statusstr = PRVM_GetString(prog, PRVM_serveredictstring(ed, clientstatus));
2605                                 if(statusstr && *statusstr)
2606                                 {
2607                                         char *p;
2608                                         const char *q;
2609                                         p = qcstatus;
2610                                         for(q = statusstr; *q && p != qcstatus + sizeof(qcstatus) - 1; ++q)
2611                                                 if(*q != '\\' && *q != '"' && !ISWHITESPACE(*q))
2612                                                         *p++ = *q;
2613                                         *p = 0;
2614                                 }
2615
2616                                 if (IS_NEXUIZ_DERIVED(gamemode) && (teamplay.integer > 0))
2617                                 {
2618                                         if(client->frags == -666) // spectator
2619                                                 strlcpy(teambuf, " 0", sizeof(teambuf));
2620                                         else if(client->colors == 0x44) // red team
2621                                                 strlcpy(teambuf, " 1", sizeof(teambuf));
2622                                         else if(client->colors == 0xDD) // blue team
2623                                                 strlcpy(teambuf, " 2", sizeof(teambuf));
2624                                         else if(client->colors == 0xCC) // yellow team
2625                                                 strlcpy(teambuf, " 3", sizeof(teambuf));
2626                                         else if(client->colors == 0x99) // pink team
2627                                                 strlcpy(teambuf, " 4", sizeof(teambuf));
2628                                         else
2629                                                 strlcpy(teambuf, " 0", sizeof(teambuf));
2630                                 }
2631                                 else
2632                                         *teambuf = 0;
2633
2634                                 // note: team number is inserted according to SoF2 protocol
2635                                 if(*qcstatus)
2636                                         length = dpsnprintf(ptr, left, "%s %d%s \"%s\"\n",
2637                                                                                 qcstatus,
2638                                                                                 pingvalue,
2639                                                                                 teambuf,
2640                                                                                 cleanname);
2641                                 else
2642                                         length = dpsnprintf(ptr, left, "%d %d%s \"%s\"\n",
2643                                                                                 client->frags,
2644                                                                                 pingvalue,
2645                                                                                 teambuf,
2646                                                                                 cleanname);
2647
2648                                 if(length < 0)
2649                                 {
2650                                         // out of space?
2651                                         // turn it into an infoResponse!
2652                                         out_msg[savelength] = 0;
2653                                         memcpy(out_msg + 4, "infoResponse\x0A", 13);
2654                                         memmove(out_msg + 17, out_msg + 19, savelength - 19);
2655                                         break;
2656                                 }
2657                                 left -= length;
2658                                 ptr += length;
2659                         }
2660                 }
2661         }
2662
2663         return true;
2664
2665 bad:
2666         return false;
2667 }
2668
2669 static qboolean NetConn_PreventFlood(lhnetaddress_t *peeraddress, server_floodaddress_t *floodlist, size_t floodlength, double floodtime, qboolean renew)
2670 {
2671         size_t floodslotnum, bestfloodslotnum;
2672         double bestfloodtime;
2673         lhnetaddress_t noportpeeraddress;
2674         // see if this is a connect flood
2675         noportpeeraddress = *peeraddress;
2676         LHNETADDRESS_SetPort(&noportpeeraddress, 0);
2677         bestfloodslotnum = 0;
2678         bestfloodtime = floodlist[bestfloodslotnum].lasttime;
2679         for (floodslotnum = 0;floodslotnum < floodlength;floodslotnum++)
2680         {
2681                 if (bestfloodtime >= floodlist[floodslotnum].lasttime)
2682                 {
2683                         bestfloodtime = floodlist[floodslotnum].lasttime;
2684                         bestfloodslotnum = floodslotnum;
2685                 }
2686                 if (floodlist[floodslotnum].lasttime && LHNETADDRESS_Compare(&noportpeeraddress, &floodlist[floodslotnum].address) == 0)
2687                 {
2688                         // this address matches an ongoing flood address
2689                         if (realtime < floodlist[floodslotnum].lasttime + floodtime)
2690                         {
2691                                 if(renew)
2692                                 {
2693                                         // renew the ban on this address so it does not expire
2694                                         // until the flood has subsided
2695                                         floodlist[floodslotnum].lasttime = realtime;
2696                                 }
2697                                 //Con_Printf("Flood detected!\n");
2698                                 return true;
2699                         }
2700                         // the flood appears to have subsided, so allow this
2701                         bestfloodslotnum = floodslotnum; // reuse the same slot
2702                         break;
2703                 }
2704         }
2705         // begin a new timeout on this address
2706         floodlist[bestfloodslotnum].address = noportpeeraddress;
2707         floodlist[bestfloodslotnum].lasttime = realtime;
2708         //Con_Printf("Flood detection initiated!\n");
2709         return false;
2710 }
2711
2712 void NetConn_ClearFlood(lhnetaddress_t *peeraddress, server_floodaddress_t *floodlist, size_t floodlength)
2713 {
2714         size_t floodslotnum;
2715         lhnetaddress_t noportpeeraddress;
2716         // see if this is a connect flood
2717         noportpeeraddress = *peeraddress;
2718         LHNETADDRESS_SetPort(&noportpeeraddress, 0);
2719         for (floodslotnum = 0;floodslotnum < floodlength;floodslotnum++)
2720         {
2721                 if (floodlist[floodslotnum].lasttime && LHNETADDRESS_Compare(&noportpeeraddress, &floodlist[floodslotnum].address) == 0)
2722                 {
2723                         // this address matches an ongoing flood address
2724                         // remove the ban
2725                         floodlist[floodslotnum].address.addresstype = LHNETADDRESSTYPE_NONE;
2726                         floodlist[floodslotnum].lasttime = 0;
2727                         //Con_Printf("Flood cleared!\n");
2728                 }
2729         }
2730 }
2731
2732 typedef qboolean (*rcon_matchfunc_t) (lhnetaddress_t *peeraddress, const char *password, const char *hash, const char *s, int slen);
2733
2734 static qboolean hmac_mdfour_time_matching(lhnetaddress_t *peeraddress, const char *password, const char *hash, const char *s, int slen)
2735 {
2736         char mdfourbuf[16];
2737         long t1, t2;
2738
2739         if (!password[0]) {
2740                 Con_Print("^4LOGIC ERROR: RCon_Authenticate should never call the comparator with an empty password. Please report.\n");
2741                 return false;
2742         }
2743
2744         t1 = (long) time(NULL);
2745         t2 = strtol(s, NULL, 0);
2746         if(abs(t1 - t2) > rcon_secure_maxdiff.integer)
2747                 return false;
2748
2749         if(!HMAC_MDFOUR_16BYTES((unsigned char *) mdfourbuf, (unsigned char *) s, slen, (unsigned char *) password, (int)strlen(password)))
2750                 return false;
2751
2752         return !memcmp(mdfourbuf, hash, 16);
2753 }
2754
2755 static qboolean hmac_mdfour_challenge_matching(lhnetaddress_t *peeraddress, const char *password, const char *hash, const char *s, int slen)
2756 {
2757         char mdfourbuf[16];
2758         int i;
2759
2760         if (!password[0]) {
2761                 Con_Print("^4LOGIC ERROR: RCon_Authenticate should never call the comparator with an empty password. Please report.\n");
2762                 return false;
2763         }
2764
2765         if(slen < (int)(sizeof(challenges[0].string)) - 1)
2766                 return false;
2767
2768         // validate the challenge
2769         for (i = 0;i < MAX_CHALLENGES;i++)
2770                 if(challenges[i].time > 0)
2771                         if (!LHNETADDRESS_Compare(peeraddress, &challenges[i].address) && !strncmp(challenges[i].string, s, sizeof(challenges[0].string) - 1))
2772                                 break;
2773         // if the challenge is not recognized, drop the packet
2774         if (i == MAX_CHALLENGES)
2775                 return false;
2776
2777         if(!HMAC_MDFOUR_16BYTES((unsigned char *) mdfourbuf, (unsigned char *) s, slen, (unsigned char *) password, (int)strlen(password)))
2778                 return false;
2779
2780         if(memcmp(mdfourbuf, hash, 16))
2781                 return false;
2782
2783         // unmark challenge to prevent replay attacks
2784         challenges[i].time = 0;
2785
2786         return true;
2787 }
2788
2789 static qboolean plaintext_matching(lhnetaddress_t *peeraddress, const char *password, const char *hash, const char *s, int slen)
2790 {
2791         if (!password[0]) {
2792                 Con_Print("^4LOGIC ERROR: RCon_Authenticate should never call the comparator with an empty password. Please report.\n");
2793                 return false;
2794         }
2795
2796         return !strcmp(password, hash);
2797 }
2798
2799 /// returns a string describing the user level, or NULL for auth failure
2800 static const char *RCon_Authenticate(lhnetaddress_t *peeraddress, const char *password, const char *s, const char *endpos, rcon_matchfunc_t comparator, const char *cs, int cslen)
2801 {
2802         const char *text, *userpass_start, *userpass_end, *userpass_startpass;
2803         static char buf[MAX_INPUTLINE];
2804         qboolean hasquotes;
2805         qboolean restricted = false;
2806         qboolean have_usernames = false;
2807         static char vabuf[1024];
2808
2809         userpass_start = rcon_password.string;
2810         while((userpass_end = strchr(userpass_start, ' ')))
2811         {
2812                 have_usernames = true;
2813                 strlcpy(buf, userpass_start, ((size_t)(userpass_end-userpass_start) >= sizeof(buf)) ? (int)(sizeof(buf)) : (int)(userpass_end-userpass_start+1));
2814                 if(buf[0])  // Ignore empty entries due to leading/duplicate space.
2815                         if(comparator(peeraddress, buf, password, cs, cslen))
2816                                 goto allow;
2817                 userpass_start = userpass_end + 1;
2818         }
2819         if(userpass_start[0])  // Ignore empty trailing entry due to trailing space or password not set.
2820         {
2821                 userpass_end = userpass_start + strlen(userpass_start);
2822                 if(comparator(peeraddress, userpass_start, password, cs, cslen))
2823                         goto allow;
2824         }
2825
2826         restricted = true;
2827         have_usernames = false;
2828         userpass_start = rcon_restricted_password.string;
2829         while((userpass_end = strchr(userpass_start, ' ')))
2830         {
2831                 have_usernames = true;
2832                 strlcpy(buf, userpass_start, ((size_t)(userpass_end-userpass_start) >= sizeof(buf)) ? (int)(sizeof(buf)) : (int)(userpass_end-userpass_start+1));
2833                 if(buf[0])  // Ignore empty entries due to leading/duplicate space.
2834                         if(comparator(peeraddress, buf, password, cs, cslen))
2835                                 goto check;
2836                 userpass_start = userpass_end + 1;
2837         }
2838         if(userpass_start[0])  // Ignore empty trailing entry due to trailing space or password not set.
2839         {
2840                 userpass_end = userpass_start + strlen(userpass_start);
2841                 if(comparator(peeraddress, userpass_start, password, cs, cslen))
2842                         goto check;
2843         }
2844         
2845         return NULL; // DENIED
2846
2847 check:
2848         for(text = s; text != endpos; ++text)
2849                 if((signed char) *text > 0 && ((signed char) *text < (signed char) ' ' || *text == ';'))
2850                         return NULL; // block possible exploits against the parser/alias expansion
2851
2852         while(s != endpos)
2853         {
2854                 size_t l = strlen(s);
2855                 if(l)
2856                 {
2857                         hasquotes = (strchr(s, '"') != NULL);
2858                         // sorry, we can't allow these substrings in wildcard expressions,
2859                         // as they can mess with the argument counts
2860                         text = rcon_restricted_commands.string;
2861                         while(COM_ParseToken_Console(&text))
2862                         {
2863                                 // com_token now contains a pattern to check for...
2864                                 if(strchr(com_token, '*') || strchr(com_token, '?')) // wildcard expression, * can only match a SINGLE argument
2865                                 {
2866                                         if(!hasquotes)
2867                                                 if(matchpattern_with_separator(s, com_token, true, " ", true)) // note how we excluded tab, newline etc. above
2868                                                         goto match;
2869                                 }
2870                                 else if(strchr(com_token, ' ')) // multi-arg expression? must match in whole
2871                                 {
2872                                         if(!strcmp(com_token, s))
2873                                                 goto match;
2874                                 }
2875                                 else // single-arg expression? must match the beginning of the command
2876                                 {
2877                                         if(!strcmp(com_token, s))
2878                                                 goto match;
2879                                         if(!memcmp(va(vabuf, sizeof(vabuf), "%s ", com_token), s, strlen(com_token) + 1))
2880                                                 goto match;
2881                                 }
2882                         }
2883                         // if we got here, nothing matched!
2884                         return NULL;
2885                 }
2886 match:
2887                 s += l + 1;
2888         }
2889
2890 allow:
2891         userpass_startpass = strchr(userpass_start, ':');
2892         if(have_usernames && userpass_startpass && userpass_startpass < userpass_end)
2893                 return va(vabuf, sizeof(vabuf), "%srcon (username %.*s)", restricted ? "restricted " : "", (int)(userpass_startpass-userpass_start), userpass_start);
2894
2895         return va(vabuf, sizeof(vabuf), "%srcon", restricted ? "restricted " : "");
2896 }
2897
2898 static void RCon_Execute(lhnetsocket_t *mysocket, lhnetaddress_t *peeraddress, const char *addressstring2, const char *userlevel, const char *s, const char *endpos, qboolean proquakeprotocol)
2899 {
2900         if(userlevel)
2901         {
2902                 // looks like a legitimate rcon command with the correct password
2903                 const char *s_ptr = s;
2904                 Con_Printf("server received %s command from %s: ", userlevel, host_client ? host_client->name : addressstring2);
2905                 while(s_ptr != endpos)
2906                 {
2907                         size_t l = strlen(s_ptr);
2908                         if(l)
2909                                 Con_Printf(" %s;", s_ptr);
2910                         s_ptr += l + 1;
2911                 }
2912                 Con_Printf("\n");
2913
2914                 if (!host_client || !host_client->netconnection || LHNETADDRESS_GetAddressType(&host_client->netconnection->peeraddress) != LHNETADDRESSTYPE_LOOP)
2915                         Con_Rcon_Redirect_Init(mysocket, peeraddress, proquakeprotocol);
2916                 while(s != endpos)
2917                 {
2918                         size_t l = strlen(s);
2919                         if(l)
2920                         {
2921                                 client_t *host_client_save = host_client;
2922                                 Cmd_ExecuteString(&cmd_server, s, src_command, true);
2923                                 host_client = host_client_save;
2924                                 // in case it is a command that changes host_client (like restart)
2925                         }
2926                         s += l + 1;
2927                 }
2928                 Con_Rcon_Redirect_End();
2929         }
2930         else
2931         {
2932                 Con_Printf("server denied rcon access to %s\n", host_client ? host_client->name : addressstring2);
2933         }
2934 }
2935
2936 static int NetConn_ServerParsePacket(lhnetsocket_t *mysocket, unsigned char *data, int length, lhnetaddress_t *peeraddress)
2937 {
2938         int i, ret, clientnum, best;
2939         double besttime;
2940         char *string, response[1400], addressstring2[128];
2941         static char stringbuf[16384]; // server only
2942         qboolean islocal = (LHNETADDRESS_GetAddressType(peeraddress) == LHNETADDRESSTYPE_LOOP);
2943         char senddata[NET_HEADERSIZE+NET_MAXMESSAGE+CRYPTO_HEADERSIZE];
2944         size_t sendlength, response_len;
2945         char infostringvalue[MAX_INPUTLINE];
2946
2947         if (!sv.active)
2948                 return false;
2949
2950         // convert the address to a string incase we need it
2951         LHNETADDRESS_ToString(peeraddress, addressstring2, sizeof(addressstring2), true);
2952
2953         // see if we can identify the sender as a local player
2954         // (this is necessary for rcon to send a reliable reply if the client is
2955         //  actually on the server, not sending remotely)
2956         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2957                 if (host_client->netconnection && host_client->netconnection->mysocket == mysocket && !LHNETADDRESS_Compare(&host_client->netconnection->peeraddress, peeraddress))
2958                         break;
2959         if (i == svs.maxclients)
2960                 host_client = NULL;
2961
2962         if (length >= 5 && data[0] == 255 && data[1] == 255 && data[2] == 255 && data[3] == 255)
2963         {
2964                 // received a command string - strip off the packaging and put it
2965                 // into our string buffer with NULL termination
2966                 data += 4;
2967                 length -= 4;
2968                 length = min(length, (int)sizeof(stringbuf) - 1);
2969                 memcpy(stringbuf, data, length);
2970                 stringbuf[length] = 0;
2971                 string = stringbuf;
2972
2973                 if (developer_extra.integer)
2974                 {
2975                         Con_Printf("NetConn_ServerParsePacket: %s sent us a command:\n", addressstring2);
2976                         Com_HexDumpToConsole(data, length);
2977                 }
2978
2979                 sendlength = sizeof(senddata) - 4;
2980                 switch(Crypto_ServerParsePacket(string, length, senddata+4, &sendlength, peeraddress))
2981                 {
2982                         case CRYPTO_NOMATCH:
2983                                 // nothing to do
2984                                 break;
2985                         case CRYPTO_MATCH:
2986                                 if(sendlength)
2987                                 {
2988                                         memcpy(senddata, "\377\377\377\377", 4);
2989                                         NetConn_Write(mysocket, senddata, (int)sendlength+4, peeraddress);
2990                                 }
2991                                 break;
2992                         case CRYPTO_DISCARD:
2993                                 if(sendlength)
2994                                 {
2995                                         memcpy(senddata, "\377\377\377\377", 4);
2996                                         NetConn_Write(mysocket, senddata, (int)sendlength+4, peeraddress);
2997                                 }
2998                                 return true;
2999                                 break;
3000                         case CRYPTO_REPLACE:
3001                                 string = senddata+4;
3002                                 length = (int)sendlength;
3003                                 break;
3004                 }
3005
3006                 if (length >= 12 && !memcmp(string, "getchallenge", 12) && (islocal || sv_public.integer > -3))
3007                 {
3008                         for (i = 0, best = 0, besttime = realtime;i < MAX_CHALLENGES;i++)
3009                         {
3010                                 if(challenges[i].time > 0)
3011                                         if (!LHNETADDRESS_Compare(peeraddress, &challenges[i].address))
3012                                                 break;
3013                                 if (besttime > challenges[i].time)
3014                                         besttime = challenges[best = i].time;
3015                         }
3016                         // if we did not find an exact match, choose the oldest and
3017                         // update address and string
3018                         if (i == MAX_CHALLENGES)
3019                         {
3020                                 i = best;
3021                                 challenges[i].address = *peeraddress;
3022                                 NetConn_BuildChallengeString(challenges[i].string, sizeof(challenges[i].string));
3023                         }
3024                         else
3025                         {
3026                                 // flood control: drop if requesting challenge too often
3027                                 if(challenges[i].time > realtime - net_challengefloodblockingtimeout.value)
3028                                         return true;
3029                         }
3030                         challenges[i].time = realtime;
3031                         // send the challenge
3032                         memcpy(response, "\377\377\377\377", 4);
3033                         dpsnprintf(response+4, sizeof(response)-4, "challenge %s", challenges[i].string);
3034                         response_len = strlen(response) + 1;
3035                         Crypto_ServerAppendToChallenge(string, length, response, &response_len, sizeof(response));
3036                         NetConn_Write(mysocket, response, (int)response_len, peeraddress);
3037                         return true;
3038                 }
3039                 if (length > 8 && !memcmp(string, "connect\\", 8))
3040                 {
3041                         char *s;
3042                         client_t *client;
3043                         crypto_t *crypto = Crypto_ServerGetInstance(peeraddress);
3044                         string += 7;
3045                         length -= 7;
3046
3047                         if(crypto && crypto->authenticated)
3048                         {
3049                                 // no need to check challenge
3050                                 if(crypto_developer.integer)
3051                                 {
3052                                         Con_Printf("%s connection to %s is being established: client is %s@%s%.*s, I am %.*s@%s%.*s\n",
3053                                                         crypto->use_aes ? "Encrypted" : "Authenticated",
3054                                                         addressstring2,
3055                                                         crypto->client_idfp[0] ? crypto->client_idfp : "-",
3056                                                         (crypto->client_issigned || !crypto->client_keyfp[0]) ? "" : "~",
3057                                                         crypto_keyfp_recommended_length, crypto->client_keyfp[0] ? crypto->client_keyfp : "-",
3058                                                         crypto_keyfp_recommended_length, crypto->server_idfp[0] ? crypto->server_idfp : "-",
3059                                                         (crypto->server_issigned || !crypto->server_keyfp[0]) ? "" : "~",
3060                                                         crypto_keyfp_recommended_length, crypto->server_keyfp[0] ? crypto->server_keyfp : "-"
3061                                                   );
3062                                 }
3063                         }
3064                         else
3065                         {
3066                                 if ((s = InfoString_GetValue(string, "challenge", infostringvalue, sizeof(infostringvalue))))
3067                                 {
3068                                         // validate the challenge
3069                                         for (i = 0;i < MAX_CHALLENGES;i++)
3070                                                 if(challenges[i].time > 0)
3071                                                         if (!LHNETADDRESS_Compare(peeraddress, &challenges[i].address) && !strcmp(challenges[i].string, s))
3072                                                                 break;
3073                                         // if the challenge is not recognized, drop the packet
3074                                         if (i == MAX_CHALLENGES)
3075                                                 return true;
3076                                 }
3077                         }
3078
3079                         if((s = InfoString_GetValue(string, "message", infostringvalue, sizeof(infostringvalue))))
3080                                 Con_DPrintf("Connecting client %s sent us the message: %s\n", addressstring2, s);
3081
3082                         if(!(islocal || sv_public.integer > -2))
3083                         {
3084                                 if (developer_extra.integer)
3085                                         Con_Printf("Datagram_ParseConnectionless: sending \"reject %s\" to %s.\n", sv_public_rejectreason.string, addressstring2);
3086                                 memcpy(response, "\377\377\377\377", 4);
3087                                 dpsnprintf(response+4, sizeof(response)-4, "reject %s", sv_public_rejectreason.string);
3088                                 NetConn_WriteString(mysocket, response, peeraddress);
3089                                 return true;
3090                         }
3091
3092                         // check engine protocol
3093                         if(!(s = InfoString_GetValue(string, "protocol", infostringvalue, sizeof(infostringvalue))) || strcmp(s, "darkplaces 3"))
3094                         {
3095                                 if (developer_extra.integer)
3096                                         Con_Printf("Datagram_ParseConnectionless: sending \"reject Wrong game protocol.\" to %s.\n", addressstring2);
3097                                 NetConn_WriteString(mysocket, "\377\377\377\377reject Wrong game protocol.", peeraddress);
3098                                 return true;
3099                         }
3100
3101                         // see if this is a duplicate connection request or a disconnected
3102                         // client who is rejoining to the same client slot
3103                         for (clientnum = 0, client = svs.clients;clientnum < svs.maxclients;clientnum++, client++)
3104                         {
3105                                 if (client->netconnection && LHNETADDRESS_Compare(peeraddress, &client->netconnection->peeraddress) == 0)
3106                                 {
3107                                         // this is a known client...
3108                                         if(crypto && crypto->authenticated)
3109                                         {
3110                                                 // reject if changing key!
3111                                                 if(client->netconnection->crypto.authenticated)
3112                                                 {
3113                                                         if(
3114                                                                         strcmp(client->netconnection->crypto.client_idfp, crypto->client_idfp)
3115                                                                         ||
3116                                                                         strcmp(client->netconnection->crypto.server_idfp, crypto->server_idfp)
3117                                                                         ||
3118                                                                         strcmp(client->netconnection->crypto.client_keyfp, crypto->client_keyfp)
3119                                                                         ||
3120                                                                         strcmp(client->netconnection->crypto.server_keyfp, crypto->server_keyfp)
3121                                                           )
3122                                                         {
3123                                                                 if (developer_extra.integer)
3124                                                                         Con_Printf("Datagram_ParseConnectionless: sending \"reject Attempt to change key of crypto.\" to %s.\n", addressstring2);
3125                                                                 NetConn_WriteString(mysocket, "\377\377\377\377reject Attempt to change key of crypto.", peeraddress);
3126                                                                 return true;
3127                                                         }
3128                                                 }
3129                                         }
3130                                         else
3131                                         {
3132                                                 // reject if downgrading!
3133                                                 if(client->netconnection->crypto.authenticated)
3134                                                 {
3135                                                         if (developer_extra.integer)
3136                                                                 Con_Printf("Datagram_ParseConnectionless: sending \"reject Attempt to downgrade crypto.\" to %s.\n", addressstring2);
3137                                                         NetConn_WriteString(mysocket, "\377\377\377\377reject Attempt to downgrade crypto.", peeraddress);
3138                                                         return true;
3139                                                 }
3140                                         }
3141                                         if (client->begun)
3142                                         {
3143                                                 // client crashed and is coming back,
3144                                                 // keep their stuff intact
3145                                                 if (developer_extra.integer)
3146                                                         Con_Printf("Datagram_ParseConnectionless: sending \"accept\" to %s.\n", addressstring2);
3147                                                 NetConn_WriteString(mysocket, "\377\377\377\377accept", peeraddress);
3148                                                 if(crypto && crypto->authenticated)
3149                                                         Crypto_FinishInstance(&client->netconnection->crypto, crypto);
3150                                                 SV_SendServerinfo(client);
3151                                         }
3152                                         else
3153                                         {
3154                                                 // client is still trying to connect,
3155                                                 // so we send a duplicate reply
3156                                                 if (developer_extra.integer)
3157                                                         Con_Printf("Datagram_ParseConnectionless: sending duplicate accept to %s.\n", addressstring2);
3158                                                 if(crypto && crypto->authenticated)
3159                                                         Crypto_FinishInstance(&client->netconnection->crypto, crypto);
3160                                                 NetConn_WriteString(mysocket, "\377\377\377\377accept", peeraddress);
3161                                         }
3162                                         return true;
3163                                 }
3164                         }
3165
3166                         if (NetConn_PreventFlood(peeraddress, sv.connectfloodaddresses, sizeof(sv.connectfloodaddresses) / sizeof(sv.connectfloodaddresses[0]), net_connectfloodblockingtimeout.value, true))
3167                                 return true;
3168
3169                         // find an empty client slot for this new client
3170                         for (clientnum = 0, client = svs.clients;clientnum < svs.maxclients;clientnum++, client++)
3171                         {
3172                                 netconn_t *conn;
3173                                 if (!client->active && (conn = NetConn_Open(mysocket, peeraddress)))
3174                                 {
3175                                         // allocated connection
3176                                         if (developer_extra.integer)
3177                                                 Con_Printf("Datagram_ParseConnectionless: sending \"accept\" to %s.\n", conn->address);
3178                                         NetConn_WriteString(mysocket, "\377\377\377\377accept", peeraddress);
3179                                         // now set up the client
3180                                         if(crypto && crypto->authenticated)
3181                                                 Crypto_FinishInstance(&conn->crypto, crypto);
3182                                         SV_ConnectClient(clientnum, conn);
3183                                         NetConn_Heartbeat(1);
3184                                         return true;
3185                                 }
3186                         }
3187
3188                         // no empty slots found - server is full
3189                         if (developer_extra.integer)
3190                                 Con_Printf("Datagram_ParseConnectionless: sending \"reject Server is full.\" to %s.\n", addressstring2);
3191                         NetConn_WriteString(mysocket, "\377\377\377\377reject Server is full.", peeraddress);
3192
3193                         return true;
3194                 }
3195                 if (length >= 7 && !memcmp(string, "getinfo", 7) && (islocal || sv_public.integer > -1))
3196                 {
3197                         const char *challenge = NULL;
3198
3199                         if (NetConn_PreventFlood(peeraddress, sv.getstatusfloodaddresses, sizeof(sv.getstatusfloodaddresses) / sizeof(sv.getstatusfloodaddresses[0]), net_getstatusfloodblockingtimeout.value, false))
3200                                 return true;
3201
3202                         // If there was a challenge in the getinfo message
3203                         if (length > 8 && string[7] == ' ')
3204                                 challenge = string + 8;
3205
3206                         if (NetConn_BuildStatusResponse(challenge, response, sizeof(response), false))
3207                         {
3208                                 if (developer_extra.integer)
3209                                         Con_DPrintf("Sending reply to master %s - %s\n", addressstring2, response);
3210                                 NetConn_WriteString(mysocket, response, peeraddress);
3211                         }
3212                         return true;
3213                 }
3214                 if (length >= 9 && !memcmp(string, "getstatus", 9) && (islocal || sv_public.integer > -1))
3215                 {
3216                         const char *challenge = NULL;
3217
3218                         if (NetConn_PreventFlood(peeraddress, sv.getstatusfloodaddresses, sizeof(sv.getstatusfloodaddresses) / sizeof(sv.getstatusfloodaddresses[0]), net_getstatusfloodblockingtimeout.value, false))
3219                                 return true;
3220
3221                         // If there was a challenge in the getinfo message
3222                         if (length > 10 && string[9] == ' ')
3223                                 challenge = string + 10;
3224
3225                         if (NetConn_BuildStatusResponse(challenge, response, sizeof(response), true))
3226                         {
3227                                 if (developer_extra.integer)
3228                                         Con_DPrintf("Sending reply to client %s - %s\n", addressstring2, response);
3229                                 NetConn_WriteString(mysocket, response, peeraddress);
3230                         }
3231                         return true;
3232                 }
3233                 if (length >= 37 && !memcmp(string, "srcon HMAC-MD4 TIME ", 20))
3234                 {
3235                         char *password = string + 20;
3236                         char *timeval = string + 37;
3237                         char *s = strchr(timeval, ' ');
3238                         char *endpos = string + length + 1; // one behind the NUL, so adding strlen+1 will eventually reach it
3239                         const char *userlevel;
3240
3241                         if(rcon_secure.integer > 1)
3242                                 return true;
3243
3244                         if(!s)
3245                                 return true; // invalid packet
3246                         ++s;
3247
3248                         userlevel = RCon_Authenticate(peeraddress, password, s, endpos, hmac_mdfour_time_matching, timeval, endpos - timeval - 1); // not including the appended \0 into the HMAC
3249                         RCon_Execute(mysocket, peeraddress, addressstring2, userlevel, s, endpos, false);
3250                         return true;
3251                 }
3252                 if (length >= 42 && !memcmp(string, "srcon HMAC-MD4 CHALLENGE ", 25))
3253                 {
3254                         char *password = string + 25;
3255                         char *challenge = string + 42;
3256                         char *s = strchr(challenge, ' ');
3257                         char *endpos = string + length + 1; // one behind the NUL, so adding strlen+1 will eventually reach it
3258                         const char *userlevel;
3259                         if(!s)
3260                                 return true; // invalid packet
3261                         ++s;
3262
3263                         userlevel = RCon_Authenticate(peeraddress, password, s, endpos, hmac_mdfour_challenge_matching, challenge, endpos - challenge - 1); // not including the appended \0 into the HMAC
3264                         RCon_Execute(mysocket, peeraddress, addressstring2, userlevel, s, endpos, false);
3265                         return true;
3266                 }
3267                 if (length >= 5 && !memcmp(string, "rcon ", 5))
3268                 {
3269                         int j;
3270                         char *s = string + 5;
3271                         char *endpos = string + length + 1; // one behind the NUL, so adding strlen+1 will eventually reach it
3272                         char password[64];
3273
3274                         if(rcon_secure.integer > 0)
3275                                 return true;
3276
3277                         for (j = 0;!ISWHITESPACE(*s);s++)
3278                                 if (j < (int)sizeof(password) - 1)
3279                                         password[j++] = *s;
3280                         if(ISWHITESPACE(*s) && s != endpos) // skip leading ugly space
3281                                 ++s;
3282                         password[j] = 0;
3283                         if (!ISWHITESPACE(password[0]))
3284                         {
3285                                 const char *userlevel = RCon_Authenticate(peeraddress, password, s, endpos, plaintext_matching, NULL, 0);
3286                                 RCon_Execute(mysocket, peeraddress, addressstring2, userlevel, s, endpos, false);
3287                         }
3288                         return true;
3289                 }
3290                 if (!strncmp(string, "extResponse ", 12))
3291                 {
3292                         ++sv_net_extresponse_count;
3293                         if(sv_net_extresponse_count > NET_EXTRESPONSE_MAX)
3294                                 sv_net_extresponse_count = NET_EXTRESPONSE_MAX;
3295                         sv_net_extresponse_last = (sv_net_extresponse_last + 1) % NET_EXTRESPONSE_MAX;
3296                         dpsnprintf(sv_net_extresponse[sv_net_extresponse_last], sizeof(sv_net_extresponse[sv_net_extresponse_last]), "'%s' %s", addressstring2, string + 12);
3297                         return true;
3298                 }
3299                 if (!strncmp(string, "ping", 4))
3300                 {
3301                         if (developer_extra.integer)
3302                                 Con_DPrintf("Received ping from %s, sending ack\n", addressstring2);
3303                         NetConn_WriteString(mysocket, "\377\377\377\377ack", peeraddress);
3304                         return true;
3305                 }
3306                 if (!strncmp(string, "ack", 3))
3307                         return true;
3308                 // we may not have liked the packet, but it was a command packet, so
3309                 // we're done processing this packet now
3310                 return true;
3311         }
3312         // netquake control packets, supported for compatibility only, and only
3313         // when running game protocols that are normally served via this connection
3314         // protocol
3315         // (this protects more modern protocols against being used for
3316         //  Quake packet flood Denial Of Service attacks)
3317         if (length >= 5 && (i = BuffBigLong(data)) && (i & (~NETFLAG_LENGTH_MASK)) == (int)NETFLAG_CTL && (i & NETFLAG_LENGTH_MASK) == length && (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3) && !ENCRYPTION_REQUIRED)
3318         {
3319                 int c;
3320                 int protocolnumber;
3321                 const char *protocolname;
3322                 client_t *knownclient;
3323                 client_t *newclient;
3324                 data += 4;
3325                 length -= 4;
3326                 SZ_Clear(&sv_message);
3327                 SZ_Write(&sv_message, data, length);
3328                 MSG_BeginReading(&sv_message);
3329                 c = MSG_ReadByte(&sv_message);
3330                 switch (c)
3331                 {
3332                 case CCREQ_CONNECT:
3333                         if (developer_extra.integer)
3334                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREQ_CONNECT from %s.\n", addressstring2);
3335                         if(!(islocal || sv_public.integer > -2))
3336                         {
3337                                 if (developer_extra.integer)
3338                                         Con_DPrintf("Datagram_ParseConnectionless: sending CCREP_REJECT \"%s\" to %s.\n", sv_public_rejectreason.string, addressstring2);
3339                                 SZ_Clear(&sv_message);
3340                                 // save space for the header, filled in later
3341                                 MSG_WriteLong(&sv_message, 0);
3342                                 MSG_WriteByte(&sv_message, CCREP_REJECT);
3343                                 MSG_WriteUnterminatedString(&sv_message, sv_public_rejectreason.string);
3344                                 MSG_WriteString(&sv_message, "\n");
3345                                 StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3346                                 NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3347                                 SZ_Clear(&sv_message);
3348                                 break;
3349                         }
3350
3351                         protocolname = MSG_ReadString(&sv_message, sv_readstring, sizeof(sv_readstring));
3352                         protocolnumber = MSG_ReadByte(&sv_message);
3353                         if (strcmp(protocolname, "QUAKE") || protocolnumber != NET_PROTOCOL_VERSION)
3354                         {
3355                                 if (developer_extra.integer)
3356                                         Con_DPrintf("Datagram_ParseConnectionless: sending CCREP_REJECT \"Incompatible version.\" to %s.\n", addressstring2);
3357                                 SZ_Clear(&sv_message);
3358                                 // save space for the header, filled in later
3359                                 MSG_WriteLong(&sv_message, 0);
3360                                 MSG_WriteByte(&sv_message, CCREP_REJECT);
3361                                 MSG_WriteString(&sv_message, "Incompatible version.\n");
3362                                 StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3363                                 NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3364                                 SZ_Clear(&sv_message);
3365                                 break;
3366                         }
3367
3368                         // see if this connect request comes from a known client
3369                         for (clientnum = 0, knownclient = svs.clients;clientnum < svs.maxclients;clientnum++, knownclient++)
3370                         {
3371                                 if (knownclient->netconnection && LHNETADDRESS_Compare(peeraddress, &knownclient->netconnection->peeraddress) == 0)
3372                                 {
3373                                         // this is either a duplicate connection request
3374                                         // or coming back from a timeout
3375                                         // (if so, keep their stuff intact)
3376
3377                                         crypto_t *crypto = Crypto_ServerGetInstance(peeraddress);
3378                                         if((crypto && crypto->authenticated) || knownclient->netconnection->crypto.authenticated)
3379                                         {
3380                                                 if (developer_extra.integer)
3381                                                         Con_Printf("Datagram_ParseConnectionless: sending CCREP_REJECT \"Attempt to downgrade crypto.\" to %s.\n", addressstring2);
3382                                                 SZ_Clear(&sv_message);
3383                                                 // save space for the header, filled in later
3384                                                 MSG_WriteLong(&sv_message, 0);
3385                                                 MSG_WriteByte(&sv_message, CCREP_REJECT);
3386                                                 MSG_WriteString(&sv_message, "Attempt to downgrade crypto.\n");
3387                                                 StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3388                                                 NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3389                                                 SZ_Clear(&sv_message);
3390                                                 return true;
3391                                         }
3392
3393                                         // send a reply
3394                                         if (developer_extra.integer)
3395                                                 Con_DPrintf("Datagram_ParseConnectionless: sending duplicate CCREP_ACCEPT to %s.\n", addressstring2);
3396                                         SZ_Clear(&sv_message);
3397                                         // save space for the header, filled in later
3398                                         MSG_WriteLong(&sv_message, 0);
3399                                         MSG_WriteByte(&sv_message, CCREP_ACCEPT);
3400                                         MSG_WriteLong(&sv_message, LHNETADDRESS_GetPort(LHNET_AddressFromSocket(knownclient->netconnection->mysocket)));
3401                                         StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3402                                         NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3403                                         SZ_Clear(&sv_message);
3404
3405                                         // if client is already spawned, re-send the
3406                                         // serverinfo message as they'll need it to play
3407                                         if (knownclient->begun)
3408                                                 SV_SendServerinfo(knownclient);
3409                                         return true;
3410                                 }
3411                         }
3412
3413                         // this is a new client, check for connection flood
3414                         if (NetConn_PreventFlood(peeraddress, sv.connectfloodaddresses, sizeof(sv.connectfloodaddresses) / sizeof(sv.connectfloodaddresses[0]), net_connectfloodblockingtimeout.value, true))
3415                                 break;
3416
3417                         // find a slot for the new client
3418                         for (clientnum = 0, newclient = svs.clients;clientnum < svs.maxclients;clientnum++, newclient++)
3419                         {
3420                                 netconn_t *conn;
3421                                 if (!newclient->active && (newclient->netconnection = conn = NetConn_Open(mysocket, peeraddress)) != NULL)
3422                                 {
3423                                         // connect to the client
3424                                         // everything is allocated, just fill in the details
3425                                         strlcpy (conn->address, addressstring2, sizeof (conn->address));
3426                                         if (developer_extra.integer)
3427                                                 Con_DPrintf("Datagram_ParseConnectionless: sending CCREP_ACCEPT to %s.\n", addressstring2);
3428                                         // send back the info about the server connection
3429                                         SZ_Clear(&sv_message);
3430                                         // save space for the header, filled in later
3431                                         MSG_WriteLong(&sv_message, 0);
3432                                         MSG_WriteByte(&sv_message, CCREP_ACCEPT);
3433                                         MSG_WriteLong(&sv_message, LHNETADDRESS_GetPort(LHNET_AddressFromSocket(conn->mysocket)));
3434                                         StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3435                                         NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3436                                         SZ_Clear(&sv_message);
3437                                         // now set up the client struct
3438                                         SV_ConnectClient(clientnum, conn);
3439                                         NetConn_Heartbeat(1);
3440                                         return true;
3441                                 }
3442                         }
3443
3444                         if (developer_extra.integer)
3445                                 Con_DPrintf("Datagram_ParseConnectionless: sending CCREP_REJECT \"Server is full.\" to %s.\n", addressstring2);
3446                         // no room; try to let player know
3447                         SZ_Clear(&sv_message);
3448                         // save space for the header, filled in later
3449                         MSG_WriteLong(&sv_message, 0);
3450                         MSG_WriteByte(&sv_message, CCREP_REJECT);
3451                         MSG_WriteString(&sv_message, "Server is full.\n");
3452                         StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3453                         NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3454                         SZ_Clear(&sv_message);
3455                         break;
3456                 case CCREQ_SERVER_INFO:
3457                         if (developer_extra.integer)
3458                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREQ_SERVER_INFO from %s.\n", addressstring2);
3459                         if(!(islocal || sv_public.integer > -1))
3460                                 break;
3461
3462                         if (NetConn_PreventFlood(peeraddress, sv.getstatusfloodaddresses, sizeof(sv.getstatusfloodaddresses) / sizeof(sv.getstatusfloodaddresses[0]), net_getstatusfloodblockingtimeout.value, false))
3463                                 break;
3464
3465                         if (sv.active && !strcmp(MSG_ReadString(&sv_message, sv_readstring, sizeof(sv_readstring)), "QUAKE"))
3466                         {
3467                                 int numclients;
3468                                 char myaddressstring[128];
3469                                 if (developer_extra.integer)
3470                                         Con_DPrintf("Datagram_ParseConnectionless: sending CCREP_SERVER_INFO to %s.\n", addressstring2);
3471                                 SZ_Clear(&sv_message);
3472                                 // save space for the header, filled in later
3473                                 MSG_WriteLong(&sv_message, 0);
3474                                 MSG_WriteByte(&sv_message, CCREP_SERVER_INFO);
3475                                 LHNETADDRESS_ToString(LHNET_AddressFromSocket(mysocket), myaddressstring, sizeof(myaddressstring), true);
3476                                 MSG_WriteString(&sv_message, myaddressstring);
3477                                 MSG_WriteString(&sv_message, hostname.string);
3478                                 MSG_WriteString(&sv_message, sv.name);
3479                                 // How many clients are there?
3480                                 for (i = 0, numclients = 0;i < svs.maxclients;i++)
3481                                         if (svs.clients[i].active)
3482                                                 numclients++;
3483                                 MSG_WriteByte(&sv_message, numclients);
3484                                 MSG_WriteByte(&sv_message, svs.maxclients);
3485                                 MSG_WriteByte(&sv_message, NET_PROTOCOL_VERSION);
3486                                 StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3487                                 NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3488                                 SZ_Clear(&sv_message);
3489                         }
3490                         break;
3491                 case CCREQ_PLAYER_INFO:
3492                         if (developer_extra.integer)
3493                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREQ_PLAYER_INFO from %s.\n", addressstring2);
3494                         if(!(islocal || sv_public.integer > -1))
3495                                 break;
3496
3497                         if (NetConn_PreventFlood(peeraddress, sv.getstatusfloodaddresses, sizeof(sv.getstatusfloodaddresses) / sizeof(sv.getstatusfloodaddresses[0]), net_getstatusfloodblockingtimeout.value, false))
3498                                 break;
3499
3500                         if (sv.active)
3501                         {
3502                                 int playerNumber, activeNumber, clientNumber;
3503                                 client_t *client;
3504
3505                                 playerNumber = MSG_ReadByte(&sv_message);
3506                                 activeNumber = -1;
3507                                 for (clientNumber = 0, client = svs.clients; clientNumber < svs.maxclients; clientNumber++, client++)
3508                                         if (client->active && ++activeNumber == playerNumber)
3509                                                 break;
3510                                 if (clientNumber != svs.maxclients)
3511                                 {
3512                                         SZ_Clear(&sv_message);
3513                                         // save space for the header, filled in later
3514                                         MSG_WriteLong(&sv_message, 0);
3515                                         MSG_WriteByte(&sv_message, CCREP_PLAYER_INFO);
3516                                         MSG_WriteByte(&sv_message, playerNumber);
3517                                         MSG_WriteString(&sv_message, client->name);
3518                                         MSG_WriteLong(&sv_message, client->colors);
3519                                         MSG_WriteLong(&sv_message, client->frags);
3520                                         MSG_WriteLong(&sv_message, (int)(realtime - client->connecttime));
3521                                         if(sv_status_privacy.integer)
3522                                                 MSG_WriteString(&sv_message, client->netconnection ? "hidden" : "botclient");
3523                                         else
3524                                                 MSG_WriteString(&sv_message, client->netconnection ? client->netconnection->address : "botclient");
3525                                         StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3526                                         NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3527                                         SZ_Clear(&sv_message);
3528                                 }
3529                         }
3530                         break;
3531                 case CCREQ_RULE_INFO:
3532                         if (developer_extra.integer)
3533                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREQ_RULE_INFO from %s.\n", addressstring2);
3534                         if(!(islocal || sv_public.integer > -1))
3535                                 break;
3536
3537                         // no flood check here, as it only returns one cvar for one cvar and clients may iterate quickly
3538
3539                         if (sv.active)
3540                         {
3541                                 char *prevCvarName;
3542                                 cvar_t *var;
3543
3544                                 // find the search start location
3545                                 prevCvarName = MSG_ReadString(&sv_message, sv_readstring, sizeof(sv_readstring));
3546                                 var = Cvar_FindVarAfter(&cvars_all, prevCvarName, CVAR_NOTIFY);
3547
3548                                 // send the response
3549                                 SZ_Clear(&sv_message);
3550                                 // save space for the header, filled in later
3551                                 MSG_WriteLong(&sv_message, 0);
3552                                 MSG_WriteByte(&sv_message, CCREP_RULE_INFO);
3553                                 if (var)
3554                                 {
3555                                         MSG_WriteString(&sv_message, var->name);
3556                                         MSG_WriteString(&sv_message, var->string);
3557                                 }
3558                                 StoreBigLong(sv_message.data, NETFLAG_CTL | (sv_message.cursize & NETFLAG_LENGTH_MASK));
3559                                 NetConn_Write(mysocket, sv_message.data, sv_message.cursize, peeraddress);
3560                                 SZ_Clear(&sv_message);
3561                         }
3562                         break;
3563                 case CCREQ_RCON:
3564                         if (developer_extra.integer)
3565                                 Con_DPrintf("Datagram_ParseConnectionless: received CCREQ_RCON from %s.\n", addressstring2);
3566                         if (sv.active && !rcon_secure.integer)
3567                         {
3568                                 char password[2048];
3569                                 char cmd[2048];
3570                                 char *s;
3571                                 char *endpos;
3572                                 const char *userlevel;
3573                                 strlcpy(password, MSG_ReadString(&sv_message, sv_readstring, sizeof(sv_readstring)), sizeof(password));
3574                                 strlcpy(cmd, MSG_ReadString(&sv_message, sv_readstring, sizeof(sv_readstring)), sizeof(cmd));
3575                                 s = cmd;
3576                                 endpos = cmd + strlen(cmd) + 1; // one behind the NUL, so adding strlen+1 will eventually reach it
3577                                 userlevel = RCon_Authenticate(peeraddress, password, s, endpos, plaintext_matching, NULL, 0);
3578                                 RCon_Execute(mysocket, peeraddress, addressstring2, userlevel, s, endpos, true);
3579                                 return true;
3580                         }
3581                         break;
3582                 default:
3583                         break;
3584                 }
3585                 SZ_Clear(&sv_message);
3586                 // we may not have liked the packet, but it was a valid control
3587                 // packet, so we're done processing this packet now
3588                 return true;
3589         }
3590         if (host_client)
3591         {
3592                 if ((ret = NetConn_ReceivedMessage(host_client->netconnection, data, length, sv.protocol, host_client->begun ? net_messagetimeout.value : net_connecttimeout.value)) == 2)
3593                 {
3594                         SV_ReadClientMessage();
3595                         return ret;
3596                 }
3597         }
3598         return 0;
3599 }
3600
3601 void NetConn_ServerFrame(void)
3602 {
3603         int i, length;
3604         lhnetaddress_t peeraddress;
3605         unsigned char readbuffer[NET_HEADERSIZE+NET_MAXMESSAGE];
3606         for (i = 0;i < sv_numsockets;i++)
3607                 while (sv_sockets[i] && (length = NetConn_Read(sv_sockets[i], readbuffer, sizeof(readbuffer), &peeraddress)) > 0)
3608                         NetConn_ServerParsePacket(sv_sockets[i], readbuffer, length, &peeraddress);
3609         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3610         {
3611                 // never timeout loopback connections
3612                 if (host_client->netconnection && realtime > host_client->netconnection->timeout && LHNETADDRESS_GetAddressType(&host_client->netconnection->peeraddress) != LHNETADDRESSTYPE_LOOP)
3613                 {
3614                         Con_Printf("Client \"%s\" connection timed out\n", host_client->name);
3615                         SV_DropClient(false);
3616                 }
3617         }
3618 }
3619
3620 void NetConn_SleepMicroseconds(int microseconds)
3621 {
3622         LHNET_SleepUntilPacket_Microseconds(microseconds);
3623 }
3624
3625 #ifdef CONFIG_MENU
3626 void NetConn_QueryMasters(qboolean querydp, qboolean queryqw)
3627 {
3628         int i, j;
3629         int masternum;
3630         lhnetaddress_t masteraddress;
3631         lhnetaddress_t broadcastaddress;
3632         char request[256];
3633
3634         if (serverlist_cachecount >= SERVERLIST_TOTALSIZE)
3635                 return;
3636
3637         // 26000 is the default quake server port, servers on other ports will not
3638         // be found
3639         // note this is IPv4-only, I doubt there are IPv6-only LANs out there
3640         LHNETADDRESS_FromString(&broadcastaddress, "255.255.255.255", 26000);
3641
3642         if (querydp)
3643         {
3644                 for (i = 0;i < cl_numsockets;i++)
3645                 {
3646                         if (cl_sockets[i])
3647                         {
3648                                 const char *cmdname, *extraoptions;
3649                                 int af = LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(cl_sockets[i]));
3650
3651                                 if(LHNETADDRESS_GetAddressType(&broadcastaddress) == af)
3652                                 {
3653                                         // search LAN for Quake servers
3654                                         SZ_Clear(&cl_message);
3655                                         // save space for the header, filled in later
3656                                         MSG_WriteLong(&cl_message, 0);
3657                                         MSG_WriteByte(&cl_message, CCREQ_SERVER_INFO);
3658                                         MSG_WriteString(&cl_message, "QUAKE");
3659                                         MSG_WriteByte(&cl_message, NET_PROTOCOL_VERSION);
3660                                         StoreBigLong(cl_message.data, NETFLAG_CTL | (cl_message.cursize & NETFLAG_LENGTH_MASK));
3661                                         NetConn_Write(cl_sockets[i], cl_message.data, cl_message.cursize, &broadcastaddress);
3662                                         SZ_Clear(&cl_message);
3663
3664                                         // search LAN for DarkPlaces servers
3665                                         NetConn_WriteString(cl_sockets[i], "\377\377\377\377getstatus", &broadcastaddress);
3666                                 }
3667
3668                                 // build the getservers message to send to the dpmaster master servers
3669                                 if (LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(cl_sockets[i])) == LHNETADDRESSTYPE_INET6)
3670                                 {
3671                                         cmdname = "getserversExt";
3672                                         extraoptions = " ipv4 ipv6";  // ask for IPv4 and IPv6 servers
3673                                 }
3674                                 else
3675                                 {
3676                                         cmdname = "getservers";
3677                                         extraoptions = "";
3678                                 }
3679                                 memcpy(request, "\377\377\377\377", 4);
3680                                 dpsnprintf(request+4, sizeof(request)-4, "%s %s %u empty full%s", cmdname, gamenetworkfiltername, NET_PROTOCOL_VERSION, extraoptions);
3681
3682                                 // search internet
3683                                 for (masternum = 0;sv_masters[masternum].name;masternum++)
3684                                 {
3685                                         if (sv_masters[masternum].string && sv_masters[masternum].string[0] && LHNETADDRESS_FromString(&masteraddress, sv_masters[masternum].string, DPMASTER_PORT) && LHNETADDRESS_GetAddressType(&masteraddress) == af)
3686                                         {
3687                                                 masterquerycount++;
3688                                                 NetConn_WriteString(cl_sockets[i], request, &masteraddress);
3689                                         }
3690                                 }
3691
3692                                 // search favorite servers
3693                                 for(j = 0; j < nFavorites; ++j)
3694                                 {
3695                                         if(LHNETADDRESS_GetAddressType(&favorites[j]) == af)
3696                                         {
3697                                                 if(LHNETADDRESS_ToString(&favorites[j], request, sizeof(request), true))
3698                                                         NetConn_ClientParsePacket_ServerList_PrepareQuery( PROTOCOL_DARKPLACES7, request, true );
3699                                         }
3700                                 }
3701                         }
3702                 }
3703         }
3704
3705         // only query QuakeWorld servers when the user wants to
3706         if (queryqw)
3707         {
3708                 for (i = 0;i < cl_numsockets;i++)
3709                 {
3710                         if (cl_sockets[i])
3711                         {
3712                                 int af = LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(cl_sockets[i]));
3713
3714                                 if(LHNETADDRESS_GetAddressType(&broadcastaddress) == af)
3715                                 {
3716                                         // search LAN for QuakeWorld servers
3717                                         NetConn_WriteString(cl_sockets[i], "\377\377\377\377status\n", &broadcastaddress);
3718
3719                                         // build the getservers message to send to the qwmaster master servers
3720                                         // note this has no -1 prefix, and the trailing nul byte is sent
3721                                         dpsnprintf(request, sizeof(request), "c\n");
3722                                 }
3723
3724                                 // search internet
3725                                 for (masternum = 0;sv_qwmasters[masternum].name;masternum++)
3726                                 {
3727                                         if (sv_qwmasters[masternum].string && LHNETADDRESS_FromString(&masteraddress, sv_qwmasters[masternum].string, QWMASTER_PORT) && LHNETADDRESS_GetAddressType(&masteraddress) == LHNETADDRESS_GetAddressType(LHNET_AddressFromSocket(cl_sockets[i])))
3728                                         {
3729                                                 if (m_state != m_slist)
3730                                                 {
3731                                                         char lookupstring[128];
3732                                                         LHNETADDRESS_ToString(&masteraddress, lookupstring, sizeof(lookupstring), true);
3733                                                         Con_Printf("Querying master %s (resolved from %s)\n", lookupstring, sv_qwmasters[masternum].string);
3734                                                 }
3735                                                 masterquerycount++;
3736                                                 NetConn_Write(cl_sockets[i], request, (int)strlen(request) + 1, &masteraddress);
3737                                         }
3738                                 }
3739
3740                                 // search favorite servers
3741                                 for(j = 0; j < nFavorites; ++j)
3742                                 {
3743                                         if(LHNETADDRESS_GetAddressType(&favorites[j]) == af)
3744                                         {
3745                                                 if(LHNETADDRESS_ToString(&favorites[j], request, sizeof(request), true))
3746                                                 {
3747                                                         NetConn_WriteString(cl_sockets[i], "\377\377\377\377status\n", &favorites[j]);
3748                                                         NetConn_ClientParsePacket_ServerList_PrepareQuery( PROTOCOL_QUAKEWORLD, request, true );
3749                                                 }
3750                                         }
3751                                 }
3752                         }
3753                 }
3754         }
3755         if (!masterquerycount)
3756         {
3757                 Con_Print("Unable to query master servers, no suitable network sockets active.\n");
3758                 M_Update_Return_Reason("No network");
3759         }
3760 }
3761 #endif
3762
3763 void NetConn_Heartbeat(int priority)
3764 {
3765         lhnetaddress_t masteraddress;
3766         int masternum;
3767         lhnetsocket_t *mysocket;
3768
3769         // if it's a state change (client connected), limit next heartbeat to no
3770         // more than 30 sec in the future
3771         if (priority == 1 && nextheartbeattime > realtime + 30.0)
3772                 nextheartbeattime = realtime + 30.0;
3773
3774         // limit heartbeatperiod to 30 to 270 second range,
3775         // lower limit is to avoid abusing master servers with excess traffic,
3776         // upper limit is to avoid timing out on the master server (which uses
3777         // 300 sec timeout)
3778         if (sv_heartbeatperiod.value < 30)
3779                 Cvar_SetValueQuick(&sv_heartbeatperiod, 30);
3780         if (sv_heartbeatperiod.value > 270)
3781                 Cvar_SetValueQuick(&sv_heartbeatperiod, 270);
3782
3783         // make advertising optional and don't advertise singleplayer games, and
3784         // only send a heartbeat as often as the admin wants
3785         if (sv.active && sv_public.integer > 0 && svs.maxclients >= 2 && (priority > 1 || realtime > nextheartbeattime))
3786         {
3787                 nextheartbeattime = realtime + sv_heartbeatperiod.value;
3788                 for (masternum = 0;sv_masters[masternum].name;masternum++)
3789                         if (sv_masters[masternum].string && sv_masters[masternum].string[0] && LHNETADDRESS_FromString(&masteraddress, sv_masters[masternum].string, DPMASTER_PORT) && (mysocket = NetConn_ChooseServerSocketForAddress(&masteraddress)))
3790                                 NetConn_WriteString(mysocket, "\377\377\377\377heartbeat DarkPlaces\x0A", &masteraddress);
3791         }
3792 }
3793
3794 static void Net_Heartbeat_f(cmd_state_t *cmd)
3795 {
3796         if (sv.active)
3797                 NetConn_Heartbeat(2);
3798         else
3799                 Con_Print("No server running, can not heartbeat to master server.\n");
3800 }
3801
3802 static void PrintStats(netconn_t *conn)
3803 {
3804         if ((cls.state == ca_connected && cls.protocol == PROTOCOL_QUAKEWORLD) || (sv.active && sv.protocol == PROTOCOL_QUAKEWORLD))
3805                 Con_Printf("address=%21s canSend=%u sendSeq=%6u recvSeq=%6u\n", conn->address, !conn->sendMessageLength, conn->outgoing_unreliable_sequence, conn->qw.incoming_sequence);
3806         else
3807                 Con_Printf("address=%21s canSend=%u sendSeq=%6u recvSeq=%6u\n", conn->address, !conn->sendMessageLength, conn->nq.sendSequence, conn->nq.receiveSequence);
3808         Con_Printf("unreliable messages sent   = %i\n", conn->unreliableMessagesSent);
3809         Con_Printf("unreliable messages recv   = %i\n", conn->unreliableMessagesReceived);
3810         Con_Printf("reliable messages sent     = %i\n", conn->reliableMessagesSent);
3811         Con_Printf("reliable messages received = %i\n", conn->reliableMessagesReceived);
3812         Con_Printf("packetsSent                = %i\n", conn->packetsSent);
3813         Con_Printf("packetsReSent              = %i\n", conn->packetsReSent);
3814         Con_Printf("packetsReceived            = %i\n", conn->packetsReceived);
3815         Con_Printf("receivedDuplicateCount     = %i\n", conn->receivedDuplicateCount);
3816         Con_Printf("droppedDatagrams           = %i\n", conn->droppedDatagrams);
3817 }
3818
3819 void Net_Stats_f(cmd_state_t *cmd)
3820 {
3821         netconn_t *conn;
3822         Con_Print("connections                =\n");
3823         for (conn = netconn_list;conn;conn = conn->next)
3824                 PrintStats(conn);
3825 }
3826
3827 #ifdef CONFIG_MENU
3828 void Net_Refresh_f(cmd_state_t *cmd)
3829 {
3830         if (m_state != m_slist) {
3831                 Con_Print("Sending new requests to master servers\n");
3832                 ServerList_QueryList(false, true, false, true);
3833                 Con_Print("Listening for replies...\n");
3834         } else
3835                 ServerList_QueryList(false, true, false, false);
3836 }
3837
3838 void Net_Slist_f(cmd_state_t *cmd)
3839 {
3840         ServerList_ResetMasks();
3841         serverlist_sortbyfield = SLIF_PING;
3842         serverlist_sortflags = 0;
3843     if (m_state != m_slist) {
3844                 Con_Print("Sending requests to master servers\n");
3845                 ServerList_QueryList(true, true, false, true);
3846                 Con_Print("Listening for replies...\n");
3847         } else
3848                 ServerList_QueryList(true, true, false, false);
3849 }
3850
3851 void Net_SlistQW_f(cmd_state_t *cmd)
3852 {
3853         ServerList_ResetMasks();
3854         serverlist_sortbyfield = SLIF_PING;
3855         serverlist_sortflags = 0;
3856     if (m_state != m_slist) {
3857                 Con_Print("Sending requests to master servers\n");
3858                 ServerList_QueryList(true, false, true, true);
3859                 serverlist_consoleoutput = true;
3860                 Con_Print("Listening for replies...\n");
3861         } else
3862                 ServerList_QueryList(true, false, true, false);
3863 }
3864 #endif
3865
3866 void NetConn_Init(void)
3867 {
3868         int i;
3869         lhnetaddress_t tempaddress;
3870         netconn_mempool = Mem_AllocPool("network connections", 0, NULL);
3871         Cmd_AddCommand(&cmd_client, "net_stats", Net_Stats_f, "print network statistics");
3872         Cmd_AddCommand(&cmd_server, "net_stats", Net_Stats_f, "print network statistics");
3873 #ifdef CONFIG_MENU
3874         Cmd_AddCommand(&cmd_client, "net_slist", Net_Slist_f, "query dp master servers and print all server information");
3875         Cmd_AddCommand(&cmd_client, "net_slistqw", Net_SlistQW_f, "query qw master servers and print all server information");
3876         Cmd_AddCommand(&cmd_client, "net_refresh", Net_Refresh_f, "query dp master servers and refresh all server information");
3877 #endif
3878         Cmd_AddCommand(&cmd_server, "heartbeat", Net_Heartbeat_f, "send a heartbeat to the master server (updates your server information)");
3879         Cvar_RegisterVariable(&net_test);
3880         Cvar_RegisterVariable(&net_usesizelimit);
3881         Cvar_RegisterVariable(&net_burstreserve);
3882         Cvar_RegisterVariable(&rcon_restricted_password);
3883         Cvar_RegisterVariable(&rcon_restricted_commands);
3884         Cvar_RegisterVariable(&rcon_secure_maxdiff);
3885         Cvar_RegisterVariable(&net_slist_queriespersecond);
3886         Cvar_RegisterVariable(&net_slist_queriesperframe);
3887         Cvar_RegisterVariable(&net_slist_timeout);
3888         Cvar_RegisterVariable(&net_slist_maxtries);
3889         Cvar_RegisterVariable(&net_slist_favorites);
3890         Cvar_RegisterVariable(&net_slist_pause);
3891         if(LHNET_DefaultDSCP(-1) >= 0) // register cvar only if supported
3892                 Cvar_RegisterVariable(&net_tos_dscp);
3893         Cvar_RegisterVariable(&net_messagetimeout);
3894         Cvar_RegisterVariable(&net_connecttimeout);
3895         Cvar_RegisterVariable(&net_connectfloodblockingtimeout);
3896         Cvar_RegisterVariable(&net_challengefloodblockingtimeout);
3897         Cvar_RegisterVariable(&net_getstatusfloodblockingtimeout);
3898         Cvar_RegisterVariable(&net_sourceaddresscheck);
3899         Cvar_RegisterVariable(&cl_netlocalping);
3900         Cvar_RegisterVariable(&cl_netpacketloss_send);
3901         Cvar_RegisterVariable(&cl_netpacketloss_receive);
3902         Cvar_RegisterVariable(&hostname);
3903         Cvar_RegisterVariable(&developer_networking);
3904         Cvar_RegisterVariable(&cl_netport);
3905         Cvar_RegisterVariable(&sv_netport);
3906         Cvar_RegisterVariable(&net_address);
3907         Cvar_RegisterVariable(&net_address_ipv6);
3908         Cvar_RegisterVariable(&sv_public);
3909         Cvar_RegisterVariable(&sv_public_rejectreason);
3910         Cvar_RegisterVariable(&sv_heartbeatperiod);
3911         for (i = 0;sv_masters[i].name;i++)
3912                 Cvar_RegisterVariable(&sv_masters[i]);
3913         Cvar_RegisterVariable(&gameversion);
3914         Cvar_RegisterVariable(&gameversion_min);
3915         Cvar_RegisterVariable(&gameversion_max);
3916 // COMMANDLINEOPTION: Server: -ip <ipaddress> sets the ip address of this machine for purposes of networking (default 0.0.0.0 also known as INADDR_ANY), use only if you have multiple network adapters and need to choose one specifically.
3917         if ((i = COM_CheckParm("-ip")) && i + 1 < com_argc)
3918         {
3919                 if (LHNETADDRESS_FromString(&tempaddress, com_argv[i + 1], 0) == 1)
3920                 {
3921                         Con_Printf("-ip option used, setting net_address to \"%s\"\n", com_argv[i + 1]);
3922                         Cvar_SetQuick(&net_address, com_argv[i + 1]);
3923                 }
3924                 else
3925                         Con_Printf("-ip option used, but unable to parse the address \"%s\"\n", com_argv[i + 1]);
3926         }
3927 // COMMANDLINEOPTION: Server: -port <portnumber> sets the port to use for a server (default 26000, the same port as QUAKE itself), useful if you host multiple servers on your machine
3928         if (((i = COM_CheckParm("-port")) || (i = COM_CheckParm("-ipport")) || (i = COM_CheckParm("-udpport"))) && i + 1 < com_argc)
3929         {
3930                 i = atoi(com_argv[i + 1]);
3931                 if (i >= 0 && i < 65536)
3932                 {
3933                         Con_Printf("-port option used, setting port cvar to %i\n", i);
3934                         Cvar_SetValueQuick(&sv_netport, i);
3935                 }
3936                 else
3937                         Con_Printf("-port option used, but %i is not a valid port number\n", i);
3938         }
3939         cl_numsockets = 0;
3940         sv_numsockets = 0;
3941         cl_message.data = cl_message_buf;
3942         cl_message.maxsize = sizeof(cl_message_buf);
3943         cl_message.cursize = 0;
3944         sv_message.data = sv_message_buf;
3945         sv_message.maxsize = sizeof(sv_message_buf);
3946         sv_message.cursize = 0;
3947         LHNET_Init();
3948         if (Thread_HasThreads())
3949                 netconn_mutex = Thread_CreateMutex();
3950 }
3951
3952 void NetConn_Shutdown(void)
3953 {
3954         NetConn_CloseClientPorts();
3955         NetConn_CloseServerPorts();
3956         LHNET_Shutdown();
3957         if (netconn_mutex)
3958                 Thread_DestroyMutex(netconn_mutex);
3959         netconn_mutex = NULL;
3960 }
3961