/******************************************************************
Return a string displaying the AI's love (or not) for you...
*******************************************************************/
static const char *col_love(const struct player *player)
{
if (NULL == client.conn.playing || player == client.conn.playing
|| !player->ai_controlled) {
return "-";
} else {
return love_text(player->ai_common.love[player_index(client.conn.playing)]);
}
}
/******************************************************************
Compares ai's attitude toward the player
******************************************************************/
static int cmp_love(const struct player *player1,
const struct player *player2)
{
int love1, love2;
if (NULL == client.conn.playing) {
return player_number(player1) - player_number(player2);
}
if (player1 == client.conn.playing || !player1->ai_controlled) {
love1 = MAX_AI_LOVE + 999;
} else {
love1 = player1->ai_common.love[player_index(client.conn.playing)];
}
if (player2 == client.conn.playing || !player2->ai_controlled) {
love2 = MAX_AI_LOVE + 999;
} else {
love2 = player2->ai_common.love[player_index(client.conn.playing)];
}
return love1 - love2;
}
/**********************************************************************
Not sure which module to put this in...
It used to be that each nation had a color, when there was
fixed number of nations. Now base on player number instead,
since still limited to less than 14. Could possibly improve
to allow players to choose their preferred color etc.
A hack added to avoid returning more that COLOR_STD_RACE13.
But really there should be more colors available -- jk.
***********************************************************************/
struct color *get_player_color(const struct tileset *t,
const struct player *pplayer)
{
if (pplayer) {
struct color_system *colors = get_color_system(t);
int index = player_index(pplayer);
fc_assert_ret_val(index >= 0 && colors->num_player_colors > 0, NULL);
index %= colors->num_player_colors;
return ensure_color(&colors->player_colors[index]);
} else {
/* Always fails. */
fc_assert(NULL != pplayer);
return NULL;
}
}
/***************************************************************
Returns true iff p1 can cancel treaty on p2.
The senate may not allow you to break the treaty. In this
case you must first dissolve the senate then you can break
it. This is waived if you have statue of liberty since you
could easily just dissolve and then recreate it.
***************************************************************/
enum dipl_reason pplayer_can_cancel_treaty(const struct player *p1,
const struct player *p2)
{
enum diplstate_type ds = pplayer_get_diplstate(p1, p2)->type;
if (p1 == p2 || ds == DS_WAR) {
return DIPL_ERROR;
}
if (players_on_same_team(p1, p2)) {
return DIPL_ERROR;
}
if (p1->diplstates[player_index(p2)].has_reason_to_cancel == 0
&& get_player_bonus(p1, EFT_HAS_SENATE) > 0
&& get_player_bonus(p1, EFT_ANY_GOVERNMENT) == 0) {
return DIPL_SENATE_BLOCKING;
}
return DIPL_OK;
}
/**************************************************************************
Log player messages, they will appear like this
where ti is timer, co countdown and lo love for target, who is e.
**************************************************************************/
void DIPLO_LOG(int level, const struct player *pplayer,
const struct player *aplayer, const char *msg, ...)
{
char buffer[500];
char buffer2[500];
va_list ap;
int minlevel = MIN(LOGLEVEL_PLAYER, level);
const struct ai_dip_intel *adip;
if (BV_ISSET(pplayer->debug, PLAYER_DEBUG_DIPLOMACY)) {
minlevel = LOG_TEST;
} else if (minlevel > fc_log_level) {
return;
}
/* Don't use ai_data_get since it can have side effects. */
adip = ai_diplomacy_get(pplayer, aplayer);
my_snprintf(buffer, sizeof(buffer), "%s->%s(l%d,c%d,d%d%s): ",
player_name(pplayer),
player_name(aplayer),
pplayer->ai_data.love[player_index(aplayer)],
adip->countdown,
adip->distance,
adip->is_allied_with_enemy ? "?" :
(adip->at_war_with_ally ? "!" : ""));
va_start(ap, msg);
my_vsnprintf(buffer2, sizeof(buffer2), msg, ap);
va_end(ap);
cat_snprintf(buffer, sizeof(buffer), "%s", buffer2);
if (BV_ISSET(pplayer->debug, PLAYER_DEBUG_DIPLOMACY)) {
notify_conn(NULL, NULL, E_AI_DEBUG, ftc_log, "%s", buffer);
}
freelog(minlevel, "%s", buffer);
}
