1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "debug.h"

     5

#include "string.h"

     6

#include "strings.h"

     7

#include "network_data.h"

     8

#include "train.h"

     9

    10

#ifdef ENABLE_NETWORK

    11

    12

#include "table/strings.h"

    13

#include "functions.h"

    14

#include "network_server.h"

    15

#include "network_udp.h"

    16

#include "console.h"

    17

#include "command.h"

    18

#include "gfx.h"

    19

#include "saveload.h"

    20

#include "vehicle.h"

    21

#include "station.h"

    22

#include "settings.h"

    23

#include "variables.h"

    24

    25

// This file handles all the server-commands

    26

    27

static void NetworkHandleCommandQueue(NetworkClientState* cs);

    28

static void NetworkSendPatchSettings(NetworkClientState* cs);

    29

    30

void NetworkPopulateCompanyInfo(void);

    31

    32

// Is the network enabled?

    33

    34

// **********

    35

// Sending functions

    36

//   DEF_SERVER_SEND_COMMAND has parameter: NetworkClientState *cs

    37

// **********

    38

    39

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_CLIENT_INFO)(NetworkClientState *cs, NetworkClientInfo *ci)

    40

{

    41

	//

    42

	// Packet: SERVER_CLIENT_INFO

    43

	// Function: Sends info about a client

    44

	// Data:

    45

	//    uint16:  The index of the client (always unique on a server. 1 = server)

    46

	//    uint8:  As which player the client is playing

    47

	//    String: The name of the client

    48

	//    String: The unique id of the client

    49

	//

    50

    51

	Packet *p;

    52

    53

	if (ci->client_index != NETWORK_EMPTY_INDEX) {

    54

		p = NetworkSend_Init(PACKET_SERVER_CLIENT_INFO);

    55

		NetworkSend_uint16(p, ci->client_index);

    56

		NetworkSend_uint8 (p, ci->client_playas);

    57

		NetworkSend_string(p, ci->client_name);

    58

		NetworkSend_string(p, ci->unique_id);

    59

    60

		NetworkSend_Packet(p, cs);

    61

	}

    62

}

    63

    64

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_COMPANY_INFO)

    65

{

    66

//

    67

	// Packet: SERVER_COMPANY_INFO

    68

	// Function: Sends info about the companies

    69

	// Data:

    70

	//

    71

    72

	int i;

    73

    74

	Player *player;

    75

	Packet *p;

    76

    77

	byte active = 0;

    78

    79

	FOR_ALL_PLAYERS(player) {

    80

		if (player->is_active)

    81

			active++;

    82

	}

    83

    84

	if (active == 0) {

    85

		Packet *p = NetworkSend_Init(PACKET_SERVER_COMPANY_INFO);

    86

    87

		NetworkSend_uint8 (p, NETWORK_COMPANY_INFO_VERSION);

    88

		NetworkSend_uint8 (p, active);

    89

    90

		NetworkSend_Packet(p, cs);

    91

		return;

    92

	}

    93

    94

	NetworkPopulateCompanyInfo();

    95

    96

	FOR_ALL_PLAYERS(player) {

    97

		if (!player->is_active)

    98

			continue;

    99

   100

		p = NetworkSend_Init(PACKET_SERVER_COMPANY_INFO);

   101

   102

		NetworkSend_uint8 (p, NETWORK_COMPANY_INFO_VERSION);

   103

		NetworkSend_uint8 (p, active);

   104

		NetworkSend_uint8 (p, player->index);

   105

   106

		NetworkSend_string(p, _network_player_info[player->index].company_name);

   107

		NetworkSend_uint8 (p, _network_player_info[player->index].inaugurated_year);

   108

		NetworkSend_uint64(p, _network_player_info[player->index].company_value);

   109

		NetworkSend_uint64(p, _network_player_info[player->index].money);

   110

		NetworkSend_uint64(p, _network_player_info[player->index].income);

   111

		NetworkSend_uint16(p, _network_player_info[player->index].performance);

   112

   113

		/* Send 1 if there is a passord for the company else send 0 */

   114

		if (_network_player_info[player->index].password[0] != '\0') {

   115

			NetworkSend_uint8 (p, 1);

   116

		} else {

   117

			NetworkSend_uint8 (p, 0);

   118

		}

   119

   120

		for (i = 0; i < NETWORK_VEHICLE_TYPES; i++)

   121

			NetworkSend_uint16(p, _network_player_info[player->index].num_vehicle[i]);

   122

   123

		for (i = 0; i < NETWORK_STATION_TYPES; i++)

   124

			NetworkSend_uint16(p, _network_player_info[player->index].num_station[i]);

   125

   126

		if (_network_player_info[player->index].players[0] == '\0')

   127

			NetworkSend_string(p, "<none>");

   128

		else

   129

			NetworkSend_string(p, _network_player_info[player->index].players);

   130

   131

		NetworkSend_Packet(p, cs);

   132

	}

   133

   134

	p = NetworkSend_Init(PACKET_SERVER_COMPANY_INFO);

   135

   136

	NetworkSend_uint8 (p, NETWORK_COMPANY_INFO_VERSION);

   137

	NetworkSend_uint8 (p, 0);

   138

   139

	NetworkSend_Packet(p, cs);

   140

}

   141

   142

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_ERROR)(NetworkClientState *cs, NetworkErrorCode error)

   143

{

   144

	//

   145

	// Packet: SERVER_ERROR

   146

	// Function: The client made an error

   147

	// Data:

   148

	//    uint8:  ErrorID (see network_data.h, NetworkErrorCode)

   149

	//

   150

   151

	NetworkClientState *new_cs;

   152

	char str[100];

   153

	char client_name[NETWORK_CLIENT_NAME_LENGTH];

   154

   155

	Packet *p = NetworkSend_Init(PACKET_SERVER_ERROR);

   156

	NetworkSend_uint8(p, error);

   157

	NetworkSend_Packet(p, cs);

   158

   159

	// Only send when the current client was in game

   160

	if (cs->status > STATUS_AUTH) {

   161

		NetworkGetClientName(client_name, sizeof(client_name), cs);

   162

   163

		GetString(str, STR_NETWORK_ERR_CLIENT_GENERAL + error);

   164

   165

		DEBUG(net, 2)("[NET] %s made an error (%s) and his connection is closed", client_name, str);

   166

   167

		NetworkTextMessage(NETWORK_ACTION_LEAVE, 1, false, client_name, "%s", str);

   168

   169

		FOR_ALL_CLIENTS(new_cs) {

   170

			if (new_cs->status > STATUS_AUTH && new_cs != cs) {

   171

				// Some errors we filter to a more general error. Clients don't have to know the real

   172

				//  reason a joining failed.

   173

				if (error == NETWORK_ERROR_NOT_AUTHORIZED || error == NETWORK_ERROR_NOT_EXPECTED || error == NETWORK_ERROR_WRONG_REVISION)

   174

					error = NETWORK_ERROR_ILLEGAL_PACKET;

   175

   176

				SEND_COMMAND(PACKET_SERVER_ERROR_QUIT)(new_cs, cs->index, error);

   177

			}

   178

		}

   179

	} else {

   180

		DEBUG(net, 2)("[NET] Clientno %d has made an error and his connection is closed", cs->index);

   181

	}

   182

   183

	cs->quited = true;

   184

   185

	// Make sure the data get's there before we close the connection

   186

	NetworkSend_Packets(cs);

   187

   188

	// The client made a mistake, so drop his connection now!

   189

	NetworkCloseClient(cs);

   190

}

   191

   192

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_NEED_PASSWORD)(NetworkClientState *cs, NetworkPasswordType type)

   193

{

   194

	//

   195

	// Packet: SERVER_NEED_PASSWORD

   196

	// Function: Indication to the client that the server needs a password

   197

	// Data:

   198

	//    uint8:  Type of password

   199

	//

   200

   201

	Packet *p = NetworkSend_Init(PACKET_SERVER_NEED_PASSWORD);

   202

	NetworkSend_uint8(p, type);

   203

	NetworkSend_Packet(p, cs);

   204

}

   205

   206

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_WELCOME)

   207

{

   208

	//

   209

	// Packet: SERVER_WELCOME

   210

	// Function: The client is joined and ready to receive his map

   211

	// Data:

   212

	//    uint16:  Own ClientID

   213

	//

   214

   215

	Packet *p;

   216

	NetworkClientState *new_cs;

   217

   218

	// Invalid packet when status is AUTH or higher

   219

	if (cs->status >= STATUS_AUTH)

   220

		return;

   221

   222

	cs->status = STATUS_AUTH;

   223

	_network_game_info.clients_on++;

   224

   225

	p = NetworkSend_Init(PACKET_SERVER_WELCOME);

   226

	NetworkSend_uint16(p, cs->index);

   227

	NetworkSend_Packet(p, cs);

   228

   229

		// Transmit info about all the active clients

   230

	FOR_ALL_CLIENTS(new_cs) {

   231

		if (new_cs != cs && new_cs->status > STATUS_AUTH)

   232

			SEND_COMMAND(PACKET_SERVER_CLIENT_INFO)(cs, DEREF_CLIENT_INFO(new_cs));

   233

	}

   234

	// Also send the info of the server

   235

	SEND_COMMAND(PACKET_SERVER_CLIENT_INFO)(cs, NetworkFindClientInfoFromIndex(NETWORK_SERVER_INDEX));

   236

}

   237

   238

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_WAIT)

   239

{

   240

	//

   241

	// Packet: PACKET_SERVER_WAIT

   242

	// Function: The client can not receive the map at the moment because

   243

	//             someone else is already receiving the map

   244

	// Data:

   245

	//    uint8:  Clients awaiting map

   246

	//

   247

	int waiting = 0;

   248

	NetworkClientState *new_cs;

   249

	Packet *p;

   250

   251

	// Count how many players are waiting in the queue

   252

	FOR_ALL_CLIENTS(new_cs) {

   253

		if (new_cs->status == STATUS_MAP_WAIT)

   254

			waiting++;

   255

	}

   256

   257

	p = NetworkSend_Init(PACKET_SERVER_WAIT);

   258

	NetworkSend_uint8(p, waiting);

   259

	NetworkSend_Packet(p, cs);

   260

}

   261

   262

// This sends the map to the client

   263

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_MAP)

   264

{

   265

	//

   266

	// Packet: SERVER_MAP

   267

	// Function: Sends the map to the client, or a part of it (it is splitted in

   268

	//   a lot of multiple packets)

   269

	// Data:

   270

	//    uint8:  packet-type (MAP_PACKET_START, MAP_PACKET_NORMAL and MAP_PACKET_END)

   271

	//  if MAP_PACKET_START:

   272

	//    uint32: The current FrameCounter

   273

	//  if MAP_PACKET_NORMAL:

   274

	//    piece of the map (till max-size of packet)

   275

	//  if MAP_PACKET_END:

   276

	//    uint32: seed0 of player

   277

	//    uint32: seed1 of player

   278

	//      last 2 are repeated MAX_PLAYERS time

   279

	//

   280

   281

	char filename[256];

   282

	static FILE *file_pointer;

   283

	static uint sent_packets; // How many packets we did send succecfully last time

   284

   285

	if (cs->status < STATUS_AUTH) {

   286

		// Illegal call, return error and ignore the packet

   287

		SEND_COMMAND(PACKET_SERVER_ERROR)(cs, NETWORK_ERROR_NOT_AUTHORIZED);

   288

		return;

   289

	}

   290

	if (cs->status == STATUS_AUTH) {

   291

		Packet *p;

   292

   293

		// Make a dump of the current game

   294

		sprintf(filename, "%s%snetwork_server.tmp",  _path.autosave_dir, PATHSEP);

   295

		if (SaveOrLoad(filename, SL_SAVE) != SL_OK) error("network savedump failed");

   296

   297

		file_pointer = fopen(filename, "rb");

   298

		fseek(file_pointer, 0, SEEK_END);

   299

   300

		// Now send the _frame_counter and how many packets are coming

   301

		p = NetworkSend_Init(PACKET_SERVER_MAP);

   302

		NetworkSend_uint8(p, MAP_PACKET_START);

   303

		NetworkSend_uint32(p, _frame_counter);

   304

		NetworkSend_uint32(p, ftell(file_pointer));

   305

		NetworkSend_Packet(p, cs);

   306

   307

		fseek(file_pointer, 0, SEEK_SET);

   308

   309

		sent_packets = 4; // We start with trying 4 packets

   310

   311

		cs->status = STATUS_MAP;

   312

		/* Mark the start of download */

   313

		cs->last_frame = _frame_counter;

   314

		cs->last_frame_server = _frame_counter;

   315

	}

   316

   317

	if (cs->status == STATUS_MAP) {

   318

		uint i;

   319

		int res;

   320

		for (i = 0; i < sent_packets; i++) {

   321

			Packet *p = NetworkSend_Init(PACKET_SERVER_MAP);

   322

			NetworkSend_uint8(p, MAP_PACKET_NORMAL);

   323

			res = fread(p->buffer + p->size, 1, SEND_MTU - p->size, file_pointer);

   324

			if (ferror(file_pointer)) {

   325

				error("Error reading temporary network savegame!");

   326

			}

   327

			p->size += res;

   328

			NetworkSend_Packet(p, cs);

   329

			if (feof(file_pointer)) {

   330

				// Done reading!

   331

				Packet *p;

   332

   333

				// XXX - Delete this when patch-settings are saved in-game

   334

				NetworkSendPatchSettings(cs);

   335

   336

				p = NetworkSend_Init(PACKET_SERVER_MAP);

   337

				NetworkSend_uint8(p, MAP_PACKET_END);

   338

				NetworkSend_Packet(p, cs);

   339

   340

				// Set the status to DONE_MAP, no we will wait for the client

   341

				//  to send it is ready (maybe that happens like never ;))

   342

				cs->status = STATUS_DONE_MAP;

   343

				fclose(file_pointer);

   344

   345

				{

   346

					NetworkClientState *new_cs;

   347

					bool new_map_client = false;

   348

					// Check if there is a client waiting for receiving the map

   349

					//  and start sending him the map

   350

					FOR_ALL_CLIENTS(new_cs) {

   351

						if (new_cs->status == STATUS_MAP_WAIT) {

   352

							// Check if we already have a new client to send the map to

   353

							if (!new_map_client) {

   354

								// If not, this client will get the map

   355

								new_cs->status = STATUS_AUTH;

   356

								new_map_client = true;

   357

								SEND_COMMAND(PACKET_SERVER_MAP)(new_cs);

   358

							} else {

   359

								// Else, send the other clients how many clients are in front of them

   360

								SEND_COMMAND(PACKET_SERVER_WAIT)(new_cs);

   361

							}

   362

						}

   363

					}

   364

				}

   365

   366

				// There is no more data, so break the for

   367

				break;

   368

			}

   369

		}

   370

   371

		// Send all packets (forced) and check if we have send it all

   372

		NetworkSend_Packets(cs);

   373

		if (cs->packet_queue == NULL) {

   374

			// All are sent, increase the sent_packets

   375

			sent_packets *= 2;

   376

		} else {

   377

			// Not everything is sent, decrease the sent_packets

   378

			if (sent_packets > 1) sent_packets /= 2;

   379

		}

   380

	}

   381

}

   382

   383

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_JOIN)(NetworkClientState *cs, uint16 client_index)

   384

{

   385

	//

   386

	// Packet: SERVER_JOIN

   387

	// Function: A client is joined (all active clients receive this after a

   388

	//     PACKET_CLIENT_MAP_OK) Mostly what directly follows is a

   389

	//     PACKET_SERVER_CLIENT_INFO

   390

	// Data:

   391

	//    uint16:  Client-Index

   392

	//

   393

   394

	Packet *p = NetworkSend_Init(PACKET_SERVER_JOIN);

   395

   396

	NetworkSend_uint16(p, client_index);

   397

   398

	NetworkSend_Packet(p, cs);

   399

}

   400

   401

   402

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_FRAME)

   403

{

   404

	//

   405

	// Packet: SERVER_FRAME

   406

	// Function: Sends the current frame-counter to the client

   407

	// Data:

   408

	//    uint32: Frame Counter

   409

	//    uint32: Frame Counter Max (how far may the client walk before the server?)

   410

	//    [uint32: general-seed-1]

   411

	//    [uint32: general-seed-2]

   412

	//      (last two depends on compile-settings, and are not default settings)

   413

	//

   414

   415

	Packet *p = NetworkSend_Init(PACKET_SERVER_FRAME);

   416

	NetworkSend_uint32(p, _frame_counter);

   417

	NetworkSend_uint32(p, _frame_counter_max);

   418

#ifdef ENABLE_NETWORK_SYNC_EVERY_FRAME

   419

	NetworkSend_uint32(p, _sync_seed_1);

   420

#ifdef NETWORK_SEND_DOUBLE_SEED

   421

	NetworkSend_uint32(p, _sync_seed_2);

   422

#endif

   423

#endif

   424

	NetworkSend_Packet(p, cs);

   425

}

   426

   427

DEF_SERVER_SEND_COMMAND(PACKET_SERVER_SYNC)

   428

{

   429

	//

   430

	// Packet: SERVER_SYNC

   431

	// Function: Sends a sync-check to the client

   432

	// Data:

   433

	//    uint32: Frame Counter

   434

	//    uint32: General-seed-1

   435

	//    [uint32: general-seed-2]

   436

	//      (last one depends on compile-settings, and are not default settings)

   437

	//

   438

   439

	Packet *p = NetworkSend_Init(PACKET_SERVER_SYNC);

   440

	NetworkSend_uint32(p, _frame_counter);

   441

	NetworkSend_uint32(p, _sync_seed_1);

   442

   443

#ifdef NETWORK_SEND_DOUBLE_SEED

   444

	NetworkSend_uint32(p, _sync_seed_2);

   445

#endif

   446

	NetworkSend_Packet(p, cs);

   447

}

   448

   449

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_COMMAND)(NetworkClientState *cs, CommandPacket *cp)

   450

{

   451

	//

   452

	// Packet: SERVER_COMMAND

   453

	// Function: Sends a DoCommand to the client

   454

	// Data:

   455

	//    uint8:  PlayerID (0..MAX_PLAYERS-1)

   456

	//    uint32: CommandID (see command.h)

   457

	//    uint32: P1 (free variables used in DoCommand)

   458

	//    uint32: P2

   459

	//    uint32: Tile

   460

	//    string: text

   461

	//    uint8:  CallBackID (see callback_table.c)

   462

	//    uint32: Frame of execution

   463

	//

   464

   465

	Packet *p = NetworkSend_Init(PACKET_SERVER_COMMAND);

   466

   467

	NetworkSend_uint8(p, cp->player);

   468

	NetworkSend_uint32(p, cp->cmd);

   469

	NetworkSend_uint32(p, cp->p1);

   470

	NetworkSend_uint32(p, cp->p2);

   471

	NetworkSend_uint32(p, cp->tile);

   472

	NetworkSend_string(p, cp->text);

   473

	NetworkSend_uint8(p, cp->callback);

   474

	NetworkSend_uint32(p, cp->frame);

   475

   476

	NetworkSend_Packet(p, cs);

   477

}

   478

   479

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_CHAT)(NetworkClientState *cs, NetworkAction action, uint16 client_index, bool self_send, const char *msg)

   480

{

   481

	//

   482

	// Packet: SERVER_CHAT

   483

	// Function: Sends a chat-packet to the client

   484

	// Data:

   485

	//    uint8:  ActionID (see network_data.h, NetworkAction)

   486

	//    uint16:  Client-index

   487

	//    String: Message (max MAX_TEXT_MSG_LEN)

   488

	//

   489

   490

	Packet *p = NetworkSend_Init(PACKET_SERVER_CHAT);

   491

   492

	NetworkSend_uint8(p, action);

   493

	NetworkSend_uint16(p, client_index);

   494

	NetworkSend_uint8(p, self_send);

   495

	NetworkSend_string(p, msg);

   496

   497

	NetworkSend_Packet(p, cs);

   498

}

   499

   500

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_ERROR_QUIT)(NetworkClientState *cs, uint16 client_index, NetworkErrorCode errorno)

   501

{

   502

	//

   503

	// Packet: SERVER_ERROR_QUIT

   504

	// Function: One of the clients made an error and is quiting the game

   505

	//      This packet informs the other clients of that.

   506

	// Data:

   507

	//    uint16:  Client-index

   508

	//    uint8:  ErrorID (see network_data.h, NetworkErrorCode)

   509

	//

   510

   511

	Packet *p = NetworkSend_Init(PACKET_SERVER_ERROR_QUIT);

   512

   513

	NetworkSend_uint16(p, client_index);

   514

	NetworkSend_uint8(p, errorno);

   515

   516

	NetworkSend_Packet(p, cs);

   517

}

   518

   519

DEF_SERVER_SEND_COMMAND_PARAM(PACKET_SERVER_QUIT)(NetworkClientState *cs, uint16 client_index, const char *leavemsg)

   520

{

   521

	//