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.9 by root, Thu May 17 21:32:08 2007 UTC vs.
Revision 1.20 by root, Fri Nov 6 12:49:19 2009 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team 4 * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (C) Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
6 * Copyright (C) Frank Tore Johansen 6 * Copyright (©) 1992,2007 Frank Tore Johansen
7 * 7 *
8 * This program is free software; you can redistribute it and/or modify 8 * Deliantra is free software: you can redistribute it and/or modify it under
9 * it under the terms of the GNU General Public License as published by 9 * the terms of the Affero GNU General Public License as published by the
10 * the Free Software Foundation; either version 2 of the License, or 10 * Free Software Foundation, either version 3 of the License, or (at your
11 * (at your 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 GNU General Public License 18 * You should have received a copy of the Affero GNU General Public License
19 * along with this program; if not, write to the Free Software 19 * and the GNU General Public License along with this program. If not, see
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 * <http://www.gnu.org/licenses/>.
21 * 21 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de> 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.
27 */ 27 */
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//TODO: make a constructor
34static godlink *
35init_godslist (void)
36{
37 godlink *gl = new godlink;
38
39 // name=NULL; /* how to describe the god to the player */
40 // arch=NULL; /* pointer to the archetype of this god */
41 // id=0; /* id of the god */
42 // pantheon=NULL; /* the group to which the god belongs (not implemented) */
43 // next=NULL; /* next god in this linked list */
44
45 return gl;
46}
47
48/* init_gods() - this takes a look at all of the archetypes to find
49 * the objects which correspond to the GODS (type GOD) */
50
51void
52init_gods (void)
53{
54 LOG (llevDebug, "Initialising gods...\n");
55
56 for (archetype *at = first_archetype; at; at = at->next)
57 if (at->clone.type == GOD)
58 add_god_to_list (at);
59
60 LOG (llevDebug, "done.\n");
61}
62
63/* add_god_to_list()- called only from init_gods */ 33/* add_god_to_list()- called only from init_gods */
64void 34static void
65add_god_to_list (archetype *god_arch) 35add_god_to_list (archetype *god_arch)
66{ 36{
67 godlink *god;
68
69 if (!god_arch) 37 if (!god_arch)
70 { 38 {
71 LOG (llevError, "ERROR: Tried to add null god to list!\n"); 39 LOG (llevError, "ERROR: Tried to add null god to list!\n");
72 return; 40 return;
73 } 41 }
74 42
75 god = init_godslist (); 43 godlink *god = new godlink;
44
45 // name=NULL; /* how to describe the god to the player */
46 // arch=NULL; /* pointer to the archetype of this god */
47 // id=0; /* id of the god */
48 // pantheon=NULL; /* the group to which the god belongs (not implemented) */
49 // next=NULL; /* next god in this linked list */
76 50
77 god->arch = god_arch; 51 god->arch = god_arch;
78 god->name = god_arch->clone.name; 52 god->name = god_arch->object::name;
53
54 // first_god->id MUST be the highest god number for other code to work currently
79 if (!first_god) 55 if (!first_god)
80 god->id = 1; 56 god->id = 1;
81 else 57 else
82 { 58 {
83 god->id = first_god->id + 1; 59 god->id = first_god->id + 1;
84 god->next = first_god; 60 god->next = first_god;
85 } 61 }
62
86 first_god = god; 63 first_god = god;
87 64
88#ifdef DEBUG_GODS 65#ifdef DEBUG_GODS
89 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);
90#endif 67#endif
91} 68}
92 69
93/* baptize_altar() - (cosmetically) change the name to that of the 70/* baptize_altar() - (cosmetically) change the name to that of the
94 * god in question, then set the title for later use. -b.t. 71 * god in question, then set the title for later use. -b.t.
95 */ 72 */
96 73static int
97int
98baptize_altar (object *op) 74baptize_altar (object *op)
99{ 75{
100 char buf[MAX_BUF]; 76 char buf[MAX_BUF];
101 77
102 /* if the title field is pre-set, then that altar is 78 /* if the title field is pre-set, then that altar is
… …
109 { 85 {
110 LOG (llevError, "baptise_altar(): bizarre nameless god!\n"); 86 LOG (llevError, "baptise_altar(): bizarre nameless god!\n");
111 return 0; 87 return 0;
112 } 88 }
113 /* if the object name hasnt' been changed, we tack on the gods name */ 89 /* if the object name hasnt' been changed, we tack on the gods name */
114 if (!strcmp (op->name, op->arch->clone.name)) 90 if (op->name == op->arch->object::name)
115 { 91 {
116 sprintf (buf, "%s of %s", &op->name, &god->name); 92 sprintf (buf, "%s of %s", &op->name, &god->name);
117 op->name = buf; 93 op->name = buf;
118 } 94 }
119 op->title = god->name; 95 op->title = god->name;
… …
144 * are returning a pointer to the CLONE object. -b.t. 120 * are returning a pointer to the CLONE object. -b.t.
145 */ 121 */
146object * 122object *
147pntr_to_god_obj (godlink *godlnk) 123pntr_to_god_obj (godlink *godlnk)
148{ 124{
149 object *god = NULL;
150
151 if (godlnk && godlnk->arch) 125 return godlnk && godlnk->arch
152 god = &godlnk->arch->clone; 126 ? godlnk->arch
153 return god; 127 : 0;
154} 128}
155 129
156void 130void
157free_all_god (void) 131free_all_god (void)
158{ 132{
… …
163 { 137 {
164 godnext = god->next; 138 godnext = god->next;
165 delete god; 139 delete god;
166 } 140 }
167} 141}
142
143/* init_gods() - this takes a look at all of the archetypes to find
144 * the objects which correspond to the GODS (type GOD) */
145void
146init_gods (void)
147{
148 LOG (llevDebug, "Initialising gods...\n");
149
150 for_all_archetypes (at)
151 if (at->type == GOD)
152 add_god_to_list (at);
153
154 LOG (llevDebug, "done.\n");
155}
156

Diff Legend

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