From c76bf206375417d6dba0b11987dbe400ffb5c5ca Mon Sep 17 00:00:00 2001
From: Thomas Preud'homme <robotux@celest.fr>
Date: Sun, 9 Mar 2014 18:25:20 +0800
Subject: [PATCH] [ssl_mgmt] Alert user if no overwrite occur

---
 ssl_mgmt/ssl_mgmt | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/ssl_mgmt/ssl_mgmt b/ssl_mgmt/ssl_mgmt
index 42496dd..263cfb3 100755
--- a/ssl_mgmt/ssl_mgmt
+++ b/ssl_mgmt/ssl_mgmt
@@ -220,9 +220,21 @@ generate_cert ()
 		return 1
 	fi
 	getfacl "$keyPath" | setfacl --set-file=- newkeys/$keyFile
+	if [ ! -f "private/$keyFile" ]
+	then
+		echo -n "Error! No file named $keyFile in directory" >&2
+		echo " $(readlink -f private):" >&2
+		echo "there might be a problem" >&2
+	fi
 	mv newkeys/$keyFile private
 	openssl ca -batch -out newcerts/$certFile -config $confFile -passin file:/root/passwords/root_ca -infiles csr/$reqFile
 	getfacl "$certPath" | setfacl --set-file=- newcerts/$certFile
+	if [ ! -f "certs/$certFile" ]
+	then
+		echo "No file named $certFile in directory" >&2
+		echo " $(readlink -f certs):" >&2
+		echo "there might be a problem" >&2
+	fi
 	mv newcerts/$certFile certs
 	cat private/$keyFile certs/$certFile > private/$keycertFile
 	return 0