1

#include "stdafx.h"

     2

#include "openttd.h"

     3

#include "debug.h"

     4

#include "strings.h"

     5

#include "table/sprites.h"

     6

#include "table/strings.h"

     7

#include "town.h"

     8

#include "window.h"

     9

#include "gfx.h"

    10

#include "viewport.h"

    11

#include "gui.h"

    12

#include "command.h"

    13

#include "player.h"

    14

#include "network.h"

    15

    16

static const Widget _town_authority_widgets[] = {

    17

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

    18

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

    19

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

    20

{     WWT_IMGBTN,   RESIZE_NONE,    13,     0,   306,   106,   157, 0x0,							STR_2043_LIST_OF_THINGS_TO_DO_AT},

    21

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

    22

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

    23

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

    24

{   WIDGETS_END},

    25

};

    26

    27

extern const byte _town_action_costs[8];

    28

extern void DrawPlayerIcon(int p, int x, int y);

    29

    30

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

    31

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

    32

 * @param pid the player that is querying the town

    33

 * @param *t the town that is queried

    34

 * @return bitmasked value of enabled actions

    35

 */

    36

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

    37

{

    38

	int32 avail, ref;

    39

	int num = 0;

    40

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

    41

	uint buttons = 0;

    42

    43

	if (pid != OWNER_SPECTATOR) {

    44

		int i;

    45

		// bribe option enabled?

    46

		if (_patches.bribe) {

    47

			// if unwanted, disable everything.

    48

			if (t->unwanted[pid]) {

    49

				avail_buttons = 0;

    50

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

    51

				SETBIT(avail_buttons, 7); // only bribe if less than excellent

    52

		}

    53

    54

		// Things worth more than this are not shown

    55

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

    56

		ref = _price.build_industry >> 8;

    57

    58

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

    59

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

    60

				SETBIT(buttons, i);

    61

				num++;

    62

			}

    63

		}

    64

    65

		/* Disable build statue if already built */

    66

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

    67

			CLRBIT(buttons, 4);

    68

			num--;

    69

		}

    70

    71

	}

    72

    73

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

    74

	return buttons;

    75

}

    76

    77

static int GetNthSetBit(uint32 bits, int n)

    78

{

    79

	int i = 0;

    80

	if (n >= 0) {

    81

		do {

    82

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

    83

			i++;

    84

		} while (bits>>=1);

    85

	}

    86

	return -1;

    87

}

    88

    89

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

    90

{

    91

	switch (e->event) {

    92

	case WE_PAINT: {

    93

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

    94

		int numact;

    95

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

    96

    97

		SetVScrollCount(w, numact + 1);

    98

    99

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

   100

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

   101

   102

		w->disabled_state = (WP(w,def_d).data_1 == -1) ? (1 << 6) : 0;

   103

   104

		{

   105

			int y;

   106

			Player *p;

   107

			int r;

   108

			StringID str;

   109

   110

			SetDParam(0, w->window_number);

   111

			DrawWindowWidgets(w);

   112

   113

			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);

   114

   115

			// Draw list of players

   116

			y = 25;

   117

			FOR_ALL_PLAYERS(p) {

   118

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

   119

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

   120

   121

					SetDParam(0, p->name_1);

   122

					SetDParam(1, p->name_2);

   123

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

   124

   125

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

   126

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

   127

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

   128

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

   129

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

   130

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

   131

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

   132

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

   133

					(str++, true);														// Outstanding

   134

   135

					SetDParam(4, str);

   136

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

   137

						DrawSprite((SPR_BLOT) | 0x30b8000, 18, y);

   138

   139

					DrawString(28, y, STR_2024, 0);

   140

					y+=10;

   141

				}

   142

			}

   143

		}

   144

   145

		// Draw actions list

   146

		{

   147

			int y = 107, i;

   148

			int pos = w->vscroll.pos;

   149

   150

			if (--pos < 0) {

   151

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   152

				y+=10;

   153

			}

   154

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

   155

				if (pos <= -5)

   156

					break;

   157

   158

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

   159

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

   160

					y += 10;

   161

				}

   162

			}

   163

		}

   164

   165

		{

   166

			int i;

   167

			if ((i=WP(w,def_d).data_1) != -1) {

   168

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

   169

				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   170

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

   171

			}

   172

		}

   173

   174

	} break;

   175

   176

	case WE_CLICK:

   177

		switch (e->click.widget) {

   178

		case 3: { /* listbox */

   179

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

   180

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

   181

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

   182

				return;

   183

   184

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

   185

			if (y >= 0) {

   186

				WP(w,def_d).data_1 = y;

   187

				SetWindowDirty(w);

   188

			}

   189

			break;

   190

		}

   191

   192

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

   193

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

   194

			break;

   195

		}

   196

		}

   197

		break;

   198

   199

	case WE_4:

   200

		SetWindowDirty(w);

   201

		break;

   202

	}

   203

}

   204

   205

static const WindowDesc _town_authority_desc = {

   206

	-1, -1, 317, 222,

   207

	WC_TOWN_AUTHORITY,0,

   208

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   209

	_town_authority_widgets,

   210

	TownAuthorityWndProc

   211

};

   212

   213

static void ShowTownAuthorityWindow(uint town)

   214

{

   215

	Window *w;

   216

   217

	w = AllocateWindowDescFront(&_town_authority_desc, town);

   218

	if (w) {

   219

		w->vscroll.cap = 5;

   220

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

   221

	}

   222

}

   223

   224

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

   225

{

   226

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

   227

   228

	switch(e->event) {

   229

	case WE_PAINT:

   230

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

   231

		if (_networking && !_network_server) SETBIT(w->disabled_state, 8);

   232

   233

		SetDParam(0, t->index);

   234

		DrawWindowWidgets(w);

   235

   236

		SetDParam(0, t->population);

   237

		SetDParam(1, t->num_houses);

   238

		DrawString(2,107,STR_2006_POPULATION,0);

   239

   240

		SetDParam(0, t->act_pass);

   241

		SetDParam(1, t->max_pass);

   242

		DrawString(2,117,STR_200D_PASSENGERS_LAST_MONTH_MAX,0);

   243

   244

		SetDParam(0, t->act_mail);

   245

		SetDParam(1, t->max_mail);

   246

		DrawString(2,127,STR_200E_MAIL_LAST_MONTH_MAX,0);

   247

   248

		DrawWindowViewport(w);

   249

		break;

   250

   251

	case WE_CLICK:

   252

		switch(e->click.widget) {

   253

		case 6: /* scroll to location */

   254

			ScrollMainWindowToTile(t->xy);

   255

			break;

   256

		case 7: /* town authority */

   257

			ShowTownAuthorityWindow(w->window_number);

   258

			break;

   259

		case 8: /* rename */

   262

			break;

   263

		case 9: /* expand town */

   264

			ExpandTown(t);

   265

			break;

   266

		case 10: /* delete town */

   267

			DeleteTown(t);

   268

			break;

   269

		}

   270

		break;

   271

   272

	case WE_ON_EDIT_TEXT: {

   273

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

   274

			_cmd_text = e->edittext.str;

   275

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

   276

				CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));

   277

		}

   278

	} break;

   279

	}

   280

}

   281

   282

   283

static const Widget _town_view_widgets[] = {

   284

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

   285

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

   286

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

   287

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

   288

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

   289

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

   290

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

   291

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

   292

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

   293

{   WIDGETS_END},

   294

};

   295

   296

static const WindowDesc _town_view_desc = {

   297

	-1, -1, 260, 150,

   298

	WC_TOWN_VIEW,0,

   299

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   300

	_town_view_widgets,

   301

	TownViewWndProc

   302

};

   303

   304

static const Widget _town_view_scen_widgets[] = {

   305

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

   306

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

   307

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

   308

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

   309

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

   310

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

   311

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

   312

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

   313

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

   314

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

   315

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

   316

{   WIDGETS_END},

   317

};

   318

   319

static const WindowDesc _town_view_scen_desc = {

   320

	-1, -1, 260, 150,

   321

	WC_TOWN_VIEW,0,

   322

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   323

	_town_view_scen_widgets,

   324

	TownViewWndProc

   325

};

   326

   327

void ShowTownViewWindow(uint town)

   328

{

   329

	Window *w;

   330

	Town *t;

   331

   332

	if (_game_mode != GM_EDITOR) {

   333

		w = AllocateWindowDescFront(&_town_view_desc, town);

   334

	} else {

   335

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   336

	}

   337

   338

	if (w) {

   339

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   340

		t = GetTown(w->window_number);

   341

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

   342

	}

   343

}

   344

   345

static const Widget _town_directory_widgets[] = {

   346

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

   347

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

   348

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

   349

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

   350

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

   351

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

   352

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

   353

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

   354

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

   355

{   WIDGETS_END},

   356

};

   357

   358

   359

// used to get a sorted list of the towns

   360

static uint _num_town_sort;

   361

   362

static char _bufcache[64];

   363

static uint16 _last_town_idx;

   364

   365

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

   366

{

   367

	char buf1[64];

   368

	uint16 val;

   369

	int r;

   371

   374

   375

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

   376

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

   377

	*  times after eachother) */

   378

	val = *(const uint16*)b;

   379

	if (val != _last_town_idx) {

   380

		_last_town_idx = val;

   383

	}

   384

   385

	r = strcmp(buf1, _bufcache);

   386

	if (_town_sort_order & 1) r = -r;

   387

	return r;

   388

}

   389

   390

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

   391

{

   392

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

   393

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

   394

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

   395

	if (_town_sort_order & 1) r = -r;

   396

	return r;

   397

}

   398

   399

static void MakeSortedTownList(void)

   400

{

   401

	Town *t;

   402

	int n = 0;

   403

   404

	/* Create array for sorting */

   405

	_town_sort = realloc(_town_sort, GetTownPoolSize() * sizeof(_town_sort[0]));

   406

	if (_town_sort == NULL)

   407

		error("Could not allocate memory for the town-sorting-list");

   408

   409

	FOR_ALL_TOWNS(t)

   410

		if (t->xy)

   411

			_town_sort[n++] = t->index;

   412

   413

	_num_town_sort = n;

   414

   415

	_last_town_idx = 0; // used for "cache"

   416

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

   417

   418

	DEBUG(misc, 1) ("Resorting Towns list...");

   419

}

   420

   421

   422

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

   423

{

   424

	switch(e->event) {

   425

	case WE_PAINT: {

   426

   427

		if (_town_sort_dirty) {

   428

			_town_sort_dirty = false;

   429

			MakeSortedTownList();

   430

		}

   431

   432

		SetVScrollCount(w, _num_town_sort);

   433

   434

		DrawWindowWidgets(w);

   435

		DoDrawString(_town_sort_order & 1 ? "\xAA" : "\xA0", (_town_sort_order <= 1) ? 88 : 187, 15, 0x10);

   436

   437

		{

   438

			Town *t;

   439

			int n = 0;

   440

			uint16 i = w->vscroll.pos;

   441

			int y = 28;

   442

   443

			while (i < _num_town_sort) {

   444

				t = GetTown(_town_sort[i]);

   445

   446

				assert(t->xy);

   447

   448

				SetDParam(0, t->index);

   449

				SetDParam(1, t->population);

   450

				DrawString(2, y, STR_2057, 0);

   451

   452

				y += 10;

   453

				i++;

   454

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

   455

			}

   456

			SetDParam(0, GetWorldPopulation());

   457

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

   458

		}

   459

	} break;

   460

   461

	case WE_CLICK:

   462

		switch(e->click.widget) {

   463

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

   464

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

   465

			_town_sort_dirty = true;

   466

			SetWindowDirty(w);

   467

		} break;

   468

   469

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

   470

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

   471

			_town_sort_dirty = true;

   472

			SetWindowDirty(w);

   473

		} break;

   474

   475

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

   476

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

   477

   478

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

   479

   480

			id_v += w->vscroll.pos;

   481

   482

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

   483

   484

			{

   485

				Town *t = GetTown(_town_sort[id_v]);

   486

				assert(t->xy);

   487

   488

				ScrollMainWindowToTile(t->xy);

   489

			}

   490

		}	break;

   491

		}

   492

		break;

   493

   494

	case WE_4:

   495

		SetWindowDirty(w);

   496

		break;

   497

   498

	case WE_RESIZE:

   499

		w->vscroll.cap += e->sizing.diff.y / 10;

   500

		break;

   501

	}

   502

}

   503