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

new rental editor

Browse source
This commit is contained in:
ragu 2022-06-02 10:34:03 +02:00
parent 46f86f6c05
commit aceda57b50
23 changed files with 548 additions and 162 deletions
Download patch file Download diff file Expand all files Collapse all files

1
copri4/main/src/scripts/Ilockit_cloud.pl
View file

@ -213,6 +213,7 @@ sub get_devices {
#sudo su www-data -c "./src/scripts/Ilockit_cloud.pl shareedms-fr01 get_events 6572 20"
#TODO
&get_events if($todo eq "get_events");
sub get_events {

1
copri4/main/src/scripts/coupongen.pl Symbolic link
View file

@ -0,0 +1 @@
../../../../../sharee.bike/copri-bike/main/src/scripts/coupongen.pl

2
copri4/main/src/scripts/requested_timeout.pl
View file

@ -48,6 +48,8 @@ my $update_cp = {
table => "contenttranspos",
#txt10 => "available",
int10 => "1",
owner_end => "172",
mtime => "now()",
};
my $update_cc = {
table => "content",

39
copri4/main/src/scripts/sig_client.pl
View file

@ -3,10 +3,15 @@
# SPDX-License-Identifier: AGPL-3.0-or-later
# Copyright (c) Rainer Gümpelein, TeilRad GmbH
#
#On this forking script, nothing will saved on script, else by execute APIsigclient methodes
#
# command line syntax
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx 'todo' 'user_id' 'bike_id' 'pos_id'"
#
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx bikes_available"
#
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx reserve 1842 '380116b5-0522-43da-ab66-477744a731a3'"
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx rental 1842 '380116b5-0522-43da-ab66-477744a731a3'"
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx reserve 1842 '380116b5-0522-43da-ab66-477744a731a3' ''"
# sudo su www-data -c "./src/scripts/sig_client.pl shareeapp-sx rental 1842 '380116b5-0522-43da-ab66-477744a731a3' ''"
#
use vars qw($syshost);
@ -36,7 +41,8 @@ my $dbh = "";
my $todo = $ARGV[1] || "";
my $user_id = $ARGV[2] || "";
my $pos_id = $ARGV[3] || "";
my $bike_id = $ARGV[3] || "";
my $pos_id = $ARGV[4] || "";
open(FILE,">>$varenv{logdir}/APIsigclient.log");
print FILE "\n*** $now_dt 'sig_client fork with todo:$todo|user_id:$user_id|pos_id:$pos_id' \n";
@ -51,7 +57,7 @@ my $apref = {
my $ctadr = { c_id => 0 };
$ctadr = $dbt->fetch_record($dbh,$apref) if($user_id =~ /^\d+$/ && $user_id > 0);
my $ct_bike = { txt22 => "" };
my $ct_bike = { txt22 => "$bike_id" };
my $posref = {
table => "contenttranspos",
@ -61,7 +67,7 @@ my $posref = {
c_id => "$pos_id",
};
my $ctpos = { c_id => 0 };
$ctpos = $dbt->fetch_tablerecord($dbh,$posref) if($user_id =~ /^\d+$/ && $user_id > 0 && $pos_id);
$ctpos = $dbt->fetch_tablerecord($dbh,$posref) if($user_id =~ /^\d+$/ && $user_id > 0 && $pos_id && $pos_id =~ /^\d+$/);
print FILE "fetched from DB ctadr:$ctadr->{c_id}|ctpos:$ctpos->{c_id}\n";
@ -81,25 +87,36 @@ if($todo eq "bikes_available"){
#print $0 . Dumper($return) . "\n";
}
#only for tests
#sig => copri key mapping
#bike id => txt22
#reservationId => txt10
#renatlId => txt11
#only for tests. build in methode
elsif($todo eq "reserve"){
#$ctadr = { c_id => 1842 };
#$ct_bike = { txt22 => "380116b5-0522-43da-ab66-477744a731a3" };
my $return = $si->sig_booking(\%varenv,$ctadr,$ct_bike,$ctpos,$todo);
my $return = $si->sig_booking(\%varenv,$todo,$ctadr,$ct_bike,$ctpos);
#print $0 . Dumper($return) . "\n";
}
#used also live! to fork rental request with
#live! Fork rental request with bike "id"
elsif($todo eq "rental" && $ctadr->{c_id} > 0 && $ctpos->{txt22}){
#$ctadr = { c_id => 1842 };
#$ct_bike = { txt22 => "380116b5-0522-43da-ab66-477744a731a3" };
my $return = $si->sig_booking(\%varenv,$ctadr,$ct_bike,$ctpos,$todo);
my $return = $si->sig_booking(\%varenv,$todo,$ctadr,$ct_bike,$ctpos);
#print $0 . Dumper($return) . "\n";
}
#used also live! to fork rental_end request with "rentalId"
#live! Fork rental_end request with "rentalId"
elsif($todo eq "rental_end" && $ctadr->{c_id} > 0 && $ctpos->{txt11}){
my $return = $si->sig_booking(\%varenv,$ctadr,$ct_bike,$ctpos,$todo);
my $return = $si->sig_booking(\%varenv,$todo,$ctadr,$ct_bike,$ctpos);
#print $0 . Dumper($return) . "\n";
}
#only for tests. build in methode
elsif($todo eq "rentals_running" && $ctadr->{c_id} > 0 && $ctpos->{txt22}){
my $return = $si->sig_booking(\%varenv,$todo,$ctadr,$ct_bike,$ctpos);
#print $0 . Dumper($return) . "\n";
}