tron@2186: /* $Id$ */
tron@2186: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
tron@1299: #include "debug.h"
tron@2163: #include "functions.h"
tron@1309: #include "strings.h"
tron@1363: #include "table/sprites.h"
tron@507: #include "table/strings.h"
truelight@0: #include "town.h"
truelight@0: #include "window.h"
truelight@0: #include "gfx.h"
truelight@0: #include "viewport.h"
truelight@0: #include "gui.h"
truelight@0: #include "command.h"
truelight@0: #include "player.h"
darkvater@891: #include "network.h"
tron@2159: #include "variables.h"
truelight@0: 
truelight@0: static const Widget _town_authority_widgets[] = {
rubidium@4344: {   WWT_CLOSEBOX,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,                 STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,    13,    11,   316,     0,    13, STR_2022_LOCAL_AUTHORITY, STR_018C_WINDOW_TITLE_DRAG_THIS},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   316,    14,   105, 0x0,                      STR_NULL},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   304,   106,   157, 0x0,                      STR_2043_LIST_OF_THINGS_TO_DO_AT},
rubidium@4344: {  WWT_SCROLLBAR,   RESIZE_NONE,    13,   305,   316,   106,   157, 0x0,                      STR_0190_SCROLL_BAR_SCROLLS_LIST},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   316,   158,   209, 0x0,                      STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,   316,   210,   221, STR_2042_DO_IT,           STR_2044_CARRY_OUT_THE_HIGHLIGHTED},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: extern const byte _town_action_costs[8];
Darkvater@3692: extern void DrawPlayerIcon(PlayerID pid, int x, int y);
truelight@0: 
Darkvater@1793: /** Get a list of available actions to do at a town.
Darkvater@1793:  * @param *nump if not NULL add put the number of available actions in it
Darkvater@1793:  * @param pid the player that is querying the town
Darkvater@1793:  * @param *t the town that is queried
Darkvater@1793:  * @return bitmasked value of enabled actions
Darkvater@1793:  */
Darkvater@1793: uint GetMaskOfTownActions(int *nump, PlayerID pid, const Town *t)
truelight@0: {
truelight@0: 	int32 avail, ref;
Darkvater@1793: 	int num = 0;
truelight@0: 	uint avail_buttons = 0x7F; // by default all buttons except bribe are enabled.
Darkvater@1793: 	uint buttons = 0;
truelight@0: 
Darkvater@4848: 	if (pid != PLAYER_SPECTATOR) {
tron@2639: 		uint i;
tron@2639: 
truelight@0: 		// bribe option enabled?
truelight@0: 		if (_patches.bribe) {
truelight@0: 			// if unwanted, disable everything.
Darkvater@1793: 			if (t->unwanted[pid]) {
truelight@0: 				avail_buttons = 0;
tron@2659: 			} else if (t->ratings[pid] < RATING_BRIBE_MAXIMUM) {
tron@2659: 				SETBIT(avail_buttons, 7); // Allow bribing
tron@2659: 			}
truelight@0: 		}
truelight@0: 
truelight@0: 		// Things worth more than this are not shown
celestar@1962: 		avail = GetPlayer(pid)->player_money + _price.station_value * 200;
truelight@0: 		ref = _price.build_industry >> 8;
truelight@0: 
Darkvater@1793: 		for (i = 0; i != lengthof(_town_action_costs); i++, avail_buttons >>= 1) {
Darkvater@1793: 			if (HASBIT(avail_buttons, 0) && avail >= _town_action_costs[i] * ref) {
truelight@0: 				SETBIT(buttons, i);
truelight@0: 				num++;
truelight@0: 			}
truelight@0: 		}
truelight@0: 
Darkvater@1793: 		/* Disable build statue if already built */
Darkvater@1793: 		if (HASBIT(t->statues, pid)) {
truelight@0: 			CLRBIT(buttons, 4);
truelight@0: 			num--;
truelight@0: 		}
truelight@0: 
truelight@0: 	}
truelight@0: 
Darkvater@1793: 	if (nump != NULL) *nump = num;
truelight@0: 	return buttons;
truelight@0: }
truelight@0: 
truelight@0: static int GetNthSetBit(uint32 bits, int n)
truelight@0: {
truelight@0: 	int i = 0;
tron@2639: 
truelight@0: 	if (n >= 0) {
truelight@0: 		do {
tron@2639: 			if (bits & 1 && --n < 0) return i;
truelight@0: 			i++;
tron@2639: 		} while (bits >>= 1);
truelight@0: 	}
truelight@0: 	return -1;
truelight@0: }
truelight@0: 
truelight@0: static void TownAuthorityWndProc(Window *w, WindowEvent *e)
truelight@0: {
Darkvater@1793: 	switch (e->event) {
Darkvater@1793: 	case WE_PAINT: {
Darkvater@1793: 		const Town *t = GetTown(w->window_number);
Darkvater@1793: 		int numact;
Darkvater@1793: 		uint buttons = GetMaskOfTownActions(&numact, _local_player, t);
truelight@193: 
truelight@0: 		SetVScrollCount(w, numact + 1);
truelight@0: 
truelight@0: 		if (WP(w,def_d).data_1 != -1 && !HASBIT(buttons, WP(w,def_d).data_1))
truelight@0: 			WP(w,def_d).data_1 = -1;
truelight@0: 
belugas@4709: 		SetWindowWidgetDisabledState(w, 6, WP(w, def_d).data_1 == -1);
truelight@0: 
truelight@0: 		{
truelight@0: 			int y;
belugas@4171: 			const Player *p;
truelight@0: 			int r;
truelight@0: 			StringID str;
truelight@0: 
tron@534: 			SetDParam(0, w->window_number);
truelight@0: 			DrawWindowWidgets(w);
truelight@0: 
truelight@0: 			DrawString(2, 15, STR_2023_TRANSPORT_COMPANY_RATINGS, 0);
dominik@122: 
truelight@0: 			// Draw list of players
truelight@0: 			y = 25;
truelight@0: 			FOR_ALL_PLAYERS(p) {
tron@2639: 				if (p->is_active && (HASBIT(t->have_ratings, p->index) || t->exclusivity == p->index)) {
dominik@125: 					DrawPlayerIcon(p->index, 2, y);
dominik@121: 
tron@534: 					SetDParam(0, p->name_1);
tron@534: 					SetDParam(1, p->name_2);
tron@534: 					SetDParam(2, GetPlayerNameString(p->index, 3));
truelight@0: 
truelight@0: 					r = t->ratings[p->index];
rubidium@4434: 					(str = STR_3035_APPALLING, r <= RATING_APPALLING) || // Apalling
rubidium@4434: 					(str++,                    r <= RATING_VERYPOOR)  || // Very Poor
rubidium@4434: 					(str++,                    r <= RATING_POOR)      || // Poor
rubidium@4434: 					(str++,                    r <= RATING_MEDIOCRE)  || // Mediocore
rubidium@4434: 					(str++,                    r <= RATING_GOOD)      || // Good
rubidium@4434: 					(str++,                    r <= RATING_VERYGOOD)  || // Very Good
rubidium@4434: 					(str++,                    r <= RATING_EXCELLENT) || // Excellent
rubidium@4434: 					(str++,                    true);                    // Outstanding
truelight@0: 
ludde@2063: 					SetDParam(4, str);
darkvater@246: 					if (t->exclusivity == p->index) // red icon for player with exclusive rights
tron@2639: 						DrawSprite(SPR_BLOT | PALETTE_TO_RED, 18, y);
darkvater@246: 
darkvater@246: 					DrawString(28, y, STR_2024, 0);
tron@2639: 					y += 10;
truelight@0: 				}
truelight@0: 			}
truelight@0: 		}
truelight@0: 
truelight@0: 		// Draw actions list
truelight@0: 		{
truelight@0: 			int y = 107, i;
truelight@0: 			int pos = w->vscroll.pos;
truelight@0: 
truelight@0: 			if (--pos < 0) {
truelight@0: 				DrawString(2, y, STR_2045_ACTIONS_AVAILABLE, 0);
tron@2639: 				y += 10;
truelight@0: 			}
tron@2639: 			for (i = 0; buttons; i++, buttons >>= 1) {
tron@2639: 				if (pos <= -5) break;
truelight@0: 
truelight@0: 				if (buttons&1 && --pos < 0) {
truelight@0: 					DrawString(3, y, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i, 6);
truelight@0: 					y += 10;
truelight@0: 				}
truelight@0: 			}
truelight@0: 		}
dominik@122: 
truelight@0: 		{
tron@2639: 			int i = WP(w,def_d).data_1;
tron@2639: 
tron@2639: 			if (i != -1) {
tron@534: 				SetDParam(1, (_price.build_industry >> 8) * _town_action_costs[i]);
tron@534: 				SetDParam(0, STR_2046_SMALL_ADVERTISING_CAMPAIGN + i);
truelight@0: 				DrawStringMultiLine(2, 159, STR_204D_INITIATE_A_SMALL_LOCAL + i, 313);
truelight@0: 			}
truelight@0: 		}
truelight@193: 
Darkvater@1793: 	} break;
truelight@0: 
truelight@0: 	case WE_CLICK:
belugas@4634: 		switch (e->we.click.widget) {
truelight@0: 		case 3: { /* listbox */
Darkvater@1793: 			const Town *t = GetTown(w->window_number);
belugas@4634: 			int y = (e->we.click.pt.y - 0x6B) / 10;
tron@2639: 
tron@2639: 			if (!IS_INT_INSIDE(y, 0, 5)) return;
truelight@0: 
Darkvater@1793: 			y = GetNthSetBit(GetMaskOfTownActions(NULL, _local_player, t), y + w->vscroll.pos - 1);
truelight@0: 			if (y >= 0) {
truelight@0: 				WP(w,def_d).data_1 = y;
truelight@0: 				SetWindowDirty(w);
truelight@0: 			}
truelight@0: 			break;
truelight@0: 		}
truelight@0: 
truelight@0: 		case 6: { /* carry out the action */
Darkvater@1803: 			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));
truelight@0: 			break;
truelight@0: 		}
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_4:
truelight@0: 		SetWindowDirty(w);
truelight@0: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const WindowDesc _town_authority_desc = {
Darkvater@5070: 	WDP_AUTO, WDP_AUTO, 317, 222,
truelight@0: 	WC_TOWN_AUTHORITY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_town_authority_widgets,
truelight@0: 	TownAuthorityWndProc
truelight@0: };
truelight@0: 
tron@410: static void ShowTownAuthorityWindow(uint town)
truelight@0: {
belugas@4171: 	Window *w = AllocateWindowDescFront(&_town_authority_desc, town);
truelight@0: 
tron@2639: 	if (w != NULL) {
truelight@0: 		w->vscroll.cap = 5;
truelight@0: 		WP(w,def_d).data_1 = -1;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void TownViewWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@919: 	Town *t = GetTown(w->window_number);
truelight@0: 
tron@2639: 	switch (e->event) {
truelight@0: 	case WE_PAINT:
darkvater@891: 		// disable renaming town in network games if you are not the server
belugas@4709: 		SetWindowWidgetDisabledState(w, 8, _networking && !_network_server);
darkvater@891: 
tron@534: 		SetDParam(0, t->index);
truelight@0: 		DrawWindowWidgets(w);
truelight@193: 
tron@534: 		SetDParam(0, t->population);
tron@534: 		SetDParam(1, t->num_houses);
tron@2639: 		DrawString(2, 107, STR_2006_POPULATION, 0);
truelight@193: 
tron@534: 		SetDParam(0, t->act_pass);
tron@534: 		SetDParam(1, t->max_pass);
tron@2639: 		DrawString(2, 117, STR_200D_PASSENGERS_LAST_MONTH_MAX, 0);
truelight@0: 
tron@534: 		SetDParam(0, t->act_mail);
tron@534: 		SetDParam(1, t->max_mail);
tron@2639: 		DrawString(2, 127, STR_200E_MAIL_LAST_MONTH_MAX, 0);
truelight@193: 
truelight@0: 		DrawWindowViewport(w);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK:
belugas@4634: 		switch (e->we.click.widget) {
tron@2639: 			case 6: /* scroll to location */
tron@2639: 				ScrollMainWindowToTile(t->xy);
tron@2639: 				break;
tron@2639: 
tron@2639: 			case 7: /* town authority */
tron@2639: 				ShowTownAuthorityWindow(w->window_number);
tron@2639: 				break;
tron@2639: 
tron@2639: 			case 8: /* rename */
tron@2639: 				SetDParam(0, w->window_number);
truelight@4299: 				ShowQueryString(STR_TOWN, STR_2007_RENAME_TOWN, 31, 130, w->window_class, w->window_number, CS_ALPHANUMERAL);
tron@2639: 				break;
tron@2639: 
tron@2639: 			case 9: /* expand town */
tron@2639: 				ExpandTown(t);
tron@2639: 				break;
tron@2639: 
tron@2639: 			case 10: /* delete town */
tron@2639: 				DeleteTown(t);
tron@2639: 				break;
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
tron@2548: 	case WE_ON_EDIT_TEXT:
belugas@4634: 		if (e->we.edittext.str[0] != '\0') {
belugas@4634: 			_cmd_text = e->we.edittext.str;
tron@1820: 			DoCommandP(0, w->window_number, 0, NULL,
tron@1820: 				CMD_RENAME_TOWN | CMD_MSG(STR_2008_CAN_T_RENAME_TOWN));
tron@1820: 		}
tron@2548: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: 
truelight@0: static const Widget _town_view_widgets[] = {
rubidium@4344: {   WWT_CLOSEBOX,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,                 STR_018B_CLOSE_WINDOW},
rubidium@4344: {    WWT_CAPTION,   RESIZE_NONE,    13,    11,   247,     0,    13, STR_2005,                 STR_018C_WINDOW_TITLE_DRAG_THIS},
rubidium@4344: {  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,                      STR_STICKY_BUTTON},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,                      STR_NULL},
Darkvater@4939: {      WWT_INSET,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,                      STR_NULL},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,   106,   137, 0x0,                      STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION,        STR_200B_CENTER_THE_MAIN_VIEW_ON},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_2020_LOCAL_AUTHORITY, STR_2021_SHOW_INFORMATION_ON_LOCAL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0130_RENAME,          STR_200C_CHANGE_TOWN_NAME},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _town_view_desc = {
Darkvater@5070: 	WDP_AUTO, WDP_AUTO, 260, 150,
truelight@0: 	WC_TOWN_VIEW,0,
darkvater@758: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,
truelight@0: 	_town_view_widgets,
truelight@0: 	TownViewWndProc
truelight@0: };
truelight@0: 
truelight@0: static const Widget _town_view_scen_widgets[] = {
rubidium@4344: {   WWT_CLOSEBOX,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,          STR_018B_CLOSE_WINDOW},
rubidium@4344: {    WWT_CAPTION,   RESIZE_NONE,    13,    11,   172,     0,    13, STR_2005,          STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {  WWT_STICKYBOX,   RESIZE_NONE,    13,   248,   259,     0,    13, 0x0,               STR_STICKY_BUTTON},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,    14,   105, 0x0,               STR_NULL},
Darkvater@4939: {      WWT_INSET,   RESIZE_NONE,    13,     2,   257,    16,   103, 0x0,               STR_NULL},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,    13,     0,   259,   106,   137, 0x0,               STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    85,   138,   149, STR_00E4_LOCATION, STR_200B_CENTER_THE_MAIN_VIEW_ON},
rubidium@4344: {      WWT_EMPTY,   RESIZE_NONE,     0,     0,     0,     0,     0, 0x0,               STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   173,   247,     0,    13, STR_0130_RENAME,   STR_200C_CHANGE_TOWN_NAME},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    86,   171,   138,   149, STR_023C_EXPAND,   STR_023B_INCREASE_SIZE_OF_TOWN},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   172,   259,   138,   149, STR_0290_DELETE,   STR_0291_DELETE_THIS_TOWN_COMPLETELY},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _town_view_scen_desc = {
Darkvater@5070: 	WDP_AUTO, WDP_AUTO, 260, 150,
truelight@0: 	WC_TOWN_VIEW,0,
darkvater@758: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,
truelight@0: 	_town_view_scen_widgets,
truelight@0: 	TownViewWndProc
truelight@0: };
truelight@0: 
Darkvater@3349: void ShowTownViewWindow(TownID town)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 
truelight@0: 	if (_game_mode != GM_EDITOR) {
truelight@0: 		w = AllocateWindowDescFront(&_town_view_desc, town);
truelight@0: 	} else {
truelight@0: 		w = AllocateWindowDescFront(&_town_view_scen_desc, town);
truelight@0: 	}
truelight@0: 
tron@2639: 	if (w != NULL) {
truelight@0: 		w->flags4 |= WF_DISABLE_VP_SCROLL;
tron@2639: 		AssignWindowViewport(w, 3, 17, 0xFE, 0x56, GetTown(town)->xy, 1);
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _town_directory_widgets[] = {
rubidium@4344: {   WWT_CLOSEBOX,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,               STR_018B_CLOSE_WINDOW},
rubidium@4344: {    WWT_CAPTION,   RESIZE_NONE,    13,    11,   195,     0,    13, STR_2000_TOWNS,         STR_018C_WINDOW_TITLE_DRAG_THIS},
rubidium@4344: {  WWT_STICKYBOX,   RESIZE_NONE,    13,   196,   207,     0,    13, 0x0,                    STR_STICKY_BUTTON},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,    98,    14,    25, STR_SORT_BY_NAME,       STR_SORT_ORDER_TIP},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,    99,   195,    14,    25, STR_SORT_BY_POPULATION, STR_SORT_ORDER_TIP},
Darkvater@4938: {      WWT_PANEL, RESIZE_BOTTOM,    13,     0,   195,    26,   189, 0x0,                    STR_200A_TOWN_NAMES_CLICK_ON_NAME},
rubidium@4344: {  WWT_SCROLLBAR, RESIZE_BOTTOM,    13,   196,   207,    14,   189, 0x0,                    STR_0190_SCROLL_BAR_SCROLLS_LIST},
Darkvater@4938: {      WWT_PANEL,     RESIZE_TB,    13,     0,   195,   190,   201, 0x0,                    STR_NULL},
rubidium@4344: {  WWT_RESIZEBOX,     RESIZE_TB,    13,   196,   207,   190,   201, 0x0,                    STR_RESIZE_BUTTON},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: 
truelight@0: // used to get a sorted list of the towns
truelight@0: static uint _num_town_sort;
truelight@0: 
truelight@0: static char _bufcache[64];
tron@4277: static const Town* _last_town;
truelight@0: 
darkvater@164: static int CDECL TownNameSorter(const void *a, const void *b)
truelight@0: {
tron@4277: 	const Town* ta = *(const Town**)a;
tron@4277: 	const Town* tb = *(const Town**)b;
truelight@0: 	char buf1[64];
truelight@0: 	int r;
truelight@0: 
Darkvater@4416: 	SetDParam(0, ta->index);
Darkvater@4912: 	GetString(buf1, STR_TOWN, lastof(buf1));
truelight@0: 
truelight@1260: 	/* If 'b' is the same town as in the last round, use the cached value
truelight@1260: 	 *  We do this to speed stuff up ('b' is called with the same value a lot of
tron@4277: 	 *  times after eachother) */
tron@4277: 	if (tb != _last_town) {
tron@4277: 		_last_town = tb;
Darkvater@4416: 		SetDParam(0, tb->index);
Darkvater@4912: 		GetString(_bufcache, STR_TOWN, lastof(_bufcache));
truelight@0: 	}
truelight@0: 
truelight@0: 	r = strcmp(buf1, _bufcache);
truelight@0: 	if (_town_sort_order & 1) r = -r;
truelight@0: 	return r;
truelight@0: }
truelight@0: 
darkvater@164: static int CDECL TownPopSorter(const void *a, const void *b)
truelight@0: {
tron@4277: 	const Town* ta = *(const Town**)a;
tron@4277: 	const Town* tb = *(const Town**)b;
darkvater@164: 	int r = ta->population - tb->population;
truelight@0: 	if (_town_sort_order & 1) r = -r;
truelight@0: 	return r;
truelight@0: }
truelight@0: 
tron@1093: static void MakeSortedTownList(void)
truelight@0: {
tron@2630: 	const Town* t;
tron@2639: 	uint n = 0;
truelight@919: 
truelight@919: 	/* Create array for sorting */
matthijs@5247: 	_town_sort = realloc((void*)_town_sort, (GetMaxTownIndex() + 1) * sizeof(_town_sort[0]));
Darkvater@5568: 	if (_town_sort == NULL) error("Could not allocate memory for the town-sorting-list");
truelight@919: 
truelight@4346: 	FOR_ALL_TOWNS(t) _town_sort[n++] = t;
truelight@821: 
truelight@0: 	_num_town_sort = n;
truelight@0: 
tron@4277: 	_last_town = NULL; // used for "cache"
tron@4277: 	qsort((void*)_town_sort, n, sizeof(_town_sort[0]), _town_sort_order & 2 ? TownPopSorter : TownNameSorter);
darkvater@65: 
Darkvater@5568: 	DEBUG(misc, 3, "Resorting towns list");
truelight@0: }
truelight@0: 
truelight@0: 
truelight@0: static void TownDirectoryWndProc(Window *w, WindowEvent *e)
truelight@0: {
tron@2639: 	switch (e->event) {
truelight@0: 	case WE_PAINT: {
truelight@0: 		if (_town_sort_dirty) {
truelight@0: 			_town_sort_dirty = false;
truelight@0: 			MakeSortedTownList();
truelight@0: 		}
truelight@0: 
darkvater@174: 		SetVScrollCount(w, _num_town_sort);
truelight@0: 
truelight@0: 		DrawWindowWidgets(w);
tron@2406: 		DoDrawString(_town_sort_order & 1 ? DOWNARROW : UPARROW, (_town_sort_order <= 1) ? 88 : 187, 15, 0x10);
truelight@193: 
darkvater@174: 		{
darkvater@174: 			int n = 0;
darkvater@174: 			uint16 i = w->vscroll.pos;
darkvater@174: 			int y = 28;
truelight@0: 
darkvater@174: 			while (i < _num_town_sort) {
tron@4277: 				const Town* t = _town_sort[i];
darkvater@174: 
darkvater@174: 				assert(t->xy);
darkvater@174: 
tron@534: 				SetDParam(0, t->index);
tron@534: 				SetDParam(1, t->population);
darkvater@174: 				DrawString(2, y, STR_2057, 0);
darkvater@174: 
darkvater@174: 				y += 10;
darkvater@174: 				i++;
tron@2549: 				if (++n == w->vscroll.cap) break; // max number of towns in 1 window
darkvater@174: 			}
celestar@1080: 			SetDParam(0, GetWorldPopulation());
celestar@1080: 			DrawString(3, w->height - 12 + 2, STR_TOWN_POPULATION, 0);
truelight@0: 		}
truelight@0: 	} break;
truelight@0: 
truelight@0: 	case WE_CLICK:
belugas@4634: 		switch (e->we.click.widget) {
darkvater@758: 		case 3: { /* Sort by Name ascending/descending */
darkvater@174: 			_town_sort_order = (_town_sort_order == 0) ? 1 : 0;
truelight@0: 			_town_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@0: 
darkvater@758: 		case 4: { /* Sort by Population ascending/descending */
darkvater@174: 			_town_sort_order = (_town_sort_order == 2) ? 3 : 2;
truelight@0: 			_town_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@193: 
darkvater@758: 		case 5: { /* Click on Town Matrix */
tron@4277: 			const Town* t;
tron@4277: 
belugas@4634: 			uint16 id_v = (e->we.click.pt.y - 28) / 10;
truelight@0: 
tron@2549: 			if (id_v >= w->vscroll.cap) return; // click out of bounds
darkvater@174: 
darkvater@174: 			id_v += w->vscroll.pos;
darkvater@174: 
tron@2549: 			if (id_v >= _num_town_sort) return; // click out of town bounds
darkvater@174: 
tron@4277: 			t = _town_sort[id_v];
tron@4277: 			assert(t->xy);
tron@4277: 			ScrollMainWindowToTile(t->xy);
tron@4277: 			break;
tron@4277: 		}
truelight@0: 		}
truelight@0: 		break;
truelight@193: 
truelight@0: 	case WE_4:
truelight@0: 		SetWindowDirty(w);
truelight@0: 		break;
truelight@867: 
truelight@867: 	case WE_RESIZE:
belugas@4634: 		w->vscroll.cap += e->we.sizing.diff.y / 10;
truelight@867: 		break;
truelight@193: 	}
truelight@0: }
truelight@0: 
truelight@0: static const WindowDesc _town_directory_desc = {
Darkvater@5070: 	WDP_AUTO, WDP_AUTO, 208, 202,
truelight@0: 	WC_TOWN_DIRECTORY,0,
truelight@867: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,
truelight@0: 	_town_directory_widgets,
truelight@0: 	TownDirectoryWndProc
truelight@0: };
truelight@0: 
truelight@0: 
tron@1093: void ShowTownDirectory(void)
truelight@0: {
belugas@4171: 	Window *w = AllocateWindowDescFront(&_town_directory_desc, 0);
truelight@0: 
tron@2639: 	if (w != NULL) {
truelight@0: 		w->vscroll.cap = 16;
truelight@867: 		w->resize.step_height = 10;
celestar@1080: 		w->resize.height = w->height - 10 * 6; // minimum of 10 items in the list, each item 10 high
truelight@0: 	}
truelight@0: }