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.19 by root, Tue Dec 12 20:53:03 2006 UTC vs.
Revision 1.31 by root, Wed Dec 27 09:28:02 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.
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[MAX_BUF];
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 18 characters of the map name... */
51 if (strlen (m->path) <= 18) 52 if (strlen (m->path) <= 18)
52 strcpy (map_path, m->path); 53 strcpy (map_path, m->path);
53 else 54 else
54 strcpy (map_path, m->path + strlen (m->path) - 18); 55 strcpy (map_path, m->path + strlen (m->path) - 18);
56
55 sprintf (buf, "%-18.18s %2d %2d %1d %4d %2d %02d:%02d:%02d", 57 sprintf (buf, "%-18.18s %2d %2d %1d %4d %2d %02d:%02d:%02d",
56 map_path, m->players, players_on_map (m, FALSE), 58 map_path, m->players, players_on_map (m, FALSE),
57 m->in_memory, m->timeout, m->difficulty, 59 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); 60 (m->reset_time % 86400) / 3600, (m->reset_time % 3600) / 60, m->reset_time % 60);
59 new_draw_info (NDI_UNIQUE, 0, op, buf); 61 new_draw_info (NDI_UNIQUE, 0, op, buf);
60 } 62 }
61} 63}
62 64
63/* This command dumps the body information for object *op. 65/* This command dumps the body information for object *op.
155 157
156 if (QUERY_FLAG (op, FLAG_WIZ)) 158 if (QUERY_FLAG (op, FLAG_WIZ))
157 { 159 {
158 new_draw_info_format (NDI_UNIQUE, 0, op, 160 new_draw_info_format (NDI_UNIQUE, 0, op,
159 "players:%d difficulty:%d size:%dx%d start:%dx%d timeout %ld", 161 "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)); 162 m->players, m->difficulty, m->width, m->height, m->enter_x, m->enter_y, m->timeout);
161 163
162 } 164 }
163 if (m->msg) 165 if (m->msg)
164 new_draw_info (NDI_UNIQUE, NDI_NAVY, op, m->msg); 166 new_draw_info (NDI_UNIQUE, NDI_NAVY, op, m->msg);
165} 167}
192 */ 194 */
193 for (reg = first_region; reg != NULL; reg = reg->next) 195 for (reg = first_region; reg != NULL; reg = reg->next)
194 { 196 {
195 reg->counter = 0; 197 reg->counter = 0;
196 } 198 }
197 for (pl = first_player; pl != NULL; pl = pl->next) 199 for_all_players (pl)
198 if (pl->ob->map != NULL) 200 if (pl->ob->map != NULL)
199 get_region_by_map (pl->ob->map)->counter++; 201 get_region_by_map (pl->ob->map)->counter++;
200 202
201 /* we only want to print out by places with a 'longname' field... */ 203 /* we only want to print out by places with a 'longname' field... */
202 for (reg = first_region; reg != NULL; reg = reg->next) 204 for (reg = first_region; reg != NULL; reg = reg->next)
226} chars_names; 228} chars_names;
227 229
228int 230int
229command_afk (object *op, char *params) 231command_afk (object *op, char *params)
230{ 232{
231 if QUERY_FLAG 233 if ((op->contr->ns->afk = !op->contr->ns->afk))
232 (op, FLAG_AFK)
233 {
234 CLEAR_FLAG (op, FLAG_AFK);
235 new_draw_info (NDI_UNIQUE, 0, op, "You are no longer AFK"); 234 new_draw_info (NDI_UNIQUE, 0, op, "You are no longer AFK");
236 }
237 else 235 else
238 {
239 SET_FLAG (op, FLAG_AFK);
240 new_draw_info (NDI_UNIQUE, 0, op, "You are now AFK"); 236 new_draw_info (NDI_UNIQUE, 0, op, "You are now AFK");
241 } 237
242 return 1; 238 return 1;
243} 239}
244 240
245int 241int
246command_mapinfo (object *op, char *params) 242command_mapinfo (object *op, char *params)
610 606
611int 607int
612command_fix_me (object *op, char *params) 608command_fix_me (object *op, char *params)
613{ 609{
614 sum_weight (op); 610 sum_weight (op);
615 fix_player (op); 611 op->update_stats ();
616 return 1; 612 return 1;
617} 613}
618 614
619int 615int
620command_players (object *op, char *paramss) 616command_players (object *op, char *paramss)
627 t = buf + strlen (buf); 623 t = buf + strlen (buf);
628 if ((Dir = opendir (buf)) != NULL) 624 if ((Dir = opendir (buf)) != NULL)
629 { 625 {
630 const struct dirent *Entry; 626 const struct dirent *Entry;
631 627
632 while ((Entry = readdir (Dir)) != NULL) 628 while ((Entry = readdir (Dir)))
633 { 629 {
634 /* skip '.' , '..' */ 630 /* skip '.' , '..' */
635 if (!((Entry->d_name[0] == '.' && Entry->d_name[1] == '\0') || 631 if (!((Entry->d_name[0] == '.' && Entry->d_name[1] == '\0') ||
636 (Entry->d_name[0] == '.' && Entry->d_name[1] == '.' && Entry->d_name[2] == '\0'))) 632 (Entry->d_name[0] == '.' && Entry->d_name[1] == '.' && Entry->d_name[2] == '\0')))
637 { 633 {
785 for (obl = first_friendly_object; obl != NULL; obl = next) 781 for (obl = first_friendly_object; obl != NULL; obl = next)
786 { 782 {
787 object *ob = obl->ob; 783 object *ob = obl->ob;
788 784
789 next = obl->next; 785 next = obl->next;
790 if (get_owner (ob) == op) 786 if (ob->owner == op)
791 { 787 {
792 if (target == 0) 788 if (target == 0)
793 { 789 {
794 if (counter == 0) 790 if (counter == 0)
795 new_draw_info (NDI_UNIQUE, 0, op, "Pets:"); 791 new_draw_info (NDI_UNIQUE, 0, op, "Pets:");
902 char filename[MAX_BUF], line[80]; 898 char filename[MAX_BUF], line[80];
903 int namelen, linelen = 0; 899 int namelen, linelen = 0;
904 900
905 switch (what) 901 switch (what)
906 { 902 {
907 case 1: 903 case 1:
908 sprintf (filename, "%s/wizhelp", settings.datadir); 904 sprintf (filename, "%s/wizhelp", settings.datadir);
909 new_draw_info (NDI_UNIQUE, 0, op, " Wiz commands:"); 905 new_draw_info (NDI_UNIQUE, 0, op, " Wiz commands:");
910 break; 906 break;
911 case 3: 907 case 3:
912 sprintf (filename, "%s/mischelp", settings.datadir); 908 sprintf (filename, "%s/mischelp", settings.datadir);
913 new_draw_info (NDI_UNIQUE, 0, op, " Misc help:"); 909 new_draw_info (NDI_UNIQUE, 0, op, " Misc help:");
914 break; 910 break;
915 default: 911 default:
916 sprintf (filename, "%s/help", settings.datadir); 912 sprintf (filename, "%s/help", settings.datadir);
917 new_draw_info (NDI_UNIQUE, 0, op, " Commands:"); 913 new_draw_info (NDI_UNIQUE, 0, op, " Commands:");
918 break; 914 break;
919 } 915 }
916
920 if (!(dirp = opendir (filename))) 917 if (!(dirp = opendir (filename)))
921 return; 918 return;
922 919
923 line[0] = '\0'; 920 line[0] = '\0';
924 for (de = readdir (dirp); de; de = readdir (dirp)) 921 while (de = readdir (dirp))
925 { 922 {
926 namelen = NAMLEN (de); 923 namelen = strlen (de->d_name);
927 if (namelen <= 2 && *de->d_name == '.' && (namelen == 1 || de->d_name[1] == '.')) 924 if (namelen <= 2 && *de->d_name == '.' && (namelen == 1 || de->d_name[1] == '.'))
928 continue; 925 continue;
929 linelen += namelen + 1; 926 linelen += namelen + 1;
930 if (linelen > 42) 927 if (linelen > 42)
931 { 928 {
1146} 1143}
1147 1144
1148int 1145int
1149command_real_quit (object *op, char *params) 1146command_real_quit (object *op, char *params)
1150{ 1147{
1151 send_query (&op->contr->socket, CS_QUERY_SINGLECHAR, "Quitting will delete your character.\nAre you sure you want to quit (y/n):"); 1148 send_query (op->contr->ns, CS_QUERY_SINGLECHAR, "Quitting will delete your character.\nAre you sure you want to quit (y/n):");
1152 1149
1153 op->contr->state = ST_CONFIRM_QUIT; 1150 op->contr->ns->state = ST_CONFIRM_QUIT;
1154 return 1; 1151 return 1;
1155} 1152}
1156 1153
1157/* 1154/*
1158 * don't allow people to exit explore mode. It otherwise becomes 1155 * don't allow people to exit explore mode. It otherwise becomes
1182} 1179}
1183 1180
1184int 1181int
1185command_sound (object *op, char *params) 1182command_sound (object *op, char *params)
1186{ 1183{
1187 if (op->contr->socket.sound) 1184 if (op->contr->ns->sound)
1188 { 1185 {
1189 op->contr->socket.sound = 0; 1186 op->contr->ns->sound = 0;
1190 new_draw_info (NDI_UNIQUE, 0, op, "Silence is golden..."); 1187 new_draw_info (NDI_UNIQUE, 0, op, "Silence is golden...");
1191 } 1188 }
1192 else 1189 else
1193 { 1190 {
1194 op->contr->socket.sound = 1; 1191 op->contr->ns->sound = 1;
1195 new_draw_info (NDI_UNIQUE, 0, op, "The sounds are enabled."); 1192 new_draw_info (NDI_UNIQUE, 0, op, "The sounds are enabled.");
1196 } 1193 }
1197 return 1;
1198}
1199 1194
1200/* Perhaps these should be in player.c, but that file is
1201 * already a bit big.
1202 */
1203
1204void
1205receive_player_name (object *op, char k)
1206{
1207
1208 if (!check_name (op->contr, op->contr->write_buf + 1))
1209 {
1210 get_name (op);
1211 return;
1212 }
1213 op->name = op->contr->write_buf + 1;
1214 op->name_pl = op->contr->write_buf + 1;
1215 new_draw_info (NDI_UNIQUE, 0, op, op->contr->write_buf);
1216 op->contr->name_changed = 1;
1217 get_password (op);
1218}
1219
1220void
1221receive_player_password (object *op, char k)
1222{
1223
1224 unsigned int pwd_len = strlen (op->contr->write_buf);
1225
1226 if (pwd_len <= 1 || pwd_len > 17)
1227 {
1228 get_name (op);
1229 return;
1230 }
1231 new_draw_info (NDI_UNIQUE, 0, op, " "); /* To hide the password better */
1232
1233 if (checkbanned (op->name, op->contr->socket.host))
1234 {
1235 LOG (llevInfo, "Banned player tried to add: [%s@%s]\n", &op->name, op->contr->socket.host);
1236 new_draw_info (NDI_UNIQUE | NDI_RED, 0, op, "You are not allowed to play.");
1237 get_name (op);
1238 return;
1239 }
1240
1241 if (op->contr->state == ST_CONFIRM_PASSWORD)
1242 {
1243 if (!check_password (op->contr->write_buf + 1, op->contr->password))
1244 {
1245 new_draw_info (NDI_UNIQUE, 0, op, "The passwords did not match.");
1246 get_name (op);
1247 return;
1248 }
1249 clear_win_info (op);
1250 display_motd (op);
1251 new_draw_info (NDI_UNIQUE, 0, op, " ");
1252 new_draw_info (NDI_UNIQUE, 0, op, "Welcome, Brave New Warrior!");
1253 new_draw_info (NDI_UNIQUE, 0, op, " ");
1254 Roll_Again (op);
1255 op->contr->state = ST_ROLL_STAT;
1256 return;
1257 }
1258 strcpy (op->contr->password, crypt_string (op->contr->write_buf + 1, NULL));
1259 op->contr->state = ST_ROLL_STAT;
1260 check_login (op);
1261 return; 1195 return 1;
1262} 1196}
1263
1264 1197
1265int 1198int
1266explore_mode (void) 1199explore_mode (void)
1267{ 1200{
1268 player *pl; 1201 player *pl;
1273 if (pl->explore) 1206 if (pl->explore)
1274 return 1; 1207 return 1;
1275 } 1208 }
1276 return 0; 1209 return 0;
1277} 1210}
1278
1279 1211
1280int 1212int
1281command_title (object *op, char *params) 1213command_title (object *op, char *params)
1282{ 1214{
1283 char buf[MAX_BUF]; 1215 char buf[MAX_BUF];
1324} 1256}
1325 1257
1326int 1258int
1327command_save (object *op, char *params) 1259command_save (object *op, char *params)
1328{ 1260{
1329// if (get_map_flags(op->map, NULL, op->x, op->y, NULL, NULL) & P_NO_CLERIC) {
1330// new_draw_info(NDI_UNIQUE, 0, op, "You can not save on unholy ground");
1331// } else
1332 if (!op->stats.exp) 1261 if (!op->stats.exp)
1333 {
1334 new_draw_info (NDI_UNIQUE, 0, op, "You don't deserve to save yet."); 1262 new_draw_info (NDI_UNIQUE, 0, op, "You don't deserve to save yet.");
1263 else
1335 } 1264 {
1336 else 1265 op->contr->save ();
1337 {
1338 if (save_player (op, 1))
1339 new_draw_info (NDI_UNIQUE, 0, op, "You have been saved."); 1266 new_draw_info (NDI_UNIQUE, 0, op, "You have been saved.");
1340 else
1341 new_draw_info (NDI_UNIQUE, 0, op, "SAVE FAILED!");
1342 } 1267 }
1343 return 1;
1344}
1345 1268
1269 return 1;
1270}
1346 1271
1347int 1272int
1348command_peaceful (object *op, char *params) 1273command_peaceful (object *op, char *params)
1349{ 1274{
1350 new_draw_info (NDI_UNIQUE, 0, op, 1275 new_draw_info (NDI_UNIQUE, 0, op,
1359 new_draw_info(NDI_UNIQUE, 0,op,"You will attack other players."); 1284 new_draw_info(NDI_UNIQUE, 0,op,"You will attack other players.");
1360*/ 1285*/
1361 return 1; 1286 return 1;
1362} 1287}
1363 1288
1364
1365
1366int 1289int
1367command_wimpy (object *op, char *params) 1290command_wimpy (object *op, char *params)
1368{ 1291{
1369 int i; 1292 int i;
1370 char buf[MAX_BUF]; 1293 char buf[MAX_BUF];
1379 new_draw_info (NDI_UNIQUE, 0, op, buf); 1302 new_draw_info (NDI_UNIQUE, 0, op, buf);
1380 op->run_away = i; 1303 op->run_away = i;
1381 return 1; 1304 return 1;
1382} 1305}
1383 1306
1384
1385int 1307int
1386command_brace (object *op, char *params) 1308command_brace (object *op, char *params)
1387{ 1309{
1388 if (!params) 1310 if (!params)
1389 op->contr->braced = !op->contr->braced; 1311 op->contr->braced = !op->contr->braced;
1393 if (op->contr->braced) 1315 if (op->contr->braced)
1394 new_draw_info (NDI_UNIQUE, 0, op, "You are braced."); 1316 new_draw_info (NDI_UNIQUE, 0, op, "You are braced.");
1395 else 1317 else
1396 new_draw_info (NDI_UNIQUE, 0, op, "Not braced."); 1318 new_draw_info (NDI_UNIQUE, 0, op, "Not braced.");
1397 1319
1398 fix_player (op); 1320 op->update_stats ();
1399 return 0; 1321 return 0;
1400} 1322}
1401 1323
1402int 1324int
1403command_style_map_info (object *op, char *params) 1325command_style_map_info (object *op, char *params)
1408 object *tmp; 1330 object *tmp;
1409 1331
1410 for (mp = styles; mp != NULL; mp = mp->next) 1332 for (mp = styles; mp != NULL; mp = mp->next)
1411 { 1333 {
1412 maps_used++; 1334 maps_used++;
1413 mapmem += MAP_WIDTH (mp) * MAP_HEIGHT (mp) * (sizeof (object *) + sizeof (MapSpace)) + sizeof (maptile); 1335 mapmem += mp->width * mp->height * (sizeof (object *) + sizeof (mapspace)) + sizeof (maptile);
1414 for (x = 0; x < MAP_WIDTH (mp); x++) 1336 for (x = 0; x < mp->width; x++)
1415 { 1337 {
1416 for (y = 0; y < MAP_HEIGHT (mp); y++) 1338 for (y = 0; y < mp->height; y++)
1417 { 1339 {
1418 for (tmp = get_map_ob (mp, x, y); tmp != NULL; tmp = tmp->above) 1340 for (tmp = GET_MAP_OB (mp, x, y); tmp != NULL; tmp = tmp->above)
1419 objects_used++; 1341 objects_used++;
1420 } 1342 }
1421 } 1343 }
1422 } 1344 }
1423 new_draw_info_format (NDI_UNIQUE, 0, op, "Style maps loaded: %d", maps_used); 1345 new_draw_info_format (NDI_UNIQUE, 0, op, "Style maps loaded: %d", maps_used);
1446 for (obl = first_friendly_object; obl != NULL; obl = next) 1368 for (obl = first_friendly_object; obl != NULL; obl = next)
1447 { 1369 {
1448 object *ob = obl->ob; 1370 object *ob = obl->ob;
1449 1371
1450 next = obl->next; 1372 next = obl->next;
1451 if (get_owner (ob) == op) 1373 if (ob->owner == op)
1452 if (++counter == target || (target == 0 && !strcasecmp (ob->name, params))) 1374 if (++counter == target || (target == 0 && !strcasecmp (ob->name, params)))
1453 { 1375 {
1454 if (!QUERY_FLAG (ob, FLAG_REMOVED))
1455 ob->remove ();
1456 remove_friendly_object (ob);
1457 ob->destroy (0); 1376 ob->destroy ();
1458 removecount++; 1377 removecount++;
1459 } 1378 }
1460 } 1379 }
1461 if (removecount != 0) 1380 if (removecount != 0)
1462 new_draw_info_format (NDI_UNIQUE, 0, op, "killed %d pets.\n", removecount); 1381 new_draw_info_format (NDI_UNIQUE, 0, op, "killed %d pets.\n", removecount);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines