Changeset 404 for trunk/DNSDB.pm

Timestamp:

10/04/12 16:25:57 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Fix up initRPC() so it actually works the way it's supposed to. See #33.

File:

• trunk/DNSDB.pm (modified) (1 diff)

trunk/DNSDB.pm

@@ -1419 +1419 @@
   return if !$args{fullname};
 
-  %userdata = %{$dbh->selectrow_hashref("SELECT user_id,group_id,firstname,lastname,status FROM users".
-        " WHERE username=?", undef, ($args{username}) )};
+  my $tmpuser = $dbh->selectrow_hashref("SELECT user_id AS userid,group_id,firstname,lastname,status".
+        " FROM users WHERE username=?", undef, ($args{username}) );
   if (!%userdata) {
     $dbh->do("INSERT INTO users (username,password,firstname,type) VALUES (?,'RPC',?,'R')", undef,
         ($args{username}, $args{fullname}) );
-    %userdata = %{$dbh->selectrow_hashref("SELECT user_id,group_id,firstname,lastname,status FROM users".
-        " WHERE username=?", undef, ($args{username}) )};
-  }
-  $userdata{fullname} = "$userdata{firstname} $userdata{lastname}/$args{rpcsys}";
+    $tmpuser = $dbh->selectrow_hashref("SELECT user_id AS userid,group_id,firstname,lastname,status".
+        " FROM users WHERE username=?", undef, ($args{username}) );
+  }
+  %userdata = %{$tmpuser};
+  $userdata{fullname} = "$userdata{firstname} $userdata{lastname} ($args{rpcsys})";
+  $userdata{username} = "$args{username}/$args{rpcsys}";
   return 1 if %userdata;
 } # end initRPC()