AS OF SVN REV. 5901, WE ARE NOW USING TRUNK. ALL UNTESTED BUGFIXES/FEATURES GO INTO TRUNK.

IF YOU HAVE A WORKING AND TESTED BUGFIX PUT IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE
GOES INTO TRUNK AND WILL BE MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS


git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 865 insertions, 0 deletions

diff --git a/src/char_sql/int_party.c b/src/char_sql/int_party.c
new file mode 100644
index 000000000..0479df848
--- /dev/null
+++ b/src/char_sql/int_party.c
@@ -0,0 +1,865 @@
+// Copyright (c) Athena Dev Teams - Licensed under GNU GPL

+// For more information, see LICENCE in the main folder

+

+// original code from athena

+// SQL conversion by hack

+

+#include <stdio.h>

+#include <stdlib.h>

+#include <string.h>

+#include "char.h"

+#include "../common/db.h"

+#include "../common/strlib.h"

+#include "../common/socket.h"

+#include "../common/showmsg.h"

+

+static struct party *party_pt;

+static int party_newid = 100;

+static struct dbt *party_db_;

+

+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, int char_id);

+

+#ifndef SQL_DEBUG

+

+#define mysql_query(_x, _y) mysql_real_query(_x, _y, strlen(_y)) //supports ' in names and runs faster [Kevin]

+

+#else 

+

+#define mysql_query(_x, _y) debug_mysql_query(__FILE__, __LINE__, _x, _y)

+

+#endif

+

+//Party Flags on what to save/delete.

+//Create a new party entry (index holds leader's info) 

+#define PS_CREATE 0x01

+//Update basic party info.

+#define PS_BASIC 0x02

+//Update party's leader

+#define PS_LEADER 0x04

+//Specify new party member (index specifies which party member)

+#define PS_ADDMEMBER 0x08

+//Specify member that left (index specifies which party member)

+#define PS_DELMEMBER 0x10

+//Specify that this party must be deleted.

+#define PS_BREAK 0x20

+

+// Save party to mysql

+int inter_party_tosql(int party_id,struct party *p, int flag, int index)

+{

+	// 'party' ('party_id','name','exp','item','leader_id','leader_char')

+	char t_name[NAME_LENGTH*2]; //Required for jstrescapecpy [Skotlex]

+	int party_exist = 0;

+	if (p == NULL || party_id == 0 || p->party_id == 0 || party_id != p->party_id) {

+		ShowError("Party pointer or party_id error (id: %d)\n", party_id);

+		return 0;

+	}

+#ifdef NOISY

+	ShowInfo("Save party request ("CL_BOLD"%d"CL_RESET" - %s).\n", party_id, p->name);

+#endif

+	jstrescapecpy(t_name, p->name);

+

+	if (flag&PS_BREAK) { //Break the party

+		// we'll skip name-checking and just reset everyone with the same party id [celest]

+		sprintf (tmp_sql, "UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d'", char_db, party_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+		sprintf(tmp_sql, "DELETE FROM `%s` WHERE `party_id`='%d'", party_db, party_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+		//Remove from memory

+		idb_remove(party_db_, party_id);

+		return 1;

+	}

+

+	if(flag&PS_CREATE) {

+		//Create party, first check if ID exists.

+		sprintf(tmp_sql, "SELECT count(*) FROM `%s` WHERE `party_id`='%d'", party_db, party_id); // TBR

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+			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]);

+		}

+		mysql_free_result(sql_res);

+		if (party_exist) { //TODO: Can't we just use an index, and then retrieve the new party's index from SQL? [Skotlex]

+			ShowError("inter_party_tosql: Creating party with already existing ID %d!\n", party_id);

+			aFree(p); //Free party, couldn't create it.

+			return 0;

+		}

+		sprintf(tmp_sql, "INSERT INTO `%s`  (`party_id`, `name`, `exp`, `item`, `leader_id`, `leader_char`) VALUES ('%d', '%s', '%d', '%d', '%d', '%d')",

+			party_db, party_id, t_name, p->exp, p->item, p->member[index].account_id, p->member[index].char_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+			aFree(p); //Free party, couldn't create it.

+			return 0;

+		}

+		//Add party to db

+		idb_put(party_db_, party_id, p);

+	}

+

+	if (flag&PS_BASIC) {

+		//Update party info.

+		sprintf(tmp_sql, "UPDATE `%s` SET `name`='%s', `exp`='%d', `item`='%d' WHERE `party_id`='%d'",

+			party_db, t_name, p->exp, p->item, party_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+	}

+

+	if (flag&PS_LEADER) {

+		//Update leader

+		sprintf(tmp_sql, "UPDATE `%s`  SET `leader_id`='%d', `leader_char`='%d' WHERE `party_id`='%d'",

+			party_db, p->member[index].account_id, p->member[index].char_id, party_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+	}

+	

+	if (flag&PS_ADDMEMBER) {

+		//Add one party member.

+		sprintf (tmp_sql, "UPDATE `%s` SET `party_id`='%d' WHERE `account_id`='%d' AND `char_id`='%d'",

+			char_db, party_id, p->member[index].account_id, p->member[index].char_id);

+		if (mysql_query (&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+	}

+

+	if (flag&PS_DELMEMBER) {

+		//Remove one party member.

+		sprintf (tmp_sql, "UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d' AND `account_id`='%d' AND `char_id`='%d'",

+			char_db, party_id, p->member[index].account_id, p->member[index].char_id);

+		if (mysql_query (&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+	}

+

+	if (save_log)

+		ShowInfo("Party Saved (%d - %s)\n", party_id, p->name);

+	return 1;

+}

+

+// Read party from mysql

+struct party *inter_party_fromsql(int party_id)

+{

+	int leader_id = 0, leader_char = 0;

+	struct party *p;

+#ifdef NOISY

+	ShowInfo("Load party request ("CL_BOLD"%d"CL_RESET")\n", party_id);

+#endif

+	if (party_id <=0)

+		return NULL;

+	

+	//Load from memory

+	if ((p = idb_get(party_db_, party_id)) != NULL)

+		return p;

+	

+	p = party_pt;

+	memset(p, 0, sizeof(struct party));

+

+	sprintf(tmp_sql, "SELECT `party_id`, `name`,`exp`,`item`, `leader_id`, `leader_char` FROM `%s` WHERE `party_id`='%d'",

+		party_db, party_id); // TBR

+	if (mysql_query(&mysql_handle, tmp_sql)) {

+		ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+		ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		return NULL;

+	}

+

+	sql_res = mysql_store_result(&mysql_handle) ;

+	if (sql_res != NULL && mysql_num_rows(sql_res) > 0) {

+		sql_row = mysql_fetch_row(sql_res);

+		p->party_id = party_id;

+		memcpy(p->name, sql_row[1], NAME_LENGTH-1);

+		p->exp = atoi(sql_row[2])?1:0;

+		p->item = atoi(sql_row[3]);

+		leader_id = atoi(sql_row[4]);

+		leader_char = atoi(sql_row[5]);

+	} else {

+		mysql_free_result(sql_res);

+		return NULL;

+	}

+	mysql_free_result(sql_res);

+

+	// Load members

+	sprintf(tmp_sql,"SELECT `account_id`,`char_id`,`name`,`base_level`,`last_map`,`online` FROM `%s` WHERE `party_id`='%d'",

+		char_db, party_id); // TBR

+	if (mysql_query(&mysql_handle, tmp_sql)) {

+		ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+		ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		return NULL;

+	}

+	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]);

+			m->char_id = atoi(sql_row[1]);

+			m->leader = (m->account_id == leader_id && m->char_id == leader_char)?1:0;

+			memcpy(m->name, sql_row[2], NAME_LENGTH);

+			m->lv = atoi(sql_row[3]);

+			m->map = mapindex_name2id(sql_row[4]);

+			m->online = atoi(sql_row[5])?1:0;

+		}

+	}

+	mysql_free_result(sql_res);

+

+	if (save_log)

+		ShowInfo("Party loaded (%d - %s).\n",party_id, p->name);

+	//Add party to memory.

+	p = aCalloc(1, sizeof(struct party));

+	memcpy(p, party_pt, sizeof(struct party));

+	idb_put(party_db_, party_id, p);

+	return p;

+}

+

+int inter_party_sql_init(){

+	int i;

+

+	//memory alloc

+	party_db_ = db_alloc(__FILE__,__LINE__,DB_INT,DB_OPT_RELEASE_DATA,sizeof(int));

+	party_pt = (struct party*)aCalloc(sizeof(struct party), 1);

+	if (!party_pt) {

+		ShowFatalError("inter_party_sql_init: Out of Memory!\n");

+		exit(1);

+	}

+	sprintf (tmp_sql , "SELECT count(*) FROM `%s`", party_db);

+	if (mysql_query(&mysql_handle, tmp_sql)) {

+		ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+		ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+	}

+	sql_res = mysql_store_result(&mysql_handle) ;

+	sql_row = mysql_fetch_row(sql_res);

+	ShowStatus("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)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+

+		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);

+	}

+

+	ShowDebug("set party_newid: %d.......\n", party_newid);

+

+	/* Uncomment the following if you want to do a party_db cleanup (remove parties with no members) on startup.[Skotlex]

+	ShowStatus("cleaning party table...\n");

+	sprintf (tmp_sql,

+		"DELETE FROM `%s` USING `%s` LEFT JOIN `%s` ON `%s`.leader_id =`%s`.account_id AND `%s`.leader_char = `%s`.char_id WHERE `%s`.account_id IS NULL",

+		party_db, party_db, char_db, party_db, char_db, party_db, char_db, char_db);

+	if (mysql_query(&mysql_handle, tmp_sql)) {

+		ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+		ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+	}

+	*/

+	return 0;

+}

+

+void inter_party_sql_final()

+{

+	party_db_->destroy(party_db_, NULL);

+	aFree(party_pt);

+	return;

+}

+

+// Search for the party according to its name

+struct party* search_partyname(char *str)

+{

+	char t_name[NAME_LENGTH*2];

+	int party_id;

+

+	sprintf(tmp_sql,"SELECT `party_id` FROM `%s` WHERE `name`='%s'",party_db, jstrescapecpy(t_name,str));

+	if(mysql_query(&mysql_handle, tmp_sql) ) {

+		ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+		ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+	}

+	sql_res = mysql_store_result(&mysql_handle) ;

+	if (sql_res==NULL || mysql_num_rows(sql_res)<=0)

+	{

+		if (sql_res) mysql_free_result(sql_res);

+		return NULL;

+	}

+	sql_row = mysql_fetch_row(sql_res);

+	party_id = sql_row?atoi(sql_row[0]):0;

+	mysql_free_result(sql_res);

+

+	return inter_party_fromsql(party_id);

+}

+

+// EXP公平分配できるかチェック

+int party_check_exp_share(struct party *p)

+{

+	int i, oi[MAX_PARTY], dudes=0;

+	int maxlv=0,minlv=0x7fffffff;

+	

+	for(i=0;i<MAX_PARTY;i++){

+		int lv=p->member[i].lv;

+		if (!lv) continue;

+		if( p->member[i].online ){

+			if( lv < minlv ) minlv=lv;

+			if( maxlv < lv ) maxlv=lv;

+			if( lv >= 70 ) dudes+=1000;

+			oi[dudes%1000] = i;

+			dudes++;

+		}

+	}

+	if((dudes/1000 >= 2) && (dudes%1000 == 3) && maxlv-minlv>party_share_level)

+	{

+		int pl1=0,pl2=0,pl3=0;

+		pl1=char_nick2id(p->member[oi[0]].name);

+		pl2=char_nick2id(p->member[oi[1]].name);

+		pl3=char_nick2id(p->member[oi[2]].name);

+		ShowDebug("PARTY: group of 3 Id1 %d lv %d name %s Id2 %d lv %d name %s Id3 %d lv %d name %s\n",pl1,p->member[oi[0]].lv,p->member[oi[0]].name,pl2,p->member[oi[1]].lv,p->member[oi[1]].name,pl3,p->member[oi[2]].lv,p->member[oi[2]].name);

+		if (char_married(pl1,pl2) && char_child(pl1,pl3))

+			return 1;

+		if (char_married(pl1,pl3) && char_child(pl1,pl2))

+			return 1;

+		if (char_married(pl2,pl3) && char_child(pl2,pl1))

+			return 1;

+	}

+	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;

+	for(i=0;i<MAX_PARTY;i++){

+		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, PS_BREAK, 0);

+	return 1;

+}

+

+

+// Check if a member is in two party, not necessary :)

+int party_check_conflict(int party_id,int account_id,int char_id)

+{

+	return 0;

+}

+

+//-------------------------------------------------------------------

+// map serverへの通信

+

+// パーティ作成可否

+int mapif_party_created(int fd,int account_id,int char_id,struct party *p)

+{

+	WFIFOW(fd,0)=0x3820;

+	WFIFOL(fd,2)=account_id;

+	WFIFOL(fd,6)=char_id;

+	if(p!=NULL){

+		WFIFOB(fd,10)=0;

+		WFIFOL(fd,11)=p->party_id;

+		memcpy(WFIFOP(fd,15),p->name,NAME_LENGTH);

+		ShowInfo("int_party: Party created (%d - %s)\n",p->party_id,p->name);

+	}else{

+		WFIFOB(fd,10)=1;

+		WFIFOL(fd,11)=0;

+		memset(WFIFOP(fd,15),0,NAME_LENGTH);

+	}

+	WFIFOSET(fd,39);

+

+	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);

+	ShowWarning("int_party: info not found %d\n",party_id);

+	return 0;

+}

+// パーティ情報まとめ送り

+int mapif_party_info(int fd,struct party *p)

+{

+	unsigned char buf[10+sizeof(struct party)];

+	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));

+	return 0;

+}

+// パーティメンバ追加可否

+int mapif_party_memberadded(int fd, int party_id, int account_id, int char_id, int flag) {

+	WFIFOHEAD(fd, 15);

+	WFIFOW(fd,0) = 0x3822;

+	WFIFOL(fd,2) = party_id;

+	WFIFOL(fd,6) = account_id;

+	WFIFOL(fd,10) = char_id;

+	WFIFOB(fd,14) = flag;

+	WFIFOSET(fd,15);

+

+	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);

+	return 0;

+}

+

+//Checks whether the even-share setting of a party is broken when a character logs in. [Skotlex]

+int inter_party_logged(int party_id, int account_id, int char_id)

+{

+	struct party *p;

+	int i;

+

+	if (party_id <= 0)

+		return 0;

+

+	if (!party_id)

+		return 0;

+	p = inter_party_fromsql(party_id);

+	if(!p) //Non existant party?

+		return 0;

+	

+	for(i = 0; i < MAX_PARTY; i++)

+		if (p->member[i].account_id==account_id && p->member[i].char_id==char_id) {

+			p->member[i].online = 1;

+			break;

+		}

+	

+	if(p->exp && !party_check_exp_share(p))

+	{

+		p->exp=0;

+		mapif_party_optionchanged(0,p,0,0);

+		return 1;

+	}

+	return 0;

+}

+

+// パーティ脱退通知

+int mapif_party_leaved(int party_id,int account_id, int char_id) {

+	unsigned char buf[16];

+

+	WBUFW(buf,0) = 0x3824;

+	WBUFL(buf,2) = party_id;

+	WBUFL(buf,6) = account_id;

+	WBUFL(buf,10) = char_id;

+	mapif_sendall(buf, 14);

+	return 0;

+}

+

+// パーティマップ更新通知

+int mapif_party_membermoved(struct party *p,int idx)

+{

+	unsigned char buf[20];

+

+	WBUFW(buf,0) = 0x3825;

+	WBUFL(buf,2) = p->party_id;

+	WBUFL(buf,6) = p->member[idx].account_id;

+	WBUFL(buf,10) = p->member[idx].char_id;

+	WBUFW(buf,14) = p->member[idx].map;

+	WBUFB(buf,16) = p->member[idx].online;

+	WBUFW(buf,17) = p->member[idx].lv;

+	mapif_sendall(buf, 19);

+	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, int sfd)

+{

+	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_sendallwos(sfd, buf,len+12);

+	return 0;

+}

+

+//-------------------------------------------------------------------

+// map serverからの通信

+

+

+// Create Party

+int mapif_parse_CreateParty(int fd, int account_id, int char_id, char *name, char *nick, unsigned short map, int lv, int item, int item2)

+{

+	struct party *p;

+	if( (p=search_partyname(name))!=NULL){

+		mapif_party_created(fd,account_id,char_id,NULL);

+		return 0;

+	}

+	p= aCalloc(1, sizeof(struct party));

+	

+	p->party_id=party_newid++;

+	memcpy(p->name,name,NAME_LENGTH);

+	p->exp=0;

+	p->item=(item?1:0)|(item2?2:0);

+	p->itemc = 0;

+

+	p->member[0].account_id=account_id;

+	p->member[0].char_id =char_id;

+	memcpy(p->member[0].name,nick,NAME_LENGTH-1);

+	p->member[0].map = map;

+	p->member[0].leader=1;

+	p->member[0].online=1;

+	p->member[0].lv=lv;

+

+	if (inter_party_tosql(p->party_id,p,PS_CREATE|PS_ADDMEMBER,0)) {

+		mapif_party_created(fd,account_id,char_id,p);

+		mapif_party_info(fd,p);

+	} else //Failed to create party.

+		mapif_party_created(fd,account_id,char_id,NULL);

+

+	return 0;

+}

+// パーティ情報要求

+int mapif_parse_PartyInfo(int fd,int party_id)

+{

+	struct party *p;

+	p = inter_party_fromsql(party_id);

+

+	if (p)

+		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, int char_id, char *nick, unsigned short map, int lv) {

+	struct party *p;

+	int i;

+

+	p = inter_party_fromsql(party_id);

+

+	if(!p){

+		mapif_party_memberadded(fd,party_id,account_id,char_id,1);

+		return 0;

+	}

+

+	for(i=0;i<MAX_PARTY;i++){

+		if(p->member[i].account_id==0){

+			int flag=0;

+

+			p->member[i].account_id=account_id;

+			p->member[i].char_id=char_id;

+			memcpy(p->member[i].name,nick,NAME_LENGTH);

+			p->member[i].map = map;

+			p->member[i].leader=0;

+			p->member[i].online=1;

+			p->member[i].lv=lv;

+			mapif_party_memberadded(fd,party_id,account_id,char_id,0);

+			mapif_party_info(-1,p);

+

+			if( p->exp && !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, PS_ADDMEMBER, i);

+			return 0;

+		}

+	}

+	mapif_party_memberadded(fd,party_id,account_id,char_id,1);

+	return 0;

+}

+// パーティー設定変更要求

+int mapif_parse_PartyChangeOption(int fd,int party_id,int account_id,int exp,int flag)

+{

+	struct party *p;

+	//NOTE: No clue what that flag is about, in all observations so far it always comes as 0. [Skotlex]

+	flag = 0;

+	p = inter_party_fromsql(party_id);

+

+	if(!p)

+		return 0;

+

+	p->exp=exp;

+	if( exp && !party_check_exp_share(p) ){

+		flag|=0x01;

+		p->exp=0;

+	}

+	mapif_party_optionchanged(fd,p,account_id,flag);

+	inter_party_tosql(party_id, p, PS_BASIC, 0);

+	return 0;

+}

+// パーティ脱退要求

+int mapif_parse_PartyLeave(int fd, int party_id, int account_id, int char_id)

+{

+	struct party *p;

+	int i;

+

+	p = inter_party_fromsql(party_id);

+	if (!p) { //Party does not exists?

+		sprintf(tmp_sql, "UPDATE `%s` SET `party_id`='0' WHERE `party_id`='%d'", char_db, party_id);

+		if (mysql_query(&mysql_handle, tmp_sql)) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+		}

+		return 0;

+	}

+

+	for (i = 0; i < MAX_PARTY; i++) {

+		if (p->member[i].account_id == account_id && p->member[i].char_id == char_id)

+			break;

+	}

+	if (i>= MAX_PARTY)

+		return 0; //Member not found?

+

+	mapif_party_leaved(party_id, account_id, char_id);

+

+	if (p->member[i].leader){

+		int j;

+		for (j = 0; j < MAX_PARTY; j++) {

+			if (p->member[j].account_id > 0 && j != i) {

+				mapif_party_leaved(party_id, p->member[j].account_id, p->member[j].char_id);

+				p->member[j].account_id = 0;

+			}

+			p->member[i].account_id = 0;

+		}

+		//Party gets deleted on the check_empty call below.

+	} else {

+		inter_party_tosql(party_id,p,PS_DELMEMBER,i);

+		memset(&p->member[i], 0, sizeof(struct party_member));

+	}

+		

+	if (party_check_empty(p) == 0)

+		mapif_party_info(-1,p);

+	return 0;

+}

+// When member goes to other map

+int mapif_parse_PartyChangeMap(int fd, int party_id, int account_id, int char_id, unsigned short map, int online, int lv)

+{

+	struct party *p;

+	int i;

+

+	p = inter_party_fromsql(party_id);

+	if (p == NULL)

+		return 0;

+

+	for(i = 0; i < MAX_PARTY; i++) {

+		if (p->member[i].account_id == account_id && p->member[i].char_id == char_id)

+		{

+			p->member[i].map = map;

+			p->member[i].online = online;

+			if (p->member[i].lv != lv) {

+				p->member[i].lv = lv;

+			  	if (p->exp && !party_check_exp_share(p)) {

+					p->exp = 0;

+					mapif_party_optionchanged(fd, p, 0, 0);

+				}

+			}

+			mapif_party_membermoved(p, i);

+			break;

+		}

+	}

+	return 0;

+}

+// パーティ解散要求

+int mapif_parse_BreakParty(int fd,int party_id)

+{

+	struct party *p;

+

+	p = inter_party_fromsql(party_id);

+

+	if(!p)

+		return 0;

+	inter_party_tosql(party_id,p,PS_BREAK,0);

+	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, fd);

+}

+// パーティチェック要求

+int mapif_parse_PartyCheck(int fd,int party_id,int account_id,int char_id)

+{

+	return party_check_conflict(party_id,account_id,char_id);

+}

+

+int mapif_parse_PartyLeaderChange(int fd,int party_id,int account_id,int char_id)

+{

+	struct party *p;

+	int i;

+

+	p = inter_party_fromsql(party_id);

+

+	if(!p)

+		return 0;

+

+	for (i = 0; i < MAX_PARTY; i++)

+	{

+		if(p->member[i].leader) 

+			p->member[i].leader = 0;

+		if(p->member[i].account_id == account_id && p->member[i].char_id == char_id) {

+			p->member[i].leader = 1;

+			inter_party_tosql(party_id,p,PS_LEADER, i);

+		}

+	}

+	return 1;

+}

+

+// map server からの通信

+// ・１パケットのみ解析すること

+// ・パケット長データはinter.cにセットしておくこと

+// ・パケット長チェックや、RFIFOSKIPは呼び出し元で行われるので行ってはならない

+// ・エラーなら0(false)、そうでないなら1(true)をかえさなければならない

+int inter_party_parse_frommap(int fd)

+{

+	RFIFOHEAD(fd);

+	switch(RFIFOW(fd,0)) {

+	case 0x3020: mapif_parse_CreateParty(fd, RFIFOL(fd,2), RFIFOL(fd,6),(char*)RFIFOP(fd,10), (char*)RFIFOP(fd,34), RFIFOW(fd,58), RFIFOW(fd,60), RFIFOB(fd,62), RFIFOB(fd,63)); break;

+	case 0x3021: mapif_parse_PartyInfo(fd, RFIFOL(fd,2)); break;

+	case 0x3022: mapif_parse_PartyAddMember(fd, RFIFOL(fd,2), RFIFOL(fd,6), RFIFOL(fd,10), (char*)RFIFOP(fd,14), RFIFOW(fd,38), RFIFOW(fd,40)); 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), RFIFOL(fd,10)); break;

+	case 0x3025: mapif_parse_PartyChangeMap(fd, RFIFOL(fd,2), RFIFOL(fd,6), RFIFOL(fd,10), RFIFOW(fd,14), RFIFOB(fd,16), RFIFOW(fd,17)); break;

+	case 0x3026: mapif_parse_BreakParty(fd, RFIFOL(fd,2)); break;

+	case 0x3027: mapif_parse_PartyMessage(fd, RFIFOL(fd,4), RFIFOL(fd,8), (char*)RFIFOP(fd,12), RFIFOW(fd,2)-12); break;

+	case 0x3028: mapif_parse_PartyCheck(fd, RFIFOL(fd,2), RFIFOL(fd,6), RFIFOL(fd,10)); break;

+	case 0x3029: mapif_parse_PartyLeaderChange(fd, RFIFOL(fd,2), RFIFOL(fd,6), RFIFOL(fd,10)); break;

+	default:

+		return 0;

+	}

+	return 1;

+}

+

+// サーバーから脱退要求（キャラ削除用）

+int inter_party_leave(int party_id,int account_id, int char_id)

+{

+	return mapif_parse_PartyLeave(-1,party_id,account_id, char_id);

+}

+

+int inter_party_CharOnline(int char_id, int party_id) {

+   struct party *p;

+   int i;

+   

+	if (party_id == -1) {

+		//Get guild_id from the database

+		sprintf (tmp_sql , "SELECT party_id FROM `%s` WHERE char_id='%d'",char_db,char_id);

+		if(mysql_query(&mysql_handle, tmp_sql) ) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+			return 0;

+		}

+

+		sql_res = mysql_store_result(&mysql_handle) ;

+		if(sql_res == NULL)

+			return 0; //Eh? No party?

+		

+		sql_row = mysql_fetch_row(sql_res);

+		party_id = sql_row?atoi(sql_row[0]):0;

+		mysql_free_result(sql_res);

+	}

+	if (party_id == 0)

+		return 0; //No party...

+	

+	p = inter_party_fromsql(party_id);

+	if(!p) {

+		ShowError("Character %d's party %d not found!\n", char_id, party_id);

+		return 0;

+	}

+

+	//Set member online

+	for(i=0; i<MAX_PARTY; i++) {

+		if (p->member[i].char_id == char_id) {

+			p->member[i].online = 1;

+			break;

+		}

+	}

+	return 1;

+}

+

+int inter_party_CharOffline(int char_id, int party_id) {

+	struct party *p=NULL;

+	int online_count=0, i;

+

+	if (party_id == -1) {

+		//Get guild_id from the database

+		sprintf (tmp_sql , "SELECT party_id FROM `%s` WHERE char_id='%d'",char_db,char_id);

+		if(mysql_query(&mysql_handle, tmp_sql) ) {

+			ShowSQL("DB error - %s\n",mysql_error(&mysql_handle));

+			ShowDebug("at %s:%d - %s\n", __FILE__,__LINE__,tmp_sql);

+			return 0;

+		}

+

+		sql_res = mysql_store_result(&mysql_handle) ;

+		if(sql_res == NULL)

+			return 0; //Eh? No party?

+		

+		sql_row = mysql_fetch_row(sql_res);

+		party_id = sql_row?atoi(sql_row[0]):0;

+		mysql_free_result(sql_res);

+	}

+	if (party_id == 0)

+		return 0; //No party...

+	

+	//Character has a party, set character offline and check if they were the only member online

+	if ((p = inter_party_fromsql(party_id)) == NULL)

+		return 0;

+

+	//Set member offline

+	for(i=0; i< MAX_PARTY; i++) {

+		if(p->member[i].char_id == char_id)

+			p->member[i].online = 0;

+		if(p->member[i].online)

+			online_count++;

+	}

+

+	if(online_count == 0)

+		//Parties don't have any data that needs be saved at this point... so just remove it from memory.

+		idb_remove(party_db_, party_id);

+	return 1;

+}