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

Comparing deliantra/server/server/c_wiz.C (file contents):
Revision 1.25 by root, Thu Dec 21 23:37:06 2006 UTC vs.
Revision 1.30 by pippijn, Sat Jan 6 14:42:30 2007 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
3 3
4 Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 Copyright (C) 1992 Frank Tore Johansen
6 7
7 This program is free software; you can redistribute it and/or modify 8 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by 9 it under the terms of the GNU General Public License as published by
… …
20 21
21 The authors can be reached via e-mail at <crossfire@schmorp.de> 22 The authors can be reached via e-mail at <crossfire@schmorp.de>
22*/ 23*/
23 24
24#include <global.h> 25#include <global.h>
25#ifndef __CEXTRACT__
26# include <sproto.h> 26#include <sproto.h>
27#endif
28#include <spells.h> 27#include <spells.h>
29#include <treasure.h> 28#include <treasure.h>
30#include <skills.h> 29#include <skills.h>
31 30
32/** Defines for DM item stack **/ 31/** Defines for DM item stack **/
… …
47 * other player, or NULL otherwise. 46 * other player, or NULL otherwise.
48 */ 47 */
49static player * 48static player *
50get_other_player_from_name (object *op, char *name) 49get_other_player_from_name (object *op, char *name)
51{ 50{
52 player *pl;
53
54 if (!name) 51 if (!name)
55 return NULL; 52 return NULL;
56 53
57 for (pl = first_player; pl != NULL; pl = pl->next) 54 for_all_players (pl)
58 if (!strncmp (pl->ob->name, name, MAX_NAME)) 55 if (!strncmp (pl->ob->name, name, MAX_NAME))
59 break;
60
61 if (pl == NULL)
62 { 56 {
63 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
64 return NULL;
65 }
66
67 if (pl->ob == op) 57 if (pl->ob == op)
68 { 58 {
69 new_draw_info (NDI_UNIQUE, 0, op, "You can't do that to yourself."); 59 new_draw_info (NDI_UNIQUE, 0, op, "You can't do that to yourself.");
70 return NULL; 60 return NULL;
71 } 61 }
72 62
73 if (pl->ns->state != ST_PLAYING) 63 if (pl->ns->state != ST_PLAYING)
74 { 64 {
75 new_draw_info (NDI_UNIQUE, 0, op, "That player is in no state for that right now."); 65 new_draw_info (NDI_UNIQUE, 0, op, "That player is in no state for that right now.");
76 return NULL; 66 return NULL;
67 }
68
69 return pl;
77 } 70 }
78 71
72 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
79 return pl; 73 return 0;
80} 74}
81 75
82/** 76/**
83 * Actually hides specified player (obviously a DM). 77 * Actually hides specified player (obviously a DM).
84 * If 'silent_dm' is non zero, other players are informed of DM entering/leaving, 78 * If 'silent_dm' is non zero, other players are informed of DM entering/leaving,
… …
232} 226}
233 227
234int 228int
235command_kick (object *op, char *params) 229command_kick (object *op, char *params)
236{ 230{
237 for (player *pl = first_player; pl; pl = pl->next) 231 for_all_players (pl)
238 if ((params == NULL || !strcmp (&pl->ob->name, params)) && !INVOKE_PLAYER (KICK, pl, ARG_STRING (params))) 232 if ((params == NULL || !strcmp (&pl->ob->name, params)) && !INVOKE_PLAYER (KICK, pl, ARG_STRING (params)))
239 { 233 {
240 object *op = pl->ob; 234 object *op = pl->ob;
241 235
242 if (!QUERY_FLAG (op, FLAG_REMOVED) && !QUERY_FLAG (op, FLAG_FREED)) 236 if (!QUERY_FLAG (op, FLAG_REMOVED) && !QUERY_FLAG (op, FLAG_FREED))
… …
249 } 243 }
250 244
251 return 1; 245 return 1;
252} 246}
253 247
248//TODO
249#if 0
254int 250int
255command_save_overlay (object *op, char *params) 251command_save_overlay (object *op, char *params)
256{ 252{
257 if (!op) 253 if (!op)
258 return 0; 254 return 0;
… …
269 265
270 ready_map_name (op->map->path, 0); 266 ready_map_name (op->map->path, 0);
271 267
272 return 1; 268 return 1;
273} 269}
270#endif
274 271
275int 272int
276command_shutdown (object *op, char *params) 273command_shutdown (object *op, char *params)
277{ 274{
278 if (op != NULL && !QUERY_FLAG (op, FLAG_WIZ)) 275 if (op && !QUERY_FLAG (op, FLAG_WIZ))
279 { 276 {
280 new_draw_info (NDI_UNIQUE, 0, op, "Sorry, you can't shutdown the server."); 277 new_draw_info (NDI_UNIQUE, 0, op, "Sorry, you can't shutdown the server.");
281 return 1; 278 return 1;
282 } 279 }
283 280
284 cleanup (); 281 cleanup ("dm initiated shutdown", 0);
282
285 /* not reached */ 283 /* not reached */
286 return 1; 284 return 1;
287} 285}
288 286
289int 287int
… …
328 object *dummy; 326 object *dummy;
329 player *pl; 327 player *pl;
330 328
331 if (!op) 329 if (!op)
332 return 0; 330 return 0;
331
333 if (params == NULL) 332 if (params == NULL)
334 { 333 {
335 new_draw_info (NDI_UNIQUE, 0, op, "Usage: arrest <player>."); 334 new_draw_info (NDI_UNIQUE, 0, op, "Usage: arrest <player>.");
336 return 1; 335 return 1;
337 } 336 }
337
338 pl = get_other_player_from_name (op, params); 338 pl = get_other_player_from_name (op, params);
339 if (!pl) 339 if (!pl)
340 return 1; 340 return 1;
341
341 dummy = get_jail_exit (pl->ob); 342 dummy = get_jail_exit (pl->ob);
342 if (!dummy) 343 if (!dummy)
343 { 344 {
344 /* we have nowhere to send the prisoner.... */ 345 /* we have nowhere to send the prisoner.... */
345 new_draw_info (NDI_UNIQUE, 0, op, "can't jail player, there is no map to hold them"); 346 new_draw_info (NDI_UNIQUE, 0, op, "can't jail player, there is no map to hold them");
346 return 0; 347 return 0;
347 } 348 }
348 enter_exit (pl->ob, dummy); 349
350 pl->ob->enter_exit (dummy);
349 dummy->destroy (); 351 dummy->destroy ();
350 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You have been arrested."); 352 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You have been arrested.");
351 new_draw_info (NDI_UNIQUE, 0, op, "OK."); 353 new_draw_info (NDI_UNIQUE, 0, op, "OK.");
352 LOG (llevInfo, "Player %s arrested by %s\n", &pl->ob->name, &op->name); 354 LOG (llevInfo, "Player %s arrested by %s\n", &pl->ob->name, &op->name);
353 return 1; 355 return 1;
… …
382 384
383 dummy = object::create (); 385 dummy = object::create ();
384 EXIT_PATH (dummy) = op->map->path; 386 EXIT_PATH (dummy) = op->map->path;
385 EXIT_X (dummy) = op->x + freearr_x[i]; 387 EXIT_X (dummy) = op->x + freearr_x[i];
386 EXIT_Y (dummy) = op->y + freearr_y[i]; 388 EXIT_Y (dummy) = op->y + freearr_y[i];
387 enter_exit (pl->ob, dummy); 389 pl->ob->enter_exit (dummy);
388 dummy->destroy (); 390 dummy->destroy ();
389 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You are summoned."); 391 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You are summoned.");
390 new_draw_info (NDI_UNIQUE, 0, op, "OK."); 392 new_draw_info (NDI_UNIQUE, 0, op, "OK.");
391 393
392 return 1; 394 return 1;
… …
426 428
427 dummy = object::create (); 429 dummy = object::create ();
428 EXIT_PATH (dummy) = pl->ob->map->path; 430 EXIT_PATH (dummy) = pl->ob->map->path;
429 EXIT_X (dummy) = pl->ob->x + freearr_x[i]; 431 EXIT_X (dummy) = pl->ob->x + freearr_x[i];
430 EXIT_Y (dummy) = pl->ob->y + freearr_y[i]; 432 EXIT_Y (dummy) = pl->ob->y + freearr_y[i];
431 enter_exit (op, dummy); 433 op->enter_exit (dummy);
432 dummy->destroy (); 434 dummy->destroy ();
433 if (!op->contr->hidden) 435 if (!op->contr->hidden)
434 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You see a portal open."); 436 new_draw_info (NDI_UNIQUE, 0, pl->ob, "You see a portal open.");
435 new_draw_info (NDI_UNIQUE, 0, op, "OK."); 437 new_draw_info (NDI_UNIQUE, 0, op, "OK.");
436 return 1; 438 return 1;
… …
954 victim->body_info[i] = 1; 956 victim->body_info[i] = 1;
955 957
956 esrv_new_player (pl, 80); /* just pick a wieght, we don't care */ 958 esrv_new_player (pl, 80); /* just pick a wieght, we don't care */
957 esrv_send_inventory (victim, victim); 959 esrv_send_inventory (victim, victim);
958 960
959 fix_player (victim); 961 victim->update_stats ();
960 962
961 do_some_living (victim); 963 do_some_living (victim);
962 return 1; 964 return 1;
963} 965}
964 966
… …
1069command_addexp (object *op, char *params) 1071command_addexp (object *op, char *params)
1070{ 1072{
1071 char buf[MAX_BUF], skill[MAX_BUF]; 1073 char buf[MAX_BUF], skill[MAX_BUF];
1072 int i, q; 1074 int i, q;
1073 object *skillob = NULL; 1075 object *skillob = NULL;
1074 player *pl;
1075 1076
1076 skill[0] = '\0'; 1077 skill[0] = '\0';
1077 if ((params == NULL) || (strlen (params) > MAX_BUF) || ((q = sscanf (params, "%s %d %s", buf, &i, skill)) < 2)) 1078 if ((params == NULL) || (strlen (params) > MAX_BUF) || ((q = sscanf (params, "%s %d %s", buf, &i, skill)) < 2))
1078 { 1079 {
1079 new_draw_info (NDI_UNIQUE, 0, op, "Usage: addexp <who> <how much> [<skill>]."); 1080 new_draw_info (NDI_UNIQUE, 0, op, "Usage: addexp <who> <how much> [<skill>].");
1080 return 1; 1081 return 1;
1081 } 1082 }
1082 1083
1083 for (pl = first_player; pl != NULL; pl = pl->next) 1084 for_all_players (pl)
1084 if (!strncmp (pl->ob->name, buf, MAX_NAME)) 1085 if (!strncmp (pl->ob->name, buf, MAX_NAME))
1085 break;
1086
1087 if (pl == NULL)
1088 { 1086 {
1089 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
1090 return 1;
1091 }
1092
1093 if (q >= 3) 1087 if (q >= 3)
1094 { 1088 {
1095 skillob = find_skill_by_name (pl->ob, skill); 1089 skillob = find_skill_by_name (pl->ob, skill);
1096 if (!skillob) 1090 if (!skillob)
1097 { 1091 {
1098 new_draw_info_format (NDI_UNIQUE, 0, op, "Unable to find skill %s in %s", skill, buf); 1092 new_draw_info_format (NDI_UNIQUE, 0, op, "Unable to find skill %s in %s", skill, buf);
1093 return 1;
1094 }
1095
1096 i = check_exp_adjust (skillob, i);
1097 skillob->stats.exp += i;
1098 calc_perm_exp (skillob);
1099 player_lvl_adj (pl->ob, skillob);
1100 }
1101
1102 pl->ob->stats.exp += i;
1103 calc_perm_exp (pl->ob);
1104 player_lvl_adj (pl->ob, NULL);
1105
1106 if (settings.real_wiz == FALSE)
1107 SET_FLAG (pl->ob, FLAG_WAS_WIZ);
1108
1099 return 1; 1109 return 1;
1100 } 1110 }
1101 1111
1102 i = check_exp_adjust (skillob, i); 1112 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
1103 skillob->stats.exp += i;
1104 calc_perm_exp (skillob);
1105 player_lvl_adj (pl->ob, skillob);
1106 }
1107
1108 pl->ob->stats.exp += i;
1109 calc_perm_exp (pl->ob);
1110 player_lvl_adj (pl->ob, NULL);
1111
1112 if (settings.real_wiz == FALSE)
1113 SET_FLAG (pl->ob, FLAG_WAS_WIZ);
1114 return 1; 1113 return 1;
1115} 1114}
1116 1115
1117/**************************************************************************/ 1116/**************************************************************************/
1118 1117
… …
1124 1123
1125int 1124int
1126command_stats (object *op, char *params) 1125command_stats (object *op, char *params)
1127{ 1126{
1128 char thing[20]; 1127 char thing[20];
1129 player *pl;
1130 char buf[MAX_BUF]; 1128 char buf[MAX_BUF];
1131 1129
1132 thing[0] = '\0'; 1130 thing[0] = '\0';
1133 if (params == NULL || !sscanf (params, "%s", thing) || thing == NULL) 1131 if (params == NULL || !sscanf (params, "%s", thing) || thing == NULL)
1134 { 1132 {
1135 new_draw_info (NDI_UNIQUE, 0, op, "Who?"); 1133 new_draw_info (NDI_UNIQUE, 0, op, "Who?");
1136 return 1; 1134 return 1;
1137 } 1135 }
1138 1136
1139 for (pl = first_player; pl != NULL; pl = pl->next) 1137 for_all_players (pl)
1140 if (!strcmp (pl->ob->name, thing)) 1138 if (!strcmp (pl->ob->name, thing))
1141 { 1139 {
1142 sprintf (buf, "Str : %-2d H.P. : %-4d MAX : %d", pl->ob->stats.Str, pl->ob->stats.hp, pl->ob->stats.maxhp); 1140 sprintf (buf, "Str : %-2d H.P. : %-4d MAX : %d", pl->ob->stats.Str, pl->ob->stats.hp, pl->ob->stats.maxhp);
1143 new_draw_info (NDI_UNIQUE, 0, op, buf); 1141 new_draw_info (NDI_UNIQUE, 0, op, buf);
1144 sprintf (buf, "Dex : %-2d S.P. : %-4d MAX : %d", pl->ob->stats.Dex, pl->ob->stats.sp, pl->ob->stats.maxsp); 1142 sprintf (buf, "Dex : %-2d S.P. : %-4d MAX : %d", pl->ob->stats.Dex, pl->ob->stats.sp, pl->ob->stats.maxsp);
… …
1151 new_draw_info (NDI_UNIQUE, 0, op, buf); 1149 new_draw_info (NDI_UNIQUE, 0, op, buf);
1152 sprintf (buf, "Pow : %-2d Grace : %d", pl->ob->stats.Pow, pl->ob->stats.grace); 1150 sprintf (buf, "Pow : %-2d Grace : %d", pl->ob->stats.Pow, pl->ob->stats.grace);
1153 new_draw_info (NDI_UNIQUE, 0, op, buf); 1151 new_draw_info (NDI_UNIQUE, 0, op, buf);
1154 sprintf (buf, "Cha : %-2d Food : %d", pl->ob->stats.Cha, pl->ob->stats.food); 1152 sprintf (buf, "Cha : %-2d Food : %d", pl->ob->stats.Cha, pl->ob->stats.food);
1155 new_draw_info (NDI_UNIQUE, 0, op, buf); 1153 new_draw_info (NDI_UNIQUE, 0, op, buf);
1156 break; 1154 return 1;
1157 } 1155 }
1158 if (pl == NULL) 1156
1159 new_draw_info (NDI_UNIQUE, 0, op, "No such player."); 1157 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
1160 return 1; 1158 return 1;
1161} 1159}
1162 1160
1163int 1161int
1164command_abil (object *op, char *params) 1162command_abil (object *op, char *params)
… …
1187 { 1185 {
1188 new_draw_info (NDI_UNIQUE, 0, op, "Illegal range of stat.\n"); 1186 new_draw_info (NDI_UNIQUE, 0, op, "Illegal range of stat.\n");
1189 return 1; 1187 return 1;
1190 } 1188 }
1191 1189
1192 for (pl = first_player; pl != NULL; pl = pl->next) 1190 for_all_players (pl)
1193 { 1191 {
1194 if (!strcmp (pl->ob->name, thing)) 1192 if (!strcmp (pl->ob->name, thing))
1195 { 1193 {
1196 if (settings.real_wiz == FALSE) 1194 if (settings.real_wiz == FALSE)
1197 SET_FLAG (pl->ob, FLAG_WAS_WIZ); 1195 SET_FLAG (pl->ob, FLAG_WAS_WIZ);
… …
1209 pl->ob->stats.Int = iii, pl->orig_stats.Int = iii; 1207 pl->ob->stats.Int = iii, pl->orig_stats.Int = iii;
1210 if (!strcmp ("pow", thing2)) 1208 if (!strcmp ("pow", thing2))
1211 pl->ob->stats.Pow = iii, pl->orig_stats.Pow = iii; 1209 pl->ob->stats.Pow = iii, pl->orig_stats.Pow = iii;
1212 sprintf (buf, "%s has been altered.", &pl->ob->name); 1210 sprintf (buf, "%s has been altered.", &pl->ob->name);
1213 new_draw_info (NDI_UNIQUE, 0, op, buf); 1211 new_draw_info (NDI_UNIQUE, 0, op, buf);
1214 fix_player (pl->ob); 1212 pl->ob->update_stats ();
1215 return 1; 1213 return 1;
1216 } 1214 }
1217 } 1215 }
1218 1216
1219 new_draw_info (NDI_UNIQUE, 0, op, "No such player."); 1217 new_draw_info (NDI_UNIQUE, 0, op, "No such player.");
1220 return 1; 1218 return 1;
1221}
1222
1223int
1224command_reset (object *op, char *params)
1225{
1226 maptile *m;
1227 object *dummy = NULL, *tmp = NULL;
1228
1229 if (params == NULL)
1230 {
1231 new_draw_info (NDI_UNIQUE, 0, op, "Reset what map [name]?");
1232 return 1;
1233 }
1234
1235 if (strcmp (params, ".") == 0)
1236 params = op->map->path;
1237
1238 m = has_been_loaded (params);
1239 if (m == NULL)
1240 {
1241 new_draw_info (NDI_UNIQUE, 0, op, "No such map.");
1242 return 1;
1243 }
1244
1245 if (m->in_memory != MAP_SWAPPED)
1246 {
1247 if (m->in_memory != MAP_IN_MEMORY)
1248 {
1249 LOG (llevError, "Tried to swap out map which was not in memory.\n");
1250 return 0;
1251 }
1252
1253 /*
1254 * Only attempt to remove the player that is doing the reset, and not other
1255 * players or wiz's.
1256 */
1257 if (op->map == m)
1258 {
1259 dummy = object::create ();
1260 dummy->map = NULL;
1261 EXIT_X (dummy) = op->x;
1262 EXIT_Y (dummy) = op->y;
1263 EXIT_PATH (dummy) = op->map->path;
1264 op->remove ();
1265 op->map = NULL;
1266 tmp = op;
1267 }
1268 swap_map (m);
1269 }
1270
1271 if (m->in_memory == MAP_SWAPPED)
1272 {
1273 LOG (llevDebug, "Resetting map %s.\n", m->path);
1274
1275 /* setting this effectively causes an immediate reload */
1276 m->reset_time = 1;
1277 flush_old_maps ();
1278 new_draw_info (NDI_UNIQUE, 0, op, "OK.");
1279
1280 if (tmp)
1281 {
1282 enter_exit (tmp, dummy);
1283 dummy->destroy ();
1284 }
1285
1286 return 1;
1287 }
1288 else
1289 {
1290 player *pl;
1291 int playercount = 0;
1292
1293 /* Need to re-insert player if swap failed for some reason */
1294 if (tmp)
1295 {
1296 insert_ob_in_map (op, m, NULL, 0);
1297 dummy->destroy ();
1298 }
1299
1300 new_draw_info (NDI_UNIQUE, 0, op, "Reset failed, couldn't swap map, the following players are on it:");
1301 for (pl = first_player; pl != NULL; pl = pl->next)
1302 {
1303 if (pl->ob->map == m && pl->ob != op)
1304 {
1305 new_draw_info_format (NDI_UNIQUE, 0, op, "%s", &pl->ob->name);
1306 playercount++;
1307 }
1308 }
1309 if (!playercount)
1310 new_draw_info (NDI_UNIQUE, 0, op, "hmm, I don't see any other players on this map, something else is the problem.");
1311 return 1;
1312 }
1313} 1219}
1314 1220
1315int 1221int
1316command_nowiz (object *op, char *params) 1222command_nowiz (object *op, char *params)
1317{ /* 'noadm' is alias */ 1223{ /* 'noadm' is alias */

Diff Legend

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