// $Id: char-converter.c,v 1.1.1.1 2004/09/10 17:45:03 MagicalTux Exp $
// original : char2.c 2003/03/14 11:58:35 Rev.1.5
#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>
#define STORAGE_MEMINC 16
#include "char.h"
#include "strlib.h"
#ifdef MEMWATCH
#include "memwatch.h"
#endif
char pet_txt[256] = "save/pet.txt";
char storage_txt[256] = "save/storage.txt";
MYSQL mysql_handle;
MYSQL_RES *sql_res;
MYSQL_ROW sql_row;
int sql_fields, sql_cnt;
char tmp_sql[65535];
int db_server_port = 3306;
char db_server_ip[16] = "127.0.0.1";
char db_server_id[32] = "ragnarok";
char db_server_pw[32] = "ragnarok";
char db_server_logindb[32] = "ragnarok";
struct storage *storage = NULL;
struct mmo_map_server server[MAX_MAP_SERVERS];
int server_fd[MAX_MAP_SERVERS];
int login_fd;
char userid[24];
char passwd[24];
char server_name[20];
char login_ip_str[16];
int login_port = 6900;
char char_ip_str[16];
int char_ip;
int char_port = 6121;
int char_maintenance;
int char_new;
char char_txt[256];
char t_name[256];
#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[9];
};
#define AUTH_FIFO_SIZE 256
struct
{
int account_id, char_id, login_id1, char_pos, delflag, sex;
} auth_fifo[AUTH_FIFO_SIZE];
int auth_fifo_pos = 0;
int char_id_count = 100000;
struct mmo_charstatus *char_dat;
int char_num, char_max;
int max_connect_user = 0;
int autosave_interval = DEFAULT_AUTOSAVE_INTERVAL;
// �ʱ� ��ġ(conf ���Ϸκ��� �缳�� ����)
struct point start_point = { "new_1-1.gat", 53, 111 };
int inter_pet_fromstr (char *str, struct s_pet *p)
{
int s;
int tmp_int[16];
char tmp_str[256];
memset (p, 0, sizeof (struct s_pet));
// printf("sscanf pet main info\n");
s = sscanf (str, "%d, %d,%[^\t]\t%d, %d, %d, %d, %d, %d, %d, %d, %d",
&tmp_int[0], &tmp_int[1], tmp_str, &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]);
if (s != 12)
return 1;
p->pet_id = tmp_int[0];
p->class = tmp_int[1];
memcpy (p->name, tmp_str, 24);
p->account_id = tmp_int[2];
p->char_id = tmp_int[3];
p->level = tmp_int[4];
p->egg_id = tmp_int[5];
p->equip = tmp_int[6];
p->intimate = tmp_int[7];
p->hungry = tmp_int[8];
p->rename_flag = tmp_int[9];
p->incuvate = tmp_int[10];
if (p->hungry < 0)
p->hungry = 0;
else if (p->hungry > 100)
p->hungry = 100;
if (p->intimate < 0)
p->intimate = 0;
else if (p->intimate > 1000)
p->intimate = 1000;
return 0;
}
//---------------------------------------------------------
int inter_pet_tosql (int pet_id, struct s_pet *p)
{
//`pet` (`pet_id`, `class`,`name`,`account_id`,`char_id`,`level`,`egg_id`,`equip`,`intimate`,`hungry`,`rename_flag`,`incuvate`)
char tmp_sql[65535];
MYSQL_RES *sql_res;
MYSQL_ROW sql_row;
jstrescapecpy (t_name, p->name);
if (p->hungry < 0)
p->hungry = 0;
else if (p->hungry > 100)
p->hungry = 100;
if (p->intimate < 0)
p->intimate = 0;
else if (p->intimate > 1000)
p->intimate = 1000;
sprintf (tmp_sql, "SELECT * FROM `pet` WHERE `pet_id`='%d'", pet_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error - %s\n", mysql_error (&mysql_handle));
}
sql_res = mysql_store_result (&mysql_handle);
sql_row = mysql_fetch_row (sql_res); //row fetching
if (!sql_row) //no row -> insert
sprintf (tmp_sql,
"INSERT INTO `pet` (`pet_id`, `class`,`name`,`account_id`,`char_id`,`level`,`egg_id`,`equip`,`intimate`,`hungry`,`rename_flag`,`incuvate`) VALUES ('%d', '%d', '%s', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d')",
p->pet_id, p->class, t_name, p->account_id, p->char_id,
p->level, p->egg_id, p->equip, p->intimate, p->hungry,
p->rename_flag, p->incuvate);
else //row reside -> updating
sprintf (tmp_sql,
"UPDATE `pet` SET `class`='%d',`name`='%s',`account_id`='%d',`char_id`='%d',`level`='%d',`egg_id`='%d',`equip`='%d',`intimate`='%d',`hungry`='%d',`rename_flag`='%d',`incuvate`='%d' WHERE `pet_id`='%d'",
p->class, t_name, p->account_id, p->char_id, p->level,
p->egg_id, p->equip, p->intimate, p->hungry, p->rename_flag,
p->incuvate, p->pet_id);
mysql_free_result (sql_res); //resource free
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error - %s\n", mysql_error (&mysql_handle));
}
printf ("pet dump success! - %d:%s\n", pet_id, p->name);
return 0;
}
int storage_tosql (int account_id, struct storage *p)
{
// id -> DB dump
// storage {`account_id`/`id`/`nameid`/`amount`/`equip`/`identify`/`refine`/`attribute`/`card0`/`card1`/`card2`/`card3`}
int i, j;
j = 0;
//printf ("starting storage dump to DB - id: %d\n", account_id);
//delete old data.
sprintf (tmp_sql, "DELETE FROM `storage` WHERE `account_id`='%d'",
account_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error - %s\n", mysql_error (&mysql_handle));
}
//printf ("all storage item was deleted ok\n");
for (i = 0; i < MAX_STORAGE; i++)
{
//printf ("save storage num: %d (%d:%d)\n",i, p->storage[i].nameid , p->storage[i].amount);
if ((p->storage[i].nameid) && (p->storage[i].amount))
{
sprintf (tmp_sql,
"INSERT INTO `storage` (`account_id`,`nameid`,`amount`,`equip`,`identify`,`refine`,`attribute`,`card0`,`card1`,`card2`,`card3`,`broken`) VALUES ('%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d')",
p->account_id, p->storage[i].nameid,
p->storage[i].amount, p->storage[i].equip,
p->storage[i].identify, p->storage[i].refine,
p->storage[i].attribute, p->storage[i].card[0],
p->storage[i].card[1], p->storage[i].card[2],
p->storage[i].card[3], p->storage[i].broken);
//printf ("%s\n",tmp_sql);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error - %s\n",
mysql_error (&mysql_handle));
}
j++;
}
}
printf ("storage dump to DB - id: %d (total: %d)\n", account_id, j);
return 0;
}
// char to storage
int storage_fromstr (char *str, struct storage *p)
{
int tmp_int[256];
int set, next, len, i;
set = sscanf (str, "%d, %d%n", &tmp_int[0], &tmp_int[1], &next);
p->storage_amount = tmp_int[1];
if (set != 2)
return 0;
if (str[next] == '\n' || str[next] == '\r')
return 1;
next++;
for (i = 0; str[next] && str[next] != '\t'; i++)
{
if (sscanf (str + next, "%d,%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],
&tmp_int[11], &len) == 12)
{
p->storage[i].id = tmp_int[0];
p->storage[i].nameid = tmp_int[1];
p->storage[i].amount = tmp_int[2];
p->storage[i].equip = tmp_int[3];
p->storage[i].identify = tmp_int[4];
p->storage[i].refine = tmp_int[5];
p->storage[i].attribute = tmp_int[6];
p->storage[i].card[0] = tmp_int[7];
p->storage[i].card[1] = tmp_int[8];
p->storage[i].card[2] = tmp_int[9];
p->storage[i].card[3] = tmp_int[10];
p->storage[i].broken = tmp_int[11];
next += len;
if (str[next] == ' ')
next++;
}
else if (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) == 11)
{
p->storage[i].id = tmp_int[0];
p->storage[i].nameid = tmp_int[1];
p->storage[i].amount = tmp_int[2];
p->storage[i].equip = tmp_int[3];
p->storage[i].identify = tmp_int[4];
p->storage[i].refine = tmp_int[5];
p->storage[i].attribute = tmp_int[6];
p->storage[i].card[0] = tmp_int[7];
p->storage[i].card[1] = tmp_int[8];
p->storage[i].card[2] = tmp_int[9];
p->storage[i].card[3] = tmp_int[10];
p->storage[i].broken = 0;
next += len;
if (str[next] == ' ')
next++;
}
else
return 0;
}
return 1;
}
/////////////////////////////////
int mmo_char_fromstr (char *str, struct mmo_charstatus *p)
{
int tmp_int[256];
int set, next, len, i;
// initilialise character
memset (p, '\0', sizeof (struct mmo_charstatus));
// If it's not char structure of version 1008 and after
if ((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,%d\t%d,%d,%d\t%d,%d,%d,%d,%d" "\t%[^,],%d,%d\t%[^,],%d,%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], &tmp_int[34], p->last_point.map, &tmp_int[35], &tmp_int[36], //
p->save_point.map, &tmp_int[37], &tmp_int[38],
&tmp_int[39], &next)) != 43)
{
tmp_int[39] = 0; // partner id
// If not char structure from version 384 to 1007
if ((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,%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], &tmp_int[34], p->last_point.map, &tmp_int[35], &tmp_int[36], //
p->save_point.map, &tmp_int[37], &tmp_int[38],
&next)) != 42)
{
// It's char structure of a version before 384
tmp_int[26] = 0; // pet id
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[27], &tmp_int[28], &tmp_int[29], &tmp_int[30], &tmp_int[31], &tmp_int[32], &tmp_int[33], &tmp_int[34], p->last_point.map, &tmp_int[35], &tmp_int[36], //
p->save_point.map, &tmp_int[37], &tmp_int[38],
&next);
set += 2;
//printf("char: old char data ver.1\n");
// Char structure of version 1007 or older
}
else
{
set++;
//printf("char: old char data ver.2\n");
}
// Char structure of version 1008+
}
else
{
//printf("char: new char data ver.3\n");
}
if (set != 43)
return 0;
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->pet_id = tmp_int[26];
p->hair = tmp_int[27];
p->hair_color = tmp_int[28];
p->clothes_color = tmp_int[29];
p->weapon = tmp_int[30];
p->shield = tmp_int[31];
p->head_top = tmp_int[32];
p->head_mid = tmp_int[33];
p->head_bottom = tmp_int[34];
p->last_point.x = tmp_int[35];
p->last_point.y = tmp_int[36];
p->save_point.x = tmp_int[37];
p->save_point.y = tmp_int[38];
p->partner_id = tmp_int[39];
// Some checks
for (i = 0; i < char_num; i++)
{
if (char_dat[i].char_id == p->char_id)
{
printf
("\033[1;31mmmo_auth_init: ******Error: a character has an identical id to another.\n");
printf
(" character id #%d -> new character not readed.\n",
p->char_id);
printf (" Character saved in log file.\033[0m\n");
return -1;
}
else if (strcmp (char_dat[i].name, p->name) == 0)
{
printf
("\033[1;31mmmo_auth_init: ******Error: character name already exists.\n");
printf
(" character name '%s' -> new character not readed.\n",
p->name);
printf (" Character saved in log file.\033[0m\n");
return -2;
}
}
if (str[next] == '\n' || str[next] == '\r')
return 1; // �V�K�f�[�^
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)
return -3;
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++)
{
if (sscanf (str + next, "%d,%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],
&tmp_int[11], &len) == 12)
{
// do nothing, it's ok
}
else if (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) == 11)
{
tmp_int[11] = 0; // broken doesn't exist in this version -> 0
}
else // invalid structure
return -4;
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];
p->inventory[i].broken = tmp_int[11];
next += len;
if (str[next] == ' ')
next++;
}
next++;
for (i = 0; str[next] && str[next] != '\t'; i++)
{
if (sscanf (str + next, "%d,%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],
&tmp_int[11], &len) == 12)
{
// do nothing, it's ok
}
else if (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) == 11)
{
tmp_int[11] = 0; // broken doesn't exist in this version -> 0
}
else // invalid structure
return -5;
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];
p->cart[i].broken = tmp_int[11];
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)
return -6;
p->skill[tmp_int[0]].id = tmp_int[0];
p->skill[tmp_int[0]].lv = tmp_int[1];
next += len;
if (str[next] == ' ')
next++;
}
next++;
for (i = 0;
str[next] && str[next] != '\t' && str[next] != '\n'
&& str[next] != '\r'; i++)
{ // global_reg�����ȑO��athena.txt�݊��̂��߈ꉞ'\n'�`�F�b�N
set =
sscanf (str + next, "%[^,],%d%n", p->global_reg[i].str,
&p->global_reg[i].value, &len);
if (set != 2)
{
// because some scripts are not correct, the str can be "". So, we must check that.
// If it's, we must not refuse the character, but just this REG value.
// Character line will have something like: nov_2nd_cos,9 ,9 nov_1_2_cos_c,1 (here, ,9 is not good)
if (str[next] == ','
&& sscanf (str + next, ",%d%n", &p->global_reg[i].value,
&len) == 1)
i--;
else
return -7;
}
next += len;
if (str[next] == ' ')
next++;
}
p->global_reg_num = i;
return 1;
}
//==========================================================================================================
int mmo_char_tosql (int char_id, struct mmo_charstatus *p)
{
int i, save_flag;
save_flag = char_id;
printf ("request save char data... (%d)\n", char_id);
//`char`( `char_id`,`account_id`,`char_num`,`name`,`class`,`base_level`,`job_level`,`base_exp`,`job_exp`,`zeny`, //9
//`str`,`agi`,`vit`,`int`,`dex`,`luk`, //15
//`max_hp`,`hp`,`max_sp`,`sp`,`status_point`,`skill_point`, //21
//`option`,`karma`,`manner`,`party_id`,`guild_id`,`pet_id`, //27
//`hair`,`hair_color`,`clothes_color`,`weapon`,`shield`,`head_top`,`head_mid`,`head_bottom`, //35
//`last_map`,`last_x`,`last_y`,`save_map`,`save_x`,`save_y`)
sprintf (tmp_sql,
"INSERT INTO `char` SET `char_id`='%d', `account_id`='%d', `char_num`='%d', `name`='%s', `class`='%d', `base_level`='%d', `job_level`='%d',"
"`base_exp`='%d', `job_exp`='%d', `zeny`='%d',"
"`max_hp`='%d',`hp`='%d',`max_sp`='%d',`sp`='%d',`status_point`='%d',`skill_point`='%d',"
"`str`='%d',`agi`='%d',`vit`='%d',`int`='%d',`dex`='%d',`luk`='%d',"
"`option`='%d',`karma`='%d',`manner`='%d',`party_id`='%d',`guild_id`='%d',`pet_id`='%d',"
"`hair`='%d',`hair_color`='%d',`clothes_color`='%d',`weapon`='%d',`shield`='%d',`head_top`='%d',`head_mid`='%d',`head_bottom`='%d',"
"`last_map`='%s',`last_x`='%d',`last_y`='%d',`save_map`='%s',`save_x`='%d',`save_y`='%d', `partner_id` = '%d'",
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->max_hp, p->hp, p->max_sp, p->sp, p->status_point,
p->skill_point, p->str, p->agi, p->vit, p->int_, p->dex, p->luk,
p->option, p->karma, p->manner, p->party_id, p->guild_id,
p->pet_id, p->hair, p->hair_color, p->clothes_color, p->weapon,
p->shield, 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,
p->partner_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (update `char`)- %s\n",
mysql_error (&mysql_handle));
}
//`memo` (`memo_id`,`char_id`,`map`,`x`,`y`)
sprintf (tmp_sql, "DELETE FROM `memo` WHERE `char_id`='%d'", char_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (delete `memo`)- %s\n",
mysql_error (&mysql_handle));
}
//insert here.
for (i = 0; i < 10; i++)
{
if (p->memo_point[i].map[0])
{
sprintf (tmp_sql,
"INSERT INTO `memo`(`char_id`,`map`,`x`,`y`) VALUES ('%d', '%s', '%d', '%d')",
char_id, p->memo_point[i].map, p->memo_point[i].x,
p->memo_point[i].y);
if (mysql_query (&mysql_handle, tmp_sql))
printf ("DB server Error (insert `memo`)- %s\n",
mysql_error (&mysql_handle));
}
}
//`inventory` (`id`,`char_id`, `nameid`, `amount`, `equip`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `broken`)
sprintf (tmp_sql, "DELETE FROM `inventory` WHERE `char_id`='%d'",
char_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (delete `inventory`)- %s\n",
mysql_error (&mysql_handle));
}
//insert here.
for (i = 0; i < MAX_INVENTORY; i++)
{
if (p->inventory[i].nameid)
{
sprintf (tmp_sql,
"INSERT INTO `inventory`(`id`,`char_id`, `nameid`, `amount`, `equip`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `broken`)"
" VALUES ('%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d')",
p->inventory[i].id, char_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], p->inventory[i].broken);
if (mysql_query (&mysql_handle, tmp_sql))
printf ("DB server Error (insert `inventory`)- %s\n",
mysql_error (&mysql_handle));
}
}
//`cart_inventory` (`id`,`char_id`, `nameid`, `amount`, `equip`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `broken`)
sprintf (tmp_sql, "DELETE FROM `cart_inventory` WHERE `char_id`='%d'",
char_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (delete `cart_inventory`)- %s\n",
mysql_error (&mysql_handle));
}
//insert here.
for (i = 0; i < MAX_CART; i++)
{
if (p->cart[i].nameid)
{
sprintf (tmp_sql,
"INSERT INTO `cart_inventory`(`id`,`char_id`, `nameid`, `amount`, `equip`, `identify`, `refine`, `attribute`, `card0`, `card1`, `card2`, `card3`, `broken`)"
" VALUES ('%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d' )",
p->cart[i].id, char_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],
p->cart[i].broken);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (insert `cart_inventory`)- %s\n",
mysql_error (&mysql_handle));
}
}
}
//`skill` (`char_id`, `id`, `lv`)
sprintf (tmp_sql, "DELETE FROM `skill` WHERE `char_id`='%d'", char_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (delete `skill`)- %s\n",
mysql_error (&mysql_handle));
}
//insert here.
for (i = 0; i < MAX_SKILL; i++)
{
if (p->skill[i].id)
{
if (p->skill[i].id && p->skill[i].flag != 1)
{
sprintf (tmp_sql,
"INSERT INTO `skill`(`char_id`,`id`, `lv`) VALUES ('%d', '%d', '%d')",
char_id, p->skill[i].id,
(p->skill[i].flag ==
0) ? p->skill[i].lv : p->skill[i].flag - 2);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (insert `skill`)- %s\n",
mysql_error (&mysql_handle));
}
}
}
}
//`global_reg_value` (`char_id`, `str`, `value`)
sprintf (tmp_sql, "DELETE FROM `global_reg_value` WHERE `char_id`='%d'",
char_id);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (delete `global_reg_value`)- %s\n",
mysql_error (&mysql_handle));
}
//insert here.
for (i = 0; i < p->global_reg_num; i++)
{
if (p->global_reg[i].value != 0)
{
sprintf (tmp_sql,
"INSERT INTO `global_reg_value` (`char_id`, `str`, `value`) VALUES ('%d', '%s','%d')",
char_id, p->global_reg[i].str, p->global_reg[i].value);
if (mysql_query (&mysql_handle, tmp_sql))
{
printf ("DB server Error (insert `global_reg_value`)- %s\n",
mysql_error (&mysql_handle));
}
}
}
printf ("saving char is done... (%d)\n", char_id);
save_flag = 0;
return 0;
}
//==========================================================================================================
int mmo_char_init (void)
{
char line[65536];
struct s_pet *p;
int ret;
int i = 0, set, tmp_int[2], c = 0;
char input;
FILE *fp;
//DB connection initialized
mysql_init (&mysql_handle);
printf ("Connect DB server.... (inter server)\n");
if (!mysql_real_connect
(&mysql_handle, db_server_ip, db_server_id, db_server_pw,
db_server_logindb, db_server_port, (char *) NULL, 0))
{
//pointer check
printf ("%s\n", mysql_error (&mysql_handle));
exit (1);
}
else
{
printf ("connect success! (inter server)\n");
}
printf
("Warning : Make sure you backup your databases before continuing!\n");
printf
("\nDo you wish to convert your Character Database to SQL? (y/n) : ");
input = getchar ();
if (input == 'y' || input == 'Y')
{
printf ("\nConverting Character Database...\n");
fp = fopen_ ("save/athena.txt", "r");
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)
{
mmo_char_tosql (char_dat[char_num].char_id,
&char_dat[char_num]);
printf ("convert %d -> DB\n", char_dat[char_num].char_id);
if (char_dat[char_num].char_id >= char_id_count)
char_id_count = char_dat[char_num].char_id + 1;
char_num++;
}
}
printf ("char data convert end\n");
fclose_ (fp);
}
while (getchar () != '\n');
printf
("\nDo you wish to convert your Storage Database to SQL? (y/n) : ");
input = getchar ();
if (input == 'y' || input == 'Y')
{
printf ("\nConverting Storage Database...\n");
fp = fopen_ (storage_txt, "r");
if (fp == NULL)
{
printf ("cant't read : %s\n", storage_txt);
return 0;
}
while (fgets (line, 65535, fp))
{
set = sscanf (line, "%d,%d", &tmp_int[0], &tmp_int[1]);
if (set == 2)
{
if (i == 0)
{
storage = malloc (sizeof (struct storage));
}
else
{
storage =
realloc (storage, sizeof (struct storage) * (i + 1));
}
memset (&storage[i], 0, sizeof (struct storage));
storage[i].account_id = tmp_int[0];
storage_fromstr (line, &storage[i]);
storage_tosql (tmp_int[0], &storage[i]); //to sql. (dump)
i++;
}
}
fclose_ (fp);
}
while (getchar () != '\n');
printf ("\nDo you wish to convert your Pet Database to SQL? (y/n) : ");
input = getchar ();
if (input == 'y' || input == 'Y')
{
printf ("\nConverting Pet Database...\n");
if ((fp = fopen_ (pet_txt, "r")) == NULL)
return 1;
p = malloc (sizeof (struct s_pet));
while (fgets (line, sizeof (line), fp))
{
if (p == NULL)
{
printf ("int_pet: out of memory!\n");
exit (0);
}
if (inter_pet_fromstr (line, p) == 0 && p->pet_id > 0)
{
//pet dump
inter_pet_tosql (p->pet_id, p);
}
else
{
printf ("int_pet: broken data [%s] line %d\n", pet_txt, c);
}
c++;
}
fclose_ (fp);
}
return 0;
}
int inter_config_read (const char *cfgName)
{
printf ("start reading interserver configuration: %s\n", cfgName);
int i;
char line[1024], w1[1024], w2[1024];
FILE *fp;
fp = fopen_ (cfgName, "r");
if (fp == NULL)
{
printf ("file not found: %s\n", cfgName);
return 1;
}
while (fgets (line, 1020, fp))
{
i = sscanf (line, "%[^:]:%s", w1, w2);
if (i != 2)
continue;
if (strcmpi (w1, "storage_txt") == 0)
{
printf ("set storage_txt : %s\n", w2);
strncpy (storage_txt, w2, sizeof (storage_txt));
}
else if (strcmpi (w1, "pet_txt") == 0)
{
printf ("set pet_txt : %s\n", w2);
strncpy (pet_txt, w2, sizeof (pet_txt));
}
//add for DB connection
else if (strcmpi (w1, "db_server_ip") == 0)
{
strcpy (db_server_ip, w2);
printf ("set db_server_ip : %s\n", w2);
}
else if (strcmpi (w1, "db_server_port") == 0)
{
db_server_port = atoi (w2);
printf ("set db_server_port : %s\n", w2);
}
else if (strcmpi (w1, "db_server_id") == 0)
{
strcpy (db_server_id, w2);
printf ("set db_server_id : %s\n", w2);
}
else if (strcmpi (w1, "db_server_pw") == 0)
{
strcpy (db_server_pw, w2);
printf ("set db_server_pw : %s\n", w2);
}
else if (strcmpi (w1, "db_server_logindb") == 0)
{
strcpy (db_server_logindb, w2);
printf ("set db_server_logindb : %s\n", w2);
}
}
fclose_ (fp);
printf ("success reading interserver configuration\n");
return 0;
}
int char_config_read (const char *cfgName)
{
printf ("start reading interserver configuration: %s\n", cfgName);
int i;
char line[1024], w1[1024], w2[1024];
FILE *fp;
fp = fopen_ (cfgName, "r");
if (fp == NULL)
{
printf ("file not found: %s\n", cfgName);
return 1;
}
while (fgets (line, 1020, fp))
{
if (line[0] == '/' && line[1] == '/')
continue;
i = sscanf (line, "%[^:]:%s", w1, w2);
if (i != 2)
continue;
if (strcmpi (w1, "char_txt") == 0)
{
printf ("set char_txt : %s\n", w2);
strcpy (char_txt, w2);
}
}
fclose_ (fp);
printf ("reading configure done.....\n");
return 0;
}
int do_init (int argc, char **argv)
{
char_config_read ((argc > 1) ? argv[1] : CHAR_CONF_NAME);
inter_config_read ((argc > 2) ? argv[2] : inter_cfgName);
mmo_char_init ();
printf ("all conversion success!\n");
exit (0);
return 0;
}