1

#include "stdafx.h"

     2

#include "openttd.h"

     3

#include "debug.h"

     5

#include "strings.h"

     6

#include "table/strings.h"

     7

#include "window.h"

     8

#include "gui.h"

     9

#include "station.h"

    10

#include "gfx.h"

    11

#include "player.h"

    12

#include "town.h"

    13

#include "command.h"

    14

#include "variables.h"

    15

#include "vehicle_gui.h"

    16

    17

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

    18

{

    19

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

    20

	int color = _rating_colors[type];

    21

	uint w;

    22

    23

	if (acceptance > 575)

    24

		acceptance = 575;

    25

    26

	acceptance = (acceptance + 7) >> 3;

    27

    28

	/* draw cargo */

    29

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

    30

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

    31

		x += w;

    32

	}

    33

    34

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

    35

		if (w==7) w--;

    36

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

    37

	}

    38

    39

	x -= (acceptance>>3);

    40

    41

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

    42

    43

	/* draw green/red ratings bar */

    44

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

    45

    46

	rating = (rating >> 5);

    47

    48

	if (rating != 0) {

    49

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

    50

	}

    51

}

    52

    53

static uint16 _num_station_sort[MAX_PLAYERS];

    54

    55

static char _bufcache[64];

    56

static uint16 _last_station_idx;

    57

    58

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

    59

{

    60

	char buf1[64];

    61

	int32 argv[1];

    62

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

    63

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

    64

    65

	argv[0] = cmp1->index;

    66

	GetStringWithArgs(buf1, STR_STATION, argv);

    67

    68

	if ( cmp2->index != _last_station_idx) {

    69

		_last_station_idx = cmp2->index;

    70

		argv[0] = cmp2->index;

    71

		GetStringWithArgs(_bufcache, STR_STATION, argv);

    72

	}

    73

    74

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

    75

}

    76

    77

static void GlobalSortStationList(void)

    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

	memset(_num_station_sort, 0, sizeof(_num_station_sort));

    85

    86

	/* Create array for sorting */

    87

	_station_sort = realloc(_station_sort, GetStationPoolSize() * sizeof(_station_sort[0]));

    88

	if (_station_sort == NULL)

    89

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

    90

    91

	FOR_ALL_STATIONS(st) {

    92

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

    93

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

    94

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

    95

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

    96

		}

    97

	}

    98

    99

	// create cumulative station-ownership

   100

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

   101

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

   102

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

   103

   104

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

   105

   106

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

   107

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

   108

	_global_station_sort_dirty = false;

   109

   110

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

   111

}

   112

   113

static void MakeSortedStationList(byte owner)

   114

{

   115

	SortStruct *firstelement;

   116

	uint32 n = 0;

   117

   118

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

   119

		firstelement = &_station_sort[0];

   120

		n = _num_station_sort[0];

   121

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

   122

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

   123

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

   124

	}

   125

   126

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

   127

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

   128

   129

	_station_sort_dirty[owner] = false;

   130

   131

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

   132

}

   133

   134

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

   135

{

   136

	switch(e->event) {

   137

	case WE_PAINT: {

   138

		uint32 i;

   139

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

   140

   141

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

   142

		if (_global_station_sort_dirty)

   143

			GlobalSortStationList();

   144

   145

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

   146

			MakeSortedStationList(window_number);

   147

		}

   148

   149

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

   150

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

   151

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

   152

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

   153

   154

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

   155

		{

   156

			Player *p = GetPlayer(window_number);

   157

			SetDParam(0, p->name_1);

   158

			SetDParam(1, p->name_2);

   159

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

   160

			DrawWindowWidgets(w);

   161

		}

   162

   163

		{

   164

			byte p = 0;

   165

			Station *st;

   166

			int x,xb = 2;

   167

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

   168

			int j;

   169

   170

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

   171

				DrawString(xb, y, STR_304A_NONE, 0);

   172

				return;

   173

			}

   174

   175

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

   176

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

   177

   178

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

   179

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

   180

   181

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

   182

   183

				SetDParam(0, st->index);

   184

				SetDParam(1, st->facilities);

   185

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

   186

   187

				// show cargo waiting and station ratings

   188

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

   189

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

   190

					if (acc != 0) {

   191

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

   192

						x += 10;

   193

					}

   194

				}

   195

				y += 10;

   196

				i++; // next station

   197

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

   198

			}

   199

		}

   200

	} break;

   201

	case WE_CLICK: {

   202

		switch(e->click.widget) {

   203

		case 3: {

   204

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

   205

   206

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

   207

   208

			id_v += w->vscroll.pos;

   209

   210

			{

   211

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

   212

				Station *st;

   213

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

   214

   215

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

   216

   217

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

   218

   219

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

   220

   221

				ScrollMainWindowToTile(st->xy);

   222

			}

   223

		} break;

   224

		}

   225

	} break;

   226

   227

	case WE_4:

   228

		WP(w,plstations_d).refresh_counter++;

   229

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

   230

			WP(w,plstations_d).refresh_counter = 0;

   231

			SetWindowDirty(w);

   232

		}

   233

		break;

   234

   235

	case WE_RESIZE:

   236

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

   237

		break;

   238

	}

   239

}

   240

   241

static const Widget _player_stations_widgets[] = {

   242

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

   243

{    WWT_CAPTION,  RESIZE_RIGHT,    14,    11,   345,     0,    13, STR_3048_STATIONS,				STR_018C_WINDOW_TITLE_DRAG_THIS},

   244

{  WWT_STICKYBOX,     RESIZE_LR,    14,   346,   357,     0,    13, 0x0,											STR_STICKY_BUTTON},

   245

{      WWT_PANEL,     RESIZE_RB,    14,     0,   345,    14,   137, 0x0,											STR_3057_STATION_NAMES_CLICK_ON},

   246

{  WWT_SCROLLBAR,    RESIZE_LRB,    14,   346,   357,    14,   125, 0x0,											STR_0190_SCROLL_BAR_SCROLLS_LIST},

   247

{  WWT_RESIZEBOX,   RESIZE_LRTB,    14,   346,   357,   126,   137, 0x0,											STR_RESIZE_BUTTON},

   248

{   WIDGETS_END},

   249

};

   250

   251

static const WindowDesc _player_stations_desc = {

   252

	-1, -1, 358, 138,

   253

	WC_STATION_LIST,0,

   254

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON | WDF_RESIZABLE,

   255

	_player_stations_widgets,

   256

	PlayerStationsWndProc

   257

};

   258

   259

   260

void ShowPlayerStations(int player)

   261

{

   262

	Window *w;

   263

   264

	w = AllocateWindowDescFront(&_player_stations_desc, player);

   265

	if (w) {

   266

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

   267

		w->vscroll.cap = 12;

   268

		w->resize.step_height = 10;

   269

		w->resize.height = w->height - 10 * 7; // minimum if 5 in the list

   270

	}

   271

}

   272

   273

static const Widget _station_view_expanded_widgets[] = {

   274

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

   275

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   236,     0,    13, STR_300A_0,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   276

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   237,   248,     0,    13, 0x0,         STR_STICKY_BUTTON},

   277

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   236,    14,    65, 0x0,					STR_NULL},

   278

{  WWT_SCROLLBAR,   RESIZE_NONE,    14,   237,   248,    14,    65, 0x0,					STR_0190_SCROLL_BAR_SCROLLS_LIST},

   279

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

   280

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

   281

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

   282

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

   283

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

   284

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   193,   206,   198,   209, STR_TRAIN, STR_SCHEDULED_TRAINS_TIP },

   285

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   207,   220,   198,   209, STR_LORRY, STR_SCHEDULED_ROAD_VEHICLES_TIP },

   286

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   221,   234,   198,   209, STR_PLANE, STR_SCHEDULED_AIRCRAFT_TIP },

   287

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   235,   248,   198,   209, STR_SHIP, STR_SCHEDULED_SHIPS_TIP },

   288

{   WIDGETS_END},

   289

};

   290

   291

static const Widget _station_view_widgets[] = {

   292

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

   293

{    WWT_CAPTION,   RESIZE_NONE,    14,    11,   236,     0,    13, STR_300A_0,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   294

{  WWT_STICKYBOX,   RESIZE_NONE,    14,   237,   248,     0,    13, 0x0,         STR_STICKY_BUTTON},

   295

{     WWT_IMGBTN,   RESIZE_NONE,    14,     0,   236,    14,    65, 0x0,					STR_NULL},

   296

{  WWT_SCROLLBAR,   RESIZE_NONE,    14,   237,   248,    14,    65, 0x0,					STR_0190_SCROLL_BAR_SCROLLS_LIST},

   297

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

   298

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

   299

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

   300

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

   301

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

   302

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   193,   206,    98,   109, STR_TRAIN, STR_SCHEDULED_TRAINS_TIP },

   303

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   207,   220,    98,   109, STR_LORRY, STR_SCHEDULED_ROAD_VEHICLES_TIP },

   304

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   221,   234,    98,   109, STR_PLANE, STR_SCHEDULED_AIRCRAFT_TIP },

   305

{ WWT_PUSHTXTBTN,   RESIZE_NONE,    14,   235,   248,    98,   109, STR_SHIP, STR_SCHEDULED_SHIPS_TIP },

   306

{   WIDGETS_END},

   307

};

   308

   309

static void DrawStationViewWindow(Window *w)

   310

{

   311

	Station *st;

   312

	int i;

   313

	int num;

   314

	int x,y;

   315

	int pos;

   316

	StringID str;

   317

	uint16 station_id;

   318

   319

	station_id = (uint16)w->window_number;

   320

   321

	st = GetStation(w->window_number);

   322

   323

	num = 1;

   324

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

   325

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

   326

			num++;

   327

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

   328

				num++;

   329

		}

   330

	}

   331

	SetVScrollCount(w, num);

   332

   333

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

   334

   335

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

   336

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

   337

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

   338

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

   339

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

   340

   341

	SetDParam(0, st->index);

   342

	SetDParam(1, st->facilities);

   343

	DrawWindowWidgets(w);

   344

   345

	x = 2;

   346

	y = 15;

   347

	pos = w->vscroll.pos;

   348

   349

	if (--pos < 0) {

   350

		str = STR_00D0_NOTHING;

   351

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

   352

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

   353

				str = STR_EMPTY;

   354

		SetDParam(0, str);

   355

		DrawString(x, y, STR_0008_WAITING, 0);

   356

		y += 10;

   357

	}

   358

   359

	i = 0;

   360

	do {

   361

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

   362

		if (waiting == 0)

   363

			continue;

   364

   365

		num = (waiting + 5) / 10;

   366

		if (num != 0) {

   367

			int cur_x = x;

   368

			num = min(num, 23);

   369

			do {

   370

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

   371

				cur_x += 10;

   372

			} while (--num);

   373

		}

   374

   375

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

   376

			if (--pos < 0) {

   377

				SetDParam(1, waiting);

   378

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

   379

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

   380

				y += 10;

   381

			}

   382

		} else {

   383

			/* enroute */

   384

			if (--pos < 0) {

   385

				SetDParam(1, waiting);

   386

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

   387

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

   388

				y += 10;

   389

			}

   390

   391

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

   392

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

   393

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

   394

				y += 10;

   395

			}

   396

		}

   397

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

   398

   399

	if (IsWindowOfPrototype(w, _station_view_widgets)) {

   400

		char *b = _userstring;

   401

   402

		b = InlineString(b, STR_000C_ACCEPTS);

   403

   404

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

   405

			if (b >= endof(_userstring) - 5 - 1) break;

   406

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

   407

				b = InlineString(b, _cargoc.names_s[i]);

   408

				*b++ = ',';

   409

				*b++ = ' ';

   410

			}

   411

		}

   412

   413

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

   414

			b = InlineString(b, STR_00D0_NOTHING);

   415

			*b++ = '\0';

   416

		} else {

   417

			b[-2] = '\0';

   418

		}

   419

   420

		DrawStringMultiLine(2, 67, STR_SPEC_USERSTRING, 245);

   421

	} else {

   422

   423

		DrawString(2, 67, STR_3034_LOCAL_RATING_OF_TRANSPORT, 0);

   424

   425

		y = 77;

   426

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

   427

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

   428

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

   429

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

   430

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

   431

				DrawString(8, y, STR_303D, 0);

   432

				y += 10;

   433

			}

   434

		}

   435

	}

   436

}

   437

   438

   439

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

   440

{

   441

	switch(e->event) {

   442

	case WE_PAINT:

   443

		DrawStationViewWindow(w);

   444

		break;

   445

   446

	case WE_CLICK:

   447

		switch(e->click.widget) {

   448

		case 7:

   449

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

   450

			break;

   451

   452

		case 8:

   453

			SetWindowDirty(w);

   454

   455

			/* toggle height/widget set */

   456

			if (IsWindowOfPrototype(w, _station_view_expanded_widgets)) {

   457

				AssignWidgetToWindow(w, _station_view_widgets);

   458

				w->height = 110;

   459

			} else {

   460

				AssignWidgetToWindow(w, _station_view_expanded_widgets);

   461

				w->height = 210;

   462

			}

   463

   464

			SetWindowDirty(w);

   465

			break;

   466

   467

		case 9: {

   468

			SetDParam(0, w->window_number);

   469

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

   470

		} break;

   471

   472

		case 10: { /* Show a list of scheduled trains to this station */

   473

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

   474

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

   475

			break;

   476

		}

   477

   478

		case 11: { /* Show a list of scheduled road-vehicles to this station */

   479

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

   480

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

   481

			break;

   482

		}

   483

   484

		case 12: { /* Show a list of scheduled aircraft to this station */

   485

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

   486

			/* Since oilrigs have no owners, show the scheduled aircraft of current player */

   487

			PlayerID owner = (st->owner == OWNER_NONE) ? _current_player : st->owner;

   488

			ShowPlayerAircraft(owner, w->window_number);

   489

			break;

   490

		}

   491

   492

		case 13: { /* Show a list of scheduled ships to this station */

   493

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

   494

			/* Since oilrigs/bouys have no owners, show the scheduled ships of current player */

   495

			PlayerID owner = (st->owner == OWNER_NONE) ? _current_player : st->owner;

   496

			ShowPlayerShips(owner, w->window_number);

   497

			break;

   498

		}

   499

		}

   500

		break;

   501