3 # Copyright (C) 2023 Balthasar SzczepaĆski
5 # This program is free software: you can redistribute it and/or modify
6 # it under the terms of the GNU Affero General Public License as
7 # published by the Free Software Foundation, either version 3 of the
8 # License, or (at your option) any later version.
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU Affero General Public License for more details.
15 # You should have received a copy of the GNU Affero General Public License
16 # along with this program. If not, see <http://www.gnu.org/licenses/>.
22 _PERL_STR: '@_ESCAPE($0,')'
23 _PERL_USE_2: use $0 $1;
24 _PERL_CONSTANT: use constant $0 => $1;
25 _PERL_CONSTANT_STR: @_PERL_CONSTANT($0,@_PERL_STR($1))
26 _PERL_OUR: our $0 = $1;
27 _PERL_OUR_STR: @_PERL_OUR(\$$0,@_PERL_STR($1))
30 _bin_path = @_PATH( $bin_path, )
31 _bin_2words_path = @_PATH( $bin_path, 2words )
32 _bin_attach_path = @_PATH( $bin_path, attach )
33 _bin_bbcode_path = @_PATH( $bin_path, bbcode )
34 _bin_coin_path = @_PATH( $bin_path, chat )
35 _bin_frame_path = @_PATH( $bin_path, frame )
36 _bin_goto_path = @_PATH( $bin_path, goto )
37 _bin_info_path = @_PATH( $bin_path, info )
38 _bin_oldlogs_path = @_PATH( $bin_path, oldlogs )
39 _bin_ong_path = @_PATH( $bin_path, ong.pl )
40 _bin_reset_path = @_PATH( $bin_path, reset.pl)
41 _bin_viewer_path = @_PATH( $bin_path, viewer )
43 _cgi_path = @_PATH( $cgi_path, )
44 _cgi_2words_path = @_PATH( $cgi_path, 2words )
45 _cgi_attach_path = @_PATH( $cgi_path, a )
46 _cgi_bbcode_path = @_PATH( $cgi_path, b )
47 _cgi_coin_path = @_PATH( $cgi_path, coin )
48 _cgi_css_path = @_PATH( $cgi_path, bsta.css )
49 _cgi_frame_path = @_PATH( $cgi_path, f )
50 _cgi_goto_path = @_PATH( $cgi_path, g )
51 _cgi_info_path = @_PATH( $cgi_path, i )
52 _cgi_logo_path = @_PATH( $cgi_path, botmlogo.png)
53 _cgi_timer_path = @_PATH( $cgi_path, timer.js )
54 _cgi_viewer_path = @_PATH( $cgi_path, v )
56 _data_path = @_PATH( $data_path, )
57 _data_chat_path = @_PATH( $data_path, chat )
58 _data_coin_path = @_PATH( $data_path, coincidence)
59 _data_default_path = @_PATH( $data_path, default )
60 _data_list_path = @_PATH( $data_path, list )
61 _data_noaccess_path = @_PATH( $data_path, noaccess )
62 _data_settings_path = @_PATH( $data_path, settings )
63 _data_state_path = @_PATH( $data_path, state )
64 _data_story_path = @_PATH( $data_path, story )
66 _log_path = @_PATH( $log_path, )
67 _log_ong_path = @_PATH( $log_path, ong.log)
69 _www_path = @_PATH( $www_path, )
70 _www_index_path = @_PATH( $www_path, index.htm)
72 _conf_path = @_PATH($conf_path, $name\.conf)
73 _cron_path = @_PATH($cron_path, $name)
77 CONF_BIN_2WORDS = $_bin_2words_path
78 CONF_BIN_ATTACH = $_bin_attach_path
79 CONF_BIN_BBCODE = $_bin_bbcode_path
80 CONF_BIN_COIN = $_bin_coin_path
81 CONF_BIN_FRAME = $_bin_frame_path
82 CONF_BIN_GOTO = $_bin_goto_path
83 CONF_BIN_INFO = $_bin_info_path
84 CONF_BIN_VIEWER = $_bin_viewer_path
86 CONF_CGI_2WORDS = $_cgi_2words_path
87 CONF_CGI_ATTACH = $_cgi_attach_path
88 CONF_CGI_BBCODE = $_cgi_bbcode_path
89 CONF_CGI_COIN = $_cgi_coin_path
90 CONF_CGI_FRAME = $_cgi_frame_path
91 CONF_CGI_GOTO = $_cgi_goto_path
92 CONF_CGI_INFO = $_cgi_info_path
93 CONF_CGI_VIEWER = $_cgi_viewer_path
96 CRON_ONG = $_bin_ong_path
97 CRON_OLDLOGS = $_bin_oldlogs_path
98 CRON_RESET = $_bin_reset_path
100 CRON_USER = $cron_user
102 CRON_OLDLOGS_SCHEDULE = $oldlogs_schedule
103 CRON_ONG_SCHEDULE = $ong_schedule
104 CRON_RESET_SCHEDULE = $reset_schedule
106 CRON_LOG_SIZE_LIMIT = $log_size_limit
107 CRON_LOGS_UNCOMPRESSED = $logs_uncompressed
108 CRON_LOGS_TOTAL = $logs_total
110 CRON_LOG = $_log_path
111 CRON_ONG_LOG = $_log_ong_path
114 MAKE_TARGET = TARGET = $target
116 MAKE_CHMOD = CHMOD=$chmod
118 MAKE_MKDIR = MKDIR=$mkdir
119 MAKE_PERL = PERL =$perl
121 MAKE_SUDO = SUDO =$sudo
126 MAKE_CONF = CONF = $_conf_path
127 MAKE_CRON = CRON = $_cron_path
129 MAKE_BIN_PATH = BIN_PATH = $bin_path
130 MAKE_DATA_PATH = DATA_PATH = $data_path
131 MAKE_LIB_PATH = LIB_PATH = $lib_path
132 MAKE_LOG_PATH = LOG_PATH = $log_path
133 MAKE_TMP_PATH = TMP_PATH = $tmp_path
134 MAKE_WWW_PATH = WWW_PATH = $www_path
137 PERL_LIB = @_PERL_USE_2(lib, @_PERL_STR($lib_path))
139 PERL_SET_PATH = \$ENV{'PATH'} = @_PERL_STR($path);
141 PERL_EXPORT_VERSION = @_PERL_OUR_STR( VERSION, $_version)
143 PERL_CGI_PATH = @_PERL_CONSTANT_STR( CGI_PATH , $_cgi_path )
144 PERL_CGI_2WORDS_PATH = @_PERL_CONSTANT_STR( CGI_2WORDS_PATH, $_cgi_2words_path)
145 PERL_CGI_ATTACH_PATH = @_PERL_CONSTANT_STR( CGI_ATTACH_PATH, $_cgi_attach_path)
146 PERL_CGI_BBCODE_PATH = @_PERL_CONSTANT_STR( CGI_BBCODE_PATH, $_cgi_bbcode_path)
147 PERL_CGI_COIN_PATH = @_PERL_CONSTANT_STR( CGI_COIN_PATH , $_cgi_coin_path )
148 PERL_CGI_CSS_PATH = @_PERL_CONSTANT_STR( CGI_CSS_PATH , $_cgi_css_path )
149 PERL_CGI_FRAME_PATH = @_PERL_CONSTANT_STR( CGI_FRAME_PATH , $_cgi_frame_path )
150 PERL_CGI_GOTO_PATH = @_PERL_CONSTANT_STR( CGI_GOTO_PATH , $_cgi_goto_path )
151 PERL_CGI_INFO_PATH = @_PERL_CONSTANT_STR( CGI_INFO_PATH , $_cgi_info_path )
152 PERL_CGI_LOGO_PATH = @_PERL_CONSTANT_STR( CGI_LOGO_PATH , $_cgi_logo_path )
153 PERL_CGI_TIMER_PATH = @_PERL_CONSTANT_STR( CGI_TIMER_PATH , $_cgi_timer_path )
154 PERL_CGI_VIEWER_PATH = @_PERL_CONSTANT_STR( CGI_VIEWER_PATH, $_cgi_viewer_path)
156 PERL_DATA_PATH = @_PERL_CONSTANT_STR( DATA_PATH , $_data_path )
157 PERL_DATA_CHAT_PATH = @_PERL_CONSTANT_STR( DATA_CHAT_PATH , $_data_chat_path )
158 PERL_DATA_COIN_PATH = @_PERL_CONSTANT_STR( DATA_COIN_PATH , $_data_coin_path )
159 PERL_DATA_DEFAULT_PATH = @_PERL_CONSTANT_STR( DATA_DEFAULT_PATH , $_data_default_path )
160 PERL_DATA_LIST_PATH = @_PERL_CONSTANT_STR( DATA_LIST_PATH , $_data_list_path )
161 PERL_DATA_NOACCESS_PATH = @_PERL_CONSTANT_STR( DATA_NOACCESS_PATH, $_data_noaccess_path)
162 PERL_DATA_SETTINGS_PATH = @_PERL_CONSTANT_STR( DATA_SETTINGS_PATH, $_data_settings_path)
163 PERL_DATA_STATE_PATH = @_PERL_CONSTANT_STR( DATA_STATE_PATH , $_data_state_path )
164 PERL_DATA_STORY_PATH = @_PERL_CONSTANT_STR( DATA_STORY_PATH , $_data_story_path )
166 PERL_LOG_PATH = @_PERL_CONSTANT_STR( LOG_PATH, $_log_path)
168 PERL_WWW_PATH = @_PERL_CONSTANT_STR( WWW_PATH , $_www_path )
169 PERL_WWW_INDEX_PATH = @_PERL_CONSTANT_STR( WWW_INDEX_PATH, $_www_index_path)
171 PERL_WEBSITE = @_PERL_CONSTANT_STR( WEBSITE , $website )
172 PERL_WEBSITE_NAME = @_PERL_CONSTANT_STR( WEBSITE_NAME, $website_name)
173 PERL_FAVICON_PATH = @_PERL_CONSTANT_STR( FAVICON_PATH, $favicon_path)
175 PERL_COIN_DATE = @_PERL_CONSTANT_STR( COIN_DATE, $coin_date)
176 PERL_INTF_DATE = @_PERL_CONSTANT_STR( INTF_DATE, $intf_date)
178 PERL_GZIP = @_PERL_CONSTANT_STR( GZIP, $gzip)
180 PERL_LOG_SIZE_LIMIT = @_PERL_CONSTANT( LOG_SIZE_LIMIT , $log_size_limit)
181 PERL_LOGS_UNCOMPRESSED = @_PERL_CONSTANT( LOGS_UNCOMPRESSED, $logs_uncompressed)
182 PERL_LOGS_TOTAL = @_PERL_CONSTANT( LOGS_TOTAL , $logs_total)
184 PERL_STORY_LENGTH = @_PERL_CONSTANT( STORY_LENGTH , $story_length)
185 PERL_PAGE_LENGTH = @_PERL_CONSTANT( PAGE_LENGTH , $page_length)
186 PERL_FIRSTPAGE_LENGTH = @_PERL_CONSTANT( FIRSTPAGE_LENGTH, $firstpage_length)
189 RUN_PERL = @_SHEBANG($perl)