From be9b7bfe5552e3553474c7ac9f157337a323464a Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Thu, 15 Apr 2021 19:45:39 +0200
Subject: [PATCH] Limit number of atoms used by ejabberdctl ( #2977)

Cherry-picked from ejabberd upstream 20.03-21-g762486d19
and 20.03-22-geac7e3488
---
 ecs/bin/ejabberdctl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ecs/bin/ejabberdctl b/ecs/bin/ejabberdctl
index 1537679..e4fada7 100755
--- a/ecs/bin/ejabberdctl
+++ b/ecs/bin/ejabberdctl
@@ -218,7 +218,7 @@ uid()
     uuid=$(uuidgen 2>/dev/null)
     [ -z "$uuid" ] && [ -f /proc/sys/kernel/random/uuid ] && uuid=$(cat /proc/sys/kernel/random/uuid)
     [ -z "$uuid" ] && uuid=$(printf "%X" "${RANDOM:-$$}$(date +%M%S)")
-    uuid=${uuid%%-*}
+    uuid=$(printf '%s' $uuid | sed 's/^\(...\).*$/\1/')
     [ $# -eq 0 ] && echo "${uuid}-${ERLANG_NODE}"
     [ $# -eq 1 ] && echo "${uuid}-${1}-${ERLANG_NODE}"
     [ $# -eq 2 ] && echo "${uuid}-${1}@${2}"