sharee.bike/copri4/main/src/Mod/Basework.pm

96 lines
2 KiB
Perl
Raw Normal View History

2021-12-30 12:05:56 +01:00
package Basework;
#
# SPDX-License-Identifier: AGPL-3.0-or-later
# Copyright (c) Rainer Gümpelein, TeilRad GmbH
#
use strict;
use warnings;
use POSIX;
use CGI; # only for debugging
use Lib::Config;
use Data::Dumper;
use Sys::Hostname;
my $hostname = hostname;
my $cf = new Config;
my $q = new CGI;
sub new {
my $class = shift;
my $self = {};
bless($self,$class);
return $self;
}
my $time = time;
my $now_dt = strftime "%Y-%m-%d %H:%M:%S", localtime;
my $now_date = strftime "%Y-%m-%d", localtime;
#logging
sub log {
my $self = shift;
my ($what,$message,$stdout) = @_;
#my ($package, $filename, $line) = caller;
my %varenv = $cf->envonline();
$now_dt = strftime "%Y-%m-%d %H:%M:%S", localtime;
my $logfile = "/var/log/copri4/$varenv{syshost}-process.log";
2022-01-09 18:31:20 +01:00
#if($varenv{debug}){
if(1==1){
2022-07-05 11:44:00 +02:00
warn "$$ $what" . "\n" . Dumper($message) . "\n";#to apache2/error.log
2021-12-30 12:05:56 +01:00
#2021-07-21 disabled. error.log is enough
if(1==2){
open(FILE,">> $logfile");
print FILE "\n--- $now_dt $0 ---\n";
print FILE "$what" . "\n" . Dumper($message) . "\n";
close FILE;
}
#also to stdout
if($stdout){
#print "\n--- $now_dt $0 ---\n";
2022-07-05 11:44:00 +02:00
print "$$ $what" . "\n" . Dumper($message) . "\n";
2021-12-30 12:05:56 +01:00
}
}
}
2022-06-02 10:34:03 +02:00
#return headline message
sub return_feedback(){
my $self = shift;
my $node_meta = shift;
my $users_dms = shift || {};
my $feedb = shift || {};
my $return = "";
if(ref($feedb) eq "HASH" && $feedb->{message}){
print<<EOF
<script>
\$(document).ready(function(){
\$( "#retm" ).fadeOut(8000);
})
</script>
EOF
;
my $debug = "";
$debug = $feedb->{debug} if($users_dms->{u_id} eq "1842");
if($feedb->{message} =~ /(failure::.*)/){
$return = $1;
}elsif($feedb->{message}){
print $q->div({-id=>'retm'},"$feedb->{message} $debug"),"\n";
}elsif($feedb->{u_rows}){
print $q->div({-id=>'retm'},"$feedb->{u_rows} $node_meta->{node_name} aktualisiert $debug"),"\n";
}
}
return $return;
}
2021-12-30 12:05:56 +01:00
1;