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

Add methode send_occupied2hotline. Fix pricing rental duration. Adding countries

Browse source
This commit is contained in:
ragu 2023-06-21 14:59:05 +02:00
parent 7dcf48db2c
commit b53156d502
8 changed files with 374 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

11
copri4/main/src/Mod/APIfunc.pm
View file

@ -907,7 +907,7 @@ sub booking_request(){
my $response_text = "";
#state and lock_state is only defined if requestes incl. occupied
$bw->log("log booking_request bike:$bike, state:$state, lock_state:$lock_state, tarif:$ct_tariff->{barcode}, auth:$auth->{c_id}",$auth->{txt08},"");
$bw->log("log booking_request bike=$bike, auth=$auth->{c_id}, state=$state, lock_state=$lock_state, tarif=$ct_tariff->{barcode}",$auth->{txt08},"");
my $update_adr = {
table => "contentadr",
@ -1165,10 +1165,13 @@ sub booking_update(){
my $lock_charge = $q->param('voltage') || "";
my $gps_age_minutes = "";
$gps_age_minutes = $gps_data->{gps_age_minutes} if($q->param('gps_age'));
my $logging = "log booking_update bike:$bike, userID:$auth->{c_id}, state:$state, lock_state:$lock_state, lock_charge:$lock_charge, gps:$gps_data->{gps}, gps_age_minutes:$gps_age_minutes";
my $logvalues = "state=$state, lock_state=$lock_state, lock_charge=$lock_charge, gps=$gps_data->{gps}, gps_age_minutes=$gps_age_minutes";
my $logging = "log booking_update bike=$bike, userID=$auth->{c_id}, $logvalues";
$bw->log("$logging",$auth->{c_id},"");
my $log_stamp = strftime "%d.%m.%Y %H:%M:%S", localtime;
$update_pos->{txt24} = $record_pos->{txt24} . "\n- $log_stamp $logging";
$update_pos->{txt24} = $record_pos->{txt24} . "\n- $log_stamp $logvalues";
$dbt->update_record($dbh,$update_pos,$record_pos);
my $Ilockit_GUID = "";
@ -1187,7 +1190,7 @@ sub booking_update(){
};
$record_pos = $dbt->fetch_tablerecord($dbh,$booking_pos);
my $if_gps = $gps_data->{gps} || "";
$bw->log("log smartlock lock_state $bike $lock_state | int10 $record_pos->{int10} | int20 $record_pos->{int20} | if_gps $if_gps",$booking_values,"");
$bw->log("log smartlock lock_state=$bike $lock_state, int10=$record_pos->{int10}, int20=$record_pos->{int20}, if_gps=$if_gps",$booking_values,"");
}