Function NewVehicleAvailable

src/engine.cpp:1079–1136

* An engine has become available for general use. * Also handle the exclusive engine preview contract. * @param e Engine generally available as of now. */

 * @param e Engine generally available as of now.
 */
static void NewVehicleAvailable(Engine *e)
{
	EngineID index = e->index;

	/* In case the company didn't build the vehicle during the intro period,
	 * prevent that company from getting future intro periods for a while. */
	if (e->flags.Test(EngineFlag::ExclusivePreview)) {
		for (Company *c : Company::Iterate()) {
			if (!e->company_avail.Test(c->index)) continue;

			/* Check the company's 'ALL_GROUP' group statistics. This only includes countable vehicles, which is fine
			 * as those are the only engines that can be given exclusive previews. */
			if (GetGroupNumEngines(c->index, ALL_GROUP, e->index) == 0) {
				/* The company did not build this engine during preview. */
				c->block_preview = 20;
			}
		}
	}

	e->flags.Reset(EngineFlag::ExclusivePreview).Set(EngineFlag::Available);
	AddRemoveEngineFromAutoreplaceAndBuildWindows(e->type);

	/* Now available for all companies */
	e->company_avail.Set();

	/* Do not introduce new rail wagons */
	if (IsWagon(index)) return;

	if (e->type == VEH_TRAIN) {
		/* maybe make another rail type available */
		assert(e->VehInfo<RailVehicleInfo>().railtypes != RailTypes{});
		RailTypes introduced = GetAllIntroducesRailTypes(e->VehInfo<RailVehicleInfo>().railtypes);
		for (Company *c : Company::Iterate()) c->avail_railtypes = AddDateIntroducedRailTypes(c->avail_railtypes | introduced, TimerGameCalendar::date);
	} else if (e->type == VEH_ROAD) {
		/* maybe make another road type available */
		assert(e->VehInfo<RoadVehicleInfo>().roadtype < ROADTYPE_END);
		for (Company *c : Company::Iterate()) c->avail_roadtypes = AddDateIntroducedRoadTypes(c->avail_roadtypes | GetRoadTypeInfo(e->VehInfo<RoadVehicleInfo>().roadtype)->introduces_roadtypes, TimerGameCalendar::date);
	}

	/* Only broadcast event if AIs are able to build this vehicle type. */
	if (!IsVehicleTypeDisabled(e->type, true)) AI::BroadcastNewEvent(new ScriptEventEngineAvailable(index));

	/* Only provide the "New Vehicle available" news paper entry, if engine can be built. */
	if (!IsVehicleTypeDisabled(e->type, false) && !e->info.extra_flags.Test(ExtraEngineFlag::NoNews)) {
		AddNewsItem(GetEncodedString(STR_NEWS_NEW_VEHICLE_NOW_AVAILABLE_WITH_TYPE,
				GetEngineCategoryName(index),
				PackEngineNameDParam(index, EngineNameContext::PreviewNews)),
			NewsType::NewVehicles, NewsStyle::Vehicle, {}, index);
	}

	/* Update the toolbar. */
	if (e->type == VEH_ROAD) InvalidateWindowData(WC_BUILD_TOOLBAR, TRANSPORT_ROAD);
	if (e->type == VEH_SHIP) InvalidateWindowData(WC_BUILD_TOOLBAR, TRANSPORT_WATER);
	if (e->type == VEH_AIRCRAFT) InvalidateWindowData(WC_BUILD_TOOLBAR, TRANSPORT_AIR);

	/* Close pending preview windows */
	CloseWindowById(WC_ENGINE_PREVIEW, index);
}