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

Comparing deliantra/server/server/login.C (file contents):
Revision 1.3 by root, Sun Aug 27 16:15:13 2006 UTC vs.
Revision 1.11 by root, Sun Sep 3 22:45:57 2006 UTC

1/* 1/*
2 * static char *rcsid_login_c = 2 * static char *rcsid_login_c =
3 * "$Id: login.C,v 1.3 2006/08/27 16:15:13 root Exp $"; 3 * "$Id: login.C,v 1.11 2006/09/03 22:45:57 root Exp $";
4 */ 4 */
5 5
6/* 6/*
7 CrossFire, A Multiplayer game for X-windows 7 CrossFire, A Multiplayer game for X-windows
8 8
… …
59/* If we are not exiting the game (ie, this is sort of a backup save), then 59/* If we are not exiting the game (ie, this is sort of a backup save), then
60 * don't change the location back to the village. Note that there are other 60 * don't change the location back to the village. Note that there are other
61 * options to have backup saves be done at the starting village 61 * options to have backup saves be done at the starting village
62 */ 62 */
63 if (!flag) { 63 if (!flag) {
64 strcpy(pl->maplevel, first_map_path); 64 strcpy(pl->maplevel, first_map_path);
65 if(pl->ob->map!=NULL) 65 if(pl->ob->map!=NULL)
66 pl->ob->map = NULL; 66 pl->ob->map = NULL;
67 pl->ob->x = -1; 67 pl->ob->x = -1;
68 pl->ob->y = -1; 68 pl->ob->y = -1;
69 } 69 }
70 if(!save_player(pl->ob,flag)) { 70 if(!save_player(pl->ob,flag)) {
71 LOG(llevError, "(failed) "); 71 LOG(llevError, "(failed) ");
72 new_draw_info(NDI_UNIQUE, 0,pl->ob,"Emergency save failed, checking score..."); 72 new_draw_info(NDI_UNIQUE, 0,pl->ob,"Emergency save failed, checking score...");
73 } 73 }
… …
93void delete_character(const char *name, int newchar) { 93void delete_character(const char *name, int newchar) {
94 char buf[MAX_BUF]; 94 char buf[MAX_BUF];
95 95
96 sprintf(buf,"%s/%s/%s.pl",settings.localdir,settings.playerdir,name); 96 sprintf(buf,"%s/%s/%s.pl",settings.localdir,settings.playerdir,name);
97 if(unlink(buf)== -1) 97 if(unlink(buf)== -1)
98 LOG(llevDebug, "Cannot delete character file %s: %s\n", buf, strerror_local(errno)); 98 LOG(llevDebug, "Cannot delete character file %s: %s\n", buf, strerror(errno));
99 if (newchar) { 99 if (newchar) {
100 sprintf(buf,"%s/%s/%s",settings.localdir,settings.playerdir,name); 100 sprintf(buf,"%s/%s/%s",settings.localdir,settings.playerdir,name);
101 /* this effectively does an rm -rf on the directory */ 101 /* this effectively does an rm -rf on the directory */
102 remove_directory(buf); 102 remove_directory(buf);
103 } 103 }
104} 104}
105 105
106/* This verify that a character of name exits, and that it matches 106/* This verify that a character of name exits, and that it matches
107 * password. It return 0 if there is match, 1 if no such player, 107 * password. It return 0 if there is match, 1 if no such player,
… …
113 char buf[MAX_BUF]; 113 char buf[MAX_BUF];
114 int comp; 114 int comp;
115 FILE *fp; 115 FILE *fp;
116 116
117 if (strpbrk(name, "/.\\") != NULL) { 117 if (strpbrk(name, "/.\\") != NULL) {
118 LOG(llevError, "Username contains illegal characters: %s\n", name); 118 LOG(llevError, "Username contains illegal characters: %s\n", name);
119 return 1; 119 return 1;
120 } 120 }
121 121
122 snprintf(buf, sizeof(buf), "%s/%s/%s/%s.pl", settings.localdir, settings.playerdir, name, name); 122 snprintf(buf, sizeof(buf), "%s/%s/%s/%s.pl", settings.localdir, settings.playerdir, name, name);
123 if (strlen(buf) >= sizeof(buf)-1) { 123 if (strlen(buf) >= sizeof(buf)-1) {
124 LOG(llevError, "Username too long: %s\n", name); 124 LOG(llevError, "Username too long: %s\n", name);
125 return 1; 125 return 1;
126 } 126 }
127 127
128 if ((fp=open_and_uncompress(buf,0,&comp))==NULL) return 1; 128 if ((fp=open_and_uncompress(buf,0,&comp))==NULL) return 1;
129 129
130 /* Read in the file until we find the password line. Our logic could 130 /* Read in the file until we find the password line. Our logic could
131 * be a bit better on cleaning up the password from the file, but since 131 * be a bit better on cleaning up the password from the file, but since
132 * it is written by the program, I think it is fair to assume that the 132 * it is written by the program, I think it is fair to assume that the
133 * syntax should be pretty standard. 133 * syntax should be pretty standard.
134 */ 134 */
135 while (fgets(buf, MAX_BUF-1, fp) != NULL) { 135 while (fgets(buf, MAX_BUF-1, fp) != NULL) {
136 if (!strncmp(buf,"password ",9)) { 136 if (!strncmp(buf,"password ",9)) {
137 buf[strlen(buf)-1]=0; /* remove newline */ 137 buf[strlen(buf)-1]=0; /* remove newline */
138 if (check_password(password, buf+9)) { 138 if (check_password(password, buf+9)) {
139 close_and_delete(fp, comp); 139 close_and_delete(fp, comp);
140 return 0; 140 return 0;
141 } 141 }
142 else { 142 else {
143 close_and_delete(fp, comp); 143 close_and_delete(fp, comp);
144 return 2; 144 return 2;
145 } 145 }
146 } 146 }
147 } 147 }
148 LOG(llevDebug,"Could not find a password line in player %s\n", name); 148 LOG(llevDebug,"Could not find a password line in player %s\n", name);
149 close_and_delete(fp, comp); 149 close_and_delete(fp, comp);
150 return 1; 150 return 1;
151} 151}
… …
162 162
163int check_name(player *me,const char *name) { 163int check_name(player *me,const char *name) {
164 player *pl; 164 player *pl;
165 165
166 for(pl=first_player;pl!=NULL;pl=pl->next) 166 for(pl=first_player;pl!=NULL;pl=pl->next)
167 if(pl!=me&&pl->ob->name!=NULL&&!strcmp(pl->ob->name,name)) { 167 if(pl!=me&&pl->ob->name!=NULL&&!strcmp(pl->ob->name,name)) {
168 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name is already in use."); 168 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name is already in use.");
169 return 0; 169 return 0;
170 } 170 }
171 171
172 if (*name=='\0') { 172 if (*name=='\0') {
173 new_draw_info(NDI_UNIQUE, 0,me->ob,"Null names are not allowed."); 173 new_draw_info(NDI_UNIQUE, 0,me->ob,"Null names are not allowed.");
174 return 0; 174 return 0;
175 } 175 }
176 176
177 if(!playername_ok(name)) { 177 if(!playername_ok(name)) {
178 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name contains illegal characters."); 178 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name contains illegal characters.");
179 return 0; 179 return 0;
180 } 180 }
181 if (strlen(name) >= MAX_NAME) { 181 if (strlen(name) >= MAX_NAME) {
182 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name is too long."); 182 new_draw_info(NDI_UNIQUE, 0,me->ob,"That name is too long.");
183 return 0; 183 return 0;
184 } 184 }
185 185
186 return 1; 186 return 1;
187} 187}
188 188
… …
195 return 0; 195 return 0;
196 } else { 196 } else {
197 stat(savedir, buf); 197 stat(savedir, buf);
198 if (!S_ISDIR(buf->st_mode)) 198 if (!S_ISDIR(buf->st_mode))
199 if (mkdir(savedir, SAVE_DIR_MODE)) 199 if (mkdir(savedir, SAVE_DIR_MODE))
200 { 200 {
201 LOG(llevError, "Unable to create player savedir %s: %s\n", savedir, strerror_local(errno)); 201 LOG(llevError, "Unable to create player savedir %s: %s\n", savedir, strerror(errno));
202 return 0; 202 return 0;
203 } 203 }
204 free(buf); 204 free(buf);
205 } 205 }
206 return 1; 206 return 1;
207} 207}
208 208
209void destroy_object (object *op) 209void destroy_object (object *op)
210{ 210{
211 object *tmp; 211 object *tmp;
212 while ((tmp = op->inv)) 212 while ((tmp = op->inv))
213 destroy_object (tmp); 213 destroy_object (tmp);
214 214
215 if (!QUERY_FLAG(op, FLAG_REMOVED)) 215 if (!QUERY_FLAG(op, FLAG_REMOVED))
216 remove_ob(op); 216 remove_ob(op);
217 free_object(op); 217 free_object(op);
218} 218}
219 219
220/* 220/*
221 * If flag is set, it's only backup, ie dont remove objects from inventory 221 * If flag is set, it's only backup, ie dont remove objects from inventory
… …
223 * will be saved at the emergency save location. 223 * will be saved at the emergency save location.
224 * Returns non zero if successful. 224 * Returns non zero if successful.
225 */ 225 */
226 226
227int save_player(object *op, int flag) { 227int save_player(object *op, int flag) {
228 FILE *fp;
229 char filename[MAX_BUF], *tmpfilename,backupfile[MAX_BUF];
230 object *tmp, *container=NULL; 228 object *tmp, *container=NULL;
231 player *pl = op->contr; 229 player *pl = op->contr;
232 int i,wiz=QUERY_FLAG(op,FLAG_WIZ); 230 int i,wiz=QUERY_FLAG(op,FLAG_WIZ);
233 long checksum; 231 long checksum;
234#ifdef BACKUP_SAVE_AT_HOME 232#ifdef BACKUP_SAVE_AT_HOME
… …
252 250
253 /* Prevent accidental saves if connection is reset after player has 251 /* Prevent accidental saves if connection is reset after player has
254 * mostly exited. 252 * mostly exited.
255 */ 253 */
256 if (pl->state != ST_PLAYING && pl->state != ST_GET_PARTY_PASSWORD) 254 if (pl->state != ST_PLAYING && pl->state != ST_GET_PARTY_PASSWORD)
257 return 0; 255 return 0;
256
257 INVOKE_PLAYER (SAVE, op->contr);
258 258
259 if (flag == 0) 259 if (flag == 0)
260 terminate_all_pets(op); 260 terminate_all_pets(op);
261 261
262 /* Delete old style file */ 262 object_freezer freezer;
263 sprintf(filename,"%s/%s/%s.pl",settings.localdir,settings.playerdir,op->name);
264 unlink(filename);
265 263
266 sprintf(filename,"%s/%s/%s/%s.pl",settings.localdir,settings.playerdir,op->name,op->name);
267 make_path_to_file(filename);
268
269 tmpfilename = tempnam_local(settings.tmpdir,NULL);
270 fp=fopen(tmpfilename, "w");
271 if(!fp) {
272 new_draw_info(NDI_UNIQUE, 0,op, "Can't open file for save.");
273 LOG(llevDebug,"Can't open file for save (%s).\n",tmpfilename);
274 free(tmpfilename);
275 return 0;
276 }
277
278/* Eneq(@csd.uu.se): If we have an open container hide it. */ 264 /* Eneq(@csd.uu.se): If we have an open container hide it. */
279 if (op->container) { 265 if (op->container)
266 {
280 container=op->container; 267 container = op->container;
281 op->container=NULL; 268 op->container = NULL;
282 } 269 }
283 270
284 INVOKE_PLAYER (SAVE, op->contr, ARG_STRING (filename));
285
286 object_freezer freezer (filename);
287
288 freezer.put (op->contr);
289
290 fprintf(fp,"password %s\n",pl->password); 271 fprintf(freezer,"password %s\n",pl->password);
272
291 if (settings.set_title == TRUE) 273 if (settings.set_title == TRUE)
292 if(pl->own_title[0]!='\0') 274 if(pl->own_title[0]!='\0')
293 fprintf(fp,"title %s\n",pl->own_title); 275 fprintf(freezer,"title %s\n",pl->own_title);
294 276
295 fprintf(fp,"explore %d\n",pl->explore); 277 fprintf(freezer,"explore %d\n",pl->explore);
296 fprintf(fp,"gen_hp %d\n",pl->gen_hp); 278 fprintf(freezer,"gen_hp %d\n",pl->gen_hp);
297 fprintf(fp,"gen_sp %d\n",pl->gen_sp); 279 fprintf(freezer,"gen_sp %d\n",pl->gen_sp);
298 fprintf(fp,"gen_grace %d\n",pl->gen_grace); 280 fprintf(freezer,"gen_grace %d\n",pl->gen_grace);
299 fprintf(fp,"listening %d\n",pl->listening); 281 fprintf(freezer,"listening %d\n",pl->listening);
300 fprintf(fp,"shoottype %d\n",pl->shoottype); 282 fprintf(freezer,"shoottype %d\n",pl->shoottype);
301 fprintf(fp,"bowtype %d\n",pl->bowtype); 283 fprintf(freezer,"bowtype %d\n",pl->bowtype);
302 fprintf(fp,"petmode %d\n",pl->petmode); 284 fprintf(freezer,"petmode %d\n",pl->petmode);
303 fprintf(fp,"peaceful %d\n",pl->peaceful); 285 fprintf(freezer,"peaceful %d\n",pl->peaceful);
304 fprintf(fp,"no_shout %d\n",pl->no_shout); 286 fprintf(freezer,"no_shout %d\n",pl->no_shout);
305 fprintf(fp,"digestion %d\n",pl->digestion); 287 fprintf(freezer,"digestion %d\n",pl->digestion);
306 fprintf(fp,"pickup %d\n", pl->mode); 288 fprintf(freezer,"pickup %d\n", pl->mode);
307 fprintf(fp,"outputs_sync %d\n", pl->outputs_sync); 289 fprintf(freezer,"outputs_sync %d\n", pl->outputs_sync);
308 fprintf(fp,"outputs_count %d\n", pl->outputs_count); 290 fprintf(freezer,"outputs_count %d\n", pl->outputs_count);
309 /* Match the enumerations but in string form */ 291 /* Match the enumerations but in string form */
310 fprintf(fp,"usekeys %s\n", pl->usekeys==key_inventory?"key_inventory": 292 fprintf(freezer,"usekeys %s\n", pl->usekeys==key_inventory?"key_inventory":
311 (pl->usekeys==keyrings?"keyrings":"containers")); 293 (pl->usekeys==keyrings?"keyrings":"containers"));
312 /* Match the enumerations but in string form */ 294 /* Match the enumerations but in string form */
313 fprintf(fp,"unapply %s\n", pl->unapply==unapply_nochoice?"unapply_nochoice": 295 fprintf(freezer,"unapply %s\n", pl->unapply==unapply_nochoice?"unapply_nochoice":
314 (pl->unapply==unapply_never?"unapply_never":"unapply_always")); 296 (pl->unapply==unapply_never?"unapply_never":"unapply_always"));
315
316
317 297
318#ifdef BACKUP_SAVE_AT_HOME 298#ifdef BACKUP_SAVE_AT_HOME
319 if (op->map!=NULL && flag==0) 299 if (op->map!=NULL && flag==0)
320#else 300#else
321 if (op->map!=NULL) 301 if (op->map!=NULL)
322#endif 302#endif
323 fprintf(fp,"map %s\n",op->map->path); 303 fprintf(freezer,"map %s\n",op->map->path);
324 else 304 else
325 fprintf(fp,"map %s\n",settings.emergency_mapname); 305 fprintf(freezer,"map %s\n",settings.emergency_mapname);
326 306
327 fprintf(fp,"savebed_map %s\n", pl->savebed_map); 307 fprintf(freezer,"savebed_map %s\n", pl->savebed_map);
328 fprintf(fp,"bed_x %d\nbed_y %d\n", pl->bed_x, pl->bed_y); 308 fprintf(freezer,"bed_x %d\nbed_y %d\n", pl->bed_x, pl->bed_y);
329 fprintf(fp,"weapon_sp %f\n",pl->weapon_sp); 309 fprintf(freezer,"weapon_sp %f\n",pl->weapon_sp);
330 fprintf(fp,"Str %d\n",pl->orig_stats.Str); 310 fprintf(freezer,"Str %d\n",pl->orig_stats.Str);
331 fprintf(fp,"Dex %d\n",pl->orig_stats.Dex); 311 fprintf(freezer,"Dex %d\n",pl->orig_stats.Dex);
332 fprintf(fp,"Con %d\n",pl->orig_stats.Con); 312 fprintf(freezer,"Con %d\n",pl->orig_stats.Con);
333 fprintf(fp,"Int %d\n",pl->orig_stats.Int); 313 fprintf(freezer,"Int %d\n",pl->orig_stats.Int);
334 fprintf(fp,"Pow %d\n",pl->orig_stats.Pow); 314 fprintf(freezer,"Pow %d\n",pl->orig_stats.Pow);
335 fprintf(fp,"Wis %d\n",pl->orig_stats.Wis); 315 fprintf(freezer,"Wis %d\n",pl->orig_stats.Wis);
336 fprintf(fp,"Cha %d\n",pl->orig_stats.Cha); 316 fprintf(freezer,"Cha %d\n",pl->orig_stats.Cha);
337 317
338 fprintf(fp,"lev_array %d\n",op->level>10?10:op->level); 318 fprintf(freezer,"lev_array %d\n",op->level>10?10:op->level);
339 for(i=1;i<=pl->last_level&&i<=10;i++) { 319 for(i=1;i<=pl->last_level&&i<=10;i++) {
340 fprintf(fp,"%d\n",pl->levhp[i]); 320 fprintf(freezer,"%d\n",pl->levhp[i]);
341 fprintf(fp,"%d\n",pl->levsp[i]); 321 fprintf(freezer,"%d\n",pl->levsp[i]);
342 fprintf(fp,"%d\n",pl->levgrace[i]); 322 fprintf(freezer,"%d\n",pl->levgrace[i]);
343 } 323 }
324
325 freezer.put (op->contr);
326
344 fprintf(fp,"endplst\n"); 327 fprintf(freezer,"endplst\n");
345 328
346 SET_FLAG(op, FLAG_NO_FIX_PLAYER); 329 SET_FLAG(op, FLAG_NO_FIX_PLAYER);
347 CLEAR_FLAG(op, FLAG_WIZ); 330 CLEAR_FLAG(op, FLAG_WIZ);
348#ifdef BACKUP_SAVE_AT_HOME 331#ifdef BACKUP_SAVE_AT_HOME
349 if (flag) { 332 if (flag) {
… …
353 op->y = -1; 336 op->y = -1;
354 } 337 }
355 /* Save objects, but not unpaid objects. Don't remove objects from 338 /* Save objects, but not unpaid objects. Don't remove objects from
356 * inventory. 339 * inventory.
357 */ 340 */
358 save_object(fp, freezer, op, 2); 341 save_object(freezer, op, 2);
359 if (flag) { 342 if (flag) {
360 op->x = backup_x; 343 op->x = backup_x;
361 op->y = backup_y; 344 op->y = backup_y;
362 } 345 }
363#else 346#else
364 save_object(fp, freezer, op, 3); /* don't check and don't remove */ 347 save_object(freezer, op, 3); /* don't check and don't remove */
365#endif 348#endif
349
350 char filename[MAX_BUF];
351 sprintf(filename,"%s/%s/%s/%s.pl",settings.localdir,settings.playerdir,&op->name,&op->name);
352 make_path_to_file(filename);
353 freezer.save (filename);
366 354
367 CLEAR_FLAG(op, FLAG_NO_FIX_PLAYER); 355 CLEAR_FLAG(op, FLAG_NO_FIX_PLAYER);
368 356
369 if(!flag) 357 if(!flag)
370 while ((tmp = op->inv)) 358 while ((tmp = op->inv))
371 destroy_object (tmp); 359 destroy_object (tmp);
372
373 if (fclose(fp) == EOF) { /* make sure the write succeeded */
374 new_draw_info(NDI_UNIQUE, 0,op, "Can't save character.");
375 unlink(tmpfilename);
376 free(tmpfilename);
377 return 0;
378 }
379
380 checksum = 0;
381 sprintf(backupfile, "%s.tmp", filename);
382 rename(filename, backupfile);
383 fp = fopen(filename,"w");
384 if(!fp) {
385 new_draw_info(NDI_UNIQUE, 0,op, "Can't open file for save.");
386 unlink(tmpfilename);
387 free(tmpfilename);
388 return 0;
389 }
390 fprintf(fp,"checksum %lx\n",checksum);
391 copy_file(tmpfilename, fp);
392 unlink(tmpfilename);
393 free(tmpfilename);
394 if (fclose(fp) == EOF) { /* got write error */
395 new_draw_info(NDI_UNIQUE, 0,op, "Can't close file for save.");
396 rename(backupfile, filename); /* Restore the original */
397 return 0;
398 }
399 else
400 unlink(backupfile);
401 360
402 /* Eneq(@csd.uu.se): Reveal the container if we have one. */ 361 /* Eneq(@csd.uu.se): Reveal the container if we have one. */
403 if (flag&&container!=NULL) 362 if (flag && container!=NULL)
404 op->container = container; 363 op->container = container;
405 364
406 if (wiz) SET_FLAG(op,FLAG_WIZ); 365 if (wiz) SET_FLAG (op, FLAG_WIZ);
366
407 if(!flag) 367 if(!flag)
408 esrv_send_inventory(op, op); 368 esrv_send_inventory(op, op);
409
410 chmod(filename,SAVE_MODE);
411 369
412 return 1; 370 return 1;
413} 371}
414 372
415void copy_file(const char *filename, FILE *fpout) {
416 FILE *fp;
417 char buf[MAX_BUF];
418 if((fp = fopen(filename,"r")) == NULL)
419 return;
420 while(fgets(buf,MAX_BUF,fp)!=NULL)
421 fputs(buf,fpout);
422 fclose(fp);
423}
424
425
426void check_login(object *op) { 373void check_login(object *op) {
427 FILE *fp;
428 char filename[MAX_BUF]; 374 char filename[MAX_BUF];
429 char buf[MAX_BUF],bufall[MAX_BUF]; 375 char buf[MAX_BUF],bufall[MAX_BUF];
430 int i,value,comp; 376 int i,value,comp;
431 long checksum = 0; 377 long checksum = 0;
432 player *pl = op->contr; 378 player *pl = op->contr;
433 int correct = 0; 379 int correct = 0;
434 time_t elapsed_save_time=0;
435 struct stat statbuf;
436 380
437 strcpy (pl->maplevel,first_map_path); 381 strcpy (pl->maplevel,first_map_path);
438
439 /* First, lets check for newest form of save */
440 sprintf(filename,"%s/%s/%s/%s.pl",settings.localdir,settings.playerdir,op->name,op->name); 382 sprintf(filename,"%s/%s/%s/%s.pl",settings.localdir,settings.playerdir,&op->name,&op->name);
441 if (access(filename, F_OK)==-1) {
442 /* not there, Try the old style */
443 383
444 sprintf(filename,"%s/%s/%s.pl",settings.localdir,settings.playerdir,op->name); 384 object_thawer thawer (filename);
445 /* Ok - old style exists. Lets make the new style directory */
446 if (access(filename, F_OK)==0) {
447 sprintf(buf,"%s/%s/%s",settings.localdir,settings.playerdir,op->name);
448 make_path_to_file(buf);
449 }
450 }
451
452 /* If no file, must be a new player, so lets get confirmation of 385 /* If no file, must be a new player, so lets get confirmation of
453 * the password. Return control to the higher level dispatch, 386 * the password. Return control to the higher level dispatch,
454 * since the rest of this just deals with loading of the file. 387 * since the rest of this just deals with loading of the file.
455 */ 388 */
456 if ((fp=open_and_uncompress(filename,1,&comp)) == NULL) { 389 if (!thawer) {
457 confirm_password(op); 390 confirm_password(op);
458 return; 391 return;
459 } 392 }
460 if (fstat(fileno(fp), &statbuf)) {
461 LOG(llevError,"Unable to stat %s?\n", filename);
462 elapsed_save_time=0;
463 } else {
464 elapsed_save_time = time(NULL) - statbuf.st_mtime;
465 if (elapsed_save_time<0) {
466 LOG(llevError,"Player file %s was saved in the future? (%d time)\n", filename, elapsed_save_time);
467 elapsed_save_time=0;
468 }
469 }
470 393
471 object_thawer thawer (filename);
472
473 if(fgets(bufall,MAX_BUF,fp) != NULL) { 394 if(fgets(bufall,MAX_BUF,thawer) != NULL) {
474 if(!strncmp(bufall,"checksum ",9)) { 395 if(!strncmp(bufall,"checksum ",9)) {
475 checksum = strtol(bufall+9,(char **) NULL, 16); 396 checksum = strtol(bufall+9,(char **) NULL, 16);
476 (void) fgets(bufall,MAX_BUF,fp); 397 (void) fgets(bufall,MAX_BUF,thawer);
477 } 398 }
478 if(sscanf(bufall,"password %s\n",buf)) { 399 if(sscanf(bufall,"password %s\n",buf)) {
479 /* New password scheme: */ 400 /* New password scheme: */
480 correct=check_password(pl->write_buf+1,buf); 401 correct=check_password(pl->write_buf+1,buf);
481 } 402 }
482 /* Old password mode removed - I have no idea what it 403 /* Old password mode removed - I have no idea what it
483 * was, and the current password mechanism has been used 404 * was, and the current password mechanism has been used
484 * for at least several years. 405 * for at least several years.
485 */ 406 */
486 } 407 }
487 if (!correct) { 408 if (!correct) {
488 new_draw_info(NDI_UNIQUE, 0,op," "); 409 new_draw_info(NDI_UNIQUE, 0,op," ");
489 new_draw_info(NDI_UNIQUE, 0,op,"Wrong Password!"); 410 new_draw_info(NDI_UNIQUE, 0,op,"Wrong Password!");
490 new_draw_info(NDI_UNIQUE, 0,op," "); 411 new_draw_info(NDI_UNIQUE, 0,op," ");
491 FREE_AND_COPY(op->name, "noname"); 412 op->name =
492 FREE_AND_COPY(op->name_pl, "noname"); 413 op->name_pl = "noname";
493 op->contr->socket.password_fails++; 414 op->contr->socket.password_fails++;
494 if (op->contr->socket.password_fails >= MAX_PASSWORD_FAILURES) { 415 if (op->contr->socket.password_fails >= MAX_PASSWORD_FAILURES) {
495 new_draw_info(NDI_UNIQUE, 0,op, 416 new_draw_info(NDI_UNIQUE, 0,op,
496 "You gave an incorrect password too many times, you will now be dropped from the server."); 417 "You gave an incorrect password too many times, you will now be dropped from the server.");
497 LOG(llevInfo, "A player connecting from %s has been dropped for password failure\n", 418 LOG(llevInfo, "A player connecting from %s has been dropped for password failure\n",
498 op->contr->socket.host); 419 op->contr->socket.host);
499 op->contr->socket.status = Ns_Dead; /* the socket loop should handle the rest for us */ 420 op->contr->socket.status = Ns_Dead; /* the socket loop should handle the rest for us */
500 } 421 }
501 else get_name(op); 422 else get_name(op);
502 return; /* Once again, rest of code just loads the char */ 423 return; /* Once again, rest of code just loads the char */
503 } 424 }
504 425
505#ifdef SAVE_INTERVAL 426#ifdef SAVE_INTERVAL
506 pl->last_save_time=time(NULL); 427 pl->last_save_time=time(NULL);
507#endif /* SAVE_INTERVAL */ 428#endif /* SAVE_INTERVAL */
508 pl->party = NULL; 429 pl->party = NULL;
509 if (settings.search_items == TRUE) 430 if (settings.search_items == TRUE)
510 pl->search_str[0]='\0'; 431 pl->search_str[0]='\0';
511 pl->name_changed=1; 432 pl->name_changed=1;
512 pl->orig_stats.Str=0; 433 pl->orig_stats.Str=0;
513 pl->orig_stats.Dex=0; 434 pl->orig_stats.Dex=0;
514 pl->orig_stats.Con=0; 435 pl->orig_stats.Con=0;
515 pl->orig_stats.Int=0; 436 pl->orig_stats.Int=0;
… …
519 strcpy(pl->savebed_map, first_map_path); 440 strcpy(pl->savebed_map, first_map_path);
520 pl->bed_x=0, pl->bed_y=0; 441 pl->bed_x=0, pl->bed_y=0;
521 pl->spellparam[0] = '\0'; 442 pl->spellparam[0] = '\0';
522 443
523 /* Loop through the file, loading the rest of the values */ 444 /* Loop through the file, loading the rest of the values */
524 while (fgets(bufall,MAX_BUF,fp)!=NULL) { 445 while (fgets(bufall,MAX_BUF,thawer)!=NULL) {
525 sscanf(bufall,"%s %d\n",buf,&value); 446 sscanf(bufall,"%s %d\n",buf,&value);
526 if (!strcmp(buf,"endplst")) 447 if (!strcmp(buf,"endplst"))
527 break; 448 break;
449 else if (!strcmp(buf,"oid"))
450 thawer.get (pl, value);
528 else if (!strcmp(buf,"title") && settings.set_title == TRUE) 451 else if (!strcmp(buf,"title") && settings.set_title == TRUE)
529 sscanf(bufall,"title %[^\n]",pl->own_title); 452 sscanf(bufall,"title %[^\n]",pl->own_title);
530 else if (!strcmp(buf,"explore")) 453 else if (!strcmp(buf,"explore"))
531 pl->explore = value; 454 pl->explore = value;
532 else if (!strcmp(buf,"gen_hp")) 455 else if (!strcmp(buf,"gen_hp"))
533 pl->gen_hp=value; 456 pl->gen_hp=value;
534 else if (!strcmp(buf,"shoottype")) 457 else if (!strcmp(buf,"shoottype"))
535 pl->shoottype=(rangetype)value; 458 pl->shoottype=(rangetype)value;
536 else if (!strcmp(buf,"bowtype")) 459 else if (!strcmp(buf,"bowtype"))
537 pl->bowtype=(bowtype_t)value; 460 pl->bowtype=(bowtype_t)value;
538 else if (!strcmp(buf,"petmode")) 461 else if (!strcmp(buf,"petmode"))
539 pl->petmode=(petmode_t)value; 462 pl->petmode=(petmode_t)value;
540 else if (!strcmp(buf,"gen_sp")) 463 else if (!strcmp(buf,"gen_sp"))
541 pl->gen_sp=value; 464 pl->gen_sp=value;
542 else if (!strcmp(buf,"gen_grace")) 465 else if (!strcmp(buf,"gen_grace"))
543 pl->gen_grace=value; 466 pl->gen_grace=value;
544 else if (!strcmp(buf,"listening")) 467 else if (!strcmp(buf,"listening"))
545 pl->listening=value; 468 pl->listening=value;
546 else if (!strcmp(buf,"peaceful")) 469 else if (!strcmp(buf,"peaceful"))
547 pl->peaceful=value; 470 pl->peaceful=value;
548 else if (!strcmp(buf,"no_shout")) 471 else if (!strcmp(buf,"no_shout"))
549 pl->no_shout=value; 472 pl->no_shout=value;
550 else if (!strcmp(buf,"digestion")) 473 else if (!strcmp(buf,"digestion"))
551 pl->digestion=value; 474 pl->digestion=value;
552 else if (!strcmp(buf,"pickup")) 475 else if (!strcmp(buf,"pickup"))
553 pl->mode=value; 476 pl->mode=value;
554 else if (!strcmp(buf,"outputs_sync")) 477 else if (!strcmp(buf,"outputs_sync"))
555 pl->outputs_sync = value; 478 pl->outputs_sync = value;
556 else if (!strcmp(buf,"outputs_count")) 479 else if (!strcmp(buf,"outputs_count"))
557 pl->outputs_count = value; 480 pl->outputs_count = value;
558 else if (!strcmp(buf,"map")) 481 else if (!strcmp(buf,"map"))
559 sscanf(bufall,"map %s", pl->maplevel); 482 sscanf(bufall,"map %s", pl->maplevel);
560 else if (!strcmp(buf,"savebed_map")) 483 else if (!strcmp(buf,"savebed_map"))
561 sscanf(bufall,"savebed_map %s", pl->savebed_map); 484 sscanf(bufall,"savebed_map %s", pl->savebed_map);
562 else if (!strcmp(buf,"bed_x")) 485 else if (!strcmp(buf,"bed_x"))
563 pl->bed_x=value; 486 pl->bed_x=value;
564 else if (!strcmp(buf,"bed_y")) 487 else if (!strcmp(buf,"bed_y"))
565 pl->bed_y=value; 488 pl->bed_y=value;
566 else if (!strcmp(buf,"weapon_sp")) 489 else if (!strcmp(buf,"weapon_sp"))
567 sscanf(buf,"weapon_sp %f",&pl->weapon_sp); 490 sscanf(buf,"weapon_sp %f",&pl->weapon_sp);
568 else if (!strcmp(buf,"Str")) 491 else if (!strcmp(buf,"Str"))
569 pl->orig_stats.Str=value; 492 pl->orig_stats.Str=value;
570 else if (!strcmp(buf,"Dex")) 493 else if (!strcmp(buf,"Dex"))
571 pl->orig_stats.Dex=value; 494 pl->orig_stats.Dex=value;
572 else if (!strcmp(buf,"Con")) 495 else if (!strcmp(buf,"Con"))
573 pl->orig_stats.Con=value; 496 pl->orig_stats.Con=value;
574 else if (!strcmp(buf,"Int")) 497 else if (!strcmp(buf,"Int"))
575 pl->orig_stats.Int=value; 498 pl->orig_stats.Int=value;
576 else if (!strcmp(buf,"Pow")) 499 else if (!strcmp(buf,"Pow"))
577 pl->orig_stats.Pow=value; 500 pl->orig_stats.Pow=value;
578 else if (!strcmp(buf,"Wis")) 501 else if (!strcmp(buf,"Wis"))
579 pl->orig_stats.Wis=value; 502 pl->orig_stats.Wis=value;
580 else if (!strcmp(buf,"Cha")) 503 else if (!strcmp(buf,"Cha"))
581 pl->orig_stats.Cha=value; 504 pl->orig_stats.Cha=value;
582 else if (!strcmp(buf,"usekeys")) { 505 else if (!strcmp(buf,"usekeys")) {
583 if (!strcmp(bufall+8,"key_inventory\n")) 506 if (!strcmp(bufall+8,"key_inventory\n"))
584 pl->usekeys=key_inventory; 507 pl->usekeys=key_inventory;
585 else if (!strcmp(bufall+8,"keyrings\n")) 508 else if (!strcmp(bufall+8,"keyrings\n"))
586 pl->usekeys=keyrings; 509 pl->usekeys=keyrings;
587 else if (!strcmp(bufall+8,"containers\n")) 510 else if (!strcmp(bufall+8,"containers\n"))
588 pl->usekeys=containers; 511 pl->usekeys=containers;
589 else LOG(llevDebug,"load_player: got unknown usekeys type: %s\n", bufall+8); 512 else LOG(llevDebug,"load_player: got unknown usekeys type: %s\n", bufall+8);
590 } 513 }
591 else if (!strcmp(buf,"unapply")) { 514 else if (!strcmp(buf,"unapply")) {
592 if (!strcmp(bufall+8,"unapply_nochoice\n")) 515 if (!strcmp(bufall+8,"unapply_nochoice\n"))
593 pl->unapply=unapply_nochoice; 516 pl->unapply=unapply_nochoice;
594 else if (!strcmp(bufall+8,"unapply_never\n")) 517 else if (!strcmp(bufall+8,"unapply_never\n"))
595 pl->unapply=unapply_never; 518 pl->unapply=unapply_never;
596 else if (!strcmp(bufall+8,"unapply_always\n")) 519 else if (!strcmp(bufall+8,"unapply_always\n"))
597 pl->unapply=unapply_always; 520 pl->unapply=unapply_always;
598 else LOG(llevDebug,"load_player: got unknown unapply type: %s\n", bufall+8); 521 else LOG(llevDebug,"load_player: got unknown unapply type: %s\n", bufall+8);
599 } 522 }
600 else if (!strcmp(buf,"lev_array")){ 523 else if (!strcmp(buf,"lev_array")){
601 for(i=1;i<=value;i++) { 524 for(i=1;i<=value;i++)
602 int j; 525 {
603 fscanf(fp,"%d\n",&j); 526 char line[128];
604 pl->levhp[i]=j; 527 fgets (line, 128, thawer); pl->levhp[i] = atoi (line);
605 fscanf(fp,"%d\n",&j); 528 fgets (line, 128, thawer); pl->levsp[i] = atoi (line);
606 pl->levsp[i]=j; 529 fgets (line, 128, thawer); pl->levgrace[i] = atoi (line);
607 fscanf(fp,"%d\n",&j); 530 }
608 pl->levgrace[i]=j;
609 }
610 /* spell_array code removed - don't know when that was last used. 531 /* spell_array code removed - don't know when that was last used.
611 * Even the load code below will someday be replaced by spells being 532 * Even the load code below will someday be replaced by spells being
612 * objects. 533 * objects.
613 */ 534 */
614 } else if (!strcmp(buf,"known_spell")) { 535 } else if (!strcmp(buf,"known_spell")) {
615#if 0 536#if 0
616 /* Logic is left here in case someone wants to try 537 /* Logic is left here in case someone wants to try
617 * and write code to update to spell objects. 538 * and write code to update to spell objects.
618 */ 539 */
619 char *cp=strchr(bufall,'\n'); 540 char *cp=strchr(bufall,'\n');
620 *cp='\0'; 541 *cp='\0';
621 cp=strchr(bufall,' '); 542 cp=strchr(bufall,' ');
622 cp++; 543 cp++;
623 for(i=0;i<NROFREALSPELLS;i++) 544 for(i=0;i<NROFREALSPELLS;i++)
624 if(!strcmp(spells[i].name,cp)) { 545 if(!strcmp(spells[i].name,cp)) {
625 pl->known_spells[pl->nrofknownspells++]=i; 546 pl->known_spells[pl->nrofknownspells++]=i;
626 break; 547 break;
627 } 548 }
628 if(i==NROFREALSPELLS) 549 if(i==NROFREALSPELLS)
629 LOG(llevDebug, "Error: unknown spell (%s)\n",cp); 550 LOG(llevDebug, "Error: unknown spell (%s)\n",cp);
630#endif 551#endif
631 } 552 }
632 } /* End of loop loading the character file */ 553 } /* End of loop loading the character file */
633 leave_map(op); 554 leave_map(op);
634 op->speed=0; 555 op->speed=0;
635 update_ob_speed(op); 556 update_ob_speed(op);
636 reset_object(op); 557 reset_object(op);
637 op->contr = pl; 558 op->contr = pl;
638 pl->ob = op; 559 pl->ob = op;
639 560
640 thawer.get (pl);
641
642 /* this loads the standard objects values. */ 561 /* this loads the standard objects values. */
643 load_object(fp, thawer, op, LO_NEWFILE,0); 562 load_object (thawer, op, 0);
644 close_and_delete(fp, comp);
645 563
646 CLEAR_FLAG(op, FLAG_NO_FIX_PLAYER); 564 CLEAR_FLAG(op, FLAG_NO_FIX_PLAYER);
647 565
648 strncpy(pl->title, op->arch->clone.name, sizeof(pl->title)-1); 566 strncpy(pl->title, op->arch->clone.name, sizeof(pl->title)-1);
649 pl->title[sizeof(pl->title)-1] = '\0'; 567 pl->title[sizeof(pl->title)-1] = '\0';
… …
654 * First, we check for partial path, then check to see if the full 572 * First, we check for partial path, then check to see if the full
655 * path (for unique player maps) 573 * path (for unique player maps)
656 */ 574 */
657 if (check_path(pl->maplevel,1)==-1) { 575 if (check_path(pl->maplevel,1)==-1) {
658 if (check_path(pl->maplevel,0)==-1) { 576 if (check_path(pl->maplevel,0)==-1) {
659 strcpy(pl->maplevel, pl->savebed_map); 577 strcpy(pl->maplevel, pl->savebed_map);
660 op->x = pl->bed_x, op->y = pl->bed_y; 578 op->x = pl->bed_x, op->y = pl->bed_y;
661 } 579 }
662 }
663
664 /* If player saved beyond some time ago, and the feature is
665 * enabled, put the player back on his savebed map.
666 */
667 if ((settings.reset_loc_time >0) && (elapsed_save_time > settings.reset_loc_time)) {
668 strcpy(pl->maplevel, pl->savebed_map);
669 op->x = pl->bed_x, op->y = pl->bed_y;
670 } 580 }
671 581
672 /* make sure he's a player--needed because of class change. */ 582 /* make sure he's a player--needed because of class change. */
673 op->type = PLAYER; 583 op->type = PLAYER;
674 584
… …
695 605
696 /* if it's a dragon player, set the correct title here */ 606 /* if it's a dragon player, set the correct title here */
697 if (is_dragon_pl(op) && op->inv != NULL) { 607 if (is_dragon_pl(op) && op->inv != NULL) {
698 object *tmp, *abil=NULL, *skin=NULL; 608 object *tmp, *abil=NULL, *skin=NULL;
699 for (tmp=op->inv; tmp!=NULL; tmp=tmp->below) { 609 for (tmp=op->inv; tmp!=NULL; tmp=tmp->below) {
700 if (tmp->type == FORCE) { 610 if (tmp->type == FORCE) {
701 if (strcmp(tmp->arch->name, "dragon_ability_force")==0) 611 if (strcmp(tmp->arch->name, "dragon_ability_force")==0)
702 abil = tmp; 612 abil = tmp;
703 else if (strcmp(tmp->arch->name, "dragon_skin_force")==0) 613 else if (strcmp(tmp->arch->name, "dragon_skin_force")==0)
704 skin = tmp; 614 skin = tmp;
705 } 615 }
706 } 616 }
707 set_dragon_name(op, abil, skin); 617 set_dragon_name(op, abil, skin);
708 } 618 }
709 619
710 new_draw_info(NDI_UNIQUE, 0,op,"Welcome Back!"); 620 new_draw_info(NDI_UNIQUE, 0,op,"Welcome Back!");
711 new_draw_info_format(NDI_UNIQUE | NDI_ALL | NDI_DK_ORANGE, 5, NULL, 621 new_draw_info_format(NDI_UNIQUE | NDI_ALL | NDI_DK_ORANGE, 5, NULL,
712 "%s has entered the game.",pl->ob->name); 622 "%s has entered the game.", &pl->ob->name);
713 623
714 INVOKE_PLAYER (LOAD, pl, ARG_STRING (filename)); 624 INVOKE_PLAYER (LOAD, pl, ARG_STRING (filename));
715 INVOKE_PLAYER (LOGIN, pl); 625 INVOKE_PLAYER (LOGIN, pl);
716 626
717 op->contr->socket.update_look=1; 627 op->contr->socket.update_look=1;
… …
720 * logic for that to take place. If player is permanently 630 * logic for that to take place. If player is permanently
721 * dead, and not using permadeath mode, the kill_player will 631 * dead, and not using permadeath mode, the kill_player will
722 * set the play_again flag, so return. 632 * set the play_again flag, so return.
723 */ 633 */
724 if (op->stats.hp<0) { 634 if (op->stats.hp<0) {
725 new_draw_info(NDI_UNIQUE, 0,op,"Your character was dead last your played."); 635 new_draw_info(NDI_UNIQUE, 0,op,"Your character was dead last your played.");
726 kill_player(op); 636 kill_player(op);
727 if (pl->state != ST_PLAYING) return; 637 if (pl->state != ST_PLAYING) return;
728 } 638 }
729 LOG(llevInfo,"LOGIN: Player named %s from ip %s\n", op->name, 639 LOG(llevInfo,"LOGIN: Player named %s from ip %s\n", &op->name, op->contr->socket.host);
730 op->contr->socket.host);
731 640
732 /* Do this after checking for death - no reason sucking up bandwidth if 641 /* Do this after checking for death - no reason sucking up bandwidth if
733 * the data isn't needed. 642 * the data isn't needed.
734 */ 643 */
735 esrv_new_player(op->contr,op->weight+op->carrying); 644 esrv_new_player(op->contr,op->weight+op->carrying);

Diff Legend

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