/* $Id$ */ /** @file vehicle_gui.cpp */ #include "stdafx.h" #include "openttd.h" #include "debug.h" #include "functions.h" #include "player.h" #include "station.h" #include "strings.h" #include "table/sprites.h" #include "table/strings.h" #include "vehicle.h" #include "window.h" #include "engine.h" #include "gui.h" #include "command.h" #include "gfx.h" #include "variables.h" #include "vehicle_gui.h" #include "viewport.h" #include "train.h" #include "newgrf_callbacks.h" #include "newgrf_engine.h" #include "newgrf_text.h" #include "date.h" #include "ship.h" #include "aircraft.h" #include "roadveh.h" #include "depot.h" #include "helpers.hpp" #include "cargotype.h" #include "group.h" struct Sorting { Listing aircraft; Listing roadveh; Listing ship; Listing train; }; static Sorting _sorting; static bool _internal_sort_order; // descending/ascending typedef int CDECL VehicleSortListingTypeFunction(const void*, const void*); static VehicleSortListingTypeFunction VehicleNumberSorter; static VehicleSortListingTypeFunction VehicleNameSorter; static VehicleSortListingTypeFunction VehicleAgeSorter; static VehicleSortListingTypeFunction VehicleProfitThisYearSorter; static VehicleSortListingTypeFunction VehicleProfitLastYearSorter; static VehicleSortListingTypeFunction VehicleCargoSorter; static VehicleSortListingTypeFunction VehicleReliabilitySorter; static VehicleSortListingTypeFunction VehicleMaxSpeedSorter; static VehicleSortListingTypeFunction VehicleModelSorter; static VehicleSortListingTypeFunction VehicleValueSorter; static VehicleSortListingTypeFunction* const _vehicle_sorter[] = { &VehicleNumberSorter, &VehicleNameSorter, &VehicleAgeSorter, &VehicleProfitThisYearSorter, &VehicleProfitLastYearSorter, &VehicleCargoSorter, &VehicleReliabilitySorter, &VehicleMaxSpeedSorter, &VehicleModelSorter, &VehicleValueSorter, }; const StringID _vehicle_sort_listing[] = { STR_SORT_BY_NUMBER, STR_SORT_BY_DROPDOWN_NAME, STR_SORT_BY_AGE, STR_SORT_BY_PROFIT_THIS_YEAR, STR_SORT_BY_PROFIT_LAST_YEAR, STR_SORT_BY_TOTAL_CAPACITY_PER_CARGOTYPE, STR_SORT_BY_RELIABILITY, STR_SORT_BY_MAX_SPEED, STR_SORT_BY_MODEL, STR_SORT_BY_VALUE, INVALID_STRING_ID }; void RebuildVehicleLists() { Window* const *wz; FOR_ALL_WINDOWS(wz) { Window *w = *wz; switch (w->window_class) { case WC_TRAINS_LIST: case WC_ROADVEH_LIST: case WC_SHIPS_LIST: case WC_AIRCRAFT_LIST: WP(w, vehiclelist_d).l.flags |= VL_REBUILD; SetWindowDirty(w); break; default: break; } } } void ResortVehicleLists() { Window* const *wz; FOR_ALL_WINDOWS(wz) { Window *w = *wz; switch (w->window_class) { case WC_TRAINS_LIST: case WC_ROADVEH_LIST: case WC_SHIPS_LIST: case WC_AIRCRAFT_LIST: WP(w, vehiclelist_d).l.flags |= VL_RESORT; SetWindowDirty(w); break; default: break; } } } void BuildVehicleList(vehiclelist_d *vl, PlayerID owner, uint16 index, uint16 window_type) { if (!(vl->l.flags & VL_REBUILD)) return; DEBUG(misc, 3, "Building vehicle list for player %d at station %d", owner, index); vl->l.list_length = GenerateVehicleSortList(&vl->sort_list, &vl->length_of_sort_list, vl->vehicle_type, owner, index, window_type); vl->l.flags &= ~VL_REBUILD; vl->l.flags |= VL_RESORT; } void SortVehicleList(vehiclelist_d *vl) { if (!(vl->l.flags & VL_RESORT)) return; _internal_sort_order = (vl->l.flags & VL_DESC) != 0; qsort((void*)vl->sort_list, vl->l.list_length, sizeof(vl->sort_list[0]), _vehicle_sorter[vl->l.sort_type]); vl->l.resort_timer = DAY_TICKS * PERIODIC_RESORT_DAYS; vl->l.flags &= ~VL_RESORT; } void DepotSortList(Vehicle **v, uint16 length) { _internal_sort_order = 0; qsort((void*)v, length, sizeof(v[0]), _vehicle_sorter[0]); } /** draw the vehicle profit button in the vehicle list window. */ void DrawVehicleProfitButton(const Vehicle *v, int x, int y) { SpriteID pal; /* draw profit-based colored icons */ if (v->age <= 365 * 2) { pal = PALETTE_TO_GREY; } else if (v->profit_last_year < 0) { pal = PALETTE_TO_RED; } else if (v->profit_last_year < 10000) { pal = PALETTE_TO_YELLOW; } else { pal = PALETTE_TO_GREEN; } DrawSprite(SPR_BLOT, pal, x, y); } struct RefitOption { CargoID cargo; byte subtype; uint16 value; EngineID engine; }; struct RefitList { uint num_lines; RefitOption *items; }; static RefitList *BuildRefitList(const Vehicle *v) { uint max_lines = 256; RefitOption *refit = CallocT(max_lines); RefitList *list = CallocT(1); Vehicle *u = (Vehicle*)v; uint num_lines = 0; uint i; do { uint32 cmask = EngInfo(u->engine_type)->refit_mask; byte callbackmask = EngInfo(u->engine_type)->callbackmask; /* Skip this engine if it has no capacity */ if (u->cargo_cap == 0) continue; /* Loop through all cargos in the refit mask */ for (CargoID cid = 0; cid < NUM_CARGO && num_lines < max_lines; cid++) { /* Skip cargo type if it's not listed */ if (!HASBIT(cmask, cid)) continue; /* Check the vehicle's callback mask for cargo suffixes */ if (HASBIT(callbackmask, CBM_CARGO_SUFFIX)) { /* Make a note of the original cargo type. It has to be * changed to test the cargo & subtype... */ CargoID temp_cargo = u->cargo_type; byte temp_subtype = u->cargo_subtype; byte refit_cyc; u->cargo_type = cid; for (refit_cyc = 0; refit_cyc < 16 && num_lines < max_lines; refit_cyc++) { bool duplicate = false; uint16 callback; u->cargo_subtype = refit_cyc; callback = GetVehicleCallback(CBID_VEHICLE_CARGO_SUFFIX, 0, 0, u->engine_type, u); if (callback == 0xFF) callback = CALLBACK_FAILED; if (refit_cyc != 0 && callback == CALLBACK_FAILED) break; /* Check if this cargo and subtype combination are listed */ for (i = 0; i < num_lines && !duplicate; i++) { if (refit[i].cargo == cid && refit[i].value == callback) duplicate = true; } if (duplicate) continue; refit[num_lines].cargo = cid; refit[num_lines].subtype = refit_cyc; refit[num_lines].value = callback; refit[num_lines].engine = u->engine_type; num_lines++; } /* Reset the vehicle's cargo type */ u->cargo_type = temp_cargo; u->cargo_subtype = temp_subtype; } else { /* No cargo suffix callback -- use no subtype */ bool duplicate = false; for (i = 0; i < num_lines && !duplicate; i++) { if (refit[i].cargo == cid && refit[i].value == CALLBACK_FAILED) duplicate = true; } if (!duplicate) { refit[num_lines].cargo = cid; refit[num_lines].subtype = 0; refit[num_lines].value = CALLBACK_FAILED; refit[num_lines].engine = INVALID_ENGINE; num_lines++; } } } } while (v->type == VEH_TRAIN && (u = u->next) != NULL && num_lines < max_lines); list->num_lines = num_lines; list->items = refit; return list; } /** Draw the list of available refit options for a consist. * Draw the list and highlight the selected refit option (if any) * @param *list first vehicle in consist to get the refit-options of * @param sel selected refit cargo-type in the window * @param pos position of the selected item in caller widow * @param rows number of rows(capacity) in caller window * @param delta step height in caller window * @return the refit option that is hightlighted, NULL if none */ static RefitOption *DrawVehicleRefitWindow(const RefitList *list, int sel, uint pos, uint rows, uint delta) { RefitOption *refit = list->items; RefitOption *selected = NULL; uint num_lines = list->num_lines; uint y = 31; uint i; /* Draw the list, and find the selected cargo (by its position in list) */ for (i = 0; i < num_lines; i++) { byte colour = 16; if (sel == 0) { selected = &refit[i]; colour = 12; } if (i >= pos && i < pos + rows) { /* Draw the cargo name */ int last_x = DrawString(2, y, GetCargo(refit[i].cargo)->name, colour); /* If the callback succeeded, draw the cargo suffix */ if (refit[i].value != CALLBACK_FAILED) { DrawString(last_x + 1, y, GetGRFStringID(GetEngineGRFID(refit[i].engine), 0xD000 + refit[i].value), colour); } y += delta; } sel--; } return selected; } static void VehicleRefitWndProc(Window *w, WindowEvent *e) { switch (e->event) { case WE_PAINT: { Vehicle *v = GetVehicle(w->window_number); if (v->type == VEH_TRAIN) { uint length = CountVehiclesInChain(v); if (length != WP(w, refit_d).length) { /* Consist length has changed, so rebuild the refit list */ free(WP(w, refit_d).list->items); free(WP(w, refit_d).list); WP(w, refit_d).list = BuildRefitList(v); WP(w, refit_d).length = length; } } SetVScrollCount(w, WP(w, refit_d).list->num_lines); SetDParam(0, v->index); DrawWindowWidgets(w); WP(w, refit_d).cargo = DrawVehicleRefitWindow(WP(w, refit_d).list, WP(w, refit_d).sel, w->vscroll.pos, w->vscroll.cap, w->resize.step_height); if (WP(w, refit_d).cargo != NULL) { CommandCost cost; cost = DoCommand(v->tile, v->index, WP(w, refit_d).cargo->cargo | WP(w, refit_d).cargo->subtype << 8, DC_QUERY_COST, GetCmdRefitVeh(GetVehicle(w->window_number)->type)); if (CmdSucceeded(cost)) { SetDParam(0, WP(w, refit_d).cargo->cargo); SetDParam(1, _returned_refit_capacity); SetDParam(2, cost.GetCost()); DrawString(2, w->widget[5].top + 1, STR_9840_NEW_CAPACITY_COST_OF_REFIT, 0); } } } break; case WE_CLICK: switch (e->we.click.widget) { case 3: { // listbox int y = e->we.click.pt.y - w->widget[3].top; if (y >= 0) { WP(w, refit_d).sel = (y / (int)w->resize.step_height) + w->vscroll.pos; SetWindowDirty(w); } } break; case 6: // refit button if (WP(w, refit_d).cargo != NULL) { const Vehicle *v = GetVehicle(w->window_number); if (WP(w, refit_d).order == INVALID_VEH_ORDER_ID) { int command = 0; switch (v->type) { default: NOT_REACHED(); case VEH_TRAIN: command = CMD_REFIT_RAIL_VEHICLE | CMD_MSG(STR_RAIL_CAN_T_REFIT_VEHICLE); break; case VEH_ROAD: command = CMD_REFIT_ROAD_VEH | CMD_MSG(STR_REFIT_ROAD_VEHICLE_CAN_T); break; case VEH_SHIP: command = CMD_REFIT_SHIP | CMD_MSG(STR_9841_CAN_T_REFIT_SHIP); break; case VEH_AIRCRAFT: command = CMD_REFIT_AIRCRAFT | CMD_MSG(STR_A042_CAN_T_REFIT_AIRCRAFT); break; } if (DoCommandP(v->tile, v->index, WP(w, refit_d).cargo->cargo | WP(w, refit_d).cargo->subtype << 8, NULL, command)) DeleteWindow(w); } else { if (DoCommandP(v->tile, v->index, WP(w, refit_d).cargo->cargo | WP(w, refit_d).cargo->subtype << 8 | WP(w, refit_d).order << 16, NULL, CMD_ORDER_REFIT)) DeleteWindow(w); } } break; } break; case WE_RESIZE: w->vscroll.cap += e->we.sizing.diff.y / (int)w->resize.step_height; w->widget[3].data = (w->vscroll.cap << 8) + 1; break; case WE_DESTROY: free(WP(w, refit_d).list->items); free(WP(w, refit_d).list); break; } } static const Widget _vehicle_refit_widgets[] = { { WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW}, { WWT_CAPTION, RESIZE_NONE, 14, 11, 239, 0, 13, STR_983B_REFIT, STR_018C_WINDOW_TITLE_DRAG_THIS}, { WWT_TEXTBTN, RESIZE_NONE, 14, 0, 239, 14, 27, STR_983F_SELECT_CARGO_TYPE_TO_CARRY, STR_983D_SELECT_TYPE_OF_CARGO_FOR}, { WWT_MATRIX, RESIZE_BOTTOM, 14, 0, 227, 28, 139, 0x801, STR_EMPTY}, { WWT_SCROLLBAR, RESIZE_BOTTOM, 14, 228, 239, 28, 139, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST}, { WWT_PANEL, RESIZE_TB, 14, 0, 239, 140, 161, 0x0, STR_NULL}, { WWT_PUSHTXTBTN, RESIZE_TB, 14, 0, 227, 162, 173, 0x0, STR_NULL}, { WWT_RESIZEBOX, RESIZE_TB, 14, 228, 239, 162, 173, 0x0, STR_RESIZE_BUTTON}, { WIDGETS_END}, }; static const WindowDesc _vehicle_refit_desc = { WDP_AUTO, WDP_AUTO, 240, 174, 240, 174, WC_VEHICLE_REFIT, WC_VEHICLE_VIEW, WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE, _vehicle_refit_widgets, VehicleRefitWndProc, }; /** Show the refit window for a vehicle * @param *v The vehicle to show the refit window for * @param order of the vehicle ( ? ) */ void ShowVehicleRefitWindow(const Vehicle *v, VehicleOrderID order) { Window *w; DeleteWindowById(WC_VEHICLE_REFIT, v->index); w = AllocateWindowDescFront(&_vehicle_refit_desc, v->index); WP(w, refit_d).order = order; if (w != NULL) { w->caption_color = v->owner; w->vscroll.cap = 8; w->resize.step_height = 14; WP(w, refit_d).sel = -1; WP(w, refit_d).list = BuildRefitList(v); if (v->type == VEH_TRAIN) WP(w, refit_d).length = CountVehiclesInChain(v); SetVScrollCount(w, WP(w, refit_d).list->num_lines); switch (v->type) { case VEH_TRAIN: w->widget[3].tooltips = STR_RAIL_SELECT_TYPE_OF_CARGO_FOR; w->widget[6].data = STR_RAIL_REFIT_VEHICLE; w->widget[6].tooltips = STR_RAIL_REFIT_TO_CARRY_HIGHLIGHTED; break; case VEH_ROAD: w->widget[3].tooltips = STR_ROAD_SELECT_TYPE_OF_CARGO_FOR; w->widget[6].data = STR_REFIT_ROAD_VEHICLE; w->widget[6].tooltips = STR_REFIT_ROAD_VEHICLE_TO_CARRY_HIGHLIGHTED; break; case VEH_SHIP: w->widget[3].tooltips = STR_983D_SELECT_TYPE_OF_CARGO_FOR; w->widget[6].data = STR_983C_REFIT_SHIP; w->widget[6].tooltips = STR_983E_REFIT_SHIP_TO_CARRY_HIGHLIGHTED; break; case VEH_AIRCRAFT: w->widget[3].tooltips = STR_A03E_SELECT_TYPE_OF_CARGO_FOR; w->widget[6].data = STR_A03D_REFIT_AIRCRAFT; w->widget[6].tooltips = STR_A03F_REFIT_AIRCRAFT_TO_CARRY; break; default: NOT_REACHED(); } } } /** Display additional text from NewGRF in the purchase information window */ uint ShowAdditionalText(int x, int y, uint w, EngineID engine) { uint16 callback = GetVehicleCallback(CBID_VEHICLE_ADDITIONAL_TEXT, 0, 0, engine, NULL); if (callback == CALLBACK_FAILED) return 0; /* STR_02BD is used to start the string with {BLACK} */ SetDParam(0, GetGRFStringID(GetEngineGRFID(engine), 0xD000 + callback)); return DrawStringMultiLine(x, y, STR_02BD, w); } /** Count the number of bits that are set in a mask */ static uint CountBits(uint32 mask) { uint c = 0; for (; mask != 0; mask >>= 1) if (HASBIT(mask, 0)) c++; return c; } /** Display list of cargo types of the engine, for the purchase information window */ uint ShowRefitOptionsList(int x, int y, uint w, EngineID engine) { /* List of cargo types of this engine */ uint32 cmask = EngInfo(engine)->refit_mask; /* List of cargo types available in this climate */ uint32 lmask = _cargo_mask; char *b = _userstring; /* Draw nothing if the engine is not refittable */ if (CountBits(cmask) <= 1) return 0; b = InlineString(b, STR_PURCHASE_INFO_REFITTABLE_TO); if (cmask == lmask) { /* Engine can be refitted to all types in this climate */ b = InlineString(b, STR_PURCHASE_INFO_ALL_TYPES); } else { /* Check if we are able to refit to more cargo types and unable to. If * so, invert the cargo types to list those that we can't refit to. */ if (CountBits(cmask ^ lmask) < CountBits(cmask)) { cmask ^= lmask; b = InlineString(b, STR_PURCHASE_INFO_ALL_BUT); } bool first = true; /* Add each cargo type to the list */ for (CargoID cid = 0; cid < NUM_CARGO; cid++) { if (!HASBIT(cmask, cid)) continue; if (!first) b = strecpy(b, ", ", lastof(_userstring)); first = false; b = InlineString(b, GetCargo(cid)->name); } } /* Terminate and display the completed string */ *b = '\0'; return DrawStringMultiLine(x, y, STR_SPEC_USERSTRING, w); } /* if the sorting criteria had the same value, sort vehicle by unitnumber */ #define VEHICLEUNITNUMBERSORTER(r, a, b) {if (r == 0) {r = a->unitnumber - b->unitnumber;}} static int CDECL VehicleNumberSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = va->unitnumber - vb->unitnumber; return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleNameSorter(const void *a, const void *b) { static const Vehicle *last_vehicle[2] = { NULL, NULL }; static char last_name[2][64] = { "", "" }; const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r; if (va != last_vehicle[0]) { last_vehicle[0] = va; if (IsCustomName(va->string_id)) { GetString(last_name[0], va->string_id, lastof(last_name[0])); } else { last_name[0][0] = '\0'; } } if (vb != last_vehicle[1]) { last_vehicle[1] = vb; if (IsCustomName(vb->string_id)) { GetString(last_name[1], vb->string_id, lastof(last_name[1])); } else { last_name[1][0] = '\0'; } } r = strcmp(last_name[0], last_name[1]); // sort by name VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleAgeSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = va->age - vb->age; VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleProfitThisYearSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = ClampToI32(va->profit_this_year - vb->profit_this_year); VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleProfitLastYearSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = ClampToI32(va->profit_last_year - vb->profit_last_year); VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleCargoSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; const Vehicle* v; AcceptedCargo cargoa; AcceptedCargo cargob; int r = 0; memset(cargoa, 0, sizeof(cargoa)); memset(cargob, 0, sizeof(cargob)); for (v = va; v != NULL; v = v->next) cargoa[v->cargo_type] += v->cargo_cap; for (v = vb; v != NULL; v = v->next) cargob[v->cargo_type] += v->cargo_cap; for (CargoID i = 0; i < NUM_CARGO; i++) { r = cargoa[i] - cargob[i]; if (r != 0) break; } VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleReliabilitySorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = va->reliability - vb->reliability; VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleMaxSpeedSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int max_speed_a = 0xFFFF, max_speed_b = 0xFFFF; int r; const Vehicle *ua = va, *ub = vb; if (va->type == VEH_TRAIN && vb->type == VEH_TRAIN) { do { if (RailVehInfo(ua->engine_type)->max_speed != 0) max_speed_a = min(max_speed_a, RailVehInfo(ua->engine_type)->max_speed); } while ((ua = ua->next) != NULL); do { if (RailVehInfo(ub->engine_type)->max_speed != 0) max_speed_b = min(max_speed_b, RailVehInfo(ub->engine_type)->max_speed); } while ((ub = ub->next) != NULL); r = max_speed_a - max_speed_b; } else { r = va->max_speed - vb->max_speed; } VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleModelSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; int r = va->engine_type - vb->engine_type; VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } static int CDECL VehicleValueSorter(const void *a, const void *b) { const Vehicle* va = *(const Vehicle**)a; const Vehicle* vb = *(const Vehicle**)b; const Vehicle *u; Money valuea = 0, valueb = 0; for (u = va; u != NULL; u = u->next) valuea += u->value; for (u = vb; u != NULL; u = u->next) valueb += u->value; int r = ClampToI32(valuea - valueb); VEHICLEUNITNUMBERSORTER(r, va, vb); return (_internal_sort_order & 1) ? -r : r; } void InitializeGUI() { memset(&_sorting, 0, sizeof(_sorting)); } /** Assigns an already open vehicle window to a new vehicle. * Assigns an already open vehicle window to a new vehicle. If the vehicle got * any sub window open (orders and so on) it will change owner too. * @param *from_v the current owner of the window * @param *to_v the new owner of the window */ void ChangeVehicleViewWindow(const Vehicle *from_v, const Vehicle *to_v) { Window *w; w = FindWindowById(WC_VEHICLE_VIEW, from_v->index); if (w != NULL) { w->window_number = to_v->index; WP(w, vp_d).follow_vehicle = to_v->index; SetWindowDirty(w); w = FindWindowById(WC_VEHICLE_ORDERS, from_v->index); if (w != NULL) { w->window_number = to_v->index; SetWindowDirty(w); } w = FindWindowById(WC_VEHICLE_REFIT, from_v->index); if (w != NULL) { w->window_number = to_v->index; SetWindowDirty(w); } w = FindWindowById(WC_VEHICLE_DETAILS, from_v->index); if (w != NULL) { w->window_number = to_v->index; SetWindowDirty(w); } } } enum VehicleListWindowWidgets { VLW_WIDGET_CLOSEBOX = 0, VLW_WIDGET_CAPTION, VLW_WIDGET_STICKY, VLW_WIDGET_SORT_ORDER, VLW_WIDGET_SORT_BY_TEXT, VLW_WIDGET_SORT_BY_PULLDOWN, VLW_WIDGET_EMPTY_TOP_RIGHT, VLW_WIDGET_LIST, VLW_WIDGET_SCROLLBAR, VLW_WIDGET_OTHER_PLAYER_FILLER, VLW_WIDGET_AVAILABLE_VEHICLES, VLW_WIDGET_MANAGE_VEHICLES, VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN, VLW_WIDGET_STOP_ALL, VLW_WIDGET_START_ALL, VLW_WIDGET_EMPTY_BOTTOM_RIGHT, VLW_WIDGET_RESIZE, }; static const Widget _vehicle_list_widgets[] = { { WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW}, { WWT_CAPTION, RESIZE_RIGHT, 14, 11, 247, 0, 13, 0x0, STR_018C_WINDOW_TITLE_DRAG_THIS}, { WWT_STICKYBOX, RESIZE_LR, 14, 248, 259, 0, 13, 0x0, STR_STICKY_BUTTON}, { WWT_PUSHTXTBTN, RESIZE_NONE, 14, 0, 80, 14, 25, STR_SORT_BY, STR_SORT_ORDER_TIP}, { WWT_PANEL, RESIZE_NONE, 14, 81, 235, 14, 25, 0x0, STR_SORT_CRITERIA_TIP}, { WWT_TEXTBTN, RESIZE_NONE, 14, 236, 247, 14, 25, STR_0225, STR_SORT_CRITERIA_TIP}, { WWT_PANEL, RESIZE_RIGHT, 14, 248, 259, 14, 25, 0x0, STR_NULL}, { WWT_MATRIX, RESIZE_RB, 14, 0, 247, 26, 169, 0x0, STR_NULL}, { WWT_SCROLLBAR, RESIZE_LRB, 14, 248, 259, 26, 169, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST}, /* Widget to be shown for other players hiding the following 6 widgets */ { WWT_PANEL, RESIZE_RTB, 14, 0, 247, 170, 181, 0x0, STR_NULL}, { WWT_PUSHTXTBTN, RESIZE_TB, 14, 0, 105, 170, 181, 0x0, STR_AVAILABLE_ENGINES_TIP}, { WWT_TEXTBTN, RESIZE_TB, 14, 106, 211, 170, 181, STR_MANAGE_LIST, STR_MANAGE_LIST_TIP}, { WWT_TEXTBTN, RESIZE_TB, 14, 212, 223, 170, 181, STR_0225, STR_MANAGE_LIST_TIP}, { WWT_PUSHIMGBTN, RESIZE_TB, 14, 224, 235, 170, 181, SPR_FLAG_VEH_STOPPED, STR_MASS_STOP_LIST_TIP}, { WWT_PUSHIMGBTN, RESIZE_TB, 14, 236, 247, 170, 181, SPR_FLAG_VEH_RUNNING, STR_MASS_START_LIST_TIP}, { WWT_PANEL, RESIZE_RTB, 14, 248, 247, 170, 181, 0x0, STR_NULL}, { WWT_RESIZEBOX, RESIZE_LRTB, 14, 248, 259, 170, 181, 0x0, STR_RESIZE_BUTTON}, { WIDGETS_END}, }; static void CreateVehicleListWindow(Window *w) { vehiclelist_d *vl = &WP(w, vehiclelist_d); uint16 window_type = w->window_number & VLW_MASK; PlayerID player = (PlayerID)GB(w->window_number, 0, 8); vl->vehicle_type = (VehicleType)GB(w->window_number, 11, 5); vl->length_of_sort_list = 0; vl->sort_list = NULL; w->caption_color = player; /* Hide the widgets that we will not use in this window * Some windows contains actions only fit for the owner */ if (player == _local_player) { HideWindowWidget(w, VLW_WIDGET_OTHER_PLAYER_FILLER); SetWindowWidgetDisabledState(w, VLW_WIDGET_AVAILABLE_VEHICLES, window_type != VLW_STANDARD); } else { SetWindowWidgetsHiddenState(w, true, VLW_WIDGET_AVAILABLE_VEHICLES, VLW_WIDGET_MANAGE_VEHICLES, VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN, VLW_WIDGET_STOP_ALL, VLW_WIDGET_START_ALL, VLW_WIDGET_EMPTY_BOTTOM_RIGHT, WIDGET_LIST_END); } /* Set up the window widgets */ switch (vl->vehicle_type) { case VEH_TRAIN: w->widget[VLW_WIDGET_LIST].tooltips = STR_883D_TRAINS_CLICK_ON_TRAIN_FOR; w->widget[VLW_WIDGET_AVAILABLE_VEHICLES].data = STR_AVAILABLE_TRAINS; break; case VEH_ROAD: w->widget[VLW_WIDGET_LIST].tooltips = STR_901A_ROAD_VEHICLES_CLICK_ON; w->widget[VLW_WIDGET_AVAILABLE_VEHICLES].data = STR_AVAILABLE_ROAD_VEHICLES; break; case VEH_SHIP: w->widget[VLW_WIDGET_LIST].tooltips = STR_9823_SHIPS_CLICK_ON_SHIP_FOR; w->widget[VLW_WIDGET_AVAILABLE_VEHICLES].data = STR_AVAILABLE_SHIPS; break; case VEH_AIRCRAFT: w->widget[VLW_WIDGET_LIST].tooltips = STR_A01F_AIRCRAFT_CLICK_ON_AIRCRAFT; w->widget[VLW_WIDGET_AVAILABLE_VEHICLES].data = STR_AVAILABLE_AIRCRAFT; break; default: NOT_REACHED(); } switch (window_type) { case VLW_SHARED_ORDERS: w->widget[VLW_WIDGET_CAPTION].data = STR_VEH_WITH_SHARED_ORDERS_LIST; break; case VLW_STANDARD: /* Company Name - standard widget setup */ switch (vl->vehicle_type) { case VEH_TRAIN: w->widget[VLW_WIDGET_CAPTION].data = STR_881B_TRAINS; break; case VEH_ROAD: w->widget[VLW_WIDGET_CAPTION].data = STR_9001_ROAD_VEHICLES; break; case VEH_SHIP: w->widget[VLW_WIDGET_CAPTION].data = STR_9805_SHIPS; break; case VEH_AIRCRAFT: w->widget[VLW_WIDGET_CAPTION].data = STR_A009_AIRCRAFT; break; default: NOT_REACHED(); break; } break; case VLW_STATION_LIST: /* Station Name */ switch (vl->vehicle_type) { case VEH_TRAIN: w->widget[VLW_WIDGET_CAPTION].data = STR_SCHEDULED_TRAINS; break; case VEH_ROAD: w->widget[VLW_WIDGET_CAPTION].data = STR_SCHEDULED_ROAD_VEHICLES; break; case VEH_SHIP: w->widget[VLW_WIDGET_CAPTION].data = STR_SCHEDULED_SHIPS; break; case VEH_AIRCRAFT: w->widget[VLW_WIDGET_CAPTION].data = STR_SCHEDULED_AIRCRAFT; break; default: NOT_REACHED(); break; } break; case VLW_DEPOT_LIST: switch (vl->vehicle_type) { case VEH_TRAIN: w->widget[VLW_WIDGET_CAPTION].data = STR_VEHICLE_LIST_TRAIN_DEPOT; break; case VEH_ROAD: w->widget[VLW_WIDGET_CAPTION].data = STR_VEHICLE_LIST_ROADVEH_DEPOT; break; case VEH_SHIP: w->widget[VLW_WIDGET_CAPTION].data = STR_VEHICLE_LIST_SHIP_DEPOT; break; case VEH_AIRCRAFT: w->widget[VLW_WIDGET_CAPTION].data = STR_VEHICLE_LIST_AIRCRAFT_DEPOT; break; default: NOT_REACHED(); break; } break; default: NOT_REACHED(); break; } switch (vl->vehicle_type) { case VEH_TRAIN: w->resize.step_width = 1; /* Fallthrough */ case VEH_ROAD: w->vscroll.cap = 7; w->resize.step_height = PLY_WND_PRC__SIZE_OF_ROW_SMALL; w->resize.height = 220 - (PLY_WND_PRC__SIZE_OF_ROW_SMALL * 3); // Minimum of 4 vehicles break; case VEH_SHIP: case VEH_AIRCRAFT: w->vscroll.cap = 4; w->resize.step_height = PLY_WND_PRC__SIZE_OF_ROW_BIG; break; default: NOT_REACHED(); } w->widget[VLW_WIDGET_LIST].data = (w->vscroll.cap << 8) + 1; /* Set up sorting. Make the window-specific _sorting variable * point to the correct global _sorting struct so we are freed * from having conditionals during window operation */ switch (vl->vehicle_type) { case VEH_TRAIN: vl->_sorting = &_sorting.train; break; case VEH_ROAD: vl->_sorting = &_sorting.roadveh; break; case VEH_SHIP: vl->_sorting = &_sorting.ship; break; case VEH_AIRCRAFT: vl->_sorting = &_sorting.aircraft; break; default: NOT_REACHED(); break; } vl->l.flags = VL_REBUILD | (vl->_sorting->order ? VL_DESC : VL_NONE); vl->l.sort_type = vl->_sorting->criteria; vl->sort_list = NULL; vl->l.resort_timer = DAY_TICKS * PERIODIC_RESORT_DAYS; // Set up resort timer } void DrawSmallOrderList(const Vehicle *v, int x, int y) { const Order *order; int sel, i = 0; sel = v->cur_order_index; FOR_VEHICLE_ORDERS(v, order) { if (sel == 0) DrawString(x - 6, y, STR_SMALL_RIGHT_ARROW, 16); sel--; if (order->type == OT_GOTO_STATION) { if (v->type == VEH_SHIP && GetStation(order->dest)->IsBuoy()) continue; SetDParam(0, order->dest); DrawString(x, y, STR_A036, 0); y += 6; if (++i == 4) break; } } } static void DrawVehicleListWindow(Window *w) { vehiclelist_d *vl = &WP(w, vehiclelist_d); int x = 2; int y = PLY_WND_PRC__OFFSET_TOP_WIDGET; int max; int i; const PlayerID owner = (PlayerID)w->caption_color; const Player *p = GetPlayer(owner); const uint16 window_type = w->window_number & VLW_MASK; const uint16 index = GB(w->window_number, 16, 16); BuildVehicleList(vl, owner, index, window_type); SortVehicleList(vl); SetVScrollCount(w, vl->l.list_length); /* draw the widgets */ switch (window_type) { case VLW_SHARED_ORDERS: /* Shared Orders */ if (vl->l.list_length == 0) { /* We can't open this window without vehicles using this order * and we should close the window when deleting the order */ NOT_REACHED(); } SetDParam(0, w->vscroll.count); break; case VLW_STANDARD: /* Company Name */ SetDParam(0, p->index); SetDParam(1, w->vscroll.count); break; case VLW_STATION_LIST: /* Station Name */ SetDParam(0, index); SetDParam(1, w->vscroll.count); break; case VLW_DEPOT_LIST: switch (vl->vehicle_type) { case VEH_TRAIN: SetDParam(0, STR_8800_TRAIN_DEPOT); break; case VEH_ROAD: SetDParam(0, STR_9003_ROAD_VEHICLE_DEPOT); break; case VEH_SHIP: SetDParam(0, STR_9803_SHIP_DEPOT); break; case VEH_AIRCRAFT: SetDParam(0, STR_A002_AIRCRAFT_HANGAR); break; default: NOT_REACHED(); break; } if (vl->vehicle_type == VEH_AIRCRAFT) { SetDParam(1, index); // Airport name } else { SetDParam(1, GetDepot(index)->town_index); } SetDParam(2, w->vscroll.count); break; default: NOT_REACHED(); break; } SetWindowWidgetsDisabledState(w, vl->l.list_length == 0, VLW_WIDGET_MANAGE_VEHICLES, VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN, VLW_WIDGET_STOP_ALL, VLW_WIDGET_START_ALL, WIDGET_LIST_END); DrawWindowWidgets(w); /* draw sorting criteria string */ DrawString(85, 15, _vehicle_sort_listing[vl->l.sort_type], 0x10); /* draw arrow pointing up/down for ascending/descending sorting */ DoDrawString(vl->l.flags & VL_DESC ? DOWNARROW : UPARROW, 69, 15, 0x10); max = min(w->vscroll.pos + w->vscroll.cap, vl->l.list_length); for (i = w->vscroll.pos; i < max; ++i) { const Vehicle *v = vl->sort_list[i]; StringID str; SetDParam(0, v->profit_this_year); SetDParam(1, v->profit_last_year); DrawVehicleImage(v, x + 19, y + 6, w->widget[VLW_WIDGET_LIST].right - w->widget[VLW_WIDGET_LIST].left - 20, 0, INVALID_VEHICLE); DrawString(x + 19, y + w->resize.step_height - 8, STR_0198_PROFIT_THIS_YEAR_LAST_YEAR, 0); if ((v->type == VEH_TRAIN && v->string_id != STR_SV_TRAIN_NAME) || (v->type == VEH_ROAD && v->string_id != STR_SV_ROADVEH_NAME) || (v->type == VEH_SHIP && v->string_id != STR_SV_SHIP_NAME) || (v->type == VEH_AIRCRAFT && v->string_id != STR_SV_AIRCRAFT_NAME)) { /* The vehicle got a name so we will print it */ SetDParam(0, v->index); DrawString(x + 19, y, STR_01AB, 0); } if (w->resize.step_height == PLY_WND_PRC__SIZE_OF_ROW_BIG) DrawSmallOrderList(v, x + 138, y); if (IsVehicleInDepot(v)) { str = STR_021F; } else { str = (v->age > v->max_age - 366) ? STR_00E3 : STR_00E2; } SetDParam(0, v->unitnumber); DrawString(x, y + 2, str, 0); DrawVehicleProfitButton(v, x, y + 13); y += w->resize.step_height; } } /* * bitmask for w->window_number * 0-7 PlayerID (owner) * 8-10 window type (use flags in vehicle_gui.h) * 11-15 vehicle type (using VEH_, but can be compressed to fewer bytes if needed) * 16-31 StationID or OrderID depending on window type (bit 8-10) **/ void PlayerVehWndProc(Window *w, WindowEvent *e) { vehiclelist_d *vl = &WP(w, vehiclelist_d); switch (e->event) { case WE_CREATE: CreateVehicleListWindow(w); break; case WE_PAINT: DrawVehicleListWindow(w); break; case WE_CLICK: { switch (e->we.click.widget) { case VLW_WIDGET_SORT_ORDER: /* Flip sorting method ascending/descending */ vl->l.flags ^= VL_DESC; vl->l.flags |= VL_RESORT; vl->_sorting->order = !!(vl->l.flags & VL_DESC); SetWindowDirty(w); break; case VLW_WIDGET_SORT_BY_TEXT: case VLW_WIDGET_SORT_BY_PULLDOWN:/* Select sorting criteria dropdown menu */ ShowDropDownMenu(w, _vehicle_sort_listing, vl->l.sort_type, VLW_WIDGET_SORT_BY_PULLDOWN, 0, 0); return; case VLW_WIDGET_LIST: { /* Matrix to show vehicles */ uint32 id_v = (e->we.click.pt.y - PLY_WND_PRC__OFFSET_TOP_WIDGET) / w->resize.step_height; const Vehicle *v; if (id_v >= w->vscroll.cap) return; // click out of bounds id_v += w->vscroll.pos; if (id_v >= vl->l.list_length) return; // click out of list bound v = vl->sort_list[id_v]; switch (vl->vehicle_type) { case VEH_TRAIN: ShowTrainViewWindow(v); break; case VEH_ROAD: ShowRoadVehViewWindow(v); break; case VEH_SHIP: ShowShipViewWindow(v); break; case VEH_AIRCRAFT: ShowAircraftViewWindow(v); break; default: NOT_REACHED(); break; } } break; case VLW_WIDGET_AVAILABLE_VEHICLES: ShowBuildVehicleWindow(0, vl->vehicle_type); break; case VLW_WIDGET_MANAGE_VEHICLES: case VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN: { static StringID action_str[] = { STR_REPLACE_VEHICLES, STR_SEND_FOR_SERVICING, STR_NULL, INVALID_STRING_ID }; static const StringID depot_name[] = { STR_SEND_TRAIN_TO_DEPOT, STR_SEND_ROAD_VEHICLE_TO_DEPOT, STR_SEND_SHIP_TO_DEPOT, STR_SEND_AIRCRAFT_TO_HANGAR }; /* XXX - Substite string since the dropdown cannot handle dynamic strings */ action_str[2] = depot_name[vl->vehicle_type]; ShowDropDownMenu(w, action_str, 0, VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN, 0, (w->window_number & VLW_MASK) == VLW_STANDARD ? 0 : 1); break; } case VLW_WIDGET_STOP_ALL: case VLW_WIDGET_START_ALL: DoCommandP(0, GB(w->window_number, 16, 16), (w->window_number & VLW_MASK) | (1 << 6) | (e->we.click.widget == VLW_WIDGET_START_ALL ? (1 << 5) : 0) | vl->vehicle_type, NULL, CMD_MASS_START_STOP); break; } } break; case WE_DROPDOWN_SELECT: /* we have selected a dropdown item in the list */ switch (e->we.dropdown.button) { case VLW_WIDGET_SORT_BY_PULLDOWN: if (vl->l.sort_type != e->we.dropdown.index) { /* value has changed -> resort */ vl->l.flags |= VL_RESORT; vl->l.sort_type = e->we.dropdown.index; vl->_sorting->criteria = vl->l.sort_type; } break; case VLW_WIDGET_MANAGE_VEHICLES_DROPDOWN: assert(vl->l.list_length != 0); switch (e->we.dropdown.index) { case 0: /* Replace window */ ShowReplaceVehicleWindow(vl->vehicle_type); break; case 1: /* Send for servicing */ DoCommandP(0, GB(w->window_number, 16, 16) /* StationID or OrderID (depending on VLW) */, (w->window_number & VLW_MASK) | DEPOT_MASS_SEND | DEPOT_SERVICE, NULL, GetCmdSendToDepot(vl->vehicle_type)); break; case 2: /* Send to Depots */ DoCommandP(0, GB(w->window_number, 16, 16) /* StationID or OrderID (depending on VLW) */, (w->window_number & VLW_MASK) | DEPOT_MASS_SEND, NULL, GetCmdSendToDepot(vl->vehicle_type)); break; default: NOT_REACHED(); } break; default: NOT_REACHED(); } SetWindowDirty(w); break; case WE_DESTROY: free((void*)vl->sort_list); break; case WE_TICK: /* resort the list every 20 seconds orso (10 days) */ if (--vl->l.resort_timer == 0) { StationID station = ((w->window_number & VLW_MASK) == VLW_STATION_LIST) ? GB(w->window_number, 16, 16) : INVALID_STATION; PlayerID owner = (PlayerID)w->caption_color; DEBUG(misc, 3, "Periodic resort %d list player %d at station %d", vl->vehicle_type, owner, station); vl->l.resort_timer = DAY_TICKS * PERIODIC_RESORT_DAYS; vl->l.flags |= VL_RESORT; SetWindowDirty(w); } break; case WE_RESIZE: /* Update the scroll + matrix */ w->vscroll.cap += e->we.sizing.diff.y / (int)w->resize.step_height; w->widget[VLW_WIDGET_LIST].data = (w->vscroll.cap << 8) + 1; break; } } static const WindowDesc _player_vehicle_list_train_desc = { WDP_AUTO, WDP_AUTO, 260, 182, 260, 182, WC_TRAINS_LIST, WC_NONE, WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE, _vehicle_list_widgets, PlayerVehWndProc }; static const WindowDesc _player_vehicle_list_road_veh_desc = { WDP_AUTO, WDP_AUTO, 260, 182, 260, 182, WC_ROADVEH_LIST, WC_NONE, WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE, _vehicle_list_widgets, PlayerVehWndProc }; static const WindowDesc _player_vehicle_list_ship_desc = { WDP_AUTO, WDP_AUTO, 260, 182, 260, 182, WC_SHIPS_LIST, WC_NONE, WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE, _vehicle_list_widgets, PlayerVehWndProc }; static const WindowDesc _player_vehicle_list_aircraft_desc = { WDP_AUTO, WDP_AUTO, 260, 182, 260, 182, WC_AIRCRAFT_LIST, WC_NONE, WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE, _vehicle_list_widgets, PlayerVehWndProc }; static void ShowVehicleListWindowLocal(PlayerID player, uint16 VLW_flag, VehicleType vehicle_type, uint16 unique_number) { Window *w; WindowNumber num; if (!IsValidPlayer(player)) return; num = (unique_number << 16) | (vehicle_type << 11) | VLW_flag | player; /* The vehicle list windows have been unified. Just some strings need * to be changed which happens in the WE_CREATE event and resizing * some of the windows to the correct size */ switch (vehicle_type) { default: NOT_REACHED(); case VEH_TRAIN: w = AllocateWindowDescFront(&_player_vehicle_list_train_desc, num); if (w != NULL) ResizeWindow(w, 65, 38); break; case VEH_ROAD: w = AllocateWindowDescFront(&_player_vehicle_list_road_veh_desc, num); if (w != NULL) ResizeWindow(w, 0, 38); break; case VEH_SHIP: w = AllocateWindowDescFront(&_player_vehicle_list_ship_desc, num); break; case VEH_AIRCRAFT: w = AllocateWindowDescFront(&_player_vehicle_list_aircraft_desc, num); break; } if (w != NULL) { /* Set the minimum window size to the current window size */ w->resize.width = w->width; w->resize.height = w->height; } } void ShowVehicleListWindow(PlayerID player, VehicleType vehicle_type) { if (player == _local_player && _patches.advanced_vehicle_list) { ShowPlayerGroup(player, vehicle_type); } else { ShowVehicleListWindowLocal(player, VLW_STANDARD, vehicle_type, 0); } } void ShowVehicleListWindow(const Vehicle *v) { if (v->orders == NULL) return; // no shared list to show ShowVehicleListWindowLocal(v->owner, VLW_SHARED_ORDERS, v->type, v->orders->index); } void ShowVehicleListWindow(PlayerID player, VehicleType vehicle_type, StationID station) { ShowVehicleListWindowLocal(player, VLW_STATION_LIST, vehicle_type, station); } void ShowVehicleListWindow(PlayerID player, VehicleType vehicle_type, TileIndex depot_tile) { uint16 depot_airport_index; if (vehicle_type == VEH_AIRCRAFT) { depot_airport_index = GetStationIndex(depot_tile); } else { Depot *depot = GetDepotByTile(depot_tile); if (depot == NULL) return; // no depot to show depot_airport_index = depot->index; } ShowVehicleListWindowLocal(player, VLW_DEPOT_LIST, vehicle_type, depot_airport_index); }