X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=dbinstall.php;h=6e5b1b25fd05969c7cbb96972a660cb8d923a067;hb=75a1eedb8977b8f2db459128bab9aaf367e3b58b;hp=063f202238b0b7e6266be1143ef599cde774cf08;hpb=3cd816de20457c5224d72db358833b234571be70;p=timetracker.git
diff --git a/dbinstall.php b/dbinstall.php
index 063f2022..6e5b1b25 100644
--- a/dbinstall.php
+++ b/dbinstall.php
@@ -47,6 +47,25 @@ function ttExecute($sql) {
print "Successful update.
\n";
}
+// ttGenerateKeys - generates keys for groups that do not have them.
+function ttGenerateKeys() {
+ $mdb2 = getConnection();
+ $sql = "select id from tt_groups where group_key is null and status = 1";
+ $res = $mdb2->query($sql);
+ if (is_a($res, 'PEAR_Error')) die($res->getMessage());
+
+ $numGroups = 0;
+ while ($val = $res->fetchRow()) {
+ $group_id = $val['id'];
+ $group_key = $mdb2->quote(ttRandomString());
+ $sql = "update tt_groups set group_key = $group_key where id = $group_id";
+ $affected = $mdb2->exec($sql);
+ if (is_a($affected, 'PEAR_Error')) die($affected->getMessage());
+ $numGroups++;
+ }
+ print "
Generated keys for $numGroups groups.
\n";
+}
+
if ($request->isGet()) {
echo('