mirror of
https://gitlab.com/t6353/sharee.bike.git
synced 2024-11-16 15:46:34 +01:00
78 lines
2.8 KiB
Perl
78 lines
2.8 KiB
Perl
|
package Config;
|
||
|
|
|
||
|
|
#Deprecated config file
|
||
|
|
#Please use shareeconf/*
|
||
|
|
|
||
|
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
use CGI;
|
||
|
|
use Config::General;
|
||
|
|
my $q = new CGI;
|
||
|
|
|
||
|
|
sub new {
|
||
|
|
my $class = shift;
|
||
|
|
my $self = {};
|
||
|
|
bless($self,$class);
|
||
|
|
return $self;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
sub envonline(){
|
||
|
|
my $self = shift;
|
||
|
|
|
||
|
|
my $globalconf_file = "/var/www/copri4/shareeconf/global.cfg";
|
||
|
|
my $conf = Config::General->new($globalconf_file);
|
||
|
|
my %globalconf = $conf->getall;
|
||
|
|
|
||
|
|
my $basedir = "$globalconf{copri_conf}->{basedir}/$globalconf{operator}{sharee_operator}->{dir_app}";
|
||
|
|
my $metahost = $globalconf{operator}{sharee_operator}->{operatorApp1};
|
||
|
|
my %varenv = (
|
||
|
|
dbname => $globalconf{operator}{sharee_operator}{database}->{dbname},
|
||
|
|
dbuser => $globalconf{operator}{sharee_operator}{database}->{user},
|
||
|
|
dbpassw => $globalconf{operator}{sharee_operator}{database}->{passwd},
|
||
|
|
dbhost => $globalconf{operator}{sharee_operator}{database}->{host},
|
||
|
|
syshost => $globalconf{operator}{sharee_operator}->{dir_app},
|
||
|
|
wwwhost => $globalconf{operator}{sharee_operator}->{operatorApp},
|
||
|
|
praefix => $globalconf{operator}{sharee_operator}{database}->{dbname},
|
||
|
|
systype => "sharee",#(azn)
|
||
|
|
mandant => $globalconf{shareeapp_conf}->{parent_node},
|
||
|
|
start => $globalconf{shareeapp_conf}->{start},
|
||
|
|
profile => $globalconf{shareeapp_conf}->{profile},
|
||
|
|
accounting_1 => $globalconf{shareeapp_conf}->{accounting_1},
|
||
|
|
accounting_1_5 => $globalconf{shareeapp_conf}->{accounting_1_5},
|
||
|
|
accounting_2 => $globalconf{shareeapp_conf}->{accounting_2},
|
||
|
|
accounting_3 => $globalconf{shareeapp_conf}->{accounting_3},
|
||
|
|
|
||
|
|
superu_id => $globalconf{copri_conf}->{superu_id},
|
||
|
|
debug => $globalconf{copri_conf}->{debug},
|
||
|
|
logdir => $globalconf{copri_conf}->{logdir},
|
||
|
|
live_hostname => $globalconf{primary}{sharee_primary}->{live_hostname},
|
||
|
|
metahost=>"$metahost",
|
||
|
|
orga => "",
|
||
|
|
style_font => "$metahost/img/OfficinaSansITCStd-Book.otf",
|
||
|
|
font_family => "OfficinaSansITCStd-Book,Arial",
|
||
|
|
background_image => "",
|
||
|
|
background_size => "cover",
|
||
|
|
background_color => "white",
|
||
|
|
background_color2 => "#c7c8ca",
|
||
|
|
background_align => "center",
|
||
|
|
background_repeat => "no-repeat",
|
||
|
|
font_size => "100.01%",
|
||
|
|
line_height => "1",
|
||
|
|
basedir => "$basedir",
|
||
|
|
pdf => "$basedir/pdf",
|
||
|
|
pdfinvoice => "$basedir/pdfinvoice",
|
||
|
|
data => "$basedir/data",
|
||
|
|
xmlfile => "$basedir/xml",
|
||
|
|
ftp_getfile => "ftp/SWK_codes/got_last.csv",
|
||
|
|
ftp_putfile => "ftp/SWK_return/konrad_code_protokoll.csv",
|
||
|
|
head_logo => "",
|
||
|
|
barcode => "",
|
||
|
|
printer => "PDF"
|
||
|
|
);
|
||
|
|
return %varenv;
|
||
|
|
}
|
||
|
|
|
||
|
|
1;
|
||
|
|
|