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 3: {

   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;

   233

	}

   234

}

   235

   236

static const Widget _player_stations_widgets[] = {

   243

{   WIDGETS_END},

   244

};

   245

   246

static const WindowDesc _player_stations_desc = {

   247

	-1, -1, 358, 138,

   248

	WC_STATION_LIST,0,

   250

	_player_stations_widgets,

   251

	PlayerStationsWndProc

   252

};

   253

   254

   255

void ShowPlayerStations(int player)

   256

{

   257

	Window *w;

   258

   259

	w = AllocateWindowDescFront(&_player_stations_desc, player);

   260

	if (w) {

   261

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

   262

		w->vscroll.cap = 12;

   265

	}

   266

}

   267

   268

static const Widget _station_view_expanded_widgets[] = {

   283

{   WIDGETS_END},

   284

};

   285

   286

static const Widget _station_view_widgets[] = {

   301

{   WIDGETS_END},

   302

};

   303

   304

static void DrawStationViewWindow(Window *w)

   305

{

   306

	Station *st;

   307

	int i;

   308

	int num;

   309

	int x,y;

   310

	int pos;

   311

	StringID str;

   312

	uint16 station_id;

   313

	byte *b;

   314

   315

   316

	station_id = (byte)w->window_number;

   317

   318

	st = DEREF_STATION(w->window_number);

   319

   320

	num = 1;

   321

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

   322

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

   323

			num++;

   324

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

   325

				num++;

   326

		}

   327

	}

   328

	SetVScrollCount(w, num);

   329

   330

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

   331

   332

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

   333

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

   334

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

   335

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

   336

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

   337

   338

	SetDParam(0, st->index);

   339

	SetDParam(1, st->facilities);

   340

	DrawWindowWidgets(w);

   341

   342

	x = 2;

   343

	y = 15;

   344

	pos = w->vscroll.pos;

   345

   346

	if (--pos < 0) {

   347

		str = STR_00D0_NOTHING;

   348

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

   349

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

   350

				str = STR_EMPTY;

   351

		SetDParam(0, str);

   352

		DrawString(x, y, STR_0008_WAITING, 0);

   353

		y += 10;

   354

	}

   355

   356

	i = 0;

   357

	do {

   358

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

   359

		if (waiting == 0)

   360

			continue;

   361

   362

		num = (waiting + 5) / 10;

   363

		if (num != 0) {

   364

			int cur_x = x;

   365

			num = min(num, 23);

   366

			do {

   367

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

   368

				cur_x += 10;

   369

			} while (--num);

   370

		}

   371

   372

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

   373

			if (--pos < 0) {

   374

				SetDParam(1, waiting);

   375

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

   376

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

   377

				y += 10;

   378

			}

   379

		} else {

   380

			/* enroute */

   381

			if (--pos < 0) {

   382

				SetDParam(1, waiting);

   383

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

   384

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

   385

				y += 10;

   386

			}

   387

   388

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

   389

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

   390

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

   391

				y += 10;

   392

			}

   393

		}

   394

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

   395

   397

		b = _userstring;

   398

		b[0] = 0x81;

   399

		b[1] = STR_000C_ACCEPTS;

   400

		b[2] = STR_000C_ACCEPTS >> 8;

   401

		b += 3;

   402

   403

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

   404

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

   405

				break;

   406

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

   407

				b[0] = 0x81;

   408

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

   409

				WRITE_LE_UINT16(b+3, 0x202C);

   410

				b += 5;

   411

			}

   412

		}

   413

   414

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

   415

			b[0] = 0x81;

   416

			b[1] = STR_00D0_NOTHING;

   417

			b[2] = STR_00D0_NOTHING >> 8;

   418

			b[3] = 0;

   419

		} else {

   420

			b[-2] = 0;

   421

		}

   422

   423

		DrawStringMultiLine(2, 67, STR_SPEC_USERSTRING, 245);

   424

	} else {

   425

   426

		DrawString(2, 67, STR_3034_LOCAL_RATING_OF_TRANSPORT, 0);

   427

   428

		y = 77;

   429

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

   430

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

   431

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

   432

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

   433

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

   434

				DrawString(8, y, STR_303D, 0);

   435

				y += 10;

   436

			}

   437

		}

   438

	}

   439

}

   440

   441

   442

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

   443

{

   444

	switch(e->event) {

   445

	case WE_PAINT:

   446

		DrawStationViewWindow(w);

   447

		break;

   448

   449

	case WE_CLICK:

   450

		switch(e->click.widget) {

   451

		case 7:

   452

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

   453

			break;

   454

   455

		case 8:

   456

			SetWindowDirty(w);

   457

   458

			/* toggle height/widget set */

   466

   467

			SetWindowDirty(w);

   468

			break;

   469

   470

		case 9: {

   471

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

   472

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

   473

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

   474

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

   475

		}	break;

   476

   477

		case 10: {

   478

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

   479

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

   480

			break;

   481

		}

   482

   483

		case 11: {

   484

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

   485

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

   486

			break;

   487

		}

   488

   489

		case 12: {

   490

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

   491

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

   492

			break;

   493

		}

   494

   495

		case 13: {

   496

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

   497

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

   498

			break;

   499

		}

   500

		}

   501

		break;

   502

   503

	case WE_ON_EDIT_TEXT: {

   504

		Station *st;

   505

		byte *b = e->edittext.str;

   506

		if (*b == 0)

   507

			return;