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.21 by root, Fri Nov 6 13:03:34 2009 UTC vs.
Revision 1.30 by root, Sat Nov 17 23:40:00 2018 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 (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
4 * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 5 * 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 6 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992,2007 Frank Tore Johansen 7 * Copyright (©) 1992 Frank Tore Johansen
7 * 8 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 9 * 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 10 * 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 11 * Free Software Foundation, either version 3 of the License, or (at your
11 * option) any later version. 12 * option) any later version.
12 * 13 *
13 * This program is distributed in the hope that it will be useful, 14 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 17 * GNU General Public License for more details.
17 * 18 *
18 * You should have received a copy of the Affero GNU General Public License 19 * 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 20 * and the GNU General Public License along with this program. If not, see
20 * <http://www.gnu.org/licenses/>. 21 * <http://www.gnu.org/licenses/>.
21 * 22 *
22 * The authors can be reached via e-mail to <support@deliantra.net> 23 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 24 */
24 25
25/* Started file Sept 1996 - initialization of gods in form of a 26/* Started file Sept 1996 - initialization of gods in form of a
26 * linked list -b.t. 27 * linked list -b.t.
… …
65#ifdef DEBUG_GODS 66#ifdef DEBUG_GODS
66 LOG (llevDebug, "Adding god %s (%d) to list\n", &god->name, god->id); 67 LOG (llevDebug, "Adding god %s (%d) to list\n", &god->name, god->id);
67#endif 68#endif
68} 69}
69 70
70/* baptize_altar() - (cosmetically) change the name to that of the
71 * god in question, then set the title for later use. -b.t.
72 */
73static int
74baptize_altar (object *op)
75{
76 char buf[MAX_BUF];
77
78 /* if the title field is pre-set, then that altar is
79 * already dedicated. */
80 if (!op->title)
81 {
82 godlink *god = get_rand_god ();
83
84 if (!god || !god->name)
85 {
86 LOG (llevError, "baptise_altar(): bizarre nameless god!\n");
87 return 0;
88 }
89 /* if the object name hasnt' been changed, we tack on the gods name */
90 if (op->name == op->arch->object::name)
91 {
92 sprintf (buf, "%s of %s", &op->name, &god->name);
93 op->name = buf;
94 }
95 op->title = god->name;
96 return 1;
97 }
98 return 0;
99}
100
101godlink * 71godlink *
102get_rand_god (void) 72get_rand_god ()
103{ 73{
104 godlink *god = first_god; 74 godlink *god = first_god;
105 int i; 75 int i;
106 76
107 if (god) 77 if (god)
… …
125 return godlnk && godlnk->arch 95 return godlnk && godlnk->arch
126 ? godlnk->arch 96 ? godlnk->arch
127 : 0; 97 : 0;
128} 98}
129 99
130static void
131free_all_god (void)
132{
133 godlink *god, *godnext;
134
135 LOG (llevDebug, "Freeing god information\n");
136 for (god = first_god; god; god = godnext)
137 {
138 godnext = god->next;
139 delete god;
140 }
141}
142
143/* init_gods() - this takes a look at all of the archetypes to find 100/* init_gods() - this takes a look at all of the archetypes to find
144 * the objects which correspond to the GODS (type GOD) */ 101 * the objects which correspond to the GODS (type GOD) */
145void 102void
146init_gods (void) 103init_gods ()
147{ 104{
148 LOG (llevDebug, "Initialising gods...\n"); 105 LOG (llevDebug, "Initialising gods...\n");
149 106
150 for_all_archetypes (at) 107 for_all_archetypes (at)
151 if (at->type == GOD) 108 if (at->type == GOD)

Diff Legend

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