news_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 "gui.h"
#include "viewport_func.h"
#include "strings_func.h"
#include "window_func.h"
#include "date_func.h"
#include "vehicle_base.h"
#include "vehicle_func.h"
#include "vehicle_gui.h"
#include "roadveh.h"
#include "station_base.h"
#include "industry.h"
#include "town.h"
#include "sound_func.h"
#include "string_func.h"
#include "widgets/dropdown_func.h"
#include "statusbar_gui.h"
#include "company_manager_face.h"
#include "company_func.h"
#include "engine_base.h"
#include "engine_gui.h"
#include "core/geometry_func.hpp"
#include "command_func.h"
#include "company_base.h"
#include "settings_internal.h"
#include "guitimer_func.h"
#include "group_gui.h"
#include "zoom_func.h"
#include "news_cmd.h"
 
#include "widgets/news_widget.h"
 
#include "table/strings.h"
 
#include "safeguards.h"
 
const NewsItem *_statusbar_news_item = nullptr;
 
static uint MIN_NEWS_AMOUNT = 30;        
static uint MAX_NEWS_AMOUNT = 1 << 10;   
static uint _total_news = 0;             
static NewsItem *_oldest_news = nullptr; 
NewsItem *_latest_news = nullptr;        
 
static const NewsItem *_forced_news = nullptr;
 
static const NewsItem *_current_news = nullptr;
 
 
static TileIndex GetReferenceTile(NewsReferenceType reftype, uint32 ref)
{
  switch (reftype) {
    case NR_TILE:     return (TileIndex)ref;
    case NR_STATION:  return Station::Get((StationID)ref)->xy;
    case NR_INDUSTRY: return Industry::Get((IndustryID)ref)->location.tile + TileDiffXY(1, 1);
    case NR_TOWN:     return Town::Get((TownID)ref)->xy;
    default:          return INVALID_TILE;
  }
}
 
/* Normal news items. */
static const NWidgetPart _nested_normal_news_widgets[] = {
  NWidget(WWT_PANEL, COLOUR_WHITE, WID_N_PANEL),
    NWidget(NWID_HORIZONTAL), SetPadding(1, 1, 0, 1),
      NWidget(WWT_CLOSEBOX, COLOUR_WHITE, WID_N_CLOSEBOX), SetPadding(0, 0, 0, 1),
      NWidget(NWID_SPACER), SetFill(1, 0),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_LABEL, COLOUR_WHITE, WID_N_DATE), SetDataTip(STR_DATE_LONG_SMALL, STR_NULL),
        NWidget(NWID_SPACER), SetFill(0, 1),
      EndContainer(),
    EndContainer(),
    NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_MESSAGE), SetMinimalSize(428, 154), SetPadding(0, 5, 1, 5),
  EndContainer(),
};
 
static WindowDesc _normal_news_desc(
  WDP_MANUAL, nullptr, 0, 0,
  WC_NEWS_WINDOW, WC_NONE,
  0,
  _nested_normal_news_widgets, lengthof(_nested_normal_news_widgets)
);
 
/* New vehicles news items. */
static const NWidgetPart _nested_vehicle_news_widgets[] = {
  NWidget(WWT_PANEL, COLOUR_WHITE, WID_N_PANEL),
    NWidget(NWID_HORIZONTAL), SetPadding(1, 1, 0, 1),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_CLOSEBOX, COLOUR_WHITE, WID_N_CLOSEBOX), SetPadding(0, 0, 0, 1),
        NWidget(NWID_SPACER), SetFill(0, 1),
      EndContainer(),
      NWidget(WWT_LABEL, COLOUR_WHITE, WID_N_VEH_TITLE), SetFill(1, 1), SetMinimalSize(419, 55), SetDataTip(STR_EMPTY, STR_NULL),
    EndContainer(),
    NWidget(WWT_PANEL, COLOUR_WHITE, WID_N_VEH_BKGND), SetPadding(0, 25, 1, 25),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_EMPTY, INVALID_COLOUR, WID_N_VEH_NAME), SetMinimalSize(369, 33), SetFill(1, 0),
        NWidget(WWT_EMPTY, INVALID_COLOUR, WID_N_VEH_SPR),  SetMinimalSize(369, 32), SetFill(1, 0),
        NWidget(WWT_EMPTY, INVALID_COLOUR, WID_N_VEH_INFO), SetMinimalSize(369, 46), SetFill(1, 0),
      EndContainer(),
    EndContainer(),
  EndContainer(),
};
 
static WindowDesc _vehicle_news_desc(
  WDP_MANUAL, nullptr, 0, 0,
  WC_NEWS_WINDOW, WC_NONE,
  0,
  _nested_vehicle_news_widgets, lengthof(_nested_vehicle_news_widgets)
);
 
/* Company news items. */
static const NWidgetPart _nested_company_news_widgets[] = {
  NWidget(WWT_PANEL, COLOUR_WHITE, WID_N_PANEL),
    NWidget(NWID_HORIZONTAL), SetPadding(1, 1, 0, 1),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_CLOSEBOX, COLOUR_WHITE, WID_N_CLOSEBOX), SetPadding(0, 0, 0, 1),
        NWidget(NWID_SPACER), SetFill(0, 1),
      EndContainer(),
      NWidget(WWT_LABEL, COLOUR_WHITE, WID_N_TITLE), SetFill(1, 1), SetMinimalSize(410, 20), SetDataTip(STR_EMPTY, STR_NULL),
    EndContainer(),
    NWidget(NWID_HORIZONTAL), SetPadding(0, 1, 1, 1),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_MGR_FACE), SetMinimalSize(93, 119), SetPadding(2, 6, 2, 1),
        NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_MGR_NAME), SetMinimalSize(93, 24), SetPadding(0, 0, 0, 1),
        NWidget(NWID_SPACER), SetFill(0, 1),
      EndContainer(),
      NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_COMPANY_MSG), SetFill(1, 1), SetMinimalSize(328, 150),
    EndContainer(),
  EndContainer(),
};
 
static WindowDesc _company_news_desc(
  WDP_MANUAL, nullptr, 0, 0,
  WC_NEWS_WINDOW, WC_NONE,
  0,
  _nested_company_news_widgets, lengthof(_nested_company_news_widgets)
);
 
/* Thin news items. */
static const NWidgetPart _nested_thin_news_widgets[] = {
  NWidget(WWT_PANEL, COLOUR_WHITE, WID_N_PANEL),
    NWidget(NWID_HORIZONTAL), SetPadding(1, 1, 0, 1),
      NWidget(WWT_CLOSEBOX, COLOUR_WHITE, WID_N_CLOSEBOX), SetPadding(0, 0, 0, 1),
      NWidget(NWID_SPACER), SetFill(1, 0),
      NWidget(NWID_VERTICAL),
        NWidget(WWT_LABEL, COLOUR_WHITE, WID_N_DATE), SetDataTip(STR_DATE_LONG_SMALL, STR_NULL),
        NWidget(NWID_SPACER), SetFill(0, 1),
      EndContainer(),
    EndContainer(),
    NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_MESSAGE), SetMinimalSize(428, 48), SetFill(1, 0), SetPadding(0, 5, 0, 5),
    NWidget(NWID_VIEWPORT, INVALID_COLOUR, WID_N_VIEWPORT), SetMinimalSize(426, 70), SetPadding(1, 2, 2, 2),
  EndContainer(),
};
 
static WindowDesc _thin_news_desc(
  WDP_MANUAL, nullptr, 0, 0,
  WC_NEWS_WINDOW, WC_NONE,
  0,
  _nested_thin_news_widgets, lengthof(_nested_thin_news_widgets)
);
 
/* Small news items. */
static const NWidgetPart _nested_small_news_widgets[] = {
  /* Caption + close box. The caption is no WWT_CAPTION as the window shall not be moveable and so on. */
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_LIGHT_BLUE, WID_N_CLOSEBOX),
    NWidget(WWT_EMPTY, COLOUR_LIGHT_BLUE, WID_N_CAPTION), SetFill(1, 0),
    NWidget(WWT_TEXTBTN, COLOUR_LIGHT_BLUE, WID_N_SHOW_GROUP), SetMinimalSize(14, 11), SetResize(1, 0),
        SetDataTip(STR_NULL /* filled in later */, STR_NEWS_SHOW_VEHICLE_GROUP_TOOLTIP),
  EndContainer(),
 
  /* Main part */
  NWidget(WWT_PANEL, COLOUR_LIGHT_BLUE, WID_N_HEADLINE),
    NWidget(WWT_INSET, COLOUR_LIGHT_BLUE, WID_N_INSET), SetPadding(2, 2, 2, 2),
      NWidget(NWID_VIEWPORT, INVALID_COLOUR, WID_N_VIEWPORT), SetMinimalSize(274, 47), SetFill(1, 0),
    EndContainer(),
    NWidget(WWT_EMPTY, COLOUR_WHITE, WID_N_MESSAGE), SetMinimalSize(275, 20), SetFill(1, 0), SetPadding(0, 5, 0, 5),
  EndContainer(),
};
 
static WindowDesc _small_news_desc(
  WDP_MANUAL, nullptr, 0, 0,
  WC_NEWS_WINDOW, WC_NONE,
  0,
  _nested_small_news_widgets, lengthof(_nested_small_news_widgets)
);
 
static WindowDesc* _news_window_layout[] = {
  &_thin_news_desc,    
  &_small_news_desc,   
  &_normal_news_desc,  
  &_vehicle_news_desc, 
  &_company_news_desc, 
};
 
WindowDesc* GetNewsWindowLayout(NewsFlag flags)
{
  uint layout = GB(flags, NFB_WINDOW_LAYOUT, NFB_WINDOW_LAYOUT_COUNT);
  assert(layout < lengthof(_news_window_layout));
  return _news_window_layout[layout];
}
 
static NewsTypeData _news_type_data[] = {
  /*            name,                           age, sound,          */
  NewsTypeData("news_display.arrival_player",    60, SND_1D_APPLAUSE ),  
  NewsTypeData("news_display.arrival_other",     60, SND_1D_APPLAUSE ),  
  NewsTypeData("news_display.accident",          90, SND_BEGIN       ),  
  NewsTypeData("news_display.accident_other",    90, SND_BEGIN       ),  
  NewsTypeData("news_display.company_info",      60, SND_BEGIN       ),  
  NewsTypeData("news_display.open",              90, SND_BEGIN       ),  
  NewsTypeData("news_display.close",             90, SND_BEGIN       ),  
  NewsTypeData("news_display.economy",           30, SND_BEGIN       ),  
  NewsTypeData("news_display.production_player", 30, SND_BEGIN       ),  
  NewsTypeData("news_display.production_other",  30, SND_BEGIN       ),  
  NewsTypeData("news_display.production_nobody", 30, SND_BEGIN       ),  
  NewsTypeData("news_display.advice",           150, SND_BEGIN       ),  
  NewsTypeData("news_display.new_vehicles",      30, SND_1E_NEW_ENGINE), 
  NewsTypeData("news_display.acceptance",        90, SND_BEGIN       ),  
  NewsTypeData("news_display.subsidies",        180, SND_BEGIN       ),  
  NewsTypeData("news_display.general",           60, SND_BEGIN       ),  
};
 
static_assert(lengthof(_news_type_data) == NT_END);
 
NewsDisplay NewsTypeData::GetDisplay() const
{
  const SettingDesc *sd = GetSettingFromName(this->name);
  assert(sd != nullptr && sd->IsIntSetting());
  return (NewsDisplay)sd->AsIntSetting()->Read(nullptr);
}
 
struct NewsWindow : Window {
  uint16 chat_height;   
  uint16 status_height; 
  const NewsItem *ni;   
  static int duration;  
 
  static const uint TIMER_INTERVAL = 210; 
  GUITimer timer;
 
  NewsWindow(WindowDesc *desc, const NewsItem *ni) : Window(desc), ni(ni)
  {
    NewsWindow::duration = 16650;
    const Window *w = FindWindowByClass(WC_SEND_NETWORK_MSG);
    this->chat_height = (w != nullptr) ? w->height : 0;
    this->status_height = FindWindowById(WC_STATUS_BAR, 0)->height;
 
    this->flags |= WF_DISABLE_VP_SCROLL;
 
    this->CreateNestedTree();
 
    /* For company news with a face we have a separate headline in param[0] */
    if (desc == &_company_news_desc) this->GetWidget<NWidgetCore>(WID_N_TITLE)->widget_data = this->ni->params[0];
 
    NWidgetCore *nwid = this->GetWidget<NWidgetCore>(WID_N_SHOW_GROUP);
    if (ni->reftype1 == NR_VEHICLE && nwid != nullptr) {
      const Vehicle *v = Vehicle::Get(ni->ref1);
      switch (v->type) {
        case VEH_TRAIN:
          nwid->widget_data = STR_TRAIN;
          break;
        case VEH_ROAD:
          nwid->widget_data = RoadVehicle::From(v)->IsBus() ? STR_BUS : STR_LORRY;
          break;
        case VEH_SHIP:
          nwid->widget_data = STR_SHIP;
          break;
        case VEH_AIRCRAFT:
          nwid->widget_data = STR_PLANE;
          break;
        default:
          break; // Do nothing
      }
    }
 
    this->FinishInitNested(0);
 
    /* Initialize viewport if it exists. */
    NWidgetViewport *nvp = this->GetWidget<NWidgetViewport>(WID_N_VIEWPORT);
    if (nvp != nullptr) {
      nvp->InitializeViewport(this, ni->reftype1 == NR_VEHICLE ? 0x80000000 | ni->ref1 : (uint32)GetReferenceTile(ni->reftype1, ni->ref1),ScaleZoomGUI(ZOOM_LVL_NEWS));
      if (this->ni->flags & NF_NO_TRANSPARENT) nvp->disp_flags |= ND_NO_TRANSPARENCY;
      if ((this->ni->flags & NF_INCOLOUR) == 0) {
        nvp->disp_flags |= ND_SHADE_GREY;
      } else if (this->ni->flags & NF_SHADE) {
        nvp->disp_flags |= ND_SHADE_DIMMED;
      }
    }
 
    PositionNewsMessage(this);
  }
 
  void OnInit() override
  {
    this->timer.SetInterval(TIMER_INTERVAL / FONT_HEIGHT_NORMAL);
  }
 
  void DrawNewsBorder(const Rect &r) const
  {
    Rect ir = r.Shrink(WidgetDimensions::scaled.bevel);
    GfxFillRect(ir, PC_WHITE);
 
    ir = ir.Expand(1);
    GfxFillRect( r.left,   r.top,    ir.left,   r.bottom, PC_BLACK);
    GfxFillRect(ir.right,  r.top,     r.right,  r.bottom, PC_BLACK);
    GfxFillRect( r.left,   r.top,     r.right, ir.top,    PC_BLACK);
    GfxFillRect( r.left,  ir.bottom,  r.right,  r.bottom, PC_BLACK);
  }
 
  Point OnInitialPosition(int16 sm_width, int16 sm_height, int window_number) override
  {
    Point pt = { 0, _screen.height };
    return pt;
  }
 
  void UpdateWidgetSize(int widget, Dimension *size, const Dimension &padding, Dimension *fill, Dimension *resize) override
  {
    StringID str = STR_NULL;
    switch (widget) {
      case WID_N_CAPTION: {
        /* Caption is not a real caption (so that the window cannot be moved)
         * thus it doesn't get the default sizing of a caption. */
        Dimension d2 = GetStringBoundingBox(STR_NEWS_MESSAGE_CAPTION);
        d2.height += WidgetDimensions::scaled.captiontext.Vertical();
        *size = maxdim(*size, d2);
        return;
      }
 
      case WID_N_MGR_FACE:
        *size = maxdim(*size, GetSpriteSize(SPR_GRADIENT));
        break;
 
      case WID_N_MGR_NAME:
        SetDParamStr(0, static_cast<const CompanyNewsInformation *>(this->ni->data.get())->president_name);
        str = STR_JUST_RAW_STRING;
        break;
 
      case WID_N_MESSAGE:
        CopyInDParam(0, this->ni->params, lengthof(this->ni->params));
        str = this->ni->string_id;
        break;
 
      case WID_N_COMPANY_MSG:
        str = this->GetCompanyMessageString();
        break;
 
      case WID_N_VEH_NAME:
      case WID_N_VEH_TITLE:
        str = this->GetNewVehicleMessageString(widget);
        break;
 
      case WID_N_VEH_INFO: {
        assert(this->ni->reftype1 == NR_ENGINE);
        EngineID engine = this->ni->ref1;
        str = GetEngineInfoString(engine);
        break;
      }
 
      case WID_N_SHOW_GROUP:
        if (this->ni->reftype1 == NR_VEHICLE) {
          Dimension d2 = GetStringBoundingBox(this->GetWidget<NWidgetCore>(WID_N_SHOW_GROUP)->widget_data);
          d2.height += WidgetDimensions::scaled.captiontext.Vertical();
          d2.width += WidgetDimensions::scaled.captiontext.Horizontal();
          *size = d2;
        } else {
          /* Hide 'Show group window' button if this news is not about a vehicle. */
          size->width = 0;
          size->height = 0;
          resize->width = 0;
          resize->height = 0;
          fill->width = 0;
          fill->height = 0;
        }
        return;
 
      default:
        return; // Do nothing
    }
 
    /* Update minimal size with length of the multi-line string. */
    Dimension d = *size;
    d.width = (d.width >= padding.width) ? d.width - padding.width : 0;
    d.height = (d.height >= padding.height) ? d.height - padding.height : 0;
    d = GetStringMultiLineBoundingBox(str, d);
    d.width += padding.width;
    d.height += padding.height;
    *size = maxdim(*size, d);
  }
 
  void SetStringParameters(int widget) const override
  {
    if (widget == WID_N_DATE) SetDParam(0, this->ni->date);
  }
 
  void DrawWidget(const Rect &r, int widget) const override
  {
    switch (widget) {
      case WID_N_CAPTION:
        DrawCaption(r, COLOUR_LIGHT_BLUE, this->owner, TC_FROMSTRING, STR_NEWS_MESSAGE_CAPTION, SA_CENTER);
        break;
 
      case WID_N_PANEL:
        this->DrawNewsBorder(r);
        break;
 
      case WID_N_MESSAGE:
        CopyInDParam(0, this->ni->params, lengthof(this->ni->params));
        DrawStringMultiLine(r.left, r.right, r.top, r.bottom, this->ni->string_id, TC_FROMSTRING, SA_CENTER);
        break;
 
      case WID_N_MGR_FACE: {
        const CompanyNewsInformation *cni = static_cast<const CompanyNewsInformation*>(this->ni->data.get());
        DrawCompanyManagerFace(cni->face, cni->colour, r.left, r.top);
        GfxFillRect(r.left, r.top, r.right, r.bottom, PALETTE_NEWSPAPER, FILLRECT_RECOLOUR);
        break;
      }
      case WID_N_MGR_NAME: {
        const CompanyNewsInformation *cni = static_cast<const CompanyNewsInformation*>(this->ni->data.get());
        SetDParamStr(0, cni->president_name);
        DrawStringMultiLine(r.left, r.right, r.top, r.bottom, STR_JUST_RAW_STRING, TC_FROMSTRING, SA_CENTER);
        break;
      }
      case WID_N_COMPANY_MSG:
        DrawStringMultiLine(r.left, r.right, r.top, r.bottom, this->GetCompanyMessageString(), TC_FROMSTRING, SA_CENTER);
        break;
 
      case WID_N_VEH_BKGND:
        GfxFillRect(r.left, r.top, r.right, r.bottom, PC_GREY);
        break;
 
      case WID_N_VEH_NAME:
      case WID_N_VEH_TITLE:
        DrawStringMultiLine(r.left, r.right, r.top, r.bottom, this->GetNewVehicleMessageString(widget), TC_FROMSTRING, SA_CENTER);
        break;
 
      case WID_N_VEH_SPR: {
        assert(this->ni->reftype1 == NR_ENGINE);
        EngineID engine = this->ni->ref1;
        DrawVehicleEngine(r.left, r.right, CenterBounds(r.left, r.right, 0), CenterBounds(r.top, r.bottom, 0), engine, GetEnginePalette(engine, _local_company), EIT_PREVIEW);
        GfxFillRect(r.left, r.top, r.right, r.bottom, PALETTE_NEWSPAPER, FILLRECT_RECOLOUR);
        break;
      }
      case WID_N_VEH_INFO: {
        assert(this->ni->reftype1 == NR_ENGINE);
        EngineID engine = this->ni->ref1;
        DrawStringMultiLine(r.left, r.right, r.top, r.bottom, GetEngineInfoString(engine), TC_FROMSTRING, SA_CENTER);
        break;
      }
    }
  }
 
  void OnClick(Point pt, int widget, int click_count) override
  {
    switch (widget) {
      case WID_N_CLOSEBOX:
        NewsWindow::duration = 0;
        this->Close();
        _forced_news = nullptr;
        break;
 
      case WID_N_CAPTION:
        if (this->ni->reftype1 == NR_VEHICLE) {
          const Vehicle *v = Vehicle::Get(this->ni->ref1);
          ShowVehicleViewWindow(v);
        }
        break;
 
      case WID_N_VIEWPORT:
        break; // Ignore clicks
 
      case WID_N_SHOW_GROUP:
        if (this->ni->reftype1 == NR_VEHICLE) {
          const Vehicle *v = Vehicle::Get(this->ni->ref1);
          ShowCompanyGroupForVehicle(v);
        }
        break;
      default:
        if (this->ni->reftype1 == NR_VEHICLE) {
          const Vehicle *v = Vehicle::Get(this->ni->ref1);
          ScrollMainWindowTo(v->x_pos, v->y_pos, v->z_pos);
        } else {
          TileIndex tile1 = GetReferenceTile(this->ni->reftype1, this->ni->ref1);
          TileIndex tile2 = GetReferenceTile(this->ni->reftype2, this->ni->ref2);
          if (_ctrl_pressed) {
            if (tile1 != INVALID_TILE) ShowExtraViewportWindow(tile1);
            if (tile2 != INVALID_TILE) ShowExtraViewportWindow(tile2);
          } else {
            if ((tile1 == INVALID_TILE || !ScrollMainWindowToTile(tile1)) && tile2 != INVALID_TILE) {
              ScrollMainWindowToTile(tile2);
            }
          }
        }
        break;
    }
  }
 
  void OnResize() override
  {
    if (this->viewport != nullptr) {
      NWidgetViewport *nvp = this->GetWidget<NWidgetViewport>(WID_N_VIEWPORT);
      nvp->UpdateViewportCoordinates(this);
 
      if (ni->reftype1 != NR_VEHICLE) {
        ScrollWindowToTile(GetReferenceTile(ni->reftype1, ni->ref1), this, true); // Re-center viewport.
      }
    }
  }
 
  void OnInvalidateData(int data = 0, bool gui_scope = true) override
  {
    if (!gui_scope) return;
    /* The chatbar has notified us that is was either created or closed */
    int newtop = this->top + this->chat_height - data;
    this->chat_height = data;
    this->SetWindowTop(newtop);
  }
 
  void OnRealtimeTick(uint delta_ms) override
  {
    int count = this->timer.CountElapsed(delta_ms);
    if (count > 0) {
      /* Scroll up newsmessages from the bottom */
      int newtop = std::max(this->top - 2 * count, _screen.height - this->height - this->status_height - this->chat_height);
      this->SetWindowTop(newtop);
    }
 
    /* Decrement the news timer. We don't need to action an elapsed event here,
     * so no need to use TimerElapsed(). */
    if (NewsWindow::duration > 0) NewsWindow::duration -= delta_ms;
  }
 
private:
  void SetWindowTop(int newtop)
  {
    if (this->top == newtop) return;
 
    int mintop = std::min(newtop, this->top);
    int maxtop = std::max(newtop, this->top);
    if (this->viewport != nullptr) this->viewport->top += newtop - this->top;
    this->top = newtop;
 
    AddDirtyBlock(this->left, mintop, this->left + this->width, maxtop + this->height);
  }
 
  StringID GetCompanyMessageString() const
  {
    /* Company news with a face have a separate headline, so the normal message is shifted by two params */
    CopyInDParam(0, this->ni->params + 2, lengthof(this->ni->params) - 2);
    return this->ni->params[1];
  }
 
  StringID GetNewVehicleMessageString(int widget) const
  {
    assert(this->ni->reftype1 == NR_ENGINE);
    EngineID engine = this->ni->ref1;
 
    switch (widget) {
      case WID_N_VEH_TITLE:
        SetDParam(0, GetEngineCategoryName(engine));
        return STR_NEWS_NEW_VEHICLE_NOW_AVAILABLE;
 
      case WID_N_VEH_NAME:
        SetDParam(0, PackEngineNameDParam(engine, EngineNameContext::PreviewNews));
        return STR_NEWS_NEW_VEHICLE_TYPE;
 
      default:
        NOT_REACHED();
    }
  }
};
 
/* static */ int NewsWindow::duration = 0; // Instance creation.
 
static void ShowNewspaper(const NewsItem *ni)
{
  SoundFx sound = _news_type_data[ni->type].sound;
  if (sound != 0 && _settings_client.sound.news_full) SndPlayFx(sound);
 
  new NewsWindow(GetNewsWindowLayout(ni->flags), ni);
}
 
static void ShowTicker(const NewsItem *ni)
{
  if (_settings_client.sound.news_ticker) SndPlayFx(SND_16_NEWS_TICKER);
 
  _statusbar_news_item = ni;
  InvalidateWindowData(WC_STATUS_BAR, 0, SBI_SHOW_TICKER);
}
 
void InitNewsItemStructs()
{
  for (NewsItem *ni = _oldest_news; ni != nullptr; ) {
    NewsItem *next = ni->next;
    delete ni;
    ni = next;
  }
 
  _total_news = 0;
  _oldest_news = nullptr;
  _latest_news = nullptr;
  _forced_news = nullptr;
  _current_news = nullptr;
  _statusbar_news_item = nullptr;
  NewsWindow::duration = 0;
}
 
static bool ReadyForNextTickerItem()
{
  const NewsItem *ni = _statusbar_news_item;
  if (ni == nullptr) return true;
 
  /* Ticker message
   * Check if the status bar message is still being displayed? */
  return !IsNewsTickerShown();
}
 
static bool ReadyForNextNewsItem()
{
  const NewsItem *ni = _forced_news == nullptr ? _current_news : _forced_news;
  if (ni == nullptr) return true;
 
  /* neither newsticker nor newspaper are running */
  return (NewsWindow::duration <= 0 || FindWindowById(WC_NEWS_WINDOW, 0) == nullptr);
}
 
static void MoveToNextTickerItem()
{
  /* There is no status bar, so no reason to show news;
   * especially important with the end game screen when
   * there is no status bar but possible news. */
  if (FindWindowById(WC_STATUS_BAR, 0) == nullptr) return;
 
  /* if we're not at the last item, then move on */
  while (_statusbar_news_item != _latest_news) {
    _statusbar_news_item = (_statusbar_news_item == nullptr) ? _oldest_news : _statusbar_news_item->next;
    const NewsItem *ni = _statusbar_news_item;
    const NewsType type = ni->type;
 
    /* check the date, don't show too old items */
    if (_date - _news_type_data[type].age > ni->date) continue;
 
    switch (_news_type_data[type].GetDisplay()) {
      default: NOT_REACHED();
      case ND_OFF: // Off - show nothing only a small reminder in the status bar
        InvalidateWindowData(WC_STATUS_BAR, 0, SBI_SHOW_REMINDER);
        break;
 
      case ND_SUMMARY: // Summary - show ticker
        ShowTicker(ni);
        break;
 
      case ND_FULL: // Full - show newspaper, skipped here
        continue;
    }
    return;
  }
}
 
static void MoveToNextNewsItem()
{
  /* There is no status bar, so no reason to show news;
   * especially important with the end game screen when
   * there is no status bar but possible news. */
  if (FindWindowById(WC_STATUS_BAR, 0) == nullptr) return;
 
  CloseWindowById(WC_NEWS_WINDOW, 0); // close the newspapers window if shown
  _forced_news = nullptr;
 
  /* if we're not at the last item, then move on */
  while (_current_news != _latest_news) {
    _current_news = (_current_news == nullptr) ? _oldest_news : _current_news->next;
    const NewsItem *ni = _current_news;
    const NewsType type = ni->type;
 
    /* check the date, don't show too old items */
    if (_date - _news_type_data[type].age > ni->date) continue;
 
    switch (_news_type_data[type].GetDisplay()) {
      default: NOT_REACHED();
      case ND_OFF: // Off - show nothing only a small reminder in the status bar, skipped here
        continue;
 
      case ND_SUMMARY: // Summary - show ticker, skipped here
        continue;
 
      case ND_FULL: // Full - show newspaper
        ShowNewspaper(ni);
        break;
    }
    return;
  }
}
 
static void DeleteNewsItem(NewsItem *ni)
{
  /* Delete the news from the news queue. */
  if (ni->prev != nullptr) {
    ni->prev->next = ni->next;
  } else {
    assert(_oldest_news == ni);
    _oldest_news = ni->next;
  }
 
  if (ni->next != nullptr) {
    ni->next->prev = ni->prev;
  } else {
    assert(_latest_news == ni);
    _latest_news = ni->prev;
  }
 
  _total_news--;
 
  if (_forced_news == ni || _current_news == ni) {
    /* When we're the current news, go to the previous item first;
     * we just possibly made that the last news item. */
    if (_current_news == ni) _current_news = ni->prev;
 
    /* About to remove the currently forced item (shown as newspapers) ||
     * about to remove the currently displayed item (newspapers) */
    MoveToNextNewsItem();
  }
 
  if (_statusbar_news_item == ni) {
    /* When we're the current news, go to the previous item first;
     * we just possibly made that the last news item. */
    _statusbar_news_item = ni->prev;
 
    /* About to remove the currently displayed item (ticker, or just a reminder) */
    InvalidateWindowData(WC_STATUS_BAR, 0, SBI_NEWS_DELETED); // invalidate the statusbar
    MoveToNextTickerItem();
  }
 
  delete ni;
 
  SetWindowDirty(WC_MESSAGE_HISTORY, 0);
}
 
NewsItem::NewsItem(StringID string_id, NewsType type, NewsFlag flags, NewsReferenceType reftype1, uint32 ref1, NewsReferenceType reftype2, uint32 ref2, const NewsAllocatedData *data) :
  string_id(string_id), date(_date), type(type), flags(flags), reftype1(reftype1), reftype2(reftype2), ref1(ref1), ref2(ref2), data(data)
{
  /* show this news message in colour? */
  if (_cur_year >= _settings_client.gui.coloured_news_year) this->flags |= NF_INCOLOUR;
  CopyOutDParam(this->params, 0, lengthof(this->params));
}
 
void AddNewsItem(StringID string, NewsType type, NewsFlag flags, NewsReferenceType reftype1, uint32 ref1, NewsReferenceType reftype2, uint32 ref2, const NewsAllocatedData *data)
{
  if (_game_mode == GM_MENU) return;
 
  /* Create new news item node */
  NewsItem *ni = new NewsItem(string, type, flags, reftype1, ref1, reftype2, ref2, data);
 
  if (_total_news++ == 0) {
    assert(_oldest_news == nullptr);
    _oldest_news = ni;
    ni->prev = nullptr;
  } else {
    assert(_latest_news->next == nullptr);
    _latest_news->next = ni;
    ni->prev = _latest_news;
  }
 
  ni->next = nullptr;
  _latest_news = ni;
 
  /* Keep the number of stored news items to a managable number */
  if (_total_news > MAX_NEWS_AMOUNT) {
    DeleteNewsItem(_oldest_news);
  }
 
  SetWindowDirty(WC_MESSAGE_HISTORY, 0);
}
 
CommandCost CmdCustomNewsItem(DoCommandFlag flags, NewsType type, NewsReferenceType reftype1, CompanyID company, uint32 reference, const std::string &text)
{
  if (_current_company != OWNER_DEITY) return CMD_ERROR;
 
  if (company != INVALID_OWNER && !Company::IsValidID(company)) return CMD_ERROR;
  if (type >= NT_END) return CMD_ERROR;
  if (text.empty()) return CMD_ERROR;
 
  switch (reftype1) {
    case NR_NONE: break;
    case NR_TILE:
      if (!IsValidTile(reference)) return CMD_ERROR;
      break;
 
    case NR_VEHICLE:
      if (!Vehicle::IsValidID(reference)) return CMD_ERROR;
      break;
 
    case NR_STATION:
      if (!Station::IsValidID(reference)) return CMD_ERROR;
      break;
 
    case NR_INDUSTRY:
      if (!Industry::IsValidID(reference)) return CMD_ERROR;
      break;
 
    case NR_TOWN:
      if (!Town::IsValidID(reference)) return CMD_ERROR;
      break;
 
    case NR_ENGINE:
      if (!Engine::IsValidID(reference)) return CMD_ERROR;
      break;
 
    default: return CMD_ERROR;
  }
 
  if (company != INVALID_OWNER && company != _local_company) return CommandCost();
 
  if (flags & DC_EXEC) {
    NewsStringData *news = new NewsStringData(text);
    SetDParamStr(0, news->string);
    AddNewsItem(STR_NEWS_CUSTOM_ITEM, type, NF_NORMAL, reftype1, reference, NR_NONE, UINT32_MAX, news);
  }
 
  return CommandCost();
}
 
void DeleteVehicleNews(VehicleID vid, StringID news)
{
  NewsItem *ni = _oldest_news;
 
  while (ni != nullptr) {
    NewsItem *next = ni->next;
    if (((ni->reftype1 == NR_VEHICLE && ni->ref1 == vid) || (ni->reftype2 == NR_VEHICLE && ni->ref2 == vid)) &&
        (news == INVALID_STRING_ID || ni->string_id == news)) {
      DeleteNewsItem(ni);
    }
    ni = next;
  }
}
 
void DeleteStationNews(StationID sid)
{
  NewsItem *ni = _oldest_news;
 
  while (ni != nullptr) {
    NewsItem *next = ni->next;
    if ((ni->reftype1 == NR_STATION && ni->ref1 == sid) || (ni->reftype2 == NR_STATION && ni->ref2 == sid)) {
      DeleteNewsItem(ni);
    }
    ni = next;
  }
}
 
void DeleteIndustryNews(IndustryID iid)
{
  NewsItem *ni = _oldest_news;
 
  while (ni != nullptr) {
    NewsItem *next = ni->next;
    if ((ni->reftype1 == NR_INDUSTRY && ni->ref1 == iid) || (ni->reftype2 == NR_INDUSTRY && ni->ref2 == iid)) {
      DeleteNewsItem(ni);
    }
    ni = next;
  }
}
 
void DeleteInvalidEngineNews()
{
  NewsItem *ni = _oldest_news;
 
  while (ni != nullptr) {
    NewsItem *next = ni->next;
    if ((ni->reftype1 == NR_ENGINE && (!Engine::IsValidID(ni->ref1) || !Engine::Get(ni->ref1)->IsEnabled())) ||
        (ni->reftype2 == NR_ENGINE && (!Engine::IsValidID(ni->ref2) || !Engine::Get(ni->ref2)->IsEnabled()))) {
      DeleteNewsItem(ni);
    }
    ni = next;
  }
}
 
static void RemoveOldNewsItems()
{
  NewsItem *next;
  for (NewsItem *cur = _oldest_news; _total_news > MIN_NEWS_AMOUNT && cur != nullptr; cur = next) {
    next = cur->next;
    if (_date - _news_type_data[cur->type].age * _settings_client.gui.news_message_timeout > cur->date) DeleteNewsItem(cur);
  }
}
 
void ChangeVehicleNews(VehicleID from_index, VehicleID to_index)
{
  for (NewsItem *ni = _oldest_news; ni != nullptr; ni = ni->next) {
    if (ni->reftype1 == NR_VEHICLE && ni->ref1 == from_index) ni->ref1 = to_index;
    if (ni->reftype2 == NR_VEHICLE && ni->ref2 == from_index) ni->ref2 = to_index;
    if (ni->flags & NF_VEHICLE_PARAM0 && ni->params[0] == from_index) ni->params[0] = to_index;
  }
}
 
void NewsLoop()
{
  /* no news item yet */
  if (_total_news == 0) return;
 
  static byte _last_clean_month = 0;
 
  if (_last_clean_month != _cur_month) {
    RemoveOldNewsItems();
    _last_clean_month = _cur_month;
  }
 
  if (ReadyForNextTickerItem()) MoveToNextTickerItem();
  if (ReadyForNextNewsItem()) MoveToNextNewsItem();
}
 
static void ShowNewsMessage(const NewsItem *ni)
{
  assert(_total_news != 0);
 
  /* Delete the news window */
  CloseWindowById(WC_NEWS_WINDOW, 0);
 
  /* setup forced news item */
  _forced_news = ni;
 
  if (_forced_news != nullptr) {
    CloseWindowById(WC_NEWS_WINDOW, 0);
    ShowNewspaper(ni);
  }
}
 
bool HideActiveNewsMessage() {
  NewsWindow *w = (NewsWindow*)FindWindowById(WC_NEWS_WINDOW, 0);
  if (w == nullptr) return false;
  w->Close();
  return true;
}
 
void ShowLastNewsMessage()
{
  const NewsItem *ni = nullptr;
  if (_total_news == 0) {
    return;
  } else if (_forced_news == nullptr) {
    /* Not forced any news yet, show the current one, unless a news window is
     * open (which can only be the current one), then show the previous item */
    if (_current_news == nullptr) {
      /* No news were shown yet resp. the last shown one was already deleted.
       * Threat this as if _forced_news reached _oldest_news; so, wrap around and start anew with the latest. */
      ni = _latest_news;
    } else {
      const Window *w = FindWindowById(WC_NEWS_WINDOW, 0);
      ni = (w == nullptr || (_current_news == _oldest_news)) ? _current_news : _current_news->prev;
    }
  } else if (_forced_news == _oldest_news) {
    /* We have reached the oldest news, start anew with the latest */
    ni = _latest_news;
  } else {
    /* 'Scrolling' through news history show each one in turn */
    ni = _forced_news->prev;
  }
  bool wrap = false;
  for (;;) {
    if (_news_type_data[ni->type].GetDisplay() != ND_OFF) {
      ShowNewsMessage(ni);
      break;
    }
 
    ni = ni->prev;
    if (ni == nullptr) {
      if (wrap) break;
      /* We have reached the oldest news, start anew with the latest */
      ni = _latest_news;
      wrap = true;
    }
  }
}
 
 
static void DrawNewsString(uint left, uint right, int y, TextColour colour, const NewsItem *ni)
{
  char buffer[512], buffer2[512];
  StringID str;
 
  CopyInDParam(0, ni->params, lengthof(ni->params));
  str = ni->string_id;
 
  GetString(buffer, str, lastof(buffer));
  /* Copy the just gotten string to another buffer to remove any formatting
   * from it such as big fonts, etc. */
  const char *ptr = buffer;
  char *dest = buffer2;
  WChar c_last = '\0';
  for (;;) {
    WChar c = Utf8Consume(&ptr);
    if (c == 0) break;
    /* Make a space from a newline, but ignore multiple newlines */
    if (c == '\n' && c_last != '\n') {
      dest[0] = ' ';
      dest++;
    } else if (c == '\r') {
      dest[0] = dest[1] = dest[2] = dest[3] = ' ';
      dest += 4;
    } else if (IsPrintable(c)) {
      dest += Utf8Encode(dest, c);
    }
    c_last = c;
  }
 
  *dest = '\0';
  /* Truncate and show string; postfixed by '...' if necessary */
  DrawString(left, right, y, buffer2, colour);
}
 
struct MessageHistoryWindow : Window {
  int line_height; 
  int date_width;  
 
  Scrollbar *vscroll;
 
  MessageHistoryWindow(WindowDesc *desc) : Window(desc)
  {
    this->CreateNestedTree();
    this->vscroll = this->GetScrollbar(WID_MH_SCROLLBAR);
    this->FinishInitNested(); // Initializes 'this->line_height' and 'this->date_width'.
    this->OnInvalidateData(0);
  }
 
  void UpdateWidgetSize(int widget, Dimension *size, const Dimension &padding, Dimension *fill, Dimension *resize) override
  {
    if (widget == WID_MH_BACKGROUND) {
      this->line_height = FONT_HEIGHT_NORMAL + WidgetDimensions::scaled.vsep_normal;
      resize->height = this->line_height;
 
      /* Months are off-by-one, so it's actually 8. Not using
       * month 12 because the 1 is usually less wide. */
      SetDParam(0, ConvertYMDToDate(ORIGINAL_MAX_YEAR, 7, 30));
      this->date_width = GetStringBoundingBox(STR_SHORT_DATE).width + WidgetDimensions::scaled.hsep_wide;
 
      size->height = 4 * resize->height + WidgetDimensions::scaled.framerect.Vertical(); // At least 4 lines are visible.
      size->width = std::max(200u, size->width); // At least 200 pixels wide.
    }
  }
 
  void OnPaint() override
  {
    this->OnInvalidateData(0);
    this->DrawWidgets();
  }
 
  void DrawWidget(const Rect &r, int widget) const override
  {
    if (widget != WID_MH_BACKGROUND || _total_news == 0) return;
 
    /* Find the first news item to display. */
    NewsItem *ni = _latest_news;
    for (int n = this->vscroll->GetPosition(); n > 0; n--) {
      ni = ni->prev;
      if (ni == nullptr) return;
    }
 
    /* Fill the widget with news items. */
    bool rtl = _current_text_dir == TD_RTL;
    Rect news = r.Shrink(WidgetDimensions::scaled.framerect).Indent(this->date_width + WidgetDimensions::scaled.hsep_wide, rtl);
    Rect date = r.Shrink(WidgetDimensions::scaled.framerect).WithWidth(this->date_width, rtl);
    int y = news.top;
    for (int n = this->vscroll->GetCapacity(); n > 0; n--) {
      SetDParam(0, ni->date);
      DrawString(date.left, date.right, y, STR_SHORT_DATE);
 
      DrawNewsString(news.left, news.right, y, TC_WHITE, ni);
      y += this->line_height;
 
      ni = ni->prev;
      if (ni == nullptr) return;
    }
  }
 
  void OnInvalidateData(int data = 0, bool gui_scope = true) override
  {
    if (!gui_scope) return;
    this->vscroll->SetCount(_total_news);
  }
 
  void OnClick(Point pt, int widget, int click_count) override
  {
    if (widget == WID_MH_BACKGROUND) {
      NewsItem *ni = _latest_news;
      if (ni == nullptr) return;
 
      for (int n = this->vscroll->GetScrolledRowFromWidget(pt.y, this, WID_MH_BACKGROUND, WidgetDimensions::scaled.framerect.top); n > 0; n--) {
        ni = ni->prev;
        if (ni == nullptr) return;
      }
 
      ShowNewsMessage(ni);
    }
  }
 
  void OnResize() override
  {
    this->vscroll->SetCapacityFromWidget(this, WID_MH_BACKGROUND);
  }
};
 
static const NWidgetPart _nested_message_history[] = {
  NWidget(NWID_HORIZONTAL),
    NWidget(WWT_CLOSEBOX, COLOUR_BROWN),
    NWidget(WWT_CAPTION, COLOUR_BROWN), SetDataTip(STR_MESSAGE_HISTORY, 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_MH_BACKGROUND), SetMinimalSize(200, 125), SetDataTip(0x0, STR_MESSAGE_HISTORY_TOOLTIP), SetResize(1, 12), SetScrollbar(WID_MH_SCROLLBAR),
    EndContainer(),
    NWidget(NWID_VERTICAL),
      NWidget(NWID_VSCROLLBAR, COLOUR_BROWN, WID_MH_SCROLLBAR),
      NWidget(WWT_RESIZEBOX, COLOUR_BROWN),
    EndContainer(),
  EndContainer(),
};
 
static WindowDesc _message_history_desc(
  WDP_AUTO, "list_news", 400, 140,
  WC_MESSAGE_HISTORY, WC_NONE,
  0,
  _nested_message_history, lengthof(_nested_message_history)
);
 
void ShowMessageHistory()
{
  CloseWindowById(WC_MESSAGE_HISTORY, 0);
  new MessageHistoryWindow(&_message_history_desc);
}