// Copyright (c) Hercules Dev Team, licensed under GNU GPL. // See the LICENSE file // Portions Copyright (c) Athena Dev Teams #include "../common/mmo.h" #include "../common/malloc.h" #include "../common/socket.h" #include "../common/strlib.h" #include "../common/showmsg.h" #include "../common/utils.h" #include "../common/sql.h" #include "char.h" #include "inter.h" #include <stdio.h> #include <stdlib.h> #include <string.h> struct s_pet *pet_pt; //--------------------------------------------------------- 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 esc_name[NAME_LENGTH*2+1];// escaped pet name Sql_EscapeStringLen(sql_handle, esc_name, p->name, strnlen(p->name, NAME_LENGTH)); p->hungry = cap_value(p->hungry, 0, 100); p->intimate = cap_value(p->intimate, 0, 1000); if( pet_id == -1 ) {// New pet. if( SQL_ERROR == Sql_Query(sql_handle, "INSERT INTO `%s` " "(`class`,`name`,`account_id`,`char_id`,`level`,`egg_id`,`equip`,`intimate`,`hungry`,`rename_flag`,`incuvate`) " "VALUES ('%d', '%s', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d', '%d')", pet_db, p->class_, esc_name, p->account_id, p->char_id, p->level, p->egg_id, p->equip, p->intimate, p->hungry, p->rename_flag, p->incuvate) ) { Sql_ShowDebug(sql_handle); return 0; } p->pet_id = (int)Sql_LastInsertId(sql_handle); } else {// Update pet. if( SQL_ERROR == Sql_Query(sql_handle, "UPDATE `%s` 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'", pet_db, p->class_, esc_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) ) { Sql_ShowDebug(sql_handle); return 0; } } if (save_log) ShowInfo("Pet saved %d - %s.\n", pet_id, p->name); return 1; } int inter_pet_fromsql(int pet_id, struct s_pet* p) { char* data; size_t len; #ifdef NOISY ShowInfo("Loading pet (%d)...\n",pet_id); #endif memset(p, 0, sizeof(struct s_pet)); //`pet` (`pet_id`, `class`,`name`,`account_id`,`char_id`,`level`,`egg_id`,`equip`,`intimate`,`hungry`,`rename_flag`,`incuvate`) if( SQL_ERROR == Sql_Query(sql_handle, "SELECT `pet_id`, `class`,`name`,`account_id`,`char_id`,`level`,`egg_id`,`equip`,`intimate`,`hungry`,`rename_flag`,`incuvate` FROM `%s` WHERE `pet_id`='%d'", pet_db, pet_id) ) { Sql_ShowDebug(sql_handle); return 0; } if( SQL_SUCCESS == Sql_NextRow(sql_handle) ) { p->pet_id = pet_id; Sql_GetData(sql_handle, 1, &data, NULL); p->class_ = atoi(data); Sql_GetData(sql_handle, 2, &data, &len); memcpy(p->name, data, min(len, NAME_LENGTH)); Sql_GetData(sql_handle, 3, &data, NULL); p->account_id = atoi(data); Sql_GetData(sql_handle, 4, &data, NULL); p->char_id = atoi(data); Sql_GetData(sql_handle, 5, &data, NULL); p->level = atoi(data); Sql_GetData(sql_handle, 6, &data, NULL); p->egg_id = atoi(data); Sql_GetData(sql_handle, 7, &data, NULL); p->equip = atoi(data); Sql_GetData(sql_handle, 8, &data, NULL); p->intimate = atoi(data); Sql_GetData(sql_handle, 9, &data, NULL); p->hungry = atoi(data); Sql_GetData(sql_handle, 10, &data, NULL); p->rename_flag = atoi(data); Sql_GetData(sql_handle, 11, &data, NULL); p->incuvate = atoi(data); Sql_FreeResult(sql_handle); p->hungry = cap_value(p->hungry, 0, 100); p->intimate = cap_value(p->intimate, 0, 1000); if( save_log ) ShowInfo("Pet loaded (%d - %s).\n", pet_id, p->name); } return 0; } //---------------------------------------------- int inter_pet_sql_init(void){ //memory alloc pet_pt = (struct s_pet*)aCalloc(sizeof(struct s_pet), 1); return 0; } void inter_pet_sql_final(void){ if (pet_pt) aFree(pet_pt); return; } //---------------------------------- int inter_pet_delete(int pet_id){ ShowInfo("delete pet request: %d...\n",pet_id); if( SQL_ERROR == Sql_Query(sql_handle, "DELETE FROM `%s` WHERE `pet_id`='%d'", pet_db, pet_id) ) Sql_ShowDebug(sql_handle); return 0; } //------------------------------------------------------ int mapif_pet_created(int fd, int account_id, struct s_pet *p) { WFIFOHEAD(fd, 11); WFIFOW(fd, 0) =0x3880; WFIFOL(fd, 2) =account_id; if(p!=NULL){ WFIFOB(fd, 6)=0; WFIFOL(fd, 7) =p->pet_id; ShowInfo("int_pet: created pet %d - %s\n", p->pet_id, p->name); }else{ WFIFOB(fd, 6)=1; WFIFOL(fd, 7)=0; } WFIFOSET(fd, 11); return 0; } int mapif_pet_info(int fd, int account_id, struct s_pet *p){ WFIFOHEAD(fd, sizeof(struct s_pet) + 9); WFIFOW(fd, 0) =0x3881; WFIFOW(fd, 2) =sizeof(struct s_pet) + 9; WFIFOL(fd, 4) =account_id; WFIFOB(fd, 8)=0; memcpy(WFIFOP(fd, 9), p, sizeof(struct s_pet)); WFIFOSET(fd, WFIFOW(fd, 2)); return 0; } int mapif_pet_noinfo(int fd, int account_id){ WFIFOHEAD(fd, sizeof(struct s_pet) + 9); WFIFOW(fd, 0) =0x3881; WFIFOW(fd, 2) =sizeof(struct s_pet) + 9; WFIFOL(fd, 4) =account_id; WFIFOB(fd, 8)=1; memset(WFIFOP(fd, 9), 0, sizeof(struct s_pet)); WFIFOSET(fd, WFIFOW(fd, 2)); return 0; } int mapif_save_pet_ack(int fd, int account_id, int flag){ WFIFOHEAD(fd, 7); WFIFOW(fd, 0) =0x3882; WFIFOL(fd, 2) =account_id; WFIFOB(fd, 6) =flag; WFIFOSET(fd, 7); return 0; } int mapif_delete_pet_ack(int fd, int flag){ WFIFOHEAD(fd, 3); WFIFOW(fd, 0) =0x3883; WFIFOB(fd, 2) =flag; WFIFOSET(fd, 3); return 0; } int mapif_create_pet(int fd, int account_id, int char_id, short pet_class, short pet_lv, short pet_egg_id, short pet_equip, short intimate, short hungry, char rename_flag, char incuvate, char *pet_name) { memset(pet_pt, 0, sizeof(struct s_pet)); safestrncpy(pet_pt->name, pet_name, NAME_LENGTH); if(incuvate == 1) pet_pt->account_id = pet_pt->char_id = 0; else { pet_pt->account_id = account_id; pet_pt->char_id = char_id; } pet_pt->class_ = pet_class; pet_pt->level = pet_lv; pet_pt->egg_id = pet_egg_id; pet_pt->equip = pet_equip; pet_pt->intimate = intimate; pet_pt->hungry = hungry; pet_pt->rename_flag = rename_flag; pet_pt->incuvate = incuvate; if(pet_pt->hungry < 0) pet_pt->hungry = 0; else if(pet_pt->hungry > 100) pet_pt->hungry = 100; if(pet_pt->intimate < 0) pet_pt->intimate = 0; else if(pet_pt->intimate > 1000) pet_pt->intimate = 1000; pet_pt->pet_id = -1; //Signal NEW pet. if (inter_pet_tosql(pet_pt->pet_id,pet_pt)) mapif_pet_created(fd, account_id, pet_pt); else //Failed... mapif_pet_created(fd, account_id, NULL); return 0; } int mapif_load_pet(int fd, int account_id, int char_id, int pet_id){ memset(pet_pt, 0, sizeof(struct s_pet)); inter_pet_fromsql(pet_id, pet_pt); if(pet_pt!=NULL) { if(pet_pt->incuvate == 1) { pet_pt->account_id = pet_pt->char_id = 0; mapif_pet_info(fd, account_id, pet_pt); } else if(account_id == pet_pt->account_id && char_id == pet_pt->char_id) mapif_pet_info(fd, account_id, pet_pt); else mapif_pet_noinfo(fd, account_id); } else mapif_pet_noinfo(fd, account_id); return 0; } int mapif_save_pet(int fd, int account_id, struct s_pet *data) { //here process pet save request. int len; RFIFOHEAD(fd); len=RFIFOW(fd, 2); if(sizeof(struct s_pet)!=len-8) { ShowError("inter pet: data size error %d %d\n", sizeof(struct s_pet), len-8); } else{ if(data->hungry < 0) data->hungry = 0; else if(data->hungry > 100) data->hungry = 100; if(data->intimate < 0) data->intimate = 0; else if(data->intimate > 1000) data->intimate = 1000; inter_pet_tosql(data->pet_id,data); mapif_save_pet_ack(fd, account_id, 0); } return 0; } int mapif_delete_pet(int fd, int pet_id){ mapif_delete_pet_ack(fd, inter_pet_delete(pet_id)); return 0; } int mapif_parse_CreatePet(int fd){ RFIFOHEAD(fd); mapif_create_pet(fd, RFIFOL(fd, 2), RFIFOL(fd, 6), RFIFOW(fd, 10), RFIFOW(fd, 12), RFIFOW(fd, 14), RFIFOW(fd, 16), RFIFOW(fd, 18), RFIFOW(fd, 20), RFIFOB(fd, 22), RFIFOB(fd, 23), (char*)RFIFOP(fd, 24)); return 0; } int mapif_parse_LoadPet(int fd){ RFIFOHEAD(fd); mapif_load_pet(fd, RFIFOL(fd, 2), RFIFOL(fd, 6), RFIFOL(fd, 10)); return 0; } int mapif_parse_SavePet(int fd){ RFIFOHEAD(fd); mapif_save_pet(fd, RFIFOL(fd, 4), (struct s_pet *) RFIFOP(fd, 8)); return 0; } int mapif_parse_DeletePet(int fd){ RFIFOHEAD(fd); mapif_delete_pet(fd, RFIFOL(fd, 2)); return 0; } int inter_pet_parse_frommap(int fd){ RFIFOHEAD(fd); switch(RFIFOW(fd, 0)){ case 0x3080: mapif_parse_CreatePet(fd); break; case 0x3081: mapif_parse_LoadPet(fd); break; case 0x3082: mapif_parse_SavePet(fd); break; case 0x3083: mapif_parse_DeletePet(fd); break; default: return 0; } return 1; }