Function ResolveIncludePath

source/common/scripting/frontend/zcc_parser.cpp:48–95

TArray<FScriptPosition> IncludeLocs;

static FString ResolveIncludePath(const FString &path,const FString &lumpname){
	if (path.IndexOf("./") == 0 || path.IndexOf("../") == 0) // relative path resolving
	{
		auto start = lumpname.LastIndexOf(":"); // find find separator between wad and path

		auto end = lumpname.LastIndexOf("/"); // find last '/'

		// it's a top-level file, if it's a folder being loaded ( /xxx/yyy/:whatever.zs ) end is before than start, or if it's a zip ( xxx.zip:whatever.zs ) end would be -1
		bool topLevelFile = start > end ;

		FString fullPath = topLevelFile ? FString {} : lumpname.Mid(start + 1, end - start - 1); // get path from lumpname (format 'wad:filepath/filename')

		if (start != -1)
		{
			FString relativePath = path;
			if (relativePath.IndexOf("./") == 0) // strip initial marker
			{
				relativePath = relativePath.Mid(2);
			}

			bool pathOk = true;

			while (relativePath.IndexOf("../") == 0) // go back one folder for each '..'
			{
				relativePath = relativePath.Mid(3);
				auto slash_index = fullPath.LastIndexOf("/");
				if (slash_index != -1)
				{
					fullPath = fullPath.Mid(0, slash_index);
				}
				else if (fullPath.IsNotEmpty())
				{
					fullPath = "";
				}
				else
				{
					pathOk = false;
					break;
				}
			}
			if (pathOk) // if '..' parsing was successful
			{
				return topLevelFile ? relativePath : fullPath + "/" + relativePath;
			}
		}
	}
	return path;
}

static FString ZCCTokenName(int terminal);
void AddInclude(ZCC_ExprConstant *node)