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 |
root |
1.6 |
# |
10 |
root |
1.2 |
# 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 |
root |
1.6 |
# |
15 |
root |
1.4 |
# The authors can be reached via e-mail to <support@deliantra.com> |
16 |
root |
1.2 |
|
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.6 |
CONF URL_CVS : source_url_cvs = "http://software.schmorp.de/pkg/cf.schmorp.de.html"; |
26 |
|
|
CONF URL_TAR : source_url_tar = "http://dist.schmorp.de/deliantra/"; |
27 |
|
|
|
28 |
root |
1.1 |
our $URL_TAR_SERVER = "$URL_TAR/cfserver-" . cf::VERSION . ".tar.bz2"; |
29 |
root |
1.5 |
our $URL_TAR_ARCH = "$URL_TAR/cfarch-" . cf::VERSION . ".tar.bz2"; |
30 |
|
|
our $URL_TAR_MAPS = "$URL_TAR/cfmaps-" . cf::VERSION . ".tar.bz2"; |
31 |
root |
1.1 |
|
32 |
|
|
cf::register_command sourcecode => sub { |
33 |
|
|
my ($ob, $arg) = @_; |
34 |
|
|
|
35 |
|
|
$ob->reply (undef, <<EOF, cf::NDI_UNIQUE | cf::NDI_DK_ORANGE); |
36 |
root |
1.3 |
If this is a (possibly modified) release version of Deliantra, you can find |
37 |
root |
1.1 |
the corresponding sources at the following location, in accordance to section |
38 |
root |
1.2 |
13 of the GNU Affero General Public License, version 3. |
39 |
root |
1.1 |
|
40 |
|
|
all files: $URL_TAR |
41 |
|
|
server: $URL_TAR_SERVER |
42 |
|
|
arch data: $URL_TAR_ARCH |
43 |
|
|
maps: $URL_TAR_MAPS |
44 |
|
|
|
45 |
|
|
|
46 |
|
|
If this is an intermediate development snapshot, the sources might |
47 |
root |
1.2 |
alternatively be provided via anonymous CVS (or another VCS) with full |
48 |
|
|
version history. Detailed instructions how to access the repository |
49 |
|
|
(without unnecessary burden) are available here: |
50 |
root |
1.1 |
|
51 |
root |
1.2 |
$URL_CVS |
52 |
root |
1.1 |
|
53 |
|
|
EOF |
54 |
|
|
|
55 |
|
|
1 |
56 |
|
|
}; |
57 |
|
|
|