1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "window.h"

     5

#include "gui.h"

     6

#include "station.h"

     7

#include "gfx.h"

     8

#include "player.h"

     9

#include "town.h"

    10

#include "command.h"

    11

    12

static void StationsWndShowStationRating(int x, int y, int type, uint acceptance, int rating)

    13

{

    14

	static const byte _rating_colors[NUM_CARGO] = {152,32,15,174,208,194,191,55,184,10,191,48};

    15

	int color = _rating_colors[type];

    16

	uint w;

    17

    18

	if (acceptance > 575)

    19

		acceptance = 575;

    20

    21

	acceptance = (acceptance + 7) >> 3;

    22

    23

	/* draw cargo */

    24

	if ( (w=acceptance>>3) != 0) {

    25

		GfxFillRect(x, y, x+w-1, y+6, color);

    26

		x += w;

    27

	}

    28

    29

	if ( (w=acceptance&7) != 0) {

    30

		if (w==7) w--;

    31

		GfxFillRect(x, y+(w-1), x, y+6, color);

    32

	}

    33

    34

	x -= (acceptance>>3);

    35

    36

	DrawString(x+1, y, _cargoc.names_short[type], 0x10);

    37

    38

	/* draw green/red ratings bar */

    39

	GfxFillRect(x+1, y+8, x+7, y+8, 0xB8);

    40

    41

	rating = (rating >> 5);

    42

    43

	if (rating != 0) {

    44

		GfxFillRect(x+1, y+8, x+rating, y+8, 0xD0);

    45

	}

    46

}

    47

    48

static SortStruct _station_sort[lengthof(_stations)];

    49

static uint16 _num_station_sort[MAX_PLAYERS];

    50

    51

static char _bufcache[64];

    52

static uint16 _last_station_idx;

    53

    54

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

    55

{

    56

	char buf1[64];

    57

	Station *st;

    58

	const SortStruct *cmp1 = (const SortStruct*)a;

    59

	const SortStruct *cmp2 = (const SortStruct*)b;

    60

    61

	st = DEREF_STATION(cmp1->index);

    62

	SetDParam(0, st->town->townnametype);

    63

	SetDParam(1, st->town->townnameparts);

    64

	GetString(buf1, st->string_id);

    65

    66

	if ( cmp2->index != _last_station_idx) {

    67

		_last_station_idx = cmp2->index;

    68

		st = DEREF_STATION(cmp2->index);

    69

		SetDParam(0, st->town->townnametype);

    70

		SetDParam(1, st->town->townnameparts);

    71

		GetString(_bufcache, st->string_id);

    72

	}

    73

    74

	return strcmp(buf1, _bufcache);	// sort by name

    75

}

    76

    77

static void GlobalSortStationList()

    78

{

    79

	const Station *st;

    80

	uint32 n = 0;

    81

	uint16 *i;

    82

    83

	// reset #-of stations to 0 because ++ is used for value-assignment

    84

	for (i = _num_station_sort; i != endof(_num_station_sort); i++) {*i = 0;}

    85

    86

	FOR_ALL_STATIONS(st) {

    87

		if(st->xy && st->owner != OWNER_NONE) {

    88

			_station_sort[n].index = st->index;

    89

			_station_sort[n++].owner = st->owner;

    90

			_num_station_sort[st->owner]++;	// add number of stations of player

    91

		}

    92

	}

    93

    94

	// create cumulative station-ownership

    95

	// stations are stored as a cummulative index, eg 25, 41, 43. This means

    96

	// Player0: 25; Player1: (41-25) 16; Player2: (43-41) 2

    97

	for (i = &_num_station_sort[1]; i != endof(_num_station_sort); i++) {*i += *(i-1);}

    98

    99

	qsort(_station_sort, n, sizeof(_station_sort[0]), GeneralOwnerSorter); // sort by owner

   100

   101

	// since indexes are messed up after adding/removing a station, mark all lists dirty

   102

	memset(_station_sort_dirty, true, sizeof(_station_sort_dirty));

   103

	_global_station_sort_dirty = false;

   104

   105

	DEBUG(misc, 1) ("Resorting global station list...");

   106

}

   107

   108

static void MakeSortedStationList(byte owner)

   109

{

   110

	SortStruct *firstelement;

   111

	uint32 n = 0;

   112

   113

	if (owner == 0) { // first element starts at 0th element and has n elements as described above

   114

		firstelement =	&_station_sort[0];

   115

		n =							_num_station_sort[0];

   116

	}	else { // nth element starts at the end of the previous one, and has n elements as described above

   117

		firstelement =	&_station_sort[_num_station_sort[owner-1]];

   118

		n =							_num_station_sort[owner] - _num_station_sort[owner-1];

   119

	}

   120

   121

	_last_station_idx = 0; // used for "cache" in namesorting

   122

	qsort(firstelement, n, sizeof(_station_sort[0]), StationNameSorter); // sort by name

   123

   124

	_station_sort_dirty[owner] = false;

   125

   126

	DEBUG(misc, 1) ("Resorting Stations list player %d...", owner+1);

   127

}

   128

   129

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

   130

{

   131

	switch(e->event) {

   132

	case WE_PAINT: {

   133

		uint32 i;

   134

		const byte window_number = (byte)w->window_number;

   135

   136

		// resort station window if stations have been added/removed

   137

		if (_global_station_sort_dirty)

   138

			GlobalSortStationList();

   139

   140

		if (_station_sort_dirty[window_number]) { // resort in case of a station rename.

   141

			MakeSortedStationList(window_number);

   142

		}

   143

   144

		// stations are stored as a cummulative index, eg 25, 41, 43. This means

   145

		// Player0: 25; Player1: (41-25) 16; Player2: (43-41) 2 stations

   146

		i = (window_number == 0) ? 0 : _num_station_sort[window_number-1];

   147

		SetVScrollCount(w, _num_station_sort[window_number] - i);

   148

   149

		/* draw widgets, with player's name in the caption */

   150

		{

   151

			Player *p = DEREF_PLAYER(window_number);

   152

			SetDParam(0, p->name_1);

   153

			SetDParam(1, p->name_2);

   154

			SetDParam(2, w->vscroll.count);

   155

			DrawWindowWidgets(w);

   156

		}

   157

   158

		{

   159

			byte p = 0;

   160

			Station *st;

   161

			int x,xb = 2;

   162

			int y = 16;	// offset from top of widget

   163

			int j;

   164

   165

			if (w->vscroll.count == 0) {	// player has no stations

   166

				DrawString(xb, y, STR_304A_NONE, 0);

   167

				return;

   168

			}

   169

   170

			i += w->vscroll.pos;	// offset from sorted station list of current player

   171

			assert(i < _num_station_sort[window_number]); // at least one station must exist

   172

   173

			while (i < _num_station_sort[window_number]) {	// do until max number of stations of owner

   174

				st = DEREF_STATION(_station_sort[i].index);

   175

   176

				assert(st->xy && st->owner == window_number);

   177

   178

				SetDParam(0, st->index);

   179

				SetDParam(1, st->facilities);

   180

				x = DrawString(xb, y, STR_3049_0, 0) + 5;

   181

   182

				// show cargo waiting and station ratings

   183

				for(j=0; j!=NUM_CARGO; j++) {

   184

					int acc = (st->goods[j].waiting_acceptance & 0xFFF);

   185

					if (acc != 0) {

   186

						StationsWndShowStationRating(x, y, j, acc, st->goods[j].rating);

   187

						x += 10;

   188

					}

   189

				}

   190

				y += 10;

   191

				i++;	// next station

   192

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

   193

			}

   194

		}

   195

	} break;

   196

	case WE_CLICK: {

   197

		switch(e->click.widget) {

   198

		case 2: {

   199

			uint32 id_v = (e->click.pt.y - 15) / 10;

   200

   201

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

   202

   203

			id_v += w->vscroll.pos;

   204

   205

			{

   206

				const byte owner = (byte)w->window_number;

   207

				Station *st;

   208

				id_v	+= (owner == 0) ? 0 : _num_station_sort[owner - 1]; // first element in list

   209

   210

				if (id_v >= _num_station_sort[owner]) { return;} // click out of station bound

   211

   212

				st = DEREF_STATION(_station_sort[id_v].index);

   213

   214

				assert(st->xy && st->owner == owner);

   215

   216

				ScrollMainWindowToTile(st->xy);

   217

			}

   218

		} break;

   219

		}

   220

	} break;

   221

   222

	case WE_4:

   223

		WP(w,plstations_d).refresh_counter++;

   224

		if (WP(w,plstations_d).refresh_counter==5) {

   225

			WP(w,plstations_d).refresh_counter = 0;

   226

			SetWindowDirty(w);

   227

		}

   228

		break;

   229

	}

   230

}

   231

   232

static const Widget _player_stations_widgets[] = {

   233

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

   234

{    WWT_CAPTION,    14,    11,   357,     0,    13, STR_3048_STATIONS, STR_018C_WINDOW_TITLE_DRAG_THIS},

   235

{      WWT_PANEL,    14,     0,   346,    14,   137, 0x0, STR_3057_STATION_NAMES_CLICK_ON},

   236

{  WWT_SCROLLBAR,    14,   347,   357,    14,   137, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},

   237

{   WIDGETS_END},

   238

};

   239

   240

static const WindowDesc _player_stations_desc = {

   241

	-1, -1, 358, 138,

   242

	WC_STATION_LIST,0,

   243

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   244

	_player_stations_widgets,

   245

	PlayerStationsWndProc

   246

};

   247

   248

   249

void ShowPlayerStations(int player)

   250

{

   251

	Window *w;

   252

   253

	w = AllocateWindowDescFront(&_player_stations_desc, player);

   254

	if (w) {

   255

		w->caption_color = (byte)w->window_number;

   256

		w->vscroll.cap = 12;

   257

	}

   258

}

   259

   260

static const Widget _station_view_expanded_widgets[] = {

   261

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

   262

{    WWT_CAPTION,    14,    11,   248,     0,    13, STR_300A_0,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   263

{     WWT_IMGBTN,    14,     0,   237,    14,    65, 0x0,					STR_NULL},

   264

{  WWT_SCROLLBAR,    14,   238,   248,    14,    65, 0x0,					STR_0190_SCROLL_BAR_SCROLLS_LIST},

   265

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

   266

{     WWT_IMGBTN,    14,     0,   248,    66,   197, 0x0,					STR_NULL},

   267

{ WWT_PUSHTXTBTN,    14,     0,    63,   198,   209, STR_00E4_LOCATION,	STR_3053_CENTER_MAIN_VIEW_ON_STATION},

   268

{ WWT_PUSHTXTBTN,    14,    64,   128,   198,   209, STR_3033_ACCEPTS,	STR_3056_SHOW_LIST_OF_ACCEPTED_CARGO},

   269

{ WWT_PUSHTXTBTN,    14,   129,   192,   198,   209, STR_0130_RENAME,		STR_3055_CHANGE_NAME_OF_STATION},

   274

{   WIDGETS_END},

   275

};

   276

   277

static const Widget _station_view_widgets[] = {

   278

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

   279

{    WWT_CAPTION,    14,    11,   248,     0,    13, STR_300A_0,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   280

{     WWT_IMGBTN,    14,     0,   237,    14,    65, 0x0,					STR_NULL},

   281

{  WWT_SCROLLBAR,    14,   238,   248,    14,    65, 0x0,					STR_0190_SCROLL_BAR_SCROLLS_LIST},

   282

{     WWT_IMGBTN,    14,     0,   248,    66,    97, 0x0,					STR_NULL},

   283

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

   284

{ WWT_PUSHTXTBTN,    14,     0,    63,    98,   109, STR_00E4_LOCATION,	STR_3053_CENTER_MAIN_VIEW_ON_STATION},

   285

{ WWT_PUSHTXTBTN,    14,    64,   128,    98,   109, STR_3032_RATINGS,	STR_3054_SHOW_STATION_RATINGS},

   286

{ WWT_PUSHTXTBTN,    14,   129,   192,    98,   109, STR_0130_RENAME,		STR_3055_CHANGE_NAME_OF_STATION},

   291

{   WIDGETS_END},

   292

};

   293

   294

static void DrawStationViewWindow(Window *w)

   295

{

   296

	Station *st;

   297

	int i;

   298

	int num;

   299

	int x,y;

   300

	int pos;

   301

	StringID str;

   302

	byte station_id;

   303

	byte *b;

   304

   305

   306

	station_id = (byte)w->window_number;

   307

   308

	st = DEREF_STATION(w->window_number);

   309

   310

	num = 1;

   311

	for(i=0; i!=NUM_CARGO; i++) {

   312

		if ((st->goods[i].waiting_acceptance & 0xFFF) != 0) {

   313

			num++;

   314

			if (st->goods[i].enroute_from != station_id)

   315

				num++;

   316

		}

   317

	}

   318

	SetVScrollCount(w, num);

   319

   320

	w->disabled_state = st->owner == _local_player ? 0 : (1 << 8);

   321

   322

	if (!(st->facilities & FACIL_TRAIN)) SETBIT(w->disabled_state,  9);

   323

	if (!(st->facilities & FACIL_TRUCK_STOP) &&

   324

			!(st->facilities & FACIL_BUS_STOP)) SETBIT(w->disabled_state, 10);

   325

	if (!(st->facilities & FACIL_AIRPORT)) SETBIT(w->disabled_state, 11);

   326

	if (!(st->facilities & FACIL_DOCK)) SETBIT(w->disabled_state, 12);

   327

   328

	SetDParam(0, st->index);

   329

	SetDParam(1, st->facilities);

   330

	DrawWindowWidgets(w);

   331

   332

	x = 2;

   333

	y = 15;

   334

	pos = w->vscroll.pos;

   335

   336

	if (--pos < 0) {

   337

		str = STR_00D0_NOTHING;

   338

		for(i=0; i!=NUM_CARGO; i++)

   339

			if (st->goods[i].waiting_acceptance & 0xFFF)

   340

				str = STR_EMPTY;

   341

		SetDParam(0, str);

   342

		DrawString(x, y, STR_0008_WAITING, 0);

   343

		y += 10;

   344

	}

   345

   346

	i = 0;

   347

	do {

   348

		uint waiting = (st->goods[i].waiting_acceptance & 0xFFF);

   349

		if (waiting == 0)

   350

			continue;

   351

   352

		num = (waiting + 5) / 10;

   353

		if (num != 0) {

   354

			int cur_x = x;

   355

			num = min(num, 23);

   356

			do {

   357

				DrawSprite(_cargoc.sprites[i], cur_x, y);

   358

				cur_x += 10;

   359

			} while (--num);

   360

		}

   361

   362

		if ( st->goods[i].enroute_from == station_id) {

   363

			if (--pos < 0) {

   364

				SetDParam(1, waiting);

   365

				SetDParam(0, _cargoc.names_long_s[i] + (waiting==1 ? 0 : 32));

   366

				DrawStringRightAligned(x + 234, y, STR_0009, 0);

   367

				y += 10;

   368

			}

   369

		} else {

   370

			/* enroute */

   371

			if (--pos < 0) {

   372

				SetDParam(1, waiting);

   373

				SetDParam(0, _cargoc.names_long_s[i] + (waiting==1 ? 0 : 32));

   374

				DrawStringRightAligned(x + 234, y, STR_000A_EN_ROUTE_FROM, 0);

   375

				y += 10;

   376

			}

   377

   378

			if (pos > -5 && --pos < 0) {

   379

				SetDParam(0, st->goods[i].enroute_from);

   380

				DrawStringRightAligned(x + 234, y, STR_000B, 0);

   381

				y += 10;

   382

			}

   383

		}

   384

	} while (pos > -5 && ++i != 12);

   385

   386

	if (w->widget == _station_view_widgets) {

   387

		b = _userstring;

   388

		b[0] = 0x81;

   389

		b[1] = STR_000C_ACCEPTS;

   390

		b[2] = STR_000C_ACCEPTS >> 8;

   391

		b += 3;

   392

   393

		for(i=0; i!=NUM_CARGO; i++) {

   394

			if ((b - (byte *) &_userstring) + 5 > USERSTRING_LEN - 1)

   395

				break;

   396

			if (st->goods[i].waiting_acceptance & 0x8000) {

   397

				b[0] = 0x81;

   398

				WRITE_LE_UINT16(b+1, _cargoc.names_s[i]);

   399

				WRITE_LE_UINT16(b+3, 0x202C);

   400

				b += 5;

   401

			}

   402

		}

   403

   404

		if (b == (byte*)&_userstring[3]) {

   405

			b[0] = 0x81;

   406

			b[1] = STR_00D0_NOTHING;

   407

			b[2] = STR_00D0_NOTHING >> 8;

   408

			b[3] = 0;

   409

		} else {

   410

			b[-2] = 0;

   411

		}

   412

   413

		DrawStringMultiLine(2, 67, STR_SPEC_USERSTRING, 245);

   414

	} else {

   415

   416

		DrawString(2, 67, STR_3034_LOCAL_RATING_OF_TRANSPORT, 0);

   417

   418

		y = 77;

   419

		for(i=0; i!=NUM_CARGO; i++) {

   420

			if (st->goods[i].enroute_from != 0xFF) {

   421

				SetDParam(0, _cargoc.names_s[i]);

   422

				SetDParam(2, st->goods[i].rating * 101 >> 8);

   423

				SetDParam(1, STR_3035_APPALLING + (st->goods[i].rating >> 5));

   424

				DrawString(8, y, STR_303D, 0);

   425

				y += 10;

   426

			}

   427

		}

   428

	}

   429

}

   430

   431

   432

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

   433

{

   434

	switch(e->event) {

   435

	case WE_PAINT:

   436

		DrawStationViewWindow(w);

   437

		break;

   438

   439

	case WE_CLICK:

   440

		switch(e->click.widget) {

   441

		case 6:

   442

			ScrollMainWindowToTile(DEREF_STATION(w->window_number)->xy);

   443

			break;

   444

   445

		case 7:

   446

			SetWindowDirty(w);

   447

   448

			/* toggle height/widget set */

   449

			w->height ^= (210 ^ 110);

   450

			*(uint32*)&w->widget ^= (uint32)_station_view_expanded_widgets ^ (uint32)_station_view_widgets;

   451

   452

			SetWindowDirty(w);

   453

			break;

   454

   455

		case 8: {

   456

			Station *st = DEREF_STATION(w->window_number);

   457

			SetDParam(0, st->town->townnametype);

   458

			SetDParam(1, st->town->townnameparts);

   459

			ShowQueryString(st->string_id, STR_3030_RENAME_STATION_LOADING, 31, 180, w->window_class, w->window_number);

   460

		}	break;

   461

   462

		case 9: {

   463

			const Station *st = DEREF_STATION(w->window_number);

   464

			ShowPlayerTrains(st->owner, w->window_number);

   465

			break;

   466

		}

   467

   468

		case 10: {

   469

			const Station *st = DEREF_STATION(w->window_number);

   470

			ShowPlayerRoadVehicles(st->owner, w->window_number);

   471

			break;

   472

		}

   473

   474

		case 11: {

   475

			const Station *st = DEREF_STATION(w->window_number);

   476

			ShowPlayerAircraft(st->owner, w->window_number);

   477

			break;

   478

		}

   479

   480

		case 12: {

   481

			const Station *st = DEREF_STATION(w->window_number);

   482

			ShowPlayerShips(st->owner, w->window_number);

   483

			break;

   484

		}

   485

		}

   486

		break;

   487

   488

	case WE_ON_EDIT_TEXT: {

   489

		Station *st;

   490

		byte *b = e->edittext.str;

   491

		if (*b == 0)

   492

			return;

   493

		memcpy(_decode_parameters, b, 32);

   494

   495

		st = DEREF_STATION(w->window_number);

   496

		DoCommandP(st->xy, w->window_number, 0, NULL, CMD_RENAME_STATION | CMD_MSG(STR_3031_CAN_T_RENAME_STATION));

   497

	} break;

   498

   499

	case WE_DESTROY: {

   500

		WindowNumber wno =

   501

			(w->window_number << 16) | DEREF_STATION(w->window_number)->owner;

   502

   503

		DeleteWindowById(WC_TRAINS_LIST, wno);

   504

		DeleteWindowById(WC_ROADVEH_LIST, wno);

   505

		DeleteWindowById(WC_SHIPS_LIST, wno);

   506

		DeleteWindowById(WC_AIRCRAFT_LIST, wno);

   507

		break;

   508

	}

   509

	}

   510

}