1 files changed, 98 insertions, 0 deletions
diff --git a/dev/Kernel/Sources/URL.cxx b/dev/Kernel/Sources/URL.cxx
new file mode 100644
index 00000000..189aba8e
--- /dev/null
+++ b/dev/Kernel/Sources/URL.cxx
@@ -0,0 +1,98 @@
+/* -------------------------------------------
+
+	Copyright ZKA Technologies.
+
+------------------------------------------- */
+
+#include <CFKit/URL.hxx>
+#include <KernelKit/DebugOutput.hxx>
+#include <NewKit/Utils.hxx>
+
+/// BUGS: 0
+
+namespace Kernel
+{
+	URL::URL(StringView& strUrl)
+		: fUrlView(strUrl, false)
+	{
+	}
+
+	URL::~URL() = default;
+
+	/// @brief internal and reserved protocols by kernel.
+	constexpr const Char* kURLProtocols[] = {
+		"file", // Filesystem protocol
+		"zup",	// ZKA update protocol
+		"oscc", // Open System Configuration Connectivity.
+		"odbc", // ODBC connectivity.
+		"https", // HTTPS layer driver (HTTPS.sys). 
+	};
+
+	constexpr const int kUrlOutSz	 = 1; //! such as: ://
+	constexpr const int kProtosCount = 5;
+	constexpr const int kRangeSz	 = 4096;
+
+	ErrorOr<StringView> url_extract_location(const Char* url)
+	{
+		if (!url || *url == 0 || rt_string_len(url, kRangeSz) > kRangeSz)
+			return ErrorOr<StringView>{-1};
+
+		StringView view(rt_string_len(url));
+
+		SizeT i			   = 0;
+		bool  scheme_found = false;
+
+		for (; i < rt_string_len(url); ++i)
+		{
+			if (!scheme_found)
+			{
+				for (int y = 0; kProtosCount; ++y)
+				{
+					if (rt_string_in_string(view.CData(), kURLProtocols[y]))
+					{
+						i += rt_string_len(kURLProtocols[y]) + kUrlOutSz;
+						scheme_found = true;
+
+						break;
+					}
+				}
+			}
+
+			view.Data()[i] = url[i];
+		}
+
+		return ErrorOr<StringView>(view);
+	}
+
+	ErrorOr<StringView> url_extract_protocol(const Char* url)
+	{
+		if (!url || *url == 0 || rt_string_len(url, kRangeSz) > kRangeSz)
+			return ErrorOr<StringView>{-1};
+
+		ErrorOr<StringView> view{-1};
+
+		return view;
+	}
+
+	Ref<ErrorOr<StringView>> URL::Location() noexcept
+	{
+		const Char* src = fUrlView.Leak().CData();
+		auto		loc = url_extract_location(src);
+
+		if (!loc)
+			return {};
+
+		return Ref<ErrorOr<StringView>>(loc);
+	}
+
+	Ref<ErrorOr<StringView>> URL::Protocol() noexcept
+	{
+		const Char* src = fUrlView.Leak().CData();
+		auto		loc = url_extract_protocol(src);
+
+		if (!loc)
+			return {};
+
+		return Ref<ErrorOr<StringView>>(loc);
+	}
+} // namespace Kernel