1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "string.h"

     6

#include "strings.h"

     7

#include "table/sprites.h"

     8

#include "network.h"

     9

    10

#include "hal.h" // for file list

    11

    12

#ifdef ENABLE_NETWORK

    13

    14

#include "table/strings.h"

    15

#include "functions.h"

    16

#include "network_data.h"

    17

#include "network_gamelist.h"

    18

#include "window.h"

    19

#include "gui.h"

    20

#include "gfx.h"

    21

#include "command.h"

    22

#include "variables.h"

    23

#include "network_server.h"

    24

#include "network_udp.h"

    25

    26

#define BGC 5

    27

#define BTC 15

    28

#define MAX_QUERYSTR_LEN 64

    29

    30

typedef struct network_d {

    31

	byte company;            // select company in network lobby

    32

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

    33

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

    34

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

    35

} network_d;

    36

assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(network_d));

    37

    38

typedef struct network_ql_d {

    39

	network_d n;                 // see above; general stuff

    40

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

    41

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

    42

	list_d l;                    // accompanying list-administration

    43

} network_ql_d;

    44

assert_compile(WINDOW_CUSTOM_SIZE >= sizeof(network_ql_d));

    45

    46

typedef struct NetworkGameSorting {

    47

	bool order;    // Ascending / Descending

    48

	byte criteria; // Sorted by name/clients/connectivity

    49

} NetworkGameSorting;

    50

    51

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

    52

static NetworkGameSorting _ng_sorting;

    53

    54

static char _edit_str_buf[MAX_QUERYSTR_LEN*2];

    55

static void ShowNetworkStartServerWindow(void);

    56

static void ShowNetworkLobbyWindow(NetworkGameList *ngl);

    57

    58

static const StringID _connection_types_dropdown[] = {

    59

	STR_NETWORK_LAN_INTERNET,

    60

	STR_NETWORK_INTERNET_ADVERTISE,

    61

	INVALID_STRING_ID

    62

};

    63

    64

static const StringID _lan_internet_types_dropdown[] = {

    65

	STR_NETWORK_LAN,

    66

	STR_NETWORK_INTERNET,

    67

	INVALID_STRING_ID

    68

};

    69

    70

static const StringID _players_dropdown[] = {

    71

	STR_NETWORK_0_CLIENTS,

    72

	STR_NETWORK_1_CLIENTS,

    73

	STR_NETWORK_2_CLIENTS,

    74

	STR_NETWORK_3_CLIENTS,

    75

	STR_NETWORK_4_CLIENTS,

    76

	STR_NETWORK_5_CLIENTS,

    77

	STR_NETWORK_6_CLIENTS,

    78

	STR_NETWORK_7_CLIENTS,

    79

	STR_NETWORK_8_CLIENTS,

    80

	STR_NETWORK_9_CLIENTS,

    81

	STR_NETWORK_10_CLIENTS,

    82

	INVALID_STRING_ID

    83

};

    84

    85

static const StringID _language_dropdown[] = {

    86

	STR_NETWORK_LANG_ANY,

    87

	STR_NETWORK_LANG_ENGLISH,

    88

	STR_NETWORK_LANG_GERMAN,

    89

	STR_NETWORK_LANG_FRENCH,

    90

	INVALID_STRING_ID

    91

};

    92

    93

enum {

    94

	NET_PRC__OFFSET_TOP_WIDGET          = 54,

    95

	NET_PRC__OFFSET_TOP_WIDGET_COMPANY  = 52,

    96

	NET_PRC__SIZE_OF_ROW                = 14,

    97

};

    98

    99

// called when a new server is found on the network

   100

void UpdateNetworkGameWindow(bool unselect)

   101

{

   102

	Window* w = FindWindowById(WC_NETWORK_WINDOW, 0);

   103

   104

	if (w != NULL) {

   105

		if (unselect) WP(w, network_ql_d).n.server = NULL;

   106

		SendWindowMessage(WC_NETWORK_WINDOW, 0, true, 0, 0);

   107

	}

   108

}

   109

   110

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

   111

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

   112

   113

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

   114

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

   115

{

   116

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

   117

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

   118

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

   119

   120

	return (_internal_sort_order & 1) ? -r : r;

   121

}

   122

   123

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

   124

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

   125

 * higher maximum is preferred. */

   126

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

   127

{

   128

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

   129

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

   130

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

   131

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

   132

   133

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

   134

   135

	return (_internal_sort_order & 1) ? -r : r;

   136

}

   137

   138

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

   139

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

   140

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

   141

{

   142

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

   143

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

   144

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

   145

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

   146

   147

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

   148

   149

	return (_internal_sort_order & 1) ? -r : r;

   150

}

   151

   152

static NGameNameSortFunction* const _ngame_sorter[] = {

   153

	&NGameNameSorter,

   154

	&NGameClientSorter,

   155

	&NGameAllowedSorter

   156

};

   157

   158

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

   159

 * an item has been added or deleted for example

   160

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

   161

static void BuildNetworkGameList(network_ql_d *nqld)

   162

{

   163

	NetworkGameList *ngl_temp;

   164

	uint n = 0;

   165

   166

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

   167

   168

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

   169

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

   170

	if (n == 0) return;

   171

   172

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

   173

	free(nqld->sort_list);

   174

	nqld->sort_list = malloc(n * sizeof(nqld->sort_list[0]));

   175

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

   176

	nqld->l.list_length = n;

   177

   178

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

   179

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

   180

	}

   181

   182

	/* Force resort */

   183

	nqld->l.flags &= ~VL_REBUILD;

   184

	nqld->l.flags |= VL_RESORT;

   185

}

   186

   187

static void SortNetworkGameList(network_ql_d *nqld)

   188

{

   189

	NetworkGameList *item;

   190

	uint i;

   191

   192

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

   193

   194

	_internal_sort_order = nqld->l.flags & VL_DESC;

   195

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

   196

   197

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

   198

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

   199

	 * shuffling the ->next pointers */

   200

	_network_game_list = nqld->sort_list[0];

   201

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

   202

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

   203

		item = item->next;

   204

	}

   205

	item->next = NULL;

   206

   207

	nqld->l.flags &= ~VL_RESORT;

   208

}

   209

   210

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

   211

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

   212

{

   213

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

   214

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

   215

   216

	switch (e->event) {

   217

	case WE_CREATE: /* Focus input box */

   218

		nd->field = 3;

   219

		nd->server = NULL;

   220

   221

		WP(w, network_ql_d).sort_list = NULL;

   222

		ld->flags = VL_REBUILD | (_ng_sorting.order << (VL_DESC - 1));

   223

		ld->sort_type = _ng_sorting.criteria;

   224

		break;

   225

   226

	case WE_PAINT: {

   227

		const NetworkGameList *sel = nd->server;

   228

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

   229

   230

		if (ld->flags & VL_REBUILD) {

   231

			BuildNetworkGameList(&WP(w, network_ql_d));

   232

			SetVScrollCount(w, ld->list_length);

   233

		}

   234

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

   235

   236

		w->disabled_state = 0;

   237

   238

		if (sel == NULL) {

   239

			SETBIT(w->disabled_state, 16); SETBIT(w->disabled_state, 17);

   240

		} else if (!sel->online) {

   241

			SETBIT(w->disabled_state, 16); // Server offline, join button disabled

   242

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

   243

			SETBIT(w->disabled_state, 16); // Server full, join button disabled

   244

		} else if (!sel->info.compatible) {

   245

			// revisions don't match, check if server has no revision; then allow connection

   246

			SETBIT(w->disabled_state, 16); // Revision mismatch, join button disabled

   247

		}

   248

   249

		SetDParam(0, 0x00);

   250

		SetDParam(7, _lan_internet_types_dropdown[_network_lan_internet]);

   251

		DrawWindowWidgets(w);

   252

   253

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

   254

   255

		DrawString(9, 23, STR_NETWORK_CONNECTION, 2);

   256

		DrawString(210, 23, STR_NETWORK_PLAYER_NAME, 2);

   257

   258

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

   259

		switch (ld->sort_type) {

   260

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

   261

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

   262

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

   263

		}

   264

   265

		{ // draw list of games

   266

			uint16 y = NET_PRC__OFFSET_TOP_WIDGET + 3;

   267

			int32 n = 0;

   268

			int32 pos = w->vscroll.pos;

   269

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

   270

			const NetworkGameList *cur_item = _network_game_list;

   271

   272

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

   273

				pos--;

   274

				cur_item = cur_item->next;

   275

			}

   276

   277

			while (cur_item != NULL) {

   278

				// show highlighted item with a different colour

   279

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

   280

   281

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

   282

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

   283

   284

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

   285

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

   286

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

   287

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

   288

				DrawStringCentered(210, y, STR_NETWORK_GENERAL_ONLINE, 2);

   289

   290

				// only draw icons if the server is online

   291

				if (cur_item->online) {

   292

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

   293

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

   294

   295

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

   296

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

   297

   298

					// draw flag according to server language

   299

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

   300

				}

   301

   302

				cur_item = cur_item->next;

   303

				y += NET_PRC__SIZE_OF_ROW;

   304

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

   305

			}

   306

		}

   307

   308

		/* Draw the right menu */

   309

		GfxFillRect(311, 43, 539, 92, 157);

   310

		if (sel == NULL) {

   311

			DrawStringMultiCenter(425, 58, STR_NETWORK_GAME_INFO, 0);

   312

		} else if (!sel->online) {

   313

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

   314

			DrawStringMultiCenter(425, 68, STR_ORANGE, 2); // game name

   315

   316

			DrawStringMultiCenter(425, 132, STR_NETWORK_SERVER_OFFLINE, 2); // server offline

   317

		} else { // show game info

   318

			uint16 y = 100;

   319

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

   320

   321

			DrawStringMultiCenter(425, 48, STR_NETWORK_GAME_INFO, 0);

   322

   323

   324

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

   325

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

   326

   327

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

   328

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

   329

   330

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

   331

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

   332

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

   333

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

   334

			DrawString(x, y, STR_NETWORK_CLIENTS, 2);

   335

			y += 10;

   336

   337

			SetDParam(0, _language_dropdown[sel->info.server_lang]);

   338

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

   339

			y += 10;

   340

   341

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

   342

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

   343

			y += 10;

   344

   345

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

   346

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

   347

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

   348

			y += 10;

   349

   350

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

   351

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

   352

			y += 10;

   353

   354

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

   355

			SetDParam(1, sel->port);

   356

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

   357

			y += 10;

   358

   359

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

   360

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

   361

			y += 10;

   362

   363

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

   364

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

   365

			y += 10;

   366

   367

			y += 2;

   368

   369

			if (!sel->info.compatible) {

   370

					DrawStringMultiCenter(425, y, STR_NETWORK_VERSION_MISMATCH, 2); // server mismatch

   371

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

   372

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

   373

				DrawStringMultiCenter(425, y, STR_NETWORK_SERVER_FULL, 2); // server full

   374

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

   375

				DrawStringMultiCenter(425, y, STR_NETWORK_PASSWORD, 2); // password warning

   376

			}

   377

   378

			y += 10;

   379

		}

   380

	}	break;

   381

   382

	case WE_CLICK:

   383

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

   384

		switch (e->click.widget) {

   385

		case 0: case 14: /* Close 'X' | Cancel button */

   386

			DeleteWindowById(WC_NETWORK_WINDOW, 0);

   387

			break;

   388

		case 4: case 5:

   389

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

   390

			break;

   391

		case 6: /* Sort by name */

   392

		case 7: /* Sort by connected clients */

   393

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

   394

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

   395

			ld->flags |= VL_RESORT;

   396

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

   397

   398

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

   399

			_ng_sorting.criteria = ld->sort_type;

   400

			SetWindowDirty(w);

   401

			break;

   402

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

   403

			NetworkGameList *cur_item;

   404

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

   405

   406

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

   407

			id_v += w->vscroll.pos;

   408

   409

			cur_item = _network_game_list;

   410

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

   411

   412

			nd->server = cur_item;

   413

			SetWindowDirty(w);

   414

		} break;

   415

		case 11: /* Find server automatically */

   416

			switch (_network_lan_internet) {

   417

				case 0: NetworkUDPSearchGame(); break;

   418

				case 1: NetworkUDPQueryMasterServer(); break;

   419

			}

   420

			break;

   421

		case 12: { // Add a server

   422

				ShowQueryString(

   423

				BindCString(_network_default_ip),

   424

				STR_NETWORK_ENTER_IP,

   425

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

   426

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

   427

				w->window_class,

   428

				w->window_number);

   429

		} break;

   430

		case 13: /* Start server */

   431

			ShowNetworkStartServerWindow();

   432

			break;

   433

		case 16: /* Join Game */

   434

			if (nd->server != NULL) {

   435

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

   436

				_network_last_port = nd->server->port;

   437

				ShowNetworkLobbyWindow(nd->server);

   438

			}

   439

			break;

   440

		case 17: // Refresh

   441

			if (nd->server != NULL)

   442

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

   443

			break;

   444

   445

	}	break;

   446

   447

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

   448

		switch(e->dropdown.button) {

   449

			case 5:

   450

				_network_lan_internet = e->dropdown.index;

   451

				break;

   452

		}

   453

   454

		SetWindowDirty(w);

   455

		break;

   456

   457

	case WE_MOUSELOOP:

   458

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

   459

		break;

   460

   461

	case WE_MESSAGE:

   462

		ld->flags |= VL_REBUILD;

   463

		SetWindowDirty(w);

   464

		break;

   465

   466

	case WE_KEYPRESS:

   467

		if (nd->field != 3) {

   468

			if (nd->server != NULL) {

   469

				if (e->keypress.keycode == WKC_DELETE) { /* Press 'delete' to remove servers */

   470

					NetworkGameListRemoveItem(nd->server);

   471

					NetworkRebuildHostList();

   472

					nd->server = NULL;

   473

				}

   474

			}

   475

			break;

   476

		}

   477

   478

		if (HandleEditBoxKey(w, &WP(w, network_ql_d).q, 3, e) == 1) break; // enter pressed

   479

   480

		// The name is only allowed when it starts with a letter!

   481

		if (_edit_str_buf[0] != '\0' && _edit_str_buf[0] != ' ') {

   482

			ttd_strlcpy(_network_player_name, _edit_str_buf, lengthof(_network_player_name));

   483

		} else {

   484

			ttd_strlcpy(_network_player_name, "Player", lengthof(_network_player_name));