1

#include "stdafx.h"

     2

#include "ttd.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

    37

{

    38

	int32 avail, ref;

    40

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

    42

    45

		// bribe option enabled?

    46

		if (_patches.bribe) {

    47

			// if unwanted, disable everything.

    49

				avail_buttons = 0;

    52

		}

    53

    54

		// Things worth more than this are not shown

    56

		ref = _price.build_industry >> 8;

    57

    60

				SETBIT(buttons, i);

    61

				num++;

    62

			}

    63

		}

    64

    67

			CLRBIT(buttons, 4);

    68

			num--;

    69

		}

    70

    71

	}

    72

    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

{

    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

					/*	WARNING ugly hack!

   136

							GetPlayerNameString sets up (Player #) if the player is human in an extra DPARAM16

   137

							It seems that if player is non-human, nothing is set up, so param is 0. GetString doesn't like

   138

							that because there is another param after it.

   139

							So we'll just shift the rating one back if player is AI and all is fine

   140

						*/

   141

					SetDParam((IS_HUMAN_PLAYER(p->index) ? 4 : 3), str);

   142

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

   143

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

   144

   145

					DrawString(28, y, STR_2024, 0);

   146

					y+=10;

   147

				}

   148

			}

   149

		}

   150

   151

		// Draw actions list

   152

		{

   153

			int y = 107, i;

   154

			int pos = w->vscroll.pos;

   155

   156

			if (--pos < 0) {

   157

				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);

   158

				y+=10;

   159

			}

   160

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

   161

				if (pos <= -5)

   162

					break;

   163

   164

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

   165

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

   166

					y += 10;

   167

				}

   168

			}

   169

		}

   170

   171

		{

   172

			int i;

   173

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

   174

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

   175

				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);

   176

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

   177

			}

   178

		}

   179

   181

   182

	case WE_CLICK:

   184

		case 3: { /* listbox */

   186

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

   187

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

   188

				return;

   189

   191

			if (y >= 0) {

   192

				WP(w,def_d).data_1 = y;

   193

				SetWindowDirty(w);

   194

			}

   195

			break;

   196

		}

   197

   198

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

   200

			break;

   201

		}

   202

		}

   203

		break;

   204

   205

	case WE_4:

   206

		SetWindowDirty(w);

   207

		break;

   208

	}

   209

}

   210

   211

static const WindowDesc _town_authority_desc = {

   212

	-1, -1, 317, 222,

   213

	WC_TOWN_AUTHORITY,0,

   214

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   215

	_town_authority_widgets,

   216

	TownAuthorityWndProc

   217

};

   218

   219

static void ShowTownAuthorityWindow(uint town)

   220

{

   221

	Window *w;

   222

   223

	w = AllocateWindowDescFront(&_town_authority_desc, town);

   224

	if (w) {

   225

		w->vscroll.cap = 5;

   226

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

   227

	}

   228

}

   229

   230

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

   231

{

   232

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

   233

   234

	switch(e->event) {

   235

	case WE_PAINT:

   236

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

   237

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

   238

   239

		SetDParam(0, t->index);

   240

		DrawWindowWidgets(w);

   241

   242

		SetDParam(0, t->population);

   243

		SetDParam(1, t->num_houses);

   244

		DrawString(2,107,STR_2006_POPULATION,0);

   245

   246

		SetDParam(0, t->act_pass);

   247

		SetDParam(1, t->max_pass);

   248

		DrawString(2,117,STR_200D_PASSENGERS_LAST_MONTH_MAX,0);

   249

   250

		SetDParam(0, t->act_mail);

   251

		SetDParam(1, t->max_mail);

   252

		DrawString(2,127,STR_200E_MAIL_LAST_MONTH_MAX,0);

   253

   254

		DrawWindowViewport(w);

   255

		break;

   256

   257

	case WE_CLICK:

   258

		switch(e->click.widget) {

   259

		case 6: /* scroll to location */

   260

			ScrollMainWindowToTile(t->xy);

   261

			break;

   262

		case 7: /* town authority */

   263

			ShowTownAuthorityWindow(w->window_number);

   264

			break;

   265

		case 8: /* rename */

   266

			SetDParam(0, t->townnameparts);

   267

			ShowQueryString(t->townnametype, STR_2007_RENAME_TOWN, 31, 130, w->window_class, w->window_number);

   268

			break;

   269

		case 9: /* expand town */

   270

			ExpandTown(t);

   271

			break;

   272

		case 10: /* delete town */

   273

			DeleteTown(t);

   274

			break;

   275

		}

   276

		break;

   277

   278

	case WE_ON_EDIT_TEXT: {

   279

		const char *b = e->edittext.str;

   280

		if (*b == 0)

   281

			return;

   282

		memcpy(_decode_parameters, b, 32);

   283

		DoCommandP(0, w->window_number, 0, NULL, CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));

   284

	} break;

   285

	}

   286

}

   287

   288

   289

static const Widget _town_view_widgets[] = {

   290

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

   291

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

   292

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

   293

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

   294

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

   295

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

   296

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

   297

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

   298

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

   299

{   WIDGETS_END},

   300

};

   301

   302

static const WindowDesc _town_view_desc = {

   303

	-1, -1, 260, 150,

   304

	WC_TOWN_VIEW,0,

   305

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   306

	_town_view_widgets,

   307

	TownViewWndProc

   308

};

   309

   310

static const Widget _town_view_scen_widgets[] = {

   311

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

   312

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

   313

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

   314

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

   315

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

   316

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

   317

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

   318

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

   319

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

   320

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

   321

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

   322

{   WIDGETS_END},

   323

};

   324

   325

static const WindowDesc _town_view_scen_desc = {

   326

	-1, -1, 260, 150,

   327

	WC_TOWN_VIEW,0,

   328

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,

   329

	_town_view_scen_widgets,

   330

	TownViewWndProc

   331

};

   332

   333

void ShowTownViewWindow(uint town)

   334

{

   335

	Window *w;

   336

	Town *t;

   337

   338

	if (_game_mode != GM_EDITOR) {

   339

		w = AllocateWindowDescFront(&_town_view_desc, town);

   340

	} else {

   341

		w = AllocateWindowDescFront(&_town_view_scen_desc, town);

   342

	}

   343

   344

	if (w) {

   345

		w->flags4 |= WF_DISABLE_VP_SCROLL;

   346

		t = GetTown(w->window_number);

   347

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

   348

	}

   349

}

   350

   351

static const Widget _town_directory_widgets[] = {

   352

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

   353

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

   354

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

   355

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

   356

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

   357

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

   358

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

   359

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

   360

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

   361

{   WIDGETS_END},

   362

};

   363

   364

   365

// used to get a sorted list of the towns

   366

static uint _num_town_sort;

   367

   368

static char _bufcache[64];

   369

static uint16 _last_town_idx;

   370

   371

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

   372

{

   373

	char buf1[64];

   374

	const Town *t;

   375

	uint16 val;

   376

	int r;

   377

   378

	t = GetTown(*(const uint16*)a);

   379

	SetDParam(0, t->townnameparts);

   380

	GetString(buf1, t->townnametype);

   381

   382

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

   383

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

   384

	*  times after eachother) */

   385

	val = *(const uint16*)b;

   386

	if (val != _last_town_idx) {

   387

		_last_town_idx = val;

   388

		t = GetTown(val);

   389

		SetDParam(0, t->townnameparts);

   390

		GetString(_bufcache, t->townnametype);

   391

	}

   392

   393

	r = strcmp(buf1, _bufcache);

   394

	if (_town_sort_order & 1) r = -r;

   395

	return r;

   396

}

   397

   398

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

   399

{

   400

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

   401

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

   402

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

   403

	if (_town_sort_order & 1) r = -r;

   404

	return r;

   405

}

   406

   407

static void MakeSortedTownList(void)

   408

{

   409

	Town *t;

   410

	int n = 0;

   411

   412

	/* Create array for sorting */

   413

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

   414

	if (_town_sort == NULL)

   415

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

   416

   417

	FOR_ALL_TOWNS(t)

   418

		if (t->xy)

   419

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

   420

   421

	_num_town_sort = n;

   422

   423

	_last_town_idx = 0; // used for "cache"

   424

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

   425

   426

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

   427

}

   428

   429

   430

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

   431

{

   432

	switch(e->event) {

   433

	case WE_PAINT: {

   434

   435

		if (_town_sort_dirty) {

   436

			_town_sort_dirty = false;

   437

			MakeSortedTownList();

   438

		}

   439

   440

		SetVScrollCount(w, _num_town_sort);

   441

   442

		DrawWindowWidgets(w);

   443

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

   444

   445

		{

   446

			Town *t;

   447

			int n = 0;

   448

			uint16 i = w->vscroll.pos;

   449

			int y = 28;

   450

   451

			while (i < _num_town_sort) {

   452

				t = GetTown(_town_sort[i]);

   453

   454

				assert(t->xy);

   455

   456

				SetDParam(0, t->index);

   457

				SetDParam(1, t->population);

   458

				DrawString(2, y, STR_2057, 0);

   459

   460

				y += 10;

   461

				i++;

   462

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

   463

			}

   464

			SetDParam(0, GetWorldPopulation());

   465

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

   466

		}

   467

	} break;

   468

   469

	case WE_CLICK:

   470

		switch(e->click.widget) {

   471

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

   472

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

   473

			_town_sort_dirty = true;

   474

			SetWindowDirty(w);

   475

		} break;

   476

   477

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

   478

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

   479

			_town_sort_dirty = true;

   480

			SetWindowDirty(w);

   481

		} break;

   482

   483

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

   484

			uint16 id_v = (e->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

			{

   493

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

   494

				assert(t->xy);

   495

   496

				ScrollMainWindowToTile(t->xy);

   497

			}

   498

		}	break;

   499

		}

   500

		break;

   501

   502

	case WE_4:

   503

		SetWindowDirty(w);

   504