1 |
root |
1.1 |
#! perl # mandatory |
2 |
|
|
|
3 |
|
|
# This file is licensed under the GNU Affero General Public License, see |
4 |
|
|
# the accompanying file COPYING.Affero for details. |
5 |
|
|
# |
6 |
root |
1.2 |
# This file is free software: you can redistribute it and/or modify |
7 |
|
|
# it under the terms of the GNU Affero General Public License as published by |
8 |
|
|
# the Free Software Foundation, version 3 of the License only. |
9 |
|
|
# |
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 General Public License for more details. |
14 |
|
|
# |
15 |
|
|
# The authors can be reached via e-mail to <crossfire@schmorp.de> |
16 |
|
|
|
17 |
root |
1.1 |
# The intent of this file is to provide the user of the server with |
18 |
|
|
# a URL where he/she can download the source code of this program |
19 |
|
|
# together with any maps and archetype data used to run the server. |
20 |
|
|
|
21 |
root |
1.2 |
# The default uses the location of the pristine release and works |
22 |
root |
1.1 |
# unless you modify the server, in which case you are required to |
23 |
|
|
# either update the URL here or, preferably, change the source_url_tar |
24 |
|
|
# and source_url_cvs settings in $CONFDIR/config. |
25 |
root |
1.2 |
our $URL_TAR = $cf::CFG{source_url_tar} || "http://dist.schmorp.de/crossfire/"; |
26 |
root |
1.1 |
our $URL_TAR_SERVER = "$URL_TAR/cfserver-" . cf::VERSION . ".tar.bz2"; |
27 |
|
|
our $URL_TAR_ARCH = "$URL_TAR/cfarch-" . cf::VERSION . ".tar.bz2"; |
28 |
|
|
our $URL_TAR_MAPS = "$URL_TAR/cfmaps-" . cf::VERSION . ".tar.bz2"; |
29 |
root |
1.2 |
our $URL_CVS = $cf::CFG{source_url_cvs} || "http://software.schmorp.de/pkg/cf.schmorp.de.html"; |
30 |
root |
1.1 |
|
31 |
|
|
cf::register_command sourcecode => sub { |
32 |
|
|
my ($ob, $arg) = @_; |
33 |
|
|
|
34 |
|
|
$ob->reply (undef, <<EOF, cf::NDI_UNIQUE | cf::NDI_DK_ORANGE); |
35 |
root |
1.3 |
If this is a (possibly modified) release version of Deliantra, you can find |
36 |
root |
1.1 |
the corresponding sources at the following location, in accordance to section |
37 |
root |
1.2 |
13 of the GNU Affero General Public License, version 3. |
38 |
root |
1.1 |
|
39 |
|
|
all files: $URL_TAR |
40 |
|
|
server: $URL_TAR_SERVER |
41 |
|
|
arch data: $URL_TAR_ARCH |
42 |
|
|
maps: $URL_TAR_MAPS |
43 |
|
|
|
44 |
|
|
|
45 |
|
|
If this is an intermediate development snapshot, the sources might |
46 |
root |
1.2 |
alternatively be provided via anonymous CVS (or another VCS) with full |
47 |
|
|
version history. Detailed instructions how to access the repository |
48 |
|
|
(without unnecessary burden) are available here: |
49 |
root |
1.1 |
|
50 |
root |
1.2 |
$URL_CVS |
51 |
root |
1.1 |
|
52 |
|
|
EOF |
53 |
|
|
|
54 |
|
|
1 |
55 |
|
|
}; |
56 |
|
|
|