From 6e90bceab4a3a6e4b9d4496b810324867d533ce1 Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@sunet.se>
Date: Mon, 24 Jun 2019 16:02:40 +0200
Subject: include unix pid in socket name

---
 p11p-daemon/src/p11p_server_sup.erl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'p11p-daemon/src')

diff --git a/p11p-daemon/src/p11p_server_sup.erl b/p11p-daemon/src/p11p_server_sup.erl
index 15398bc..924123b 100644
--- a/p11p-daemon/src/p11p_server_sup.erl
+++ b/p11p-daemon/src/p11p_server_sup.erl
@@ -26,7 +26,9 @@ start_server() ->
 
 %% Private functions.
 mkdir_socket_basepath() ->
-    Path = "/run/user/1000/p11p",
+    %%"/run/user/$UNIXUID/p11p/$TokenCfg-$UNIXPID"
+    EUID = "1000",				% FIXME: get euid
+    Path = "/run/user/" ++ EUID ++ "/p11p/",
     ok = case file:make_dir(Path) of
 	     ok -> ok;
 	     {error, eexist} -> ok;
@@ -38,5 +40,4 @@ mkdir_socket_basepath() ->
 
 -spec socket_path(string(), string()) -> string().
 socket_path(BasePath, Name) ->
-    %%"/run/user/$UID/p11p/$TokenCfg-$UNIXPID"
-    BasePath ++ "/" ++ Name.
+    BasePath ++ Name ++ "-" ++ os:getpid().    % FIXME: filename(3erl)
-- 
cgit v1.1