#include "aja-card-manager.hpp"
#include "aja-common.hpp"
#include "aja-routing.hpp"
#include "aja-widget-io.hpp"

// Signal routing crosspoint and register setting tables for SDI/HDMI/etc.
#include "routing/hdmi_rgb_capture.h"
#include "routing/hdmi_rgb_display.h"
#include "routing/hdmi_ycbcr_capture.h"
#include "routing/hdmi_ycbcr_display.h"
#include "routing/sdi_ycbcr_capture.h"
#include "routing/sdi_ycbcr_display.h"
#include "routing/sdi_rgb_capture.h"
#include "routing/sdi_rgb_display.h"

#include <ajabase/common/common.h>
#include <ajantv2/includes/ntv2card.h>
#include <ajantv2/includes/ntv2devicefeatures.h>

#include <obs-module.h>

RasterDefinition GetRasterDefinition(IOSelection io, NTV2VideoFormat vf,
				     NTV2DeviceID deviceID)
{
	RasterDefinition def = RasterDefinition::Unknown;

	if (NTV2_IS_SD_VIDEO_FORMAT(vf)) {
		def = RasterDefinition::SD;
	} else if (NTV2_IS_HD_VIDEO_FORMAT(vf)) {
		def = RasterDefinition::HD;
	} else if (NTV2_IS_QUAD_FRAME_FORMAT(vf)) {
		def = RasterDefinition::UHD_4K;

		/* NOTE(paulh): Special enum for Kona5 Retail & IO4K+ firmwares which route UHD/4K formats
		 * over 1x 6G/12G SDI using an undocumented crosspoint config.
		 */
		if (aja::IsSDIOneWireIOSelection(io) &&
		    aja::IsRetailSDI12G(deviceID))
			def = RasterDefinition::UHD_4K_Retail_12G;
	} else if (NTV2_IS_QUAD_QUAD_FORMAT(vf)) {
		def = RasterDefinition::UHD2_8K;
	} else {
		def = RasterDefinition::Unknown;
	}

	return def;
}

#define NTV2UTILS_ENUM_CASE_RETURN_STR(enum_name) \
	case (enum_name):                         \
		return #enum_name
std::string RasterDefinitionToString(RasterDefinition rd)
{
	std::string str = "";

	switch (rd) {
		NTV2UTILS_ENUM_CASE_RETURN_STR(RasterDefinition::SD);
		NTV2UTILS_ENUM_CASE_RETURN_STR(RasterDefinition::HD);
		NTV2UTILS_ENUM_CASE_RETURN_STR(RasterDefinition::UHD_4K);
		NTV2UTILS_ENUM_CASE_RETURN_STR(RasterDefinition::UHD2_8K);
		NTV2UTILS_ENUM_CASE_RETURN_STR(RasterDefinition::Unknown);
	}

	return str;
}

/*
 * Parse the widget routing shorthand string into a map of input and output NTV2CrosspointIDs.
 * For example "sdi[0][0]->fb[0][0]" is shorthand for connecting the output crosspoint for
 * SDI1/Datastream1 (NTV2_XptSDIIn1) to the input crosspoint for Framestore1/Datastream1 (NTV2_XptFrameBuffer1Input).
 * These routing shorthand strings are found within the RoutingConfig structs in the "routing" sub-directory of the plugin.
 */
bool Routing::ParseRouteString(const std::string &route,
			       NTV2XptConnections &cnx)
{
	blog(LOG_DEBUG, "aja::Routing::ParseRouteString: Input string: %s",
	     route.c_str());

	std::string route_lower(route);
	route_lower = aja::lower(route_lower);
	const std::string &route_strip = aja::replace(route_lower, " ", "");

	if (route_strip.empty()) {
		blog(LOG_DEBUG,
		     "Routing::ParseRouteString: input string is empty!");
		return false;
	}

	/* TODO(paulh): Tally up the lines and tokens and check that they are all parsed OK.
	 * Right now we just return true if ANY tokens were parsed. This is OK _for now_ because
	 * the route strings currently only come from a known set.
	 */
	NTV2StringList lines;

	lines = aja::split(route_strip, ';');
	if (lines.empty())
		lines.push_back(route_strip);

	int32_t parse_ok = 0;
	for (const auto &l : lines) {
		if (l.empty()) {
			blog(LOG_DEBUG,
			     "aja::Routing::ParseRouteString: Empty line!");
			continue;
		}

		blog(LOG_DEBUG, "aja::Routing::ParseRouteString: Line: %s",
		     l.c_str());

		NTV2StringList tokens = aja::split(l, "->");
		if (tokens.empty() || tokens.size() != 2) {
			blog(LOG_DEBUG,
			     "aja::Routing::ParseRouteString: Invalid token count!");
			continue;
		}

		const std::string &left = tokens[0];  // output crosspoint
		const std::string &right = tokens[1]; // input crosspoint
		if (left.empty() || left.length() > 64) {
			blog(LOG_DEBUG,
			     "aja::Routing::ParseRouteString: Invalid Left token!");
			continue;
		}
		if (right.empty() || right.length() > 64) {
			blog(LOG_DEBUG,
			     "aja::Routing::ParseRouteString: Invalid right token!");
			continue;
		}

		blog(LOG_DEBUG,
		     "aja::Routing::ParseRouteString: Left Token: %s -> Right Token: %s",
		     left.c_str(), right.c_str());

		// Parse Output Crosspoint from left token
		int32_t out_chan = 0;
		int32_t out_ds = 0;
		std::string out_name(64, ' ');
		if (std::sscanf(left.c_str(), "%[A-Za-z_0-9][%d][%d]",
				&out_name[0], &out_chan, &out_ds)) {
			out_name = aja::rstrip(out_name).substr(
				0, out_name.find_first_of('\0'));

			WidgetOutputSocket widget_out;
			if (WidgetOutputSocket::Find(out_name,
						     (NTV2Channel)out_chan,
						     out_ds, widget_out)) {
				blog(LOG_DEBUG,
				     "aja::Routing::ParseRouteString: Found NTV2OutputCrosspointID %s",
				     NTV2OutputCrosspointIDToString(
					     widget_out.id)
					     .c_str());

				// Parse Input Crosspoint from right token
				int32_t inp_chan = 0;
				int32_t inp_ds = 0;
				std::string inp_name(64, ' ');
				if (std::sscanf(right.c_str(),
						"%[A-Za-z_0-9][%d][%d]",
						&inp_name[0], &inp_chan,
						&inp_ds)) {
					inp_name = aja::rstrip(inp_name).substr(
						0,
						inp_name.find_first_of('\0'));

					WidgetInputSocket widget_inp;
					if (WidgetInputSocket::Find(
						    inp_name,
						    (NTV2Channel)inp_chan,
						    inp_ds, widget_inp)) {
						blog(LOG_DEBUG,
						     "aja::Routing::ParseRouteString: Found NTV2InputCrosspointID %s",
						     NTV2InputCrosspointIDToString(
							     widget_inp.id)
							     .c_str());

						cnx[widget_inp.id] =
							widget_out.id;
						parse_ok++;
					} else {
						blog(LOG_DEBUG,
						     "aja::Routing::ParseRouteString: NTV2InputCrosspointID not found!");
					}
				}
			} else {
				blog(LOG_DEBUG,
				     "aja::Routing::ParseRouteString: NTV2OutputCrosspointID not found!");
			}
		}
	}

	return parse_ok > 0;
}

// Determine the appropriate SDIWireFormat based on the specified device ID and VPID specification.
bool Routing::DetermineSDIWireFormat(NTV2DeviceID deviceID, VPIDSpec spec,
				     SDIWireFormat &swf)
{
	if (deviceID == DEVICE_ID_KONA5 || deviceID == DEVICE_ID_IO4KPLUS) {
		static const std::vector<VPIDStandard> kRetail6GVpidStandards = {
			VPIDStandard_2160_Single_6Gb,
			VPIDStandard_1080_Single_6Gb,
			VPIDStandard_1080_AFR_Single_6Gb,
		};
		static const std::vector<VPIDStandard> kRetail12GVpidStandards =
			{VPIDStandard_2160_Single_12Gb,
			 VPIDStandard_1080_10_12_AFR_Single_12Gb};
		if (spec.first == RasterDefinition::UHD_4K &&
		    aja::vec_contains<VPIDStandard>(kRetail6GVpidStandards,
						    spec.second)) {
			swf = SDIWireFormat::
				UHD4K_ST2018_6G_Squares_2SI_Kona5_io4KPlus;
			return true;
		} else if (spec.first == RasterDefinition::UHD_4K &&
			   aja::vec_contains<VPIDStandard>(
				   kRetail12GVpidStandards, spec.second)) {
			swf = SDIWireFormat::
				UHD4K_ST2018_12G_Squares_2SI_Kona5_io4KPlus;
			return true;
		} else {
			if (kSDIWireFormats.find(spec) !=
			    kSDIWireFormats.end()) {
				swf = kSDIWireFormats.at(spec);
				return true;
			}
		}
	} else {
		if (kSDIWireFormats.find(spec) != kSDIWireFormats.end()) {
			swf = kSDIWireFormats.at(spec);
			return true;
		}
	}

	return false;
}

// Lookup configuration for HDMI input/output in the routing table.
bool Routing::FindRoutingConfigHDMI(HDMIWireFormat hwf, NTV2Mode mode,
				    bool isRGB, NTV2DeviceID deviceID,
				    RoutingConfig &routing)
{
	if (isRGB) {
		if (mode == NTV2_MODE_CAPTURE) {
			if (kHDMIRGBCaptureConfigs.find(hwf) !=
			    kHDMIRGBCaptureConfigs.end()) {
				routing = kHDMIRGBCaptureConfigs.at(hwf);
				return true;
			}
		} else {
			if (deviceID == DEVICE_ID_TTAP_PRO) {
				routing = kHDMIRGBDisplayConfigs.at(
					HDMIWireFormat::TTAP_PRO);
				return true;
			}
			if (kHDMIRGBDisplayConfigs.find(hwf) !=
			    kHDMIRGBDisplayConfigs.end()) {
				routing = kHDMIRGBDisplayConfigs.at(hwf);
				return true;
			}
		}
	} else {
		if (mode == NTV2_MODE_CAPTURE) {
			if (kHDMIYCbCrCaptureConfigs.find(hwf) !=
			    kHDMIYCbCrCaptureConfigs.end()) {
				routing = kHDMIYCbCrCaptureConfigs.at(hwf);
				return true;
			}
		} else {
			if (kHDMIYCbCrDisplayConfigs.find(hwf) !=
			    kHDMIYCbCrDisplayConfigs.end()) {
				routing = kHDMIYCbCrDisplayConfigs.at(hwf);
				return true;
			}
		}
	}

	return false;
}

// Lookup configuration for SDI input/output in the routing table.
bool Routing::FindRoutingConfigSDI(SDIWireFormat swf, NTV2Mode mode, bool isRGB,
				   NTV2DeviceID deviceID,
				   RoutingConfig &routing)
{
	UNUSED_PARAMETER(deviceID);

	if (isRGB) {
		if (mode == NTV2_MODE_CAPTURE) {
			if (kSDIRGBCaptureConfigs.find(swf) !=
			    kSDIRGBCaptureConfigs.end()) {
				routing = kSDIRGBCaptureConfigs.at(swf);
				return true;
			}
		} else if (mode == NTV2_MODE_DISPLAY) {
			if (kSDIRGBDisplayConfigs.find(swf) !=
			    kSDIRGBDisplayConfigs.end()) {
				routing = kSDIRGBDisplayConfigs.at(swf);
				return true;
			}
		}
	} else {
		if (mode == NTV2_MODE_CAPTURE) {
			if (kSDIYCbCrCaptureConfigs.find(swf) !=
			    kSDIYCbCrCaptureConfigs.end()) {
				routing = kSDIYCbCrCaptureConfigs.at(swf);
				return true;
			}
		} else if (mode == NTV2_MODE_DISPLAY) {
			if (kSDIYCbCrDisplayConfigs.find(swf) !=
			    kSDIYCbCrDisplayConfigs.end()) {
				routing = kSDIYCbCrDisplayConfigs.at(swf);
				return true;
			}
		}
	}

	return false;
}

void Routing::StartSourceAudio(const SourceProps &props, CNTV2Card *card)
{
	if (!card)
		return;

	auto inputSrc = props.inputSource;
	auto channel = props.Channel();
	auto audioSys = props.AudioSystem();

	card->WriteAudioSource(0, channel);
	card->SetAudioSystemInputSource(
		audioSys, NTV2InputSourceToAudioSource(inputSrc),
		NTV2InputSourceToEmbeddedAudioInput(inputSrc));

	card->SetNumberAudioChannels(props.audioNumChannels, audioSys);
	card->SetAudioRate(props.AudioRate(), audioSys);
	card->SetAudioBufferSize(NTV2_AUDIO_BUFFER_BIG, audioSys);

	// Fix for AJA NTV2 internal bug #11467
	ULWord magicAudioBits = 0;
	if (NTV2_INPUT_SOURCE_IS_HDMI(inputSrc)) {
		switch (inputSrc) {
		default:
		case NTV2_INPUTSOURCE_HDMI1:
			magicAudioBits = 0x00100000;
			break;
		case NTV2_INPUTSOURCE_HDMI2:
			magicAudioBits = 0x00110000;
			break;
		case NTV2_INPUTSOURCE_HDMI3:
			magicAudioBits = 0x00900000;
			break;
		case NTV2_INPUTSOURCE_HDMI4:
			magicAudioBits = 0x00910000;
			break;
		}
	} else if (NTV2_INPUT_SOURCE_IS_ANALOG(inputSrc)) {
		magicAudioBits = 0x00000990;
	} else { // SDI
		magicAudioBits = 0x00000320;
	}

	// TODO(paulh): Ask aja-seanl about these deprecated calls and if they are still needed
	ULWord oldValue = 0;
	if (card->ReadAudioSource(oldValue, channel)) {
		card->WriteAudioSource(oldValue | magicAudioBits, channel);
	}

	for (int a = 0; a < NTV2DeviceGetNumAudioSystems(card->GetDeviceID());
	     a++) {
		card->SetAudioLoopBack(NTV2_AUDIO_LOOPBACK_OFF,
				       NTV2AudioSystem(a));
	}

	card->StartAudioInput(audioSys);
	card->SetAudioCaptureEnable(audioSys, true);
}

void Routing::StopSourceAudio(const SourceProps &props, CNTV2Card *card)
{
	if (card) {
		auto audioSys = props.AudioSystem();
		card->SetAudioCaptureEnable(audioSys, false);
		card->StopAudioInput(audioSys);
	}
}

// Guess an SDIWireFormat based on specified Video Format, IOSelection, 4K Transport and device ID.
SDIWireFormat GuessSDIWireFormat(NTV2VideoFormat vf, IOSelection io,
				 SDI4KTransport t4k,
				 NTV2DeviceID device_id = DEVICE_ID_NOTFOUND)
{
	auto rd = GetRasterDefinition(io, vf, device_id);
	auto fg = GetNTV2FrameGeometryFromVideoFormat(vf);

	SDIWireFormat swf = SDIWireFormat::Unknown;
	if (rd == RasterDefinition::SD) {
		swf = SDIWireFormat::SD_ST352;
	} else if (rd == RasterDefinition::HD) {
		if (fg == NTV2_FG_1280x720) {
			swf = SDIWireFormat::HD_720p_ST292;
		} else if (fg == NTV2_FG_1920x1080 || fg == NTV2_FG_2048x1080) {
			swf = SDIWireFormat::HD_1080_ST292;
		}
	} else if (rd == RasterDefinition::UHD_4K) {
		if (t4k == SDI4KTransport::Squares) {
			if (aja::IsSDIFourWireIOSelection(io)) {
				swf = SDIWireFormat::UHD4K_ST292_Quad_1_5_Squares;
			} else if (aja::IsSDITwoWireIOSelection(io)) {
				swf = SDIWireFormat::UHD4K_ST292_Dual_1_5_Squares;
			}
		} else if (t4k == SDI4KTransport::TwoSampleInterleave) {
			if (aja::IsSDIOneWireIOSelection(io)) {
				if (NTV2_IS_4K_HFR_VIDEO_FORMAT(vf)) {
					if (aja::IsRetailSDI12G(device_id)) {
						swf = SDIWireFormat::
							UHD4K_ST2018_12G_Squares_2SI_Kona5_io4KPlus;
					} else {
						swf = SDIWireFormat::
							UHD4K_ST2018_12G_Squares_2SI;
					}
				} else {
					if (aja::IsRetailSDI12G(device_id)) {
						swf = SDIWireFormat::
							UHD4K_ST2018_6G_Squares_2SI_Kona5_io4KPlus;
					} else {
						swf = SDIWireFormat::
							UHD4K_ST2018_6G_Squares_2SI;
					}
				}
			} else if (aja::IsSDITwoWireIOSelection(io)) {
				swf = SDIWireFormat::UHD4K_ST425_Dual_3Gb_2SI;
			} else if (aja::IsSDIFourWireIOSelection(io)) {
				swf = SDIWireFormat::UHD4K_ST425_Quad_3Gb_2SI;
			}
		}
	}
	return swf;
}

bool Routing::ConfigureSourceRoute(const SourceProps &props, NTV2Mode mode,
				   CNTV2Card *card)
{
	if (!card)
		return false;

	auto deviceID = props.deviceID;

	NTV2VideoFormat vf = props.videoFormat;
	if (NTV2_VIDEO_FORMAT_IS_B(props.videoFormat)) {
		vf = aja::GetLevelAFormatForLevelBFormat(props.videoFormat);
	}

	NTV2InputSourceSet inputSources;
	aja::IOSelectionToInputSources(props.ioSelect, inputSources);
	if (inputSources.empty()) {
		blog(LOG_DEBUG,
		     "No Input Sources specified to configure routing!");
		return false;
	}
	auto init_src = *inputSources.begin();
	auto init_channel = NTV2InputSourceToChannel(init_src);

	RoutingConfig rc;
	if (NTV2_INPUT_SOURCE_IS_SDI(init_src)) {
		SDIWireFormat swf = SDIWireFormat::Unknown;
		auto standard = VPIDStandard_Unknown;
		auto vpidList = props.vpids;
		if (vpidList.size() > 0)
			standard = vpidList.at(0).Standard();

		if (standard != VPIDStandard_Unknown) {
			// Determine SDI format based on raster "definition" and VPID byte 1 value (AKA SMPTE standard)
			auto rasterDef = GetRasterDefinition(props.ioSelect, vf,
							     props.deviceID);
			VPIDSpec vpidSpec = std::make_pair(rasterDef, standard);
			DetermineSDIWireFormat(deviceID, vpidSpec, swf);
		} else {
			// Best guess SDI format from incoming video format if no VPIDs detected
			swf = GuessSDIWireFormat(vf, props.ioSelect,
						 props.sdi4kTransport,
						 props.deviceID);
		}

		if (swf == SDIWireFormat::Unknown) {
			blog(LOG_DEBUG, "Could not determine SDI Wire Format!");
			return false;
		}

		if (!FindRoutingConfigSDI(swf, mode,
					  NTV2_IS_FBF_RGB(props.pixelFormat),
					  props.deviceID, rc)) {
			blog(LOG_DEBUG,
			     "Could not find RoutingConfig for SDI Wire Format!");
			return false;
		}
	} else if (NTV2_INPUT_SOURCE_IS_HDMI(init_src)) {
		HDMIWireFormat hwf = HDMIWireFormat::Unknown;

		if (NTV2_IS_FBF_RGB(props.pixelFormat)) {
			if (NTV2_IS_HD_VIDEO_FORMAT(vf))
				hwf = HDMIWireFormat::HD_RGB_LFR;
		} else {
			if (NTV2_IS_HD_VIDEO_FORMAT(vf))
				hwf = HDMIWireFormat::HD_YCBCR_LFR;
			else if (NTV2_IS_4K_VIDEO_FORMAT(vf))
				hwf = HDMIWireFormat::UHD_4K_YCBCR_LFR;
		}

		if (!FindRoutingConfigHDMI(hwf, mode,
					   NTV2_IS_FBF_RGB(props.pixelFormat),
					   props.deviceID, rc)) {
			blog(LOG_DEBUG,
			     "Could not find RoutingConfig for HDMI Wire Format!");
			return false;
		}
	}

	// Substitute channel placeholders for actual indices
	std::string route_string = rc.route_string;
	ULWord start_channel_index = GetIndexForNTV2Channel(init_channel);
	for (ULWord c = 0; c < 8; c++) {
		std::string channel_placeholder =
			std::string("{ch" + aja::to_string(c + 1) + "}");
		route_string =
			aja::replace(route_string, channel_placeholder,
				     aja::to_string(start_channel_index++));
	}

	NTV2XptConnections cnx;
	ParseRouteString(route_string, cnx);

	card->ApplySignalRoute(cnx, false);

	// Apply SDI widget settings
	start_channel_index = GetIndexForNTV2Channel(init_channel);
	for (uint32_t i = (uint32_t)start_channel_index;
	     i < (start_channel_index + rc.num_wires); i++) {
		NTV2Channel channel = GetNTV2ChannelForIndex(i);
		if (::NTV2DeviceHasBiDirectionalSDI(deviceID)) {
			card->SetSDITransmitEnable(channel,
						   mode == NTV2_MODE_DISPLAY);
		}
		card->SetSDIOut3GEnable(channel, rc.enable_3g_out);
		card->SetSDIOut3GbEnable(channel, rc.enable_3gb_out);
		card->SetSDIOut6GEnable(channel, rc.enable_6g_out);
		card->SetSDIOut12GEnable(channel, rc.enable_12g_out);
		card->SetSDIInLevelBtoLevelAConversion((UWord)i,
						       rc.convert_3g_in);
		card->SetSDIOutLevelAtoLevelBConversion((UWord)i,
							rc.convert_3g_out);
		card->SetSDIOutRGBLevelAConversion((UWord)i,
						   rc.enable_rgb_3ga_convert);
	}

	// Apply Framestore settings
	for (uint32_t i = (uint32_t)start_channel_index;
	     i < (start_channel_index + rc.num_framestores); i++) {
		NTV2Channel channel = GetNTV2ChannelForIndex(i);
		card->EnableChannel(channel);
		card->SetMode(channel, mode);
		card->SetVANCMode(NTV2_VANCMODE_OFF, channel);
		card->SetVideoFormat(vf, false, false, channel);
		card->SetFrameBufferFormat(channel, props.pixelFormat);
		card->SetTsiFrameEnable(rc.enable_tsi, channel);
		card->Set4kSquaresEnable(rc.enable_4k_squares, channel);
		card->SetQuadQuadSquaresEnable(rc.enable_8k_squares, channel);
	}

	return true;
}

bool Routing::ConfigureOutputRoute(const OutputProps &props, NTV2Mode mode,
				   CNTV2Card *card)
{
	if (!card)
		return false;

	auto deviceID = props.deviceID;

	NTV2OutputDestinations outputDests;
	aja::IOSelectionToOutputDests(props.ioSelect, outputDests);
	if (outputDests.empty()) {
		blog(LOG_DEBUG,
		     "No Output Destinations specified to configure routing!");
		return false;
	}

	auto init_dest = *outputDests.begin();
	auto init_channel = NTV2OutputDestinationToChannel(init_dest);

	RoutingConfig rc;
	if (NTV2_OUTPUT_DEST_IS_SDI(init_dest)) {
		SDIWireFormat swf = GuessSDIWireFormat(props.videoFormat,
						       props.ioSelect,
						       props.sdi4kTransport,
						       props.deviceID);

		if (swf == SDIWireFormat::Unknown) {
			blog(LOG_DEBUG, "Could not determine SDI Wire Format!");
			return false;
		}

		if (!FindRoutingConfigSDI(swf, mode,
					  NTV2_IS_FBF_RGB(props.pixelFormat),
					  props.deviceID, rc)) {
			blog(LOG_DEBUG,
			     "Could not find RoutingConfig for SDI Wire Format!");
			return false;
		}
	} else if (NTV2_OUTPUT_DEST_IS_HDMI(init_dest)) {
		HDMIWireFormat hwf = HDMIWireFormat::Unknown;

		// special case devices...
		if (props.deviceID == DEVICE_ID_TTAP_PRO) {
			hwf = HDMIWireFormat::TTAP_PRO;
		} else {
			// ...all other devices.
			if (NTV2_IS_FBF_RGB(props.pixelFormat)) {
				if (NTV2_IS_HD_VIDEO_FORMAT(props.videoFormat))
					hwf = HDMIWireFormat::HD_RGB_LFR;
			} else {
				if (NTV2_IS_HD_VIDEO_FORMAT(
					    props.videoFormat)) {
					hwf = HDMIWireFormat::HD_YCBCR_LFR;
				} else if (NTV2_IS_4K_VIDEO_FORMAT(
						   props.videoFormat)) {
					hwf = HDMIWireFormat::UHD_4K_YCBCR_LFR;
				}
			}
		}

		if (!FindRoutingConfigHDMI(hwf, mode,
					   NTV2_IS_FBF_RGB(props.pixelFormat),
					   props.deviceID, rc)) {
			blog(LOG_DEBUG,
			     "Could not find RoutingConfig for HDMI Wire Format!");
			return false;
		}
	}

	std::string route_string = rc.route_string;

	// Replace framestore channel placeholders
	ULWord start_framestore_index = initial_framestore_output_index(
		deviceID, props.ioSelect, init_channel);
	for (ULWord c = 0; c < NTV2_MAX_NUM_CHANNELS; c++) {
		std::string fs_channel_placeholder =
			std::string("fb[{ch" + aja::to_string(c + 1) + "}]");
		route_string = aja::replace(
			route_string, fs_channel_placeholder,
			"fb[" + aja::to_string(start_framestore_index++) + "]");
	}

	// Replace other channel placeholders
	ULWord start_channel_index = GetIndexForNTV2Channel(init_channel);
	for (ULWord c = 0; c < NTV2_MAX_NUM_CHANNELS; c++) {
		std::string channel_placeholder =
			std::string("{ch" + aja::to_string(c + 1) + "}");
		route_string =
			aja::replace(route_string, channel_placeholder,
				     aja::to_string(start_channel_index++));
	}

	NTV2XptConnections cnx;
	ParseRouteString(route_string, cnx);
	card->ApplySignalRoute(cnx, false);

	// Apply SDI widget settings
	if (props.ioSelect != IOSelection::HDMIMonitorOut) {
		start_channel_index = GetIndexForNTV2Channel(init_channel);
		for (uint32_t i = (uint32_t)start_channel_index;
		     i < (start_channel_index + rc.num_wires); i++) {
			NTV2Channel channel = GetNTV2ChannelForIndex(i);
			if (::NTV2DeviceHasBiDirectionalSDI(deviceID)) {
				card->SetSDITransmitEnable(
					channel, mode == NTV2_MODE_DISPLAY);
			}
			card->SetSDIOut3GEnable(channel, rc.enable_3g_out);
			card->SetSDIOut3GbEnable(channel, rc.enable_3gb_out);
			card->SetSDIOut6GEnable(channel, rc.enable_6g_out);
			card->SetSDIOut12GEnable(channel, rc.enable_12g_out);
			card->SetSDIInLevelBtoLevelAConversion(
				(UWord)i, rc.convert_3g_in);
			card->SetSDIOutLevelAtoLevelBConversion(
				(UWord)i, rc.convert_3g_out);
			card->SetSDIOutRGBLevelAConversion(
				(UWord)i, rc.enable_rgb_3ga_convert);
		}
	}

	// Apply Framestore settings
	start_framestore_index = initial_framestore_output_index(
		deviceID, props.ioSelect, init_channel);
	for (uint32_t i = (uint32_t)start_framestore_index;
	     i < (start_framestore_index + rc.num_framestores); i++) {
		NTV2Channel channel = GetNTV2ChannelForIndex(i);
		card->EnableChannel(channel);
		card->SetMode(channel, mode);
		card->SetVANCMode(NTV2_VANCMODE_OFF, channel);
		card->SetVideoFormat(props.videoFormat, false, false, channel);
		card->SetFrameBufferFormat(channel, props.pixelFormat);
		card->SetTsiFrameEnable(rc.enable_tsi, channel);
		card->Set4kSquaresEnable(rc.enable_4k_squares, channel);
		card->SetQuadQuadSquaresEnable(rc.enable_8k_squares, channel);
	}

	return true;
}

ULWord Routing::initial_framestore_output_index(NTV2DeviceID deviceID,
						IOSelection io,
						NTV2Channel init_channel)
{
	if (deviceID == DEVICE_ID_TTAP_PRO) {
		return 0;
	} else if (deviceID == DEVICE_ID_KONA1) {
		return 1;
	} else if (deviceID == DEVICE_ID_IO4K ||
		   deviceID == DEVICE_ID_IO4KPLUS) {
		// SDI Monitor output uses framestore 4
		if (io == IOSelection::SDI5)
			return 3;
	}

	// HDMI Monitor output uses framestore 4
	if (io == IOSelection::HDMIMonitorOut) {
		return 3;
	}

	return GetIndexForNTV2Channel(init_channel);
}

// Output Routing
void Routing::ConfigureOutputAudio(const OutputProps &props, CNTV2Card *card)
{
	if (!card)
		return;

	auto deviceID = card->GetDeviceID();
	auto audioSys = props.AudioSystem();
	auto channel = props.Channel();

	card->SetNumberAudioChannels(props.audioNumChannels, audioSys);
	card->SetAudioRate(props.AudioRate(), audioSys);
	card->SetAudioBufferSize(NTV2_AUDIO_BUFFER_BIG, audioSys);
	card->SetAudioOutputDelay(audioSys, 0);

	card->SetSDIOutputAudioSystem(channel, audioSys);
	card->SetSDIOutputDS2AudioSystem(channel, audioSys);

	/* NOTE(paulh):
	 * The SDK has a specifies an SDI audio system by Channel rather than by SDI output
	 * and certain devices require setting the SDI audio system to NTV2_CHANNEL1.
	 * i.e.
	 * SDI 1 = NTV2_CHANNEL1
	 * SDI 2 = NTV2_CHANNEL2
	 * ...
	 * SDI 5/Monitor = NTV2_CHANNEL5
	 * etc...
	 *
	 * This fixes AJA internal bugs: 10730, 10986, 16274
	 */
	if (deviceID == DEVICE_ID_IOXT || deviceID == DEVICE_ID_IO4KUFC ||
	    deviceID == DEVICE_ID_IO4KPLUS || deviceID == DEVICE_ID_KONA1 ||
	    deviceID == DEVICE_ID_KONA3G || deviceID == DEVICE_ID_KONA4UFC ||
	    deviceID == DEVICE_ID_KONA5 || deviceID == DEVICE_ID_KONA5_2X4K) {
		// Make sure SDI out 1 (aka Channel 1) is set to the correct sub-system
		card->SetSDIOutputAudioSystem(NTV2_CHANNEL1, audioSys);
		card->SetSDIOutputDS2AudioSystem(NTV2_CHANNEL1, audioSys);
	}

	// make sure that audio is setup for the SDI monitor output on devices that support it
	if (NTV2DeviceCanDoWidget(deviceID, NTV2_WgtSDIMonOut1)) {
		card->SetSDIOutputAudioSystem(NTV2_CHANNEL5, audioSys);
		card->SetSDIOutputDS2AudioSystem(NTV2_CHANNEL5, audioSys);
	}

	card->SetHDMIOutAudioRate(props.AudioRate());
	card->SetHDMIOutAudioFormat(NTV2_AUDIO_FORMAT_LPCM);

	card->SetAudioOutputMonitorSource(NTV2_AudioChannel1_2, channel);
	card->SetAESOutputSource(NTV2_AudioChannel1_4, audioSys,
				 NTV2_AudioChannel1_4);
	card->SetAESOutputSource(NTV2_AudioChannel5_8, audioSys,
				 NTV2_AudioChannel5_8);
	card->SetAESOutputSource(NTV2_AudioChannel9_12, audioSys,
				 NTV2_AudioChannel9_12);
	card->SetAESOutputSource(NTV2_AudioChannel13_16, audioSys,
				 NTV2_AudioChannel13_16);

	// make sure that audio is setup for HDMI output on devices that support it
	if (NTV2DeviceGetNumHDMIVideoOutputs(deviceID) > 0) {
		if (NTV2DeviceCanDoAudioMixer(deviceID)) {
			card->SetAudioMixerInputAudioSystem(
				NTV2_AudioMixerInputMain, audioSys);
			card->SetAudioMixerInputChannelSelect(
				NTV2_AudioMixerInputMain, NTV2_AudioChannel1_2);
			card->SetAudioMixerInputChannelsMute(
				NTV2_AudioMixerInputAux1,
				NTV2AudioChannelsMuteAll);
			card->SetAudioMixerInputChannelsMute(
				NTV2_AudioMixerInputAux2,
				NTV2AudioChannelsMuteAll);
		}

		card->SetHDMIOutAudioChannels(NTV2_HDMIAudio8Channels);
		card->SetHDMIOutAudioSource2Channel(NTV2_AudioChannel1_2,
						    audioSys);
		card->SetHDMIOutAudioSource8Channel(NTV2_AudioChannel1_8,
						    audioSys);
	}

	card->SetAudioLoopBack(NTV2_AUDIO_LOOPBACK_OFF, audioSys);

	card->StopAudioOutput(audioSys);
}