ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/holy.C
(Generate patch)

Comparing deliantra/server/common/holy.C (file contents):
Revision 1.18 by root, Mon Oct 12 14:00:57 2009 UTC vs.
Revision 1.29 by root, Wed Nov 16 23:41:59 2016 UTC

1/* 1/*
2 * This file is part of Deliantra, the Roguelike Realtime MMORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992,2007 Frank Tore Johansen 6 * Copyright (©) 1992 Frank Tore Johansen
7 * 7 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 8 * Deliantra is free software: you can redistribute it and/or modify it under
9 * the terms of the Affero GNU General Public License as published by the 9 * the terms of the Affero GNU General Public License as published by the
10 * Free Software Foundation, either version 3 of the License, or (at your 10 * Free Software Foundation, either version 3 of the License, or (at your
11 * option) any later version. 11 * option) any later version.
12 * 12 *
13 * This program is distributed in the hope that it will be useful, 13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 16 * GNU General Public License for more details.
17 * 17 *
18 * You should have received a copy of the Affero GNU General Public License 18 * You should have received a copy of the Affero GNU General Public License
19 * and the GNU General Public License along with this program. If not, see 19 * and the GNU General Public License along with this program. If not, see
20 * <http://www.gnu.org/licenses/>. 20 * <http://www.gnu.org/licenses/>.
21 * 21 *
22 * The authors can be reached via e-mail to <support@deliantra.net> 22 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 23 */
24 24
25/* Started file Sept 1996 - initialization of gods in form of a 25/* Started file Sept 1996 - initialization of gods in form of a
26 * linked list -b.t. 26 * linked list -b.t.
… …
28 28
29#include <global.h> 29#include <global.h>
30#include <living.h> 30#include <living.h>
31#include <spells.h> 31#include <spells.h>
32 32
33/* init_gods() - this takes a look at all of the archetypes to find
34 * the objects which correspond to the GODS (type GOD) */
35
36void
37init_gods (void)
38{
39 LOG (llevDebug, "Initialising gods...\n");
40
41 for_all_archetypes (at)
42 if (at->type == GOD)
43 add_god_to_list (at);
44
45 LOG (llevDebug, "done.\n");
46}
47
48/* add_god_to_list()- called only from init_gods */ 33/* add_god_to_list()- called only from init_gods */
49void 34static void
50add_god_to_list (archetype *god_arch) 35add_god_to_list (archetype *god_arch)
51{ 36{
52 if (!god_arch) 37 if (!god_arch)
53 { 38 {
54 LOG (llevError, "ERROR: Tried to add null god to list!\n"); 39 LOG (llevError, "ERROR: Tried to add null god to list!\n");
… …
80#ifdef DEBUG_GODS 65#ifdef DEBUG_GODS
81 LOG (llevDebug, "Adding god %s (%d) to list\n", &god->name, god->id); 66 LOG (llevDebug, "Adding god %s (%d) to list\n", &god->name, god->id);
82#endif 67#endif
83} 68}
84 69
85/* baptize_altar() - (cosmetically) change the name to that of the
86 * god in question, then set the title for later use. -b.t.
87 */
88int
89baptize_altar (object *op)
90{
91 char buf[MAX_BUF];
92
93 /* if the title field is pre-set, then that altar is
94 * already dedicated. */
95 if (!op->title)
96 {
97 godlink *god = get_rand_god ();
98
99 if (!god || !god->name)
100 {
101 LOG (llevError, "baptise_altar(): bizarre nameless god!\n");
102 return 0;
103 }
104 /* if the object name hasnt' been changed, we tack on the gods name */
105 if (op->name == op->arch->object::name)
106 {
107 sprintf (buf, "%s of %s", &op->name, &god->name);
108 op->name = buf;
109 }
110 op->title = god->name;
111 return 1;
112 }
113 return 0;
114}
115
116godlink * 70godlink *
117get_rand_god (void) 71get_rand_god ()
118{ 72{
119 godlink *god = first_god; 73 godlink *god = first_god;
120 int i; 74 int i;
121 75
122 if (god) 76 if (god)
… …
140 return godlnk && godlnk->arch 94 return godlnk && godlnk->arch
141 ? godlnk->arch 95 ? godlnk->arch
142 : 0; 96 : 0;
143} 97}
144 98
99/* init_gods() - this takes a look at all of the archetypes to find
100 * the objects which correspond to the GODS (type GOD) */
145void 101void
146free_all_god (void) 102init_gods ()
147{ 103{
148 godlink *god, *godnext; 104 LOG (llevDebug, "Initialising gods...\n");
149 105
150 LOG (llevDebug, "Freeing god information\n"); 106 for_all_archetypes (at)
151 for (god = first_god; god; god = godnext) 107 if (at->type == GOD)
152 { 108 add_god_to_list (at);
153 godnext = god->next; 109
154 delete god; 110 LOG (llevDebug, "done.\n");
155 }
156} 111}
112

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines