3 # Copyright (C) 2023, 2024 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.pl)
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 )
42 _bin_words_path = @_PATH( $bin_path, opomba )
44 _cgi_path = @_PATH( $cgi_path, )
45 _cgi_2words_path = @_PATH( $cgi_path, 2words )
46 _cgi_attach_path = @_PATH( $cgi_path, a )
47 _cgi_bbcode_path = @_PATH( $cgi_path, b )
48 _cgi_coin_path = @_PATH( $cgi_path, coin )
49 _cgi_css_path = @_PATH( $cgi_path, bsta.css )
50 _cgi_frame_path = @_PATH( $cgi_path, f )
51 _cgi_goto_path = @_PATH( $cgi_path, g )
52 _cgi_info_path = @_PATH( $cgi_path, i )
53 _cgi_list_path = @_PATH( $cgi_path, goto.htm )
54 _cgi_logo_path = @_PATH( $cgi_path, botmlogo.png)
55 _cgi_timer_path = @_PATH( $cgi_path, timer.js )
56 _cgi_viewer_path = @_PATH( $cgi_path, v )
57 _cgi_words_path = @_PATH( $cgi_path, w )
59 _data_path = @_PATH( $data_path, )
60 _data_attach_path = @_PATH( $data_path, a )
61 _data_chat_path = @_PATH( $data_path, chat )
62 _data_coin_path = @_PATH( $data_path, coincidence)
63 _data_default_path = @_PATH( $data_path, default )
64 _data_list_path = @_PATH( $data_path, list )
65 _data_noaccess_path = @_PATH( $data_path, noaccess )
66 _data_settings_path = @_PATH( $data_path, settings )
67 _data_state_path = @_PATH( $data_path, state )
68 _data_story_path = @_PATH( $data_path, story )
69 _data_words_path = @_PATH( $data_path, words )
71 _log_path = @_PATH( $log_path, )
72 _log_ong_path = @_PATH( $log_path, ong.log )
73 _log_spam_path = @_PATH( $log_path, words_spam.log)
74 _log_words_path = @_PATH( $log_path, words.log )
76 _www_path = @_PATH( $www_path, )
77 _www_goto_path = @_PATH( $www_path, goto.htm )
78 _www_index_path = @_PATH( $www_path, index.htm)
80 _conf_path = @_PATH($conf_path, $name\.conf)
81 _cron_path = @_PATH($cron_path, $name)
85 CONF_BIN_2WORDS = $_bin_2words_path
86 CONF_BIN_ATTACH = $_bin_attach_path
87 CONF_BIN_BBCODE = $_bin_bbcode_path
88 CONF_BIN_COIN = $_bin_coin_path
89 CONF_BIN_FRAME = $_bin_frame_path
90 CONF_BIN_GOTO = $_bin_goto_path
91 CONF_BIN_INFO = $_bin_info_path
92 CONF_BIN_VIEWER = $_bin_viewer_path
93 CONF_BIN_WORDS = $_bin_words_path
95 CONF_CGI_2WORDS = $_cgi_2words_path
96 CONF_CGI_ATTACH = $_cgi_attach_path
97 CONF_CGI_BBCODE = $_cgi_bbcode_path
98 CONF_CGI_COIN = $_cgi_coin_path
99 CONF_CGI_FRAME = $_cgi_frame_path
100 CONF_CGI_GOTO = $_cgi_goto_path
101 CONF_CGI_INFO = $_cgi_info_path
102 CONF_CGI_VIEWER = $_cgi_viewer_path
103 CONF_CGI_WORDS = $_cgi_words_path
106 CRON_ONG = $_bin_ong_path
107 CRON_OLDLOGS = $_bin_oldlogs_path
108 CRON_RESET = $_bin_reset_path
110 CRON_USER = $cron_user
112 CRON_OLDLOGS_SCHEDULE = $oldlogs_schedule
113 CRON_ONG_SCHEDULE = $ong_schedule
114 CRON_RESET_SCHEDULE = $reset_schedule
115 CRON_RESET_PASSWORD = $reset_password
117 CRON_LOG_SIZE_LIMIT = $log_size_limit
118 CRON_LOGS_UNCOMPRESSED = $logs_uncompressed
119 CRON_LOGS_TOTAL = $logs_total
121 CRON_LOG = $_log_path
122 CRON_ONG_LOG = $_log_ong_path
125 MAKE_TARGET = TARGET = $target
127 MAKE_CHMOD = CHMOD=$chmod
129 MAKE_MKDIR = MKDIR=$mkdir
130 MAKE_PERL = PERL =$perl
132 MAKE_SUDO = SUDO =$sudo
137 MAKE_CONF = CONF = $_conf_path
138 MAKE_CRON = CRON = $_cron_path
140 MAKE_BIN_PATH = BIN_PATH = $bin_path
141 MAKE_DATA_PATH = DATA_PATH = $data_path
142 MAKE_DATA_WORDS_PATH = DATA_WORDS_PATH = $_data_words_path
143 MAKE_LIB_PATH = LIB_PATH = $lib_path
144 MAKE_LOG_PATH = LOG_PATH = $log_path
145 MAKE_TMP_PATH = TMP_PATH = $tmp_path
146 MAKE_WWW_PATH = WWW_PATH = $www_path
149 PERL_LIB = @_PERL_USE_2(lib, @_PERL_STR($lib_path))
151 PERL_SET_PATH = \$ENV{'PATH'} = @_PERL_STR($path);
153 PERL_EXPORT_VERSION = @_PERL_OUR_STR( VERSION, $_version)
155 PERL_PATH_SEPARATOR = @_PERL_CONSTANT_STR( PATH_SEPARATOR, $_PATH_SEPARATOR)
157 PERL_CGI_PATH = @_PERL_CONSTANT_STR( CGI_PATH , $_cgi_path )
158 PERL_CGI_2WORDS_PATH = @_PERL_CONSTANT_STR( CGI_2WORDS_PATH, $_cgi_2words_path)
159 PERL_CGI_ATTACH_PATH = @_PERL_CONSTANT_STR( CGI_ATTACH_PATH, $_cgi_attach_path)
160 PERL_CGI_BBCODE_PATH = @_PERL_CONSTANT_STR( CGI_BBCODE_PATH, $_cgi_bbcode_path)
161 PERL_CGI_COIN_PATH = @_PERL_CONSTANT_STR( CGI_COIN_PATH , $_cgi_coin_path )
162 PERL_CGI_CSS_PATH = @_PERL_CONSTANT_STR( CGI_CSS_PATH , $_cgi_css_path )
163 PERL_CGI_FRAME_PATH = @_PERL_CONSTANT_STR( CGI_FRAME_PATH , $_cgi_frame_path )
164 PERL_CGI_GOTO_PATH = @_PERL_CONSTANT_STR( CGI_GOTO_PATH , $_cgi_goto_path )
165 PERL_CGI_INFO_PATH = @_PERL_CONSTANT_STR( CGI_INFO_PATH , $_cgi_info_path )
166 PERL_CGI_LIST_PATH = @_PERL_CONSTANT_STR( CGI_LIST_PATH , $_cgi_list_path )
167 PERL_CGI_LOGO_PATH = @_PERL_CONSTANT_STR( CGI_LOGO_PATH , $_cgi_logo_path )
168 PERL_CGI_TIMER_PATH = @_PERL_CONSTANT_STR( CGI_TIMER_PATH , $_cgi_timer_path )
169 PERL_CGI_VIEWER_PATH = @_PERL_CONSTANT_STR( CGI_VIEWER_PATH, $_cgi_viewer_path)
170 PERL_CGI_WORDS_PATH = @_PERL_CONSTANT_STR( CGI_WORDS_PATH , $_cgi_words_path )
172 PERL_DATA_PATH = @_PERL_CONSTANT_STR( DATA_PATH , $_data_path )
173 PERL_DATA_ATTACH_PATH = @_PERL_CONSTANT_STR( DATA_ATTACH_PATH , $_data_attach_path )
174 PERL_DATA_CHAT_PATH = @_PERL_CONSTANT_STR( DATA_CHAT_PATH , $_data_chat_path )
175 PERL_DATA_COIN_PATH = @_PERL_CONSTANT_STR( DATA_COIN_PATH , $_data_coin_path )
176 PERL_DATA_DEFAULT_PATH = @_PERL_CONSTANT_STR( DATA_DEFAULT_PATH , $_data_default_path )
177 PERL_DATA_LIST_PATH = @_PERL_CONSTANT_STR( DATA_LIST_PATH , $_data_list_path )
178 PERL_DATA_NOACCESS_PATH = @_PERL_CONSTANT_STR( DATA_NOACCESS_PATH, $_data_noaccess_path)
179 PERL_DATA_SETTINGS_PATH = @_PERL_CONSTANT_STR( DATA_SETTINGS_PATH, $_data_settings_path)
180 PERL_DATA_STATE_PATH = @_PERL_CONSTANT_STR( DATA_STATE_PATH , $_data_state_path )
181 PERL_DATA_STORY_PATH = @_PERL_CONSTANT_STR( DATA_STORY_PATH , $_data_story_path )
182 PERL_DATA_WORDS_PATH = @_PERL_CONSTANT_STR( DATA_WORDS_PATH , $_data_words_path )
184 PERL_LOG_PATH = @_PERL_CONSTANT_STR( LOG_PATH , $_log_path )
185 PERL_LOG_SPAM_PATH = @_PERL_CONSTANT_STR( LOG_SPAM_PATH , $_log_spam_path )
186 PERL_LOG_WORDS_PATH = @_PERL_CONSTANT_STR( LOG_WORDS_PATH, $_log_words_path)
188 PERL_WWW_PATH = @_PERL_CONSTANT_STR( WWW_PATH , $_www_path )
189 PERL_WWW_GOTO_PATH = @_PERL_CONSTANT_STR( WWW_GOTO_PATH , $_www_goto_path )
190 PERL_WWW_INDEX_PATH = @_PERL_CONSTANT_STR( WWW_INDEX_PATH, $_www_index_path)
192 PERL_SCHEME = @_PERL_CONSTANT_STR( SCHEME , $scheme )
193 PERL_WEBSITE = @_PERL_CONSTANT_STR( WEBSITE , $website )
194 PERL_WEBSITE_NAME = @_PERL_CONSTANT_STR( WEBSITE_NAME, $website_name)
195 PERL_FAVICON_PATH = @_PERL_CONSTANT_STR( FAVICON_PATH, $favicon_path)
197 PERL_COIN_DATE = @_PERL_CONSTANT_STR( COIN_DATE, $coin_date)
198 PERL_INTF_DATE = @_PERL_CONSTANT_STR( INTF_DATE, $intf_date)
200 PERL_STORY_CREDITS = @_PERL_CONSTANT_STR( STORY_CREDITS, $story_credits)
201 PERL_INTF_CREDITS = @_PERL_CONSTANT_STR( INTF_CREDITS , @intf_credits)
202 PERL_SOURCE_URL = @_PERL_CONSTANT_STR( SOURCE_URL , $source_url)
204 PERL_GZIP = @_PERL_CONSTANT_STR( GZIP, $gzip)
206 PERL_RESET_PASSWORD = @_PERL_CONSTANT_STR( RESET_PASSWORD, $reset_password)
208 PERL_LOG_SIZE_LIMIT = @_PERL_CONSTANT( LOG_SIZE_LIMIT , $log_size_limit)
209 PERL_LOGS_UNCOMPRESSED = @_PERL_CONSTANT( LOGS_UNCOMPRESSED, $logs_uncompressed)
210 PERL_LOGS_TOTAL = @_PERL_CONSTANT( LOGS_TOTAL , $logs_total)
212 PERL_STORY_LENGTH = @_PERL_CONSTANT( STORY_LENGTH , $story_length)
213 PERL_PAGE_LENGTH = @_PERL_CONSTANT( PAGE_LENGTH , $page_length)
214 PERL_FIRSTPAGE_LENGTH = @_PERL_CONSTANT( FIRSTPAGE_LENGTH, $firstpage_length)
216 PERL_COMMENT_PAGE_LENGTH= @_PERL_CONSTANT( COMMENT_PAGE_LENGTH, $comment_page_length)
218 RUN_PERL = @_SHEBANG($perl)