1 /* $NetBSD: scores.c,v 1.11 2001/02/05 00:57:34 christos Exp $ */ 2 3 /* 4 * scores.c Larn is copyrighted 1986 by Noah Morgan. 5 * 6 * Functions in this file are: 7 * 8 * readboard() Function to read in the scoreboard into a static buffer 9 * writeboard() Function to write the scoreboard from readboard()'s buffer 10 * makeboard() Function to create a new scoreboard (wipe out old one) 11 * hashewon() Function to return 1 if player has won a game before, else 0 12 * long paytaxes(x) Function to pay taxes if any are due winshou() 13 * ubroutine to print out the winning scoreboard shou(x) 14 * ubroutine to print out the non-winners scoreboard showscores() 15 * unction to show the scoreboard on the terminal showallscores() 16 * Function to show scores and the iven lists that go with them sortboard() 17 * unction to sort the scoreboard newscore(score, whoo, whyded, winner) 18 * Function to add entry to scoreboard new1sub(score,i,whoo,taxes) 19 * Subroutine to put player into a new2sub(score,i,whoo,whyded) 20 * Subroutine to put player into a died(x) Subroutine to record who 21 * played larn, and what the score was diedsub(x) Subroutine to print out a 22 * line showing player when he is killed diedlog() Subroutine to read a 23 * log file and print it out in ascii format getplid(name) 24 * on to get players id # from id file 25 * 26 */ 27 #include <sys/cdefs.h> 28 #ifndef lint 29 __RCSID("$NetBSD: scores.c,v 1.11 2001/02/05 00:57:34 christos Exp $"); 30 #endif /* not lint */ 31 #include <sys/types.h> 32 #include <sys/times.h> 33 #include <sys/stat.h> 34 #include <stdio.h> 35 #include <string.h> 36 #include <unistd.h> 37 #include <stdlib.h> 38 #include "header.h" 39 #include "extern.h" 40 41 struct scofmt { /* This is the structure for the scoreboard */ 42 long score; /* the score of the player */ 43 long suid; /* the user id number of the player */ 44 short what; /* the number of the monster that killed 45 * player */ 46 short level; /* the level player was on when he died */ 47 short hardlev;/* the level of difficulty player played at */ 48 short order; /* the relative ordering place of this entry */ 49 char who[40];/* the name of the character */ 50 char sciv[26][2]; /* this is the inventory list of the 51 * character */ 52 }; 53 struct wscofmt { /* This is the structure for the winning 54 * scoreboard */ 55 long score; /* the score of the player */ 56 long timeused; /* the time used in mobuls to win the 57 * game */ 58 long taxes; /* taxes he owes to LRS */ 59 long suid; /* the user id number of the player */ 60 short hardlev;/* the level of difficulty player played at */ 61 short order; /* the relative ordering place of this entry */ 62 char who[40];/* the name of the character */ 63 }; 64 65 struct log_fmt { /* 102 bytes struct for the log file */ 66 long score; /* the players score */ 67 time_t diedtime; /* time when game was over */ 68 short cavelev;/* level in caves */ 69 short diff; /* difficulty player played at */ 70 #ifdef EXTRA 71 long elapsedtime; /* real time of game in seconds */ 72 long bytout; /* bytes input and output */ 73 long bytin; 74 long moves; /* number of moves made by player */ 75 short ac; /* armor class of player */ 76 short hp, hpmax; /* players hitpoints */ 77 short cputime;/* cpu time needed in seconds */ 78 short killed, spused; /* monsters killed and spells cast */ 79 short usage; /* usage of the cpu in % */ 80 short lev; /* player level */ 81 #endif 82 char who[12];/* player name */ 83 char what[46]; /* what happened to player */ 84 }; 85 86 static struct scofmt sco[SCORESIZE]; /* the structure for the scoreboard */ 87 static struct wscofmt winr[SCORESIZE]; /* struct for the winning scoreboard */ 88 static struct log_fmt logg; /* structure for the log file */ 89 static char *whydead[] = { 90 "quit", "suspended", "self - annihilated", "shot by an arrow", 91 "hit by a dart", "fell into a pit", "fell into a bottomless pit", 92 "a winner", "trapped in solid rock", "killed by a missing save file", 93 "killed by an old save file", "caught by the greedy cheater checker trap", 94 "killed by a protected save file", "killed his family and committed suicide", 95 "erased by a wayward finger", "fell through a bottomless trap door", 96 "fell through a trap door", "drank some poisonous water", 97 "fried by an electric shock", "slipped on a volcano shaft", 98 "killed by a stupid act of frustration", "attacked by a revolting demon", 99 "hit by his own magic", "demolished by an unseen attacker", 100 "fell into the dreadful sleep", "killed by an exploding chest", 101 /* 26 */ "killed by a missing maze data file", "annihilated in a sphere", 102 "died a post mortem death", "wasted by a malloc() failure" 103 }; 104 105 /* 106 * readboard() Function to read in the scoreboard into a static buffer 107 * 108 * returns -1 if unable to read in the scoreboard, returns 0 if all is OK 109 */ 110 int 111 readboard() 112 { 113 int i; 114 115 seteuid(euid); 116 i = lopen(scorefile); 117 seteuid(uid); 118 if (i < 0) { 119 lprcat("Can't read scoreboard\n"); 120 lflush(); 121 return (-1); 122 } 123 lrfill((char *) sco, sizeof(sco)); 124 lrfill((char *) winr, sizeof(winr)); 125 lrclose(); 126 lcreat((char *) 0); 127 return (0); 128 } 129 130 /* 131 * writeboard() Function to write the scoreboard from readboard()'s buffer 132 * 133 * returns -1 if unable to write the scoreboard, returns 0 if all is OK 134 */ 135 int 136 writeboard() 137 { 138 int i; 139 140 set_score_output(); 141 seteuid(euid); 142 i = lcreat(scorefile); 143 seteuid(uid); 144 if (i < 0) { 145 lprcat("Can't write scoreboard\n"); 146 lflush(); 147 return (-1); 148 } 149 lwrite((char *) sco, sizeof(sco)); 150 lwrite((char *) winr, sizeof(winr)); 151 lwclose(); 152 lcreat((char *) 0); 153 return (0); 154 } 155 156 /* 157 * makeboard() Function to create a new scoreboard (wipe out old one) 158 * 159 * returns -1 if unable to write the scoreboard, returns 0 if all is OK 160 */ 161 int 162 makeboard() 163 { 164 int i; 165 for (i = 0; i < SCORESIZE; i++) { 166 winr[i].taxes = winr[i].score = sco[i].score = 0; 167 winr[i].order = sco[i].order = i; 168 } 169 if (writeboard()) 170 return (-1); 171 seteuid(euid); 172 chmod(scorefile, 0660); 173 seteuid(uid); 174 return (0); 175 } 176 177 /* 178 * hashewon() Function to return 1 if player has won a game before, else 0 179 * 180 * This function also sets c[HARDGAME] to appropriate value -- 0 if not a 181 * winner, otherwise the next level of difficulty listed in the winners 182 * scoreboard. This function also sets outstanding_taxes to the value in 183 * the winners scoreboard. 184 */ 185 int 186 hashewon() 187 { 188 int i; 189 c[HARDGAME] = 0; 190 if (readboard() < 0) 191 return (0); /* can't find scoreboard */ 192 for (i = 0; i < SCORESIZE; i++) /* search through winners scoreboard */ 193 if (winr[i].suid == userid) 194 if (winr[i].score > 0) { 195 c[HARDGAME] = winr[i].hardlev + 1; 196 outstanding_taxes = winr[i].taxes; 197 return (1); 198 } 199 return (0); 200 } 201 202 /* 203 * long paytaxes(x) Function to pay taxes if any are due 204 * 205 * Enter with the amount (in gp) to pay on the taxes. 206 * Returns amount actually paid. 207 */ 208 long 209 paytaxes(x) 210 long x; 211 { 212 int i; 213 long amt; 214 if (x < 0) 215 return (0L); 216 if (readboard() < 0) 217 return (0L); 218 for (i = 0; i < SCORESIZE; i++) 219 if (winr[i].suid == userid) /* look for players winning 220 * entry */ 221 if (winr[i].score > 0) { /* search for a winning 222 * entry for the player */ 223 amt = winr[i].taxes; 224 if (x < amt) 225 amt = x; /* don't overpay taxes 226 * (Ughhhhh) */ 227 winr[i].taxes -= amt; 228 outstanding_taxes -= amt; 229 if (writeboard() < 0) 230 return (0); 231 return (amt); 232 } 233 return (0L); /* couldn't find user on winning scoreboard */ 234 } 235 236 /* 237 * winshou() Subroutine to print out the winning scoreboard 238 * 239 * Returns the number of players on scoreboard that were shown 240 */ 241 int 242 winshou() 243 { 244 struct wscofmt *p; 245 int i, j, count; 246 for (count = j = i = 0; i < SCORESIZE; i++) /* is there anyone on 247 * the scoreboard? */ 248 if (winr[i].score != 0) { 249 j++; 250 break; 251 } 252 if (j) { 253 lprcat("\n Score Difficulty Time Needed Larn Winners List\n"); 254 255 for (i = 0; i < SCORESIZE; i++) /* this loop is needed to 256 * print out the */ 257 for (j = 0; j < SCORESIZE; j++) { /* winners in order */ 258 p = &winr[j]; /* pointer to the scoreboard 259 * entry */ 260 if (p->order == i) { 261 if (p->score) { 262 count++; 263 lprintf("%10d %2d %5d Mobuls %s \n", 264 (long) p->score, (long) p->hardlev, (long) p->timeused, p->who); 265 } 266 break; 267 } 268 } 269 } 270 return (count); /* return number of people on scoreboard */ 271 } 272 273 /* 274 * shou(x) Subroutine to print out the non-winners scoreboard 275 * int x; 276 * 277 * Enter with 0 to list the scores, enter with 1 to list inventories too 278 * Returns the number of players on scoreboard that were shown 279 */ 280 int 281 shou(x) 282 int x; 283 { 284 int i, j, n, k; 285 int count; 286 for (count = j = i = 0; i < SCORESIZE; i++) /* is the scoreboard 287 * empty? */ 288 if (sco[i].score != 0) { 289 j++; 290 break; 291 } 292 if (j) { 293 lprcat("\n Score Difficulty Larn Visitor Log\n"); 294 for (i = 0; i < SCORESIZE; i++) /* be sure to print them out 295 * in order */ 296 for (j = 0; j < SCORESIZE; j++) 297 if (sco[j].order == i) { 298 if (sco[j].score) { 299 count++; 300 lprintf("%10d %2d %s ", 301 (long) sco[j].score, (long) sco[j].hardlev, sco[j].who); 302 if (sco[j].what < 256) 303 lprintf("killed by a %s", monster[sco[j].what].name); 304 else 305 lprintf("%s", whydead[sco[j].what - 256]); 306 if (x != 263) 307 lprintf(" on %s", levelname[sco[j].level]); 308 if (x) { 309 for (n = 0; n < 26; n++) { 310 iven[n] = sco[j].sciv[n][0]; 311 ivenarg[n] = sco[j].sciv[n][1]; 312 } 313 for (k = 1; k < 99; k++) 314 for (n = 0; n < 26; n++) 315 if (k == iven[n]) { 316 srcount = 0; 317 show3(n); 318 } 319 lprcat("\n\n"); 320 } else 321 lprc('\n'); 322 } 323 j = SCORESIZE; 324 } 325 } 326 return (count); /* return the number of players just shown */ 327 } 328 329 /* 330 * showscores() Function to show the scoreboard on the terminal 331 * 332 * Returns nothing of value 333 */ 334 static char esb[] = "The scoreboard is empty.\n"; 335 void 336 showscores() 337 { 338 int i, j; 339 lflush(); 340 lcreat((char *) 0); 341 if (readboard() < 0) 342 return; 343 i = winshou(); 344 j = shou(0); 345 if (i + j == 0) 346 lprcat(esb); 347 else 348 lprc('\n'); 349 lflush(); 350 } 351 352 /* 353 * showallscores() Function to show scores and the iven lists that go with them 354 * 355 * Returns nothing of value 356 */ 357 void 358 showallscores() 359 { 360 int i, j; 361 lflush(); 362 lcreat((char *) 0); 363 if (readboard() < 0) 364 return; 365 c[WEAR] = c[WIELD] = c[SHIELD] = -1; /* not wielding or wearing 366 * anything */ 367 for (i = 0; i < MAXPOTION; i++) 368 potionname[i] = potionhide[i]; 369 for (i = 0; i < MAXSCROLL; i++) 370 scrollname[i] = scrollhide[i]; 371 i = winshou(); 372 j = shou(1); 373 if (i + j == 0) 374 lprcat(esb); 375 else 376 lprc('\n'); 377 lflush(); 378 } 379 380 /* 381 * sortboard() Function to sort the scoreboard 382 * 383 * Returns 0 if no sorting done, else returns 1 384 */ 385 int 386 sortboard() 387 { 388 int i, j = 0, pos; 389 long jdat; 390 for (i = 0; i < SCORESIZE; i++) 391 sco[i].order = winr[i].order = -1; 392 pos = 0; 393 while (pos < SCORESIZE) { 394 jdat = 0; 395 for (i = 0; i < SCORESIZE; i++) 396 if ((sco[i].order < 0) && (sco[i].score >= jdat)) { 397 j = i; 398 jdat = sco[i].score; 399 } 400 sco[j].order = pos++; 401 } 402 pos = 0; 403 while (pos < SCORESIZE) { 404 jdat = 0; 405 for (i = 0; i < SCORESIZE; i++) 406 if ((winr[i].order < 0) && (winr[i].score >= jdat)) { 407 j = i; 408 jdat = winr[i].score; 409 } 410 winr[j].order = pos++; 411 } 412 return (1); 413 } 414 415 /* 416 * newscore(score, whoo, whyded, winner) Function to add entry to scoreboard 417 * int score, winner, whyded; 418 * char *whoo; 419 * 420 * Enter with the total score in gp in score, players name in whoo, 421 * died() reason # in whyded, and TRUE/FALSE in winner if a winner 422 * ex. newscore(1000, "player 1", 32, 0); 423 */ 424 void 425 newscore(score, whoo, whyded, winner) 426 long score; 427 int winner, whyded; 428 char *whoo; 429 { 430 int i; 431 long taxes; 432 if (readboard() < 0) 433 return; /* do the scoreboard */ 434 /* if a winner then delete all non-winning scores */ 435 if (cheat) 436 winner = 0; /* if he cheated, don't let him win */ 437 if (winner) { 438 for (i = 0; i < SCORESIZE; i++) 439 if (sco[i].suid == userid) 440 sco[i].score = 0; 441 taxes = score * TAXRATE; 442 score += 100000 * c[HARDGAME]; /* bonus for winning */ 443 /* 444 * if he has a slot on the winning scoreboard update it if 445 * greater score 446 */ 447 for (i = 0; i < SCORESIZE; i++) 448 if (winr[i].suid == userid) { 449 new1sub(score, i, whoo, taxes); 450 return; 451 } 452 /* 453 * he had no entry. look for last entry and see if he has a 454 * greater score 455 */ 456 for (i = 0; i < SCORESIZE; i++) 457 if (winr[i].order == SCORESIZE - 1) { 458 new1sub(score, i, whoo, taxes); 459 return; 460 } 461 } else if (!cheat) { /* for not winning scoreboard */ 462 /* 463 * if he has a slot on the scoreboard update it if greater 464 * score 465 */ 466 for (i = 0; i < SCORESIZE; i++) 467 if (sco[i].suid == userid) { 468 new2sub(score, i, whoo, whyded); 469 return; 470 } 471 /* 472 * he had no entry. look for last entry and see if he has a 473 * greater score 474 */ 475 for (i = 0; i < SCORESIZE; i++) 476 if (sco[i].order == SCORESIZE - 1) { 477 new2sub(score, i, whoo, whyded); 478 return; 479 } 480 } 481 } 482 483 /* 484 * new1sub(score,i,whoo,taxes) Subroutine to put player into a 485 * int score,i,whyded,taxes; winning scoreboard entry if his score 486 * char *whoo; is high enough 487 * 488 * Enter with the total score in gp in score, players name in whoo, 489 * died() reason # in whyded, and TRUE/FALSE in winner if a winner 490 * slot in scoreboard in i, and the tax bill in taxes. 491 * Returns nothing of value 492 */ 493 void 494 new1sub(score, i, whoo, taxes) 495 long score, taxes; 496 int i; 497 char *whoo; 498 { 499 struct wscofmt *p; 500 p = &winr[i]; 501 p->taxes += taxes; 502 if ((score >= p->score) || (c[HARDGAME] > p->hardlev)) { 503 strcpy(p->who, whoo); 504 p->score = score; 505 p->hardlev = c[HARDGAME]; 506 p->suid = userid; 507 p->timeused = gltime / 100; 508 } 509 } 510 511 /* 512 * new2sub(score,i,whoo,whyded) Subroutine to put player into a 513 * int score,i,whyded,taxes; non-winning scoreboard entry if his 514 * char *whoo; score is high enough 515 * 516 * Enter with the total score in gp in score, players name in whoo, 517 * died() reason # in whyded, and slot in scoreboard in i. 518 * Returns nothing of value 519 */ 520 void 521 new2sub(score, i, whoo, whyded) 522 long score; 523 int i, whyded; 524 char *whoo; 525 { 526 int j; 527 struct scofmt *p; 528 p = &sco[i]; 529 if ((score >= p->score) || (c[HARDGAME] > p->hardlev)) { 530 strcpy(p->who, whoo); 531 p->score = score; 532 p->what = whyded; 533 p->hardlev = c[HARDGAME]; 534 p->suid = userid; 535 p->level = level; 536 for (j = 0; j < 26; j++) { 537 p->sciv[j][0] = iven[j]; 538 p->sciv[j][1] = ivenarg[j]; 539 } 540 } 541 } 542 543 /* 544 * died(x) Subroutine to record who played larn, and what the score was 545 * int x; 546 * 547 * if x < 0 then don't show scores 548 * died() never returns! (unless c[LIFEPROT] and a reincarnatable death!) 549 * 550 * < 256 killed by the monster number 551 * 256 quit 552 * 257 suspended 553 * 258 self - annihilated 554 * 259 shot by an arrow 555 * 260 hit by a dart 556 * 261 fell into a pit 557 * 262 fell into a bottomless pit 558 * 263 a winner 559 * 264 trapped in solid rock 560 * 265 killed by a missing save file 561 * 266 killed by an old save file 562 * 267 caught by the greedy cheater checker trap 563 * 268 killed by a protected save file 564 * 269 killed his family and killed himself 565 * 270 erased by a wayward finger 566 * 271 fell through a bottomless trap door 567 * 272 fell through a trap door 568 * 273 drank some poisonous water 569 * 274 fried by an electric shock 570 * 275 slipped on a volcano shaft 571 * 276 killed by a stupid act of frustration 572 * 277 attacked by a revolting demon 573 * 278 hit by his own magic 574 * 279 demolished by an unseen attacker 575 * 280 fell into the dreadful sleep 576 * 281 killed by an exploding chest 577 * 282 killed by a missing maze data file 578 * 283 killed by a sphere of annihilation 579 * 284 died a post mortem death 580 * 285 malloc() failure 581 * 300 quick quit -- don't put on scoreboard 582 */ 583 584 static int scorerror; 585 void 586 died(x) 587 int x; 588 { 589 int f, win; 590 char ch, *mod; 591 time_t zzz; 592 if (c[LIFEPROT] > 0) { /* if life protection */ 593 switch ((x > 0) ? x : -x) { 594 case 256: 595 case 257: 596 case 262: 597 case 263: 598 case 265: 599 case 266: 600 case 267: 601 case 268: 602 case 269: 603 case 271: 604 case 282: 605 case 284: 606 case 285: 607 case 300: 608 goto invalid; /* can't be saved */ 609 }; 610 --c[LIFEPROT]; 611 c[HP] = 1; 612 --c[CONSTITUTION]; 613 cursors(); 614 lprcat("\nYou feel wiiieeeeerrrrrd all over! "); 615 beep(); 616 lflush(); 617 sleep(4); 618 return; /* only case where died() returns */ 619 } 620 invalid: 621 clearvt100(); 622 lflush(); 623 f = 0; 624 if (ckpflag) 625 unlink(ckpfile);/* remove checkpoint file if used */ 626 if (x < 0) { 627 f++; 628 x = -x; 629 } /* if we are not to display the scores */ 630 if ((x == 300) || (x == 257)) 631 exit(0); /* for quick exit or saved game */ 632 if (x == 263) 633 win = 1; 634 else 635 win = 0; 636 c[GOLD] += c[BANKACCOUNT]; 637 c[BANKACCOUNT] = 0; 638 /* now enter the player at the end of the scoreboard */ 639 newscore(c[GOLD], logname, x, win); 640 diedsub(x); /* print out the score line */ 641 lflush(); 642 643 set_score_output(); 644 if ((wizard == 0) && (c[GOLD] > 0)) { /* wizards can't score */ 645 #ifndef NOLOG 646 seteuid(euid); 647 if (lappend(logfile) < 0) { /* append to file */ 648 if (lcreat(logfile) < 0) { /* and can't create new 649 * log file */ 650 lcreat((char *) 0); 651 lprcat("\nCan't open record file: I can't post your score.\n"); 652 sncbr(); 653 resetscroll(); 654 lflush(); 655 exit(0); 656 } 657 seteuid(euid); 658 chmod(logfile, 0660); 659 seteuid(uid); 660 } 661 seteuid(uid); 662 strcpy(logg.who, loginname); 663 logg.score = c[GOLD]; 664 logg.diff = c[HARDGAME]; 665 if (x < 256) { 666 ch = *monster[x].name; 667 if (ch == 'a' || ch == 'e' || ch == 'i' || ch == 'o' || ch == 'u') 668 mod = "an"; 669 else 670 mod = "a"; 671 snprintf(logg.what, sizeof(logg.what), 672 "killed by %s %s", mod, monster[x].name); 673 } else 674 snprintf(logg.what, sizeof(logg.what), 675 "%s", whydead[x - 256]); 676 logg.cavelev = level; 677 time(&zzz); /* get cpu time -- write out score info */ 678 logg.diedtime = zzz; 679 #ifdef EXTRA 680 times(&cputime);/* get cpu time -- write out score info */ 681 logg.cputime = i = (cputime.tms_utime + cputime.tms_stime) / 60 + c[CPUTIME]; 682 logg.lev = c[LEVEL]; 683 logg.ac = c[AC]; 684 logg.hpmax = c[HPMAX]; 685 logg.hp = c[HP]; 686 logg.elapsedtime = (zzz - initialtime + 59) / 60; 687 logg.usage = (10000 * i) / (zzz - initialtime); 688 logg.bytin = c[BYTESIN]; 689 logg.bytout = c[BYTESOUT]; 690 logg.moves = c[MOVESMADE]; 691 logg.spused = c[SPELLSCAST]; 692 logg.killed = c[MONSTKILLED]; 693 #endif 694 lwrite((char *) &logg, sizeof(struct log_fmt)); 695 lwclose(); 696 #endif /* NOLOG */ 697 698 /* 699 * now for the scoreboard maintenance -- not for a suspended 700 * game 701 */ 702 if (x != 257) { 703 if (sortboard()) 704 scorerror = writeboard(); 705 } 706 } 707 if ((x == 256) || (x == 257) || (f != 0)) 708 exit(0); 709 if (scorerror == 0) 710 showscores(); /* if we updated the scoreboard */ 711 if (x == 263) 712 mailbill(); 713 exit(0); 714 } 715 716 /* 717 * diedsub(x) Subroutine to print out the line showing the player when he is killed 718 * int x; 719 */ 720 void 721 diedsub(x) 722 int x; 723 { 724 char ch, *mod; 725 lprintf("Score: %d, Diff: %d, %s ", (long) c[GOLD], (long) c[HARDGAME], logname); 726 if (x < 256) { 727 ch = *monster[x].name; 728 if (ch == 'a' || ch == 'e' || ch == 'i' || ch == 'o' || ch == 'u') 729 mod = "an"; 730 else 731 mod = "a"; 732 lprintf("killed by %s %s", mod, monster[x].name); 733 } else 734 lprintf("%s", whydead[x - 256]); 735 if (x != 263) 736 lprintf(" on %s\n", levelname[level]); 737 else 738 lprc('\n'); 739 } 740 741 /* 742 * diedlog() Subroutine to read a log file and print it out in ascii format 743 */ 744 void 745 diedlog() 746 { 747 int n; 748 char *p; 749 struct stat stbuf; 750 lcreat((char *) 0); 751 if (lopen(logfile) < 0) { 752 lprintf("Can't locate log file <%s>\n", logfile); 753 return; 754 } 755 if (fstat(fd, &stbuf) < 0) { 756 lprintf("Can't stat log file <%s>\n", logfile); 757 return; 758 } 759 for (n = stbuf.st_size / sizeof(struct log_fmt); n > 0; --n) { 760 lrfill((char *) &logg, sizeof(struct log_fmt)); 761 p = ctime(&logg.diedtime); 762 p[16] = '\n'; 763 p[17] = 0; 764 lprintf("Score: %d, Diff: %d, %s %s on %d at %s", (long) (logg.score), (long) (logg.diff), logg.who, logg.what, (long) (logg.cavelev), p + 4); 765 #ifdef EXTRA 766 if (logg.moves <= 0) 767 logg.moves = 1; 768 lprintf(" Experience Level: %d, AC: %d, HP: %d/%d, Elapsed Time: %d minutes\n", (long) (logg.lev), (long) (logg.ac), (long) (logg.hp), (long) (logg.hpmax), (long) (logg.elapsedtime)); 769 lprintf(" CPU time used: %d seconds, Machine usage: %d.%02d%%\n", (long) (logg.cputime), (long) (logg.usage / 100), (long) (logg.usage % 100)); 770 lprintf(" BYTES in: %d, out: %d, moves: %d, deaths: %d, spells cast: %d\n", (long) (logg.bytin), (long) (logg.bytout), (long) (logg.moves), (long) (logg.killed), (long) (logg.spused)); 771 lprintf(" out bytes per move: %d, time per move: %d ms\n", (long) (logg.bytout / logg.moves), (long) ((logg.cputime * 1000) / logg.moves)); 772 #endif 773 } 774 lflush(); 775 lrclose(); 776 return; 777 } 778 779 #ifndef UIDSCORE 780 /* 781 * getplid(name) Function to get players id # from id file 782 * 783 * Enter with the name of the players character in name. 784 * Returns the id # of the players character, or -1 if failure. 785 * This routine will try to find the name in the id file, if its not there, 786 * it will try to make a new entry in the file. Only returns -1 if can't 787 * find him in the file, and can't make a new entry in the file. 788 * Format of playerids file: 789 * Id # in ascii \n character name \n 790 */ 791 static int havepid = -1; /* playerid # if previously done */ 792 int 793 getplid(nam) 794 char *nam; 795 { 796 int fd7, high = 999, no; 797 char *p, *p2; 798 char name[80]; 799 if (havepid != -1) 800 return (havepid); /* already did it */ 801 lflush(); /* flush any pending I/O */ 802 snprintf(name, sizeof(name), "%s\n", nam);/* append a \n to name */ 803 if (lopen(playerids) < 0) { /* no file, make it */ 804 if ((fd7 = creat(playerids, 0666)) < 0) 805 return (-1); /* can't make it */ 806 close(fd7); 807 goto addone; /* now append new playerid record to file */ 808 } 809 for (;;) { /* now search for the name in the player id 810 * file */ 811 p = lgetl(); 812 if (p == NULL) 813 break; /* EOF? */ 814 no = atoi(p); /* the id # */ 815 p2 = lgetl(); 816 if (p2 == NULL) 817 break; /* EOF? */ 818 if (no > high) 819 high = no; /* accumulate highest id # */ 820 if (strcmp(p2, name) == 0) { /* we found him */ 821 return (no); /* his id number */ 822 } 823 } 824 lrclose(); 825 /* if we get here, we didn't find him in the file -- put him there */ 826 addone: 827 if (lappend(playerids) < 0) 828 return (-1); /* can't open file for append */ 829 lprintf("%d\n%s", (long) ++high, name); /* new id # and name */ 830 lwclose(); 831 lcreat((char *) 0); /* re-open terminal channel */ 832 return (high); 833 } 834 #endif /* UIDSCORE */ 835