X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=dbinstall.php;h=007e51608e29871b18a4bdea6855841a572d8018;hb=699d174c8cd3dd88265826a6b69c7fae3b62e0a8;hp=063f202238b0b7e6266be1143ef599cde774cf08;hpb=137822b2c8874dd8a5b56b58774d50f09c122220;p=timetracker.git
diff --git a/dbinstall.php b/dbinstall.php
index 063f2022..007e5160 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('