From f074634070ab84facb4c9c212020a2dac12d6b79 Mon Sep 17 00:00:00 2001
From: Roland Gruber <post@rolandgruber.de>
Date: Mon, 5 Nov 2007 18:16:29 +0000
Subject: [PATCH] added function to create random passwords

---
 lam/lib/account.inc | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/lam/lib/account.inc b/lam/lib/account.inc
index 68e318ff..2d900b72 100644
--- a/lam/lib/account.inc
+++ b/lam/lib/account.inc
@@ -281,6 +281,21 @@ function pwd_is_enabled($hash) {
 	else return true;
 }
 
+/**
+ * Generates a random password with 12 digits.
+ *
+ * @return String password
+ */
+function generateRandomPassword() {
+	$list = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ.-_';
+	$password = '';
+	for ($i = 0; $i < 12; $i++) {
+		$rand = $_SESSION['ldap']->new_rand() % 65;
+		$password .= $list[$rand];
+	}
+	return $password;
+}
+
 /**
 * Returns an array with all Samba 3 domain entries under the given suffix
 *