2 $use_global_login = 1; # Always login as master user, not the mysql
3 # login of the current Webmin user
4 do 'postgresql-lib.pl';
6 # useradmin_create_user(&details)
7 # Create a new postgesql user if syncing is enabled
8 sub useradmin_create_user
10 if ($config{'sync_create'}) {
11 local $version = &get_postgresql_version();
12 local $sql = "create user \"$_[0]->{'user'}\"";
13 if ($_[0]->{'passmode'} == 3) {
14 $sql .= " with password '$_[0]->{'plainpass'}'";
16 $sql .= " nocreatedb nocreateuser";
17 &execute_sql_logged($config{'basedb'}, $sql);
21 # useradmin_delete_user(&details)
23 sub useradmin_delete_user
25 if ($config{'sync_delete'}) {
26 local $s = &execute_sql($config{'basedb'},
27 "select * from pg_shadow where usename = '$_[0]->{'user'}'");
28 return if (!@{$s->{'data'}});
29 &execute_sql_logged($config{'basedb'}, "drop user \"$_[0]->{'user'}\"");
33 # useradmin_modify_user(&details)
35 sub useradmin_modify_user
37 if ($config{'sync_modify'}) {
38 local $s = &execute_sql($config{'basedb'},
39 "select * from pg_shadow where usename = '$_[0]->{'olduser'}'");
40 return if (!@{$s->{'data'}});
41 local $version = &get_postgresql_version();
42 if ($_[0]->{'user'} ne $_[0]->{'olduser'}) {
43 # Need to delete and re-create to rename :(
44 local @user = @{$s->{'data'}->[0]};
45 &execute_sql_logged($config{'basedb'},
46 "drop user \"$_[0]->{'olduser'}\"");
47 local $sql = "create user \"$_[0]->{'user'}\"";
48 if ($_[0]->{'passmode'} == 3) {
49 $sql .= " with password '$_[0]->{'plainpass'}'";
51 elsif ($_[0]->{'passmode'} == 4) {
52 $sql .= " with password '$user[6]'";
54 &execute_sql_logged($config{'basedb'}, $sql);
56 elsif ($_[0]->{'passmode'} != 4) {
57 # Just change password
58 local $sql = "alter user \"$_[0]->{'user'}\"";
59 if ($_[0]->{'passmode'} == 3) {
60 $sql .= " with password '$_[0]->{'plainpass'}'";
62 &execute_sql_logged($config{'basedb'}, $sql);