#include "pch.h"
#include "EffectCompiler.h"
#include <bitset>
#include <charconv>
#include "EffectCacheManager.h"
#include "StrHelper.h"
#include "Logger.h"
#include "CommonSharedConstants.h"
#include <bit>	// std::has_single_bit
#include "DirectXHelper.h"
#include "EffectHelper.h"
#include "Win32Helper.h"
#include "EffectDesc.h"

namespace Magpie {

// 当前 MagpieFX 版本
static constexpr uint32_t MAGPIE_FX_VERSION = 4;

static const char* META_INDICATOR = "//!";

class PassInclude : public ID3DInclude {
public:
	PassInclude(std::wstring_view localDir) : _localDir(localDir) {}

	PassInclude(const PassInclude&) = default;
	PassInclude(PassInclude&&) = default;

	HRESULT CALLBACK Open(
		D3D_INCLUDE_TYPE /*IncludeType*/,
		LPCSTR pFileName,
		LPCVOID /*pParentData*/,
		LPCVOID* ppData,
		UINT* pBytes
	) noexcept override {
		std::wstring relativePath = StrHelper::Concat(_localDir, StrHelper::UTF8ToUTF16(pFileName));

		std::string file;
		if (!Win32Helper::ReadTextFile(relativePath.c_str(), file)) {
			return E_FAIL;
		}

		char* result = new char[file.size()];
		std::memcpy(result, file.data(), file.size());

		*ppData = result;
		*pBytes = (UINT)file.size();

		return S_OK;
	}

	HRESULT CALLBACK Close(LPCVOID pData) noexcept override {
		delete[](char*)pData;
		return S_OK;
	}

private:
	std::wstring _localDir;
};

static uint32_t RemoveComments(std::string& source) noexcept {
	// 确保以换行符结尾
	if (source.back() != '\n') {
		source.push_back('\n');
	}

	std::string result;
	result.reserve(source.size());

	int j = 0;
	// 单独处理最后两个字符
	for (size_t i = 0, end = source.size() - 2; i < end; ++i) {
		if (source[i] == '/') {
			if (source[i + 1] == '/' && source[i + 2] != '!') {
				// 行注释
				i += 2;

				// 无需处理越界，因为必定以换行符结尾
				while (source[i] != '\n') {
					++i;
				}

				// 保留换行符
				source[j++] = '\n';

				continue;
			} else if (source[i + 1] == '*') {
				// 块注释
				i += 2;

				while (true) {
					if (++i >= source.size()) {
						// 未闭合
						return 1;
					}

					if (source[i - 1] == '*' && source[i] == '/') {
						break;
					}
				}

				// 文件结尾
				if (i >= source.size() - 2) {
					source.resize(j);
					return 0;
				}

				continue;
			}
		}

		source[j++] = source[i];
	}

	// 无需复制最后的换行符
	source[j++] = source[source.size() - 2];
	source.resize(j);
	return 0;
}

template <bool IncludeNewLine>
static void RemoveLeadingBlanks(std::string_view& source) noexcept {
	size_t i = 0;
	for (; i < source.size(); ++i) {
		if constexpr (IncludeNewLine) {
			if (!StrHelper::isspace(source[i])) {
				break;
			}
		} else {
			char c = source[i];
			if (c != ' ' && c != '\t') {
				break;
			}
		}
	}

	source.remove_prefix(i);
}

template <bool AllowNewLine>
static bool CheckNextToken(std::string_view& source, std::string_view token) noexcept {
	RemoveLeadingBlanks<AllowNewLine>(source);

	if (!source.starts_with(token)) {
		return false;
	}

	source.remove_prefix(token.size());
	return true;
}

template <bool AllowNewLine>
static uint32_t GetNextToken(std::string_view& source, std::string_view& value) noexcept {
	RemoveLeadingBlanks<AllowNewLine>(source);

	if (source.empty()) {
		return 2;
	}

	char cur = source[0];

	if (StrHelper::isalpha(cur) || cur == '_') {
		size_t j = 1;
		for (; j < source.size(); ++j) {
			cur = source[j];

			if (!StrHelper::isalnum(cur) && cur != '_') {
				break;
			}
		}

		value = source.substr(0, j);
		source.remove_prefix(j);
		return 0;
	}

	if constexpr (AllowNewLine) {
		return 1;
	} else {
		return cur == '\n' ? 2 : 1;
	}
}

static bool CheckMagic(std::string_view& source) noexcept {
	std::string_view token;
	if (!CheckNextToken<true>(source, META_INDICATOR)) {
		return false;
	}

	if (!CheckNextToken<false>(source, "MAGPIE")) {
		return false;
	}
	if (!CheckNextToken<false>(source, "EFFECT")) {
		return false;
	}

	if (GetNextToken<false>(source, token) != 2) {
		return false;
	}

	if (source.empty()) {
		return false;
	}

	return true;
}

static uint32_t GetNextString(std::string_view& source, std::string_view& value) noexcept {
	RemoveLeadingBlanks<false>(source);
	size_t pos = source.find('\n');

	value = source.substr(0, pos);
	StrHelper::Trim(value);
	if (value.empty()) {
		return 1;
	}

	if (pos == std::string_view::npos) {
		source.remove_prefix(source.size());
	} else {
		source.remove_prefix(pos + 1);
	}

	return 0;
}

template <typename T>
static uint32_t GetNextNumber(std::string_view& source, T& value) noexcept {
	RemoveLeadingBlanks<false>(source);

	if (source.empty()) {
		return 1;
	}

	const auto& result = std::from_chars(source.data(), source.data() + source.size(), value);
	if ((int)result.ec) {
		return 1;
	}

	// 解析成功
	source.remove_prefix(result.ptr - source.data());
	return 0;
}

static uint32_t GetNextExpr(std::string_view& source, std::string& expr) noexcept {
	RemoveLeadingBlanks<false>(source);
	size_t size = std::min(source.find('\n') + 1, source.size());

	// 移除空白字符
	expr.resize(size);

	size_t j = 0;
	for (size_t i = 0; i < size; ++i) {
		char c = source[i];
		if (!isspace(c)) {
			expr[j++] = c;
		}
	}
	expr.resize(j);

	if (expr.empty()) {
		return 1;
	}

	source.remove_prefix(size);
	return 0;
}

static uint32_t ResolveUseFlags(std::string_view& block, uint32_t& effectFlags) noexcept {
	std::string_view flags;
	if (GetNextString(block, flags)) {
		return 1;
	}

	std::bitset<2> processed;

	for (std::string_view& token : StrHelper::Split(flags, ',')) {
		StrHelper::Trim(token);
		std::string flag = StrHelper::ToUpperCase(token);

		if (flag == "MULADD") {
			if (processed[0]) {
				return 1;
			}
			processed[0] = true;

			effectFlags |= EffectFlags::UseMulAdd;
		} else if (flag == "_DYNAMIC") {
			// Dynamic 不再正式支持，但功能仍然保留
			if (processed[1]) {
				return 1;
			}
			processed[1] = true;

			effectFlags |= EffectFlags::UseDynamic;
		} else {
			Logger::Get().Warn(StrHelper::Concat("使用了未知 USE 标志: ", token));
		}
	}

	return 0;
}

static uint32_t ResolveCapabilityFlags(std::string_view& block, uint32_t& effectFlags, bool noFP16) noexcept {
	std::string_view flags;
	if (GetNextString(block, flags)) {
		return 1;
	}

	std::bitset<1> processed;

	for (std::string_view& token : StrHelper::Split(flags, ',')) {
		StrHelper::Trim(token);
		std::string flag = StrHelper::ToUpperCase(token);

		if (flag == "FP16") {
			if (processed[0]) {
				return 1;
			}
			processed[0] = true;

			effectFlags |= EffectFlags::SupportFP16;
			if (!noFP16) {
				effectFlags |= EffectFlags::FP16;
			}
		} else {
			Logger::Get().Warn(StrHelper::Concat("使用了未知 CAPABILITY 标志: ", token));
		}
	}

	return 0;
}

static uint32_t ResolveHeader(
	std::string_view block,
	EffectDesc& desc,
	uint32_t& effectFlags,
	bool noCompile,
	bool noFP16
) noexcept {
	// 必需的选项: VERSION
	// 可选的选项: SORT_NAME, USE

	std::bitset<4> processed;

	std::string_view token;

	while (true) {
		if (!CheckNextToken<true>(block, META_INDICATOR)) {
			break;
		}

		if (GetNextToken<false>(block, token)) {
			return 1;
		}
		std::string t = StrHelper::ToUpperCase(token);

		if (t == "VERSION") {
			if (processed[0]) {
				return 1;
			}
			processed[0] = true;

			uint32_t version;
			if (GetNextNumber(block, version)) {
				return 1;
			}

			if (version != MAGPIE_FX_VERSION) {
				return 1;
			}

			if (GetNextToken<false>(block, token) != 2) {
				return 1;
			}
		} else if (t == "SORT_NAME") {
			if (processed[1]) {
				return 1;
			}
			processed[1] = true;

			std::string_view sortName;
			if (GetNextString(block, sortName)) {
				return 1;
			}

			if (noCompile) {
				desc.sortName = sortName;
			}
		} else if (t == "USE") {
			if (processed[2]) {
				return 1;
			}
			processed[2] = true;

			if (ResolveUseFlags(block, effectFlags)) {
				return 1;
			}
		} else if (t == "CAPABILITY") {
			if (processed[3]) {
				return 1;
			}
			processed[3] = true;

			if (ResolveCapabilityFlags(block, effectFlags, noFP16)) {
				return 1;
			}
		} else {
			Logger::Get().Warn(StrHelper::Concat("解析头时遇到未知指令: ", t));
		}
	}

	// HEADER 只能有 #include
	if (CheckNextToken<true>(block, "#include")) {
		// 跳过整行
		size_t pos = block.find('\n');
		if (pos == std::string_view::npos) {
			block.remove_prefix(block.size());
		} else {
			block.remove_prefix(pos + 1);
		}
	}

	if (GetNextToken<true>(block, token) != 2) {
		return 1;
	}

	if (!processed[0]) {
		return 1;
	}

	return 0;
}

static uint32_t ResolveParameter(std::string_view block, EffectDesc& desc) noexcept {
	// 必需的选项: DEFAULT, MIN, MAX, STEP
	// 可选的选项: LABEL

	std::bitset<5> processed;

	std::string_view token;

	if (!CheckNextToken<true>(block, META_INDICATOR)) {
		return 1;
	}

	if (!CheckNextToken<false>(block, "PARAMETER")) {
		return 1;
	}
	if (GetNextToken<false>(block, token) != 2) {
		return 1;
	}

	EffectParameterDesc& paramDesc = desc.params.emplace_back();

	std::string_view defaultValue;
	std::string_view minValue;
	std::string_view maxValue;
	std::string_view stepValue;

	while (true) {
		if (!CheckNextToken<true>(block, META_INDICATOR)) {
			break;
		}

		if (GetNextToken<false>(block, token)) {
			return 1;
		}

		std::string t = StrHelper::ToUpperCase(token);

		if (t == "DEFAULT") {
			if (processed[0]) {
				return 1;
			}
			processed[0] = true;

			if (GetNextString(block, defaultValue)) {
				return 1;
			}
		} else if (t == "LABEL") {
			if (processed[1]) {
				return 1;
			}
			processed[1] = true;

			std::string_view label;
			if (GetNextString(block, label)) {
				return 1;
			}
			paramDesc.label = label;
		} else if (t == "MIN") {
			if (processed[2]) {
				return 1;
			}
			processed[2] = true;

			if (GetNextString(block, minValue)) {
				return 1;
			}
		} else if (t == "MAX") {
			if (processed[3]) {
				return 1;
			}
			processed[3] = true;

			if (GetNextString(block, maxValue)) {
				return 1;
			}
		} else if (t == "STEP") {
			if (processed[4]) {
				return 1;
			}
			processed[4] = true;

			if (GetNextString(block, stepValue)) {
				return 1;
			}
		} else {
			Logger::Get().Warn(StrHelper::Concat("解析参数时遇到未知指令: ", t));
		}
	}

	// 检查必选项
	if (!processed[0] || !processed[2] || !processed[3] || !processed[4]) {
		return 1;
	}

	// 代码部分
	if (GetNextToken<true>(block, token)) {
		return 1;
	}

	if (token == "float") {
		EffectConstant<float>& constant = paramDesc.constant.emplace<0>();

		if (GetNextNumber(defaultValue, constant.defaultValue)) {
			return 1;
		}
		if (GetNextNumber(minValue, constant.minValue)) {
			return 1;
		}
		if (GetNextNumber(maxValue, constant.maxValue)) {
			return 1;
		}
		if (GetNextNumber(stepValue, constant.step)) {
			return 1;
		}

		if (constant.defaultValue < constant.minValue || constant.maxValue < constant.defaultValue) {
			return 1;
		}
	} else if (token == "int") {
		EffectConstant<int>& constant = paramDesc.constant.emplace<1>();

		if (GetNextNumber(defaultValue, constant.defaultValue)) {
			return 1;
		}
		if (GetNextNumber(minValue, constant.minValue)) {
			return 1;
		}
		if (GetNextNumber(maxValue, constant.maxValue)) {
			return 1;
		}
		if (GetNextNumber(stepValue, constant.step)) {
			return 1;
		}

		if (constant.defaultValue < constant.minValue || constant.maxValue < constant.defaultValue) {
			return 1;
		}
	} else {
		return 1;
	}

	if (GetNextToken<true>(block, token)) {
		return 1;
	}
	paramDesc.name = token;

	if (!CheckNextToken<true>(block, ";")) {
		return 1;
	}

	if (GetNextToken<true>(block, token) != 2) {
		return 1;
	}

	return 0;
}


static uint32_t ResolveTexture(std::string_view block, EffectDesc& desc) noexcept {
	// 如果名称为 INPUT 不能有任何选项，含 SOURCE 时不能有任何其他选项
	// 如果名称为 OUTPUT 只能有 WIDTH 或 HEIGHT
	// 否则必需的选项: FORMAT
	// 可选的选项: WIDTH, HEIGHT

	EffectIntermediateTextureDesc& texDesc = desc.textures.emplace_back();

	std::bitset<4> processed;

	std::string_view token;

	if (!CheckNextToken<true>(block, META_INDICATOR)) {
		return 1;
	}

	if (!CheckNextToken<false>(block, "TEXTURE")) {
		return 1;
	}
	if (GetNextToken<false>(block, token) != 2) {
		return 1;
	}

	while (true) {
		if (!CheckNextToken<true>(block, META_INDICATOR)) {
			break;
		}

		if (GetNextToken<false>(block, token)) {
			return 1;
		}

		std::string t = StrHelper::ToUpperCase(token);

		if (t == "SOURCE") {
			if (processed[0] || processed[2] || processed[3]) {
				return 1;
			}
			processed[0] = true;

			if (GetNextString(block, token)) {
				return 1;
			}

			texDesc.source = token;
		} else if (t == "FORMAT") {
			if (processed[1]) {
				return 1;
			}
			processed[1] = true;

			if (GetNextString(block, token)) {
				return 1;
			}

			static auto formatMap = []() {
				phmap::flat_hash_map<std::string, EffectIntermediateTextureFormat> result;

				// UNKNOWN 不可用
				constexpr size_t descCount = std::size(EffectHelper::FORMAT_DESCS) - 1;
				result.reserve(descCount);
				for (size_t i = 0; i < descCount; ++i) {
					result.emplace(EffectHelper::FORMAT_DESCS[i].name, (EffectIntermediateTextureFormat)i);
				}
				return result;
			}();

			auto it = formatMap.find(std::string(token));
			if (it == formatMap.end()) {
				return 1;
			}

			texDesc.format = it->second;
		} else if (t == "WIDTH") {
			if (processed[0] || processed[2]) {
				return 1;
			}
			processed[2] = true;

			if (GetNextExpr(block, texDesc.sizeExpr.first)) {
				return 1;
			}
		} else if (t == "HEIGHT") {
			if (processed[0] || processed[3]) {
				return 1;
			}
			processed[3] = true;

			if (GetNextExpr(block, texDesc.sizeExpr.second)) {
				return 1;
			}
		} else {
			Logger::Get().Warn(StrHelper::Concat("解析纹理时遇到未知指令: ", t));
		}
	}

	// WIDTH 和 HEIGHT 必须成对出现
	if (processed[2] != processed[3]) {
		return 1;
	}

	// 代码部分
	if (!CheckNextToken<true>(block, "Texture2D")) {
		return 1;
	}

	if (GetNextToken<true>(block, token)) {
		return 1;
	}

	if (token == desc.textures[0].name) {
		if (processed.any()) {
			return 1;
		}

		// INPUT 已为第一个元素
		desc.textures.pop_back();
	} else if (token == desc.textures[1].name) {
		if (processed[0] || processed[1]) {
			return 1;
		}

		// OUTPUT 已为第二个元素
		desc.textures[1].sizeExpr = std::move(texDesc.sizeExpr);
		desc.textures.pop_back();
	} else {
		texDesc.name = token;
	}

	if (!CheckNextToken<true>(block, ";")) {
		return 1;
	}

	if (GetNextToken<true>(block, token) != 2) {
		return 1;
	}

	return 0;
}

static uint32_t ResolveSampler(std::string_view block, EffectDesc& desc) noexcept {
	// 必选项: FILTER
	// 可选项: ADDRESS

	EffectSamplerDesc& samDesc = desc.samplers.emplace_back();

	std::bitset<2> processed;

	std::string_view token;

	if (!CheckNextToken<true>(block, META_INDICATOR)) {
		return 1;
	}

	if (!CheckNextToken<false>(block, "SAMPLER")) {
		return 1;
	}
	if (GetNextToken<false>(block, token) != 2) {
		return 1;
	}

	while (true) {
		if (!CheckNextToken<true>(block, META_INDICATOR)) {
			break;
		}

		if (GetNextToken<false>(block, token)) {
			return 1;
		}

		std::string t = StrHelper::ToUpperCase(token);

		if (t == "FILTER") {
			if (processed[0]) {
				return 1;
			}
			processed[0] = true;

			if (GetNextString(block, token)) {
				return 1;
			}

			std::string filter = StrHelper::ToUpperCase(token);

			if (filter == "LINEAR") {
				samDesc.filterType = EffectSamplerFilterType::Linear;
			} else if (filter == "POINT") {
				samDesc.filterType = EffectSamplerFilterType::Point;
			} else {
				return 1;
			}
		} else if (t == "ADDRESS") {
			if (processed[1]) {
				return 1;
			}
			processed[1] = true;

			if (GetNextString(block, token)) {
				return 1;
			}

			std::string filter = StrHelper::ToUpperCase(token);

			if (filter == "CLAMP") {
				samDesc.addressType = EffectSamplerAddressType::Clamp;
			} else if (filter == "WRAP") {
				samDesc.addressType = EffectSamplerAddressType::Wrap;
			} else {
				return 1;
			}
		} else {
			Logger::Get().Warn(StrHelper::Concat("解析采样器时遇到未知指令: ", t));
		}
	}

	if (!processed[0]) {
		return 1;
	}

	// 代码部分
	if (!CheckNextToken<true>(block, "SamplerState")) {
		return 1;
	}

	if (GetNextToken<true>(block, token)) {
		return 1;
	}

	samDesc.name = token;

	if (!CheckNextToken<true>(block, ";")) {
		return 1;
	}

	if (GetNextToken<true>(block, token) != 2) {
		return 1;
	}

	return 0;
}

static uint32_t ResolveCommon(std::string_view& block) noexcept {
	// 无选项

	if (!CheckNextToken<true>(block, META_INDICATOR)) {
		return 1;
	}

	if (!CheckNextToken<false>(block, "COMMON")) {
		return 1;
	}

	if (CheckNextToken<true>(block, META_INDICATOR)) {
		return 1;
	}

	return 0;
}

static uint32_t ResolvePasses(SmallVector<std::string_view>& blocks, EffectDesc& desc) noexcept {
	// 必选项: IN, OUT
	// 可选项: BLOCK_SIZE, NUM_THREADS, STYLE, USE
	// STYLE 为 PS 时不能有 BLOCK_SIZE 或 NUM_THREADS

	std::string_view token;

	// 首先解析通道序号

	// first 为 Pass 序号，second 为在 blocks 中的位置
	SmallVector<std::pair<uint32_t, uint32_t>> passNumbers;
	passNumbers.reserve(blocks.size());

	for (uint32_t i = 0; i < blocks.size(); ++i) {
		std::string_view& block = blocks[i];

		if (!CheckNextToken<true>(block, META_INDICATOR)) {
			return 1;
		}

		if (!CheckNextToken<false>(block, "PASS")) {
			return 1;
		}

		uint32_t index;
		if (GetNextNumber(block, index)) {
			return 1;
		}
		if (GetNextToken<false>(block, token) != 2) {
			return 1;
		}

		passNumbers.emplace_back(index, i);
	}

	// 以通道序号排序
	std::sort(
		passNumbers.begin(),
		passNumbers.end(),
		[](const auto& l, const auto& r) { return l.first < r.first; }
	);

	{
		SmallVector<std::string_view> temp = blocks;
		for (uint32_t i = 0; i < blocks.size(); ++i) {
			if (passNumbers[i].first != i + 1) {
				// PASS 序号不连续
				return 1;
			}

			blocks[i] = temp[passNumbers[i].second];
		}
	}

	desc.passes.resize(blocks.size());

	for (uint32_t i = 0; i < blocks.size(); ++i) {
		std::string_view& block = blocks[i];
		auto& passDesc = desc.passes[i];

		// 用于检查输入和输出中重复的纹理
		phmap::flat_hash_map<std::string_view, uint32_t> texNames;
		texNames.reserve(desc.textures.size());
		for (uint32_t j = 0; j < desc.textures.size(); ++j) {
			texNames.emplace(desc.textures[j].name, j);
		}

		std::bitset<7> processed;

		while (true) {
			if (!CheckNextToken<true>(block, META_INDICATOR)) {
				break;
			}

			if (GetNextToken<false>(block, token)) {
				return 1;
			}

			std::string t = StrHelper::ToUpperCase(token);

			if (t == "IN") {
				if (processed[0]) {
					return 1;
				}
				processed[0] = true;

				std::string_view inputsStr;
				if (GetNextString(block, inputsStr)) {
					return 1;
				}

				for (std::string_view& input : StrHelper::Split(inputsStr, ',')) {
					StrHelper::Trim(input);

					auto it = texNames.find(input);
					if (it == texNames.end() || it->second == 1) {
						// 不支持 OUTPUT 作为输入
						return 1;
					}

					passDesc.inputs.push_back(it->second);
					texNames.erase(it);
				}
			} else if (t == "OUT") {
				if (processed[1]) {
					return 1;
				}
				processed[1] = true;

				std::string_view outputsStr;
				if (GetNextString(block, outputsStr)) {
					return 1;
				}

				if (i == blocks.size() - 1) {
					// 最后一个通道的输出只能是 OUTPUT
					if (outputsStr != desc.textures[1].name) {
						return 1;
					}

					passDesc.outputs.push_back(1);
				} else {
					SmallVector<std::string_view> outputs = StrHelper::Split(outputsStr, ',');
					if (outputs.size() > 8) {
						// 最多 8 个输出
						return 1;
					}

					for (std::string_view& output : outputs) {
						StrHelper::Trim(output);

						auto it = texNames.find(output);
						if (it == texNames.end()) {
							// 未找到纹理名称
							return 1;
						}

						if (it->second == 0 || !desc.textures[it->second].source.empty()) {
							// INPUT 和从文件读取的纹理不能作为输出
							return 1;
						}

						passDesc.outputs.push_back(it->second);
						texNames.erase(it);
					}
				}
			} else if (t == "BLOCK_SIZE") {
				if (processed[2]) {
					return 1;
				}
				processed[2] = true;

				std::string_view val;
				if (GetNextString(block, val)) {
					return 1;
				}

				SmallVector<std::string_view> split = StrHelper::Split(val, ',');
				if (split.size() > 2) {
					return 1;
				}

				uint32_t num;
				if (GetNextNumber(split[0], num) || num == 0) {
					return 1;
				}

				if (GetNextToken<false>(split[0], token) != 2) {
					return false;
				}

				passDesc.blockSize.first = num;

				// 如果只有一个数字，则它同时指定长和高
				if (split.size() == 2) {
					if (GetNextNumber(split[1], num) || num == 0) {
						return 1;
					}

					if (GetNextToken<false>(split[1], token) != 2) {
						return false;
					}
				}

				passDesc.blockSize.second = num;
			} else if (t == "NUM_THREADS") {
				if (processed[3]) {
					return 1;
				}
				processed[3] = true;

				std::string_view val;
				if (GetNextString(block, val)) {
					return 1;
				}

				SmallVector<std::string_view> split = StrHelper::Split(val, ',');
				if (split.size() > 3) {
					return 1;
				}

				for (uint32_t j = 0; j < 3; ++j) {
					uint32_t num = 1;
					if (split.size() > j) {
						if (GetNextNumber(split[j], num)) {
							return 1;
						}

						if (GetNextToken<false>(split[j], token) != 2) {
							return false;
						}
					}

					passDesc.numThreads[j] = num;
				}
			} else if (t == "STYLE") {
				if (processed[4]) {
					return 1;
				}
				processed[4] = true;

				std::string_view val;
				if (GetNextString(block, val)) {
					return 1;
				}

				if (val == "PS") {
					passDesc.flags |= EffectPassFlags::PSStyle;
					passDesc.blockSize.first = 16;
					passDesc.blockSize.second = 16;
					passDesc.numThreads = { 64,1,1 };
				} else if (val != "CS") {
					return 1;
				}
			} else if (t == "DESC") {
				if (processed[5]) {
					return 1;
				}
				processed[5] = true;

				std::string_view val;
				if (GetNextString(block, val)) {
					return 1;
				}

				StrHelper::Trim(val);
				passDesc.desc = val;
			} else {
				Logger::Get().Warn(fmt::format("解析通道 {} 时遇到未知指令: {}", i + 1, t));
			}
		}

		// 必须指定 IN 和 OUT
		if (!processed[0] || !processed[1]) {
			return 1;
		}

		if (passDesc.flags & EffectPassFlags::PSStyle) {
			if (processed[2] || processed[3]) {
				return 1;
			}
		} else {
			if (!processed[2] || !processed[3]) {
				return 1;
			}
		}

		if (passDesc.desc.empty()) {
			passDesc.desc = fmt::format("Pass {}", i + 1);
		}
	}

	return 0;
}

static uint32_t GeneratePassSource(
	const EffectDesc& desc,
	uint32_t passIdx,
	std::string_view cbHlsl,
	const SmallVector<std::string_view>& commonBlocks,
	std::string_view passBlock,
	std::string& result,
	std::vector<std::pair<std::string, std::string>>& macros
) noexcept {
	const EffectPassDesc& passDesc = desc.passes[(size_t)passIdx - 1];

	{
		// 估算需要的空间
		size_t reservedSize = 2048 + cbHlsl.size() + passBlock.size();
		for (std::string_view commonBlock : commonBlocks) {
			reservedSize += commonBlock.size();
		}

		result.reserve(reservedSize);
	}

	// 常量缓冲区
	result.append(cbHlsl);

	if (desc.flags & EffectFlags::UseDynamic) {
		result.append("cbuffer __CB2 : register(b1) { uint __frameCount; };\n\n");
	}

	////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	// SRV、UAV 和采样器
	// 
	////////////////////////////////////////////////////////////////////////////////////////////////////////

	// SRV
	for (int i = 0; i < passDesc.inputs.size(); ++i) {
		auto& texDesc = desc.textures[passDesc.inputs[i]];
		result.append(fmt::format("Texture2D<{}> {} : register(t{});\n", EffectHelper::FORMAT_DESCS[(uint32_t)texDesc.format].srvTexelType, texDesc.name, i));
	}

	// UAV
	for (int i = 0; i < passDesc.outputs.size(); ++i) {
		auto& texDesc = desc.textures[passDesc.outputs[i]];
		result.append(fmt::format("RWTexture2D<{}> {} : register(u{});\n", EffectHelper::FORMAT_DESCS[(uint32_t)texDesc.format].uavTexelType, texDesc.name, i));
	}


	if (!desc.samplers.empty()) {
		// 采样器
		for (int i = 0; i < desc.samplers.size(); ++i) {
			result.append(fmt::format("SamplerState {} : register(s{});\n", desc.samplers[i].name, i));
		}
	}

	result.push_back('\n');

	////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	// 内置宏
	// 
	////////////////////////////////////////////////////////////////////////////////////////////////////////
	macros.reserve(64);
	macros.emplace_back("MP_BLOCK_WIDTH", std::to_string(passDesc.blockSize.first));
	macros.emplace_back("MP_BLOCK_HEIGHT", std::to_string(passDesc.blockSize.second));
	macros.emplace_back("MP_NUM_THREADS_X", std::to_string(passDesc.numThreads[0]));
	macros.emplace_back("MP_NUM_THREADS_Y", std::to_string(passDesc.numThreads[1]));
	macros.emplace_back("MP_NUM_THREADS_Z", std::to_string(passDesc.numThreads[2]));

	if (passDesc.flags & EffectPassFlags::PSStyle) {
		macros.emplace_back("MP_PS_STYLE", "");
	}

	if (desc.flags & EffectFlags::InlineParams) {
		macros.emplace_back("MP_INLINE_PARAMS", "");
	}

#ifdef _DEBUG
	macros.emplace_back("MP_DEBUG", "");
#endif

	// 用于在 FP32 和 FP16 间切换的宏
	static const char* numbers[] = { "1","2","3","4" };
	if (desc.flags & EffectFlags::FP16) {
		macros.emplace_back("MP_FP16", "");
		macros.emplace_back("MF", "min16float");

		for (uint32_t i = 0; i < 4; ++i) {
			macros.emplace_back(StrHelper::Concat("MF", numbers[i]), StrHelper::Concat("min16float", numbers[i]));

			for (uint32_t j = 0; j < 4; ++j) {
				macros.emplace_back(StrHelper::Concat("MF", numbers[i], "x", numbers[j]), StrHelper::Concat("min16float", numbers[i], "x", numbers[j]));
			}
		}
	} else {
		macros.emplace_back("MF", "float");

		for (uint32_t i = 0; i < 4; ++i) {
			macros.emplace_back(StrHelper::Concat("MF", numbers[i]), StrHelper::Concat("float", numbers[i]));

			for (uint32_t j = 0; j < 4; ++j) {
				macros.emplace_back(StrHelper::Concat("MF", numbers[i], "x", numbers[j]), StrHelper::Concat("float", numbers[i], "x", numbers[j]));
			}
		}
	}

	////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	// 内置函数
	// 
	////////////////////////////////////////////////////////////////////////////////////////////////////////
	result.append(R"(uint __Bfe(uint src, uint off, uint bits) { uint mask = (1u << bits) - 1; return (src >> off) & mask; }
uint __BfiM(uint src, uint ins, uint bits) { uint mask = (1u << bits) - 1; return (ins & mask) | (src & (~mask)); }
uint2 Rmp8x8(uint a) { return uint2(__Bfe(a, 1u, 3u), __BfiM(__Bfe(a, 3u, 3u), a, 1u)); }
uint2 GetInputSize() { return __inputSize; }
float2 GetInputPt() { return __inputPt; }
uint2 GetOutputSize() { return __outputSize; }
float2 GetOutputPt() { return __outputPt; }
float2 GetScale() { return __scale; }
)");

	if (desc.flags & EffectFlags::UseMulAdd) {
		// 使用 mad 而不是 mul，经测试这可以大幅提高性能，且和 FP16 的兼容性更好。
		// 见 GH#1049
		// result.append(R"(MF2 MulAdd(MF2 x, MF2x2 y, MF2 a) { return mul(x, y) + a; }
		// MF3 MulAdd(MF2 x, MF2x3 y, MF3 a) { return mul(x, y) + a; }
		// MF4 MulAdd(MF2 x, MF2x4 y, MF4 a) { return mul(x, y) + a; }
		// MF2 MulAdd(MF3 x, MF3x2 y, MF2 a) { return mul(x, y) + a; }
		// MF3 MulAdd(MF3 x, MF3x3 y, MF3 a) { return mul(x, y) + a; }
		// MF4 MulAdd(MF3 x, MF3x4 y, MF4 a) { return mul(x, y) + a; }
		// MF2 MulAdd(MF4 x, MF4x2 y, MF2 a) { return mul(x, y) + a; }
		// MF3 MulAdd(MF4 x, MF4x3 y, MF3 a) { return mul(x, y) + a; }
		// MF4 MulAdd(MF4 x, MF4x4 y, MF4 a) { return mul(x, y) + a; }
		// )");
		result.append(R"(MF2 MulAdd(MF2 x, MF2x2 y, MF2 a) {
	MF2 result = a;
	result = mad(x.x, y._m00_m01, result);
	result = mad(x.y, y._m10_m11, result);
	return result;
}
MF3 MulAdd(MF2 x, MF2x3 y, MF3 a) {
	MF3 result = a;
	result = mad(x.x, y._m00_m01_m02, result);
	result = mad(x.y, y._m10_m11_m12, result);
	return result;
}
MF4 MulAdd(MF2 x, MF2x4 y, MF4 a) {
	MF4 result = a;
	result = mad(x.x, y._m00_m01_m02_m03, result);
	result = mad(x.y, y._m10_m11_m12_m13, result);
	return result;
}
MF2 MulAdd(MF3 x, MF3x2 y, MF2 a) {
	MF2 result = a;
	result = mad(x.x, y._m00_m01, result);
	result = mad(x.y, y._m10_m11, result);
	result = mad(x.z, y._m20_m21, result);
	return result;
}
MF3 MulAdd(MF3 x, MF3x3 y, MF3 a) {
	MF3 result = a;
	result = mad(x.x, y._m00_m01_m02, result);
	result = mad(x.y, y._m10_m11_m12, result);
	result = mad(x.z, y._m20_m21_m22, result);
	return result;
}
MF4 MulAdd(MF3 x, MF3x4 y, MF4 a) {
	MF4 result = a;
	result = mad(x.x, y._m00_m01_m02_m03, result);
	result = mad(x.y, y._m10_m11_m12_m13, result);
	result = mad(x.z, y._m20_m21_m22_m23, result);
	return result;
}
MF2 MulAdd(MF4 x, MF4x2 y, MF2 a) {
	MF2 result = a;
	result = mad(x.x, y._m00_m01, result);
	result = mad(x.y, y._m10_m11, result);
	result = mad(x.z, y._m20_m21, result);
	result = mad(x.w, y._m30_m31, result);
	return result;
}
MF3 MulAdd(MF4 x, MF4x3 y, MF3 a) {
	MF3 result = a;
	result = mad(x.x, y._m00_m01_m02, result);
	result = mad(x.y, y._m10_m11_m12, result);
	result = mad(x.z, y._m20_m21_m22, result);
	result = mad(x.w, y._m30_m31_m32, result);
	return result;
}
MF4 MulAdd(MF4 x, MF4x4 y, MF4 a) {
	MF4 result = a;
	result = mad(x.x, y._m00_m01_m02_m03, result);
	result = mad(x.y, y._m10_m11_m12_m13, result);
	result = mad(x.z, y._m20_m21_m22_m23, result);
	result = mad(x.w, y._m30_m31_m32_m33, result);
	return result;
}
)");
	}

	result.push_back('\n');

	for (std::string_view commonBlock : commonBlocks) {
		result.append(commonBlock);
		result.push_back('\n');
	}

	result.append(passBlock);
	if (result.back() == '\n') {
		result.push_back('\n');
	} else {
		result.append("\n\n");
	}

	////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	// 着色器入口
	// 
	////////////////////////////////////////////////////////////////////////////////////////////////////////
	if (passDesc.flags & EffectPassFlags::PSStyle) {
		if (passDesc.outputs.size() <= 1) {
			std::string outputSize;
			std::string outputPt;
			if (passIdx == desc.passes.size()) {
				// 最后一个通道
				outputSize = "__outputSize";
				outputPt = "__outputPt";
			} else {
				outputSize = fmt::format("__pass{}OutputSize", passIdx);
				outputPt = fmt::format("__pass{}OutputPt", passIdx);
			}

			result.append(fmt::format(R"([numthreads(64, 1, 1)]
void __M(uint3 tid : SV_GroupThreadID, uint3 gid : SV_GroupID) {{
	uint2 gxy = (gid.xy << 4u) + Rmp8x8(tid.x);
	if (gxy.x >= {1}.x || gxy.y >= {1}.y) {{
		return;
	}}
	float2 pos = (gxy + 0.5f) * {2};
	float2 step = 8 * {2};

	{3}[gxy] = Pass{0}(pos);

	gxy.x += 8u;
	pos.x += step.x;
	if (gxy.x < {1}.x && gxy.y < {1}.y) {{
		{3}[gxy] = Pass{0}(pos);
	}}
	
	gxy.y += 8u;
	pos.y += step.y;
	if (gxy.x < {1}.x && gxy.y < {1}.y) {{
		{3}[gxy] = Pass{0}(pos);
	}}
	
	gxy.x -= 8u;
	pos.x -= step.x;
	if (gxy.x < {1}.x && gxy.y < {1}.y) {{
		{3}[gxy] = Pass{0}(pos);
	}}
}}
)", passIdx, outputSize, outputPt, desc.textures[passDesc.outputs[0]].name));
		} else {
			// 多渲染目标
			result.append(fmt::format(R"([numthreads(64, 1, 1)]
void __M(uint3 tid : SV_GroupThreadID, uint3 gid : SV_GroupID) {{
	uint2 gxy = (gid.xy << 4u) + Rmp8x8(tid.x);
	if (gxy.x >= __pass{0}OutputSize.x || gxy.y >= __pass{0}OutputSize.y) {{
		return;
	}}
	float2 pos = (gxy + 0.5f) * __pass{0}OutputPt;
	float2 step = 8 * __pass{0}OutputPt;
)", passIdx));
			for (int i = 0; i < passDesc.outputs.size(); ++i) {
				auto& texDesc = desc.textures[passDesc.outputs[i]];
				result.append(fmt::format("\t{} c{};\n",
					EffectHelper::FORMAT_DESCS[(uint32_t)texDesc.format].srvTexelType, i));
			}

			std::string callPass = fmt::format("\tPass{}(pos, ", passIdx);

			for (int i = 0; i < passDesc.outputs.size() - 1; ++i) {
				callPass.append(fmt::format("c{}, ", i));
			}
			callPass.append(fmt::format("c{});\n", passDesc.outputs.size() - 1));
			for (int i = 0; i < passDesc.outputs.size(); ++i) {
				callPass.append(fmt::format("\t\t\t{}[gxy] = c{};\n", desc.textures[passDesc.outputs[i]].name, i));
			}

			result.append(fmt::format(R"({0}
	gxy.x += 8u;
	pos.x += step.x;
	if (gxy.x < __pass{1}OutputSize.x && gxy.y < __pass{1}OutputSize.y) {{
		{0}
	}}
	
	gxy.y += 8u;
	pos.y += step.y;
	if (gxy.x < __pass{1}OutputSize.x && gxy.y < __pass{1}OutputSize.y) {{
		{0}
	}}
	
	gxy.x -= 8u;
	pos.x -= step.x;
	if (gxy.x < __pass{1}OutputSize.x && gxy.y < __pass{1}OutputSize.y) {{
		{0}
	}}
}}
)", callPass, passIdx));
		}
	} else {
		// 大部分情况下 BLOCK_SIZE 都是 2 的整数次幂，这时将乘法转换为位移
		std::string blockStartExpr;
		if (passDesc.blockSize.first == passDesc.blockSize.second && std::has_single_bit(passDesc.blockSize.first)) {
			uint32_t nShift = std::lroundf(std::log2f((float)passDesc.blockSize.first));
			blockStartExpr = fmt::format("(gid.xy << {})", nShift);
		} else {
			blockStartExpr = fmt::format("gid.xy * uint2({}, {})", passDesc.blockSize.first, passDesc.blockSize.second);
		}

		result.append(fmt::format(R"([numthreads({}, {}, {})]
void __M(uint3 tid : SV_GroupThreadID, uint3 gid : SV_GroupID) {{
	Pass{}({}, tid);
}}
)", passDesc.numThreads[0], passDesc.numThreads[1], passDesc.numThreads[2], passIdx, blockStartExpr));
	}

	return 0;
}

static uint32_t CompilePasses(
	EffectDesc& desc,
	uint32_t flags,
	const SmallVector<std::string_view>& commonBlocks,
	const SmallVector<std::string_view>& passBlocks,
	const phmap::flat_hash_map<std::wstring, float>* inlineParams
) noexcept {
	////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	// 所有通道共用的常量缓冲区
	// 
	////////////////////////////////////////////////////////////////////////////////////////////////////////

	std::string cbHlsl = R"(cbuffer __CB1 : register(b0) {
	uint2 __inputSize;
	uint2 __outputSize;
	float2 __inputPt;
	float2 __outputPt;
	float2 __scale;
)";

	// PS 样式需要获知输出纹理的尺寸
	// 最后一个通道不需要
	for (uint32_t i = 0, end = (uint32_t)desc.passes.size() - 1; i < end; ++i) {
		if (desc.passes[i].flags & EffectPassFlags::PSStyle) {
			cbHlsl.append(fmt::format("\tuint2 __pass{0}OutputSize;\n\tfloat2 __pass{0}OutputPt;\n", i + 1));
		}
	}

	if (!(desc.flags & EffectFlags::InlineParams)) {
		for (const auto& d : desc.params) {
			cbHlsl.append("\t")
				.append(d.constant.index() == 0 ? "float " : "int ")
				.append(d.name)
				.append(";\n");
		}
	}

	cbHlsl.append("};\n\n");

	if (desc.flags & EffectFlags::InlineParams) {
		phmap::flat_hash_set<std::wstring> paramNames;
		for (const auto& d : desc.params) {
			cbHlsl.append("static const ")
				.append(d.constant.index() == 0 ? "float " : "int ")
				.append(d.name)
				.append(" = ");

			const std::wstring& name = *paramNames.emplace(StrHelper::UTF8ToUTF16(d.name)).first;

			auto it = inlineParams->find(name);
			if (it == inlineParams->end()) {
				if (d.constant.index() == 0) {
					cbHlsl.append(std::to_string(std::get<0>(d.constant).defaultValue)).append("f");
				} else {
					cbHlsl.append(std::to_string(std::get<1>(d.constant).defaultValue));
				}
			} else {
				if (d.constant.index() == 0) {
					cbHlsl.append(std::to_string(it->second)).append("f");
				} else {
					cbHlsl.append(std::to_string((int)std::lroundf(it->second)));
				}
			}

			cbHlsl.append(";\n");
		}

		// 检查 inlineParams 是否存在非法参数
		for (const auto& pair : *inlineParams) {
			if (!paramNames.contains(pair.first)) {
				return 1;
			}
		}

		cbHlsl.append("\n");
	}

	std::wstring sourcesPathName = StrHelper::Concat(CommonSharedConstants::SOURCES_DIR, StrHelper::UTF8ToUTF16(desc.name));
	std::wstring sourcesPath = sourcesPathName.substr(0, sourcesPathName.find_last_of(L'\\'));

	if ((flags & EffectCompilerFlags::SaveSources) && !Win32Helper::DirExists(sourcesPath.c_str())) {
		if (!Win32Helper::CreateDir(sourcesPath, true)) {
			Logger::Get().Win32Error("创建 sources 文件夹失败");
		}
	}

	size_t delimPos = desc.name.find_last_of('\\');
	PassInclude passInclude(delimPos == std::string::npos 
		? L"effects\\"
		: L"effects\\" + StrHelper::UTF8ToUTF16(std::string_view(desc.name.c_str(), delimPos + 1)));

	// 并行生成代码和编译
	Win32Helper::RunParallel([&](uint32_t id) {
		std::string source;
		std::vector<std::pair<std::string, std::string>> macros;
		if (GeneratePassSource(desc, id + 1, cbHlsl, commonBlocks, passBlocks[id], source, macros)) {
			Logger::Get().Error(fmt::format("生成 Pass{} 失败", id + 1));
			return;
		}

		if (flags & EffectCompilerFlags::SaveSources) {
			std::wstring fileName = desc.passes.size() == 1
				? StrHelper::Concat(sourcesPathName, L".hlsl")
				: fmt::format(L"{}_Pass{}.hlsl", sourcesPathName, id + 1);

			if (!Win32Helper::WriteFile(fileName.c_str(), source.data(), source.size())) {
				Logger::Get().Error(fmt::format("保存 Pass{} 源码失败", id + 1));
			}
		}

		if (!DirectXHelper::CompileComputeShader(source, "__M", desc.passes[id].cso.put(),
			fmt::format("{}_Pass{}.hlsl", desc.name, id + 1).c_str(), &passInclude, macros, flags & EffectCompilerFlags::WarningsAreErrors)
		) {
			Logger::Get().Error(fmt::format("编译 Pass{} 失败", id + 1));
		}
	}, (uint32_t)passBlocks.size());

	// 检查编译结果
	for (const EffectPassDesc& d : desc.passes) {
		if (!d.cso) {
			return 1;
		}
	}

	return 0;
}

static std::string ReadEffectSource(const std::wstring& effectName) noexcept {
	std::wstring fileName = StrHelper::Concat(CommonSharedConstants::EFFECTS_DIR, effectName, L".hlsl");

	std::string source;
	if (!Win32Helper::ReadTextFile(fileName.c_str(), source)) {
		Logger::Get().Error("读取源文件失败");
		return {};
	}
	return source;
}

uint32_t EffectCompiler::Compile(
	EffectDesc& desc,
	uint32_t flags,
	const phmap::flat_hash_map<std::wstring, float>* inlineParams
) noexcept {
	bool noCompile = flags & EffectCompilerFlags::NoCompile;
	bool noCache = noCompile || (flags & EffectCompilerFlags::NoCache);

	if (flags & EffectCompilerFlags::InlineParams) {
		desc.flags |= EffectFlags::InlineParams;
	}

	std::wstring effectName = StrHelper::UTF8ToUTF16(desc.name);
	std::string source = ReadEffectSource(effectName);

	if (source.empty()) {
		Logger::Get().Error("源文件为空");
		return 1;
	}

	// 移除注释
	if (RemoveComments(source)) {
		Logger::Get().Error("删除注释失败");
		return 1;
	}

	std::string cacheKey;
	uint64_t cacheHash = 0;
	if (!noCache) {
		// 以下因素决定编译输出：
		// 1. 源码
		// 2. 标志
		// 3. 内联变量
		// 标志不同将保存到不同的缓存文件里，因此不需要哈希。
		cacheKey.reserve(source.size() + 256);
		cacheKey.append(source);

		if (flags & EffectCompilerFlags::InlineParams) {
			for (const auto& pair : *inlineParams) {
				cacheKey.append(fmt::format("{}={}\n", StrHelper::UTF16ToUTF8(pair.first), std::lroundf(pair.second * 10000)));
			}
		}

		cacheHash = EffectCacheManager::GetHash(cacheKey);
		// flags 中只有低 16 位的标志会影响编译出的字节码
		if (EffectCacheManager::Get().Load(effectName, flags & 0xFFFF, cacheHash, cacheKey, desc)) {
			// 已从缓存中读取
			return 0;
		}
	}

	std::string_view sourceView(source);

	// 检查头
	if (!CheckMagic(sourceView)) {
		Logger::Get().Error("检查 MagpieFX 头失败");
		return 2;
	}

	enum class BlockType {
		Header,
		Parameter,
		Texture,
		Sampler,
		Common,
		Pass
	};

	std::string_view headerBlock;
	SmallVector<std::string_view> paramBlocks;
	SmallVector<std::string_view> textureBlocks;
	SmallVector<std::string_view> samplerBlocks;
	SmallVector<std::string_view> commonBlocks;
	SmallVector<std::string_view> passBlocks;

	BlockType curBlockType = BlockType::Header;
	size_t curBlockOff = 0;

	auto completeCurrentBlock = [&](size_t len, BlockType newBlockType) {
		switch (curBlockType) {
		case BlockType::Header:
			headerBlock = sourceView.substr(curBlockOff, len);
			break;
		case BlockType::Parameter:
			paramBlocks.push_back(sourceView.substr(curBlockOff, len));
			break;
		case BlockType::Texture:
			textureBlocks.push_back(sourceView.substr(curBlockOff, len));
			break;
		case BlockType::Sampler:
			samplerBlocks.push_back(sourceView.substr(curBlockOff, len));
			break;
		case BlockType::Common:
			commonBlocks.push_back(sourceView.substr(curBlockOff, len));
			break;
		case BlockType::Pass:
			passBlocks.push_back(sourceView.substr(curBlockOff, len));
			break;
		default:
			assert(false);
			break;
		}

		curBlockType = newBlockType;
		curBlockOff += len;
	};

	bool newLine = true;
	std::string_view t = sourceView;
	while (t.size() > 5) {
		if (newLine) {
			// 包含换行符
			size_t len = t.data() - sourceView.data() - curBlockOff + 1;

			if (CheckNextToken<true>(t, META_INDICATOR)) {
				std::string_view token;
				if (GetNextToken<false>(t, token)) {
					return 1;
				}
				std::string blockType = StrHelper::ToUpperCase(token);

				if (blockType == "PARAMETER") {
					completeCurrentBlock(len, BlockType::Parameter);
				} else if (blockType == "TEXTURE") {
					completeCurrentBlock(len, BlockType::Texture);
				} else if (blockType == "SAMPLER") {
					completeCurrentBlock(len, BlockType::Sampler);
				} else if (blockType == "COMMON") {
					completeCurrentBlock(len, BlockType::Common);
				} else if (blockType == "PASS") {
					completeCurrentBlock(len, BlockType::Pass);
				}
			}

			if (t.size() <= 5) {
				break;
			}
		} else {
			t.remove_prefix(1);
		}

		newLine = t[0] == '\n';
	}

	completeCurrentBlock(sourceView.size() - curBlockOff, BlockType::Header);

	// 必须有 PASS 块
	if (!noCompile && passBlocks.empty()) {
		Logger::Get().Error("无 PASS 块");
		return 1;
	}

	if (ResolveHeader(headerBlock, desc, desc.flags, noCompile, flags & EffectCompilerFlags::NoFP16)) {
		Logger::Get().Error("解析 Header 块失败");
		return 1;
	}

	desc.params.clear();
	for (size_t i = 0; i < paramBlocks.size(); ++i) {
		if (ResolveParameter(paramBlocks[i], desc)) {
			Logger::Get().Error(fmt::format("解析 Parameter#{} 块失败", i + 1));
			return 1;
		}
	}

	desc.textures.clear();
	// 第一个元素为 INPUT
	{
		auto& inputDesc = desc.textures.emplace_back();
		inputDesc.name = "INPUT";
		inputDesc.format = EffectIntermediateTextureFormat::R8G8B8A8_UNORM;
		inputDesc.sizeExpr.first = "INPUT_WIDTH";
		inputDesc.sizeExpr.second = "INPUT_HEIGHT";
	}
	// 第二个元素为 OUTPUT
	{
		auto& outputDesc = desc.textures.emplace_back();
		outputDesc.name = "OUTPUT";
		outputDesc.format = EffectIntermediateTextureFormat::R8G8B8A8_UNORM;
	}

	for (size_t i = 0; i < textureBlocks.size(); ++i) {
		if (ResolveTexture(textureBlocks[i], desc)) {
			Logger::Get().Error(fmt::format("解析 Texture#{} 块失败", i + 1));
			return 1;
		}
	}

	if (!noCompile) {
		desc.samplers.clear();
		for (size_t i = 0; i < samplerBlocks.size(); ++i) {
			if (ResolveSampler(samplerBlocks[i], desc)) {
				Logger::Get().Error(fmt::format("解析 Sampler#{} 块失败", i + 1));
				return 1;
			}
		}
	}

	{
		// 确保没有重复的名字
		phmap::flat_hash_set<std::string> names;
		for (const auto& d : desc.params) {
			if (names.find(d.name) != names.end()) {
				Logger::Get().Error("标识符重复");
				return 1;
			}
			names.insert(d.name);
		}
		for (const auto& d : desc.textures) {
			if (names.find(d.name) != names.end()) {
				Logger::Get().Error("标识符重复");
				return 1;
			}
			names.insert(d.name);
		}
		for (const auto& d : desc.samplers) {
			if (names.find(d.name) != names.end()) {
				Logger::Get().Error("标识符重复");
				return 1;
			}
			names.insert(d.name);
		}
	}

	if (!noCompile) {
		for (size_t i = 0; i < commonBlocks.size(); ++i) {
			if (ResolveCommon(commonBlocks[i])) {
				Logger::Get().Error(fmt::format("解析 Common#{} 块失败", i + 1));
				return 1;
			}
		}

		desc.passes.clear();
		if (ResolvePasses(passBlocks, desc)) {
			Logger::Get().Error("解析 Pass 块失败");
			return 1;
		}

		if (CompilePasses(desc, flags, commonBlocks, passBlocks, inlineParams)) {
			Logger::Get().Error("编译着色器失败");
			return 1;
		}

		if (!noCache) {
			EffectCacheManager::Get().Save(effectName, flags & 0xFFFF, cacheHash, std::move(cacheKey), desc);
		}
	}

	return 0;
}

}