industry_gui.cpp

Go to the documentation of this file.

/*
 * This file is part of OpenTTD.
 * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
 * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
 */
 
#include "stdafx.h"
#include "error.h"
#include "gui.h"
#include "settings_gui.h"
#include "sound_func.h"
#include "window_func.h"
#include "textbuf_gui.h"
#include "command_func.h"
#include "viewport_func.h"
#include "industry.h"
#include "town.h"
#include "cheat_type.h"
#include "newgrf_industries.h"
#include "newgrf_text.h"
#include "newgrf_debug.h"
#include "network/network.h"
#include "strings_func.h"
#include "company_func.h"
#include "tilehighlight_func.h"
#include "string_func.h"
#include "sortlist_type.h"
#include "dropdown_func.h"
#include "company_base.h"
#include "core/geometry_func.hpp"
#include "core/random_func.hpp"
#include "core/backup_type.hpp"
#include "genworld.h"
#include "smallmap_gui.h"
#include "dropdown_type.h"
#include "clear_map.h"
#include "zoom_func.h"
#include "industry_cmd.h"
#include "querystring_gui.h"
#include "stringfilter_type.h"
#include "timer/timer.h"
#include "timer/timer_window.h"
#include "hotkeys.h"
 
#include "widgets/industry_widget.h"
 
#include "table/strings.h"
 
#include <bitset>
 
#include "safeguards.h"
 
bool _ignore_restrictions;
std::bitset<NUM_INDUSTRYTYPES> _displayed_industries; 
 
enum CargoSuffixType {
  CST_FUND,  
  CST_VIEW,  
  CST_DIR,   
};
 
enum CargoSuffixDisplay {
  CSD_CARGO,             
  CSD_CARGO_AMOUNT,      
  CSD_CARGO_TEXT,        
  CSD_CARGO_AMOUNT_TEXT, 
};
 
struct CargoSuffix {
  CargoSuffixDisplay display; 
  std::string text;           
};
 
extern void GenerateIndustries();
static void ShowIndustryCargoesWindow(IndustryType id);
 
static void GetCargoSuffix(uint cargo, CargoSuffixType cst, const Industry *ind, IndustryType ind_type, const IndustrySpec *indspec, CargoSuffix &suffix)
{
  suffix.text.clear();
  suffix.display = CSD_CARGO_AMOUNT;
 
  if (HasBit(indspec->callback_mask, CBM_IND_CARGO_SUFFIX)) {
    TileIndex t = (cst != CST_FUND) ? ind->location.tile : INVALID_TILE;
    uint16_t callback = GetIndustryCallback(CBID_INDUSTRY_CARGO_SUFFIX, 0, (cst << 8) | cargo, const_cast<Industry *>(ind), ind_type, t);
    if (callback == CALLBACK_FAILED) return;
 
    if (indspec->grf_prop.grffile->grf_version < 8) {
      if (GB(callback, 0, 8) == 0xFF) return;
      if (callback < 0x400) {
        StartTextRefStackUsage(indspec->grf_prop.grffile, 6);
        suffix.text = GetString(GetGRFStringID(indspec->grf_prop.grffile->grfid, 0xD000 + callback));
        StopTextRefStackUsage();
        suffix.display = CSD_CARGO_AMOUNT_TEXT;
        return;
      }
      ErrorUnknownCallbackResult(indspec->grf_prop.grffile->grfid, CBID_INDUSTRY_CARGO_SUFFIX, callback);
      return;
 
    } else { // GRF version 8 or higher.
      if (callback == 0x400) return;
      if (callback == 0x401) {
        suffix.display = CSD_CARGO;
        return;
      }
      if (callback < 0x400) {
        StartTextRefStackUsage(indspec->grf_prop.grffile, 6);
        suffix.text = GetString(GetGRFStringID(indspec->grf_prop.grffile->grfid, 0xD000 + callback));
        StopTextRefStackUsage();
        suffix.display = CSD_CARGO_AMOUNT_TEXT;
        return;
      }
      if (callback >= 0x800 && callback < 0xC00) {
        StartTextRefStackUsage(indspec->grf_prop.grffile, 6);
        suffix.text = GetString(GetGRFStringID(indspec->grf_prop.grffile->grfid, 0xD000 - 0x800 + callback));
        StopTextRefStackUsage();
        suffix.display = CSD_CARGO_TEXT;
        return;
      }
      ErrorUnknownCallbackResult(indspec->grf_prop.grffile->grfid, CBID_INDUSTRY_CARGO_SUFFIX, callback);
      return;
    }
  }
}
 
enum CargoSuffixInOut {
  CARGOSUFFIX_OUT = 0,
  CARGOSUFFIX_IN  = 1,
};
 
template <typename TC, typename TS>
static inline void GetAllCargoSuffixes(CargoSuffixInOut use_input, CargoSuffixType cst, const Industry *ind, IndustryType ind_type, const IndustrySpec *indspec, const TC &cargoes, TS &suffixes)
{
  static_assert(std::tuple_size_v<std::remove_reference_t<decltype(cargoes)>> <= lengthof(suffixes));
 
  if (indspec->behaviour & INDUSTRYBEH_CARGOTYPES_UNLIMITED) {
    /* Reworked behaviour with new many-in-many-out scheme */
    for (uint j = 0; j < lengthof(suffixes); j++) {
      if (IsValidCargoID(cargoes[j])) {
        uint8_t local_id = indspec->grf_prop.grffile->cargo_map[cargoes[j]]; // should we check the value for valid?
        uint cargotype = local_id << 16 | use_input;
        GetCargoSuffix(cargotype, cst, ind, ind_type, indspec, suffixes[j]);
      } else {
        suffixes[j].text.clear();
        suffixes[j].display = CSD_CARGO;
      }
    }
  } else {
    /* Compatible behaviour with old 3-in-2-out scheme */
    for (uint j = 0; j < lengthof(suffixes); j++) {
      suffixes[j].text.clear();
      suffixes[j].display = CSD_CARGO;
    }
    switch (use_input) {
      case CARGOSUFFIX_OUT:
        // Handle INDUSTRY_ORIGINAL_NUM_OUTPUTS cargoes
        if (IsValidCargoID(cargoes[0])) GetCargoSuffix(3, cst, ind, ind_type, indspec, suffixes[0]);
        if (IsValidCargoID(cargoes[1])) GetCargoSuffix(4, cst, ind, ind_type, indspec, suffixes[1]);
        break;
      case CARGOSUFFIX_IN:
        // Handle INDUSTRY_ORIGINAL_NUM_INPUTS cargoes
        if (IsValidCargoID(cargoes[0])) GetCargoSuffix(0, cst, ind, ind_type, indspec, suffixes[0]);
        if (IsValidCargoID(cargoes[1])) GetCargoSuffix(1, cst, ind, ind_type, indspec, suffixes[1]);
        if (IsValidCargoID(cargoes[2])) GetCargoSuffix(2, cst, ind, ind_type, indspec, suffixes[2]);
        break;
      default:
        NOT_REACHED();
    }
  }
}
 
void GetCargoSuffix(CargoSuffixInOut use_input, CargoSuffixType cst, const Industry *ind, IndustryType ind_type, const IndustrySpec *indspec, CargoID cargo, uint8_t slot, CargoSuffix &suffix)
{
  suffix.text.clear();
  suffix.display = CSD_CARGO;
  if (!IsValidCargoID(cargo)) return;
  if (indspec->behaviour & INDUSTRYBEH_CARGOTYPES_UNLIMITED) {
    uint8_t local_id = indspec->grf_prop.grffile->cargo_map[cargo]; // should we check the value for valid?
    uint cargotype = local_id << 16 | use_input;
    GetCargoSuffix(cargotype, cst, ind, ind_type, indspec, suffix);
  } else if (use_input == CARGOSUFFIX_IN) {
    if (slot < INDUSTRY_ORIGINAL_NUM_INPUTS) GetCargoSuffix(slot, cst, ind, ind_type, indspec, suffix);
  } else if (use_input == CARGOSUFFIX_OUT) {
    if (slot < INDUSTRY_ORIGINAL_NUM_OUTPUTS) GetCargoSuffix(slot + INDUSTRY_ORIGINAL_NUM_INPUTS, cst, ind, ind_type, indspec, suffix);
  }
}
 
std::array<IndustryType, NUM_INDUSTRYTYPES> _sorted_industry_types; 
 
static bool IndustryTypeNameSorter(const IndustryType &a, const IndustryType &b)
{
  int r = StrNaturalCompare(GetString(GetIndustrySpec(a)->name), GetString(GetIndustrySpec(b)->name)); // Sort by name (natural sorting).
 
  /* If the names are equal, sort by industry type. */
  return (r != 0) ? r < 0 : (a < b);
}
 
void SortIndustryTypes()
{
  /* Add each industry type to the list. */
  for (IndustryType i = 0; i < NUM_INDUSTRYTYPES; i++) {
    _sorted_industry_types[i] = i;
  }
 
  /* Sort industry types by name. */
  std::sort(_sorted_industry_types.begin(), _sorted_industry_types.end(), IndustryTypeNameSorter);
}
 
void CcBuildIndustry(Commands, const CommandCost &result, TileIndex tile, IndustryType indtype, uint32_t, bool, uint32_t)
{
  if (result.Succeeded()) return;
 
  if (indtype < NUM_INDUSTRYTYPES) {
    const IndustrySpec *indsp = GetIndustrySpec(indtype);
    if (indsp->enabled) {
      SetDParam(0, indsp->name);
      ShowErrorMessage(STR_ERROR_CAN_T_BUILD_HERE, result.GetErrorMessage(), WL_INFO, TileX(tile) * TILE_SIZE, TileY(tile) * TILE_SIZE);
    }
  }
}
 
static constexpr NWidgetPart _nested_build_industry_widgets[] = {
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
    NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_FUND_INDUSTRY_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
    NWidget(WWT_SHADEBOX, COLOUR_DARK_GREEN),
    NWidget(WWT_DEFSIZEBOX, COLOUR_DARK_GREEN),
    NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
  EndContainer(),
  NWidget(NWID_SELECTION, COLOUR_DARK_GREEN, WID_DPI_SCENARIO_EDITOR_PANE),
    NWidget(NWID_VERTICAL),
      NWidget(WWT_TEXTBTN, COLOUR_DARK_GREEN, WID_DPI_CREATE_RANDOM_INDUSTRIES_WIDGET), SetMinimalSize(0, 12), SetFill(1, 0), SetResize(1, 0),
          SetDataTip(STR_FUND_INDUSTRY_MANY_RANDOM_INDUSTRIES, STR_FUND_INDUSTRY_MANY_RANDOM_INDUSTRIES_TOOLTIP),
      NWidget(WWT_TEXTBTN, COLOUR_DARK_GREEN, WID_DPI_REMOVE_ALL_INDUSTRIES_WIDGET), SetMinimalSize(0, 12), SetFill(1, 0), SetResize(1, 0),
          SetDataTip(STR_FUND_INDUSTRY_REMOVE_ALL_INDUSTRIES, STR_FUND_INDUSTRY_REMOVE_ALL_INDUSTRIES_TOOLTIP),
    EndContainer(),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_MATRIX, COLOUR_DARK_GREEN, WID_DPI_MATRIX_WIDGET), SetMatrixDataTip(1, 0, STR_FUND_INDUSTRY_SELECTION_TOOLTIP), SetFill(1, 0), SetResize(1, 1), SetScrollbar(WID_DPI_SCROLLBAR),
    NWidget(NWID_VSCROLLBAR, COLOUR_DARK_GREEN, WID_DPI_SCROLLBAR),
  EndContainer(),
  NWidget(WWT_PANEL, COLOUR_DARK_GREEN, WID_DPI_INFOPANEL), SetResize(1, 0),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_TEXTBTN, COLOUR_DARK_GREEN, WID_DPI_DISPLAY_WIDGET), SetFill(1, 0), SetResize(1, 0),
        SetDataTip(STR_INDUSTRY_DISPLAY_CHAIN, STR_INDUSTRY_DISPLAY_CHAIN_TOOLTIP),
    NWidget(WWT_TEXTBTN, COLOUR_DARK_GREEN, WID_DPI_FUND_WIDGET), SetFill(1, 0), SetResize(1, 0), SetDataTip(STR_JUST_STRING, STR_NULL),
    NWidget(WWT_RESIZEBOX, COLOUR_DARK_GREEN),
  EndContainer(),
};
 
static WindowDesc _build_industry_desc(
  WDP_AUTO, "build_industry", 170, 212,
  WC_BUILD_INDUSTRY, WC_NONE,
  WDF_CONSTRUCTION,
  _nested_build_industry_widgets
);
 
class BuildIndustryWindow : public Window {
  IndustryType selected_type;                 
  std::vector<IndustryType> list;             
  bool enabled;                               
  Scrollbar *vscroll;
  Dimension legend;                           
 
  static const int MAX_MINWIDTH_LINEHEIGHTS = 20;
 
  void UpdateAvailability()
  {
    this->enabled = this->selected_type != INVALID_INDUSTRYTYPE && (_game_mode == GM_EDITOR || GetIndustryProbabilityCallback(this->selected_type, IACT_USERCREATION, 1) > 0);
  }
 
  void SetupArrays()
  {
    this->list.clear();
 
    /* Fill the arrays with industries.
     * The tests performed after the enabled allow to load the industries
     * In the same way they are inserted by grf (if any)
     */
    for (IndustryType ind : _sorted_industry_types) {
      const IndustrySpec *indsp = GetIndustrySpec(ind);
      if (indsp->enabled) {
        /* Rule is that editor mode loads all industries.
         * In game mode, all non raw industries are loaded too
         * and raw ones are loaded only when setting allows it */
        if (_game_mode != GM_EDITOR && indsp->IsRawIndustry() && _settings_game.construction.raw_industry_construction == 0) {
          /* Unselect if the industry is no longer in the list */
          if (this->selected_type == ind) this->selected_type = INVALID_INDUSTRYTYPE;
          continue;
        }
 
        this->list.push_back(ind);
      }
    }
 
    /* First industry type is selected if the current selection is invalid. */
    if (this->selected_type == INVALID_INDUSTRYTYPE && !this->list.empty()) this->selected_type = this->list[0];
 
    this->UpdateAvailability();
 
    this->vscroll->SetCount(this->list.size());
  }
 
  void SetButtons()
  {
    this->SetWidgetDisabledState(WID_DPI_FUND_WIDGET, this->selected_type != INVALID_INDUSTRYTYPE && !this->enabled);
    this->SetWidgetDisabledState(WID_DPI_DISPLAY_WIDGET, this->selected_type == INVALID_INDUSTRYTYPE && this->enabled);
  }
 
  std::string MakeCargoListString(const std::span<const CargoID> cargolist, const std::span<const CargoSuffix> cargo_suffix, StringID prefixstr) const
  {
    assert(cargolist.size() == cargo_suffix.size());
 
    std::string cargostring;
    size_t numcargo = 0;
    size_t firstcargo = 0;
 
    for (size_t j = 0; j < cargolist.size(); j++) {
      if (!IsValidCargoID(cargolist[j])) continue;
      numcargo++;
      if (numcargo == 1) {
        firstcargo = j;
        continue;
      }
      SetDParam(0, CargoSpec::Get(cargolist[j])->name);
      SetDParamStr(1, cargo_suffix[j].text);
      cargostring += GetString(STR_INDUSTRY_VIEW_CARGO_LIST_EXTENSION);
    }
 
    if (numcargo > 0) {
      SetDParam(0, CargoSpec::Get(cargolist[firstcargo])->name);
      SetDParamStr(1, cargo_suffix[firstcargo].text);
      cargostring = GetString(prefixstr) + cargostring;
    } else {
      SetDParam(0, STR_JUST_NOTHING);
      SetDParamStr(1, "");
      cargostring = GetString(prefixstr);
    }
 
    return cargostring;
  }
 
public:
  BuildIndustryWindow() : Window(_build_industry_desc)
  {
    this->selected_type = INVALID_INDUSTRYTYPE;
 
    this->CreateNestedTree();
    this->vscroll = this->GetScrollbar(WID_DPI_SCROLLBAR);
    /* Show scenario editor tools in editor. */
    if (_game_mode != GM_EDITOR) {
      this->GetWidget<NWidgetStacked>(WID_DPI_SCENARIO_EDITOR_PANE)->SetDisplayedPlane(SZSP_HORIZONTAL);
    }
    this->FinishInitNested(0);
 
    this->SetButtons();
  }
 
  void OnInit() override
  {
    /* Width of the legend blob -- slightly larger than the smallmap legend blob. */
    this->legend.height = GetCharacterHeight(FS_SMALL);
    this->legend.width = this->legend.height * 9 / 6;
 
    this->SetupArrays();
  }
 
  void UpdateWidgetSize(WidgetID widget, Dimension &size, [[maybe_unused]] const Dimension &padding, [[maybe_unused]] Dimension &fill, [[maybe_unused]] Dimension &resize) override
  {
    switch (widget) {
      case WID_DPI_MATRIX_WIDGET: {
        SetDParamMaxDigits(0, 4);
        Dimension count = GetStringBoundingBox(STR_JUST_COMMA, FS_SMALL);
        Dimension d{};
        for (const auto &indtype : this->list) {
          d = maxdim(d, GetStringBoundingBox(GetIndustrySpec(indtype)->name));
        }
        resize.height = std::max<uint>({this->legend.height, d.height, count.height}) + padding.height;
        d.width += this->legend.width + WidgetDimensions::scaled.hsep_wide + WidgetDimensions::scaled.hsep_normal + count.width + padding.width;
        d.height = 5 * resize.height;
        size = maxdim(size, d);
        break;
      }
 
      case WID_DPI_INFOPANEL: {
        /* Extra line for cost outside of editor. */
        int height = 2 + (_game_mode == GM_EDITOR ? 0 : 1);
        uint extra_lines_req = 0;
        uint extra_lines_prd = 0;
        uint extra_lines_newgrf = 0;
        uint max_minwidth = GetCharacterHeight(FS_NORMAL) * MAX_MINWIDTH_LINEHEIGHTS;
        Dimension d = {0, 0};
        for (const auto &indtype : this->list) {
          const IndustrySpec *indsp = GetIndustrySpec(indtype);
          CargoSuffix cargo_suffix[std::tuple_size_v<decltype(indsp->accepts_cargo)>];
 
          /* Measure the accepted cargoes, if any. */
          GetAllCargoSuffixes(CARGOSUFFIX_IN, CST_FUND, nullptr, indtype, indsp, indsp->accepts_cargo, cargo_suffix);
          std::string cargostring = this->MakeCargoListString(indsp->accepts_cargo, cargo_suffix, STR_INDUSTRY_VIEW_REQUIRES_N_CARGO);
          Dimension strdim = GetStringBoundingBox(cargostring);
          if (strdim.width > max_minwidth) {
            extra_lines_req = std::max(extra_lines_req, strdim.width / max_minwidth + 1);
            strdim.width = max_minwidth;
          }
          d = maxdim(d, strdim);
 
          /* Measure the produced cargoes, if any. */
          GetAllCargoSuffixes(CARGOSUFFIX_OUT, CST_FUND, nullptr, indtype, indsp, indsp->produced_cargo, cargo_suffix);
          cargostring = this->MakeCargoListString(indsp->produced_cargo, cargo_suffix, STR_INDUSTRY_VIEW_PRODUCES_N_CARGO);
          strdim = GetStringBoundingBox(cargostring);
          if (strdim.width > max_minwidth) {
            extra_lines_prd = std::max(extra_lines_prd, strdim.width / max_minwidth + 1);
            strdim.width = max_minwidth;
          }
          d = maxdim(d, strdim);
 
          if (indsp->grf_prop.grffile != nullptr) {
            /* Reserve a few extra lines for text from an industry NewGRF. */
            extra_lines_newgrf = 4;
          }
        }
 
        /* Set it to something more sane :) */
        height += extra_lines_prd + extra_lines_req + extra_lines_newgrf;
        size.height = height * GetCharacterHeight(FS_NORMAL) + padding.height;
        size.width = d.width + padding.width;
        break;
      }
 
      case WID_DPI_FUND_WIDGET: {
        Dimension d = GetStringBoundingBox(STR_FUND_INDUSTRY_BUILD_NEW_INDUSTRY);
        d = maxdim(d, GetStringBoundingBox(STR_FUND_INDUSTRY_PROSPECT_NEW_INDUSTRY));
        d = maxdim(d, GetStringBoundingBox(STR_FUND_INDUSTRY_FUND_NEW_INDUSTRY));
        d.width += padding.width;
        d.height += padding.height;
        size = maxdim(size, d);
        break;
      }
    }
  }
 
  void SetStringParameters(WidgetID widget) const override
  {
    switch (widget) {
      case WID_DPI_FUND_WIDGET:
        /* Raw industries might be prospected. Show this fact by changing the string
         * In Editor, you just build, while ingame, or you fund or you prospect */
        if (_game_mode == GM_EDITOR) {
          /* We've chosen many random industries but no industries have been specified */
          SetDParam(0, STR_FUND_INDUSTRY_BUILD_NEW_INDUSTRY);
        } else {
          if (this->selected_type != INVALID_INDUSTRYTYPE) {
            const IndustrySpec *indsp = GetIndustrySpec(this->selected_type);
            SetDParam(0, (_settings_game.construction.raw_industry_construction == 2 && indsp->IsRawIndustry()) ? STR_FUND_INDUSTRY_PROSPECT_NEW_INDUSTRY : STR_FUND_INDUSTRY_FUND_NEW_INDUSTRY);
          } else {
            SetDParam(0, STR_FUND_INDUSTRY_FUND_NEW_INDUSTRY);
          }
        }
        break;
    }
  }
 
  void DrawWidget(const Rect &r, WidgetID widget) const override
  {
    switch (widget) {
      case WID_DPI_MATRIX_WIDGET: {
        bool rtl = _current_text_dir == TD_RTL;
        Rect text = r.WithHeight(this->resize.step_height).Shrink(WidgetDimensions::scaled.matrix);
        Rect icon = text.WithWidth(this->legend.width, rtl);
        text = text.Indent(this->legend.width + WidgetDimensions::scaled.hsep_wide, rtl);
 
        /* Vertical offset for legend icon. */
        icon.top    = r.top + (this->resize.step_height - this->legend.height + 1) / 2;
        icon.bottom = icon.top + this->legend.height - 1;
 
        auto [first, last] = this->vscroll->GetVisibleRangeIterators(this->list);
        for (auto it = first; it != last; ++it) {
          IndustryType type = *it;
          bool selected = this->selected_type == type;
          const IndustrySpec *indsp = GetIndustrySpec(type);
 
          /* Draw the name of the industry in white is selected, otherwise, in orange */
          DrawString(text, indsp->name, selected ? TC_WHITE : TC_ORANGE);
          GfxFillRect(icon, selected ? PC_WHITE : PC_BLACK);
          GfxFillRect(icon.Shrink(WidgetDimensions::scaled.bevel), indsp->map_colour);
          SetDParam(0, Industry::GetIndustryTypeCount(type));
          DrawString(text, STR_JUST_COMMA, TC_BLACK, SA_RIGHT, false, FS_SMALL);
 
          text = text.Translate(0, this->resize.step_height);
          icon = icon.Translate(0, this->resize.step_height);
        }
        break;
      }
 
      case WID_DPI_INFOPANEL: {
        Rect ir = r.Shrink(WidgetDimensions::scaled.framerect);
 
        if (this->selected_type == INVALID_INDUSTRYTYPE) {
          DrawStringMultiLine(ir, STR_FUND_INDUSTRY_MANY_RANDOM_INDUSTRIES_TOOLTIP);
          break;
        }
 
        const IndustrySpec *indsp = GetIndustrySpec(this->selected_type);
 
        if (_game_mode != GM_EDITOR) {
          SetDParam(0, indsp->GetConstructionCost());
          DrawString(ir, STR_FUND_INDUSTRY_INDUSTRY_BUILD_COST);
          ir.top += GetCharacterHeight(FS_NORMAL);
        }
 
        CargoSuffix cargo_suffix[std::tuple_size_v<decltype(indsp->accepts_cargo)>];
 
        /* Draw the accepted cargoes, if any. Otherwise, will print "Nothing". */
        GetAllCargoSuffixes(CARGOSUFFIX_IN, CST_FUND, nullptr, this->selected_type, indsp, indsp->accepts_cargo, cargo_suffix);
        std::string cargostring = this->MakeCargoListString(indsp->accepts_cargo, cargo_suffix, STR_INDUSTRY_VIEW_REQUIRES_N_CARGO);
        ir.top = DrawStringMultiLine(ir, cargostring);
 
        /* Draw the produced cargoes, if any. Otherwise, will print "Nothing". */
        GetAllCargoSuffixes(CARGOSUFFIX_OUT, CST_FUND, nullptr, this->selected_type, indsp, indsp->produced_cargo, cargo_suffix);
        cargostring = this->MakeCargoListString(indsp->produced_cargo, cargo_suffix, STR_INDUSTRY_VIEW_PRODUCES_N_CARGO);
        ir.top = DrawStringMultiLine(ir, cargostring);
 
        /* Get the additional purchase info text, if it has not already been queried. */
        if (HasBit(indsp->callback_mask, CBM_IND_FUND_MORE_TEXT)) {
          uint16_t callback_res = GetIndustryCallback(CBID_INDUSTRY_FUND_MORE_TEXT, 0, 0, nullptr, this->selected_type, INVALID_TILE);
          if (callback_res != CALLBACK_FAILED && callback_res != 0x400) {
            if (callback_res > 0x400) {
              ErrorUnknownCallbackResult(indsp->grf_prop.grffile->grfid, CBID_INDUSTRY_FUND_MORE_TEXT, callback_res);
            } else {
              StringID str = GetGRFStringID(indsp->grf_prop.grffile->grfid, 0xD000 + callback_res);  // No. here's the new string
              if (str != STR_UNDEFINED) {
                StartTextRefStackUsage(indsp->grf_prop.grffile, 6);
                DrawStringMultiLine(ir, str, TC_YELLOW);
                StopTextRefStackUsage();
              }
            }
          }
        }
        break;
      }
    }
  }
 
  static void AskManyRandomIndustriesCallback(Window *, bool confirmed)
  {
    if (!confirmed) return;
 
    if (Town::GetNumItems() == 0) {
      ShowErrorMessage(STR_ERROR_CAN_T_GENERATE_INDUSTRIES, STR_ERROR_MUST_FOUND_TOWN_FIRST, WL_INFO);
    } else {
      Backup<bool> old_generating_world(_generating_world, true);
      BasePersistentStorageArray::SwitchMode(PSM_ENTER_GAMELOOP);
      GenerateIndustries();
      BasePersistentStorageArray::SwitchMode(PSM_LEAVE_GAMELOOP);
      old_generating_world.Restore();
    }
  }
 
  static void AskRemoveAllIndustriesCallback(Window *, bool confirmed)
  {
    if (!confirmed) return;
 
    for (Industry *industry : Industry::Iterate()) delete industry;
 
    /* Clear farmland. */
    for (TileIndex tile = 0; tile < Map::Size(); tile++) {
      if (IsTileType(tile, MP_CLEAR) && GetRawClearGround(tile) == CLEAR_FIELDS) {
        MakeClear(tile, CLEAR_GRASS, 3);
      }
    }
 
    MarkWholeScreenDirty();
  }
 
  void OnClick([[maybe_unused]] Point pt, WidgetID widget, [[maybe_unused]] int click_count) override
  {
    switch (widget) {
      case WID_DPI_CREATE_RANDOM_INDUSTRIES_WIDGET: {
        assert(_game_mode == GM_EDITOR);
        this->HandleButtonClick(WID_DPI_CREATE_RANDOM_INDUSTRIES_WIDGET);
        ShowQuery(STR_FUND_INDUSTRY_MANY_RANDOM_INDUSTRIES_CAPTION, STR_FUND_INDUSTRY_MANY_RANDOM_INDUSTRIES_QUERY, nullptr, AskManyRandomIndustriesCallback);
        break;
      }
 
      case WID_DPI_REMOVE_ALL_INDUSTRIES_WIDGET: {
        assert(_game_mode == GM_EDITOR);
        this->HandleButtonClick(WID_DPI_REMOVE_ALL_INDUSTRIES_WIDGET);
        ShowQuery(STR_FUND_INDUSTRY_REMOVE_ALL_INDUSTRIES_CAPTION, STR_FUND_INDUSTRY_REMOVE_ALL_INDUSTRIES_QUERY, nullptr, AskRemoveAllIndustriesCallback);
        break;
      }
 
      case WID_DPI_MATRIX_WIDGET: {
        auto it = this->vscroll->GetScrolledItemFromWidget(this->list, pt.y, this, WID_DPI_MATRIX_WIDGET);
        if (it != this->list.end()) { // Is it within the boundaries of available data?
          this->selected_type = *it;
          this->UpdateAvailability();
 
          const IndustrySpec *indsp = GetIndustrySpec(this->selected_type);
 
          this->SetDirty();
 
          if (_thd.GetCallbackWnd() == this &&
              ((_game_mode != GM_EDITOR && _settings_game.construction.raw_industry_construction == 2 && indsp != nullptr && indsp->IsRawIndustry()) || !this->enabled)) {
            /* Reset the button state if going to prospecting or "build many industries" */
            this->RaiseButtons();
            ResetObjectToPlace();
          }
 
          this->SetButtons();
          if (this->enabled && click_count > 1) this->OnClick(pt, WID_DPI_FUND_WIDGET, 1);
        }
        break;
      }
 
      case WID_DPI_DISPLAY_WIDGET:
        if (this->selected_type != INVALID_INDUSTRYTYPE) ShowIndustryCargoesWindow(this->selected_type);
        break;
 
      case WID_DPI_FUND_WIDGET: {
        if (this->selected_type != INVALID_INDUSTRYTYPE) {
          if (_game_mode != GM_EDITOR && _settings_game.construction.raw_industry_construction == 2 && GetIndustrySpec(this->selected_type)->IsRawIndustry()) {
            Command<CMD_BUILD_INDUSTRY>::Post(STR_ERROR_CAN_T_CONSTRUCT_THIS_INDUSTRY, 0, this->selected_type, 0, false, InteractiveRandom());
            this->HandleButtonClick(WID_DPI_FUND_WIDGET);
          } else {
            HandlePlacePushButton(this, WID_DPI_FUND_WIDGET, SPR_CURSOR_INDUSTRY, HT_RECT);
          }
        }
        break;
      }
    }
  }
 
  void OnResize() override
  {
    /* Adjust the number of items in the matrix depending of the resize */
    this->vscroll->SetCapacityFromWidget(this, WID_DPI_MATRIX_WIDGET);
  }
 
  void OnPlaceObject([[maybe_unused]] Point pt, TileIndex tile) override
  {
    bool success = true;
    /* We do not need to protect ourselves against "Random Many Industries" in this mode */
    const IndustrySpec *indsp = GetIndustrySpec(this->selected_type);
    uint32_t seed = InteractiveRandom();
    uint32_t layout_index = InteractiveRandomRange((uint32_t)indsp->layouts.size());
 
    if (_game_mode == GM_EDITOR) {
      /* Show error if no town exists at all */
      if (Town::GetNumItems() == 0) {
        SetDParam(0, indsp->name);
        ShowErrorMessage(STR_ERROR_CAN_T_BUILD_HERE, STR_ERROR_MUST_FOUND_TOWN_FIRST, WL_INFO, pt.x, pt.y);
        return;
      }
 
      Backup<CompanyID> cur_company(_current_company, OWNER_NONE);
      Backup<bool> old_generating_world(_generating_world, true);
      _ignore_restrictions = true;
 
      Command<CMD_BUILD_INDUSTRY>::Post(STR_ERROR_CAN_T_CONSTRUCT_THIS_INDUSTRY, &CcBuildIndustry, tile, this->selected_type, layout_index, false, seed);
 
      cur_company.Restore();
      old_generating_world.Restore();
      _ignore_restrictions = false;
    } else {
      success = Command<CMD_BUILD_INDUSTRY>::Post(STR_ERROR_CAN_T_CONSTRUCT_THIS_INDUSTRY, tile, this->selected_type, layout_index, false, seed);
    }
 
    /* If an industry has been built, just reset the cursor and the system */
    if (success && !_settings_client.gui.persistent_buildingtools) ResetObjectToPlace();
  }
 
  IntervalTimer<TimerWindow> update_interval = {std::chrono::seconds(3), [this](auto) {
    if (_game_mode == GM_EDITOR) return;
    if (this->selected_type == INVALID_INDUSTRYTYPE) return;
 
    bool enabled = this->enabled;
    this->UpdateAvailability();
    if (enabled != this->enabled) {
      this->SetButtons();
      this->SetDirty();
    }
  }};
 
  void OnTimeout() override
  {
    this->RaiseButtons();
  }
 
  void OnPlaceObjectAbort() override
  {
    this->RaiseButtons();
  }
 
  void OnInvalidateData([[maybe_unused]] int data = 0, [[maybe_unused]] bool gui_scope = true) override
  {
    if (!gui_scope) return;
    this->SetupArrays();
    this->SetButtons();
    this->SetDirty();
  }
};
 
void ShowBuildIndustryWindow()
{
  if (_game_mode != GM_EDITOR && !Company::IsValidID(_local_company)) return;
  if (BringWindowToFrontById(WC_BUILD_INDUSTRY, 0)) return;
  new BuildIndustryWindow();
}
 
static void UpdateIndustryProduction(Industry *i);
 
static inline bool IsProductionAlterable(const Industry *i)
{
  const IndustrySpec *is = GetIndustrySpec(i->type);
  bool has_prod = std::any_of(std::begin(is->production_rate), std::end(is->production_rate), [](auto rate) { return rate != 0; });
  return ((_game_mode == GM_EDITOR || _cheats.setup_prod.value) &&
      (has_prod || is->IsRawIndustry()) &&
      !_networking);
}
 
class IndustryViewWindow : public Window
{
  enum Editability {
    EA_NONE,              
    EA_MULTIPLIER,        
    EA_RATE,              
  };
 
  enum InfoLine {
    IL_NONE,              
    IL_MULTIPLIER,        
    IL_RATE1,             
    IL_RATE2,             
  };
 
  Dimension cargo_icon_size; 
  Editability editable;     
  InfoLine editbox_line;    
  InfoLine clicked_line;    
  uint8_t clicked_button;      
  int production_offset_y;  
  int info_height;          
  int cheat_line_height;    
 
public:
  IndustryViewWindow(WindowDesc &desc, WindowNumber window_number) : Window(desc)
  {
    this->flags |= WF_DISABLE_VP_SCROLL;
    this->editbox_line = IL_NONE;
    this->clicked_line = IL_NONE;
    this->clicked_button = 0;
    this->info_height = WidgetDimensions::scaled.framerect.Vertical() + 2 * GetCharacterHeight(FS_NORMAL); // Info panel has at least two lines text.
 
    this->InitNested(window_number);
    NWidgetViewport *nvp = this->GetWidget<NWidgetViewport>(WID_IV_VIEWPORT);
    nvp->InitializeViewport(this, Industry::Get(window_number)->location.GetCenterTile(), ScaleZoomGUI(ZOOM_LVL_INDUSTRY));
 
    this->InvalidateData();
  }
 
  void OnInit() override
  {
    /* This only used when the cheat to alter industry production is enabled */
    this->cheat_line_height = std::max(SETTING_BUTTON_HEIGHT + WidgetDimensions::scaled.vsep_normal, GetCharacterHeight(FS_NORMAL));
    this->cargo_icon_size = GetLargestCargoIconSize();
  }
 
  void OnPaint() override
  {
    this->DrawWidgets();
 
    if (this->IsShaded()) return; // Don't draw anything when the window is shaded.
 
    const Rect r = this->GetWidget<NWidgetBase>(WID_IV_INFO)->GetCurrentRect();
    int expected = this->DrawInfo(r);
    if (expected != r.bottom) {
      this->info_height = expected - r.top + 1;
      this->ReInit();
      return;
    }
  }
 
  void DrawCargoIcon(const Rect &r, CargoID cid) const
  {
    bool rtl = _current_text_dir == TD_RTL;
    SpriteID icon = CargoSpec::Get(cid)->GetCargoIcon();
    Dimension d = GetSpriteSize(icon);
    Rect ir = r.WithWidth(this->cargo_icon_size.width, rtl).WithHeight(GetCharacterHeight(FS_NORMAL));
    DrawSprite(icon, PAL_NONE, CenterBounds(ir.left, ir.right, d.width), CenterBounds(ir.top, ir.bottom, this->cargo_icon_size.height));
  }
 
  int DrawInfo(const Rect &r)
  {
    bool rtl = _current_text_dir == TD_RTL;
    Industry *i = Industry::Get(this->window_number);
    const IndustrySpec *ind = GetIndustrySpec(i->type);
    Rect ir = r.Shrink(WidgetDimensions::scaled.framerect);
    bool first = true;
    bool has_accept = false;
 
    if (i->prod_level == PRODLEVEL_CLOSURE) {
      DrawString(ir, STR_INDUSTRY_VIEW_INDUSTRY_ANNOUNCED_CLOSURE);
      ir.top += GetCharacterHeight(FS_NORMAL) + WidgetDimensions::scaled.vsep_wide;
    }
 
    const int label_indent = WidgetDimensions::scaled.hsep_normal + this->cargo_icon_size.width;
    bool stockpiling = HasBit(ind->callback_mask, CBM_IND_PRODUCTION_CARGO_ARRIVAL) || HasBit(ind->callback_mask, CBM_IND_PRODUCTION_256_TICKS);
 
    for (const auto &a : i->accepted) {
      if (!IsValidCargoID(a.cargo)) continue;
      has_accept = true;
      if (first) {
        DrawString(ir, STR_INDUSTRY_VIEW_REQUIRES);
        ir.top += GetCharacterHeight(FS_NORMAL);
        first = false;
      }
 
      DrawCargoIcon(ir, a.cargo);
 
      CargoSuffix suffix;
      GetCargoSuffix(CARGOSUFFIX_IN, CST_VIEW, i, i->type, ind, a.cargo, &a - i->accepted.data(), suffix);
 
      SetDParam(0, CargoSpec::Get(a.cargo)->name);
      SetDParam(1, a.cargo);
      SetDParam(2, a.waiting);
      SetDParamStr(3, "");
      StringID str = STR_NULL;
      switch (suffix.display) {
        case CSD_CARGO_AMOUNT_TEXT:
          SetDParamStr(3, suffix.text);
          [[fallthrough]];
        case CSD_CARGO_AMOUNT:
          str = stockpiling ? STR_INDUSTRY_VIEW_ACCEPT_CARGO_AMOUNT : STR_INDUSTRY_VIEW_ACCEPT_CARGO;
          break;
 
        case CSD_CARGO_TEXT:
          SetDParamStr(3, suffix.text);
          [[fallthrough]];
        case CSD_CARGO:
          str = STR_INDUSTRY_VIEW_ACCEPT_CARGO;
          break;
 
        default:
          NOT_REACHED();
      }
      DrawString(ir.Indent(label_indent, rtl), str);
      ir.top += GetCharacterHeight(FS_NORMAL);
    }
 
    int line_height = this->editable == EA_RATE ? this->cheat_line_height : GetCharacterHeight(FS_NORMAL);
    int text_y_offset = (line_height - GetCharacterHeight(FS_NORMAL)) / 2;
    int button_y_offset = (line_height - SETTING_BUTTON_HEIGHT) / 2;
    first = true;
    for (const auto &p : i->produced) {
      if (!IsValidCargoID(p.cargo)) continue;
      if (first) {
        if (has_accept) ir.top += WidgetDimensions::scaled.vsep_wide;
        DrawString(ir, TimerGameEconomy::UsingWallclockUnits() ? STR_INDUSTRY_VIEW_PRODUCTION_LAST_MINUTE_TITLE : STR_INDUSTRY_VIEW_PRODUCTION_LAST_MONTH_TITLE);
        ir.top += GetCharacterHeight(FS_NORMAL);
        if (this->editable == EA_RATE) this->production_offset_y = ir.top;
        first = false;
      }
 
      DrawCargoIcon(ir, p.cargo);
 
      CargoSuffix suffix;
      GetCargoSuffix(CARGOSUFFIX_OUT, CST_VIEW, i, i->type, ind, p.cargo, &p - i->produced.data(), suffix);
 
      SetDParam(0, p.cargo);
      SetDParam(1, p.history[LAST_MONTH].production);
      SetDParamStr(2, suffix.text);
      SetDParam(3, ToPercent8(p.history[LAST_MONTH].PctTransported()));
      DrawString(ir.Indent(label_indent + (this->editable == EA_RATE ? SETTING_BUTTON_WIDTH + WidgetDimensions::scaled.hsep_normal : 0), rtl).Translate(0, text_y_offset), STR_INDUSTRY_VIEW_TRANSPORTED);
      /* Let's put out those buttons.. */
      if (this->editable == EA_RATE) {
        DrawArrowButtons(ir.Indent(label_indent, rtl).WithWidth(SETTING_BUTTON_WIDTH, rtl).left, ir.top + button_y_offset, COLOUR_YELLOW, (this->clicked_line == IL_RATE1 + (&p - i->produced.data())) ? this->clicked_button : 0,
            p.rate > 0, p.rate < 255);
      }
      ir.top += line_height;
    }
 
    /* Display production multiplier if editable */
    if (this->editable == EA_MULTIPLIER) {
      line_height = this->cheat_line_height;
      text_y_offset = (line_height - GetCharacterHeight(FS_NORMAL)) / 2;
      button_y_offset = (line_height - SETTING_BUTTON_HEIGHT) / 2;
      ir.top += WidgetDimensions::scaled.vsep_wide;
      this->production_offset_y = ir.top;
      SetDParam(0, RoundDivSU(i->prod_level * 100, PRODLEVEL_DEFAULT));
      DrawString(ir.Indent(label_indent + SETTING_BUTTON_WIDTH + WidgetDimensions::scaled.hsep_normal, rtl).Translate(0, text_y_offset), STR_INDUSTRY_VIEW_PRODUCTION_LEVEL);
      DrawArrowButtons(ir.Indent(label_indent, rtl).WithWidth(SETTING_BUTTON_WIDTH, rtl).left, ir.top + button_y_offset, COLOUR_YELLOW, (this->clicked_line == IL_MULTIPLIER) ? this->clicked_button : 0,
          i->prod_level > PRODLEVEL_MINIMUM, i->prod_level < PRODLEVEL_MAXIMUM);
      ir.top += line_height;
    }
 
    /* Get the extra message for the GUI */
    if (HasBit(ind->callback_mask, CBM_IND_WINDOW_MORE_TEXT)) {
      uint16_t callback_res = GetIndustryCallback(CBID_INDUSTRY_WINDOW_MORE_TEXT, 0, 0, i, i->type, i->location.tile);
      if (callback_res != CALLBACK_FAILED && callback_res != 0x400) {
        if (callback_res > 0x400) {
          ErrorUnknownCallbackResult(ind->grf_prop.grffile->grfid, CBID_INDUSTRY_WINDOW_MORE_TEXT, callback_res);
        } else {
          StringID message = GetGRFStringID(ind->grf_prop.grffile->grfid, 0xD000 + callback_res);
          if (message != STR_NULL && message != STR_UNDEFINED) {
            ir.top += WidgetDimensions::scaled.vsep_wide;
 
            StartTextRefStackUsage(ind->grf_prop.grffile, 6);
            /* Use all the available space left from where we stand up to the
             * end of the window. We ALSO enlarge the window if needed, so we
             * can 'go' wild with the bottom of the window. */
            ir.top = DrawStringMultiLine(ir.left, ir.right, ir.top, UINT16_MAX, message, TC_BLACK);
            StopTextRefStackUsage();
          }
        }
      }
    }
 
    if (!i->text.empty()) {
      SetDParamStr(0, i->text);
      ir.top += WidgetDimensions::scaled.vsep_wide;
      ir.top = DrawStringMultiLine(ir.left, ir.right, ir.top, UINT16_MAX, STR_JUST_RAW_STRING, TC_BLACK);
    }
 
    /* Return required bottom position, the last pixel row plus some padding. */
    return ir.top - 1 + WidgetDimensions::scaled.framerect.bottom;
  }
 
  void SetStringParameters(WidgetID widget) const override
  {
    if (widget == WID_IV_CAPTION) SetDParam(0, this->window_number);
  }
 
  void UpdateWidgetSize(WidgetID widget, Dimension &size, [[maybe_unused]] const Dimension &padding, [[maybe_unused]] Dimension &fill, [[maybe_unused]] Dimension &resize) override
  {
    if (widget == WID_IV_INFO) size.height = this->info_height;
  }
 
  void OnClick([[maybe_unused]] Point pt, WidgetID widget, [[maybe_unused]] int click_count) override
  {
    switch (widget) {
      case WID_IV_INFO: {
        Industry *i = Industry::Get(this->window_number);
        InfoLine line = IL_NONE;
 
        switch (this->editable) {
          case EA_NONE: break;
 
          case EA_MULTIPLIER:
            if (IsInsideBS(pt.y, this->production_offset_y, this->cheat_line_height)) line = IL_MULTIPLIER;
            break;
 
          case EA_RATE:
            if (pt.y >= this->production_offset_y) {
              int row = (pt.y - this->production_offset_y) / this->cheat_line_height;
              for (auto itp = std::begin(i->produced); itp != std::end(i->produced); ++itp) {
                if (!IsValidCargoID(itp->cargo)) continue;
                row--;
                if (row < 0) {
                  line = (InfoLine)(IL_RATE1 + (itp - std::begin(i->produced)));
                  break;
                }
              }
            }
            break;
        }
        if (line == IL_NONE) return;
 
        bool rtl = _current_text_dir == TD_RTL;
        Rect r = this->GetWidget<NWidgetBase>(widget)->GetCurrentRect().Shrink(WidgetDimensions::scaled.framerect).Indent(this->cargo_icon_size.width + WidgetDimensions::scaled.hsep_normal, rtl);
 
        if (r.WithWidth(SETTING_BUTTON_WIDTH, rtl).Contains(pt)) {
          /* Clicked buttons, decrease or increase production */
          bool decrease = r.WithWidth(SETTING_BUTTON_WIDTH / 2, rtl).Contains(pt);
          switch (this->editable) {
            case EA_MULTIPLIER:
              if (decrease) {
                if (i->prod_level <= PRODLEVEL_MINIMUM) return;
                i->prod_level = static_cast<uint8_t>(std::max<uint>(i->prod_level / 2, PRODLEVEL_MINIMUM));
              } else {
                if (i->prod_level >= PRODLEVEL_MAXIMUM) return;
                i->prod_level = static_cast<uint8_t>(std::min<uint>(i->prod_level * 2, PRODLEVEL_MAXIMUM));
              }
              break;
 
            case EA_RATE:
              if (decrease) {
                if (i->produced[line - IL_RATE1].rate <= 0) return;
                i->produced[line - IL_RATE1].rate = std::max(i->produced[line - IL_RATE1].rate / 2, 0);
              } else {
                if (i->produced[line - IL_RATE1].rate >= 255) return;
                /* a zero production industry is unlikely to give anything but zero, so push it a little bit */
                int new_prod = i->produced[line - IL_RATE1].rate == 0 ? 1 : i->produced[line - IL_RATE1].rate * 2;
                i->produced[line - IL_RATE1].rate = ClampTo<uint8_t>(new_prod);
              }
              break;
 
            default: NOT_REACHED();
          }
 
          UpdateIndustryProduction(i);
          this->SetDirty();
          this->SetTimeout();
          this->clicked_line = line;
          this->clicked_button = (decrease ^ rtl) ? 1 : 2;
        } else if (r.Indent(SETTING_BUTTON_WIDTH + WidgetDimensions::scaled.hsep_normal, rtl).Contains(pt)) {
          /* clicked the text */
          this->editbox_line = line;
          switch (this->editable) {
            case EA_MULTIPLIER:
              SetDParam(0, RoundDivSU(i->prod_level * 100, PRODLEVEL_DEFAULT));
              ShowQueryString(STR_JUST_INT, STR_CONFIG_GAME_PRODUCTION_LEVEL, 10, this, CS_ALPHANUMERAL, QSF_NONE);
              break;
 
            case EA_RATE:
              SetDParam(0, i->produced[line - IL_RATE1].rate * 8);
              ShowQueryString(STR_JUST_INT, STR_CONFIG_GAME_PRODUCTION, 10, this, CS_ALPHANUMERAL, QSF_NONE);
              break;
 
            default: NOT_REACHED();
          }
        }
        break;
      }
 
      case WID_IV_GOTO: {
        Industry *i = Industry::Get(this->window_number);
        if (_ctrl_pressed) {
          ShowExtraViewportWindow(i->location.GetCenterTile());
        } else {
          ScrollMainWindowToTile(i->location.GetCenterTile());
        }
        break;
      }
 
      case WID_IV_DISPLAY: {
        Industry *i = Industry::Get(this->window_number);
        ShowIndustryCargoesWindow(i->type);
        break;
      }
    }
  }
 
  void OnTimeout() override
  {
    this->clicked_line = IL_NONE;
    this->clicked_button = 0;
    this->SetDirty();
  }
 
  void OnResize() override
  {
    if (this->viewport != nullptr) {
      NWidgetViewport *nvp = this->GetWidget<NWidgetViewport>(WID_IV_VIEWPORT);
      nvp->UpdateViewportCoordinates(this);
 
      ScrollWindowToTile(Industry::Get(this->window_number)->location.GetCenterTile(), this, true); // Re-center viewport.
    }
  }
 
  void OnMouseWheel(int wheel) override
  {
    if (_settings_client.gui.scrollwheel_scrolling != SWS_OFF) {
      DoZoomInOutWindow(wheel < 0 ? ZOOM_IN : ZOOM_OUT, this);
    }
  }
 
  void OnQueryTextFinished(std::optional<std::string> str) override
  {
    if (!str.has_value() || str->empty()) return;
 
    Industry *i = Industry::Get(this->window_number);
    uint value = atoi(str->c_str());
    switch (this->editbox_line) {
      case IL_NONE: NOT_REACHED();
 
      case IL_MULTIPLIER:
        i->prod_level = ClampU(RoundDivSU(value * PRODLEVEL_DEFAULT, 100), PRODLEVEL_MINIMUM, PRODLEVEL_MAXIMUM);
        break;
 
      default:
        i->produced[this->editbox_line - IL_RATE1].rate = ClampU(RoundDivSU(value, 8), 0, 255);
        break;
    }
    UpdateIndustryProduction(i);
    this->SetDirty();
  }
 
  void OnInvalidateData([[maybe_unused]] int data = 0, [[maybe_unused]] bool gui_scope = true) override
  {
    if (!gui_scope) return;
    const Industry *i = Industry::Get(this->window_number);
    if (IsProductionAlterable(i)) {
      const IndustrySpec *ind = GetIndustrySpec(i->type);
      this->editable = ind->UsesOriginalEconomy() ? EA_MULTIPLIER : EA_RATE;
    } else {
      this->editable = EA_NONE;
    }
  }
 
  bool IsNewGRFInspectable() const override
  {
    return ::IsNewGRFInspectable(GSF_INDUSTRIES, this->window_number);
  }
 
  void ShowNewGRFInspectWindow() const override
  {
    ::ShowNewGRFInspectWindow(GSF_INDUSTRIES, this->window_number);
  }
};
 
static void UpdateIndustryProduction(Industry *i)
{
  const IndustrySpec *indspec = GetIndustrySpec(i->type);
  if (indspec->UsesOriginalEconomy()) i->RecomputeProductionMultipliers();
 
  for (auto &p : i->produced) {
    if (IsValidCargoID(p.cargo)) {
      p.history[LAST_MONTH].production = ScaleByCargoScale(8 * p.rate, false);
    }
  }
}
 
static constexpr NWidgetPart _nested_industry_view_widgets[] = {
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_CREAM),
    NWidget(WWT_CAPTION, COLOUR_CREAM, WID_IV_CAPTION), SetDataTip(STR_INDUSTRY_VIEW_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
    NWidget(WWT_PUSHIMGBTN, COLOUR_CREAM, WID_IV_GOTO), SetAspect(WidgetDimensions::ASPECT_LOCATION), SetDataTip(SPR_GOTO_LOCATION, STR_INDUSTRY_VIEW_LOCATION_TOOLTIP),
    NWidget(WWT_DEBUGBOX, COLOUR_CREAM),
    NWidget(WWT_SHADEBOX, COLOUR_CREAM),
    NWidget(WWT_DEFSIZEBOX, COLOUR_CREAM),
    NWidget(WWT_STICKYBOX, COLOUR_CREAM),
  EndContainer(),
  NWidget(WWT_PANEL, COLOUR_CREAM),
    NWidget(WWT_INSET, COLOUR_CREAM), SetPadding(2, 2, 2, 2),
      NWidget(NWID_VIEWPORT, INVALID_COLOUR, WID_IV_VIEWPORT), SetMinimalSize(254, 86), SetFill(1, 0), SetResize(1, 1),
    EndContainer(),
  EndContainer(),
  NWidget(WWT_PANEL, COLOUR_CREAM, WID_IV_INFO), SetMinimalSize(260, 0), SetMinimalTextLines(2, WidgetDimensions::unscaled.framerect.Vertical()), SetResize(1, 0),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_PUSHTXTBTN, COLOUR_CREAM, WID_IV_DISPLAY), SetFill(1, 0), SetResize(1, 0), SetDataTip(STR_INDUSTRY_DISPLAY_CHAIN, STR_INDUSTRY_DISPLAY_CHAIN_TOOLTIP),
    NWidget(WWT_RESIZEBOX, COLOUR_CREAM),
  EndContainer(),
};
 
static WindowDesc _industry_view_desc(
  WDP_AUTO, "view_industry", 260, 120,
  WC_INDUSTRY_VIEW, WC_NONE,
  0,
  _nested_industry_view_widgets
);
 
void ShowIndustryViewWindow(int industry)
{
  AllocateWindowDescFront<IndustryViewWindow>(_industry_view_desc, industry);
}
 
static constexpr NWidgetPart _nested_industry_directory_widgets[] = {
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_BROWN),
    NWidget(WWT_CAPTION, COLOUR_BROWN, WID_ID_CAPTION), SetDataTip(STR_INDUSTRY_DIRECTORY_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
    NWidget(WWT_SHADEBOX, COLOUR_BROWN),
    NWidget(WWT_DEFSIZEBOX, COLOUR_BROWN),
    NWidget(WWT_STICKYBOX, COLOUR_BROWN),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(NWID_VERTICAL),
      NWidget(NWID_HORIZONTAL),
        NWidget(WWT_TEXTBTN, COLOUR_BROWN, WID_ID_DROPDOWN_ORDER), SetDataTip(STR_BUTTON_SORT_BY, STR_TOOLTIP_SORT_ORDER),
        NWidget(WWT_DROPDOWN, COLOUR_BROWN, WID_ID_DROPDOWN_CRITERIA), SetDataTip(STR_JUST_STRING, STR_TOOLTIP_SORT_CRITERIA),
        NWidget(WWT_EDITBOX, COLOUR_BROWN, WID_ID_FILTER), SetFill(1, 0), SetResize(1, 0), SetDataTip(STR_LIST_FILTER_OSKTITLE, STR_LIST_FILTER_TOOLTIP),
      EndContainer(),
      NWidget(NWID_HORIZONTAL),
        NWidget(WWT_DROPDOWN, COLOUR_BROWN, WID_ID_FILTER_BY_ACC_CARGO), SetMinimalSize(225, 12), SetFill(0, 1), SetDataTip(STR_INDUSTRY_DIRECTORY_ACCEPTED_CARGO_FILTER, STR_TOOLTIP_FILTER_CRITERIA),
        NWidget(WWT_DROPDOWN, COLOUR_BROWN, WID_ID_FILTER_BY_PROD_CARGO), SetMinimalSize(225, 12), SetFill(0, 1), SetDataTip(STR_INDUSTRY_DIRECTORY_PRODUCED_CARGO_FILTER, STR_TOOLTIP_FILTER_CRITERIA),
        NWidget(WWT_PANEL, COLOUR_BROWN), SetResize(1, 0), EndContainer(),
      EndContainer(),
      NWidget(WWT_PANEL, COLOUR_BROWN, WID_ID_INDUSTRY_LIST), SetDataTip(0x0, STR_INDUSTRY_DIRECTORY_LIST_CAPTION), SetResize(1, 1), SetScrollbar(WID_ID_VSCROLLBAR),
      EndContainer(),
    EndContainer(),
    NWidget(NWID_VSCROLLBAR, COLOUR_BROWN, WID_ID_VSCROLLBAR),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(NWID_HSCROLLBAR, COLOUR_BROWN, WID_ID_HSCROLLBAR),
    NWidget(WWT_RESIZEBOX, COLOUR_BROWN),
  EndContainer(),
};
 
typedef GUIList<const Industry *, const CargoID &, const std::pair<CargoID, CargoID> &> GUIIndustryList;
 
static bool CargoFilter(const Industry * const *industry, const std::pair<CargoID, CargoID> &cargoes)
{
  auto accepted_cargo = cargoes.first;
  auto produced_cargo = cargoes.second;
 
  bool accepted_cargo_matches;
 
  switch (accepted_cargo) {
    case CargoFilterCriteria::CF_ANY:
      accepted_cargo_matches = true;
      break;
 
    case CargoFilterCriteria::CF_NONE:
      accepted_cargo_matches = !(*industry)->IsCargoAccepted();
      break;
 
    default:
      accepted_cargo_matches = (*industry)->IsCargoAccepted(accepted_cargo);
      break;
  }
 
  bool produced_cargo_matches;
 
  switch (produced_cargo) {
    case CargoFilterCriteria::CF_ANY:
      produced_cargo_matches = true;
      break;
 
    case CargoFilterCriteria::CF_NONE:
      produced_cargo_matches = !(*industry)->IsCargoProduced();
      break;
 
    default:
      produced_cargo_matches = (*industry)->IsCargoProduced(produced_cargo);
      break;
  }
 
  return accepted_cargo_matches && produced_cargo_matches;
}
 
static GUIIndustryList::FilterFunction * const _industry_filter_funcs[] = { &CargoFilter };
 
enum IndustryDirectoryHotkeys {
  IDHK_FOCUS_FILTER_BOX, 
};
class IndustryDirectoryWindow : public Window {
protected:
  /* Runtime saved values */
  static Listing last_sorting;
 
  /* Constants for sorting industries */
  static inline const StringID sorter_names[] = {
    STR_SORT_BY_NAME,
    STR_SORT_BY_TYPE,
    STR_SORT_BY_PRODUCTION,
    STR_SORT_BY_TRANSPORTED,
  };
  static const std::initializer_list<GUIIndustryList::SortFunction * const> sorter_funcs;
 
  GUIIndustryList industries{IndustryDirectoryWindow::produced_cargo_filter};
  Scrollbar *vscroll;
  Scrollbar *hscroll;
 
  CargoID produced_cargo_filter_criteria;     
  CargoID accepted_cargo_filter_criteria;     
  static CargoID produced_cargo_filter;
 
  const int MAX_FILTER_LENGTH = 16;           
  StringFilter string_filter;                 
  QueryString industry_editbox;               
 
  enum class SorterType : uint8_t {
    ByName,        
    ByType,        
    ByProduction,  
    ByTransported, 
  };
 
  void SetProducedCargoFilter(CargoID cid)
  {
    if (this->produced_cargo_filter_criteria != cid) {
      this->produced_cargo_filter_criteria = cid;
      /* deactivate filter if criteria is 'Show All', activate it otherwise */
      bool is_filtering_necessary = this->produced_cargo_filter_criteria != CargoFilterCriteria::CF_ANY || this->accepted_cargo_filter_criteria != CargoFilterCriteria::CF_ANY;
 
      this->industries.SetFilterState(is_filtering_necessary);
      this->industries.SetFilterType(0);
      this->industries.ForceRebuild();
    }
  }
 
  void SetAcceptedCargoFilter(CargoID cid)
  {
    if (this->accepted_cargo_filter_criteria != cid) {
      this->accepted_cargo_filter_criteria = cid;
      /* deactivate filter if criteria is 'Show All', activate it otherwise */
      bool is_filtering_necessary = this->produced_cargo_filter_criteria != CargoFilterCriteria::CF_ANY || this->accepted_cargo_filter_criteria != CargoFilterCriteria::CF_ANY;
 
      this->industries.SetFilterState(is_filtering_necessary);
      this->industries.SetFilterType(0);
      this->industries.ForceRebuild();
    }
  }
 
  StringID GetCargoFilterLabel(CargoID cid) const
  {
    switch (cid) {
      case CargoFilterCriteria::CF_ANY: return STR_INDUSTRY_DIRECTORY_FILTER_ALL_TYPES;
      case CargoFilterCriteria::CF_NONE: return STR_INDUSTRY_DIRECTORY_FILTER_NONE;
      default: return CargoSpec::Get(cid)->name;
    }
  }
 
  void SetCargoFilterArray()
  {
    this->produced_cargo_filter_criteria = CargoFilterCriteria::CF_ANY;
    this->accepted_cargo_filter_criteria = CargoFilterCriteria::CF_ANY;
 
    this->industries.SetFilterFuncs(_industry_filter_funcs);
 
    bool is_filtering_necessary = this->produced_cargo_filter_criteria != CargoFilterCriteria::CF_ANY || this->accepted_cargo_filter_criteria != CargoFilterCriteria::CF_ANY;
 
    this->industries.SetFilterState(is_filtering_necessary);
  }
 
  uint GetIndustryListWidth() const
  {
    uint width = 0;
    for (const Industry *i : this->industries) {
      width = std::max(width, GetStringBoundingBox(this->GetIndustryString(i)).width);
    }
    return width + WidgetDimensions::scaled.framerect.Horizontal();
  }
 
  void BuildSortIndustriesList()
  {
    if (this->industries.NeedRebuild()) {
      this->industries.clear();
      this->industries.reserve(Industry::GetNumItems());
 
      for (const Industry *i : Industry::Iterate()) {
        if (this->string_filter.IsEmpty()) {
          this->industries.push_back(i);
          continue;
        }
        this->string_filter.ResetState();
        this->string_filter.AddLine(i->GetCachedName());
        if (this->string_filter.GetState()) this->industries.push_back(i);
      }
 
      this->industries.RebuildDone();
 
      auto filter = std::make_pair(this->accepted_cargo_filter_criteria, this->produced_cargo_filter_criteria);
 
      this->industries.Filter(filter);
 
      this->hscroll->SetCount(this->GetIndustryListWidth());
      this->vscroll->SetCount(this->industries.size()); // Update scrollbar as well.
    }
 
    IndustryDirectoryWindow::produced_cargo_filter = this->produced_cargo_filter_criteria;
    this->industries.Sort();
 
    this->SetDirty();
  }
 
  static inline int GetCargoTransportedPercentsIfValid(const Industry::ProducedCargo &p)
  {
    if (!IsValidCargoID(p.cargo)) return -1;
    return ToPercent8(p.history[LAST_MONTH].PctTransported());
  }
 
  static int GetCargoTransportedSortValue(const Industry *i)
  {
    CargoID filter = IndustryDirectoryWindow::produced_cargo_filter;
    if (filter == CargoFilterCriteria::CF_NONE) return 0;
 
    int percentage = 0, produced_cargo_count = 0;
    for (const auto &p : i->produced) {
      if (filter == CargoFilterCriteria::CF_ANY) {
        int transported = GetCargoTransportedPercentsIfValid(p);
        if (transported != -1) {
          produced_cargo_count++;
          percentage += transported;
        }
        if (produced_cargo_count == 0 && &p == &i->produced.back() && percentage == 0) {
          return transported;
        }
      } else if (filter == p.cargo) {
        return GetCargoTransportedPercentsIfValid(p);
      }
    }
 
    if (produced_cargo_count == 0) return percentage;
    return percentage / produced_cargo_count;
  }
 
  static bool IndustryNameSorter(const Industry * const &a, const Industry * const &b, const CargoID &)
  {
    int r = StrNaturalCompare(a->GetCachedName(), b->GetCachedName()); // Sort by name (natural sorting).
    if (r == 0) return a->index < b->index;
    return r < 0;
  }
 
  static bool IndustryTypeSorter(const Industry * const &a, const Industry * const &b, const CargoID &filter)
  {
    int it_a = 0;
    while (it_a != NUM_INDUSTRYTYPES && a->type != _sorted_industry_types[it_a]) it_a++;
    int it_b = 0;
    while (it_b != NUM_INDUSTRYTYPES && b->type != _sorted_industry_types[it_b]) it_b++;
    int r = it_a - it_b;
    return (r == 0) ? IndustryNameSorter(a, b, filter) : r < 0;
  }
 
  static bool IndustryProductionSorter(const Industry * const &a, const Industry * const &b, const CargoID &filter)
  {
    if (filter == CargoFilterCriteria::CF_NONE) return IndustryTypeSorter(a, b, filter);
 
    uint prod_a = 0, prod_b = 0;
    if (filter == CargoFilterCriteria::CF_ANY) {
      for (const auto &pa : a->produced) {
        if (IsValidCargoID(pa.cargo)) prod_a += pa.history[LAST_MONTH].production;
      }
      for (const auto &pb : b->produced) {
        if (IsValidCargoID(pb.cargo)) prod_b += pb.history[LAST_MONTH].production;
      }
    } else {
      if (auto ita = a->GetCargoProduced(filter); ita != std::end(a->produced)) prod_a = ita->history[LAST_MONTH].production;
      if (auto itb = b->GetCargoProduced(filter); itb != std::end(b->produced)) prod_b = itb->history[LAST_MONTH].production;
    }
    int r = prod_a - prod_b;
 
    return (r == 0) ? IndustryTypeSorter(a, b, filter) : r < 0;
  }
 
  static bool IndustryTransportedCargoSorter(const Industry * const &a, const Industry * const &b, const CargoID &filter)
  {
    int r = GetCargoTransportedSortValue(a) - GetCargoTransportedSortValue(b);
    return (r == 0) ? IndustryNameSorter(a, b, filter) : r < 0;
  }
 
  StringID GetIndustryString(const Industry *i) const
  {
    const IndustrySpec *indsp = GetIndustrySpec(i->type);
    uint8_t p = 0;
 
    /* Industry name */
    SetDParam(p++, i->index);
 
    /* Get industry productions (CargoID, production, suffix, transported) */
    struct CargoInfo {
      CargoID cargo_id; 
      uint16_t production; 
      uint transported; 
      std::string suffix; 
 
      CargoInfo(CargoID cargo_id, uint16_t production, uint transported, std::string &&suffix) : cargo_id(cargo_id), production(production), transported(transported), suffix(std::move(suffix)) {}
    };
    std::vector<CargoInfo> cargos;
 
    for (auto itp = std::begin(i->produced); itp != std::end(i->produced); ++itp) {
      if (!IsValidCargoID(itp->cargo)) continue;
      CargoSuffix cargo_suffix;
      GetCargoSuffix(CARGOSUFFIX_OUT, CST_DIR, i, i->type, indsp, itp->cargo, itp - std::begin(i->produced), cargo_suffix);
      cargos.emplace_back(itp->cargo, itp->history[LAST_MONTH].production, ToPercent8(itp->history[LAST_MONTH].PctTransported()), std::move(cargo_suffix.text));
    }
 
    switch (static_cast<IndustryDirectoryWindow::SorterType>(this->industries.SortType())) {
      case IndustryDirectoryWindow::SorterType::ByName:
      case IndustryDirectoryWindow::SorterType::ByType:
      case IndustryDirectoryWindow::SorterType::ByProduction:
        /* Sort by descending production, then descending transported */
        std::sort(cargos.begin(), cargos.end(), [](const CargoInfo &a, const CargoInfo &b) {
          if (a.production != b.production) return a.production > b.production;
          return a.transported > b.transported;
        });
        break;
 
      case IndustryDirectoryWindow::SorterType::ByTransported:
        /* Sort by descending transported, then descending production */
        std::sort(cargos.begin(), cargos.end(), [](const CargoInfo &a, const CargoInfo &b) {
          if (a.transported != b.transported) return a.transported > b.transported;
          return a.production > b.production;
        });
        break;
    }
 
    /* If the produced cargo filter is active then move the filtered cargo to the beginning of the list,
     * because this is the one the player interested in, and that way it is not hidden in the 'n' more cargos */
    const CargoID cid = this->produced_cargo_filter_criteria;
    if (cid != CargoFilterCriteria::CF_ANY && cid != CargoFilterCriteria::CF_NONE) {
      auto filtered_ci = std::find_if(cargos.begin(), cargos.end(), [cid](const CargoInfo &ci) -> bool {
        return ci.cargo_id == cid;
      });
      if (filtered_ci != cargos.end()) {
        std::rotate(cargos.begin(), filtered_ci, filtered_ci + 1);
      }
    }
 
    /* Display first 3 cargos */
    for (size_t j = 0; j < std::min<size_t>(3, cargos.size()); j++) {
      CargoInfo &ci = cargos[j];
      SetDParam(p++, STR_INDUSTRY_DIRECTORY_ITEM_INFO);
      SetDParam(p++, ci.cargo_id);
      SetDParam(p++, ci.production);
      SetDParamStr(p++, std::move(ci.suffix));
      SetDParam(p++, ci.transported);
    }
 
    /* Undisplayed cargos if any */
    SetDParam(p++, cargos.size() - 3);
 
    /* Drawing the right string */
    switch (cargos.size()) {
      case 0: return STR_INDUSTRY_DIRECTORY_ITEM_NOPROD;
      case 1: return STR_INDUSTRY_DIRECTORY_ITEM_PROD1;
      case 2: return STR_INDUSTRY_DIRECTORY_ITEM_PROD2;
      case 3: return STR_INDUSTRY_DIRECTORY_ITEM_PROD3;
      default: return STR_INDUSTRY_DIRECTORY_ITEM_PRODMORE;
    }
  }
 
public:
  IndustryDirectoryWindow(WindowDesc &desc, WindowNumber) : Window(desc), industry_editbox(MAX_FILTER_LENGTH * MAX_CHAR_LENGTH, MAX_FILTER_LENGTH)
  {
    this->CreateNestedTree();
    this->vscroll = this->GetScrollbar(WID_ID_VSCROLLBAR);
    this->hscroll = this->GetScrollbar(WID_ID_HSCROLLBAR);
 
    this->industries.SetListing(this->last_sorting);
    this->industries.SetSortFuncs(IndustryDirectoryWindow::sorter_funcs);
    this->industries.ForceRebuild();
 
    this->FinishInitNested(0);
 
    this->BuildSortIndustriesList();
 
    this->querystrings[WID_ID_FILTER] = &this->industry_editbox;
    this->industry_editbox.cancel_button = QueryString::ACTION_CLEAR;
  }
 
  ~IndustryDirectoryWindow()
  {
    this->last_sorting = this->industries.GetListing();
  }
 
  void OnInit() override
  {
    this->SetCargoFilterArray();
  }
 
  void SetStringParameters(WidgetID widget) const override
  {
    switch (widget) {
      case WID_ID_CAPTION:
        SetDParam(0, this->vscroll->GetCount());
        SetDParam(1, Industry::GetNumItems());
        break;
 
      case WID_ID_DROPDOWN_CRITERIA:
        SetDParam(0, IndustryDirectoryWindow::sorter_names[this->industries.SortType()]);
        break;
 
      case WID_ID_FILTER_BY_ACC_CARGO:
        SetDParam(0, this->GetCargoFilterLabel(this->accepted_cargo_filter_criteria));
        break;
 
      case WID_ID_FILTER_BY_PROD_CARGO:
        SetDParam(0, this->GetCargoFilterLabel(this->produced_cargo_filter_criteria));
        break;
    }
  }
 
  void DrawWidget(const Rect &r, WidgetID widget) const override
  {
    switch (widget) {
      case WID_ID_DROPDOWN_ORDER:
        this->DrawSortButtonState(widget, this->industries.IsDescSortOrder() ? SBS_DOWN : SBS_UP);
        break;
 
      case WID_ID_INDUSTRY_LIST: {
        Rect ir = r.Shrink(WidgetDimensions::scaled.framerect);
 
        /* Setup a clipping rectangle... */
        DrawPixelInfo tmp_dpi;
        if (!FillDrawPixelInfo(&tmp_dpi, ir)) return;
        /* ...but keep coordinates relative to the window. */
        tmp_dpi.left += ir.left;
        tmp_dpi.top += ir.top;
 
        AutoRestoreBackup dpi_backup(_cur_dpi, &tmp_dpi);
 
        ir.left -= this->hscroll->GetPosition();
        ir.right += this->hscroll->GetCapacity() - this->hscroll->GetPosition();
 
        if (this->industries.empty()) {
          DrawString(ir, STR_INDUSTRY_DIRECTORY_NONE);
          break;
        }
        const CargoID acf_cid = this->accepted_cargo_filter_criteria;
        auto [first, last] = this->vscroll->GetVisibleRangeIterators(this->industries);
        for (auto it = first; it != last; ++it) {
          TextColour tc = TC_FROMSTRING;
          if (acf_cid != CargoFilterCriteria::CF_ANY && acf_cid != CargoFilterCriteria::CF_NONE) {
            Industry *ind = const_cast<Industry *>(*it);
            if (IndustryTemporarilyRefusesCargo(ind, acf_cid)) {
              tc = TC_GREY | TC_FORCED;
            }
          }
          DrawString(ir, this->GetIndustryString(*it), tc);
 
          ir.top += this->resize.step_height;
        }
        break;
      }
    }
  }
 
  void UpdateWidgetSize(WidgetID widget, Dimension &size, [[maybe_unused]] const Dimension &padding, [[maybe_unused]] Dimension &fill, [[maybe_unused]] Dimension &resize) override
  {
    switch (widget) {
      case WID_ID_DROPDOWN_ORDER: {
        Dimension d = GetStringBoundingBox(this->GetWidget<NWidgetCore>(widget)->widget_data);
        d.width += padding.width + Window::SortButtonWidth() * 2; // Doubled since the string is centred and it also looks better.
        d.height += padding.height;
        size = maxdim(size, d);
        break;
      }
 
      case WID_ID_DROPDOWN_CRITERIA: {
        Dimension d = GetStringListBoundingBox(IndustryDirectoryWindow::sorter_names);
        d.width += padding.width;
        d.height += padding.height;
        size = maxdim(size, d);
        break;
      }
 
      case WID_ID_INDUSTRY_LIST: {
        Dimension d = GetStringBoundingBox(STR_INDUSTRY_DIRECTORY_NONE);
        resize.height = d.height;
        d.height *= 5;
        d.width += padding.width;
        d.height += padding.height;
        size = maxdim(size, d);
        break;
      }
    }
  }
 
  DropDownList BuildCargoDropDownList() const
  {
    DropDownList list;
 
    /* Add item for disabling filtering. */
    list.push_back(MakeDropDownListStringItem(this->GetCargoFilterLabel(CargoFilterCriteria::CF_ANY), CargoFilterCriteria::CF_ANY));
    /* Add item for industries not producing anything, e.g. power plants */
    list.push_back(MakeDropDownListStringItem(this->GetCargoFilterLabel(CargoFilterCriteria::CF_NONE), CargoFilterCriteria::CF_NONE));
 
    /* Add cargos */
    Dimension d = GetLargestCargoIconSize();
    for (const CargoSpec *cs : _sorted_standard_cargo_specs) {
      list.push_back(MakeDropDownListIconItem(d, cs->GetCargoIcon(), PAL_NONE, cs->name, cs->Index()));
    }
 
    return list;
  }
 
  void OnClick([[maybe_unused]] Point pt, WidgetID widget, [[maybe_unused]] int click_count) override
  {
    switch (widget) {
      case WID_ID_DROPDOWN_ORDER:
        this->industries.ToggleSortOrder();
        this->SetDirty();
        break;
 
      case WID_ID_DROPDOWN_CRITERIA:
        ShowDropDownMenu(this, IndustryDirectoryWindow::sorter_names, this->industries.SortType(), WID_ID_DROPDOWN_CRITERIA, 0, 0);
        break;
 
      case WID_ID_FILTER_BY_ACC_CARGO: // Cargo filter dropdown
        ShowDropDownList(this, this->BuildCargoDropDownList(), this->accepted_cargo_filter_criteria, widget);
        break;
 
      case WID_ID_FILTER_BY_PROD_CARGO: // Cargo filter dropdown
        ShowDropDownList(this, this->BuildCargoDropDownList(), this->produced_cargo_filter_criteria, widget);
        break;
 
      case WID_ID_INDUSTRY_LIST: {
        auto it = this->vscroll->GetScrolledItemFromWidget(this->industries, pt.y, this, WID_ID_INDUSTRY_LIST, WidgetDimensions::scaled.framerect.top);
        if (it != this->industries.end()) {
          if (_ctrl_pressed) {
            ShowExtraViewportWindow((*it)->location.tile);
          } else {
            ScrollMainWindowToTile((*it)->location.tile);
          }
        }
        break;
      }
    }
  }
 
  void OnDropdownSelect(WidgetID widget, int index) override
  {
    switch (widget) {
      case WID_ID_DROPDOWN_CRITERIA: {
        if (this->industries.SortType() != index) {
          this->industries.SetSortType(index);
          this->BuildSortIndustriesList();
        }
        break;
      }
 
      case WID_ID_FILTER_BY_ACC_CARGO: {
        this->SetAcceptedCargoFilter(index);
        this->BuildSortIndustriesList();
        break;
      }
 
      case WID_ID_FILTER_BY_PROD_CARGO: {
        this->SetProducedCargoFilter(index);
        this->BuildSortIndustriesList();
        break;
      }
    }
  }
 
  void OnResize() override
  {
    this->vscroll->SetCapacityFromWidget(this, WID_ID_INDUSTRY_LIST, WidgetDimensions::scaled.framerect.Vertical());
    this->hscroll->SetCapacityFromWidget(this, WID_ID_INDUSTRY_LIST, WidgetDimensions::scaled.framerect.Horizontal());
  }
 
  void OnEditboxChanged(WidgetID wid) override
  {
    if (wid == WID_ID_FILTER) {
      this->string_filter.SetFilterTerm(this->industry_editbox.text.buf);
      this->InvalidateData(IDIWD_FORCE_REBUILD);
    }
  }
 
  void OnPaint() override
  {
    if (this->industries.NeedRebuild()) this->BuildSortIndustriesList();
    this->DrawWidgets();
  }
 
  IntervalTimer<TimerWindow> rebuild_interval = {std::chrono::seconds(3), [this](auto) {
    this->industries.ForceResort();
    this->BuildSortIndustriesList();
  }};
 
  void OnInvalidateData([[maybe_unused]] int data = 0, [[maybe_unused]] bool gui_scope = true) override
  {
    switch (data) {
      case IDIWD_FORCE_REBUILD:
        /* This needs to be done in command-scope to enforce rebuilding before resorting invalid data */
        this->industries.ForceRebuild();
        break;
 
      case IDIWD_PRODUCTION_CHANGE:
        if (this->industries.SortType() == 2) this->industries.ForceResort();
        break;
 
      default:
        this->industries.ForceResort();
        break;
    }
  }
 
  EventState OnHotkey(int hotkey) override
  {
    switch (hotkey) {
      case IDHK_FOCUS_FILTER_BOX:
        this->SetFocusedWidget(WID_ID_FILTER);
        SetFocusedWindow(this); // The user has asked to give focus to the text box, so make sure this window is focused.
        break;
      default:
        return ES_NOT_HANDLED;
    }
    return ES_HANDLED;
  }
 
  static inline HotkeyList hotkeys {"industrydirectory", {
    Hotkey('F', "focus_filter_box", IDHK_FOCUS_FILTER_BOX),
  }};
};
 
Listing IndustryDirectoryWindow::last_sorting = {false, 0};
 
/* Available station sorting functions. */
const std::initializer_list<GUIIndustryList::SortFunction * const> IndustryDirectoryWindow::sorter_funcs = {
  &IndustryNameSorter,
  &IndustryTypeSorter,
  &IndustryProductionSorter,
  &IndustryTransportedCargoSorter
};
 
CargoID IndustryDirectoryWindow::produced_cargo_filter = CargoFilterCriteria::CF_ANY;
 
 
static WindowDesc _industry_directory_desc(
  WDP_AUTO, "list_industries", 428, 190,
  WC_INDUSTRY_DIRECTORY, WC_NONE,
  0,
  _nested_industry_directory_widgets,
  &IndustryDirectoryWindow::hotkeys
);
 
void ShowIndustryDirectory()
{
  AllocateWindowDescFront<IndustryDirectoryWindow>(_industry_directory_desc, 0);
}
 
static constexpr NWidgetPart _nested_industry_cargoes_widgets[] = {
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_BROWN),
    NWidget(WWT_CAPTION, COLOUR_BROWN, WID_IC_CAPTION), SetDataTip(STR_INDUSTRY_CARGOES_INDUSTRY_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
    NWidget(WWT_SHADEBOX, COLOUR_BROWN),
    NWidget(WWT_DEFSIZEBOX, COLOUR_BROWN),
    NWidget(WWT_STICKYBOX, COLOUR_BROWN),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_PANEL, COLOUR_BROWN, WID_IC_PANEL), SetResize(1, 10), SetScrollbar(WID_IC_SCROLLBAR), EndContainer(),
    NWidget(NWID_VSCROLLBAR, COLOUR_BROWN, WID_IC_SCROLLBAR),
  EndContainer(),
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_TEXTBTN, COLOUR_BROWN, WID_IC_NOTIFY),
      SetDataTip(STR_INDUSTRY_CARGOES_NOTIFY_SMALLMAP, STR_INDUSTRY_CARGOES_NOTIFY_SMALLMAP_TOOLTIP),
    NWidget(WWT_PANEL, COLOUR_BROWN), SetFill(1, 0), SetResize(0, 0), EndContainer(),
    NWidget(WWT_DROPDOWN, COLOUR_BROWN, WID_IC_IND_DROPDOWN), SetFill(0, 0), SetResize(0, 0),
        SetDataTip(STR_INDUSTRY_CARGOES_SELECT_INDUSTRY, STR_INDUSTRY_CARGOES_SELECT_INDUSTRY_TOOLTIP),
    NWidget(WWT_DROPDOWN, COLOUR_BROWN, WID_IC_CARGO_DROPDOWN), SetFill(0, 0), SetResize(0, 0),
        SetDataTip(STR_INDUSTRY_CARGOES_SELECT_CARGO, STR_INDUSTRY_CARGOES_SELECT_CARGO_TOOLTIP),
    NWidget(WWT_RESIZEBOX, COLOUR_BROWN),
  EndContainer(),
};
 
static WindowDesc _industry_cargoes_desc(
  WDP_AUTO, "industry_cargoes", 300, 210,
  WC_INDUSTRY_CARGOES, WC_NONE,
  0,
  _nested_industry_cargoes_widgets
);
 
enum CargoesFieldType {
  CFT_EMPTY,       
  CFT_SMALL_EMPTY, 
  CFT_INDUSTRY,    
  CFT_CARGO,       
  CFT_CARGO_LABEL, 
  CFT_HEADER,      
};
 
static const uint MAX_CARGOES = 16; 
 
struct CargoesField {
  static int vert_inter_industry_space;
  static int blob_distance;
 
  static Dimension legend;
  static Dimension cargo_border;
  static Dimension cargo_line;
  static Dimension cargo_space;
  static Dimension cargo_stub;
 
  static const int INDUSTRY_LINE_COLOUR;
  static const int CARGO_LINE_COLOUR;
 
  static int small_height, normal_height;
  static int cargo_field_width;
  static int industry_width;
  static uint max_cargoes;
 
  using Cargoes = uint16_t;
  static_assert(std::numeric_limits<Cargoes>::digits >= MAX_CARGOES);
 
  CargoesFieldType type; 
  union {
    struct {
      IndustryType ind_type;                 
      CargoID other_produced[MAX_CARGOES];   
      CargoID other_accepted[MAX_CARGOES];   
    } industry; 
    struct {
      CargoID vertical_cargoes[MAX_CARGOES]; 
      Cargoes supp_cargoes; 
      Cargoes cust_cargoes; 
      uint8_t num_cargoes;                   
      uint8_t top_end;                       
      uint8_t bottom_end;                    
    } cargo; 
    struct {
      CargoID cargoes[MAX_CARGOES];          
      bool left_align;                       
    } cargo_label;   
    StringID header; 
  } u; // Data for each type.
 
  void MakeEmpty(CargoesFieldType type)
  {
    this->type = type;
  }
 
  void MakeIndustry(IndustryType ind_type)
  {
    this->type = CFT_INDUSTRY;
    this->u.industry.ind_type = ind_type;
    std::fill(std::begin(this->u.industry.other_accepted), std::end(this->u.industry.other_accepted), INVALID_CARGO);
    std::fill(std::begin(this->u.industry.other_produced), std::end(this->u.industry.other_produced), INVALID_CARGO);
  }
 
  int ConnectCargo(CargoID cargo, bool producer)
  {
    assert(this->type == CFT_CARGO);
    if (!IsValidCargoID(cargo)) return -1;
 
    /* Find the vertical cargo column carrying the cargo. */
    int column = -1;
    for (int i = 0; i < this->u.cargo.num_cargoes; i++) {
      if (cargo == this->u.cargo.vertical_cargoes[i]) {
        column = i;
        break;
      }
    }
    if (column < 0) return -1;
 
    if (producer) {
      assert(!HasBit(this->u.cargo.supp_cargoes, column));
      SetBit(this->u.cargo.supp_cargoes, column);
    } else {
      assert(!HasBit(this->u.cargo.cust_cargoes, column));
      SetBit(this->u.cargo.cust_cargoes, column);
    }
    return column;
  }
 
  bool HasConnection()
  {
    assert(this->type == CFT_CARGO);
 
    return this->u.cargo.supp_cargoes != 0 || this->u.cargo.cust_cargoes != 0;
  }
 
  void MakeCargo(const std::span<const CargoID> cargoes)
  {
    this->type = CFT_CARGO;
    assert(std::size(cargoes) <= std::size(this->u.cargo.vertical_cargoes));
    auto insert = std::copy_if(std::begin(cargoes), std::end(cargoes), std::begin(this->u.cargo.vertical_cargoes), IsValidCargoID);
    this->u.cargo.num_cargoes = static_cast<uint8_t>(std::distance(std::begin(this->u.cargo.vertical_cargoes), insert));
    CargoIDComparator comparator;
    std::sort(std::begin(this->u.cargo.vertical_cargoes), insert, comparator);
    std::fill(insert, std::end(this->u.cargo.vertical_cargoes), INVALID_CARGO);
    this->u.cargo.top_end = false;
    this->u.cargo.bottom_end = false;
    this->u.cargo.supp_cargoes = 0;
    this->u.cargo.cust_cargoes = 0;
  }
 
  void MakeCargoLabel(const std::span<const CargoID> cargoes, bool left_align)
  {
    this->type = CFT_CARGO_LABEL;
    assert(std::size(cargoes) <= std::size(this->u.cargo_label.cargoes));
    auto insert = std::copy(std::begin(cargoes), std::end(cargoes), std::begin(this->u.cargo_label.cargoes));
    std::fill(insert, std::end(this->u.cargo_label.cargoes), INVALID_CARGO);
    this->u.cargo_label.left_align = left_align;
  }
 
  void MakeHeader(StringID textid)
  {
    this->type = CFT_HEADER;
    this->u.header = textid;
  }
 
  int GetCargoBase(int xpos) const
  {
    assert(this->type == CFT_CARGO);
    int n = this->u.cargo.num_cargoes;
 
    return xpos + cargo_field_width / 2 - (CargoesField::cargo_line.width * n + CargoesField::cargo_space.width * (n - 1)) / 2;
  }
 
  void Draw(int xpos, int ypos) const
  {
    switch (this->type) {
      case CFT_EMPTY:
      case CFT_SMALL_EMPTY:
        break;
 
      case CFT_HEADER:
        ypos += (small_height - GetCharacterHeight(FS_NORMAL)) / 2;
        DrawString(xpos, xpos + industry_width, ypos, this->u.header, TC_WHITE, SA_HOR_CENTER);
        break;
 
      case CFT_INDUSTRY: {
        int ypos1 = ypos + vert_inter_industry_space / 2;
        int ypos2 = ypos + normal_height - 1 - vert_inter_industry_space / 2;
        int xpos2 = xpos + industry_width - 1;
        DrawRectOutline({xpos, ypos1, xpos2, ypos2}, INDUSTRY_LINE_COLOUR);
        ypos += (normal_height - GetCharacterHeight(FS_NORMAL)) / 2;
        if (this->u.industry.ind_type < NUM_INDUSTRYTYPES) {
          const IndustrySpec *indsp = GetIndustrySpec(this->u.industry.ind_type);
          DrawString(xpos, xpos2, ypos, indsp->name, TC_WHITE, SA_HOR_CENTER);
 
          /* Draw the industry legend. */
          int blob_left, blob_right;
          if (_current_text_dir == TD_RTL) {
            blob_right = xpos2 - blob_distance;
            blob_left  = blob_right - CargoesField::legend.width;
          } else {
            blob_left  = xpos + blob_distance;
            blob_right = blob_left + CargoesField::legend.width;
          }
          GfxFillRect(blob_left,     ypos2 - blob_distance - CargoesField::legend.height,     blob_right,     ypos2 - blob_distance,     PC_BLACK); // Border
          GfxFillRect(blob_left + 1, ypos2 - blob_distance - CargoesField::legend.height + 1, blob_right - 1, ypos2 - blob_distance - 1, indsp->map_colour);
        } else {
          DrawString(xpos, xpos2, ypos, STR_INDUSTRY_CARGOES_HOUSES, TC_FROMSTRING, SA_HOR_CENTER);
        }
 
        /* Draw the other_produced/other_accepted cargoes. */
        std::span<const CargoID> other_right, other_left;
        if (_current_text_dir == TD_RTL) {
          other_right = this->u.industry.other_accepted;
          other_left  = this->u.industry.other_produced;
        } else {
          other_right = this->u.industry.other_produced;
          other_left  = this->u.industry.other_accepted;
        }
        ypos1 += CargoesField::cargo_border.height + (GetCharacterHeight(FS_NORMAL) - CargoesField::cargo_line.height) / 2;
        for (uint i = 0; i < CargoesField::max_cargoes; i++) {
          if (IsValidCargoID(other_right[i])) {
            const CargoSpec *csp = CargoSpec::Get(other_right[i]);
            int xp = xpos + industry_width + CargoesField::cargo_stub.width;
            DrawHorConnection(xpos + industry_width, xp - 1, ypos1, csp);
            GfxDrawLine(xp, ypos1, xp, ypos1 + CargoesField::cargo_line.height - 1, CARGO_LINE_COLOUR);
          }
          if (IsValidCargoID(other_left[i])) {
            const CargoSpec *csp = CargoSpec::Get(other_left[i]);
            int xp = xpos - CargoesField::cargo_stub.width;
            DrawHorConnection(xp + 1, xpos - 1, ypos1, csp);
            GfxDrawLine(xp, ypos1, xp, ypos1 + CargoesField::cargo_line.height - 1, CARGO_LINE_COLOUR);
          }
          ypos1 += GetCharacterHeight(FS_NORMAL) + CargoesField::cargo_space.height;
        }
        break;
      }
 
      case CFT_CARGO: {
        int cargo_base = this->GetCargoBase(xpos);
        int top = ypos + (this->u.cargo.top_end ? vert_inter_industry_space / 2 + 1 : 0);
        int bot = ypos - (this->u.cargo.bottom_end ? vert_inter_industry_space / 2 + 1 : 0) + normal_height - 1;
        int colpos = cargo_base;
        for (int i = 0; i < this->u.cargo.num_cargoes; i++) {
          if (this->u.cargo.top_end) GfxDrawLine(colpos, top - 1, colpos + CargoesField::cargo_line.width - 1, top - 1, CARGO_LINE_COLOUR);
          if (this->u.cargo.bottom_end) GfxDrawLine(colpos, bot + 1, colpos + CargoesField::cargo_line.width - 1, bot + 1, CARGO_LINE_COLOUR);
          GfxDrawLine(colpos, top, colpos, bot, CARGO_LINE_COLOUR);
          colpos++;
          const CargoSpec *csp = CargoSpec::Get(this->u.cargo.vertical_cargoes[i]);
          GfxFillRect(colpos, top, colpos + CargoesField::cargo_line.width - 2, bot, csp->legend_colour, FILLRECT_OPAQUE);
          colpos += CargoesField::cargo_line.width - 2;
          GfxDrawLine(colpos, top, colpos, bot, CARGO_LINE_COLOUR);
          colpos += 1 + CargoesField::cargo_space.width;
        }
 
        Cargoes hor_left, hor_right;
        if (_current_text_dir == TD_RTL) {
          hor_left  = this->u.cargo.cust_cargoes;
          hor_right = this->u.cargo.supp_cargoes;
        } else {
          hor_left  = this->u.cargo.supp_cargoes;
          hor_right = this->u.cargo.cust_cargoes;
        }
        ypos += CargoesField::cargo_border.height + vert_inter_industry_space / 2 + (GetCharacterHeight(FS_NORMAL) - CargoesField::cargo_line.height) / 2;
        for (uint i = 0; i < MAX_CARGOES; i++) {
          if (HasBit(hor_left, i)) {
            int col = i;
            int dx = 0;
            const CargoSpec *csp = CargoSpec::Get(this->u.cargo.vertical_cargoes[col]);
            for (; col > 0; col--) {
              int lf = cargo_base + col * CargoesField::cargo_line.width + (col - 1) * CargoesField::cargo_space.width;
              DrawHorConnection(lf, lf + CargoesField::cargo_space.width - dx, ypos, csp);
              dx = 1;
            }
            DrawHorConnection(xpos, cargo_base - dx, ypos, csp);
          }
          if (HasBit(hor_right, i)) {
            int col = i;
            int dx = 0;
            const CargoSpec *csp = CargoSpec::Get(this->u.cargo.vertical_cargoes[col]);
            for (; col < this->u.cargo.num_cargoes - 1; col++) {
              int lf = cargo_base + (col + 1) * CargoesField::cargo_line.width + col * CargoesField::cargo_space.width;
              DrawHorConnection(lf + dx - 1, lf + CargoesField::cargo_space.width - 1, ypos, csp);
              dx = 1;
            }
            DrawHorConnection(cargo_base + col * CargoesField::cargo_space.width + (col + 1) * CargoesField::cargo_line.width - 1 + dx, xpos + CargoesField::cargo_field_width - 1, ypos, csp);
          }
          ypos += GetCharacterHeight(FS_NORMAL) + CargoesField::cargo_space.height;
        }
        break;
      }
 
      case CFT_CARGO_LABEL:
        ypos += CargoesField::cargo_border.height + vert_inter_industry_space / 2;
        for (uint i = 0; i < MAX_CARGOES; i++) {
          if (IsValidCargoID(this->u.cargo_label.cargoes[i])) {
            const CargoSpec *csp = CargoSpec::Get(this->u.cargo_label.cargoes[i]);
            DrawString(xpos + WidgetDimensions::scaled.framerect.left, xpos + industry_width - 1 - WidgetDimensions::scaled.framerect.right, ypos, csp->name, TC_WHITE,
                (this->u.cargo_label.left_align) ? SA_LEFT : SA_RIGHT);
          }
          ypos += GetCharacterHeight(FS_NORMAL) + CargoesField::cargo_space.height;
        }
        break;
 
      default:
        NOT_REACHED();
    }
  }
 
  CargoID CargoClickedAt(const CargoesField *left, const CargoesField *right, Point pt) const
  {
    assert(this->type == CFT_CARGO);
 
    /* Vertical matching. */
    int cpos = this->GetCargoBase(0);
    uint col;
    for (col = 0; col < this->u.cargo.num_cargoes; col++) {
      if (pt.x < cpos) break;
      if (pt.x < cpos + (int)CargoesField::cargo_line.width) return this->u.cargo.vertical_cargoes[col];
      cpos += CargoesField::cargo_line.width + CargoesField::cargo_space.width;
    }
    /* col = 0 -> left of first col, 1 -> left of 2nd col, ... this->u.cargo.num_cargoes right of last-col. */
 
    int vpos = vert_inter_industry_space / 2 + CargoesField::cargo_border.width;
    uint row;
    for (row = 0; row < MAX_CARGOES; row++) {
      if (pt.y < vpos) return INVALID_CARGO;
      if (pt.y < vpos + GetCharacterHeight(FS_NORMAL)) break;
      vpos += GetCharacterHeight(FS_NORMAL) + CargoesField::cargo_space.width;
    }
    if (row == MAX_CARGOES) return INVALID_CARGO;
 
    /* row = 0 -> at first horizontal row, row = 1 -> second horizontal row, 2 = 3rd horizontal row. */
    if (col == 0) {
      if (HasBit(this->u.cargo.supp_cargoes, row)) return this->u.cargo.vertical_cargoes[row];
      if (left != nullptr) {
        if (left->type == CFT_INDUSTRY) return left->u.industry.other_produced[row];
        if (left->type == CFT_CARGO_LABEL && !left->u.cargo_label.left_align) return left->u.cargo_label.cargoes[row];
      }
      return INVALID_CARGO;
    }
    if (col == this->u.cargo.num_cargoes) {
      if (HasBit(this->u.cargo.cust_cargoes, row)) return this->u.cargo.vertical_cargoes[row];
      if (right != nullptr) {
        if (right->type == CFT_INDUSTRY) return right->u.industry.other_accepted[row];
        if (right->type == CFT_CARGO_LABEL && right->u.cargo_label.left_align) return right->u.cargo_label.cargoes[row];
      }
      return INVALID_CARGO;
    }
    if (row >= col) {
      /* Clicked somewhere in-between vertical cargo connection.
       * Since the horizontal connection is made in the same order as the vertical list, the above condition
       * ensures we are left-below the main diagonal, thus at the supplying side.
       */
      if (HasBit(this->u.cargo.supp_cargoes, row)) return this->u.cargo.vertical_cargoes[row];
      return INVALID_CARGO;
    }
    /* Clicked at a customer connection. */
    if (HasBit(this->u.cargo.cust_cargoes, row)) return this->u.cargo.vertical_cargoes[row];
    return INVALID_CARGO;
  }
 
  CargoID CargoLabelClickedAt(Point pt) const
  {
    assert(this->type == CFT_CARGO_LABEL);
 
    int vpos = vert_inter_industry_space / 2 + CargoesField::cargo_border.height;
    uint row;
    for (row = 0; row < MAX_CARGOES; row++) {
      if (pt.y < vpos) return INVALID_CARGO;
      if (pt.y < vpos + GetCharacterHeight(FS_NORMAL)) break;
      vpos += GetCharacterHeight(FS_NORMAL) + CargoesField::cargo_space.height;
    }
    if (row == MAX_CARGOES) return INVALID_CARGO;
    return this->u.cargo_label.cargoes[row];
  }
 
private:
  static void DrawHorConnection(int left, int right, int top, const CargoSpec *csp)
  {
    GfxDrawLine(left, top, right, top, CARGO_LINE_COLOUR);
    GfxFillRect(left, top + 1, right, top + CargoesField::cargo_line.height - 2, csp->legend_colour, FILLRECT_OPAQUE);
    GfxDrawLine(left, top + CargoesField::cargo_line.height - 1, right, top + CargoesField::cargo_line.height - 1, CARGO_LINE_COLOUR);
  }
};
 
static_assert(MAX_CARGOES >= std::tuple_size_v<decltype(IndustrySpec::produced_cargo)>);
static_assert(MAX_CARGOES >= std::tuple_size_v<decltype(IndustrySpec::accepts_cargo)>);
 
Dimension CargoesField::legend;       
Dimension CargoesField::cargo_border; 
Dimension CargoesField::cargo_line;   
Dimension CargoesField::cargo_space;  
Dimension CargoesField::cargo_stub;   
 
int CargoesField::small_height;      
int CargoesField::normal_height;     
int CargoesField::industry_width;    
int CargoesField::cargo_field_width; 
uint CargoesField::max_cargoes;      
int CargoesField::vert_inter_industry_space; 
 
int CargoesField::blob_distance; 
 
const int CargoesField::INDUSTRY_LINE_COLOUR = PC_YELLOW; 
const int CargoesField::CARGO_LINE_COLOUR    = PC_YELLOW; 
 
struct CargoesRow {
  CargoesField columns[5]; 
 
  void ConnectIndustryProduced(int column)
  {
    CargoesField *ind_fld   = this->columns + column;
    CargoesField *cargo_fld = this->columns + column + 1;
    assert(ind_fld->type == CFT_INDUSTRY && cargo_fld->type == CFT_CARGO);
 
    std::fill(std::begin(ind_fld->u.industry.other_produced), std::end(ind_fld->u.industry.other_produced), INVALID_CARGO);
 
    if (ind_fld->u.industry.ind_type < NUM_INDUSTRYTYPES) {
      CargoID others[MAX_CARGOES]; // Produced cargoes not carried in the cargo column.
      int other_count = 0;
 
      const IndustrySpec *indsp = GetIndustrySpec(ind_fld->u.industry.ind_type);
      assert(CargoesField::max_cargoes <= std::size(indsp->produced_cargo));
      for (uint i = 0; i < CargoesField::max_cargoes; i++) {
        int col = cargo_fld->ConnectCargo(indsp->produced_cargo[i], true);
        if (col < 0) others[other_count++] = indsp->produced_cargo[i];
      }
 
      /* Allocate other cargoes in the empty holes of the horizontal cargo connections. */
      for (uint i = 0; i < CargoesField::max_cargoes && other_count > 0; i++) {
        if (HasBit(cargo_fld->u.cargo.supp_cargoes, i)) ind_fld->u.industry.other_produced[i] = others[--other_count];
      }
    } else {
      /* Houses only display cargo that towns produce. */
      for (uint i = 0; i < cargo_fld->u.cargo.num_cargoes; i++) {
        CargoID cid = cargo_fld->u.cargo.vertical_cargoes[i];
        TownProductionEffect tpe = CargoSpec::Get(cid)->town_production_effect;
        if (tpe == TPE_PASSENGERS || tpe == TPE_MAIL) cargo_fld->ConnectCargo(cid, true);
      }
    }
  }
 
  void MakeCargoLabel(int column, bool accepting)
  {
    CargoID cargoes[MAX_CARGOES];
    std::fill(std::begin(cargoes), std::end(cargoes), INVALID_CARGO);
 
    CargoesField *label_fld = this->columns + column;
    CargoesField *cargo_fld = this->columns + (accepting ? column - 1 : column + 1);
 
    assert(cargo_fld->type == CFT_CARGO && label_fld->type == CFT_EMPTY);
    for (uint i = 0; i < cargo_fld->u.cargo.num_cargoes; i++) {
      int col = cargo_fld->ConnectCargo(cargo_fld->u.cargo.vertical_cargoes[i], !accepting);
      if (col >= 0) cargoes[col] = cargo_fld->u.cargo.vertical_cargoes[i];
    }
    label_fld->MakeCargoLabel(cargoes, accepting);
  }
 
 
  void ConnectIndustryAccepted(int column)
  {
    CargoesField *ind_fld   = this->columns + column;
    CargoesField *cargo_fld = this->columns + column - 1;
    assert(ind_fld->type == CFT_INDUSTRY && cargo_fld->type == CFT_CARGO);
 
    std::fill(std::begin(ind_fld->u.industry.other_accepted), std::end(ind_fld->u.industry.other_accepted), INVALID_CARGO);
 
    if (ind_fld->u.industry.ind_type < NUM_INDUSTRYTYPES) {
      CargoID others[MAX_CARGOES]; // Accepted cargoes not carried in the cargo column.
      int other_count = 0;
 
      const IndustrySpec *indsp = GetIndustrySpec(ind_fld->u.industry.ind_type);
      assert(CargoesField::max_cargoes <= std::size(indsp->accepts_cargo));
      for (uint i = 0; i < CargoesField::max_cargoes; i++) {
        int col = cargo_fld->ConnectCargo(indsp->accepts_cargo[i], false);
        if (col < 0) others[other_count++] = indsp->accepts_cargo[i];
      }
 
      /* Allocate other cargoes in the empty holes of the horizontal cargo connections. */
      for (uint i = 0; i < CargoesField::max_cargoes && other_count > 0; i++) {
        if (!HasBit(cargo_fld->u.cargo.cust_cargoes, i)) ind_fld->u.industry.other_accepted[i] = others[--other_count];
      }
    } else {
      /* Houses only display what is demanded. */
      for (uint i = 0; i < cargo_fld->u.cargo.num_cargoes; i++) {
        for (const auto &hs : HouseSpec::Specs()) {
          if (!hs.enabled) continue;
 
          for (uint j = 0; j < lengthof(hs.accepts_cargo); j++) {
            if (hs.cargo_acceptance[j] > 0 && cargo_fld->u.cargo.vertical_cargoes[i] == hs.accepts_cargo[j]) {
              cargo_fld->ConnectCargo(cargo_fld->u.cargo.vertical_cargoes[i], false);
              goto next_cargo;
            }
          }
        }
next_cargo: ;
      }
    }
  }
};
 
 
struct IndustryCargoesWindow : public Window {
  typedef std::vector<CargoesRow> Fields;
 
  Fields fields;  
  uint ind_cargo; 
  Dimension cargo_textsize; 
  Dimension ind_textsize;   
  Scrollbar *vscroll;
 
  IndustryCargoesWindow(int id) : Window(_industry_cargoes_desc)
  {
    this->OnInit();
    this->CreateNestedTree();
    this->vscroll = this->GetScrollbar(WID_IC_SCROLLBAR);
    this->FinishInitNested(0);
    this->OnInvalidateData(id);
  }
 
  void OnInit() override
  {
    /* Initialize static CargoesField size variables. */
    Dimension d = GetStringBoundingBox(STR_INDUSTRY_CARGOES_PRODUCERS);
    d = maxdim(d, GetStringBoundingBox(STR_INDUSTRY_CARGOES_CUSTOMERS));
    d.width  += WidgetDimensions::scaled.frametext.Horizontal();
    d.height += WidgetDimensions::scaled.frametext.Vertical();
    CargoesField::small_height = d.height;
 
    /* Size of the legend blob -- slightly larger than the smallmap legend blob. */
    CargoesField::legend.height = GetCharacterHeight(FS_SMALL);
    CargoesField::legend.width = CargoesField::legend.height * 9 / 6;
 
    /* Size of cargo lines. */
    CargoesField::cargo_line.width = ScaleGUITrad(6);
    CargoesField::cargo_line.height = CargoesField::cargo_line.width;
 
    /* Size of border between cargo lines and industry boxes. */
    CargoesField::cargo_border.width = CargoesField::cargo_line.width * 3 / 2;
    CargoesField::cargo_border.height = CargoesField::cargo_line.width / 2;
 
    /* Size of space between cargo lines. */
    CargoesField::cargo_space.width = CargoesField::cargo_line.width / 2;
    CargoesField::cargo_space.height = CargoesField::cargo_line.height / 2;
 
    /* Size of cargo stub (unconnected cargo line.) */
    CargoesField::cargo_stub.width = CargoesField::cargo_line.width / 2;
    CargoesField::cargo_stub.height = CargoesField::cargo_line.height; /* Unused */
 
    CargoesField::vert_inter_industry_space = WidgetDimensions::scaled.vsep_wide;
    CargoesField::blob_distance = WidgetDimensions::scaled.hsep_normal;
 
    /* Decide about the size of the box holding the text of an industry type. */
    this->ind_textsize.width = 0;
    this->ind_textsize.height = 0;
    CargoesField::max_cargoes = 0;
    for (IndustryType it = 0; it < NUM_INDUSTRYTYPES; it++) {
      const IndustrySpec *indsp = GetIndustrySpec(it);
      if (!indsp->enabled) continue;
      this->ind_textsize = maxdim(this->ind_textsize, GetStringBoundingBox(indsp->name));
      CargoesField::max_cargoes = std::max<uint>(CargoesField::max_cargoes, std::count_if(std::begin(indsp->accepts_cargo), std::end(indsp->accepts_cargo), IsValidCargoID));
      CargoesField::max_cargoes = std::max<uint>(CargoesField::max_cargoes, std::count_if(std::begin(indsp->produced_cargo), std::end(indsp->produced_cargo), IsValidCargoID));
    }
    d.width = std::max(d.width, this->ind_textsize.width);
    d.height = this->ind_textsize.height;
    this->ind_textsize = maxdim(this->ind_textsize, GetStringBoundingBox(STR_INDUSTRY_CARGOES_SELECT_INDUSTRY));
 
    /* Compute max size of the cargo texts. */
    this->cargo_textsize.width = 0;
    this->cargo_textsize.height = 0;
    for (const CargoSpec *csp : CargoSpec::Iterate()) {
      if (!csp->IsValid()) continue;
      this->cargo_textsize = maxdim(this->cargo_textsize, GetStringBoundingBox(csp->name));
    }
    d = maxdim(d, this->cargo_textsize); // Box must also be wide enough to hold any cargo label.
    this->cargo_textsize = maxdim(this->cargo_textsize, GetStringBoundingBox(STR_INDUSTRY_CARGOES_SELECT_CARGO));
 
    d.width += WidgetDimensions::scaled.frametext.Horizontal();
    /* Ensure the height is enough for the industry type text, for the horizontal connections, and for the cargo labels. */
    uint min_ind_height = CargoesField::cargo_border.height * 2 + CargoesField::max_cargoes * GetCharacterHeight(FS_NORMAL) + (CargoesField::max_cargoes - 1) * CargoesField::cargo_space.height;
    d.height = std::max(d.height + WidgetDimensions::scaled.frametext.Vertical(), min_ind_height);
 
    CargoesField::industry_width = d.width;
    CargoesField::normal_height = d.height + CargoesField::vert_inter_industry_space;
 
    /* Width of a #CFT_CARGO field. */
    CargoesField::cargo_field_width = CargoesField::cargo_border.width * 2 + CargoesField::cargo_line.width * CargoesField::max_cargoes + CargoesField::cargo_space.width * (CargoesField::max_cargoes - 1);
  }
 
  void UpdateWidgetSize(WidgetID widget, Dimension &size, [[maybe_unused]] const Dimension &padding, [[maybe_unused]] Dimension &fill, [[maybe_unused]] Dimension &resize) override
  {
    switch (widget) {
      case WID_IC_PANEL:
        resize.height = CargoesField::normal_height;
        size.width = CargoesField::industry_width * 3 + CargoesField::cargo_field_width * 2 + WidgetDimensions::scaled.frametext.Horizontal();
        size.height = CargoesField::small_height + 2 * resize.height + WidgetDimensions::scaled.frametext.Vertical();
        break;
 
      case WID_IC_IND_DROPDOWN:
        size.width = std::max(size.width, this->ind_textsize.width + padding.width);
        break;
 
      case WID_IC_CARGO_DROPDOWN:
        size.width = std::max(size.width, this->cargo_textsize.width + padding.width);
        break;
    }
  }
 
  void SetStringParameters(WidgetID widget) const override
  {
    if (widget != WID_IC_CAPTION) return;
 
    if (this->ind_cargo < NUM_INDUSTRYTYPES) {
      const IndustrySpec *indsp = GetIndustrySpec(this->ind_cargo);
      SetDParam(0, indsp->name);
    } else {
      const CargoSpec *csp = CargoSpec::Get(this->ind_cargo - NUM_INDUSTRYTYPES);
      SetDParam(0, csp->name);
    }
  }
 
  static bool HasCommonValidCargo(const std::span<const CargoID> cargoes1, const std::span<const CargoID> cargoes2)
  {
    for (const CargoID cid1 : cargoes1) {
      if (!IsValidCargoID(cid1)) continue;
      for (const CargoID cid2 : cargoes2) {
        if (cid1 == cid2) return true;
      }
    }
    return false;
  }
 
  static bool HousesCanSupply(const std::span<const CargoID> cargoes)
  {
    for (const CargoID cid : cargoes) {
      if (!IsValidCargoID(cid)) continue;
      TownProductionEffect tpe = CargoSpec::Get(cid)->town_production_effect;
      if (tpe == TPE_PASSENGERS || tpe == TPE_MAIL) return true;
    }
    return false;
  }
 
  static bool HousesCanAccept(const std::span<const CargoID> cargoes)
  {
    HouseZones climate_mask;
    switch (_settings_game.game_creation.landscape) {
      case LT_TEMPERATE: climate_mask = HZ_TEMP; break;
      case LT_ARCTIC:    climate_mask = HZ_SUBARTC_ABOVE | HZ_SUBARTC_BELOW; break;
      case LT_TROPIC:    climate_mask = HZ_SUBTROPIC; break;
      case LT_TOYLAND:   climate_mask = HZ_TOYLND; break;
      default: NOT_REACHED();
    }
    for (const CargoID cid : cargoes) {
      if (!IsValidCargoID(cid)) continue;
 
      for (const auto &hs : HouseSpec::Specs()) {
        if (!hs.enabled || !(hs.building_availability & climate_mask)) continue;
 
        for (uint j = 0; j < lengthof(hs.accepts_cargo); j++) {
          if (hs.cargo_acceptance[j] > 0 && cid == hs.accepts_cargo[j]) return true;
        }
      }
    }
    return false;
  }
 
  static int CountMatchingAcceptingIndustries(const std::span<const CargoID> cargoes)
  {
    int count = 0;
    for (IndustryType it = 0; it < NUM_INDUSTRYTYPES; it++) {
      const IndustrySpec *indsp = GetIndustrySpec(it);
      if (!indsp->enabled) continue;
 
      if (HasCommonValidCargo(cargoes, indsp->accepts_cargo)) count++;
    }
    return count;
  }
 
  static int CountMatchingProducingIndustries(const std::span<const CargoID> cargoes)
  {
    int count = 0;
    for (IndustryType it = 0; it < NUM_INDUSTRYTYPES; it++) {
      const IndustrySpec *indsp = GetIndustrySpec(it);
      if (!indsp->enabled) continue;
 
      if (HasCommonValidCargo(cargoes, indsp->produced_cargo)) count++;
    }
    return count;
  }
 
  void ShortenCargoColumn(int column, int top, int bottom)
  {
    while (top < bottom && !this->fields[top].columns[column].HasConnection()) {
      this->fields[top].columns[column].MakeEmpty(CFT_EMPTY);
      top++;
    }
    this->fields[top].columns[column].u.cargo.top_end = true;
 
    while (bottom > top && !this->fields[bottom].columns[column].HasConnection()) {
      this->fields[bottom].columns[column].MakeEmpty(CFT_EMPTY);
      bottom--;
    }
    this->fields[bottom].columns[column].u.cargo.bottom_end = true;
  }
 
  void PlaceIndustry(int row, int col, IndustryType it)
  {
    assert(this->fields[row].columns[col].type == CFT_EMPTY);
    this->fields[row].columns[col].MakeIndustry(it);
    if (col == 0) {
      this->fields[row].ConnectIndustryProduced(col);
    } else {
      this->fields[row].ConnectIndustryAccepted(col);
    }
  }
 
  void NotifySmallmap()
  {
    if (!this->IsWidgetLowered(WID_IC_NOTIFY)) return;
 
    /* Only notify the smallmap window if it exists. In particular, do not
     * bring it to the front to prevent messing up any nice layout of the user. */
    InvalidateWindowClassesData(WC_SMALLMAP, 0);
  }
 
  void ComputeIndustryDisplay(IndustryType displayed_it)
  {
    this->GetWidget<NWidgetCore>(WID_IC_CAPTION)->widget_data = STR_INDUSTRY_CARGOES_INDUSTRY_CAPTION;
    this->ind_cargo = displayed_it;
    _displayed_industries.reset();
    _displayed_industries.set(displayed_it);
 
    this->fields.clear();
    CargoesRow &first_row = this->fields.emplace_back();
    first_row.columns[0].MakeHeader(STR_INDUSTRY_CARGOES_PRODUCERS);
    first_row.columns[1].MakeEmpty(CFT_SMALL_EMPTY);
    first_row.columns[2].MakeEmpty(CFT_SMALL_EMPTY);
    first_row.columns[3].MakeEmpty(CFT_SMALL_EMPTY);
    first_row.columns[4].MakeHeader(STR_INDUSTRY_CARGOES_CUSTOMERS);
 
    const IndustrySpec *central_sp = GetIndustrySpec(displayed_it);
    bool houses_supply = HousesCanSupply(central_sp->accepts_cargo);
    bool houses_accept = HousesCanAccept(central_sp->produced_cargo);
    /* Make a field consisting of two cargo columns. */
    int num_supp = CountMatchingProducingIndustries(central_sp->accepts_cargo) + houses_supply;
    int num_cust = CountMatchingAcceptingIndustries(central_sp->produced_cargo) + houses_accept;
    int num_indrows = std::max(3, std::max(num_supp, num_cust)); // One is needed for the 'it' industry, and 2 for the cargo labels.
    for (int i = 0; i < num_indrows; i++) {
      CargoesRow &row = this->fields.emplace_back();
      row.columns[0].MakeEmpty(CFT_EMPTY);
      row.columns[1].MakeCargo(central_sp->accepts_cargo);
      row.columns[2].MakeEmpty(CFT_EMPTY);
      row.columns[3].MakeCargo(central_sp->produced_cargo);
      row.columns[4].MakeEmpty(CFT_EMPTY);
    }
    /* Add central industry. */
    int central_row = 1 + num_indrows / 2;
    this->fields[central_row].columns[2].MakeIndustry(displayed_it);
    this->fields[central_row].ConnectIndustryProduced(2);
    this->fields[central_row].ConnectIndustryAccepted(2);
 
    /* Add cargo labels. */
    this->fields[central_row - 1].MakeCargoLabel(2, true);
    this->fields[central_row + 1].MakeCargoLabel(2, false);
 
    /* Add suppliers and customers of the 'it' industry. */
    int supp_count = 0;
    int cust_count = 0;
    for (IndustryType it : _sorted_industry_types) {
      const IndustrySpec *indsp = GetIndustrySpec(it);
      if (!indsp->enabled) continue;
 
      if (HasCommonValidCargo(central_sp->accepts_cargo, indsp->produced_cargo)) {
        this->PlaceIndustry(1 + supp_count * num_indrows / num_supp, 0, it);
        _displayed_industries.set(it);
        supp_count++;
      }
      if (HasCommonValidCargo(central_sp->produced_cargo, indsp->accepts_cargo)) {
        this->PlaceIndustry(1 + cust_count * num_indrows / num_cust, 4, it);
        _displayed_industries.set(it);
        cust_count++;
      }
    }
    if (houses_supply) {
      this->PlaceIndustry(1 + supp_count * num_indrows / num_supp, 0, NUM_INDUSTRYTYPES);
      supp_count++;
    }
    if (houses_accept) {
      this->PlaceIndustry(1 + cust_count * num_indrows / num_cust, 4, NUM_INDUSTRYTYPES);
      cust_count++;
    }
 
    this->ShortenCargoColumn(1, 1, num_indrows);
    this->ShortenCargoColumn(3, 1, num_indrows);
    this->vscroll->SetCount(num_indrows);
    this->SetDirty();
    this->NotifySmallmap();
  }
 
  void ComputeCargoDisplay(CargoID cid)
  {
    this->GetWidget<NWidgetCore>(WID_IC_CAPTION)->widget_data = STR_INDUSTRY_CARGOES_CARGO_CAPTION;
    this->ind_cargo = cid + NUM_INDUSTRYTYPES;
    _displayed_industries.reset();
 
    this->fields.clear();
    CargoesRow &first_row = this->fields.emplace_back();
    first_row.columns[0].MakeHeader(STR_INDUSTRY_CARGOES_PRODUCERS);
    first_row.columns[1].MakeEmpty(CFT_SMALL_EMPTY);
    first_row.columns[2].MakeHeader(STR_INDUSTRY_CARGOES_CUSTOMERS);
    first_row.columns[3].MakeEmpty(CFT_SMALL_EMPTY);
    first_row.columns[4].MakeEmpty(CFT_SMALL_EMPTY);
 
    auto cargoes = std::span(&cid, 1);
    bool houses_supply = HousesCanSupply(cargoes);
    bool houses_accept = HousesCanAccept(cargoes);
    int num_supp = CountMatchingProducingIndustries(cargoes) + houses_supply + 1; // Ensure room for the cargo label.
    int num_cust = CountMatchingAcceptingIndustries(cargoes) + houses_accept;
    int num_indrows = std::max(num_supp, num_cust);
    for (int i = 0; i < num_indrows; i++) {
      CargoesRow &row = this->fields.emplace_back();
      row.columns[0].MakeEmpty(CFT_EMPTY);
      row.columns[1].MakeCargo(cargoes);
      row.columns[2].MakeEmpty(CFT_EMPTY);
      row.columns[3].MakeEmpty(CFT_EMPTY);
      row.columns[4].MakeEmpty(CFT_EMPTY);
    }
 
    this->fields[num_indrows].MakeCargoLabel(0, false); // Add cargo labels at the left bottom.
 
    /* Add suppliers and customers of the cargo. */
    int supp_count = 0;
    int cust_count = 0;
    for (IndustryType it : _sorted_industry_types) {
      const IndustrySpec *indsp = GetIndustrySpec(it);
      if (!indsp->enabled) continue;
 
      if (HasCommonValidCargo(cargoes, indsp->produced_cargo)) {
        this->PlaceIndustry(1 + supp_count * num_indrows / num_supp, 0, it);
        _displayed_industries.set(it);
        supp_count++;
      }
      if (HasCommonValidCargo(cargoes, indsp->accepts_cargo)) {
        this->PlaceIndustry(1 + cust_count * num_indrows / num_cust, 2, it);
        _displayed_industries.set(it);
        cust_count++;
      }
    }
    if (houses_supply) {
      this->PlaceIndustry(1 + supp_count * num_indrows / num_supp, 0, NUM_INDUSTRYTYPES);
      supp_count++;
    }
    if (houses_accept) {
      this->PlaceIndustry(1 + cust_count * num_indrows / num_cust, 2, NUM_INDUSTRYTYPES);
      cust_count++;
    }
 
    this->ShortenCargoColumn(1, 1, num_indrows);
    this->vscroll->SetCount(num_indrows);
    this->SetDirty();
    this->NotifySmallmap();
  }
 
  void OnInvalidateData([[maybe_unused]] int data = 0, [[maybe_unused]] bool gui_scope = true) override
  {
    if (!gui_scope) return;
    if (data == NUM_INDUSTRYTYPES) {
      this->RaiseWidgetWhenLowered(WID_IC_NOTIFY);
      return;
    }
 
    assert(data >= 0 && data < NUM_INDUSTRYTYPES);
    this->ComputeIndustryDisplay(data);
  }
 
  void DrawWidget(const Rect &r, WidgetID widget) const override
  {
    if (widget != WID_IC_PANEL) return;
 
    Rect ir = r.Shrink(WidgetDimensions::scaled.bevel);
    DrawPixelInfo tmp_dpi;
    if (!FillDrawPixelInfo(&tmp_dpi, ir)) return;
    AutoRestoreBackup dpi_backup(_cur_dpi, &tmp_dpi);
 
    int left_pos = WidgetDimensions::scaled.frametext.left - WidgetDimensions::scaled.bevel.left;
    if (this->ind_cargo >= NUM_INDUSTRYTYPES) left_pos += (CargoesField::industry_width + CargoesField::cargo_field_width) / 2;
    int last_column = (this->ind_cargo < NUM_INDUSTRYTYPES) ? 4 : 2;
 
    const NWidgetBase *nwp = this->GetWidget<NWidgetBase>(WID_IC_PANEL);
    int vpos = WidgetDimensions::scaled.frametext.top - WidgetDimensions::scaled.bevel.top - this->vscroll->GetPosition() * nwp->resize_y;
    int row_height = CargoesField::small_height;
    for (const auto &field : this->fields) {
      if (vpos + row_height >= 0) {
        int xpos = left_pos;
        int col, dir;
        if (_current_text_dir == TD_RTL) {
          col = last_column;
          dir = -1;
        } else {
          col = 0;
          dir = 1;
        }
        while (col >= 0 && col <= last_column) {
          field.columns[col].Draw(xpos, vpos);
          xpos += (col & 1) ? CargoesField::cargo_field_width : CargoesField::industry_width;
          col += dir;
        }
      }
      vpos += row_height;
      if (vpos >= height) break;
      row_height = CargoesField::normal_height;
    }
  }
 
  bool CalculatePositionInWidget(Point pt, Point *fieldxy, Point *xy)
  {
    const NWidgetBase *nw = this->GetWidget<NWidgetBase>(WID_IC_PANEL);
    pt.x -= nw->pos_x;
    pt.y -= nw->pos_y;
 
    int vpos = WidgetDimensions::scaled.frametext.top + CargoesField::small_height - this->vscroll->GetPosition() * nw->resize_y;
    if (pt.y < vpos) return false;
 
    int row = (pt.y - vpos) / CargoesField::normal_height; // row is relative to row 1.
    if (row + 1 >= (int)this->fields.size()) return false;
    vpos = pt.y - vpos - row * CargoesField::normal_height; // Position in the row + 1 field
    row++; // rebase row to match index of this->fields.
 
    int xpos = 2 * WidgetDimensions::scaled.frametext.left + ((this->ind_cargo < NUM_INDUSTRYTYPES) ? 0 :  (CargoesField::industry_width + CargoesField::cargo_field_width) / 2);
    if (pt.x < xpos) return false;
    int column;
    for (column = 0; column <= 5; column++) {
      int width = (column & 1) ? CargoesField::cargo_field_width : CargoesField::industry_width;
      if (pt.x < xpos + width) break;
      xpos += width;
    }
    int num_columns = (this->ind_cargo < NUM_INDUSTRYTYPES) ? 4 : 2;
    if (column > num_columns) return false;
    xpos = pt.x - xpos;
 
    /* Return both positions, compensating for RTL languages (which works due to the equal symmetry in both displays). */
    fieldxy->y = row;
    xy->y = vpos;
    if (_current_text_dir == TD_RTL) {
      fieldxy->x = num_columns - column;
      xy->x = ((column & 1) ? CargoesField::cargo_field_width : CargoesField::industry_width) - xpos;
    } else {
      fieldxy->x = column;
      xy->x = xpos;
    }
    return true;
  }
 
  void OnClick([[maybe_unused]] Point pt, WidgetID widget, [[maybe_unused]] int click_count) override
  {
    switch (widget) {
      case WID_IC_PANEL: {
        Point fieldxy, xy;
        if (!CalculatePositionInWidget(pt, &fieldxy, &xy)) return;
 
        const CargoesField *fld = this->fields[fieldxy.y].columns + fieldxy.x;
        switch (fld->type) {
          case CFT_INDUSTRY:
            if (fld->u.industry.ind_type < NUM_INDUSTRYTYPES) this->ComputeIndustryDisplay(fld->u.industry.ind_type);
            break;
 
          case CFT_CARGO: {
            CargoesField *lft = (fieldxy.x > 0) ? this->fields[fieldxy.y].columns + fieldxy.x - 1 : nullptr;
            CargoesField *rgt = (fieldxy.x < 4) ? this->fields[fieldxy.y].columns + fieldxy.x + 1 : nullptr;
            CargoID cid = fld->CargoClickedAt(lft, rgt, xy);
            if (IsValidCargoID(cid)) this->ComputeCargoDisplay(cid);
            break;
          }
 
          case CFT_CARGO_LABEL: {
            CargoID cid = fld->CargoLabelClickedAt(xy);
            if (IsValidCargoID(cid)) this->ComputeCargoDisplay(cid);
            break;
          }
 
          default:
            break;
        }
        break;
      }
 
      case WID_IC_NOTIFY:
        this->ToggleWidgetLoweredState(WID_IC_NOTIFY);
        this->SetWidgetDirty(WID_IC_NOTIFY);
        if (_settings_client.sound.click_beep) SndPlayFx(SND_15_BEEP);
 
        if (this->IsWidgetLowered(WID_IC_NOTIFY)) {
          if (FindWindowByClass(WC_SMALLMAP) == nullptr) ShowSmallMap();
          this->NotifySmallmap();
        }
        break;
 
      case WID_IC_CARGO_DROPDOWN: {
        DropDownList lst;
        Dimension d = GetLargestCargoIconSize();
        for (const CargoSpec *cs : _sorted_standard_cargo_specs) {
          lst.push_back(MakeDropDownListIconItem(d, cs->GetCargoIcon(), PAL_NONE, cs->name, cs->Index()));
        }
        if (!lst.empty()) {
          int selected = (this->ind_cargo >= NUM_INDUSTRYTYPES) ? (int)(this->ind_cargo - NUM_INDUSTRYTYPES) : -1;
          ShowDropDownList(this, std::move(lst), selected, WID_IC_CARGO_DROPDOWN);
        }
        break;
      }
 
      case WID_IC_IND_DROPDOWN: {
        DropDownList lst;
        for (IndustryType ind : _sorted_industry_types) {
          const IndustrySpec *indsp = GetIndustrySpec(ind);
          if (!indsp->enabled) continue;
          lst.push_back(MakeDropDownListStringItem(indsp->name, ind));
        }
        if (!lst.empty()) {
          int selected = (this->ind_cargo < NUM_INDUSTRYTYPES) ? (int)this->ind_cargo : -1;
          ShowDropDownList(this, std::move(lst), selected, WID_IC_IND_DROPDOWN);
        }
        break;
      }
    }
  }
 
  void OnDropdownSelect(WidgetID widget, int index) override
  {
    if (index < 0) return;
 
    switch (widget) {
      case WID_IC_CARGO_DROPDOWN:
        this->ComputeCargoDisplay(index);
        break;
 
      case WID_IC_IND_DROPDOWN:
        this->ComputeIndustryDisplay(index);
        break;
    }
  }
 
  bool OnTooltip([[maybe_unused]] Point pt, WidgetID widget, TooltipCloseCondition close_cond) override
  {
    if (widget != WID_IC_PANEL) return false;
 
    Point fieldxy, xy;
    if (!CalculatePositionInWidget(pt, &fieldxy, &xy)) return false;
 
    const CargoesField *fld = this->fields[fieldxy.y].columns + fieldxy.x;
    CargoID cid = INVALID_CARGO;
    switch (fld->type) {
      case CFT_CARGO: {
        CargoesField *lft = (fieldxy.x > 0) ? this->fields[fieldxy.y].columns + fieldxy.x - 1 : nullptr;
        CargoesField *rgt = (fieldxy.x < 4) ? this->fields[fieldxy.y].columns + fieldxy.x + 1 : nullptr;
        cid = fld->CargoClickedAt(lft, rgt, xy);
        break;
      }
 
      case CFT_CARGO_LABEL: {
        cid = fld->CargoLabelClickedAt(xy);
        break;
      }
 
      case CFT_INDUSTRY:
        if (fld->u.industry.ind_type < NUM_INDUSTRYTYPES && (this->ind_cargo >= NUM_INDUSTRYTYPES || fieldxy.x != 2)) {
          GuiShowTooltips(this, STR_INDUSTRY_CARGOES_INDUSTRY_TOOLTIP, close_cond);
        }
        return true;
 
      default:
        break;
    }
    if (IsValidCargoID(cid) && (this->ind_cargo < NUM_INDUSTRYTYPES || cid != this->ind_cargo - NUM_INDUSTRYTYPES)) {
      const CargoSpec *csp = CargoSpec::Get(cid);
      SetDParam(0, csp->name);
      GuiShowTooltips(this, STR_INDUSTRY_CARGOES_CARGO_TOOLTIP, close_cond, 1);
      return true;
    }
 
    return false;
  }
 
  void OnResize() override
  {
    this->vscroll->SetCapacityFromWidget(this, WID_IC_PANEL, WidgetDimensions::scaled.framerect.Vertical() + CargoesField::small_height);
  }
};
 
static void ShowIndustryCargoesWindow(IndustryType id)
{
  if (id >= NUM_INDUSTRYTYPES) {
    for (IndustryType ind : _sorted_industry_types) {
      const IndustrySpec *indsp = GetIndustrySpec(ind);
      if (indsp->enabled) {
        id = ind;
        break;
      }
    }
    if (id >= NUM_INDUSTRYTYPES) return;
  }
 
  Window *w = BringWindowToFrontById(WC_INDUSTRY_CARGOES, 0);
  if (w != nullptr) {
    w->InvalidateData(id);
    return;
  }
  new IndustryCargoesWindow(id);
}
 
void ShowIndustryCargoesWindow()
{
  ShowIndustryCargoesWindow(NUM_INDUSTRYTYPES);
}