/**************************************************************************** * ResortMUD Version 5.0 was mainly programmed by Ntanel, Garinan, Josh, * * Badastaz, Digifuzz, Senir, Kratas, Scion, Shogar and Tagith. * * ------------------------------------------------------------------------ * * Copyright (C) 1996 - 2001 Haslage Net Electronics: MudWorld of Lorain, * * Ohio. ALL RIGHTS RESERVED See /doc/RMLicense.txt for more details. * ****************************************************************************/ /**************************************************************************** * [S]imulated [M]edieval [A]dventure multi[U]ser [G]ame | \\._.// * * -----------------------------------------------------------| (0...0) * * SMAUG 1.4 (C) 1994, 1995, 1996, 1998 by Derek Snider | ).:.( * * -----------------------------------------------------------| {o o} * * SMAUG code team: Thoric, Altrag, Blodkai, Narn, Haus, | / ' ' \ * * Scryn, Rennard, Swordbearer, Gorog, Grishnakh, Nivek, |~'~.VxvxV.~'~* * Tricops and Fireblade | * * ------------------------------------------------------------------------ * * Merc 2.1 Diku Mud improvments copyright (C) 1992, 1993 by Michael * * Chastain, Michael Quan, and Mitchell Tse. * * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe. * * ------------------------------------------------------------------------ * * Rare Item Code Module * * Shadroth - Lands of Shadow * ****************************************************************************/ #include <dirent.h> #include "mud.h" #include "rare.h" void scan_equipment( void ) { DIR *dp; struct dirent *dir_entry; char dir_name[100]; int alpha_loop; log_string( "Updating rare/unique item counts....." ); log_string( "Checking player files...." ); for ( alpha_loop = 0; alpha_loop <= 25; alpha_loop++ ) { sprintf( dir_name, "%s%c", PLAYER_DIR, 'a' + alpha_loop ); dp = opendir( dir_name ); dir_entry = readdir( dp ); while ( dir_entry ) { if ( dir_entry->d_name[0] != '.' ) { if (scan_players( dir_name, dir_entry->d_name )) log_string( "Found rare/unique items...." ); } dir_entry = readdir( dp ); } closedir( dp ); } log_string( "Checking corpses...." ); sprintf( dir_name, "%s", CORPSE_DIR ); dp = opendir( dir_name ); dir_entry = readdir( dp ); while ( dir_entry ) { if ( dir_entry->d_name[0] != '.' ) { if(scan_corpses( dir_name, dir_entry->d_name )) log_string( "Found rare/unique items." ); } dir_entry = readdir( dp ); } closedir( dp ); return; } bool scan_players( char *dirname, char *filename ) { FILE *player_file; char file_name[MAX_STRING_LENGTH]; bool found = FALSE; sprintf( file_name, "%s/%s", dirname, filename ); if ( ( player_file = fopen( file_name, "r" ) ) == NULL ) { perror( file_name ); return found; } for ( ; ; ) { int vnum, counter = 1; char letter; char *word; OBJ_INDEX_DATA *pObjIndex; letter = fread_letter( player_file ); if ( letter != '#' ) continue; word = fread_word( player_file ); if ( !str_cmp( word, "End" ) ) break; if ( !str_cmp( word, "OBJECT" ) ) { word = fread_word( player_file ); if ( !str_cmp( word, "Count" ) ) { counter = fread_number( player_file ); word = fread_word( player_file ); } if ( !str_cmp( word, "Vnum" ) ) { vnum = fread_number( player_file ); if ( ( get_obj_index( vnum ) ) == NULL ) { bug("Bad obj vnum in limits: %d",vnum ); } else { pObjIndex = get_obj_index( vnum ); if ( IS_OBJ_STAT(pObjIndex,ITEM_RARE) || IS_OBJ_STAT(pObjIndex,ITEM_UNIQUE) ) { pObjIndex->count += counter; found = TRUE; } } } } } fclose( player_file ); player_file = NULL; return found; } bool scan_corpses( char *dirname, char *filename ) { FILE *corpse_file; char file_name[MAX_STRING_LENGTH]; bool found = FALSE; sprintf( file_name, "%s/%s", dirname, filename ); if ( ( corpse_file = fopen( file_name, "r" ) ) == NULL ) { perror( file_name ); return found; } for ( ; ; ) { int vnum, counter = 1, nest = 0; char letter; char *word; OBJ_INDEX_DATA *pObjIndex; letter = fread_letter( corpse_file ); if ( letter != '#' ) continue; word = fread_word( corpse_file ); if ( !str_cmp( word, "End" ) ) break; if ( !str_cmp( word, "OBJECT" ) ) { word = fread_word( corpse_file ); if ( !str_cmp( word, "Nest" ) ) { nest = fread_number( corpse_file ); word = fread_word( corpse_file ); } if ( !str_cmp( word, "Count" ) ) { counter = fread_number( corpse_file ); word = fread_word( corpse_file ); } if ( !str_cmp( word, "Vnum" ) ) { vnum = fread_number( corpse_file ); if ( ( get_obj_index( vnum ) ) == NULL ) { bug( "Bad obj vnum in limits: %d", vnum ); } else { pObjIndex = get_obj_index( vnum ); if ( IS_OBJ_STAT(pObjIndex,ITEM_RARE) || IS_OBJ_STAT(pObjIndex,ITEM_UNIQUE) ) { pObjIndex->count += counter; found = TRUE; } } } } } fclose( corpse_file ); corpse_file = NULL; return found; }