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.4 by root, Sun Sep 3 00:18:39 2006 UTC vs.
Revision 1.9 by root, Thu May 17 21:32:08 2007 UTC

1 1/*
2 * CrossFire, A Multiplayer game
3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5 * Copyright (C) Mark Wedel & Crossfire Development Team
6 * Copyright (C) Frank Tore Johansen
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de>
23 */
24
2/* Started file Sept 1996 - initialization of gods in form of a 25/* Started file Sept 1996 - initialization of gods in form of a
3 * linked list -b.t. 26 * linked list -b.t.
4 */ 27 */
5 28
6#include <global.h> 29#include <global.h>
7#include <living.h> 30#include <living.h>
8#include <spells.h> 31#include <spells.h>
9 32
10//TODO: make a constructor 33//TODO: make a constructor
11static godlink *init_godslist(void) { 34static godlink *
35init_godslist (void)
36{
12 godlink *gl = new godlink; 37 godlink *gl = new godlink;
13 38
14 // name=NULL; /* how to describe the god to the player */ 39 // name=NULL; /* how to describe the god to the player */
15 // arch=NULL; /* pointer to the archetype of this god */ 40 // arch=NULL; /* pointer to the archetype of this god */
16 // id=0; /* id of the god */ 41 // id=0; /* id of the god */
17 // pantheon=NULL; /* the group to which the god belongs (not implemented) */ 42 // pantheon=NULL; /* the group to which the god belongs (not implemented) */
18 // next=NULL; /* next god in this linked list */ 43 // next=NULL; /* next god in this linked list */
19 44
20 return gl; 45 return gl;
21} 46}
22 47
23/* init_gods() - this takes a look at all of the archetypes to find 48/* init_gods() - this takes a look at all of the archetypes to find
24 * the objects which correspond to the GODS (type GOD) */ 49 * the objects which correspond to the GODS (type GOD) */
25 50
51void
26void init_gods (void) { 52init_gods (void)
27 archetype *at=NULL; 53{
28
29 LOG(llevDebug, "Initializing gods..."); 54 LOG (llevDebug, "Initialising gods...\n");
55
30 for(at=first_archetype;at!=NULL;at=at->next) 56 for (archetype *at = first_archetype; at; at = at->next)
31 if(at->clone.type==GOD) add_god_to_list(at); 57 if (at->clone.type == GOD)
32 58 add_god_to_list (at);
59
33 LOG(llevDebug,"done.\n"); 60 LOG (llevDebug, "done.\n");
34} 61}
35 62
36/* add_god_to_list()- called only from init_gods */ 63/* add_god_to_list()- called only from init_gods */
64void
37void add_god_to_list (archetype *god_arch) { 65add_god_to_list (archetype *god_arch)
66{
38 godlink *god; 67 godlink *god;
39 68
40 if(!god_arch) { 69 if (!god_arch)
70 {
41 LOG(llevError,"ERROR: Tried to add null god to list!\n"); 71 LOG (llevError, "ERROR: Tried to add null god to list!\n");
42 return; 72 return;
43 } 73 }
44 74
45 god = init_godslist(); 75 god = init_godslist ();
46 76
47 god->arch = god_arch; 77 god->arch = god_arch;
48 god->name = god_arch->clone.name; 78 god->name = god_arch->clone.name;
49 if(!first_god) 79 if (!first_god)
50 god->id = 1; 80 god->id = 1;
51 else { 81 else
82 {
52 god->id = first_god->id + 1; 83 god->id = first_god->id + 1;
53 god->next = first_god; 84 god->next = first_god;
54 } 85 }
55 first_god = god; 86 first_god = god;
56 87
57#ifdef DEBUG_GODS 88#ifdef DEBUG_GODS
58 LOG(llevDebug,"Adding god %s (%d) to list\n",&god->name,god->id); 89 LOG (llevDebug, "Adding god %s (%d) to list\n", &god->name, god->id);
59#endif 90#endif
60} 91}
61 92
62/* baptize_altar() - (cosmetically) change the name to that of the 93/* baptize_altar() - (cosmetically) change the name to that of the
63 * god in question, then set the title for later use. -b.t. 94 * god in question, then set the title for later use. -b.t.
64 */ 95 */
65 96
97int
66int baptize_altar(object *op) { 98baptize_altar (object *op)
99{
67 char buf[MAX_BUF]; 100 char buf[MAX_BUF];
68 101
69 /* if the title field is pre-set, then that altar is 102 /* if the title field is pre-set, then that altar is
70 * already dedicated. */ 103 * already dedicated. */
71 if(!op->title) { 104 if (!op->title)
105 {
72 godlink *god=get_rand_god(); 106 godlink *god = get_rand_god ();
107
73 if(!god||!god->name) { 108 if (!god || !god->name)
109 {
74 LOG(llevError,"baptise_altar(): bizarre nameless god!\n"); 110 LOG (llevError, "baptise_altar(): bizarre nameless god!\n");
75 return 0; 111 return 0;
76 } 112 }
77 /* if the object name hasnt' been changed, we tack on the gods name */ 113 /* if the object name hasnt' been changed, we tack on the gods name */
78 if(!strcmp(op->name,op->arch->clone.name)) { 114 if (!strcmp (op->name, op->arch->clone.name))
115 {
79 sprintf(buf,"%s of %s",&op->name,&god->name); 116 sprintf (buf, "%s of %s", &op->name, &god->name);
80 op->name = buf; 117 op->name = buf;
81 } 118 }
82 op->title = god->name; 119 op->title = god->name;
83 return 1; 120 return 1;
84 } 121 }
85 return 0; 122 return 0;
86} 123}
87 124
88godlink * get_rand_god ( void ) { 125godlink *
126get_rand_god (void)
127{
89 godlink *god=first_god; 128 godlink *god = first_god;
90 int i; 129 int i;
91 130
92 if(god) 131 if (god)
93 for(i=RANDOM()%(god->id)+1;god;god=god->next) 132 for (i = rndm (god->id) + 1; god; god = god->next)
94 if(god->id==i) break; 133 if (god->id == i)
95 134 break;
135
136 if (!god)
96 if(!god) LOG(llevError,"get_rand_god(): can't find a random god!\n"); 137 LOG (llevError, "get_rand_god(): can't find a random god!\n");
138
97 return god; 139 return god;
98} 140}
99 141
100/* pntr_to_god_obj() - returns a pointer to the object 142/* pntr_to_god_obj() - returns a pointer to the object
101 * We need to be VERY carefull about using this, as we 143 * We need to be VERY carefull about using this, as we
102 * are returning a pointer to the CLONE object. -b.t. 144 * are returning a pointer to the CLONE object. -b.t.
103 */ 145 */
146object *
104object *pntr_to_god_obj(godlink *godlnk) { 147pntr_to_god_obj (godlink *godlnk)
148{
105 object *god=NULL; 149 object *god = NULL;
106 150
107 if(godlnk && godlnk->arch) 151 if (godlnk && godlnk->arch)
108 god=&godlnk->arch->clone; 152 god = &godlnk->arch->clone;
109 return god; 153 return god;
110} 154}
111 155
156void
112void free_all_god(void) { 157free_all_god (void)
158{
113 godlink *god, *godnext; 159 godlink *god, *godnext;
114 160
115 LOG(llevDebug,"Freeing god information\n"); 161 LOG (llevDebug, "Freeing god information\n");
116 for (god=first_god; god; god=godnext) { 162 for (god = first_god; god; god = godnext)
163 {
117 godnext=god->next; 164 godnext = god->next;
118 delete god; 165 delete god;
119 } 166 }
120} 167}
121
122

Diff Legend

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