roko.li/sharee.bike
5
0
Fork 0
mirror of https://gitlab.com/t6353/sharee.bike.git synced 2025-05-10 05:56:27 +02:00
Code Issues Projects Releases Packages Wiki Activity

copri Faktura ticket email integration. Table depended sort. Cleanup users table

Browse source
This commit is contained in:
ragu 2023-08-01 07:47:54 +02:00
parent 1672564775
commit e3d3713994
16 changed files with 219 additions and 238 deletions
Download patch file Download diff file Expand all files Collapse all files

15
copri4/main/src/Mod/Shareework.pm
View file

@ -410,20 +410,24 @@ sub save_account(){
#phonenr
}elsif($_ eq "txt07"){
$valxx =~ s/[\s\-\/]//g;
if($valxx !~ /\d{9}/ || length($valxx) > 16){
my $email = "";
my $phone = "";
$phone = $1 if($valxx =~ /([+0-9]+)/);
if(length($phone) < 9 || length($phone) > 16){
$ret = "failure::$_#top";
}else{
#smsAck reset
if($valxx ne $ctadr->{txt07}){
if($phone ne $ctadr->{txt07}){
$u_rows = $dbt->update_one($dbh,$update_primary,"int13=0");
}
$u_rows = $dbt->update_one($dbh,$update_primary,"$_='$valxx'");
my $email = $R::txt08;
$u_rows = $dbt->update_one($dbh,$update_primary,"$_='$phone'");
$email = $q->escapeHTML("$R::txt08");
$email =~ s/\s//g;
my $confirm_digest = sha1_base64($email . $valxx);
my $confirm_digest = sha1_base64($email . $phone);
$confirm_digest =~ s/[I1LO0]//ig;
$u_rows = $dbt->update_one($dbh,$update_primary,"txt34='$confirm_digest'");
}
print FILE "confirm_digest input after substitution: $email . $phone\n" if($debug);
#user alias email
}elsif($_ eq "txt08"){
$valxx =~ s/\s//g;
@ -438,7 +442,6 @@ sub save_account(){
order => "mtime",
};
my $account_check = $dbt->fetch_tablerecord($dbh,$pref_ac);
#my $account_check = $self->check_account("txt08","ilike",$valxx,"c_id","!=",$c_id);
print FILE "account_check email:$valxx, c_id:$account_check->{c_id} && $account_check->{c_id} != $c_id\n" if($debug);
if($account_check->{c_id} && $account_check->{c_id} != $c_id){