char2.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.
//
// char2.c - Main Char-Server File

#include <sys/types.h>
#include <sys/socket.h>
#include <stdio.h>
#include <stdlib.h>
#include <netinet/in.h>
#include <sys/time.h>
#include <sys/ioctl.h>
#include <unistd.h>
#include <signal.h>
#include <fcntl.h>
#include <string.h>
#include <arpa/inet.h>

#include "core.h"
#include "mmo.h"
#include "char2.h"

struct mmo_map_server server[MAX_SERVERS];
int server_fd[MAX_SERVERS];

int login_fd;
char userid[24];
char passwd[24];
char server_name[16];
char login_ip_str[16];
int login_port;
char char_ip_str[16];
int char_ip;
int char_port;
int char_port_fd;
char char_txt[256]="data/players.txt";
char storage_txt[256]="data/storage.txt";
int check_connect_timer;
int send_users_tologin_timer;

#define CHAR_STATE_WAITAUTH 0
#define CHAR_STATE_AUTHOK 1
struct char_session_data{
  int state;
  int account_id,login_id1,login_id2,sex;
  int found_char[3];
};

#define AUTH_FIFO_SIZE 256
struct {
  int account_id,char_id,login_id1,char_pos,delflag;
} auth_fifo[AUTH_FIFO_SIZE];
int auth_fifo_pos=0;

int char_id_count=5;
struct mmo_charstatus *char_dat;
int char_num,char_max;

int mmo_char_tostr(char *str,struct mmo_charstatus *p)
{
  int i;
  sprintf(str,"%d\t%d,%d\t%s\t%d,%d,%d\t%d,%d,%d\t%d,%d,%d,%d\t%d,%d,%d,%d,%d,%d\t%d,%d"
	  "\t%d,%d,%d\t%d,%d\t%d,%d,%d\t%d,%d,%d,%d,%d"
	  "\t%s,%d,%d\t%s,%d,%d",
	  p->char_id,p->account_id,p->char_num,p->name, //
	  p->class,p->base_level,p->job_level,
	  p->base_exp,p->job_exp,p->zeny,
	  p->hp,p->max_hp,p->sp,p->max_sp,
	  p->str,p->agi,p->vit,p->int_,p->dex,p->luk,
	  p->status_point,p->skill_point,
	  p->option,p->karma,p->manner,	//
	  p->party_id,p->guild_id,
	  p->hair,p->hair_color,p->clothes_color,
	  p->weapon,p->sheild,p->head_top,p->head_mid,p->head_bottom,
	  p->last_point.map,p->last_point.x,p->last_point.y, //
	  p->save_point.map,p->save_point.x,p->save_point.y
	  );
  strcat(str,"\t");
  for(i=0;i<3;i++)
    if(p->memo_point[i].map[0]){
      sprintf(str+strlen(str),"%s,%d,%d",p->memo_point[i].map,p->memo_point[i].x,p->memo_point[i].y);
    }      
  strcat(str,"\t");
  for(i=0;i<MAX_INVENTORY;i++)
    if(p->inventory[i].nameid){
      sprintf(str+strlen(str),"%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d ",
	      p->inventory[i].id,p->inventory[i].nameid,p->inventory[i].amount,p->inventory[i].equip,
	      p->inventory[i].identify,p->inventory[i].refine,p->inventory[i].attribute,
	      p->inventory[i].card[0],p->inventory[i].card[1],p->inventory[i].card[2],p->inventory[i].card[3]);
    }      
  strcat(str,"\t");
  for(i=0;i<MAX_CART;i++)
    if(p->cart[i].nameid){
      sprintf(str+strlen(str),"%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d ",
	      p->cart[i].id,p->cart[i].nameid,p->cart[i].amount,p->cart[i].equip,
	      p->cart[i].identify,p->cart[i].refine,p->cart[i].attribute,
	      p->cart[i].card[0],p->cart[i].card[1],p->cart[i].card[2],p->cart[i].card[3]);
    }      
  strcat(str,"\t");
  for(i=0;i<MAX_SKILL;i++)
    if(p->skill[i].id){
      sprintf(str+strlen(str),"%d,%d ",p->skill[i].id,p->skill[i].lv);
    }      
  strcat(str,"\t");
  return 0;
}

int mmo_char_fromstr(char *str,struct mmo_charstatus *p)
{
  int tmp_int[256];
  int set,next,len,i,j;

  set=sscanf(str,"%d\t%d,%d\t%[^\t]\t%d,%d,%d\t%d,%d,%d\t%d,%d,%d,%d\t%d,%d,%d,%d,%d,%d\t%d,%d"
	   "\t%d,%d,%d\t%d,%d\t%d,%d,%d\t%d,%d,%d,%d,%d"
	   "\t%[^,],%d,%d\t%[^,],%d,%d%n",
	   &tmp_int[0],&tmp_int[1],&tmp_int[2],p->name, //
	   &tmp_int[3],&tmp_int[4],&tmp_int[5],
	   &tmp_int[6],&tmp_int[7],&tmp_int[8],
	   &tmp_int[9],&tmp_int[10],&tmp_int[11],&tmp_int[12],
	   &tmp_int[13],&tmp_int[14],&tmp_int[15],&tmp_int[16],&tmp_int[17],&tmp_int[18],
	   &tmp_int[19],&tmp_int[20],
	   &tmp_int[21],&tmp_int[22],&tmp_int[23], //
	   &tmp_int[24],&tmp_int[25],
	   &tmp_int[26],&tmp_int[27],&tmp_int[28],
	   &tmp_int[29],&tmp_int[30],&tmp_int[31],&tmp_int[32],&tmp_int[33],
	   p->last_point.map,&tmp_int[34],&tmp_int[35], //
	   p->save_point.map,&tmp_int[36],&tmp_int[37],&next
	 );
  p->char_id=tmp_int[0];
  p->account_id=tmp_int[1];
  p->char_num=tmp_int[2];
  p->class=tmp_int[3];
  p->base_level=tmp_int[4];
  p->job_level=tmp_int[5];
  p->base_exp=tmp_int[6];
  p->job_exp=tmp_int[7];
  p->zeny=tmp_int[8];
  p->hp=tmp_int[9];
  p->max_hp=tmp_int[10];
  p->sp=tmp_int[11];
  p->max_sp=tmp_int[12];
  p->str=tmp_int[13];
  p->agi=tmp_int[14];
  p->vit=tmp_int[15];
  p->int_=tmp_int[16];
  p->dex=tmp_int[17];
  p->luk=tmp_int[18];
  p->status_point=tmp_int[19];
  p->skill_point=tmp_int[20];
  p->option=tmp_int[21];
  p->karma=tmp_int[22];
  p->manner=tmp_int[23];
  p->party_id=tmp_int[24];
  p->guild_id=tmp_int[25];
  p->hair=tmp_int[26];
  p->hair_color=tmp_int[27];
  p->clothes_color=tmp_int[28];
  p->weapon=tmp_int[29];
  p->sheild=tmp_int[30];
  p->head_top=tmp_int[31];
  p->head_mid=tmp_int[32];
  p->head_bottom=tmp_int[33];
  p->last_point.x=tmp_int[34];
  p->last_point.y=tmp_int[35];
  p->save_point.x=tmp_int[36];
  p->save_point.y=tmp_int[37];
  if(set!=41)
    return 0;
  if(str[next]=='\n')
    return 1;	// (I2<0L8_49(B (<-not Japanese?)
  next++;
  for(i=0;str[next] && str[next]!='\t';i++){
    set=sscanf(str+next,"%[^,],%d,%d%n",p->memo_point[i].map,&tmp_int[0],&tmp_int[1],&len);
    if(set!=3) 
    {
      for (j=i; j<3;j++)
	{
	  p->memo_point[j].x=0;
	  p->memo_point[j].y=0;
	  memset(p->memo_point[j].map,0,16);
	}
      return 0;
    }
    p->memo_point[i].x=tmp_int[0];
    p->memo_point[i].y=tmp_int[1];
    next+=len;
    if(str[next]==' ')
      next++;
  }
  next++;
  for(i=0;str[next] && str[next]!='\t';i++){
    set=sscanf(str+next,"%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d%n",
	       &tmp_int[0],&tmp_int[1],&tmp_int[2],&tmp_int[3],
	       &tmp_int[4],&tmp_int[5],&tmp_int[6],
	       &tmp_int[7],&tmp_int[8],&tmp_int[9],&tmp_int[10],&len);
    if(set!=11)
	{
	  for (j=i;j<MAX_INVENTORY;j++)
	  {
	    p->inventory[j].id=0;
	    p->inventory[j].nameid=0;
	    p->inventory[j].amount=0;
	    p->inventory[j].equip=0;
	    p->inventory[j].identify=0;
	    p->inventory[j].refine=0;
	    p->inventory[j].attribute=0;
	    p->inventory[j].card[0]=0;
	    p->inventory[j].card[1]=0;
	    p->inventory[j].card[2]=0;
	    p->inventory[j].card[3]=0;
	  }
          return 0;
	}
    p->inventory[i].id=tmp_int[0];
    p->inventory[i].nameid=tmp_int[1];
    p->inventory[i].amount=tmp_int[2];
    p->inventory[i].equip=tmp_int[3];
    p->inventory[i].identify=tmp_int[4];
    p->inventory[i].refine=tmp_int[5];
    p->inventory[i].attribute=tmp_int[6];
    p->inventory[i].card[0]=tmp_int[7];
    p->inventory[i].card[1]=tmp_int[8];
    p->inventory[i].card[2]=tmp_int[9];
    p->inventory[i].card[3]=tmp_int[10];
    next+=len;
    if(str[next]==' ')
      next++;
  }
  next++;
  for(i=0;str[next] && str[next]!='\t';i++){
    set=sscanf(str+next,"%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d%n",
	       &tmp_int[0],&tmp_int[1],&tmp_int[2],&tmp_int[3],
	       &tmp_int[4],&tmp_int[5],&tmp_int[6],
	       &tmp_int[7],&tmp_int[8],&tmp_int[9],&tmp_int[10],&len);
    if(set!=11)
    {
      for (j=i;j<MAX_CART;j++)
      {
	p->cart[j].id=0;
	p->cart[j].nameid=0;
	p->cart[j].amount=0;
	p->cart[j].equip=0;
	p->cart[j].identify=0;
	p->cart[j].refine=0;
	p->cart[j].attribute=0;
	p->cart[j].card[0]=0;
	p->cart[j].card[1]=0;
	p->cart[j].card[2]=0;
	p->cart[j].card[3]=0;
      }
      return 0;
    }
    p->cart[i].id=tmp_int[0];
    p->cart[i].nameid=tmp_int[1];
    p->cart[i].amount=tmp_int[2];
    p->cart[i].equip=tmp_int[3];
    p->cart[i].identify=tmp_int[4];
    p->cart[i].refine=tmp_int[5];
    p->cart[i].attribute=tmp_int[6];
    p->cart[i].card[0]=tmp_int[7];
    p->cart[i].card[1]=tmp_int[8];
    p->cart[i].card[2]=tmp_int[9];
    p->cart[i].card[3]=tmp_int[10];
    next+=len;
    if(str[next]==' ')
       next++;
  }
  next++;
  for(i=0;str[next] && str[next]!='\t';i++){
    set=sscanf(str+next,"%d,%d%n",
	       &tmp_int[0],&tmp_int[1],&len);
    if(set!=2)
    {
       for(j=i;j<MAX_SKILL;j++)
	{
	  p->skill[j].id=0;
	  p->skill[j].lv=0;
	}
      return 0;
    }
	p->skill[tmp_int[0]-1].id=tmp_int[0];
	p->skill[tmp_int[0]-1].lv=tmp_int[1];
    next+=len;
    if(str[next]==' ')
      next++;
  }
  return 1;
}

int mmo_char_init(void)
{
  char line[65536];
  int ret;
  int tmp_int[5];
  int set,account_id,i;

  FILE *fp;
	char_num=0;
  fp=fopen(char_txt,"r");
  free(char_dat);
  char_dat=malloc(sizeof(char_dat[0])*256);
  char_max=256;
  if(fp==NULL)
    return 0;
  while(fgets(line,65535,fp)){
    if(char_num>=char_max){
      char_max+=256;
      char_dat=realloc(char_dat,sizeof(char_dat[0])*char_max);
    }
    memset(&char_dat[char_num],0,sizeof(char_dat[0]));
    ret=mmo_char_fromstr(line,&char_dat[char_num]);
    if(ret){
      if(char_dat[char_num].char_id>=char_id_count)
	char_id_count=char_dat[char_num].char_id+1;
      char_num++;
    }
  }
  fclose(fp);
// Storage
 fp=fopen(storage_txt,"r");
 if(fp==NULL)
   return 0;
 while(fgets(line,65535,fp)){

    set=sscanf(line,"%d,%d",&tmp_int[0],&tmp_int[1]);
    if(set==2) {

    account_id=tmp_int[0];
    
    for(i=0;i<char_num;i++) {

        if(char_dat[i].account_id==account_id) {
       ret=mmo_storage_fromstr(line,&char_dat[i]);
       }
    }
    
    }
 }
 fclose(fp);
 // End 

  return 0;
}

void mmo_char_exit(void)
{
  if (char_dat) free((void *)char_dat);
}

void mmo_char_sync(void)
{
  char line[65536];
  int i;
  FILE *fp;
  fp=fopen(char_txt,"w");
  if(fp==NULL)
    return;
  for(i=0;i<char_num;i++){
    mmo_char_tostr(line,&char_dat[i]);
    fprintf(fp,"%s\n",line);
  }
  fclose(fp);
}

int make_new_char(int fd,unsigned char *dat)
{
  int i,x;
  struct char_session_data *sd;
  FILE *logfp;

  if(dat[24]+dat[25]+dat[26]+dat[27]+dat[28]+dat[29]>5*6 ||
     dat[30]>=3 ||
     dat[33]==0 || dat[33]>=20 ||
     dat[31]>=9){
    logfp=fopen("logs/char.log","a");
    if(logfp){
      fprintf(logfp,"make new char error %d-%d %s %d,%d,%d,%d,%d,%d %d,%d\n",
	      fd,dat[30],dat,dat[24],dat[25],dat[26],dat[27],dat[28],dat[29],dat[33],dat[31]);
      fclose(logfp);
    }
    return -1;
  }
  logfp=fopen("logs/char.log","a");
  if(logfp){
    fprintf(logfp,"make new char %d-%d %s\n",fd,dat[30],dat);
    fclose(logfp);
  }
  sd=session[fd]->session_data;

  for(i=0;i<char_num;i++){
    if(strcmp(char_dat[i].name,dat)==0 || (char_dat[i].account_id==sd->account_id && char_dat[i].char_num==dat[30]))
      break;
  }
  if(i!=char_num)
    return -1;
  if(char_num>=char_max){
    char_max+=256;
    char_dat=realloc(char_dat,sizeof(char_dat[0])*char_max);
  }
  char_dat[i].char_id=char_id_count++;
  char_dat[i].account_id=sd->account_id;
  char_dat[i].char_num=dat[30];
  strcpy(char_dat[i].name,dat);
  char_dat[i].class=0;
  char_dat[i].base_level=1;
  char_dat[i].job_level=1;
  char_dat[i].base_exp=0;
  char_dat[i].job_exp=0;
  char_dat[i].zeny=500;
  char_dat[i].hp=40;
  char_dat[i].max_hp=40;
  char_dat[i].sp=2;
  char_dat[i].max_sp=2;
  char_dat[i].str=dat[24];
  char_dat[i].agi=dat[25];
  char_dat[i].vit=dat[26];
  char_dat[i].int_=dat[27];
  char_dat[i].dex=dat[28];
  char_dat[i].luk=dat[29];
  char_dat[i].status_point=0;
  char_dat[i].skill_point=0;
  char_dat[i].option=0;
  char_dat[i].karma=0;
  char_dat[i].manner=0;
  char_dat[i].party_id=0;
  char_dat[i].guild_id=0;
  char_dat[i].hair=dat[33];
  char_dat[i].hair_color=dat[31];
  char_dat[i].clothes_color=0;
  char_dat[i].weapon=0;
  char_dat[i].sheild=0;
  char_dat[i].head_top=0;
  char_dat[i].head_mid=0;
  char_dat[i].head_bottom=0;
  strcpy(char_dat[i].last_point.map,"new_5-1.gat");
  char_dat[i].last_point.x=53;
  char_dat[i].last_point.y=111;
  strcpy(char_dat[i].save_point.map,"new_5-1.gat");
  char_dat[i].save_point.x=53;
  char_dat[i].save_point.y=111;
  for (x = 0; x < 3; x++){
	  strcpy(char_dat[i].memo_point[x].map,"new_5-1.gat");    
	  char_dat[i].memo_point[x].x=53;    
	  char_dat[i].memo_point[x].y=111;  
  }
  for (x = 0; x < MAX_INVENTORY; x++)  {    
	  char_dat[i].inventory[x].nameid = 0;  
  } 
  for (x = 0; x < MAX_CART; x++)  {    
	  char_dat[i].cart[x].nameid = 0;    
	  /*char_dat[i].cart[x].id = ;    
	  char_dat[i].cart[x].amount = ;    
	  char_dat[i].cart[x].equip = ;    
	  char_dat[i].cart[x].identify = ;    
	  char_dat[i].cart[x].refine = ;    
	  char_dat[i].cart[x].attribute = ;    
	  char_dat[i].cart[x].card[0] = ;    
	  char_dat[i].cart[x].card[1] = ;    
	  char_dat[i].cart[x].card[2] = ;    
	  char_dat[i].cart[x].card[3] = ;  */
  }  
  for(x=0;x<MAX_SKILL;x++){
    char_dat[i].skill[x].id = 0;
	/*
	char_dat[i].skill[x].lv = ;
	 char_dat[i].skill[x].type_num = ;//楢懪夞悢
  char_dat[i].skill[x].type_hit = ;//楢懪偐扨敪偐
  char_dat[i].skill[x].type_inf = ;//僷僢僔僽偱偁傞偐偳偆偐摍偺忣曬
  char_dat[i].skill[x].type_pl = ;//応強宯偺帪偵偳偺僗僉儖偵偡傞偐
  char_dat[i].skill[x].type_nk = ;//峌寕宯偱偁傞偑揋傪庛偔偟偨傝偡傞杺朄偺応崌愝掕
  char_dat[i].skill[x].sp = ;
  char_dat[i].skill[x].range = ;*/
    }      
  char_num++;
  
  mmo_char_sync();
  mmo_char_init();
  return i;
}

int mmo_char_send006b(int fd,struct char_session_data *sd)
{
  int i,j,found_num;
#ifdef NEW_006b
  inf offset=24;
#else
  int offset=4;
#endif

  sd->state=CHAR_STATE_AUTHOK;
  /* (IB3$$$F%-%$Bf'r'(IG!<%?$$B