* Fix homunc & code cleanup [Toms]

  - Timer problems on delete_timer
  - Intimacy problem (overflow & new values)
  - Homunc deleted if intimacy < 0
  - base exp is now given to master
  - Homunc sometimes not saved

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

7 files changed, 114 insertions, 75 deletions

diff --git a/Changelog-Trunk.txt b/Changelog-Trunk.txt
index c95b68eef..94dec9802 100644
--- a/Changelog-Trunk.txt
+++ b/Changelog-Trunk.txt
@@ -3,6 +3,13 @@ Date	Added
 AS OF SVN REV. 5091, 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.

 

+2006/07/27

+	* Fix homunc & code cleanup [Toms] 

+	  - Timer problems on delete_timer

+	  - Intimacy problem (overflow & new values)

+	  - Homunc deleted if intimacy < 0

+	  - base exp is now given to master

+	  - Homunc sometimes not saved

 2006/07/26

 	* Fixed a memory leak when reading the item_db txt. [Skotlex]

 	* Applied the necessary changes to make @partyoption reflect it's changes

diff --git a/src/char_sql/char.c b/src/char_sql/char.c
index dac4b9541..059e1aace 100644
--- a/src/char_sql/char.c
+++ b/src/char_sql/char.c
@@ -482,7 +482,7 @@ int mmo_char_tosql(int char_id, struct mmo_charstatus *p){
 		(p->int_ != cp->int_) || (p->dex != cp->dex) || (p->luk != cp->luk) ||

 		(p->option != cp->option) ||

 		(p->party_id != cp->party_id) || (p->guild_id != cp->guild_id) ||

-		(p->pet_id != cp->pet_id) || (p->weapon != cp->weapon) ||

+		(p->pet_id != cp->pet_id) || (p->weapon != cp->weapon) || (p->hom_id != cp->hom_id) ||

 		(p->shield != cp->shield) || (p->head_top != cp->head_top) ||

 		(p->head_mid != cp->head_mid) || (p->head_bottom != cp->head_bottom)

 	)

diff --git a/src/common/mmo.h b/src/common/mmo.h
index 72f7499c5..bf33a6d09 100644
--- a/src/common/mmo.h
+++ b/src/common/mmo.h
@@ -174,7 +174,7 @@ struct s_homunculus {	//[orn]
 	int char_id;

 	short class_;

 	int hp,max_hp,sp,max_sp;

-	int intimacy;	//[orn]

+	unsigned long intimacy;	//[orn]

 	short hunger;

 	struct skill hskill[MAX_HOMUNSKILL]; //albator

 	short skillpts;

diff --git a/src/map/mercenary.c b/src/map/mercenary.c
index b04d304ea..a8eecafff 100644
--- a/src/map/mercenary.c
+++ b/src/map/mercenary.c
@@ -104,6 +104,7 @@ void merc_load_exptables(void)
 

 }

 

+

 void merc_damage(struct homun_data *hd,struct block_list *src,int hp,int sp)

 {

 	nullpo_retv(hd);

@@ -119,9 +120,9 @@ void merc_damage(struct homun_data *hd,struct block_list *src,int hp,int sp)
 

 int merc_hom_dead(struct homun_data *hd, struct block_list *src)

 {

-	hd->master->homunculus.intimacy -= 100 ;

 	hd->master->homunculus.hp = 0 ;

-	if(hd->master->homunculus.intimacy <= 0) {

+	clif_hominfo(hd->master, 0); // Send dead flag

+	if(!merc_hom_decrease_intimacy(hd, 100)) { // Intimacy was < 100

 		merc_stop_walking(hd, 1);

 		merc_stop_attack(hd);

 		clif_emotion(&hd->master->bl, 23) ;	//omg

@@ -138,7 +139,6 @@ int merc_hom_dead(struct homun_data *hd, struct block_list *src)
 int merc_hom_delete(struct homun_data *hd, int flag)

 {

 	nullpo_retr(0, hd);

-

 	// Delete homunculus

 	if ( flag&1 ) {	//sabbath

 		intif_homunculus_requestdelete(hd->master->homunculus.hom_id) ;

@@ -358,6 +358,35 @@ int merc_hom_gainexp(struct homun_data *hd,int exp)
 	return 0;

 }

 

+// Return then new value

+int merc_hom_increase_intimacy(struct homun_data * hd, unsigned int value)

+{

+	if (hd->master->homunculus.intimacy + value <= 100000)

+	{

+		hd->master->homunculus.intimacy += value;

+	}

+	else

+	{

+		hd->master->homunculus.intimacy = 100000;

+	}

+	return hd->master->homunculus.intimacy;

+}

+

+// Return 0 if decrease fails or intimacy became 0 else the new value

+int merc_hom_decrease_intimacy(struct homun_data * hd, unsigned int value)

+{

+	if (hd->master->homunculus.intimacy >= value)

+	{

+		hd->master->homunculus.intimacy -= value;

+	}

+	else

+	{

+		hd->master->homunculus.intimacy = 0;

+	}

+

+	return hd->master->homunculus.intimacy;

+}

+

 int merc_hom_heal(struct homun_data *hd,int hp,int sp)

 {

 	nullpo_retr(0, hd);

@@ -469,6 +498,8 @@ int merc_natural_heal(int tid,unsigned int tick,int id,int data)
 

 	nullpo_retr(0, sd);

 	

+	sd->hd->natural_heal_timer = -1;

+

 	if(sd->homunculus.vaporize)

 		return 1;

 

@@ -573,7 +604,7 @@ int merc_menu(struct map_session_data *sd,int menunum)
 

 int merc_hom_food(struct map_session_data *sd, struct homun_data *hd)

 {

-	int i, k, intimacy, emotion;

+	int i, k, emotion;

 

 	if(hd->master->homunculus.vaporize)

 		return 1 ;

@@ -587,28 +618,22 @@ int merc_hom_food(struct map_session_data *sd, struct homun_data *hd)
 	pc_delitem(sd,i,1,0);

 

 	if ( hd->master->homunculus.hunger >= 91 ) {

-		intimacy = -50;

+		merc_hom_decrease_intimacy(hd, 50);

 		emotion = 16;

 	} else if ( hd->master->homunculus.hunger >= 76 ) {

-		intimacy = -30;

+		merc_hom_decrease_intimacy(hd, 5);

 		emotion = 19;

 	} else if ( hd->master->homunculus.hunger >= 26 ) {

-		intimacy = 80;

+		merc_hom_increase_intimacy(hd, 75);

 		emotion = 2;

 	} else if ( hd->master->homunculus.hunger >= 11 ) {

-		intimacy = 100;

+		merc_hom_increase_intimacy(hd, 100);

 		emotion = 2;

 	} else {

-		intimacy = 50;

+		merc_hom_increase_intimacy(hd, 25);

 		emotion = 2;

 	}

-	hd->master->homunculus.intimacy += intimacy;

-	if(hd->master->homunculus.intimacy < 0)

-		hd->master->homunculus.intimacy = 0;

-	if(hd->master->homunculus.intimacy > 100000)

-		hd->master->homunculus.intimacy = 100000;

 

-	//emotion = 5 ; // FIXME: why the code above and now always set emotion to Thanks? 

 	hd->master->homunculus.hunger += 10;	//dunno increase value for each food

 	if(hd->master->homunculus.hunger > 100)

 		hd->master->homunculus.hunger = 100;

@@ -617,14 +642,17 @@ int merc_hom_food(struct map_session_data *sd, struct homun_data *hd)
 	clif_send_homdata(sd,SP_HUNGRY,sd->homunculus.hunger);

 	clif_send_homdata(sd,SP_INTIMATE,sd->homunculus.intimacy / 100);

 	clif_hom_food(sd,hd->homunculusDB->foodID,1);

-

-	if(hd->master->homunculus.intimacy == 0) {

+       	

+	// Too much food :/

+	if(hd->master->homunculus.intimacy == 0) {  

 		merc_stop_walking(hd, 1);

 		merc_stop_attack(hd);

-		clif_emotion(&hd->master->bl, 23) ;	//omg

-		merc_hom_delete(hd,1) ;

-	}

-

+		// Send homunculus_dead to client

+		sd->homunculus.hp = 0;

+		clif_hominfo(sd, 0);

+		merc_hom_delete(hd,1);

+		clif_emotion(&hd->master->bl, 23);     //omg  

+  	}  

 	return 0;

 }

 

@@ -646,37 +674,38 @@ static int merc_hom_hungry(int tid,unsigned int tick,int id,int data)
 			ShowError("merc_hom_hungry_timer %d != %d\n",hd->hungry_timer,tid);

 		return 0 ;

 	}

+

+	hd->hungry_timer = -1;

+	

 	hd->master->homunculus.hunger-- ;

-	if(hd->master->homunculus.hunger >= 0 && hd->master->homunculus.hunger <= 10) {

+	if(hd->master->homunculus.hunger <= 10) {

 		clif_emotion(&hd->bl, 6) ;	//an

-	}

-	if(hd->master->homunculus.hunger == 25) {

+	} else if(hd->master->homunculus.hunger == 25) {

 		clif_emotion(&hd->bl, 20) ;	//hmm

-	}

-	if(hd->master->homunculus.hunger == 75) {

+	} else if(hd->master->homunculus.hunger == 75) {

 		clif_emotion(&hd->bl, 33) ;	//ok

 	}  

+	

 	if(hd->master->homunculus.hunger < 0) {

 		hd->master->homunculus.hunger = 0;

-		hd->master->homunculus.intimacy -= 100;

-		if(hd->master->homunculus.intimacy < 0)

-			hd->master->homunculus.intimacy = 0;

-		clif_send_homdata(sd,SP_INTIMATE,sd->homunculus.intimacy / 100);

-		if(hd->master->homunculus.intimacy == 0) {

+		// Delete the homunculus if intimacy <= 100

+		if ( !merc_hom_decrease_intimacy(hd, 100) ) {

 			merc_stop_walking(hd, 1);

 			merc_stop_attack(hd);

+			// Send homunculus_dead to client

+			sd->homunculus.hp = 0;

+			clif_hominfo(sd, 0);

+			merc_hom_delete(hd,1);

 			clif_emotion(&hd->master->bl, 23) ;	//omg

-			merc_hom_delete(hd,1) ;

+			return 0 ;

+		} else {

+			clif_send_homdata(sd,SP_INTIMATE,sd->homunculus.intimacy / 100);

 		}

-		return 0 ;

-	} else {

-		clif_send_homdata(sd,SP_HUNGRY,sd->homunculus.hunger);

-	

-		hd->hungry_timer = add_timer(tick+hd->homunculusDB->hungryDelay,merc_hom_hungry,sd->bl.id,0); //simple Fix albator

-		return 1 ;

 	}

 

-

+	clif_send_homdata(sd,SP_HUNGRY,sd->homunculus.hunger);

+	hd->hungry_timer = add_timer(tick+hd->homunculusDB->hungryDelay,merc_hom_hungry,sd->bl.id,0); //simple Fix albator

+	return 0;

 }

 

 int merc_hom_hungry_timer_delete(struct homun_data *hd)

diff --git a/src/map/mercenary.h b/src/map/mercenary.h
index b55cba8e1..965557759 100644
--- a/src/map/mercenary.h
+++ b/src/map/mercenary.h
@@ -76,3 +76,5 @@ int merc_natural_heal_timer_delete(struct homun_data *hd);
 #define merc_stop_walking(hd, type) { if((hd)->ud.walktimer != -1) unit_stop_walking(&(hd)->bl, type); }

 #define merc_stop_attack(hd) { if((hd)->ud.attacktimer != -1) unit_stop_attack(&(hd)->bl); hd->ud.target = 0; }

 int read_homunculusdb(void);

+int merc_hom_increase_intimacy(struct homun_data * hd, unsigned int value);

+int merc_hom_decrease_intimacy(struct homun_data * hd, unsigned int value);

diff --git a/src/map/mob.c b/src/map/mob.c
index 039a53fb1..961e79c49 100644
--- a/src/map/mob.c
+++ b/src/map/mob.c
@@ -1893,8 +1893,11 @@ int mob_dead(struct mob_data *md, struct block_list *src, int type)
 						pc_getzeny((struct map_session_data *)tmpbl[i], zeny);
 					break ;
 				case BL_HOMUNCULUS:
-					if(base_exp)
+					if(base_exp) {
 						merc_hom_gainexp((struct homun_data *)tmpbl[i], base_exp);
+						//homunculus give base_exp to master
+						pc_gainexp(((struct homun_data *)tmpbl[i])->master, &md->bl, base_exp,0);
+					}
 					if(zeny)	//homunculus give zeny to master
 						pc_getzeny((struct map_session_data *)((struct homun_data *)tmpbl[i])->master, zeny);
 					break ;
diff --git a/src/map/skill.c b/src/map/skill.c
index 1ccb4be2b..e36b39cad 100644
--- a/src/map/skill.c
+++ b/src/map/skill.c
@@ -5546,56 +5546,54 @@ int skill_castend_nodamage_id (struct block_list *src, struct block_list *bl, in
 	case AM_CALLHOMUN:	//[orn]
 	{
 		int i = 0;
-		if (sd && (sd->status.hom_id == 0 || sd->homunculus.vaporize == 1)) {
-			if (sd->status.hom_id == 0) {
-				i = pc_search_inventory(sd,7142);
-				if(i < 0) {
-					clif_skill_fail(sd,skillid,0,0);
-					break ;
+		if (sd)
+		{
+			if ((sd->status.hom_id == 0 || sd->homunculus.vaporize == 1)) {
+				if (sd->status.hom_id == 0) {
+					i = pc_search_inventory(sd,7142);
+					if(i < 0) {
+						clif_skill_fail(sd,skillid,0,0);
+						break ;
+					}
+					pc_delitem(sd,i,1,0);
 				}
-				pc_delitem(sd,i,1,0);
+				if (merc_call_homunculus(sd))
+					break;
 			}
-			if (merc_call_homunculus(sd))
-				break;
+			clif_skill_fail(sd,skillid,0,0);
 		}
-		
-		clif_skill_fail(sd,skillid,0,0);
 		break;
 	}
 	case AM_REST:	//[orn]
 	{
-		if (sd && sd->hd && ( sd->hd->battle_status.hp >= (sd->hd->battle_status.max_hp * 80 / 100 ) ) ) {
-			sd->homunculus.vaporize = 1;
-			clif_hominfo(sd, 0);
-			merc_hom_delete(sd->hd, 0) ;
-		} else if ( sd ) 
+		if (sd)
 		{
+			if (sd->hd && ( sd->hd->battle_status.hp >= (sd->hd->battle_status.max_hp * 80 / 100 ) ) ) {
+				sd->homunculus.vaporize = 1;
+				clif_hominfo(sd, 0);
+				merc_hom_delete(sd->hd, 0) ;
+			}
 			clif_skill_fail(sd,skillid,0,0);
 		}
-		
 		break;
 	}
 	case AM_RESURRECTHOMUN:	//[orn]
 	{
-		if ( sd && sd->status.hom_id ) {
-			if( map_flag_gvg(bl->m) )
-			{	//No reviving in WoE grounds!
-				clif_skill_fail(sd,skillid,0,0);
-				break;
-			}
-			if ( sd->homunculus.hp == 0 ) {
-				int per = 10 * skilllv;
-	
-				if (merc_hom_revive(sd, per) )
-				{
-					clif_skill_nodamage(src,&sd->hd->bl,AM_RESURRECTHOMUN,skilllv,1);
-				} else {
+		if (sd)
+		{
+			if (sd->status.hom_id && sd->homunculus.hp == 0)
+			{
+				if( map_flag_gvg(bl->m) )
+				{	//No reviving in WoE grounds!
 					clif_skill_fail(sd,skillid,0,0);
+					break;
 				}
-			} else {	
+				if (merc_hom_revive(sd, 10 * skilllv) )
+					clif_skill_nodamage(src,&sd->hd->bl,AM_RESURRECTHOMUN,skilllv,1);
+				else
+					clif_skill_fail(sd,skillid,0,0);
+			} else
 				clif_skill_fail(sd,skillid,0,0);
-			}
-
 		}
 		break;
 	}