1

/* $Id$ */

     2

     3

#ifdef ENABLE_NETWORK

     4

#include "../stdafx.h"

     5

#include "../openttd.h"

     6

#include "../string.h"

     7

#include "../strings.h"

     8

#include "../table/sprites.h"

     9

#include "network.h"

    10

#include "../date.h"

    11

    12

#include "../fios.h"

    13

#include "table/strings.h"

    14

#include "../functions.h"

    15

#include "network_data.h"

    16

#include "network_client.h"

    17

#include "network_gui.h"

    18

#include "network_gamelist.h"

    19

#include "../window.h"

    20

#include "../gui.h"

    21

#include "../gfx.h"

    22

#include "../command.h"

    23

#include "../variables.h"

    24

#include "network_server.h"

    25

#include "network_udp.h"

    26

#include "../settings.h"

    27

#include "../string.h"

    28

#include "../town.h"

    29

#include "../newgrf.h"

    30

#include "../helpers.hpp"

    31

    32

#define BGC 5

    33

#define BTC 15

    34

    35

struct network_d {

    36

	PlayerID company;        // select company in network lobby

    37

	byte field;              // select text-field in start-server and game-listing

    38

	NetworkGameList *server; // selected server in lobby and game-listing

    39

	FiosItem *map;           // selected map in start-server

    40

};

    41

assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(network_d));

    42

    43

struct network_ql_d {

    44

	network_d n;                 // see above; general stuff

    45

	querystr_d q;                // text-input in start-server and game-listing

    46

	NetworkGameList **sort_list; // list of games (sorted)

    47

	list_d l;                    // accompanying list-administration

    48

};

    49

assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(network_ql_d));

    50

    51

/* Global to remember sorting after window has been closed */

    52

static Listing _ng_sorting;

    53

    54

static char _edit_str_buf[150];

    55

static bool _chat_tab_completion_active;

    56

    57

static void ShowNetworkStartServerWindow();

    58

static void ShowNetworkLobbyWindow(NetworkGameList *ngl);

    59

extern void SwitchMode(int new_mode);

    60

    61

static const StringID _connection_types_dropdown[] = {

    62

	STR_NETWORK_LAN_INTERNET,

    63

	STR_NETWORK_INTERNET_ADVERTISE,

    64

	INVALID_STRING_ID

    65

};

    66

    67

static const StringID _lan_internet_types_dropdown[] = {

    68

	STR_NETWORK_LAN,

    69

	STR_NETWORK_INTERNET,

    70

	INVALID_STRING_ID

    71

};

    72

    73

static const StringID _players_dropdown[] = {

    74

	STR_NETWORK_0_PLAYERS,

    75

	STR_NETWORK_1_PLAYERS,

    76

	STR_NETWORK_2_PLAYERS,

    77

	STR_NETWORK_3_PLAYERS,

    78

	STR_NETWORK_4_PLAYERS,

    79

	STR_NETWORK_5_PLAYERS,

    80

	STR_NETWORK_6_PLAYERS,

    81

	STR_NETWORK_7_PLAYERS,

    82

	STR_NETWORK_8_PLAYERS,

    83

	STR_NETWORK_9_PLAYERS,

    84

	STR_NETWORK_10_PLAYERS,

    85

	INVALID_STRING_ID

    86

};

    87

    88

static StringID _language_dropdown[NETLANG_COUNT + 1] = {STR_NULL};

    89

    90

void SortNetworkLanguages()

    91

{

    92

	/* Init the strings */

    93

	if (_language_dropdown[0] == STR_NULL) {

    94

		for (int i = 0; i < NETLANG_COUNT; i++) _language_dropdown[i] = STR_NETWORK_LANG_ANY + i;

    95

		_language_dropdown[NETLANG_COUNT] = INVALID_STRING_ID;

    96

	}

    97

    98

	/* Sort the strings (we don't move 'any' and the 'invalid' one) */

    99

	qsort(&_language_dropdown[1], NETLANG_COUNT - 1, sizeof(StringID), &StringIDSorter);

   100

}

   101

   102

enum {

   103

	NET_PRC__OFFSET_TOP_WIDGET          = 54,

   104

	NET_PRC__OFFSET_TOP_WIDGET_COMPANY  = 52,

   105

	NET_PRC__SIZE_OF_ROW                = 14,

   106

};

   107

   108

/** Update the network new window because a new server is

   109

 * found on the network.

   110

 * @param unselect unselect the currently selected item */

   111

void UpdateNetworkGameWindow(bool unselect)

   112

{

   113

	SendWindowMessage(WC_NETWORK_WINDOW, 0, unselect, 0, 0);

   114

}

   115

   116

static bool _internal_sort_order; // Used for Qsort order-flipping

   117

typedef int CDECL NGameNameSortFunction(const void*, const void*);

   118

   119

/** Qsort function to sort by name. */

   120

static int CDECL NGameNameSorter(const void *a, const void *b)

   121

{

   122

	const NetworkGameList *cmp1 = *(const NetworkGameList**)a;

   123

	const NetworkGameList *cmp2 = *(const NetworkGameList**)b;

   124

	int r = strcasecmp(cmp1->info.server_name, cmp2->info.server_name);

   125

   126

	return _internal_sort_order ? -r : r;

   127

}

   128

   129

/** Qsort function to sort by the amount of clients online on a

   130

 * server. If the two servers have the same amount, the one with the

   131

 * higher maximum is preferred. */

   132

static int CDECL NGameClientSorter(const void *a, const void *b)

   133

{

   134

	const NetworkGameList *cmp1 = *(const NetworkGameList**)a;

   135

	const NetworkGameList *cmp2 = *(const NetworkGameList**)b;

   136

	/* Reverse as per default we are interested in most-clients first */

   137

	int r = cmp1->info.clients_on - cmp2->info.clients_on;

   138

   139

	if (r == 0) r = cmp1->info.clients_max - cmp2->info.clients_max;

   140

	if (r == 0) r = strcasecmp(cmp1->info.server_name, cmp2->info.server_name);

   141

   142

	return _internal_sort_order ? -r : r;

   143

}

   144

   145

/** Qsort function to sort by joinability. If both servers are the

   146

 * same, prefer the non-passworded server first. */

   147

static int CDECL NGameAllowedSorter(const void *a, const void *b)

   148

{

   149

	const NetworkGameList *cmp1 = *(const NetworkGameList**)a;

   150

	const NetworkGameList *cmp2 = *(const NetworkGameList**)b;

   151

   152

	/* The servers we do not know anything about (the ones that did not reply) should be at the bottom) */

   153

	int r = StrEmpty(cmp1->info.server_revision) - StrEmpty(cmp2->info.server_revision);

   154

   155

	/* Reverse default as we are interested in version-compatible clients first */

   156

	if (r == 0) r = cmp2->info.version_compatible - cmp1->info.version_compatible;

   157

	/* The version-compatible ones are then sorted with NewGRF compatible first, incompatible last */

   158

	if (r == 0) r = cmp2->info.compatible - cmp1->info.compatible;

   159

	/* Passworded servers should be below unpassworded servers */

   160

	if (r == 0) r = cmp1->info.use_password - cmp2->info.use_password;

   161

	/* Finally sort on the name of the server */

   162

	if (r == 0) r = strcasecmp(cmp1->info.server_name, cmp2->info.server_name);

   163

   164

	return _internal_sort_order ? -r : r;

   165

}

   166

   167

/** (Re)build the network game list as its amount has changed because

   168

 * an item has been added or deleted for example

   169

 * @param ngl list_d struct that contains all necessary information for sorting */

   170

static void BuildNetworkGameList(network_ql_d *nqld)

   171

{

   172

	NetworkGameList *ngl_temp;

   173

	uint n = 0;

   174

   175

	if (!(nqld->l.flags & VL_REBUILD)) return;

   176

   177

	/* Count the number of games in the list */

   178

	for (ngl_temp = _network_game_list; ngl_temp != NULL; ngl_temp = ngl_temp->next) n++;

   179

	if (n == 0) return;

   180

   181

	/* Create temporary array of games to use for listing */

   182

	free(nqld->sort_list);

   183

	nqld->sort_list = MallocT<NetworkGameList*>(n);

   184

	if (nqld->sort_list == NULL) error("Could not allocate memory for the network-game-sorting-list");

   185

	nqld->l.list_length = n;

   186

   187

	for (n = 0, ngl_temp = _network_game_list; ngl_temp != NULL; ngl_temp = ngl_temp->next) {

   188

		nqld->sort_list[n++] = ngl_temp;

   189

	}

   190

   191

	/* Force resort */

   192

	nqld->l.flags &= ~VL_REBUILD;

   193

	nqld->l.flags |= VL_RESORT;

   194

}

   195

   196

static void SortNetworkGameList(network_ql_d *nqld)

   197

{

   198

	static NGameNameSortFunction * const ngame_sorter[] = {

   199

		&NGameNameSorter,

   200

		&NGameClientSorter,

   201

		&NGameAllowedSorter

   202

	};

   203

   204

	NetworkGameList *item;

   205

	uint i;

   206

   207

	if (!(nqld->l.flags & VL_RESORT)) return;

   208

	if (nqld->l.list_length == 0) return;

   209

   210

	_internal_sort_order = !!(nqld->l.flags & VL_DESC);

   211

	qsort(nqld->sort_list, nqld->l.list_length, sizeof(nqld->sort_list[0]), ngame_sorter[nqld->l.sort_type]);

   212

   213

	/* After sorting ngl->sort_list contains the sorted items. Put these back

   214

	 * into the original list. Basically nothing has changed, we are only

   215

	 * shuffling the ->next pointers */

   216

	_network_game_list = nqld->sort_list[0];

   217

	for (item = _network_game_list, i = 1; i != nqld->l.list_length; i++) {

   218

		item->next = nqld->sort_list[i];

   219

		item = item->next;

   220

	}

   221

	item->next = NULL;

   222

   223

	nqld->l.flags &= ~VL_RESORT;

   224

}

   225

   226

/* Uses network_ql_d (network_d, querystr_d and list_d) WP macro */

   227

static void NetworkGameWindowWndProc(Window *w, WindowEvent *e)

   228

{

   229

	network_d *nd = &WP(w, network_ql_d).n;

   230

	list_d *ld = &WP(w, network_ql_d).l;

   231

   232

	switch (e->event) {

   233

	case WE_CREATE: /* Focus input box */

   237

		nd->field = 3;

   238

		nd->server = NULL;

   239

   240

		WP(w, network_ql_d).sort_list = NULL;

   241

		ld->flags = VL_REBUILD | (_ng_sorting.order ? VL_DESC : VL_NONE);

   242

		ld->sort_type = _ng_sorting.criteria;

   243

		break;

   244

   245

	case WE_PAINT: {

   246

		const NetworkGameList *sel = nd->server;

   247

		const char *arrow = (ld->flags & VL_DESC) ? DOWNARROW : UPARROW;

   248

   249

		if (ld->flags & VL_REBUILD) {

   250

			BuildNetworkGameList(&WP(w, network_ql_d));

   251

			SetVScrollCount(w, ld->list_length);

   252

		}

   253

		if (ld->flags & VL_RESORT) SortNetworkGameList(&WP(w, network_ql_d));

   254

   255

		SetWindowWidgetDisabledState(w, 17, sel == NULL);

   256

		/* Join Button disabling conditions */

   257

		SetWindowWidgetDisabledState(w, 16, sel == NULL || // no Selected Server

   258

				!sel->online || // Server offline

   259

				sel->info.clients_on >= sel->info.clients_max || // Server full

   260

				!sel->info.compatible); // Revision mismatch

   261

   262

		SetWindowWidgetHiddenState(w, 18, sel == NULL ||

   263

				!sel->online ||

   264

				sel->info.grfconfig == NULL);

   265

   266

		SetDParam(0, 0x00);

   267

		SetDParam(7, _lan_internet_types_dropdown[_network_lan_internet]);

   268

		DrawWindowWidgets(w);

   269

   270

		DrawEditBox(w, &WP(w, network_ql_d).q, 3);

   271

   272

		DrawString(9, 23, STR_NETWORK_CONNECTION, 2);

   274

   275

		/* Sort based on widgets: name, clients, compatibility */

   276

		switch (ld->sort_type) {

   277

			case 6 - 6: DoDrawString(arrow, w->widget[6].right - 10, 42, 0x10); break;

   278

			case 7 - 6: DoDrawString(arrow, w->widget[7].right - 10, 42, 0x10); break;

   279

			case 8 - 6: DoDrawString(arrow, w->widget[8].right - 10, 42, 0x10); break;

   280

		}

   281

   282

		{ // draw list of games

   283

			uint16 y = NET_PRC__OFFSET_TOP_WIDGET + 3;

   284

			int32 n = 0;

   285

			int32 pos = w->vscroll.pos;

   286

			uint max_name_width = w->widget[6].right - w->widget[6].left - 5;

   287

			const NetworkGameList *cur_item = _network_game_list;

   288

   289

			while (pos > 0 && cur_item != NULL) {

   290

				pos--;

   291

				cur_item = cur_item->next;

   292

			}

   293

   294

			while (cur_item != NULL) {

   295

				// show highlighted item with a different colour

   296

				if (cur_item == sel) GfxFillRect(w->widget[6].left + 1, y - 2, w->widget[8].right - 1, y + 9, 10);

   297

   298

				SetDParamStr(0, cur_item->info.server_name);

   299

				DrawStringTruncated(w->widget[6].left + 5, y, STR_02BD, 16, max_name_width);

   300

   301

				SetDParam(0, cur_item->info.clients_on);

   302

				SetDParam(1, cur_item->info.clients_max);

   303

				SetDParam(2, cur_item->info.companies_on);

   304

				SetDParam(3, cur_item->info.companies_max);

   306

   307

				// only draw icons if the server is online

   308

				if (cur_item->online) {

   309

					// draw a lock if the server is password protected.

   310

					if (cur_item->info.use_password) DrawSprite(SPR_LOCK, PAL_NONE, w->widget[8].left + 5, y - 1);

   311

   312

					// draw red or green icon, depending on compatibility with server.

   313

					DrawSprite(SPR_BLOT, (cur_item->info.compatible ? PALETTE_TO_GREEN : (cur_item->info.version_compatible ? PALETTE_TO_YELLOW : PALETTE_TO_RED)), w->widget[8].left + 15, y);

   314

   315

					// draw flag according to server language

   316

					DrawSprite(SPR_FLAGS_BASE + cur_item->info.server_lang, PAL_NONE, w->widget[8].left + 25, y);

   317

				}

   318

   319

				cur_item = cur_item->next;

   320

				y += NET_PRC__SIZE_OF_ROW;

   321

				if (++n == w->vscroll.cap) break; // max number of games in the window

   322

			}

   323

		}

   324

   325

		/* Draw the right menu */

   327

		if (sel == NULL) {

   329

		} else if (!sel->online) {

   330

			SetDParamStr(0, sel->info.server_name);

   332

   334

		} else { // show game info

   335

			uint16 y = 100;

   336

			const uint16 x = w->widget[15].left + 5;

   337

   339

   340

   341

			SetDParamStr(0, sel->info.server_name);

   342

			DrawStringCenteredTruncated(w->widget[15].left, w->widget[15].right, 62, STR_ORANGE, 16); // game name

   343

   344

			SetDParamStr(0, sel->info.map_name);

   345

			DrawStringCenteredTruncated(w->widget[15].left, w->widget[15].right, 74, STR_02BD, 16); // map name

   346

   347

			SetDParam(0, sel->info.clients_on);

   348

			SetDParam(1, sel->info.clients_max);

   349

			SetDParam(2, sel->info.companies_on);

   350

			SetDParam(3, sel->info.companies_max);

   351

			DrawString(x, y, STR_NETWORK_CLIENTS, 2);

   352

			y += 10;

   353

   354

			SetDParam(0, STR_NETWORK_LANG_ANY + sel->info.server_lang);

   355

			DrawString(x, y, STR_NETWORK_LANGUAGE, 2); // server language

   356

			y += 10;

   357

   358

			SetDParam(0, STR_TEMPERATE_LANDSCAPE + sel->info.map_set);

   359

			DrawString(x, y, STR_NETWORK_TILESET, 2); // tileset

   360

			y += 10;

   361

   362

			SetDParam(0, sel->info.map_width);

   363

			SetDParam(1, sel->info.map_height);

   364

			DrawString(x, y, STR_NETWORK_MAP_SIZE, 2); // map size

   365

			y += 10;

   366

   367

			SetDParamStr(0, sel->info.server_revision);

   368

			DrawString(x, y, STR_NETWORK_SERVER_VERSION, 2); // server version

   369

			y += 10;

   370

   371

			SetDParamStr(0, sel->info.hostname);

   372

			SetDParam(1, sel->port);

   373

			DrawString(x, y, STR_NETWORK_SERVER_ADDRESS, 2); // server address

   374

			y += 10;

   375

   376

			SetDParam(0, sel->info.start_date);

   377

			DrawString(x, y, STR_NETWORK_START_DATE, 2); // start date

   378

			y += 10;

   379

   380

			SetDParam(0, sel->info.game_date);

   381

			DrawString(x, y, STR_NETWORK_CURRENT_DATE, 2); // current date

   382

			y += 10;

   383

   384

			y += 2;

   385

   386

			if (!sel->info.compatible) {

   388

			} else if (sel->info.clients_on == sel->info.clients_max) {

   389

				// Show: server full, when clients_on == clients_max

   391

			} else if (sel->info.use_password) {

   393

			}

   394

   395

			y += 10;

   396

		}

   397

	} break;

   398

   399

	case WE_CLICK:

   400

		nd->field = e->we.click.widget;

   401

		switch (e->we.click.widget) {

   403

			DeleteWindowById(WC_NETWORK_WINDOW, 0);

   404

			break;

   405

		case 4: case 5:

   406

			ShowDropDownMenu(w, _lan_internet_types_dropdown, _network_lan_internet, 5, 0, 0); // do it for widget 5

   407

			break;

   408

		case 6: /* Sort by name */

   409

		case 7: /* Sort by connected clients */

   410

		case 8: /* Connectivity (green dot) */

   411

			if (ld->sort_type == e->we.click.widget - 6) ld->flags ^= VL_DESC;

   412

			ld->flags |= VL_RESORT;

   413

			ld->sort_type = e->we.click.widget - 6;

   414

   415

			_ng_sorting.order = !!(ld->flags & VL_DESC);

   416

			_ng_sorting.criteria = ld->sort_type;

   417

			SetWindowDirty(w);

   418

			break;

   419

		case 9: { /* Matrix to show networkgames */

   420

			NetworkGameList *cur_item;

   421

			uint32 id_v = (e->we.click.pt.y - NET_PRC__OFFSET_TOP_WIDGET) / NET_PRC__SIZE_OF_ROW;

   422

   423

			if (id_v >= w->vscroll.cap) return; // click out of bounds

   424

			id_v += w->vscroll.pos;

   425

   426

			cur_item = _network_game_list;

   427

			for (; id_v > 0 && cur_item != NULL; id_v--) cur_item = cur_item->next;

   428

   429

			nd->server = cur_item;

   430

			SetWindowDirty(w);

   431

		} break;

   432

		case 11: /* Find server automatically */

   433

			switch (_network_lan_internet) {

   434

				case 0: NetworkUDPSearchGame(); break;

   435

				case 1: NetworkUDPQueryMasterServer(); break;

   436

			}

   437

			break;

   438

		case 12: { // Add a server

   439

				ShowQueryString(

   440

				BindCString(_network_default_ip),

   441

				STR_NETWORK_ENTER_IP,

   442

				31 | 0x1000,  // maximum number of characters OR

   443

				250, // characters up to this width pixels, whichever is satisfied first

   444

				w, CS_ALPHANUMERAL);

   445

		} break;

   446

		case 13: /* Start server */

   447

			ShowNetworkStartServerWindow();

   448

			break;

   449

		case 16: /* Join Game */

   450

			if (nd->server != NULL) {

   451

				snprintf(_network_last_host, sizeof(_network_last_host), "%s", inet_ntoa(*(struct in_addr *)&nd->server->ip));

   452

				_network_last_port = nd->server->port;

   453

				ShowNetworkLobbyWindow(nd->server);

   454

			}

   455

			break;

   456

		case 17: // Refresh

   457

			if (nd->server != NULL)

   458

				NetworkUDPQueryServer(nd->server->info.hostname, nd->server->port);

   459

			break;

   460

		case 18: // NewGRF Settings

   461

			if (nd->server != NULL) ShowNewGRFSettings(false, false, false, &nd->server->info.grfconfig);

   462

			break;

   463

   464

	} break;

   465

   466

	case WE_DROPDOWN_SELECT: /* we have selected a dropdown item in the list */

   467

		switch (e->we.dropdown.button) {

   468

			case 5:

   469

				_network_lan_internet = e->we.dropdown.index;

   470

				break;

   471

		}

   472

   473

		SetWindowDirty(w);

   474

		break;

   475

   476

	case WE_MOUSELOOP:

   477

		if (nd->field == 3) HandleEditBox(w, &WP(w, network_ql_d).q, 3);

   478

		break;

   479

   480

	case WE_MESSAGE:

   481