// // original code from athena // SQL conversion by hack // #include "char.h" #include "strlib.h" #include "socket.h" #include #include #include static struct party *party_pt; static int party_newid=100; int mapif_party_broken(int party_id,int flag); int party_check_empty(struct party *p); int mapif_parse_PartyLeave(int fd,int party_id,int account_id); #ifdef FASTCHAR #define mysql_query(_x, _y) debug_mysql_query(__FILE__, __LINE__, _x, _y) #endif /* FASTCHAR */ // Save party to mysql int inter_party_tosql(int party_id,struct party *p) { // 'party' ('party_id','name','exp','item','leader') char t_name[100]; char t_member[24]; int party_member = 0, party_online_member = 0; int party_exist = 0; int leader_id = 0; int i = 0; printf("(\033[1;64m%d\033[0m) Request save party - ",party_id); jstrescapecpy(t_name, p->name); if (p==NULL || party_id==0 || p->party_id ==0 || party_id!=p->party_id) { printf("- Party pointer or party_id error \n"); return 0; } // Check if party exists sprintf(tmp_sql,"SELECT count(*) FROM `%s` WHERE `party_id`='%d'",party_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error - %s\n", mysql_error(&mysql_handle) ); return 0; } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res!=NULL && mysql_num_rows(sql_res)>0) { sql_row = mysql_fetch_row(sql_res); party_exist = atoi (sql_row[0]); //printf("- Check if party %d exists : %s\n",party_id,party_exist==0?"No":"Yes"); } mysql_free_result(sql_res) ; //resource free if (party_exist >0){ // Check members in party sprintf(tmp_sql,"SELECT count(*) FROM `%s` WHERE `party_id`='%d'",char_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error - %s\n", mysql_error(&mysql_handle) ); return 0; } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res!=NULL && mysql_num_rows(sql_res)>0) { sql_row = mysql_fetch_row(sql_res); party_member = atoi (sql_row[0]); // printf("- Check members in party %d : %d \n",party_id,party_member); } mysql_free_result(sql_res) ; //resource free party_online_member = 0; i=0; while (imember[i].account_id>0) party_online_member++; i++; } //if (party_online_member==0) printf("- No member online \n"); else printf("- Some member %d online \n", party_online_member); if (party_member <= 0 && party_online_member == 0) { // Delete the party, if has no member. sprintf(tmp_sql,"DELETE FROM `%s` WHERE `party_id`='%d'",party_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error - %s\n", mysql_error(&mysql_handle) ); } // printf("No member in party %d, break it \n",party_id); memset(p, 0, sizeof(struct party)); return 0; } else { // Update party information, if exists int i=0; for (i=0;imember[i].account_id>0){ sprintf(tmp_sql,"UPDATE `%s` SET `party_id`='%d' WHERE `account_id`='%d' AND `name`='%s'", char_db, party_id, p->member[i].account_id,jstrescapecpy(t_member,p->member[i].name)); //printf("%s",tmp_sql); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (update `char`)- %s\n", mysql_error(&mysql_handle) ); } } } sprintf(tmp_sql,"UPDATE `%s` SET `name`='%s', `exp`='%d', `item`='%d', `leader_id`=`leader_id` WHERE `party_id`='%d'", party_db, t_name,p->exp,p->item,party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (inset/update `party`)- %s\n", mysql_error(&mysql_handle) ); } // printf("- Update party %d information \n",party_id); } } else { // Add new party, if not exist int i = 0; while (imember[i].account_id>0&&p->member[i].leader==0)||(p->member[i].account_id<0))) i++; if (imember[i].account_id; sprintf(tmp_sql,"INSERT DELAYED INTO `%s` (`party_id`, `name`, `exp`, `item`, `leader_id`) VALUES ('%d', '%s', '%d', '%d', '%d')", party_db, party_id, t_name, p->exp, p->item,leader_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (inset/update `party`)- %s\n", mysql_error(&mysql_handle) ); return 0; } sprintf(tmp_sql,"UPDATE `%s` SET `party_id`='%d' WHERE `account_id`='%d' AND `name`='%s'", char_db, party_id,leader_id, jstrescapecpy(t_member,p->member[i].name)); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (inset/update `party`)- %s\n", mysql_error(&mysql_handle) ); } //printf("- Insert new party %d \n",party_id); } printf("Party save success\n"); return 0; } // Read party from mysql int inter_party_fromsql(int party_id,struct party *p) { int leader_id=0; printf("(\033[1;64m%d\033[0m) Request load party - ",party_id); memset(p, 0, sizeof(struct party)); sprintf(tmp_sql,"SELECT `party_id`, `name`,`exp`,`item`, `leader_id` FROM `%s` WHERE `party_id`='%d'",party_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (select `party`)- %s\n", mysql_error(&mysql_handle) ); return 0; } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res!=NULL && mysql_num_rows(sql_res)>0) { sql_row = mysql_fetch_row(sql_res); // printf("- Read party %d from MySQL\n",party_id); p->party_id = party_id; strcpy(p->name, sql_row[1]); p->exp = atoi(sql_row[2]); p->item = atoi(sql_row[3]); leader_id = atoi(sql_row[4]); } else { mysql_free_result(sql_res); // printf("- Cannot find party %d \n",party_id); return 0; } mysql_free_result(sql_res); // Load members sprintf(tmp_sql,"SELECT `account_id`, `name`,`base_level`,`last_map`,`online` FROM `%s` WHERE `party_id`='%d'",char_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (select `party`)- %s\n", mysql_error(&mysql_handle) ); return 0; } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res!=NULL && mysql_num_rows(sql_res)>0) { int i; for(i=0;(sql_row = mysql_fetch_row(sql_res));i++){ struct party_member *m = &p->member[i]; m->account_id = atoi(sql_row[0]); if (m->account_id == leader_id) m->leader = 1; else m->leader = 0; strncpy(m->name,sql_row[1],sizeof(m->name)); m->lv = atoi(sql_row[2]); strncpy(m->map,sql_row[3],sizeof(m->map)); m->online = atoi(sql_row[4]); } // printf("- %d members found in party %d \n",i,party_id); } mysql_free_result(sql_res); printf("Party load success\n"); return 0; } int inter_party_sql_init(){ int i; //memory alloc printf("interserver party memory initialize.... (%d byte)\n",sizeof(struct party)); party_pt = calloc(sizeof(struct party), 1); sprintf (tmp_sql , "SELECT count(*) FROM `%s`",party_db); 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); printf("total party data -> '%s'.......\n",sql_row[0]); i = atoi (sql_row[0]); mysql_free_result(sql_res); if (i > 0) { //set party_newid sprintf (tmp_sql , "SELECT max(`party_id`) FROM `%s`", party_db); 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); party_newid = atoi (sql_row[0])+1; mysql_free_result(sql_res); } printf("set party_newid: %d.......\n",party_newid); return 0; } // Search for the party according to its name struct party* search_partyname(char *str) { struct party *p=NULL; int leader_id = 0; char t_name[24]; sprintf(tmp_sql,"SELECT `party_id`, `name`,`exp`,`item`,`leader_id` FROM `%s` WHERE `name`='%s'",party_db, jstrescapecpy(t_name,str)); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (select `party`)- %s\n", mysql_error(&mysql_handle) ); } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res==NULL || mysql_num_rows(sql_res)<=0) { mysql_free_result(sql_res); return p; } sql_row = mysql_fetch_row(sql_res); p = party_pt; p->party_id = atoi(sql_row[0]); strcpy(p->name, sql_row[1]); p->exp = atoi(sql_row[2]); p->item = atoi(sql_row[3]); leader_id = atoi(sql_row[4]); mysql_free_result(sql_res); // Load members sprintf(tmp_sql,"SELECT `account_id`, `name`,`base_level`,`last_map`,`online` FROM `%s` WHERE `party_id`='%d'",char_db, p->party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (select `party`)- %s\n", mysql_error(&mysql_handle) ); return 0; } sql_res = mysql_store_result(&mysql_handle) ; if (sql_res!=NULL && mysql_num_rows(sql_res)>0) { int i; for(i=0;(sql_row = mysql_fetch_row(sql_res));i++){ struct party_member *m = &p->member[i]; m->account_id = atoi(sql_row[0]); if (m->account_id == leader_id) m->leader = 1; else m->leader = 0; strncpy(m->name,sql_row[1],sizeof(m->name)); m->lv = atoi(sql_row[2]); strncpy(m->map,sql_row[3],sizeof(m->map)); m->online = atoi(sql_row[4]); } printf("- %d members found in party %d \n",i,p->party_id); } mysql_free_result(sql_res); return p; } // EXP公平分配できるかチェック int party_check_exp_share(struct party *p) { int i; int maxlv=0,minlv=0x7fffffff; for(i=0;imember[i].lv; if( p->member[i].online ){ if( lv < minlv ) minlv=lv; if( maxlv < lv ) maxlv=lv; } } return (maxlv==0 || maxlv-minlv<=party_share_level); } // Is there any member in the party? int party_check_empty(struct party *p) { int i; if (p==NULL||p->party_id==0) return 1; // printf("party check empty %08X\n",(int)p); for(i=0;imember[i].account_id); if(p->member[i].account_id>0){ return 0; } } // If there is no member, then break the party mapif_party_broken(p->party_id,0); inter_party_tosql(p->party_id,p); return 1; } // Check if a member is in two party, not necessary :) int party_check_conflict(int party_id,int account_id,char *nick) { return 0; } //------------------------------------------------------------------- // map serverへの通信 // パーティ作成可否 int mapif_party_created(int fd,int account_id,struct party *p) { WFIFOW(fd,0)=0x3820; WFIFOL(fd,2)=account_id; if(p!=NULL){ WFIFOB(fd,6)=0; WFIFOL(fd,7)=p->party_id; memcpy(WFIFOP(fd,11),p->name,24); printf("int_party: created! %d %s\n",p->party_id,p->name); }else{ WFIFOB(fd,6)=1; WFIFOL(fd,7)=0; memcpy(WFIFOP(fd,11),"error",24); } WFIFOSET(fd,35); return 0; } // パーティ情報見つからず int mapif_party_noinfo(int fd,int party_id) { WFIFOW(fd,0)=0x3821; WFIFOW(fd,2)=8; WFIFOL(fd,4)=party_id; WFIFOSET(fd,8); printf("int_party: info not found %d\n",party_id); return 0; } // パーティ情報まとめ送り int mapif_party_info(int fd,struct party *p) { unsigned char buf[1024]; WBUFW(buf,0)=0x3821; memcpy(buf+4,p,sizeof(struct party)); WBUFW(buf,2)=4+sizeof(struct party); if(fd<0) mapif_sendall(buf,WBUFW(buf,2)); else mapif_send(fd,buf,WBUFW(buf,2)); // printf("int_party: info %d %s\n",p->party_id,p->name); return 0; } // パーティメンバ追加可否 int mapif_party_memberadded(int fd,int party_id,int account_id,int flag) { WFIFOW(fd,0)=0x3822; WFIFOL(fd,2)=party_id; WFIFOL(fd,6)=account_id; WFIFOB(fd,10)=flag; WFIFOSET(fd,11); return 0; } // パーティ設定変更通知 int mapif_party_optionchanged(int fd,struct party *p,int account_id,int flag) { unsigned char buf[16]; WBUFW(buf,0)=0x3823; WBUFL(buf,2)=p->party_id; WBUFL(buf,6)=account_id; WBUFW(buf,10)=p->exp; WBUFW(buf,12)=p->item; WBUFB(buf,14)=flag; if(flag==0) mapif_sendall(buf,15); else mapif_send(fd,buf,15); //printf("int_party: option changed %d %d %d %d %d\n",p->party_id,account_id,p->exp,p->item,flag); return 0; } // パーティ脱退通知 int mapif_party_leaved(int party_id,int account_id,char *name) { unsigned char buf[64]; WBUFW(buf,0)=0x3824; WBUFL(buf,2)=party_id; WBUFL(buf,6)=account_id; memcpy(WBUFP(buf,10),name,24); mapif_sendall(buf,34); //printf("int_party: party leaved %d %d %s\n",party_id,account_id,name); return 0; } // パーティマップ更新通知 int mapif_party_membermoved(struct party *p,int idx) { unsigned char buf[32]; WBUFW(buf,0)=0x3825; WBUFL(buf,2)=p->party_id; WBUFL(buf,6)=p->member[idx].account_id; memcpy(WBUFP(buf,10),p->member[idx].map,16); WBUFB(buf,26)=p->member[idx].online; WBUFW(buf,27)=p->member[idx].lv; mapif_sendall(buf,29); return 0; } // パーティ解散通知 int mapif_party_broken(int party_id,int flag) { unsigned char buf[16]; WBUFW(buf,0)=0x3826; WBUFL(buf,2)=party_id; WBUFB(buf,6)=flag; mapif_sendall(buf,7); //printf("int_party: broken %d\n",party_id); return 0; } // パーティ内発言 int mapif_party_message(int party_id,int account_id,char *mes,int len) { unsigned char buf[512]; WBUFW(buf,0)=0x3827; WBUFW(buf,2)=len+12; WBUFL(buf,4)=party_id; WBUFL(buf,8)=account_id; memcpy(WBUFP(buf,12),mes,len); mapif_sendall(buf,len+12); return 0; } //------------------------------------------------------------------- // map serverからの通信 // Create Party int mapif_parse_CreateParty(int fd,int account_id,char *name,char *nick,char *map,int lv) { struct party *p; if( (p=search_partyname(name))!=NULL){ // printf("int_party: same name party exists [%s]\n",name); mapif_party_created(fd,account_id,NULL); return 0; } p=party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); mapif_party_created(fd,account_id,NULL); return 0; } memset(p,0,sizeof(struct party)); p->party_id=party_newid++; memcpy(p->name,name,24); p->exp=0; p->item=0; p->member[0].account_id=account_id; memcpy(p->member[0].name,nick,24); memcpy(p->member[0].map,map,16); p->member[0].leader=1; p->member[0].online=1; p->member[0].lv=lv; inter_party_tosql(p->party_id,p); mapif_party_created(fd,account_id,p); mapif_party_info(fd,p); return 0; } // パーティ情報要求 int mapif_parse_PartyInfo(int fd,int party_id) { struct party *p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id >= 0) mapif_party_info(fd,p); else mapif_party_noinfo(fd,party_id); return 0; } // パーティ追加要求 int mapif_parse_PartyAddMember(int fd,int party_id,int account_id,char *nick,char *map,int lv) { struct party *p; int i; p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id <= 0){ mapif_party_memberadded(fd,party_id,account_id,1); return 0; } for(i=0;imember[i].account_id==0){ int flag=0; p->member[i].account_id=account_id; memcpy(p->member[i].name,nick,24); memcpy(p->member[i].map,map,16); p->member[i].leader=0; p->member[i].online=1; p->member[i].lv=lv; mapif_party_memberadded(fd,party_id,account_id,0); mapif_party_info(-1,p); if( p->exp>0 && !party_check_exp_share(p) ){ p->exp=0; flag=0x01; } if(flag) mapif_party_optionchanged(fd,p,0,0); inter_party_tosql(party_id, p); return 0; } } mapif_party_memberadded(fd,party_id,account_id,1); //inter_party_tosql(party_id, p); return 0; } // パーティー設定変更要求 int mapif_parse_PartyChangeOption(int fd,int party_id,int account_id,int exp,int item) { struct party *p; int flag=0; p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id <= 0){ return 0; } p->exp=exp; if( exp>0 && !party_check_exp_share(p) ){ flag|=0x01; p->exp=0; } p->item=item; mapif_party_optionchanged(fd,p,account_id,flag); inter_party_tosql(party_id, p); return 0; } // パーティ脱退要求 int mapif_parse_PartyLeave(int fd,int party_id,int account_id) { char t_member[24]; struct party *p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id >= 0){ int i,j; for(i=0;imember[i].account_id==account_id){ //printf("p->member[i].account_id = %d , account_id = %d \n",p->member[i].account_id,account_id); mapif_party_leaved(party_id,account_id,p->member[i].name); // Update char information, does the name need encoding? sprintf(tmp_sql,"UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d' AND `name`='%s'", char_db, party_id, jstrescapecpy(t_member,p->member[i].name)); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (update `char`)- %s\n", mysql_error(&mysql_handle) ); } // printf("Delete member %s from MySQL \n", p->member[i].name); if (p->member[i].leader==1){ for(j=0;jmember[j].account_id = %d , p->member[j].account_id = %d \n",j,p->member[j].account_id,p->member[j].account_id); if(p->member[j].account_id>0&&j!=i){ mapif_party_leaved(party_id,p->member[j].account_id,p->member[j].name); // Update char information, does the name need encoding? sprintf(tmp_sql,"UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d' AND `name`='%s'", char_db, party_id, jstrescapecpy(t_member,p->member[i].name)); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (update `char`)- %s\n", mysql_error(&mysql_handle) ); } // printf("Delete member %s from MySQL \n", p->member[j].name); } } // Delete the party, if has no member. sprintf(tmp_sql,"DELETE FROM `%s` WHERE `party_id`='%d'",party_db, party_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error - %s\n", mysql_error(&mysql_handle) ); } // printf("Leader breaks party %d \n",party_id); memset(p, 0, sizeof(struct party)); }else memset(&p->member[i],0,sizeof(struct party_member)); break; } } if( party_check_empty(p)==0 ) mapif_party_info(-1,p);// まだ人がいるのでデータ送信 /* else inter_party_tosql(party_id,p); // Break the party if no member */ }else{ sprintf(tmp_sql,"UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d' AND `account_id`='%d' AND `online`='1'", char_db, party_id, account_id); if(mysql_query(&mysql_handle, tmp_sql) ) { printf("DB server Error (update `char`)- %s\n", mysql_error(&mysql_handle) ); } } return 0; } // When member goes to other map int mapif_parse_PartyChangeMap(int fd,int party_id,int account_id,char *map,int online,int lv) { struct party *p; int i; p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id <= 0){ return 0; } for(i=0;imember[i].account_id==account_id){ int flag=0; memcpy(p->member[i].map,map,16); p->member[i].online=online; p->member[i].lv=lv; mapif_party_membermoved(p,i); if( p->exp>0 && !party_check_exp_share(p) ){ p->exp=0; flag=1; } if(flag) mapif_party_optionchanged(fd,p,0,0); break; } } inter_party_tosql(party_id, p); return 0; } // パーティ解散要求 int mapif_parse_BreakParty(int fd,int party_id) { struct party *p; p = party_pt; if(p==NULL){ printf("int_party: out of memory !\n"); return 0; } inter_party_fromsql(party_id, p); if(p->party_id <= 0){ return 0; } inter_party_tosql(party_id,p); mapif_party_broken(fd,party_id); return 0; } // パーティメッセージ送信 int mapif_parse_PartyMessage(int fd,int party_id,int account_id,char *mes,int len) { return mapif_party_message(party_id,account_id,mes,len); } // パーティチェック要求 int mapif_parse_PartyCheck(int fd,int party_id,int account_id,char *nick) { return party_check_conflict(party_id,account_id,nick); } // map server からの通信 // ・1パケットのみ解析すること // ・パケット長データはinter.cにセットしておくこと // ・パケット長チェックや、RFIFOSKIPは呼び出し元で行われるので行ってはならない // ・エラーなら0(false)、そうでないなら1(true)をかえさなければならない int inter_party_parse_frommap(int fd) { switch(RFIFOW(fd,0)){ case 0x3020: mapif_parse_CreateParty(fd,RFIFOL(fd,2),RFIFOP(fd,6),RFIFOP(fd,30),RFIFOP(fd,54),RFIFOW(fd,70)); break; case 0x3021: mapif_parse_PartyInfo(fd,RFIFOL(fd,2)); break; case 0x3022: mapif_parse_PartyAddMember(fd,RFIFOL(fd,2),RFIFOL(fd,6),RFIFOP(fd,10),RFIFOP(fd,34),RFIFOW(fd,50)); break; case 0x3023: mapif_parse_PartyChangeOption(fd,RFIFOL(fd,2),RFIFOL(fd,6),RFIFOW(fd,10),RFIFOW(fd,12)); break; case 0x3024: mapif_parse_PartyLeave(fd,RFIFOL(fd,2),RFIFOL(fd,6)); break; case 0x3025: mapif_parse_PartyChangeMap(fd,RFIFOL(fd,2),RFIFOL(fd,6),RFIFOP(fd,10),RFIFOB(fd,26),RFIFOW(fd,27)); break; case 0x3026: mapif_parse_BreakParty(fd,RFIFOL(fd,2)); break; case 0x3027: mapif_parse_PartyMessage(fd,RFIFOL(fd,4),RFIFOL(fd,8),RFIFOP(fd,12),RFIFOW(fd,2)-12); break; case 0x3028: mapif_parse_PartyCheck(fd,RFIFOL(fd,2),RFIFOL(fd,6),RFIFOP(fd,10)); break; default: return 0; } return 1; } // サーバーから脱退要求(キャラ削除用) int inter_party_leave(int party_id,int account_id) { return mapif_parse_PartyLeave(-1,party_id,account_id); }