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

Comparing deliantra/server/server/player.C (file contents):
Revision 1.70 by root, Tue Dec 26 20:04:09 2006 UTC vs.
Revision 1.82 by elmex, Wed Jan 3 02:30:52 2007 UTC

… …
158 158
159/* This loads the first map an puts the player on it. */ 159/* This loads the first map an puts the player on it. */
160static void 160static void
161set_first_map (object *op) 161set_first_map (object *op)
162{ 162{
163 strcpy (op->contr->maplevel, first_map_path); 163 op->contr->maplevel = first_map_path;
164 op->x = -1; 164 op->x = -1;
165 op->y = -1; 165 op->y = -1;
166}
167
168void
169player::enter_map ()
170{
171 object *tmp = object::create ();
172
173 EXIT_PATH (tmp) = maplevel;
174 EXIT_X (tmp) = ob->x;
175 EXIT_Y (tmp) = ob->y;
166 enter_exit (op, 0); 176 ob->enter_exit (tmp);
177
178 tmp->destroy ();
167} 179}
168 180
169// connect the player with a specific client 181// connect the player with a specific client
170// also changed, rationalises, and fixes some incorrect settings 182// also changed, rationalises, and fixes some incorrect settings
171void 183void
… …
191 203
192 ob->carrying = sum_weight (ob); 204 ob->carrying = sum_weight (ob);
193 link_player_skills (ob); 205 link_player_skills (ob);
194 206
195 CLEAR_FLAG (ob, FLAG_NO_FIX_PLAYER); 207 CLEAR_FLAG (ob, FLAG_NO_FIX_PLAYER);
196 ob->set_speed (ob->speed);
197 208
198 assign (title, ob->arch->clone.name); 209 assign (title, ob->arch->clone.name);
199 210
200 /* can_use_shield is a new flag. However, the can_use.. seems to largely come 211 /* can_use_shield is a new flag. However, the can_use.. seems to largely come
201 * from the class, and not race. I don't see any way to get the class information 212 * from the class, and not race. I don't see any way to get the class information
… …
229 add_friendly_object (ob); 240 add_friendly_object (ob);
230 241
231 LOG (llevInfo, "LOGIN: Player named %s from ip %s\n", &ob->name, ns->host); 242 LOG (llevInfo, "LOGIN: Player named %s from ip %s\n", &ob->name, ns->host);
232 243
233 new_draw_info (NDI_UNIQUE, 0, ob, "Welcome Back!"); 244 new_draw_info (NDI_UNIQUE, 0, ob, "Welcome Back!");
234 new_draw_info_format (NDI_UNIQUE | NDI_ALL | NDI_DK_ORANGE, 5, NULL, "%s has entered the game.", &ob->name);
235 245
236 esrv_new_player (this, ob->weight + ob->carrying); 246 esrv_new_player (this, ob->weight + ob->carrying);
237 247
238 ob->update_stats (); 248 ob->update_stats ();
239 ns->floorbox_update (); 249 ns->floorbox_update ();
240 250
241 esrv_send_inventory (ob, ob); 251 esrv_send_inventory (ob, ob);
242 esrv_add_spells (this, 0); 252 esrv_add_spells (this, 0);
243 253
244 enter_exit (ob, 0); 254 ob->activate_recursive ();
255 enter_map ();
245 256
246 send_rules (ob); 257 send_rules (ob);
247 send_news (ob); 258 send_news (ob);
248 display_motd (ob); 259 display_motd (ob);
260
261 INVOKE_PLAYER (CONNECT, this);
249 INVOKE_PLAYER (LOGIN, this); 262 INVOKE_PLAYER (LOGIN, this);
250} 263}
251 264
252void 265void
253player::disconnect () 266player::disconnect ()
254{ 267{
268 if (ob)
269 ob->deactivate_recursive ();
270
255 //TODO: don't be so harsh and destroy :) 271 //TODO: don't be so harsh and destroy :)
256 if (ns) 272 if (ns)
273 {
274 if (enable_save)
275 {
276 INVOKE_PLAYER (LOGOUT, this, ARG_INT (0));
277 save (true);
278 }
279
280 INVOKE_PLAYER (DISCONNECT, this);
281
282 client *ns = this->ns;
283 ns->send_packet ("goodbye");
284 ns->flush ();
285 ns->pl = 0;
286 this->ns = 0;
287
288 ns->destroy ();
257 destroy (); 289 destroy ();
290 }
258} 291}
259 292
260// the need for this function can be explained 293// the need for this function can be explained
261// by load_object not returning the object 294// by load_object not returning the object
262void 295void
… …
269 ob->speed = 1.0; 302 ob->speed = 1.0;
270 ob->direction = 5; /* So player faces south */ 303 ob->direction = 5; /* So player faces south */
271 ob->stats.wc = 2; 304 ob->stats.wc = 2;
272 ob->run_away = 25; /* Then we panick... */ 305 ob->run_away = 25; /* Then we panick... */
273 306
274 set_first_map (ob);
275
276 ob->roll_stats (); 307 ob->roll_stats ();
277} 308}
278 309
279player::player () 310player::player ()
280{ 311{
281 /* There are some elements we want initialized to non zero value - 312 /* There are some elements we want initialised to non zero value -
282 * we deal with that below this point. 313 * we deal with that below this point.
283 */ 314 */
284 outputs_sync = 16; /* Every 2 seconds */ 315 outputs_sync = 16; /* Every 2 seconds */
285 outputs_count = 8; /* Keeps present behaviour */ 316 outputs_count = 8; /* Keeps present behaviour */
286 unapply = unapply_nochoice; 317 unapply = unapply_nochoice;
287 318
288 assign (savebed_map, first_map_path); /* Init. respawn position */ 319 savebed_map = first_map_path; /* Init. respawn position */
289 320
290 gen_sp_armour = 10; 321 gen_sp_armour = 10;
291 last_speed = -1; 322 last_speed = -1;
292 shoottype = range_none; 323 shoottype = range_none;
293 bowtype = bow_normal; 324 bowtype = bow_normal;
… …
314} 345}
315 346
316void 347void
317player::do_destroy () 348player::do_destroy ()
318{ 349{
319 attachable::do_destroy (); 350 disconnect ();
320 351
321 save (false); 352 save (false);
322 enable_save = false; 353 enable_save = false;
323 354
324 disconnect (); 355 attachable::do_destroy ();
325 356
326 terminate_all_pets (ob); 357 terminate_all_pets (ob);
327 358
328 if (first_player != this) 359 if (first_player != this)
329 { 360 {
… …
345 376
346 if (ob) 377 if (ob)
347 { 378 {
348 ob->destroy_inv (false); 379 ob->destroy_inv (false);
349 ob->destroy (); 380 ob->destroy ();
350 }
351
352 if (ns)
353 {
354 client *ns = this->ns;
355 ns->send_packet ("goodbye");
356 ns->flush ();
357 ns->pl = 0;
358 this->ns = 0;
359 ns->destroy ();
360 } 381 }
361} 382}
362 383
363player::~player () 384player::~player ()
364{ 385{
… …
374player::create () 395player::create ()
375{ 396{
376 player *pl = new player; 397 player *pl = new player;
377 398
378 pl->set_object (arch_to_object (get_player_archetype (0))); 399 pl->set_object (arch_to_object (get_player_archetype (0)));
400 set_first_map (pl->ob);
379 401
380 return pl; 402 return pl;
381} 403}
382 404
383/* 405/*
… …
849 871
850 contr->orig_stats = stats; 872 contr->orig_stats = stats;
851 } 873 }
852} 874}
853 875
876static void
877start_info (object *op)
878{
879 char buf[MAX_BUF];
880
881 sprintf (buf, "Welcome to Crossfire v%s!", VERSION);
882 new_draw_info (NDI_UNIQUE, 0, op, buf);
883 //new_draw_info (NDI_UNIQUE, 0, op, "Press `?' for help");
884 //new_draw_info (NDI_UNIQUE, 0, op, " ");
885}
886
854/* This function takes the key that is passed, and does the 887/* This function takes the key that is passed, and does the
855 * appropriate action with it (change race, or other things). 888 * appropriate action with it (change race, or other things).
856 * The function name is for historical reasons - now we have 889 * The function name is for historical reasons - now we have
857 * separate race and class; this actually changes the RACE, 890 * separate race and class; this actually changes the RACE,
858 * not the class. 891 * not the class.
… …
903 if (*first_map_ext_path) 936 if (*first_map_ext_path)
904 { 937 {
905 object *tmp; 938 object *tmp;
906 char mapname[MAX_BUF]; 939 char mapname[MAX_BUF];
907 940
908 snprintf (mapname, MAX_BUF - 1, "%s/%s", first_map_ext_path, &op->arch->name); 941 snprintf (mapname, MAX_BUF - 1, "%s/%s", &first_map_ext_path, &op->arch->name);
909 tmp = object::create (); 942 tmp = object::create ();
910 EXIT_PATH (tmp) = mapname; 943 EXIT_PATH (tmp) = mapname;
911 EXIT_X (tmp) = op->x; 944 EXIT_X (tmp) = op->x;
912 EXIT_Y (tmp) = op->y; 945 EXIT_Y (tmp) = op->y;
913 enter_exit (op, tmp); /* we don't really care if it succeeded; 946 op->enter_exit (tmp); /* we don't really care if it succeeded;
914 * if the map isn't there, then stay on the 947 * if the map isn't there, then stay on the
915 * default initial map */ 948 * default initial map */
916 tmp->destroy (); 949 tmp->destroy ();
917 } 950 }
918 else 951 else
… …
975 INVOKE_PLAYER (QUIT, op->contr); 1008 INVOKE_PLAYER (QUIT, op->contr);
976 1009
977 op->contr->enable_save = false; 1010 op->contr->enable_save = false;
978 1011
979 terminate_all_pets (op); 1012 terminate_all_pets (op);
980 leave_map (op); 1013 op->remove ();
981 op->direction = 0; 1014 op->direction = 0;
982 new_draw_info_format (NDI_UNIQUE | NDI_ALL, 5, NULL, "%s quits the game.", &op->name); 1015 new_draw_info_format (NDI_UNIQUE | NDI_ALL, 5, NULL, "%s quits the game.", &op->name);
983 1016
984 strcpy (op->contr->killer, "quit"); 1017 strcpy (op->contr->killer, "quit");
985 check_score (op); 1018 check_score (op);
986 op->contr->party = 0; 1019 op->contr->party = 0;
987 op->contr->own_title[0] = '\0'; 1020 op->contr->own_title[0] = '\0';
988
989 object_ptr ob = op;
990
991 /* We need to hunt for any per player unique maps in memory and
992 * get rid of them. The trailing slash in the path is intentional,
993 * so that players named 'Ab' won't match against players 'Abe' pathname
994 */
995 char buf[MAX_BUF];
996 sprintf (buf, "%s/%s/%s/", settings.localdir, settings.playerdir, &op->name);
997
998 for (maptile *next, *mp = first_map; mp; mp = next)
999 {
1000 next = mp->next;
1001
1002 if (!strncmp (mp->path, buf, strlen (buf)))
1003 delete_map (mp);
1004 }
1005
1006 delete_character (ob->name, 1);
1007 ob->contr->destroy (); 1021 op->contr->destroy ();
1008 1022
1009 return 1; 1023 return 1;
1010} 1024}
1011 1025
1012void 1026void
… …
1756 } 1770 }
1757 else if (op->contr->bowtype >= bow_n && op->contr->bowtype <= bow_nw) 1771 else if (op->contr->bowtype >= bow_n && op->contr->bowtype <= bow_nw)
1758 { 1772 {
1759 if (!similar_direction (dir, op->contr->bowtype - bow_n + 1)) 1773 if (!similar_direction (dir, op->contr->bowtype - bow_n + 1))
1760 wcmod = -1; 1774 wcmod = -1;
1775
1761 ret = fire_bow (op, op, NULL, op->contr->bowtype - bow_n + 1, wcmod, op->x, op->y); 1776 ret = fire_bow (op, op, NULL, op->contr->bowtype - bow_n + 1, wcmod, op->x, op->y);
1762 } 1777 }
1763 else if (op->contr->bowtype == bow_threewide) 1778 else if (op->contr->bowtype == bow_threewide)
1764 { 1779 {
1765 ret = fire_bow (op, op, NULL, dir, 0, op->x, op->y); 1780 ret = fire_bow (op, op, NULL, dir, 0, op->x, op->y);
… …
2337 2352
2338 /* call this here - we also will call this in do_ericserver, but 2353 /* call this here - we also will call this in do_ericserver, but
2339 * the players time has been increased when doericserver has been 2354 * the players time has been increased when doericserver has been
2340 * called, so we recheck it here. 2355 * called, so we recheck it here.
2341 */ 2356 */
2342 //TODO: better than handling 8 commands, use some more intelligent rate-limiting 2357 op->contr->ns->handle_command ();
2343 for (int rep = 8; --rep && op->contr->ns->handle_command (); )
2344 ;
2345 2358
2346 if (op->speed_left < 0) 2359 if (op->speed_left < 0)
2347 return 0; 2360 return 0;
2348 2361
2349 if (op->direction && (op->contr->run_on || op->contr->fire_on)) 2362 if (op->direction && (op->contr->run_on || op->contr->fire_on))
… …
3311 if (pl->type != PLAYER) 3324 if (pl->type != PLAYER)
3312 { 3325 {
3313 LOG (llevError, "player_can_view() called for non-player object\n"); 3326 LOG (llevError, "player_can_view() called for non-player object\n");
3314 return -1; 3327 return -1;
3315 } 3328 }
3329
3316 if (!pl || !op) 3330 if (!pl || !op)
3317 return 0; 3331 return 0;
3318 3332
3319 if (op->head)
3320 {
3321 op = op->head; 3333 op = op->head_ ();
3322 } 3334
3323 get_rangevector (pl, op, &rv, 0x1); 3335 get_rangevector (pl, op, &rv, 0x1);
3324 3336
3325 /* starting with the 'head' part, lets loop 3337 /* starting with the 'head' part, lets loop
3326 * through the object and find if it has any 3338 * through the object and find if it has any
3327 * part that is in the los array but isnt on 3339 * part that is in the los array but isnt on
… …
3457 if (trlist == NULL || who->type != PLAYER) 3469 if (trlist == NULL || who->type != PLAYER)
3458 return; 3470 return;
3459 3471
3460 for (i = 0, tr = trlist->items; tr != NULL && i < level - 1; tr = tr->next, i++); 3472 for (i = 0, tr = trlist->items; tr != NULL && i < level - 1; tr = tr->next, i++);
3461 3473
3462 if (tr == NULL || tr->item == NULL) 3474 if (!tr || !tr->item)
3463 { 3475 {
3464 /* LOG(llevDebug, "-> no more treasure for %s\n", change_resist_msg[atnr]); */ 3476 /* LOG(llevDebug, "-> no more treasure for %s\n", change_resist_msg[atnr]); */
3465 return; 3477 return;
3466 } 3478 }
3467 3479

Diff Legend

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