modified site user admin validation
authorTony Cook <tony@develop-help.com>
Thu, 21 Feb 2008 04:35:12 +0000 (04:35 +0000)
committertony <tony@45cb6cf1-00bc-42d2-bb5a-07f51df49f94>
Thu, 21 Feb 2008 04:35:12 +0000 (04:35 +0000)
schema/bse.sql
site/cgi-bin/modules/BSE/AdminSiteUsers.pm
site/cgi-bin/modules/BSE/CustomBase.pm
site/cgi-bin/modules/BSE/DB/Mysql.pm
site/cgi-bin/modules/SiteUser.pm
site/util/mysql.str

index d423b31..cf07794 100644 (file)
@@ -584,6 +584,9 @@ create table site_users (
 
   billOrganization varchar(127) not null default '',
 
+  customInt1 integer,
+  customInt2 integer,
+
   primary key (id),
   unique (userId),
   index (affiliate_name)
index e04c5eb..64f4dff 100644 (file)
@@ -300,23 +300,20 @@ sub req_save {
   my %errors;
   my $nopassword = $req->cfg->entry('site users', 'nopassword', 0);
   my @cols = grep !$donttouch{$_}, SiteUser->columns;
-  for my $col (@cols) {
+  my $custom = custom_class($cfg);
+  my @required = $custom->siteuser_edit_required($req, $user);
+  for my $col (@required) {
     my $value = $cgi->param($col);
-    if ($cfg->entryBool('site users', "require_$col")) {
-      if (defined $value && $value eq '') {
-       my $disp = $cfg->entry('site users', "display_$col", "\u$col");
-       $errors{$col} = "$disp is a required field";
-      }
+    if (defined $value && $value eq '') {
+      my $disp = $cfg->entry('site users', "display_$col", "\u$col");
+      $errors{$col} = "$disp is a required field";
     }
   }
 
   my $saveemail;
   my $email = $cgi->param('email');
-  if (defined $email && $email ne $user->{email}) {
-    if (!$email) {
-      $errors{email} = "Email is a required field";
-    }
-    elsif ($email !~ /.\@./) {
+  if (defined $email && $email ne $user->{email} && $email ne '') {
+    if ($email !~ /.\@./) {
       $errors{email} = "Email is invalid";
     }
     unless ($errors{email}) {
@@ -546,6 +543,9 @@ sub req_add {
     $user{$field} = '';
   }
 
+  my $custom = custom_class($cfg);
+  my @required = $custom->siteuser_add_required($req);
+
   my $nopassword = $cfg->entryBool('site users', 'nopassword', 0);
   my %errors;
   my $email = $cgi->param('email');
index 2534ba6..f1c5014 100644 (file)
@@ -121,6 +121,34 @@ sub can_user_see_wishlist {
   1;
 }
 
+my @dont_touch = 
+  qw(id userId password confirmed confirmSecret waitingForConfirmation flags affiliate_name previousLogon);
+my %dont_touch = map { $_ => 1 } @dont_touch;
+  
+sub siteuser_required {
+  my ($self, $req) = @_;
+
+  require SiteUsers;
+  my $cfg = $req->cfg;
+  my @required = qw(email);
+  push @required, grep $cfg->entry('site users', "require_$_", 0),
+    grep !$dont_touch{$_}, SiteUsers->columns;
+
+  return @required;
+}
+
+sub siteuser_add_required {
+  my ($self, $req) = @_;
+
+  return $self->siteuser_required($req);
+}
+
+sub siteuser_edit_required {
+  my ($self, $req, $user) = @_;
+
+  return $self->siteuser_required($req);
+}
+
 1;
 
 =head1 NAME
index e117422..7469997 100644 (file)
@@ -181,8 +181,8 @@ SQL
    'select * from site_users where id = ?',
    getSiteUserByAffiliate_name =>
    'select * from site_users where affiliate_name = ?',
-   addSiteUser => 'insert site_users values(null,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
-   replaceSiteUser => 'replace site_users values(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
+   addSiteUser => 'insert site_users values(null,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
+   replaceSiteUser => 'replace site_users values(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
    'SiteUsers.removeSubscriptions'=>
    'delete from subscribed_users where userId = ?',
    'SiteUsers.removeSub'=>
index b6d4403..9f3fef8 100644 (file)
@@ -23,7 +23,8 @@ sub columns {
             customStr1 customStr2 customStr3
             affiliate_name delivMobile billMobile
             delivStreet2 billStreet2
-            billOrganization/;
+            billOrganization
+            customInt1 customInt2/;
 }
 
 sub valid_fields {
index a831283..1249ce0 100644 (file)
@@ -402,6 +402,8 @@ Column billMobile;varchar(80);NO;;
 Column delivStreet2;varchar(127);NO;;
 Column billStreet2;varchar(127);NO;;
 Column billOrganization;varchar(127);NO;;
+Column customInt1;int(11);YES;NULL;
+Column customInt2;int(11);YES;NULL;
 Index PRIMARY;1;[id]
 Index affiliate_name;0;[affiliate_name]
 Index userId;1;[userId]