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

Comparing deliantra/server/server/c_misc.C (file contents):
Revision 1.13 by root, Mon Oct 2 00:22:01 2006 UTC vs.
Revision 1.32 by root, Wed Dec 27 13:13:47 2006 UTC

21 The authors can be reached via e-mail at <crossfire@schmorp.de> 21 The authors can be reached via e-mail at <crossfire@schmorp.de>
22*/ 22*/
23 23
24#include <global.h> 24#include <global.h>
25#include <loader.h> 25#include <loader.h>
26#ifndef __CEXTRACT__
27# include <sproto.h> 26#include <sproto.h>
28#endif 27
28#include <dirent.h>
29 29
30extern weathermap_t **weathermap; 30extern weathermap_t **weathermap;
31 31
32/* Handles misc. input request - things like hash table, malloc, maps, 32/* Handles misc. input request - things like hash table, malloc, maps,
33 * who, etc. 33 * who, etc.
35 35
36void 36void
37map_info (object *op, char *search) 37map_info (object *op, char *search)
38{ 38{
39 maptile *m; 39 maptile *m;
40 char buf[MAX_BUF], map_path[MAX_BUF]; 40 char buf[MAX_BUF], map_path[31];
41 long sec = seconds (); 41 long sec = time (0);
42 42
43 new_draw_info_format (NDI_UNIQUE, 0, op, "Current time is: %02ld:%02ld:%02ld.", (sec % 86400) / 3600, (sec % 3600) / 60, sec % 60); 43 new_draw_info_format (NDI_UNIQUE, 0, op, "Current time is: %02ld:%02ld:%02ld.", (sec % 86400) / 3600, (sec % 3600) / 60, sec % 60);
44 new_draw_info (NDI_UNIQUE, 0, op, "Path Pl PlM IM TO Dif Reset"); 44 new_draw_info (NDI_UNIQUE, 0, op, "Path Pl PlM IM TO Dif Reset");
45 for (m = first_map; m != NULL; m = m->next)
46 {
47 45
46 for_all_maps (m)
47 {
48 if (search && strstr (m->path, search) == NULL) 48 if (search && !strstr (m->path, search))
49 continue; /* Skip unwanted maps */ 49 continue; /* Skip unwanted maps */
50
50 /* Print out the last 18 characters of the map name... */ 51 /* Print out the last 30 characters of the map name... */
51 if (strlen (m->path) <= 18)
52 strcpy (map_path, m->path);
53 else
54 strcpy (map_path, m->path + strlen (m->path) - 18); 52 strcpy (map_path, m->path + max (0, (int)strlen (m->path) - 30));
53
55 sprintf (buf, "%-18.18s %2d %2d %1d %4d %2d %02d:%02d:%02d", 54 sprintf (buf, "%-30.30s %2d %2d %1d %4d %2d %02d:%02d:%02d",
56 map_path, m->players, players_on_map (m, FALSE), 55 map_path, m->players, players_on_map (m, FALSE),
57 m->in_memory, m->timeout, m->difficulty, 56 m->in_memory, m->timeout, m->difficulty,
58 (MAP_WHEN_RESET (m) % 86400) / 3600, (MAP_WHEN_RESET (m) % 3600) / 60, MAP_WHEN_RESET (m) % 60); 57 (m->reset_time % 86400) / 3600, (m->reset_time % 3600) / 60, m->reset_time % 60);
59 new_draw_info (NDI_UNIQUE, 0, op, buf); 58 new_draw_info (NDI_UNIQUE, 0, op, buf);
60 } 59 }
61} 60}
62 61
63/* This command dumps the body information for object *op. 62/* This command dumps the body information for object *op.
155 154
156 if (QUERY_FLAG (op, FLAG_WIZ)) 155 if (QUERY_FLAG (op, FLAG_WIZ))
157 { 156 {
158 new_draw_info_format (NDI_UNIQUE, 0, op, 157 new_draw_info_format (NDI_UNIQUE, 0, op,
159 "players:%d difficulty:%d size:%dx%d start:%dx%d timeout %ld", 158 "players:%d difficulty:%d size:%dx%d start:%dx%d timeout %ld",
160 m->players, m->difficulty, MAP_WIDTH (m), MAP_HEIGHT (m), MAP_ENTER_X (m), MAP_ENTER_Y (m), MAP_TIMEOUT (m)); 159 m->players, m->difficulty, m->width, m->height, m->enter_x, m->enter_y, m->timeout);
161 160
162 } 161 }
163 if (m->msg) 162 if (m->msg)
164 new_draw_info (NDI_UNIQUE, NDI_NAVY, op, m->msg); 163 new_draw_info (NDI_UNIQUE, NDI_NAVY, op, m->msg);
165} 164}
192 */ 191 */
193 for (reg = first_region; reg != NULL; reg = reg->next) 192 for (reg = first_region; reg != NULL; reg = reg->next)
194 { 193 {
195 reg->counter = 0; 194 reg->counter = 0;
196 } 195 }
197 for (pl = first_player; pl != NULL; pl = pl->next) 196 for_all_players (pl)
198 if (pl->ob->map != NULL) 197 if (pl->ob->map != NULL)
199 get_region_by_map (pl->ob->map)->counter++; 198 get_region_by_map (pl->ob->map)->counter++;
200 199
201 /* we only want to print out by places with a 'longname' field... */ 200 /* we only want to print out by places with a 'longname' field... */
202 for (reg = first_region; reg != NULL; reg = reg->next) 201 for (reg = first_region; reg != NULL; reg = reg->next)
223{ 222{
224 char namebuf[MAX_BUF]; 223 char namebuf[MAX_BUF];
225 int login_order; 224 int login_order;
226} chars_names; 225} chars_names;
227 226
228/*local functon for qsort comparison*/
229static int
230name_cmp (const chars_names * c1, const chars_names * c2)
231{
232 return strcasecmp (c1->namebuf, c2->namebuf);
233}
234
235int 227int
236command_afk (object *op, char *params) 228command_afk (object *op, char *params)
237{ 229{
238 if QUERY_FLAG 230 if ((op->contr->ns->afk = !op->contr->ns->afk))
239 (op, FLAG_AFK)
240 {
241 CLEAR_FLAG (op, FLAG_AFK);
242 new_draw_info (NDI_UNIQUE, 0, op, "You are no longer AFK"); 231 new_draw_info (NDI_UNIQUE, 0, op, "You are no longer AFK");
243 }
244 else 232 else
245 {
246 SET_FLAG (op, FLAG_AFK);
247 new_draw_info (NDI_UNIQUE, 0, op, "You are now AFK"); 233 new_draw_info (NDI_UNIQUE, 0, op, "You are now AFK");
248 } 234
249 return 1; 235 return 1;
250} 236}
251 237
252int 238int
253command_mapinfo (object *op, char *params) 239command_mapinfo (object *op, char *params)
453int 439int
454command_dumpbelow (object *op, char *params) 440command_dumpbelow (object *op, char *params)
455{ 441{
456 if (op && op->below) 442 if (op && op->below)
457 { 443 {
458 dump_object (op->below); 444 char *dump = dump_object (op->below);
459 new_draw_info (NDI_UNIQUE, 0, op, errmsg); 445 new_draw_info (NDI_UNIQUE, 0, op, dump);
446 free (dump);
460 /* Let's push that item on the dm's stack */ 447 /* Let's push that item on the dm's stack */
461 dm_stack_push (op->contr, op->below->count); 448 dm_stack_push (op->contr, op->below->count);
462 } 449 }
463 return 0; 450 return 0;
464} 451}
465 452
466int 453int
467command_dumpallobjects (object *op, char *params)
468{
469 dump_all_objects ();
470 return 0;
471}
472
473int
474command_dumpfriendlyobjects (object *op, char *params) 454command_dumpfriendlyobjects (object *op, char *params)
475{ 455{
476 dump_friendly_objects (); 456 dump_friendly_objects ();
477 return 0;
478}
479
480int
481command_dumpallarchetypes (object *op, char *params)
482{
483 dump_all_archetypes ();
484 return 0; 457 return 0;
485} 458}
486 459
487int 460int
488command_dumpmap (object *op, char *params) 461command_dumpmap (object *op, char *params)
602int 575int
603command_statistics (object *pl, char *params) 576command_statistics (object *pl, char *params)
604{ 577{
605 if (!pl->contr) 578 if (!pl->contr)
606 return 1; 579 return 1;
607#ifndef WIN32
608 new_draw_info_format (NDI_UNIQUE, 0, pl, " Experience: %lld", pl->stats.exp);
609 new_draw_info_format (NDI_UNIQUE, 0, pl, " Next Level: %lld", level_exp (pl->level + 1, pl->expmul));
610#else
611 new_draw_info_format (NDI_UNIQUE, 0, pl, " Experience: %I64d", pl->stats.exp); 580 new_draw_info_format (NDI_UNIQUE, 0, pl, " Experience: %" PRId64, pl->stats.exp);
612 new_draw_info_format (NDI_UNIQUE, 0, pl, " Next Level: %I64d", level_exp (pl->level + 1, pl->expmul)); 581 new_draw_info_format (NDI_UNIQUE, 0, pl, " Next Level: %" PRId64, level_exp (pl->level + 1, pl->expmul));
613#endif
614 new_draw_info (NDI_UNIQUE, 0, pl, "\nStat Nat/Real/Max"); 582 new_draw_info (NDI_UNIQUE, 0, pl, "\nStat Nat/Real/Max");
615 583
616 new_draw_info_format (NDI_UNIQUE, 0, pl, "Str %2d/ %3d/%3d", 584 new_draw_info_format (NDI_UNIQUE, 0, pl, "Str %2d/ %3d/%3d",
617 pl->contr->orig_stats.Str, pl->stats.Str, 20 + pl->arch->clone.stats.Str); 585 pl->contr->orig_stats.Str, pl->stats.Str, 20 + pl->arch->clone.stats.Str);
618 new_draw_info_format (NDI_UNIQUE, 0, pl, "Dex %2d/ %3d/%3d", 586 new_draw_info_format (NDI_UNIQUE, 0, pl, "Dex %2d/ %3d/%3d",
635 603
636int 604int
637command_fix_me (object *op, char *params) 605command_fix_me (object *op, char *params)
638{ 606{
639 sum_weight (op); 607 sum_weight (op);
640 fix_player (op); 608 op->update_stats ();
641 return 1; 609 return 1;
642} 610}
643 611
644int 612int
645command_players (object *op, char *paramss) 613command_players (object *op, char *paramss)
652 t = buf + strlen (buf); 620 t = buf + strlen (buf);
653 if ((Dir = opendir (buf)) != NULL) 621 if ((Dir = opendir (buf)) != NULL)
654 { 622 {
655 const struct dirent *Entry; 623 const struct dirent *Entry;
656 624
657 while ((Entry = readdir (Dir)) != NULL) 625 while ((Entry = readdir (Dir)))
658 { 626 {
659 /* skip '.' , '..' */ 627 /* skip '.' , '..' */
660 if (!((Entry->d_name[0] == '.' && Entry->d_name[1] == '\0') || 628 if (!((Entry->d_name[0] == '.' && Entry->d_name[1] == '\0') ||
661 (Entry->d_name[0] == '.' && Entry->d_name[1] == '.' && Entry->d_name[2] == '\0'))) 629 (Entry->d_name[0] == '.' && Entry->d_name[1] == '.' && Entry->d_name[2] == '\0')))
662 { 630 {
810 for (obl = first_friendly_object; obl != NULL; obl = next) 778 for (obl = first_friendly_object; obl != NULL; obl = next)
811 { 779 {
812 object *ob = obl->ob; 780 object *ob = obl->ob;
813 781
814 next = obl->next; 782 next = obl->next;
815 if (get_owner (ob) == op) 783 if (ob->owner == op)
816 { 784 {
817 if (target == 0) 785 if (target == 0)
818 { 786 {
819 if (counter == 0) 787 if (counter == 0)
820 new_draw_info (NDI_UNIQUE, 0, op, "Pets:"); 788 new_draw_info (NDI_UNIQUE, 0, op, "Pets:");
927 char filename[MAX_BUF], line[80]; 895 char filename[MAX_BUF], line[80];
928 int namelen, linelen = 0; 896 int namelen, linelen = 0;
929 897
930 switch (what) 898 switch (what)
931 { 899 {
932 case 1: 900 case 1:
933 sprintf (filename, "%s/wizhelp", settings.datadir); 901 sprintf (filename, "%s/wizhelp", settings.datadir);
934 new_draw_info (NDI_UNIQUE, 0, op, " Wiz commands:"); 902 new_draw_info (NDI_UNIQUE, 0, op, " Wiz commands:");
935 break; 903 break;
936 case 3: 904 case 3:
937 sprintf (filename, "%s/mischelp", settings.datadir); 905 sprintf (filename, "%s/mischelp", settings.datadir);
938 new_draw_info (NDI_UNIQUE, 0, op, " Misc help:"); 906 new_draw_info (NDI_UNIQUE, 0, op, " Misc help:");
939 break; 907 break;
940 default: 908 default:
941 sprintf (filename, "%s/help", settings.datadir); 909 sprintf (filename, "%s/help", settings.datadir);
942 new_draw_info (NDI_UNIQUE, 0, op, " Commands:"); 910 new_draw_info (NDI_UNIQUE, 0, op, " Commands:");
943 break; 911 break;
944 } 912 }
913
945 if (!(dirp = opendir (filename))) 914 if (!(dirp = opendir (filename)))
946 return; 915 return;
947 916
948 line[0] = '\0'; 917 line[0] = '\0';
949 for (de = readdir (dirp); de; de = readdir (dirp)) 918 while (de = readdir (dirp))
950 { 919 {
951 namelen = NAMLEN (de); 920 namelen = strlen (de->d_name);
952 if (namelen <= 2 && *de->d_name == '.' && (namelen == 1 || de->d_name[1] == '.')) 921 if (namelen <= 2 && *de->d_name == '.' && (namelen == 1 || de->d_name[1] == '.'))
953 continue; 922 continue;
954 linelen += namelen + 1; 923 linelen += namelen + 1;
955 if (linelen > 42) 924 if (linelen > 42)
956 { 925 {
1171} 1140}
1172 1141
1173int 1142int
1174command_real_quit (object *op, char *params) 1143command_real_quit (object *op, char *params)
1175{ 1144{
1176 send_query (&op->contr->socket, CS_QUERY_SINGLECHAR, "Quitting will delete your character.\nAre you sure you want to quit (y/n):"); 1145 send_query (op->contr->ns, CS_QUERY_SINGLECHAR, "Quitting will delete your character.\nAre you sure you want to quit (y/n):");
1177 1146
1178 op->contr->state = ST_CONFIRM_QUIT; 1147 op->contr->ns->state = ST_CONFIRM_QUIT;
1179 return 1; 1148 return 1;
1180} 1149}
1181 1150
1182/* 1151/*
1183 * don't allow people to exit explore mode. It otherwise becomes 1152 * don't allow people to exit explore mode. It otherwise becomes
1207} 1176}
1208 1177
1209int 1178int
1210command_sound (object *op, char *params) 1179command_sound (object *op, char *params)
1211{ 1180{
1212 if (op->contr->socket.sound) 1181 if (op->contr->ns->sound)
1213 { 1182 {
1214 op->contr->socket.sound = 0; 1183 op->contr->ns->sound = 0;
1215 new_draw_info (NDI_UNIQUE, 0, op, "Silence is golden..."); 1184 new_draw_info (NDI_UNIQUE, 0, op, "Silence is golden...");
1216 } 1185 }
1217 else 1186 else
1218 { 1187 {
1219 op->contr->socket.sound = 1; 1188 op->contr->ns->sound = 1;
1220 new_draw_info (NDI_UNIQUE, 0, op, "The sounds are enabled."); 1189 new_draw_info (NDI_UNIQUE, 0, op, "The sounds are enabled.");
1221 } 1190 }
1222 return 1;
1223}
1224 1191
1225/* Perhaps these should be in player.c, but that file is
1226 * already a bit big.
1227 */
1228
1229void
1230receive_player_name (object *op, char k)
1231{
1232
1233 if (!check_name (op->contr, op->contr->write_buf + 1))
1234 {
1235 get_name (op);
1236 return;
1237 }
1238 op->name = op->contr->write_buf + 1;
1239 op->name_pl = op->contr->write_buf + 1;
1240 new_draw_info (NDI_UNIQUE, 0, op, op->contr->write_buf);
1241 op->contr->name_changed = 1;
1242 get_password (op);
1243}
1244
1245void
1246receive_player_password (object *op, char k)
1247{
1248
1249 unsigned int pwd_len = strlen (op->contr->write_buf);
1250
1251 if (pwd_len <= 1 || pwd_len > 17)
1252 {
1253 get_name (op);
1254 return;
1255 }
1256 new_draw_info (NDI_UNIQUE, 0, op, " "); /* To hide the password better */
1257
1258 if (checkbanned (op->name, op->contr->socket.host))
1259 {
1260 LOG (llevInfo, "Banned player tried to add: [%s@%s]\n", &op->name, op->contr->socket.host);
1261 new_draw_info (NDI_UNIQUE | NDI_RED, 0, op, "You are not allowed to play.");
1262 get_name (op);
1263 return;
1264 }
1265
1266 if (op->contr->state == ST_CONFIRM_PASSWORD)
1267 {
1268 if (!check_password (op->contr->write_buf + 1, op->contr->password))
1269 {
1270 new_draw_info (NDI_UNIQUE, 0, op, "The passwords did not match.");
1271 get_name (op);
1272 return;
1273 }
1274 clear_win_info (op);
1275 display_motd (op);
1276 new_draw_info (NDI_UNIQUE, 0, op, " ");
1277 new_draw_info (NDI_UNIQUE, 0, op, "Welcome, Brave New Warrior!");
1278 new_draw_info (NDI_UNIQUE, 0, op, " ");
1279 Roll_Again (op);
1280 op->contr->state = ST_ROLL_STAT;
1281 return;
1282 }
1283 strcpy (op->contr->password, crypt_string (op->contr->write_buf + 1, NULL));
1284 op->contr->state = ST_ROLL_STAT;
1285 check_login (op);
1286 return; 1192 return 1;
1287} 1193}
1288
1289 1194
1290int 1195int
1291explore_mode (void) 1196explore_mode (void)
1292{ 1197{
1293 player *pl; 1198 player *pl;
1298 if (pl->explore) 1203 if (pl->explore)
1299 return 1; 1204 return 1;
1300 } 1205 }
1301 return 0; 1206 return 0;
1302} 1207}
1303
1304 1208
1305int 1209int
1306command_title (object *op, char *params) 1210command_title (object *op, char *params)
1307{ 1211{
1308 char buf[MAX_BUF]; 1212 char buf[MAX_BUF];
1349} 1253}
1350 1254
1351int 1255int
1352command_save (object *op, char *params) 1256command_save (object *op, char *params)
1353{ 1257{
1354// if (get_map_flags(op->map, NULL, op->x, op->y, NULL, NULL) & P_NO_CLERIC) {
1355// new_draw_info(NDI_UNIQUE, 0, op, "You can not save on unholy ground");
1356// } else
1357 if (!op->stats.exp) 1258 if (!op->stats.exp)
1358 {
1359 new_draw_info (NDI_UNIQUE, 0, op, "You don't deserve to save yet."); 1259 new_draw_info (NDI_UNIQUE, 0, op, "You don't deserve to save yet.");
1260 else
1360 } 1261 {
1361 else 1262 op->contr->save ();
1362 {
1363 if (save_player (op, 1))
1364 new_draw_info (NDI_UNIQUE, 0, op, "You have been saved."); 1263 new_draw_info (NDI_UNIQUE, 0, op, "You have been saved.");
1365 else
1366 new_draw_info (NDI_UNIQUE, 0, op, "SAVE FAILED!");
1367 } 1264 }
1368 return 1;
1369}
1370 1265
1266 return 1;
1267}
1371 1268
1372int 1269int
1373command_peaceful (object *op, char *params) 1270command_peaceful (object *op, char *params)
1374{ 1271{
1375 new_draw_info (NDI_UNIQUE, 0, op, 1272 new_draw_info (NDI_UNIQUE, 0, op,
1384 new_draw_info(NDI_UNIQUE, 0,op,"You will attack other players."); 1281 new_draw_info(NDI_UNIQUE, 0,op,"You will attack other players.");
1385*/ 1282*/
1386 return 1; 1283 return 1;
1387} 1284}
1388 1285
1389
1390
1391int 1286int
1392command_wimpy (object *op, char *params) 1287command_wimpy (object *op, char *params)
1393{ 1288{
1394 int i; 1289 int i;
1395 char buf[MAX_BUF]; 1290 char buf[MAX_BUF];
1404 new_draw_info (NDI_UNIQUE, 0, op, buf); 1299 new_draw_info (NDI_UNIQUE, 0, op, buf);
1405 op->run_away = i; 1300 op->run_away = i;
1406 return 1; 1301 return 1;
1407} 1302}
1408 1303
1409
1410int 1304int
1411command_brace (object *op, char *params) 1305command_brace (object *op, char *params)
1412{ 1306{
1413 if (!params) 1307 if (!params)
1414 op->contr->braced = !op->contr->braced; 1308 op->contr->braced = !op->contr->braced;
1418 if (op->contr->braced) 1312 if (op->contr->braced)
1419 new_draw_info (NDI_UNIQUE, 0, op, "You are braced."); 1313 new_draw_info (NDI_UNIQUE, 0, op, "You are braced.");
1420 else 1314 else
1421 new_draw_info (NDI_UNIQUE, 0, op, "Not braced."); 1315 new_draw_info (NDI_UNIQUE, 0, op, "Not braced.");
1422 1316
1423 fix_player (op); 1317 op->update_stats ();
1424 return 0; 1318 return 0;
1425} 1319}
1426 1320
1427int 1321int
1428command_style_map_info (object *op, char *params) 1322command_style_map_info (object *op, char *params)
1433 object *tmp; 1327 object *tmp;
1434 1328
1435 for (mp = styles; mp != NULL; mp = mp->next) 1329 for (mp = styles; mp != NULL; mp = mp->next)
1436 { 1330 {
1437 maps_used++; 1331 maps_used++;
1438 mapmem += MAP_WIDTH (mp) * MAP_HEIGHT (mp) * (sizeof (object *) + sizeof (MapSpace)) + sizeof (maptile); 1332 mapmem += mp->width * mp->height * (sizeof (object *) + sizeof (mapspace)) + sizeof (maptile);
1439 for (x = 0; x < MAP_WIDTH (mp); x++) 1333 for (x = 0; x < mp->width; x++)
1440 { 1334 {
1441 for (y = 0; y < MAP_HEIGHT (mp); y++) 1335 for (y = 0; y < mp->height; y++)
1442 { 1336 {
1443 for (tmp = get_map_ob (mp, x, y); tmp != NULL; tmp = tmp->above) 1337 for (tmp = GET_MAP_OB (mp, x, y); tmp != NULL; tmp = tmp->above)
1444 objects_used++; 1338 objects_used++;
1445 } 1339 }
1446 } 1340 }
1447 } 1341 }
1448 new_draw_info_format (NDI_UNIQUE, 0, op, "Style maps loaded: %d", maps_used); 1342 new_draw_info_format (NDI_UNIQUE, 0, op, "Style maps loaded: %d", maps_used);
1471 for (obl = first_friendly_object; obl != NULL; obl = next) 1365 for (obl = first_friendly_object; obl != NULL; obl = next)
1472 { 1366 {
1473 object *ob = obl->ob; 1367 object *ob = obl->ob;
1474 1368
1475 next = obl->next; 1369 next = obl->next;
1476 if (get_owner (ob) == op) 1370 if (ob->owner == op)
1477 if (++counter == target || (target == 0 && !strcasecmp (ob->name, params))) 1371 if (++counter == target || (target == 0 && !strcasecmp (ob->name, params)))
1478 { 1372 {
1479 if (!QUERY_FLAG (ob, FLAG_REMOVED))
1480 remove_ob (ob);
1481 remove_friendly_object (ob);
1482 free_object (ob); 1373 ob->destroy ();
1483 removecount++; 1374 removecount++;
1484 } 1375 }
1485 } 1376 }
1486 if (removecount != 0) 1377 if (removecount != 0)
1487 new_draw_info_format (NDI_UNIQUE, 0, op, "killed %d pets.\n", removecount); 1378 new_draw_info_format (NDI_UNIQUE, 0, op, "killed %d pets.\n", removecount);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines