1 files changed, 42 insertions, 0 deletions
diff --git a/shardweb/lib/shard_uri.ex b/shardweb/lib/shard_uri.ex
new file mode 100644
index 0000000..71c0904
--- /dev/null
+++ b/shardweb/lib/shard_uri.ex
@@ -0,0 +1,42 @@
+defmodule ShardURI do
+  @moduledoc"""
+  Convert Shard manifests to and from strings.
+  """
+
+  def from_manifest(m) do
+    case m do
+      %SApp.Chat.Manifest{channel: chan} -> "shard:chat:#{chan}"
+      %SApp.Chat.PrivChat.Manifest{pk_list: pk_list} ->
+        "shard:privchat:#{pk_list|>Enum.map(&Base.encode16/1)|>Enum.join(",")}"
+      %SApp.Identity.Manifest{pk: pk} ->
+        "shard:identity:#{pk|>Base.encode16}"
+      %SApp.Directory.Manifest{owner: owner, public: true, name: name} ->
+        "shard:dir:pub:#{owner|>Base.encode16}:#{name}"
+      %SApp.Directory.Manifest{owner: owner, public: false, name: name} ->
+        "shard:dir:priv:#{owner|>Base.encode16}:#{name}"
+    end
+  end
+
+  def to_manifest(p) do
+    case p do
+      "shard:chat:" <> chan ->
+        %SApp.Chat.Manifest{channel: chan}
+      "shard:privchat:" <> pklist ->
+        pklist
+        |> String.split(",")
+        |> Enum.map(&parse_pk/1)
+        |> SApp.Chat.PrivChat.Manifest.new()
+      "shard:identity:" <> pk ->
+        %SApp.Identity.Manifest{pk: parse_pk pk}
+      "shard:dir:pub:" <> <<pk::bytes-size(64)>> <> ":" <> name ->
+        %SApp.Directory.Manifest{owner: parse_pk(pk), public: true, name: name}
+      "shard:dir:priv:" <> <<pk::bytes-size(64)>> <> ":" <> name ->
+        %SApp.Directory.Manifest{owner: parse_pk(pk), public: false, name: name}
+    end
+  end
+
+  def parse_pk(pkstr) do
+    64 = byte_size pkstr
+    Base.decode16! pkstr
+  end
+end