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

Comparing deliantra/server/server/c_party.C (file contents):
Revision 1.2 by root, Tue Aug 29 08:01:37 2006 UTC vs.
Revision 1.11 by root, Tue Dec 26 08:54:59 2006 UTC

1/*
2 * static char *rcsid_c_party_c =
3 * "$Id: c_party.C,v 1.2 2006/08/29 08:01:37 root Exp $";
4 */
5
6/* 1/*
7 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
8 3
9 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
10 Copyright (C) 1992 Frank Tore Johansen 5 Copyright (C) 1992 Frank Tore Johansen
… …
21 16
22 You should have received a copy of the GNU General Public License 17 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software 18 along with this program; if not, write to the Free Software
24 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 20
26 The authors can be reached via e-mail at crossfire-devel@real-time.com 21 The authors can be reached via e-mail at <crossfire@schmorp.de>
27*/ 22*/
28 23
29#include <global.h> 24#include <global.h>
30#ifndef __CEXTRACT__
31#include <sproto.h> 25#include <sproto.h>
32#endif
33#include <spells.h> 26#include <spells.h>
34 27
35#ifdef COZY_SERVER 28#ifdef COZY_SERVER
36// used for pet monster logic etc. 29// used for pet monster logic etc.
30int
37int same_party (partylist *a, partylist *b) 31same_party (partylist *a, partylist *b)
38{ 32{
39 return a == b && a; 33 return a == b && a;
40} 34}
41#endif 35#endif
42 36
43static partylist * firstparty=NULL; /* Keeps track of first party in list */ 37static partylist *firstparty = NULL; /* Keeps track of first party in list */
44static partylist * lastparty=NULL; /*Keeps track of last party in list */ 38static partylist *lastparty = NULL; /*Keeps track of last party in list */
45 39
40partylist *
46partylist* get_firstparty(void) 41get_firstparty (void)
47{ 42{
48 return firstparty; 43 return firstparty;
49} 44}
50 45
51void remove_party(partylist *target_party); 46void remove_party (partylist *target_party);
52 47
53/* Forms the party struct for a party called 'params'. it is the responsibility 48/* Forms the party struct for a party called 'params'. it is the responsibility
54 * of the caller to ensure that the name is unique, and that it is placed in the 49 * of the caller to ensure that the name is unique, and that it is placed in the
55 * main party list correctly */ 50 * main party list correctly */
51static partylist *
56static partylist *form_party(object *op, const char *params) { 52form_party (object *op, const char *params)
57 53{
58 partylist * newparty; 54 partylist *newparty;
59 55
60 newparty = (partylist *)malloc(sizeof(partylist)); 56 newparty = (partylist *) malloc (sizeof (partylist));
61 newparty->partyname = strdup_local(params); 57 newparty->partyname = strdup (params);
62 newparty->total_exp=0; 58 newparty->total_exp = 0;
63 newparty->kills=0; 59 newparty->kills = 0;
64 newparty->passwd[0] = '\0'; 60 newparty->passwd[0] = '\0';
65 newparty->next = NULL; 61 newparty->next = NULL;
66 newparty->partyleader = strdup_local(op->name); 62 newparty->partyleader = strdup (op->name);
67 new_draw_info_format(NDI_UNIQUE, 0, op, 63 new_draw_info_format (NDI_UNIQUE, 0, op, "You have formed party: %s", newparty->partyname);
68 "You have formed party: %s",newparty->partyname);
69 op->contr->party=newparty; 64 op->contr->party = newparty;
65
70 return newparty; 66 return newparty;
71} 67}
72 68
69void
73void remove_party(partylist *target_party) { 70remove_party (partylist *target_party)
71{
74 partylist *tmpparty; 72 partylist *tmpparty;
75 partylist *previousparty; 73 partylist *previousparty;
76 partylist *nextparty; 74 partylist *nextparty;
77 player *pl; 75 player *pl;
76
77 if (firstparty == NULL)
78 78 {
79 if (firstparty==NULL) {
80 LOG(llevError, "remove_party(): I was asked to remove party %s, but no parties are defined", 79 LOG (llevError, "remove_party(): I was asked to remove party %s, but no parties are defined", target_party->partyname);
80 return;
81 }
82
83 for_all_players (pl)
84 if (pl->party == target_party)
85 pl->party = NULL;
86
87 /* special case-ism for parties at the beginning and end of the list */
88 if (target_party == firstparty)
89 {
90 firstparty = firstparty->next;
91
92 if (target_party->partyleader)
93 free (target_party->partyleader);
94
95 if (target_party->partyname)
96 free (target_party->partyname);
97
98 free (target_party);
99 return;
100 }
101 else if (target_party == lastparty)
102 {
103 for (tmpparty = firstparty; tmpparty->next != NULL; tmpparty = tmpparty->next)
104 {
105 if (tmpparty->next == target_party)
106 {
107 lastparty = tmpparty;
108
109 if (target_party->partyleader)
110 free (target_party->partyleader);
111
81 target_party->partyname); 112 if (target_party->partyname)
113 free (target_party->partyname);
114
115 free (target_party);
116 lastparty->next = NULL;
117 return;
118 }
119 }
120 }
121 for (tmpparty = firstparty; tmpparty->next != NULL; tmpparty = tmpparty->next)
122 if (tmpparty->next == target_party)
123 {
124 previousparty = tmpparty;
125 nextparty = tmpparty->next->next;
126 /* this should be safe, because we already dealt with the lastparty case */
127
128 previousparty->next = nextparty;
129 if (target_party->partyleader)
130 free (target_party->partyleader);
131 if (target_party->partyname)
132 free (target_party->partyname);
133 free (target_party);
82 return; 134 return;
83 }
84 for (pl=first_player;pl!=NULL;pl=pl->next)
85 if (pl->party==target_party) pl->party=NULL;
86
87 /* special case-ism for parties at the beginning and end of the list */
88 if (target_party==firstparty) {
89 firstparty=firstparty->next;
90 if (target_party->partyleader) free(target_party->partyleader);
91 if (target_party->partyname) free(target_party->partyname);
92 free(target_party);
93 return;
94 }
95 else if (target_party == lastparty) {
96 for (tmpparty=firstparty;tmpparty->next!=NULL;tmpparty=tmpparty->next) {
97 if (tmpparty->next==target_party) {
98 lastparty=tmpparty;
99 if (target_party->partyleader) free(target_party->partyleader);
100 if (target_party->partyname) free(target_party->partyname);
101 free(target_party);
102 lastparty->next=NULL;
103 return;
104 }
105 } 135 }
106 }
107 for (tmpparty=firstparty;tmpparty->next!=NULL;tmpparty=tmpparty->next)
108 if (tmpparty->next == target_party) {
109 previousparty=tmpparty;
110 nextparty=tmpparty->next->next;
111 /* this should be safe, because we already dealt with the lastparty case */
112
113 previousparty->next=nextparty;
114 if (target_party->partyleader) free(target_party->partyleader);
115 if (target_party->partyname) free(target_party->partyname);
116 free(target_party);
117 return;
118 }
119} 136}
120 137
121/* Remove unused parties, this could be made to scale a lot better. */ 138/* Remove unused parties, this could be made to scale a lot better. */
139void
122void obsolete_parties(void) { 140obsolete_parties (void)
141{
123 int player_count; 142 int player_count;
124 player *pl; 143 player *pl;
125 partylist *party; 144 partylist *party;
126 partylist* next = NULL; 145 partylist *next = NULL;
127 146
147 if (!firstparty)
128 if (!firstparty) return; /* we can't obsolete parties if there aren't any */ 148 return; /* we can't obsolete parties if there aren't any */
129 for (party=firstparty; party!=NULL; party=next) { 149 for (party = firstparty; party != NULL; party = next)
150 {
130 next = party->next; 151 next = party->next;
131 player_count=0; 152 player_count = 0;
132 for (pl=first_player;pl!=NULL;pl=pl->next) 153 for_all_players (pl)
133 if (pl->party==party) player_count++; 154 if (pl->party == party)
155 player_count++;
134 if (player_count == 0) 156 if (player_count == 0)
135 remove_party(party); 157 remove_party (party);
136 } 158 }
137} 159}
138 160
139#ifdef PARTY_KILL_LOG 161#ifdef PARTY_KILL_LOG
162void
140void add_kill_to_party(partylist *party, char *killer, char *dead, long exp) 163add_kill_to_party (partylist *party, char *killer, char *dead, long exp)
141{ 164{
142 int i,pos; 165 int i, pos;
143 166
144 if(party==NULL) return; 167 if (party == NULL)
168 return;
145 if(party->kills>=PARTY_KILL_LOG) 169 if (party->kills >= PARTY_KILL_LOG)
146 { 170 {
147 pos=PARTY_KILL_LOG-1; 171 pos = PARTY_KILL_LOG - 1;
148 for(i=0;i<PARTY_KILL_LOG-1;i++) 172 for (i = 0; i < PARTY_KILL_LOG - 1; i++)
149 memcpy(&(party->party_kills[i]),&(party->party_kills[i+1]), 173 party->party_kills[i] = party->party_kills[i + 1];
150 sizeof(party->party_kills[0]));
151 } 174 }
152 else 175 else
153 pos=party->kills; 176 pos = party->kills;
154 party->kills++; 177 party->kills++;
155 party->total_exp+=exp; 178 party->total_exp += exp;
156 party->party_kills[pos].exp=exp; 179 party->party_kills[pos].exp = exp;
157 strncpy(party->party_kills[pos].killer,killer,MAX_NAME); 180 assign (party->party_kills[pos].killer, killer);
158 strncpy(party->party_kills[pos].dead,dead,MAX_NAME); 181 assign (party->party_kills[pos].dead, dead);
159 party->party_kills[pos].killer[MAX_NAME]=0; 182 party->party_kills[pos].killer[MAX_NAME] = 0;
160 party->party_kills[pos].dead[MAX_NAME]=0; 183 party->party_kills[pos].dead[MAX_NAME] = 0;
161} 184}
162#endif 185#endif
163 186
187int
164int confirm_party_password(object *op) { 188confirm_party_password (object *op)
189{
165 partylist *tmppartylist; 190 partylist *tmppartylist;
191
166 for(tmppartylist = firstparty; tmppartylist != NULL;tmppartylist = tmppartylist->next) { 192 for (tmppartylist = firstparty; tmppartylist != NULL; tmppartylist = tmppartylist->next)
193 {
167 if(!strcmp(op->contr->party_to_join->partyname, tmppartylist->partyname)) { 194 if (!strcmp (op->contr->party_to_join->partyname, tmppartylist->partyname))
195 {
168 if(strcmp(op->contr->write_buf+1,tmppartylist->passwd) == 0) 196 if (strcmp (op->contr->write_buf + 1, tmppartylist->passwd) == 0)
169 return 0; 197 return 0;
170 else 198 else
171 return 1; 199 return 1;
172 } 200 }
173 } 201 }
174 return 1; 202 return 1;
175} 203}
176 204
205void
177void receive_party_password(object *op, char k) { 206receive_party_password (object *op, char k)
178 207{
208
179 if(confirm_party_password(op) == 0) { 209 if (confirm_party_password (op) == 0)
210 {
180 partylist* joined_party = op->contr->party_to_join; 211 partylist *joined_party = op->contr->party_to_join;
181 char buf[ MAX_BUF ]; 212 char buf[MAX_BUF];
213
182 op->contr->party = op->contr->party_to_join; 214 op->contr->party = op->contr->party_to_join;
183 op->contr->party_to_join = NULL; 215 op->contr->party_to_join = NULL;
184 new_draw_info_format(NDI_UNIQUE, 0,op, 216 new_draw_info_format (NDI_UNIQUE, 0, op, "You have joined party: %s\n", joined_party->partyname);
185 "You have joined party: %s\n",joined_party->partyname);
186 snprintf( buf, MAX_BUF, "%s joins party %s", op->name, joined_party->partyname ); 217 snprintf (buf, MAX_BUF, "%s joins party %s", &op->name, joined_party->partyname);
187 send_party_message( op, buf ); 218 send_party_message (op, buf);
188 op->contr->state = ST_PLAYING; 219 op->contr->ns->state = ST_PLAYING;
189 return; 220 return;
190 } 221 }
191 else { 222 else
223 {
192 new_draw_info(NDI_UNIQUE, 0,op,"You entered the wrong password"); 224 new_draw_info (NDI_UNIQUE, 0, op, "You entered the wrong password");
193 op->contr->party_to_join = NULL; 225 op->contr->party_to_join = NULL;
194 op->contr->state = ST_PLAYING; 226 op->contr->ns->state = ST_PLAYING;
195 return; 227 return;
196 } 228 }
197} 229}
198 230
231void
199void send_party_message(object *op,char *msg) 232send_party_message (object *op, char *msg)
200{ 233{
201 player *pl; 234 player *pl;
202 for(pl=first_player;pl!=NULL;pl=pl->next) 235
236 for_all_players (pl)
203 if(pl->ob->contr->party==op->contr->party && pl->ob!=op) 237 if (pl->ob->contr->party == op->contr->party && pl->ob != op)
204 new_draw_info(NDI_WHITE, 0, pl->ob, msg); 238 new_draw_info (NDI_WHITE, 0, pl->ob, msg);
205} 239}
206 240
241int
207int command_gsay(object *op, char *params) 242command_gsay (object *op, char *params)
208{ 243{
209 char party_params[MAX_BUF]; 244 char party_params[MAX_BUF];
210 245
211 if (!params) return 0; 246 if (!params)
247 return 0;
212 strcpy(party_params, "say "); 248 strcpy (party_params, "say ");
213 strcat(party_params,params); 249 strcat (party_params, params);
214 command_party(op,party_params); 250 command_party (op, party_params);
215 return 0; 251 return 0;
216} 252}
217 253
218 254
255int
219int command_party (object *op, char *params) 256command_party (object *op, char *params)
220{ 257{
221 char buf[MAX_BUF]; 258 char buf[MAX_BUF];
222 partylist *tmpparty, *oldparty; /* For iterating over linked list */ 259 partylist *tmpparty, *oldparty; /* For iterating over linked list */
223 char * currentparty; /* For iterating over linked list */ 260 char *currentparty; /* For iterating over linked list */
224 261
225 if(params == NULL) { 262 if (params == NULL)
263 {
226 if(op->contr->party==NULL) { 264 if (op->contr->party == NULL)
265 {
227 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of any party."); 266 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
228 new_draw_info(NDI_UNIQUE, 0,op,"For help try: party help"); 267 new_draw_info (NDI_UNIQUE, 0, op, "For help try: party help");
268 }
269 else
229 } 270 {
230 else {
231 currentparty = op->contr->party->partyname; 271 currentparty = op->contr->party->partyname;
232 new_draw_info_format(NDI_UNIQUE, 0, op, 272 new_draw_info_format (NDI_UNIQUE, 0, op, "You are a member of party %s.", currentparty);
233 "You are a member of party %s.", currentparty);
234 } 273 }
235 return 1; 274 return 1;
236 } 275 }
276
237 if(strcmp(params, "help")==0) { 277 if (strcmp (params, "help") == 0)
278 {
238 new_draw_info(NDI_UNIQUE, 0,op,"To form a party type: party form <partyname>"); 279 new_draw_info (NDI_UNIQUE, 0, op, "To form a party type: party form <partyname>");
239 new_draw_info(NDI_UNIQUE, 0,op,"To join a party type: party join <partyname>"); 280 new_draw_info (NDI_UNIQUE, 0, op, "To join a party type: party join <partyname>");
240 new_draw_info(NDI_UNIQUE, 0,op,"If the party has a passwd, it will you prompt you for it."); 281 new_draw_info (NDI_UNIQUE, 0, op, "If the party has a passwd, it will you prompt you for it.");
241 new_draw_info(NDI_UNIQUE, 0,op,"For a list of current parties type: party list"); 282 new_draw_info (NDI_UNIQUE, 0, op, "For a list of current parties type: party list");
242 new_draw_info(NDI_UNIQUE, 0,op,"To leave a party type: party leave"); 283 new_draw_info (NDI_UNIQUE, 0, op, "To leave a party type: party leave");
243 new_draw_info(NDI_UNIQUE, 0,op,"To change a passwd for a party type: party passwd <password>"); 284 new_draw_info (NDI_UNIQUE, 0, op, "To change a passwd for a party type: party passwd <password>");
244 new_draw_info(NDI_UNIQUE, 0,op,"There is an 8 character max"); 285 new_draw_info (NDI_UNIQUE, 0, op, "There is an 8 character max");
245 new_draw_info(NDI_UNIQUE, 0,op,"To talk to party members type: party say <msg>"); 286 new_draw_info (NDI_UNIQUE, 0, op, "To talk to party members type: party say <msg>");
246 new_draw_info(NDI_UNIQUE, 0,op,"To see who is in your party: party who"); 287 new_draw_info (NDI_UNIQUE, 0, op, "To see who is in your party: party who");
247#ifdef PARTY_KILL_LOG 288#ifdef PARTY_KILL_LOG
248 new_draw_info(NDI_UNIQUE, 0,op,"To see what you've killed, type: party kills"); 289 new_draw_info (NDI_UNIQUE, 0, op, "To see what you've killed, type: party kills");
249#endif 290#endif
250 return 1; 291 return 1;
251 } 292 }
293
252#ifdef PARTY_KILL_LOG 294#ifdef PARTY_KILL_LOG
253 if(!strncmp(params, "kills",5)) 295 if (!strncmp (params, "kills", 5))
254 { 296 {
255 int i,max; 297 int i, max;
256 char chr; 298 char chr;
257 char buffer[80]; 299 char buffer[80];
258 float exp; 300 float exp;
259 301
260 if(op->contr->party==NULL) 302 if (op->contr->party == NULL)
261 { 303 {
262 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of any party."); 304 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
263 return 1; 305 return 1;
264 } 306 }
265 tmpparty = op->contr->party; 307 tmpparty = op->contr->party;
266 if(!tmpparty->kills) 308 if (!tmpparty->kills)
267 { 309 {
268 new_draw_info(NDI_UNIQUE,0,op,"You haven't killed anything yet."); 310 new_draw_info (NDI_UNIQUE, 0, op, "You haven't killed anything yet.");
269 return 1; 311 return 1;
270 } 312 }
271 max=tmpparty->kills-1; 313 max = tmpparty->kills - 1;
272 if(max>PARTY_KILL_LOG-1) max=PARTY_KILL_LOG-1; 314 if (max > PARTY_KILL_LOG - 1)
273 new_draw_info(NDI_UNIQUE,0,op, 315 max = PARTY_KILL_LOG - 1;
274 "Killed | Killer| Exp"); 316 new_draw_info (NDI_UNIQUE, 0, op, "Killed | Killer| Exp");
275 new_draw_info(NDI_UNIQUE,0,op, 317 new_draw_info (NDI_UNIQUE, 0, op, "----------------+----------------+--------");
276 "----------------+----------------+--------");
277 for(i=0;i<=max;i++) 318 for (i = 0; i <= max; i++)
278 { 319 {
279 exp=tmpparty->party_kills[i].exp; 320 exp = tmpparty->party_kills[i].exp;
280 chr=' '; 321 chr = ' ';
281 if(exp>1000000) { exp/=1000000; chr='M'; } 322 if (exp > 1000000)
323 {
324 exp /= 1000000;
325 chr = 'M';
326 }
327 else if (exp > 1000)
328 {
329 exp /= 1000;
330 chr = 'k';
331 }
332 sprintf (buffer, "%16s|%16s|%6.1f%c", tmpparty->party_kills[i].dead, tmpparty->party_kills[i].killer, exp, chr);
333 new_draw_info (NDI_UNIQUE, 0, op, buffer);
334 }
335 exp = tmpparty->total_exp;
336 chr = ' ';
337 if (exp > 1000000)
338 {
339 exp /= 1000000;
340 chr = 'M';
341 }
342 else if (exp > 1000)
343 {
344 exp /= 1000;
345 chr = 'k';
346 }
347 new_draw_info (NDI_UNIQUE, 0, op, "----------------+----------------+--------");
348 sprintf (buffer, "Totals: %d kills, %.1f%c exp", tmpparty->kills, exp, chr);
349 new_draw_info (NDI_UNIQUE, 0, op, buffer);
350 return 1;
351 }
352#endif /* PARTY_KILL_LOG */
353
354 if (strncmp (params, "say ", 4) == 0)
355 {
356 if (op->contr->party == NULL)
357 {
358 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
359 return 1;
360 }
361 params += 4;
362 currentparty = op->contr->party->partyname;
363 snprintf (buf, MAX_BUF - 1, "[%s] %s says: %s", currentparty, &op->name, params);
364 send_party_message (op, buf);
365 new_draw_info_format (NDI_LT_GREEN | NDI_UNIQUE, 0, op, "[%s] You say: %s", currentparty, params);
366 return 1;
367 }
368
369 if (strncmp (params, "form ", 5) == 0)
370 {
371 int player_count;
372 player *pl;
373
374 params += 5;
375 if (op->contr->party)
376 oldparty = op->contr->party;
377 else
378 oldparty = NULL;
379
380 if (firstparty)
381 {
382 for (tmpparty = firstparty; tmpparty != NULL; tmpparty = tmpparty->next)
383 {
384 if (!strcmp (tmpparty->partyname, params))
385 {
386 new_draw_info_format (NDI_UNIQUE, 0, op, "The party %s already exists, pick another name", params);
387 return 1;
388 }
389 }
390 lastparty->next = form_party (op, params);
391 lastparty = lastparty->next;
392 }
393 else
394 {
395 firstparty = form_party (op, params);
396 lastparty = firstparty;
397 }
398 /*
399 * The player might have previously been a member of a party, if so, he will be leaving
400 * it, so check if there are any other members and if not, delete the party
401 */
402 player_count = 0;
403 if (oldparty)
404 {
405 for (pl = first_player; pl->next != NULL; pl = pl->next)
406 {
407 if (pl->party == oldparty)
408 player_count++;
409 }
410 if (player_count == 0)
411 remove_party (oldparty);
412 }
413 return 0;
414 } /* form */
415
416 if (strcmp (params, "leave") == 0)
417 {
418 if (op->contr->party == NULL)
419 {
420 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
421 return 1;
422 }
423 currentparty = op->contr->party->partyname;
424 new_draw_info_format (NDI_UNIQUE, 0, op, "You leave party %s.", currentparty);
425 sprintf (buf, "%s leaves party %s.", &op->name, currentparty);
426 send_party_message (op, buf);
427 op->contr->party = NULL;
428 return 1;
429 }
430
431 if (strcmp (params, "who") == 0)
432 {
433 player *pl;
434
435 tmpparty = op->contr->party;
436 if (op->contr->party == NULL)
437 {
438 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
439 return 1;
440 }
441 new_draw_info_format (NDI_UNIQUE, 0, op, "Members of party: %s.", op->contr->party->partyname);
442 for_all_players (pl)
443 if (pl->ob->contr->party == op->contr->party)
444 {
445 if (settings.set_title == TRUE)
446 {
447 if (pl->ob->contr->own_title[0] != '\0')
448 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->own_title);
449 else
450 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->title);
451 }
452 else
453 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->title);
454 new_draw_info (NDI_UNIQUE, 0, op, buf);
455 }
456 return 1;
457 } /* leave */
458
459 if (strncmp (params, "passwd ", 7) == 0)
460 {
461 partylist *tmplist;
462
463 params += 7;
464
465 if (op->contr->party == NULL)
466 {
467 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of a party");
468 return 1;
469 }
470
471 if (strlen (params) > 8)
472 {
473 new_draw_info (NDI_UNIQUE, 0, op, "The password must not exceed 8 characters");
474 return 1;
475 }
476
477 tmplist = firstparty;
478 while (tmplist != NULL)
479 {
480 if (tmplist == op->contr->party)
481 {
482 strcpy (tmplist->passwd, params);
483 new_draw_info_format (NDI_UNIQUE, 0, op, "The password for party %s is %s", tmplist->partyname, tmplist->passwd);
484 snprintf (buf, MAX_BUF, "Password for party %s is now %s, changed by %s", tmplist->partyname, tmplist->passwd, &op->name);
485 send_party_message (op, buf);
486 return 0;
487 }
488 tmplist = tmplist->next;
489 }
490 return 0;
491 } /* passwd */
492
493 if (strcmp (params, "list") == 0)
494 {
495 partylist *tmplist;
496
497 tmplist = firstparty;
498
499 if (firstparty == NULL)
500 {
501 new_draw_info (NDI_UNIQUE, 0, op, "There are no parties active right now");
502 return 1;
503 }
504
505 new_draw_info (NDI_UNIQUE, 0, op, "Party name Leader");
506 new_draw_info (NDI_UNIQUE, 0, op, "---------- ------");
507
508 while (tmplist != NULL)
509 {
510 new_draw_info_format (NDI_UNIQUE, 0, op, "%-32s %s", tmplist->partyname, tmplist->partyleader);
511 tmplist = tmplist->next;
512 }
513 return 0;
514 } /* list */
515
516 if (strncmp (params, "join ", 5) == 0)
517 {
518
519 params += 5;
520
521 /* Can't join a party cause non exist */
522 if (firstparty == NULL)
523 {
524 new_draw_info_format (NDI_UNIQUE, 0, op, "Party: %s does not exist. You must form it first", params);
525 return 1;
526 }
527
528 /* Special case if thier is only one party */
529 if (firstparty->next == NULL)
530 {
531 if (strcmp (firstparty->partyname, params) != 0)
532 {
533 new_draw_info_format (NDI_UNIQUE, 0, op, "Party: %s does not exist. You must form it first", params);
534 return 1;
535 }
282 else 536 else
283 if(exp>1000) { exp/=1000; chr='k'; } 537 {
284 sprintf(buffer,"%16s|%16s|%6.1f%c", 538 if (op->contr->party == firstparty)
285 tmpparty->party_kills[i].dead, 539 {
286 tmpparty->party_kills[i].killer,exp,chr); 540 new_draw_info_format (NDI_UNIQUE, 0, op, "You are already in party: %s", firstparty->partyname);
287 new_draw_info(NDI_UNIQUE,0,op,buffer); 541 return 1;
542 }
543 /* found party player wants to join */
544 if (firstparty->passwd[0] == '\0')
545 {
546 op->contr->party = firstparty;
547 new_draw_info_format (NDI_UNIQUE, 0, op, "You have joined party: %s", firstparty->partyname);
548 snprintf (buf, MAX_BUF, "%s joins party %s", &op->name, firstparty->partyname);
549 send_party_message (op, buf);
550 return 0;
551 }
552 else
553 {
554 get_party_password (op, firstparty);
555 return 0;
556 }
557 }
558 }
559
560 tmpparty = firstparty;
561 while (tmpparty != NULL)
288 } 562 {
289 exp=tmpparty->total_exp; 563 if (strcmp (tmpparty->partyname, params) == 0)
290 chr=' '; 564 {
291 if(exp>1000000) { exp/=1000000; chr='M'; } 565 if (op->contr->party == tmpparty)
566 {
567 new_draw_info_format (NDI_UNIQUE, 0, op, "You are already a member of party: %s", tmpparty->partyname);
568 return 1;
569 }
570 else
571 {
572 if (tmpparty->passwd[0] == '\0')
573 {
574 new_draw_info_format (NDI_UNIQUE, 0, op, "You have joined party: %s", tmpparty->partyname);
575 op->contr->party = tmpparty;
576 snprintf (buf, MAX_BUF, "%s joins party %s", &op->name, tmpparty->partyname);
577 send_party_message (op, buf);
578 return 0;
579 }
580 else
581 {
582 get_party_password (op, tmpparty);
583 return 0;
584 }
585 }
586 }
292 else 587 else
293 if(exp>1000) { exp/=1000; chr='k'; } 588 tmpparty = tmpparty->next;
294 new_draw_info(NDI_UNIQUE,0,op, 589 }
295 "----------------+----------------+--------"); 590
296 sprintf(buffer,"Totals: %d kills, %.1f%c exp",tmpparty->kills, 591 new_draw_info_format (NDI_UNIQUE, 0, op, "Party %s does not exist. You must form it first.", params);
297 exp,chr);
298 new_draw_info(NDI_UNIQUE,0,op,buffer);
299 return 1; 592 return 1;
300 } 593 } /* join */
301#endif /* PARTY_KILL_LOG */
302 if(strncmp(params, "say ", 4)==0)
303 {
304 if(op->contr->party==NULL)
305 {
306 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of any party.");
307 return 1;
308 }
309 params += 4;
310 currentparty = op->contr->party->partyname;
311 snprintf(buf,MAX_BUF-1, "[%s] %s says: %s", currentparty, op->name, params);
312 send_party_message(op,buf);
313 new_draw_info_format(NDI_WHITE, 0,op,"[%s] You say: %s", currentparty, params);
314 return 1;
315 }
316 594
317 if(strncmp(params, "form ",5) == 0) {
318 int player_count;
319 player *pl;
320
321 params += 5;
322 if (op->contr->party) oldparty = op->contr->party;
323 else oldparty = NULL;
324
325 if (firstparty) {
326 for (tmpparty = firstparty; tmpparty != NULL;tmpparty = tmpparty->next) {
327 if (!strcmp(tmpparty->partyname, params)) {
328 new_draw_info_format(NDI_UNIQUE, 0,op,
329 "The party %s already exists, pick another name",params);
330 return 1;
331 }
332 }
333 lastparty->next=form_party(op, params);
334 lastparty = lastparty->next;
335 }
336 else {
337 firstparty=form_party(op, params);
338 lastparty=firstparty;
339 }
340 /*
341 * The player might have previously been a member of a party, if so, he will be leaving
342 * it, so check if there are any other members and if not, delete the party
343 */
344 player_count=0;
345 if (oldparty) {
346 for (pl=first_player;pl->next!=NULL;pl=pl->next) {
347 if (pl->party==oldparty) player_count++;
348 }
349 if (player_count == 0)
350 remove_party(oldparty);
351 }
352 return 0;
353 } /* form */
354
355 if(strcmp(params, "leave")==0) {
356 if(op->contr->party==NULL)
357 {
358 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of any party.");
359 return 1;
360 }
361 currentparty = op->contr->party->partyname;
362 new_draw_info_format(NDI_UNIQUE, 0, op,
363 "You leave party %s.",currentparty);
364 sprintf(buf,"%s leaves party %s.",op->name,currentparty);
365 send_party_message(op,buf);
366 op->contr->party=NULL;
367 return 1;
368 }
369 if(strcmp(params, "who")==0) {
370 player *pl;
371 tmpparty = op->contr->party;
372 if(op->contr->party==NULL) {
373 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of any party.");
374 return 1;
375 }
376 new_draw_info_format(NDI_UNIQUE, 0, op,
377 "Members of party: %s.", op->contr->party->partyname);
378 for(pl=first_player;pl!=NULL;pl=pl->next)
379 if(pl->ob->contr->party==op->contr->party) {
380 if (settings.set_title == TRUE) {
381 if(pl->ob->contr->own_title[0]!='\0')
382 sprintf(buf,"%3d %s the %s",
383 pl->ob->level,pl->ob->name,pl->ob->contr->own_title);
384 else
385 sprintf(buf,"%3d %s the %s",
386 pl->ob->level,pl->ob->name,pl->ob->contr->title);
387 } else
388 sprintf(buf,"%3d %s the %s",
389 pl->ob->level,pl->ob->name,pl->ob->contr->title);
390 new_draw_info(NDI_UNIQUE, 0,op,buf);
391 }
392 return 1;
393 } /* leave */
394
395 if(strncmp(params, "passwd ", 7) == 0) {
396 partylist *tmplist;
397
398 params += 7;
399
400 if(op->contr->party == NULL) {
401 new_draw_info(NDI_UNIQUE, 0,op,"You are not a member of a party");
402 return 1;
403 }
404
405 if(strlen(params) > 8) {
406 new_draw_info(NDI_UNIQUE, 0,op,"The password must not exceed 8 characters");
407 return 1;
408 }
409
410 tmplist = firstparty;
411 while(tmplist != NULL) {
412 if(tmplist == op->contr->party) {
413 strcpy(tmplist->passwd,params);
414 new_draw_info_format(NDI_UNIQUE, 0, op,
415 "The password for party %s is %s", tmplist->partyname,tmplist->passwd);
416 snprintf( buf, MAX_BUF, "Password for party %s is now %s, changed by %s",
417 tmplist->partyname, tmplist->passwd, op->name );
418 send_party_message(op,buf);
419 return 0;
420 }
421 tmplist = tmplist->next;
422 }
423 return 0;
424 } /* passwd */
425
426 if(strcmp(params, "list") == 0) {
427 partylist * tmplist;
428
429 tmplist = firstparty;
430
431 if(firstparty == NULL) {
432 new_draw_info(NDI_UNIQUE, 0,op,"There are no parties active right now");
433 return 1;
434 }
435
436 new_draw_info(NDI_UNIQUE, 0,op,"Party name Leader");
437 new_draw_info(NDI_UNIQUE, 0,op,"---------- ------");
438
439 while(tmplist != NULL) {
440 new_draw_info_format(NDI_UNIQUE, 0,op,
441 "%-32s %s",tmplist->partyname
442 ,tmplist->partyleader);
443 tmplist = tmplist->next;
444 }
445 return 0;
446 } /* list */
447
448 if(strncmp(params,"join ",5) == 0) {
449
450 params += 5;
451
452 /* Can't join a party cause non exist */
453 if(firstparty == NULL) {
454 new_draw_info_format(NDI_UNIQUE, 0, op,
455 "Party: %s does not exist. You must form it first",params);
456 return 1;
457 }
458
459 /* Special case if thier is only one party */
460 if(firstparty->next == NULL) {
461 if(strcmp(firstparty->partyname,params) != 0) {
462 new_draw_info_format(NDI_UNIQUE, 0,op,
463 "Party: %s does not exist. You must form it first",params);
464 return 1;
465 }
466 else {
467 if(op->contr->party == firstparty) {
468 new_draw_info_format(NDI_UNIQUE, 0, op,
469 "You are already in party: %s"
470 ,firstparty->partyname);
471 return 1;
472 }
473 /* found party player wants to join */
474 if(firstparty->passwd[0] == '\0') {
475 op->contr->party = firstparty;
476 new_draw_info_format(NDI_UNIQUE, 0, op,
477 "You have joined party: %s",firstparty->partyname);
478 snprintf( buf, MAX_BUF, "%s joins party %s", op->name, firstparty->partyname );
479 send_party_message( op, buf );
480 return 0;
481 }
482 else {
483 get_party_password(op,firstparty);
484 return 0;
485 }
486 }
487 }
488
489 tmpparty = firstparty;
490 while(tmpparty != NULL) {
491 if(strcmp(tmpparty->partyname,params) == 0) {
492 if(op->contr->party == tmpparty) {
493 new_draw_info_format(NDI_UNIQUE, 0, op,
494 "You are already a member of party: %s"
495 ,tmpparty->partyname);
496 return 1;
497 }
498 else {
499 if(tmpparty->passwd[0] == '\0') {
500 new_draw_info_format(NDI_UNIQUE, 0, op,
501 "You have joined party: %s",tmpparty->partyname);
502 op->contr->party = tmpparty;
503 snprintf( buf, MAX_BUF, "%s joins party %s", op->name, tmpparty->partyname );
504 send_party_message( op, buf );
505 return 0;
506 }
507 else {
508 get_party_password(op, tmpparty);
509 return 0;
510 }
511 }
512 }
513 else
514 tmpparty = tmpparty->next;
515 }
516
517 new_draw_info_format(NDI_UNIQUE, 0,op,
518 "Party %s does not exist. You must form it first.",params);
519 return 1;
520 } /* join */
521
522 new_draw_info(NDI_UNIQUE, 0,op,"To form a party type: party form <partyname>"); 595 new_draw_info (NDI_UNIQUE, 0, op, "To form a party type: party form <partyname>");
523 new_draw_info(NDI_UNIQUE, 0,op,"To join a party type: party join <partyname>"); 596 new_draw_info (NDI_UNIQUE, 0, op, "To join a party type: party join <partyname>");
524 new_draw_info(NDI_UNIQUE, 0,op,"If the party has a passwd, it will you prompt you for it."); 597 new_draw_info (NDI_UNIQUE, 0, op, "If the party has a passwd, it will you prompt you for it.");
525 new_draw_info(NDI_UNIQUE, 0,op,"For a list of current parties type: party list"); 598 new_draw_info (NDI_UNIQUE, 0, op, "For a list of current parties type: party list");
526 new_draw_info(NDI_UNIQUE, 0,op,"To leave a party type: party leave"); 599 new_draw_info (NDI_UNIQUE, 0, op, "To leave a party type: party leave");
527 new_draw_info(NDI_UNIQUE, 0,op,"To change a passwd for a party type: party passwd <password>"); 600 new_draw_info (NDI_UNIQUE, 0, op, "To change a passwd for a party type: party passwd <password>");
528 new_draw_info(NDI_UNIQUE, 0,op,"There is an 8 character max"); 601 new_draw_info (NDI_UNIQUE, 0, op, "There is an 8 character max");
529 new_draw_info(NDI_UNIQUE, 0,op,"To talk to party members type: party say <msg>"); 602 new_draw_info (NDI_UNIQUE, 0, op, "To talk to party members type: party say <msg>");
530 new_draw_info(NDI_UNIQUE, 0,op,"To see who is in your party: party who"); 603 new_draw_info (NDI_UNIQUE, 0, op, "To see who is in your party: party who");
531#ifdef PARTY_KILL_LOG 604#ifdef PARTY_KILL_LOG
532 new_draw_info(NDI_UNIQUE, 0,op,"To see what you've killed, type: party kills"); 605 new_draw_info (NDI_UNIQUE, 0, op, "To see what you've killed, type: party kills");
533#endif 606#endif
534 return 1; 607 return 1;
535} 608}

Diff Legend

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