itemdb.c

CS反恐精英1.6的部分C源代码。

//
// PvPGN YARE MOD V1.0 (Yeat Another Ragnarok Emulator) - (Server)
// Copyright (c) Project-YARE & PvPGN 2003
// www.project-yare.com
// forum.project-yare.net
// www.pvpgn.org
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
//
// itemdb.c - File for using item database

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "mmo.h"
#include "grfio.h"
#include "itemdb.h"

#define ITEMDB_HASH_SIZE 64

static int itemdb_hash[ITEMDB_HASH_SIZE];
static int itemdb_size,itemdb_num;

#define MAX_JOBS 18
static struct {
  // for hash
  int nameid;
  int next;

  // data
  int value;
  int type;
  int sell;
  int class;
  int equip;
  int weight;
  int atk;
  int def;
  int slot;
  int look;
  //weapon update
  short hands;
  short job[MAX_JOBS+1];


} *itemdb;

static int search_itemdb_index(int nameid)
{
  int i;
  for(i=itemdb_hash[nameid%ITEMDB_HASH_SIZE];i>=0;i=itemdb[i].next)
    if(itemdb[i].nameid==nameid)
      return i;
  if(itemdb_size<=itemdb_num){
    itemdb_size+=ITEMDB_HASH_SIZE;
    itemdb=realloc(itemdb,sizeof(itemdb[0])*itemdb_size);
  }

  i=itemdb_num;
  itemdb_num++;
  itemdb[i].nameid=nameid;
  itemdb[i].next=itemdb_hash[nameid%ITEMDB_HASH_SIZE];
  itemdb_hash[nameid%ITEMDB_HASH_SIZE]=i;

  itemdb[i].value=10;
  itemdb[i].type=0;
  itemdb[i].class=0;
  itemdb[i].equip=0;
  itemdb[i].weight=10;
  itemdb[i].atk=0;
  itemdb[i].def=0;
  itemdb[i].slot=0;
  itemdb[i].look=0;
  //weapon update
  itemdb[i].hands=-1;

  return i;
}

/*needs a little remodeling*/
int itemdb_type(int nameid)
{
  if(nameid>500 && nameid<600)
    return 0;	//heal item
  if(nameid>600 && nameid<700)
    return 2;	//use item
  if((nameid>700 && nameid<1100) ||
     (nameid>7000 && nameid<8000))
    return 3;	//correction
  if(nameid>=1750 && nameid<1760)
    return 10;	//arrow
  if(nameid>1100 && nameid<2000)
    return 4;	//weapon
  if((nameid>2100 && nameid<3000) ||
     (nameid>5000 && nameid<6000))
    return 5;	//armor
  if(nameid>4000 && nameid<5000)
    return 6;	//card
// ADDED on 04/08/2003 -----------------------
  if(nameid>=9001 && nameid<=9024)
    return 7;	//egg
	if(nameid>=10001 && nameid<=10019)
    return 8;	//pet equipment
// ---------------------------
  return 0;
}
/*position of equipment*/
int itemdb_stype(int nameid)
{
	//俀侾侽侽~俀侾侽俉 shield
	//俀俁侽侾~俀俇俀侽 armor, shoes, and accessory
	//俆侽侽侾~俆侽侾俋 all equipment
	//2224,2225,2264 head gear
	//2201~229 head gear(including mid, and lower乯
	if(nameid>2100 && nameid<2109)
		return 8;//LOOK_SHEILD;
	//upper tier equipment
	if((nameid>2205 && nameid<2212) || (nameid>2212 && nameid<2218)
		|| (nameid>2219 && nameid<2237) || (nameid>2243 && nameid<2262)
			|| (nameid>2272 && nameid<2276) || (nameid == 2277)
			|| (nameid>2278 && nameid<2280) ||(nameid>2281 && nameid<2286) 
			||(nameid>5000  && nameid < 5006) || (nameid > 5006 && nameid<5040) 
			||(nameid == 2264) ||(nameid>2286 && nameid<2288) 
			||(nameid>2288 && nameid<2291)
			|| (nameid>5041 && nameid<5043) || (nameid>5043 && nameid<5054)
			|| (nameid >2291 && nameid<2295) || (nameid >2295 && nameid <2300))
				return LOOK_HEAD_TOP;
	if((nameid >2200 && nameid<2206) || (nameid == 2212) 
		||( nameid == 2239) || (nameid == 2242) ||
		(nameid == 2243) || (nameid == 2262) ||
		(nameid == 2276) || (nameid == 2278) ||
		(nameid == 2263) || //In. also lower equipment makes middle(?) (拞丄壓憰旛傕恀傫拞偵偟偰偍偔)
		(nameid == 2281) ||(nameid == 2288) || (nameid == 2291) || (nameid == 5006)
		|| (nameid == 2295) || (nameid == 5040) || (nameid == 5041) || (nameid == 5043) || (nameid == 2297))
				return LOOK_HEAD_MID;
	if((nameid == 2218) || (nameid ==  2219) ||( nameid == 2237 )||(nameid ==  2238) 
			|| (nameid == 2240) || (nameid == 2241)||( nameid>2264 && nameid<2271))
			return LOOK_HEAD_BOTTOM;
	if(nameid>1100 && nameid<2000)
   		 return 2;//LOOK_WEAPON;	//weapon
   		
   	return LOOK_06;
}

int itemdb_sell_init()
{
	FILE *fp;
	int item_id,type,price,sell;
	char name[128],JName[256];
	char line[2040];
	fp = fopen("config/item_db2.txt","r");
	if(fp)
	{
		while(fgets(line,2040,fp)){
			sscanf(line,"%d,%[^,],%[^,],%d,%d,%d",&item_id,name,JName,
				&type,&price,&sell);
			//Fred fix1 (Item Selling Price)
			itemdb[search_itemdb_index(item_id)].sell = price/2+1;
			//if(itemdb[search_itemdb_index(item_id)].sell <1); // Edit sell price
			  //itemdb[search_itemdb_index(item_id)].sell = 1;
			itemdb[search_itemdb_index(item_id)].hands = -1;//init ->weapon update

		}
	}
	fclose(fp);
	return 0;
}

int itemdb_sellvalue(int nameid)
{
  return itemdb[search_itemdb_index(nameid)].sell;
}

int itemdb_weight(int nameid)
{
  return itemdb[search_itemdb_index(nameid)].weight;
}

int itemdb_isequip(int nameid)
{
  return itemdb[search_itemdb_index(nameid)].equip!=0;
}

//function returns the number from equipment to item
int itemdb_equip_point(int nameid,struct map_session_data *sd)
{
  return itemdb[search_itemdb_index(nameid)].equip;
}


int itemdb_weapon_init()
{
//wisc
   FILE *fp;
   int item_id,hands;
   int job[10];
   char name[128];
   int n;
   int i,j;
   char line[1024];

   fp = fopen("config/weapon_info.txt","r");
   if(fp)
   {
       j=0;
       while(fgets(line,1024,fp)){

           if((n = sscanf(line,"%d,%[^,],%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d",&item_id,name,&hands,&job[0],&job[1],&job[2],&job[3],&job[4],&job[5],&job[6],&job[7],&job[8],&job[9])) < 4)
               continue;

           j=search_itemdb_index(item_id);
           itemdb[j].hands = hands;

           for(i=0;i<MAX_JOBS+1;i++) itemdb[j].job[i] = 0;

           if (job[0] == 99) {
               for(i=0;i<MAX_JOBS+1;i++) itemdb[j].job[i] = 1;
           } else {
               for(i=0;i<n-3;i++) itemdb[j].job[job[i]] = 1; 
           }
       }
   }
   fclose(fp);
   return 0;
}

int itemdb_hands(int nameid)
{
 return itemdb[search_itemdb_index(nameid)].hands;
}

int itemdb_can_equipt_weapon(int nameid,short class)
{
// only sort out unequiptable weapons all other items is ok
   int i=search_itemdb_index(nameid);
   if (itemdb[i].hands < 0) return 1;  // no weapon -> init value is -1
   return itemdb[i].job[class];          // return weapon info

}

static int itemdb_read_itemslottable(void)
{
  char *buf,*p;
  int s;
  buf=grfio_read("data\\itemslottable.txt");
  if(buf==NULL)
    return -1;
  s=grfio_size("data\\itemslottable.txt");
  buf[s]=0;
  for(p=buf;p-buf<s;){
    int nameid,equip;
    /* item name and number for equipping*/
    sscanf(p,"%d#%d#",&nameid,&equip);
    itemdb[search_itemdb_index(nameid)].equip=equip;
    itemdb[search_itemdb_index(nameid)].hands=-1;	//init->weapon update
    p=strchr(p,10);
    if(!p) break;
    p++;
    p=strchr(p,10);
    if(!p) break;
    p++;
  }
  free(buf);
  return 0;
}

int itemdb_init(void)
{
  int i;
  for(i=0;i<ITEMDB_HASH_SIZE;i++)
    itemdb_hash[i]=-1;
  itemdb_size=ITEMDB_HASH_SIZE;
  itemdb_num=0;
  itemdb=malloc(sizeof(itemdb[0])*itemdb_size);
  
  itemdb_read_itemslottable();
  itemdb_sell_init();
  itemdb_weapon_init();     //weapon update
#if 0
  for(i=0;i<ITEMDB_HASH_SIZE;i++){
    int j,c;
    for(j=itemdb_hash[i],c=0;j>=0;j=itemdb[j].next,c++);
    printf("%4d",c);
    if(i%16==15) printf("\n");
  }
  exit(1);
#endif
  return 0;
}

int itemdb_view_point(int nameid)
{
	char strgat[1024 * 80],s_nameid[8],s_view[4];
	FILE *fp;
	int t_nameid,view,fcount,scount,i,tcount,j;
	memset(strgat,'\0',sizeof(strgat));
	memset(s_nameid,'\0',sizeof(s_nameid));
	memset(s_view,'\0',sizeof(s_view));
	scount = 0;
	fcount = 0;
	tcount = 0;
	//the number of the ID from item_db.txt is removed (25th)
	fp = fopen("config/id_view.txt","r");
	while( (strgat[fcount++] =	getc(fp)) != EOF )
		;
	fclose(fp);
	while(strgat[scount] != '*')
	{
		i = 0;
		j = 0;
		while(strgat[scount] != ':' && i <=3){
			s_nameid[i] = strgat[scount];
			scount++;
			i++;
		}
		scount++;
		t_nameid = atoi(s_nameid);
		memset(s_view,'\0',sizeof(s_view));
		while(strgat[scount] != '\n'){
				s_view[j] = strgat[scount];
				scount++;
				j++;
			}

		view = atoi(s_view);
		scount++;
		if(t_nameid == nameid)
		{
			printf("ID:VI %d:%d\n",t_nameid,view);
			return view;
		}
	}
	printf("Miss Search Item ViewNumber\n");
	return 0;
}

struct item_db2 ret_item;

struct item_db2 item_database(int item_id)
{
	FILE *fp;
	//ID,Name,Jname,Type,Price,Sell,Weight,ATK,MATK,DEF,MDEF,Range,Slot,STR,AGI,VIT,INT,DEX
	//,LUK,Job,Gender,Loc,wLV,eLV,View,Ele,Eff,HP1,HP2,SP1,SP2,Rare,Box
	int name_id,type,price,sell,weight,atk,matk,def,mdef,range,slot,str,agi,vit,int_,dex;
	int luk,job,gender,loc,wlv,elv,view,ele,eff,hp1,hp2,sp1,sp2,rare,box;
	int hit,critical,flee,skill_id;
	int fcount,i;
	char name[128],JName[256];
	char line[2040];
	fcount = 0;
	i = 0;
	//the number of the ID from item_db.txt is removed (25th)
	fp = fopen("config/item_db2.txt","r");
	if(fp)
	{
		//	printf("item_id %d\n",item_id);
		while(fgets(line,2040,fp)){
			sscanf(line,"%d,%[^,],%[^,],%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d",
				&name_id,name,JName,
				&type,&price,&sell,&weight,&atk,&matk,&def,&mdef,&range,&slot,
				&str,&agi,&vit,&int_,&dex,&luk,&job,&gender,&loc,&wlv,
				&elv,&view,&ele,&eff,&hp1,&hp2,&sp1,&sp2,&rare,&box,&hit,&critical,&flee,&skill_id);
			if(name_id == item_id)
			{
			ret_item.nameid = name_id;
			ret_item.type = type;
			ret_item.sell = price;
			ret_item.weight = weight;
			ret_item.atk = atk;
			ret_item.matk = matk;
			ret_item.def = def;
			ret_item.mdef = mdef;
			ret_item.range = range;
			ret_item.slot = slot;
			ret_item.str = str;
			ret_item.agi = agi;
			ret_item.vit = vit;
			ret_item.int_ = int_;
			ret_item.dex = dex;
			ret_item.luk = luk;
			ret_item.job = job;
			ret_item.gender = gender;
			ret_item.loc = loc;
			ret_item.wlv = wlv;
			ret_item.elv = elv;
			ret_item.view = view;
			ret_item.ele = ele;
			ret_item.eff = eff;
			ret_item.hp1 = hp1;
			ret_item.hp2 = hp2;
			ret_item.sp1 = sp1;
			ret_item.sp2 = sp2;
			ret_item.hit = hit;
			ret_item.critical = critical;
			ret_item.flee = flee;
			ret_item.skill_id = skill_id;
			fclose(fp);
			return ret_item;
			}
		}
	}

	printf("That item does not exist!\n");
	fclose(fp);
	return ret_item;
}