1

/* $Id$ */

     2

     3

/** @file misc_gui.cpp GUIs for a number of misc windows. */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "heightmap.h"

     8

#include "debug.h"

     9

#include "landscape.h"

    10

#include "newgrf.h"

    11

#include "newgrf_text.h"

    12

#include "saveload.h"

    13

#include "tile_map.h"

    14

#include "gui.h"

    15

#include "window_gui.h"

    16

#include "station_gui.h"

    17

#include "textbuf_gui.h"

    18

#include "viewport_func.h"

    19

#include "gfx_func.h"

    20

#include "station_func.h"

    21

#include "command_func.h"

    22

#include "player_func.h"

    23

#include "player_base.h"

    24

#include "town.h"

    25

#include "network/network.h"

    26

#include "variables.h"

    27

#include "cheat_func.h"

    28

#include "train.h"

    29

#include "tgp.h"

    30

#include "cargotype.h"

    31

#include "player_face.h"

    32

#include "strings_func.h"

    33

#include "fileio.h"

    34

#include "fios.h"

    35

#include "tile_cmd.h"

    36

#include "zoom_func.h"

    37

#include "functions.h"

    38

#include "window_func.h"

    39

#include "date_func.h"

    40

#include "sound_func.h"

    41

#include "string_func.h"

    42

#include "player_gui.h"

    43

#include "settings_type.h"

    44

#include "newgrf_cargo.h"

    45

#include "rail_gui.h"

    46

#include "tilehighlight_func.h"

    47

#include "querystring_gui.h"

    48

    49

#include "table/sprites.h"

    50

#include "table/strings.h"

    51

    52

/* Variables to display file lists */

    53

SaveLoadDialogMode _saveload_mode;

    54

    55

    56

static bool _fios_path_changed;

    57

static bool _savegame_sort_dirty;

    58

    59

static const Widget _land_info_widgets[] = {

    60

{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,                       STR_018B_CLOSE_WINDOW},

    61

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   279,     0,    13, STR_01A3_LAND_AREA_INFORMATION, STR_018C_WINDOW_TITLE_DRAG_THIS},

    62

{      WWT_PANEL,   RESIZE_NONE,    14,     0,   279,    14,    92, 0x0,                            STR_NULL},

    63

{    WIDGETS_END},

    64

};

    65

    66

static const WindowDesc _land_info_desc = {

    67

	WDP_AUTO, WDP_AUTO, 280, 93, 280, 93,

    68

	WC_LAND_INFO, WC_NONE,

    69

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

    70

	_land_info_widgets,

    71

};

    72

    73

class LandInfoWindow : public Window {

    74

	enum {

    75

		LAND_INFO_CENTERED_LINES   = 9,                        ///< Up to 9 centered lines

    76

		LAND_INFO_MULTICENTER_LINE = LAND_INFO_CENTERED_LINES, ///< One multicenter line

    77

		LAND_INFO_LINE_END,

    78

    79

		LAND_INFO_LINE_BUFF_SIZE = 512,

    80

	};

    81

    82

public:

    83

	char landinfo_data[LAND_INFO_LINE_END][LAND_INFO_LINE_BUFF_SIZE];

    84

    85

	virtual void OnPaint()

    86

	{

    87

		this->DrawWidgets();

    88

    89

		uint y = 16;

    90

		for (uint i = 0; i < LAND_INFO_CENTERED_LINES; i++) {

    91

			if (StrEmpty(this->landinfo_data[i])) continue;

    92

    93

			DoDrawStringCentered(140, y, this->landinfo_data[i], i == 0 ? TC_LIGHT_BLUE : TC_FROMSTRING);

    94

			y += 11;

    95

		}

    96

    97

		y += 5;

    98

    99

		if (!StrEmpty(this->landinfo_data[LAND_INFO_MULTICENTER_LINE])) DrawStringMultiCenter(140, y, BindCString(this->landinfo_data[LAND_INFO_MULTICENTER_LINE]), this->width - 4);

   100

	}

   101

   102

	LandInfoWindow(TileIndex tile) : Window(&_land_info_desc) {

   103

		Player *p = GetPlayer(IsValidPlayer(_local_player) ? _local_player : PLAYER_FIRST);

   104

		Town *t = ClosestTownFromTile(tile, _settings_game.economy.dist_local_authority);

   105

   106

		Money old_money = p->player_money;

   107

		p->player_money = INT64_MAX;

   108

		CommandCost costclear = DoCommand(tile, 0, 0, 0, CMD_LANDSCAPE_CLEAR);

   109

		p->player_money = old_money;

   110

   111

		/* Because build_date is not set yet in every TileDesc, we make sure it is empty */

   112

		TileDesc td;

   113

		AcceptedCargo ac;

   114

   115

		td.build_date = 0;

   116

   117

		/* Most tiles have only one owner, but

   118

		 *  - drivethrough roadstops can be build on town owned roads (up to 2 owners) and

   119

		 *  - roads can have up to four owners (railroad, road, tram, 3rd-roadtype "highway").

   120

		 */

   121

		td.owner_type[0] = STR_01A7_OWNER; // At least one owner is displayed, though it might be "N/A".

   122

		td.owner_type[1] = STR_NULL;       // STR_NULL results in skipping the owner

   123

		td.owner_type[2] = STR_NULL;

   124

		td.owner_type[3] = STR_NULL;

   125

		td.owner[0] = OWNER_NONE;

   126

		td.owner[1] = OWNER_NONE;

   127

		td.owner[2] = OWNER_NONE;

   128

		td.owner[3] = OWNER_NONE;

   129

   130

		GetAcceptedCargo(tile, ac);

   131

		GetTileDesc(tile, &td);

   132

   133

		uint line_nr = 0;

   134

   135

		/* Tiletype */

   136

		SetDParam(0, td.dparam[0]);

   137

		GetString(this->landinfo_data[line_nr], td.str, lastof(this->landinfo_data[line_nr]));

   138

		line_nr++;

   139

   140

		/* Up to four owners */

   141

		for (uint i = 0; i < 4; i++) {

   142

			if (td.owner_type[i] == STR_NULL) continue;

   143

   144

			SetDParam(0, STR_01A6_N_A);

   145

			if (td.owner[i] != OWNER_NONE && td.owner[i] != OWNER_WATER) GetNameOfOwner(td.owner[i], tile);

   146

			GetString(this->landinfo_data[line_nr], td.owner_type[i], lastof(this->landinfo_data[line_nr]));

   147

			line_nr++;

   148

		}

   149

   150

		/* Cost to clear */

   151

		StringID str = STR_01A4_COST_TO_CLEAR_N_A;

   152

		if (CmdSucceeded(costclear)) {

   153

			SetDParam(0, costclear.GetCost());

   154

			str = STR_01A5_COST_TO_CLEAR;

   155

		}

   156

		GetString(this->landinfo_data[line_nr], str, lastof(this->landinfo_data[line_nr]));

   157

		line_nr++;

   158

   159

		/* Location */

   160

		snprintf(_userstring, lengthof(_userstring), "0x%.4X", tile);

   161

		SetDParam(0, TileX(tile));

   162

		SetDParam(1, TileY(tile));

   163

		SetDParam(2, TileHeight(tile));

   164

		SetDParam(3, STR_SPEC_USERSTRING);

   165

		GetString(this->landinfo_data[line_nr], STR_LANDINFO_COORDS, lastof(this->landinfo_data[line_nr]));

   166

		line_nr++;

   167

   168

		/* Local authority */

   169

		SetDParam(0, STR_01A9_NONE);

   170

		if (t != NULL && t->IsValid()) {

   171

			SetDParam(0, STR_TOWN);

   172

			SetDParam(1, t->index);

   173

		}

   174

		GetString(this->landinfo_data[line_nr], STR_01A8_LOCAL_AUTHORITY, lastof(this->landinfo_data[line_nr]));

   175

		line_nr++;

   176

   177

		/* Build date */

   178

		if (td.build_date != 0) {

   179

			SetDParam(0, td.build_date);

   180

			GetString(this->landinfo_data[line_nr], STR_BUILD_DATE, lastof(this->landinfo_data[line_nr]));

   181

			line_nr++;

   182

		}

   183

   184

		/* Remaining lines stay empty */

   185

		for (; line_nr < LAND_INFO_CENTERED_LINES; line_nr++) {

   186

			this->landinfo_data[line_nr][0] = '\0';

   187

		}

   188

   189

		/* Cargo acceptance is displayed in a extra multiline */

   190

		char *strp = GetString(this->landinfo_data[LAND_INFO_MULTICENTER_LINE], STR_01CE_CARGO_ACCEPTED, lastof(this->landinfo_data[LAND_INFO_MULTICENTER_LINE]));

   191

		bool found = false;

   192

   193

		for (CargoID i = 0; i < NUM_CARGO; ++i) {

   194

			if (ac[i] > 0) {

   195

				/* Add a comma between each item. */

   196

				if (found) {

   197

					*strp++ = ',';

   198

					*strp++ = ' ';

   199

				}

   200

				found = true;

   201

   202

				/* If the accepted value is less than 8, show it in 1/8:ths */

   203

				if (ac[i] < 8) {

   204

					SetDParam(0, ac[i]);

   205

					SetDParam(1, GetCargo(i)->name);

   206

					strp = GetString(strp, STR_01D1_8, lastof(this->landinfo_data[LAND_INFO_MULTICENTER_LINE]));

   207

				} else {

   208

					strp = GetString(strp, GetCargo(i)->name, lastof(this->landinfo_data[LAND_INFO_MULTICENTER_LINE]));

   209

				}

   210

			}

   211

		}

   212

		if (!found) this->landinfo_data[LAND_INFO_MULTICENTER_LINE][0] = '\0';

   213

   214

#if defined(_DEBUG)

   215

#	define LANDINFOD_LEVEL 0

   216

#else

   217

#	define LANDINFOD_LEVEL 1

   218

#endif

   219

		DEBUG(misc, LANDINFOD_LEVEL, "TILE: %#x (%i,%i)", tile, TileX(tile), TileY(tile));

   220

		DEBUG(misc, LANDINFOD_LEVEL, "type_height  = %#x", _m[tile].type_height);

   221

		DEBUG(misc, LANDINFOD_LEVEL, "m1           = %#x", _m[tile].m1);

   222

		DEBUG(misc, LANDINFOD_LEVEL, "m2           = %#x", _m[tile].m2);

   223

		DEBUG(misc, LANDINFOD_LEVEL, "m3           = %#x", _m[tile].m3);

   224

		DEBUG(misc, LANDINFOD_LEVEL, "m4           = %#x", _m[tile].m4);

   225

		DEBUG(misc, LANDINFOD_LEVEL, "m5           = %#x", _m[tile].m5);

   226

		DEBUG(misc, LANDINFOD_LEVEL, "m6           = %#x", _m[tile].m6);

   227

		DEBUG(misc, LANDINFOD_LEVEL, "m7           = %#x", _me[tile].m7);

   228

#undef LANDINFOD_LEVEL

   229

   230

		this->FindWindowPlacementAndResize(&_land_info_desc);

   231

	}

   232

};

   233

   234

static void Place_LandInfo(TileIndex tile)

   235

{

   236

	DeleteWindowById(WC_LAND_INFO, 0);

   237

	new LandInfoWindow(tile);

   238

}

   239

   240

void PlaceLandBlockInfo()

   241

{

   242

	if (_cursor.sprite == SPR_CURSOR_QUERY) {

   243

		ResetObjectToPlace();

   244

	} else {

   245

		_place_proc = Place_LandInfo;

   246

		SetObjectToPlace(SPR_CURSOR_QUERY, PAL_NONE, VHM_RECT, WC_MAIN_TOOLBAR, 0);

   247

	}

   248

}

   249

   250

static const Widget _about_widgets[] = {

   251

{   WWT_CLOSEBOX,   RESIZE_NONE,    14,     0,    10,     0,    13, STR_00C5,         STR_018B_CLOSE_WINDOW},

   252

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   419,     0,    13, STR_015B_OPENTTD, STR_NULL},

   253

{      WWT_PANEL,   RESIZE_NONE,    14,     0,   419,    14,   271, 0x0,              STR_NULL},

   254

{      WWT_FRAME,   RESIZE_NONE,    14,     5,   414,    40,   245, STR_NULL,         STR_NULL},

   255

{    WIDGETS_END},

   256

};

   257

   258

static const WindowDesc _about_desc = {

   259

	WDP_CENTER, WDP_CENTER, 420, 272, 420, 272,

   260

	WC_GAME_OPTIONS, WC_NONE,

   261

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   262

	_about_widgets,

   263

};

   264

   265

struct AboutWindow : public Window {

   266

	int scroll_height;

   267

	uint16 counter;

   268

   269

	AboutWindow() : Window(&_about_desc)

   270

	{

   271

		this->counter = 5;

   272

		this->scroll_height = this->height - 40;

   273

		this->FindWindowPlacementAndResize(&_about_desc);

   274

	}

   275

   276

	virtual void OnPaint()

   277

	{

   278

		static const char *credits[] = {

   279

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

   280

			 *                      maximum length of string which fits in window   -^*/

   281

			"Original design by Chris Sawyer",

   282

			"Original graphics by Simon Foster",

   283

			"",

   284

			"The OpenTTD team (in alphabetical order):",

   285

			"  Jean-Francois Claeys (Belugas) - GUI, newindustries and more",

   286

			"  Bjarni Corfitzen (Bjarni) - MacOSX port, coder and vehicles",

   287

			"  Matthijs Kooijman (blathijs) - Pathfinder-guru, pool rework",

   288

			"  Loïc Guilloux (glx) - General coding",

   289

			"  Christoph Elsenhans (frosch) - General coding",

   290

			"  Jaroslav Mazanec (KUDr) - YAPG (Yet Another Pathfinder God) ;)",

   291

			"  Jonathan Coome (Maedhros) - High priest of the newGRF Temple",

   292

			"  Attila Bán (MiHaMiX) - WebTranslator, Nightlies, Wiki and bugtracker host",

   293

			"  Owen Rudge (orudge) - Forum host, OS/2 port",

   294

			"  Peter Nelson (peter1138) - Spiritual descendant from newGRF gods",

   295

			"  Remko Bijker (Rubidium) - Lead coder and way more",

   296

			"  Benedikt Brüggemeier (skidd13) - Bug fixer and code reworker",

   297

			"  Zdenek Sojka (SmatZ) - Bug finder and fixer",

   298

			"",

   299

			"Inactive Developers:",

   300

			"  Victor Fischer (Celestar) - Programming everywhere you need him to",

   301

			"  Tamás Faragó (Darkvater) - Ex-Lead coder",

   302

			"  Christoph Mallon (Tron) - Programmer, code correctness police",

   303

			"",

   304

			"Retired Developers:",

   305

			"  Ludvig Strigeus (ludde) - OpenTTD author, main coder (0.1 - 0.3.3)",

   306

			"  Serge Paquet (vurlix) - Assistant project manager, coder (0.1 - 0.3.3)",

   307

			"  Dominik Scherer (dominik81) - Lead programmer, GUI expert (0.3.0 - 0.3.6)",

   308

			"  Patric Stout (TrueLight) - Programmer, webhoster (0.3 - pre0.6)",

   309

			"",

   310

			"Special thanks go out to:",

   311

			"  Josef Drexler - For his great work on TTDPatch",

   312

			"  Marcin Grzegorczyk - For his documentation of TTD internals",

   313

			"  Petr Baudis (pasky) - Many patches, newGRF support",

   314

			"  Stefan Meißner (sign_de) - For his work on the console",

   315

			"  Simon Sasburg (HackyKid) - Many bugfixes he has blessed us with",

   316

			"  Cian Duffy (MYOB) - BeOS port / manual writing",

   317

			"  Christian Rosentreter (tokai) - MorphOS / AmigaOS port",

   318

			"  Richard Kempton (richK) - additional airports, initial TGP implementation",

   319

			"",

   320

			"  Michael Blunck - Pre-Signals and Semaphores © 2003",

   321

			"  George - Canal/Lock graphics © 2003-2004",

   322

			"  David Dallaston - Tram tracks",

   323

			"  Marcin Grzegorczyk - Foundations for Tracks on Slopes",

   324

			"  All Translators - Who made OpenTTD a truly international game",

   325

			"  Bug Reporters - Without whom OpenTTD would still be full of bugs!",

   326

			"",

   327

			"",

   328

			"And last but not least:",

   329

			"  Chris Sawyer - For an amazing game!"

   330

		};

   331

   332

		this->DrawWidgets();

   333

   334

		/* Show original copyright and revision version */

   335

		DrawStringCentered(210, 17, STR_00B6_ORIGINAL_COPYRIGHT, TC_FROMSTRING);

   336

		DrawStringCentered(210, 17 + 10, STR_00B7_VERSION, TC_FROMSTRING);

   337

   338

		int y = this->scroll_height;

   339

   340

		/* Show all scrolling credits */

   341

		for (uint i = 0; i < lengthof(credits); i++) {

   342

			if (y >= 50 && y < (this->height - 40)) {

   343

				DoDrawString(credits[i], 10, y, TC_BLACK);

   344

			}

   345

			y += 10;

   346

		}

   347

   348

		/* If the last text has scrolled start a new from the start */

   349

		if (y < 50) this->scroll_height = this->height - 40;

   350

   351

		DoDrawStringCentered(210, this->height - 25, "Website: http://www.openttd.org", TC_BLACK);

   352

		DrawStringCentered(210, this->height - 15, STR_00BA_COPYRIGHT_OPENTTD, TC_FROMSTRING);

   353

	}

   354

   355

	virtual void OnTick()

   356

	{

   357

		if (--this->counter == 0) {

   358

			this->counter = 5;

   359

			this->scroll_height--;

   360

			this->SetDirty();

   361

		}

   362

	}

   363

};

   364

   365

void ShowAboutWindow()

   366

{

   367

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   368

	new AboutWindow();

   369

}

   370

   371

static const Widget _errmsg_widgets[] = {

   372

{   WWT_CLOSEBOX,   RESIZE_NONE,     4,     0,    10,     0,    13, STR_00C5,         STR_018B_CLOSE_WINDOW},

   373

{    WWT_CAPTION,   RESIZE_NONE,     4,    11,   239,     0,    13, STR_00B2_MESSAGE, STR_NULL},

   374

{      WWT_PANEL,   RESIZE_NONE,     4,     0,   239,    14,    45, 0x0,              STR_NULL},

   375

{    WIDGETS_END},

   376

};

   377

   378

static const Widget _errmsg_face_widgets[] = {

   379

{   WWT_CLOSEBOX,   RESIZE_NONE,     4,     0,    10,     0,    13, STR_00C5,              STR_018B_CLOSE_WINDOW},

   380

{    WWT_CAPTION,   RESIZE_NONE,     4,    11,   333,     0,    13, STR_00B3_MESSAGE_FROM, STR_NULL},

   381

{      WWT_PANEL,   RESIZE_NONE,     4,     0,   333,    14,   136, 0x0,                   STR_NULL},

   382

{   WIDGETS_END},

   383

};

   384

   385

struct ErrmsgWindow : public Window {

   386

private:

   387

	uint duration;

   388

	uint64 decode_params[20];

   389

	StringID message_1;

   390

	StringID message_2;

   391

	bool show_player_face;

   392

   393

public:

   394

	ErrmsgWindow(Point pt, int width, int height, StringID msg1, StringID msg2, const Widget *widget, bool show_player_face) :

   395

			Window(pt.x, pt.y, width, height, WC_ERRMSG, widget),

   396

			show_player_face(show_player_face)

   397

	{

   398

		this->duration = _settings_client.gui.errmsg_duration;

   399

		CopyOutDParam(this->decode_params, 0, lengthof(this->decode_params));

   400

		this->message_1 = msg1;

   401

		this->message_2 = msg2;

   402

		this->desc_flags = WDF_STD_BTN | WDF_DEF_WIDGET;

   403

		this->FindWindowPlacementAndResize(width, height);

   404

	}

   405

   406

	virtual void OnPaint()

   407

	{

   408

		static int y[][3] = {

   409

			{15, 25, 30}, // _errmsg_widgets

   410

			{45, 65, 90}, // _errmsg_face_widgets

   411

		};

   412

   413

		CopyInDParam(0, this->decode_params, lengthof(this->decode_params));

   414

		this->DrawWidgets();

   415

		CopyInDParam(0, this->decode_params, lengthof(this->decode_params));

   416

   417

		/* If the error message comes from a NewGRF, we must use the text ref. stack reserved for error messages.

   418

		 * If the message doesn't come from a NewGRF, it won't use the TTDP-style text ref. stack, so we won't hurt anything

   419

		 */

   420

		SwitchToErrorRefStack();

   421

		RewindTextRefStack();

   422

   423

		if (this->show_player_face) {

   424

			const Player *p = GetPlayer((PlayerID)GetDParamX(this->decode_params, 2));

   425

			DrawPlayerFace(p->face, p->player_color, 2, 16);

   426

		}

   427

   428

		byte j = (this->message_1 == INVALID_STRING_ID) ? 1 : 0;

   429

		DrawStringMultiCenter(this->width - 120, y[this->show_player_face][j], this->message_2, this->width - 2);

   430

		if (j == 0) {

   431

			DrawStringMultiCenter(this->width - 120, y[this->show_player_face][2], this->message_1, this->width - 2);

   432

		}

   433

   434

		/* Switch back to the normal text ref. stack for NewGRF texts */

   435

		SwitchToNormalRefStack();

   436

	}

   437

   438

	virtual void OnMouseLoop()

   439

	{

   440

		if (_right_button_down) delete this;

   441

	}

   442

   443

	virtual void OnHundredthTick()

   444

	{

   445

		if (--this->duration == 0) delete this;

   446

	}

   447

   448

	~ErrmsgWindow()

   449

	{

   450

		SetRedErrorSquare(0);

   451

		extern StringID _switch_mode_errorstr;

   452

		_switch_mode_errorstr = INVALID_STRING_ID;

   453

	}

   454

   455

	virtual EventState OnKeyPress(uint16 key, uint16 keycode)

   456

	{

   457

		if (keycode != WKC_SPACE) return ES_NOT_HANDLED;

   458

		delete this;

   459

		return ES_HANDLED;

   460

	}

   461

};

   462

   463

void ShowErrorMessage(StringID msg_1, StringID msg_2, int x, int y)

   464

{

   465

	DeleteWindowById(WC_ERRMSG, 0);

   466

   467

	if (!_settings_client.gui.errmsg_duration) return;

   468

   469

	if (msg_2 == STR_NULL) msg_2 = STR_EMPTY;

   470

   471

	Point pt;

   472

	const ViewPort *vp;

   473

   474

	if (msg_1 != STR_013B_OWNED_BY || GetDParam(2) >= 8) {

   475

		if ((x | y) != 0) {

   476

			pt = RemapCoords2(x, y);

   477

			vp = FindWindowById(WC_MAIN_WINDOW, 0)->viewport;

   478

   479

			/* move x pos to opposite corner */

   480

			pt.x = UnScaleByZoom(pt.x - vp->virtual_left, vp->zoom) + vp->left;

   481

			pt.x = (pt.x < (_screen.width >> 1)) ? _screen.width - 260 : 20;

   482

   483

			/* move y pos to opposite corner */

   484

			pt.y = UnScaleByZoom(pt.y - vp->virtual_top, vp->zoom) + vp->top;

   485

			pt.y = (pt.y < (_screen.height >> 1)) ? _screen.height - 80 : 100;

   486

   487

		} else {

   488

			pt.x = (_screen.width - 240) >> 1;