1

/* $Id$ */

     2

     3

/** @file town_gui.cpp */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "debug.h"

     8

#include "functions.h"

     9

#include "strings.h"

    10

#include "table/sprites.h"

    11

#include "table/strings.h"

    12

#include "town.h"

    13

#include "window.h"

    14

#include "gfx.h"

    15

#include "viewport.h"

    16

#include "gui.h"

    17

#include "command.h"

    18

#include "player.h"

    19

#include "network/network.h"

    20

#include "variables.h"

    21

#include "helpers.hpp"

    22

    23

static const Widget _town_authority_widgets[] = {

    24

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

    25

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

    26

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

    27

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

    28

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

    29

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

    30

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

    31

{   WIDGETS_END},

    32

};

    33

    34

extern const byte _town_action_costs[8];

    35

    36

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

    37

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

    38

 * @param pid the player that is querying the town

    39

 * @param t the town that is queried

    40

 * @return bitmasked value of enabled actions

    41

 */

    42

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

    43

{

    44

	Money avail, ref;

    45

	int num = 0;

    46

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

    47

	uint buttons = 0;

    48

    49

	if (pid != PLAYER_SPECTATOR) {

    50

		uint i;

    51

    52

		/* bribe option enabled? */

    53

		if (_patches.bribe) {

    54

			/* if unwanted, disable everything. */

    55

			if (t->unwanted[pid]) {

    56

				avail_buttons = 0;

    57

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

    58

				SETBIT(avail_buttons, 7); // Allow bribing

    59

			}

    60

		}

    61

    62

		/* Things worth more than this are not shown */

    63

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

    64

		ref = _price.build_industry >> 8;

    65

    66

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

    67

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

    68

				SETBIT(buttons, i);

    69

				num++;

    70

			}

    71

		}

    72

    73

		/* Disable build statue if already built */

    74

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

    75

			CLRBIT(buttons, 4);

    76

			num--;

    77

		}

    78

    79

	}

    80

    81

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

    82

	return buttons;

    83

}

    84

    85

static int GetNthSetBit(uint32 bits, int n)

    86

{

    87

	int i = 0;

    88

    89

	if (n >= 0) {

    90

		do {

    91

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

    92

			i++;

    93

		} while (bits >>= 1);

    94

	}

    95

	return -1;

    96

}

    97

    98

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

    99

{

   100

	switch (e->event) {

   101

	case WE_PAINT: {

   102

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

   103

		int numact;

   104

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

   105

   106

		SetVScrollCount(w, numact + 1);

   107

   108

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

   109

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

   110

   111

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

   112

   113

		{

   114

			int y;

   115

			const Player *p;

   116

			int r;

   117

			StringID str;

   118

   119

			SetDParam(0, w->window_number);

   120

			DrawWindowWidgets(w);

   121

   122

			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);

   123

   124

			/* Draw list of players */

   125

			y = 25;

   126

			FOR_ALL_PLAYERS(p) {

   127

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

   128

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

   129

   130

					SetDParam(0, p->index);

   131

					SetDParam(1, p->index);

   132

   133

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

   134

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

   135

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

   136

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

   137

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

   138

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

   139

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

   140

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

   141

					(str++,                    true);                    // Outstanding

   142

   143

					SetDParam(2, str);

   144

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

   145

						DrawSprite(SPR_BLOT, PALETTE_TO_RED, 18, y);

   146

					}

   147

   148

					DrawString(28, y, STR_2024, 0);

   149

					y += 10;

   150

				}

   151

			}

   152

		}

   153

   154

		/* Draw actions list */

   155

		{

   156

			int y = 107, i;

   157

			int pos = w->vscroll.pos;

   158

   159

			if (--pos < 0) {

   160

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   161

				y += 10;

   162

			}

   163

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

   164

				if (pos <= -5) break;

   165

   166

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

   167

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

   168

					y += 10;

   169

				}

   170

			}

   171

		}

   172

   173

		{

   174

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

   175

   176

			if (i != -1) {

   177

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

   178

				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   179

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

   180

			}

   181

		}

   182

   183

	} break;

   184

   185

	case WE_DOUBLE_CLICK:

   186

	case WE_CLICK:

   187

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

   188

		case 3: { /* listbox */

   189

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

   190

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

   191

   192

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

   193

   194

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

   195

			if (y >= 0) {

   196

				WP(w,def_d).data_1 = y;

   197

				SetWindowDirty(w);

   198

			}

   199

			/* Fall through to clicking in case we are double-clicked */

   200

			if (e->event != WE_DOUBLE_CLICK || y < 0) break;

   201

		}

   202

   203

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

   204

			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));

   205

			break;

   206

		}

   207

		}

   208

		break;

   209

   210

	case WE_4:

   211

		SetWindowDirty(w);

   212

		break;

   213

	}

   214

}

   215

   216

static const WindowDesc _town_authority_desc = {

   217

	WDP_AUTO, WDP_AUTO, 317, 222, 317, 222,

   218

	WC_TOWN_AUTHORITY, WC_NONE,

   219

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   220

	_town_authority_widgets,

   221

	TownAuthorityWndProc

   222

};

   223

   224

static void ShowTownAuthorityWindow(uint town)

   225

{

   226

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

   227

   228

	if (w != NULL) {

   229

		w->vscroll.cap = 5;

   230

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

   231

	}

   232

}

   233

   234

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

   235

{

   236

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

   237

   238

	switch (e->event) {

   239

	case WE_PAINT:

   240

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

   241

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

   242

   243

		SetDParam(0, t->index);

   244

		DrawWindowWidgets(w);

   245

   246

		SetDParam(0, t->population);

   247

		SetDParam(1, t->num_houses);

   248

		DrawString(2, 107, STR_2006_POPULATION, 0);

   249

   250

		SetDParam(0, t->act_pass);

   251

		SetDParam(1, t->max_pass);

   252

		DrawString(2, 117, STR_200D_PASSENGERS_LAST_MONTH_MAX, 0);

   253

   254

		SetDParam(0, t->act_mail);

   255

		SetDParam(1, t->max_mail);

   256

		DrawString(2, 127, STR_200E_MAIL_LAST_MONTH_MAX, 0);

   257

   258

		DrawWindowViewport(w);

   259

		break;

   260

   261

	case WE_CLICK:

   262

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

   263

			case 6: /* scroll to location */

   264

				ScrollMainWindowToTile(t->xy);

   265

				break;

   266

   267

			case 7: /* town authority */

   268

				ShowTownAuthorityWindow(w->window_number);

   269

				break;

   270

   271

			case 8: /* rename */

   272

				SetDParam(0, w->window_number);

   273

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

   274

				break;

   275

   276

			case 9: /* expand town */

   277

				ExpandTown(t);

   278

				break;

   279

   280

			case 10: /* delete town */

   282

				break;

   283

		}

   284

		break;

   285

   286

	case WE_ON_EDIT_TEXT:

   287

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

   288

			_cmd_text = e->we.edittext.str;

   289

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

   290

				CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));

   291

		}

   292

		break;

   293

	}

   294

}

   295

   296

   297

static const Widget _town_view_widgets[] = {

   298

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

   299

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

   300

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

   301

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

   302

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

   303

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

   304

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION,        STR_200B_CENTER_THE_MAIN_VIEW_ON},

   305

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_2020_LOCAL_AUTHORITY, STR_2021_SHOW_INFORMATION_ON_LOCAL},

   306

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0130_RENAME,          STR_200C_CHANGE_TOWN_NAME},

   307

{   WIDGETS_END},

   308

};

   309

   310

static const WindowDesc _town_view_desc = {

   311

	WDP_AUTO, WDP_AUTO, 260, 150, 260, 150,

   312

	WC_TOWN_VIEW, WC_NONE,

   313

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   314

	_town_view_widgets,

   315

	TownViewWndProc

   316

};

   317

   318

static const Widget _town_view_scen_widgets[] = {

   319

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

   320

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

   321

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

   322

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

   323

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

   324

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

   325

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION, STR_200B_CENTER_THE_MAIN_VIEW_ON},

   326

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

   327

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

   328

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_023C_EXPAND,   STR_023B_INCREASE_SIZE_OF_TOWN},

   329

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0290_DELETE,   STR_0291_DELETE_THIS_TOWN_COMPLETELY},

   330

{   WIDGETS_END},

   331

};

   332

   333

static const WindowDesc _town_view_scen_desc = {

   334

	WDP_AUTO, WDP_AUTO, 260, 150, 260, 150,

   335

	WC_TOWN_VIEW, WC_NONE,

   336

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   337

	_town_view_scen_widgets,

   338

	TownViewWndProc

   339

};

   340

   341

void ShowTownViewWindow(TownID town)

   342

{

   343

	Window *w;

   344

   345

	if (_game_mode != GM_EDITOR) {

   346

		w = AllocateWindowDescFront(&_town_view_desc, town);

   347

	} else {

   348

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   349

	}

   350

   351

	if (w != NULL) {

   352

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   353

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

   354

	}

   355

}

   356

   357

static const Widget _town_directory_widgets[] = {

   358

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

   359

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

   360

{  WWT_STICKYBOX,   RESIZE_NONE,    13,   196,   207,     0,    13, 0x0,                    STR_STICKY_BUTTON},

   361

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

   362

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    99,   195,    14,    25, STR_SORT_BY_POPULATION, STR_SORT_ORDER_TIP},

   363

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

   364

{  WWT_SCROLLBAR, RESIZE_BOTTOM,    13,   196,   207,    14,   189, 0x0,                    STR_0190_SCROLL_BAR_SCROLLS_LIST},

   365

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

   366

{  WWT_RESIZEBOX,     RESIZE_TB,    13,   196,   207,   190,   201, 0x0,                    STR_RESIZE_BUTTON},

   367

{   WIDGETS_END},

   368

};

   369

   370

   371

/* used to get a sorted list of the towns */

   372

static uint _num_town_sort;

   373

   374

static char _bufcache[64];

   375

static const Town* _last_town;

   376

   377

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

   378

{

   379

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

   380

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

   381

	char buf1[64];

   382

	int r;

   383

   384

	SetDParam(0, ta->index);

   385

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

   386

   387

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

   388

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

   389

	 *  times after eachother) */

   390

	if (tb != _last_town) {

   391

		_last_town = tb;

   392

		SetDParam(0, tb->index);

   393

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

   394

	}

   395

   396

	r = strcmp(buf1, _bufcache);

   397

	if (_town_sort_order & 1) r = -r;

   398

	return r;

   399

}

   400

   401

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

   402

{

   403

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

   404

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

   405

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

   406

	if (_town_sort_order & 1) r = -r;

   407

	return r;

   408

}

   409

   410

static void MakeSortedTownList()

   411

{

   412

	const Town* t;

   413

	uint n = 0;

   414

   415

	/* Create array for sorting */

   416

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

   417

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

   418

   419

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

   420

   421

	_num_town_sort = n;

   422

   423

	_last_town = NULL; // used for "cache"

   424

	qsort((void*)_town_sort, n, sizeof(_town_sort[0]), _town_sort_order & 2 ? TownPopSorter : TownNameSorter);

   425

   426

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

   427

}

   428

   429

   430

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

   431

{

   432

	switch (e->event) {

   433

	case WE_PAINT: {

   434

		if (_town_sort_dirty) {

   435

			_town_sort_dirty = false;

   436

			MakeSortedTownList();

   437

		}

   438

   439

		SetVScrollCount(w, _num_town_sort);

   440

   441

		DrawWindowWidgets(w);

   442

		DoDrawString(_town_sort_order & 1 ? DOWNARROW : UPARROW, (_town_sort_order <= 1) ? 88 : 187, 15, 0x10);

   443

   444

		{

   445

			int n = 0;

   446

			uint16 i = w->vscroll.pos;

   447

			int y = 28;

   448

   449

			while (i < _num_town_sort) {

   450

				const Town* t = _town_sort[i];

   451

   452

				assert(t->xy);

   453

   454

				SetDParam(0, t->index);

   455

				SetDParam(1, t->population);

   456

				DrawString(2, y, STR_2057, 0);

   457

   458

				y += 10;

   459

				i++;

   460

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

   461

			}

   462

			SetDParam(0, GetWorldPopulation());

   463

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

   464

		}

   465

	} break;

   466

   467

	case WE_CLICK:

   468

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

   469

		case 3: { /* Sort by Name ascending/descending */

   470

			_town_sort_order = (_town_sort_order == 0) ? 1 : 0;

   471

			_town_sort_dirty = true;

   472

			SetWindowDirty(w);

   473

		} break;

   474

   475

		case 4: { /* Sort by Population ascending/descending */

   476

			_town_sort_order = (_town_sort_order == 2) ? 3 : 2;

   477

			_town_sort_dirty = true;

   478

			SetWindowDirty(w);

   479

		} break;

   480

   481

		case 5: { /* Click on Town Matrix */

   482

			const Town* t;

   483

   484

			uint16 id_v = (e->we.click.pt.y - 28) / 10;

   485

   486

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

   487

   488

			id_v += w->vscroll.pos;

   489

   490

			if (id_v >= _num_town_sort) return; // click out of town bounds

   491

   492

			t = _town_sort[id_v];

   493

			assert(t->xy);

   494

			ScrollMainWindowToTile(t->xy);