1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "debug.h"

     6

#include "functions.h"

     7

#include "strings.h"

     8

#include "table/sprites.h"

     9

#include "table/strings.h"

    10

#include "town.h"

    11

#include "window.h"

    12

#include "gfx.h"

    13

#include "viewport.h"

    14

#include "gui.h"

    15

#include "command.h"

    16

#include "player.h"

    17

#include "network/network.h"

    18

#include "variables.h"

    19

#include "helpers.hpp"

    20

    21

static const Widget _town_authority_widgets[] = {

    22

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

    23

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   316,     0,    13, STR_2022_LOCAL_AUTHORITY, STR_018C_WINDOW_TITLE_DRAG_THIS},

    24

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   316,    14,   105, 0x0,                      STR_NULL},

    25

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   304,   106,   157, 0x0,                      STR_2043_LIST_OF_THINGS_TO_DO_AT},

    26

{  WWT_SCROLLBAR,   RESIZE_NONE,    13,   305,   316,   106,   157, 0x0,                      STR_0190_SCROLL_BAR_SCROLLS_LIST},

    27

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   316,   158,   209, 0x0,                      STR_NULL},

    28

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,   316,   210,   221, STR_2042_DO_IT,           STR_2044_CARRY_OUT_THE_HIGHLIGHTED},

    29

{   WIDGETS_END},

    30

};

    31

    32

extern const byte _town_action_costs[8];

    33

    34

/** Get a list of available actions to do at a town.

    35

 * @param *nump if not NULL add put the number of available actions in it

    36

 * @param pid the player that is querying the town

    37

 * @param *t the town that is queried

    38

 * @return bitmasked value of enabled actions

    39

 */

    40

uint GetMaskOfTownActions(int *nump, PlayerID pid, const Town *t)

    41

{

    42

	int32 avail, ref;

    43

	int num = 0;

    44

	uint avail_buttons = 0x7F; // by default all buttons except bribe are enabled.

    45

	uint buttons = 0;

    46

    47

	if (pid != PLAYER_SPECTATOR) {

    48

		uint i;

    49

    50

		// bribe option enabled?

    51

		if (_patches.bribe) {

    52

			// if unwanted, disable everything.

    53

			if (t->unwanted[pid]) {

    54

				avail_buttons = 0;

    55

			} else if (t->ratings[pid] < RATING_BRIBE_MAXIMUM) {

    56

				SETBIT(avail_buttons, 7); // Allow bribing

    57

			}

    58

		}

    59

    60

		// Things worth more than this are not shown

    61

		avail = GetPlayer(pid)->player_money + _price.station_value * 200;

    62

		ref = _price.build_industry >> 8;

    63

    64

		for (i = 0; i != lengthof(_town_action_costs); i++, avail_buttons >>= 1) {

    65

			if (HASBIT(avail_buttons, 0) && avail >= _town_action_costs[i] * ref) {

    66

				SETBIT(buttons, i);

    67

				num++;

    68

			}

    69

		}

    70

    71

		/* Disable build statue if already built */

    72

		if (HASBIT(t->statues, pid)) {

    73

			CLRBIT(buttons, 4);

    74

			num--;

    75

		}

    76

    77

	}

    78

    79

	if (nump != NULL) *nump = num;

    80

	return buttons;

    81

}

    82

    83

static int GetNthSetBit(uint32 bits, int n)

    84

{

    85

	int i = 0;

    86

    87

	if (n >= 0) {

    88

		do {

    89

			if (bits & 1 && --n < 0) return i;

    90

			i++;

    91

		} while (bits >>= 1);

    92

	}

    93

	return -1;

    94

}

    95

    96

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

    97

{

    98

	switch (e->event) {

    99

	case WE_PAINT: {

   100

		const Town *t = GetTown(w->window_number);

   101

		int numact;

   102

		uint buttons = GetMaskOfTownActions(&numact, _local_player, t);

   103

   104

		SetVScrollCount(w, numact + 1);

   105

   106

		if (WP(w,def_d).data_1 != -1 && !HASBIT(buttons, WP(w,def_d).data_1))

   107

			WP(w,def_d).data_1 = -1;

   108

   109

		SetWindowWidgetDisabledState(w, 6, WP(w, def_d).data_1 == -1);

   110

   111

		{

   112

			int y;

   113

			const Player *p;

   114

			int r;

   115

			StringID str;

   116

   117

			SetDParam(0, w->window_number);

   118

			DrawWindowWidgets(w);

   119

   120

			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);

   121

   122

			// Draw list of players

   123

			y = 25;

   124

			FOR_ALL_PLAYERS(p) {

   125

				if (p->is_active && (HASBIT(t->have_ratings, p->index) || t->exclusivity == p->index)) {

   126

					DrawPlayerIcon(p->index, 2, y);

   127

   128

					SetDParam(0, p->name_1);

   129

					SetDParam(1, p->name_2);

   130

					SetDParam(2, GetPlayerNameString(p->index, 3));

   131

   132

					r = t->ratings[p->index];

   133

					(str = STR_3035_APPALLING, r <= RATING_APPALLING) || // Apalling

   134

					(str++,                    r <= RATING_VERYPOOR)  || // Very Poor

   135

					(str++,                    r <= RATING_POOR)      || // Poor

   136

					(str++,                    r <= RATING_MEDIOCRE)  || // Mediocore

   137

					(str++,                    r <= RATING_GOOD)      || // Good

   138

					(str++,                    r <= RATING_VERYGOOD)  || // Very Good

   139

					(str++,                    r <= RATING_EXCELLENT) || // Excellent

   140

					(str++,                    true);                    // Outstanding

   141

   142

					SetDParam(4, str);

   143

					if (t->exclusivity == p->index) { // red icon for player with exclusive rights

   144

						DrawSprite(SPR_BLOT, PALETTE_TO_RED, 18, y);

   145

					}

   146

   147

					DrawString(28, y, STR_2024, 0);

   148

					y += 10;

   149

				}

   150

			}

   151

		}

   152

   153

		// Draw actions list

   154

		{

   155

			int y = 107, i;

   156

			int pos = w->vscroll.pos;

   157

   158

			if (--pos < 0) {

   159

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   160

				y += 10;

   161

			}

   162

			for (i = 0; buttons; i++, buttons >>= 1) {

   163

				if (pos <= -5) break;

   164

   165

				if (buttons&1 && --pos < 0) {

   166

					DrawString(3, y, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i, 6);

   167

					y += 10;

   168

				}

   169

			}

   170

		}

   171

   172

		{

   173

			int i = WP(w,def_d).data_1;

   174

   175

			if (i != -1) {

   176

				SetDParam(1, (_price.build_industry >> 8) * _town_action_costs[i]);

   177

				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   178

				DrawStringMultiLine(2, 159, STR_204D_INITIATE_A_SMALL_LOCAL + i, 313);

   179

			}

   180

		}

   181

   182

	} break;

   183

   184

	case WE_CLICK:

   185

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

   186

		case 3: { /* listbox */

   187

			const Town *t = GetTown(w->window_number);

   188

			int y = (e->we.click.pt.y - 0x6B) / 10;

   189

   190

			if (!IS_INT_INSIDE(y, 0, 5)) return;

   191

   192

			y = GetNthSetBit(GetMaskOfTownActions(NULL, _local_player, t), y + w->vscroll.pos - 1);

   193

			if (y >= 0) {

   194

				WP(w,def_d).data_1 = y;

   195

				SetWindowDirty(w);

   196

			}

   197

			break;

   198

		}

   199

   200

		case 6: { /* carry out the action */

   201

			DoCommandP(GetTown(w->window_number)->xy, w->window_number, WP(w,def_d).data_1, NULL, CMD_DO_TOWN_ACTION | CMD_MSG(STR_00B4_CAN_T_DO_THIS));

   202

			break;

   203

		}

   204

		}

   205

		break;

   206

   207

	case WE_4:

   208

		SetWindowDirty(w);

   209

		break;

   210

	}

   211

}

   212

   213

static const WindowDesc _town_authority_desc = {

   214

	WDP_AUTO, WDP_AUTO, 317, 222,

   215

	WC_TOWN_AUTHORITY, WC_NONE,

   216

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   217

	_town_authority_widgets,

   218

	TownAuthorityWndProc

   219

};

   220

   221

static void ShowTownAuthorityWindow(uint town)

   222

{

   223

	Window *w = AllocateWindowDescFront(&_town_authority_desc, town);

   224

   225

	if (w != NULL) {

   226

		w->vscroll.cap = 5;

   227

		WP(w,def_d).data_1 = -1;

   228

	}

   229

}

   230

   231

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

   232

{

   233

	Town *t = GetTown(w->window_number);

   234

   235

	switch (e->event) {

   236

	case WE_PAINT:

   237

		// disable renaming town in network games if you are not the server

   238

		SetWindowWidgetDisabledState(w, 8, _networking && !_network_server);

   239

   240

		SetDParam(0, t->index);

   241

		DrawWindowWidgets(w);

   242

   243

		SetDParam(0, t->population);

   244

		SetDParam(1, t->num_houses);

   245

		DrawString(2, 107, STR_2006_POPULATION, 0);

   246

   247

		SetDParam(0, t->act_pass);

   248

		SetDParam(1, t->max_pass);

   249

		DrawString(2, 117, STR_200D_PASSENGERS_LAST_MONTH_MAX, 0);

   250

   251

		SetDParam(0, t->act_mail);

   252

		SetDParam(1, t->max_mail);

   253

		DrawString(2, 127, STR_200E_MAIL_LAST_MONTH_MAX, 0);

   254

   255

		{

   256

			int activity = t->GetActivity() * 100;

   257

   258

			SetDParam(0, STR_TOWN_ECONOMY_POOR + t->GetWealthLevel());

   259

			SetDParam(1, activity);

   260

			DrawString(2, 137, STR_TOWN_ECONOMY_STATUS, 0);

   261

		}

   262

   263

		DrawWindowViewport(w);

   264

		break;

   265

   266

	case WE_CLICK:

   267

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

   268

			case 6: /* scroll to location */

   269

				ScrollMainWindowToTile(t->xy);

   270

				break;

   271

   272

			case 7: /* town authority */

   273

				ShowTownAuthorityWindow(w->window_number);

   274

				break;

   275

   276

			case 8: /* rename */

   277

				SetDParam(0, w->window_number);

   278

				ShowQueryString(STR_TOWN, STR_2007_RENAME_TOWN, 31, 130, w, CS_ALPHANUMERAL);

   279

				break;

   280

   281

			case 9: /* expand town */

   282

				ExpandTown(t);

   283

				break;

   284

   285

			case 10: /* delete town */

   286

				DeleteTown(t);

   287

				break;

   288

		}

   289

		break;

   290

   291

	case WE_ON_EDIT_TEXT:

   292

		if (e->we.edittext.str[0] != '\0') {

   293

			_cmd_text = e->we.edittext.str;

   294

			DoCommandP(0, w->window_number, 0, NULL,

   295

				CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));

   296

		}

   297

		break;

   298

	}

   299

}

   300

   301

   302

static const Widget _town_view_widgets[] = {

   303

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

   304

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   247,     0,    13, STR_2005,                 STR_018C_WINDOW_TITLE_DRAG_THIS},

   305

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,                      STR_STICKY_BUTTON},

   306

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,                      STR_NULL},

   307

{      WWT_INSET,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,                      STR_NULL},

   308

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,   106,   147, 0x0,                      STR_NULL},

   309

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   148,   159, STR_00E4_LOCATION,        STR_200B_CENTER_THE_MAIN_VIEW_ON},

   310

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   148,   159, STR_2020_LOCAL_AUTHORITY, STR_2021_SHOW_INFORMATION_ON_LOCAL},

   311

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   148,   159, STR_0130_RENAME,          STR_200C_CHANGE_TOWN_NAME},

   312

{   WIDGETS_END},

   313

};

   314

   315

static const WindowDesc _town_view_desc = {

   316

	WDP_AUTO, WDP_AUTO, 260, 160,

   317

	WC_TOWN_VIEW, WC_NONE,

   318

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   319

	_town_view_widgets,

   320

	TownViewWndProc

   321

};

   322

   323

static const Widget _town_view_scen_widgets[] = {

   324

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

   325

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   172,     0,    13, STR_2005,          STR_018C_WINDOW_TITLE_DRAG_THIS},

   326

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,               STR_STICKY_BUTTON},

   327

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,               STR_NULL},

   328

{      WWT_INSET,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,               STR_NULL},

   329

{      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,   106,   147, 0x0,               STR_NULL},

   330

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   148,   159, STR_00E4_LOCATION, STR_200B_CENTER_THE_MAIN_VIEW_ON},

   331

{      WWT_EMPTY,   RESIZE_NONE,     0,     0,     0,     0,     0, 0x0,               STR_NULL},

   332

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   173,   247,     0,    13, STR_0130_RENAME,   STR_200C_CHANGE_TOWN_NAME},

   333

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   148,   159, STR_023C_EXPAND,   STR_023B_INCREASE_SIZE_OF_TOWN},

   334

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   148,   159, STR_0290_DELETE,   STR_0291_DELETE_THIS_TOWN_COMPLETELY},

   335

{   WIDGETS_END},

   336

};

   337

   338

static const WindowDesc _town_view_scen_desc = {

   339

	WDP_AUTO, WDP_AUTO, 260, 160,

   340

	WC_TOWN_VIEW, WC_NONE,

   341

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   342

	_town_view_scen_widgets,

   343

	TownViewWndProc

   344

};

   345

   346

void ShowTownViewWindow(TownID town)

   347

{

   348

	Window *w;

   349

   350

	if (_game_mode != GM_EDITOR) {

   351

		w = AllocateWindowDescFront(&_town_view_desc, town);

   352

	} else {

   353

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   354

	}

   355

   356

	if (w != NULL) {

   357

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   358

		AssignWindowViewport(w, 3, 17, 0xFE, 0x56, GetTown(town)->xy, 1);

   359

	}

   360

}

   361

   362

static const Widget _town_directory_widgets[] = {

   363

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

   364

{    WWT_CAPTION,   RESIZE_NONE,    13,    11,   300,     0,    13, STR_2000_TOWNS,         STR_018C_WINDOW_TITLE_DRAG_THIS},

   365

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   301,   312,     0,    13, 0x0,                    STR_STICKY_BUTTON},

   366

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    74,    14,    25, STR_SORT_BY_NAME,       STR_SORT_ORDER_TIP},

   367

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    75,   149,    14,    25, STR_SORT_BY_POPULATION, STR_SORT_ORDER_TIP},

   368

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   150,   224,    14,    25, STR_SORT_BY_GDP_CAPITA, STR_SORT_ORDER_TIP},

   369

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   225,   300,    14,    25, STR_SORT_BY_GDP_TOTAL,  STR_SORT_ORDER_TIP},

   370

{      WWT_PANEL, RESIZE_BOTTOM,    13,     0,   300,    26,   189, 0x0,                    STR_200A_TOWN_NAMES_CLICK_ON_NAME},

   371

{  WWT_SCROLLBAR, RESIZE_BOTTOM,    13,   301,   312,    14,   189, 0x0,                    STR_0190_SCROLL_BAR_SCROLLS_LIST},

   372

{      WWT_PANEL,     RESIZE_TB,    13,     0,   312,   190,   201, 0x0,                    STR_NULL},

   373

{  WWT_RESIZEBOX,     RESIZE_TB,    13,   301,   312,   190,   201, 0x0,                    STR_RESIZE_BUTTON},

   374

{   WIDGETS_END},

   375

};

   376

   377

   378

// used to get a sorted list of the towns

   379

static uint _num_town_sort;

   380

   381

static char _bufcache[64];

   382

static const Town* _last_town;

   383

   384

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

   385

{

   386

	const Town* ta = *(const Town**)a;

   387

	const Town* tb = *(const Town**)b;

   388

	char buf1[64];

   389

	int r;

   390

   391

	SetDParam(0, ta->index);

   392

	GetString(buf1, STR_TOWN, lastof(buf1));

   393

   394

	/* If 'b' is the same town as in the last round, use the cached value

   395

	 *  We do this to speed stuff up ('b' is called with the same value a lot of

   396

	 *  times after eachother) */

   397

	if (tb != _last_town) {

   398

		_last_town = tb;

   399

		SetDParam(0, tb->index);

   400

		GetString(_bufcache, STR_TOWN, lastof(_bufcache));

   401

	}

   402

   403

	r = strcmp(buf1, _bufcache);

   404

	if (_town_sort_order & 1) r = -r;

   405

	return r;

   406

}

   407

   408

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

   409

{

   410

	const Town* ta = *(const Town**)a;

   411

	const Town* tb = *(const Town**)b;

   412

	int r = ta->population - tb->population;

   413

	if (_town_sort_order & 1) r = -r;

   414

	return r;

   415

}

   416

   417

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

   418

{

   419

	const Town* ta = *(const Town**)a;

   420

	const Town* tb = *(const Town**)b;

   421

	int r = (ta->GetActivity() * 100) - (tb->GetActivity() * 100);

   422

	if (_town_sort_order & 1) r = -r;

   423

	return r;

   424

}

   425

   426

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

   427

{

   428

	const Town* ta = *(const Town**)a;

   429

	const Town* tb = *(const Town**)b;

   430

	int r = (ta->GetActivity() * 100 * ta->population) - (tb->GetActivity() * 100 * tb->population);

   431

	if (_town_sort_order & 1) r = -r;

   432

	return r;

   433

}

   434

   436

{

   437

	const Town* t;

   438

	int (*townsortproc[])(const void *a, const void *b) = {

   439

		TownNameSorter, TownPopSorter, TownGDPSorter, TownOutputSorter

   440

	};

   441

	uint n = 0;

   442

   443

	/* Create array for sorting */

   444

	_town_sort = ReallocT(_town_sort, GetMaxTownIndex() + 1);

   445

	if (_town_sort == NULL) error("Could not allocate memory for the town-sorting-list");

   446

   447

	FOR_ALL_TOWNS(t) _town_sort[n++] = t;

   448

   449

	_num_town_sort = n;

   450

   451

	_last_town = NULL; // used for "cache"

   452

	qsort((void*)_town_sort, n, sizeof(_town_sort[0]), townsortproc[_town_sort_order / 2]);

   453

   454

	DEBUG(misc, 3, "Resorting towns list");

   455

}

   456

   457

   458

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

   459

{

   460

	switch (e->event) {

   461

	case WE_PAINT: {

   462

		if (_town_sort_dirty) {

   463

			_town_sort_dirty = false;

   464

			MakeSortedTownList();

   465

		}

   466

   467

		SetVScrollCount(w, _num_town_sort);

   468

   469

		DrawWindowWidgets(w);

   470

		DoDrawString(_town_sort_order & 1 ? DOWNARROW : UPARROW, 66 + (_town_sort_order / 2) * 75, 15, 0x10);

   471

   472

		{

   473

			int n = 0;

   474

			uint16 i = w->vscroll.pos;

   475

			int y = 28;

   476

   477

			while (i < _num_town_sort) {

   478

				const Town* t = _town_sort[i];

   479

   480

				assert(t->xy);

   481

   482

				SetDParam(0, t->index);

   483

				SetDParam(1, t->population);

   484

				SetDParam(2, t->GetActivity() * 100);

   485

				DrawString(2, y, STR_2057, 0);

   486

   487

				y += 10;

   488

				i++;

   489

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

   490

			}

   491

			SetDParam(0, GetWorldPopulation());

   492

			DrawString(3, w->height - 12 + 2, STR_TOWN_POPULATION, 0);

   493

		}

   494

	} break;

   495

   496

	case WE_CLICK: