/**************************************************************************
Check whether the assignment of a guard is still sane, and fix and problems.
It was once sane, but might have been destroyed or become an enemy since.
**************************************************************************/
void aiguard_update_charge(struct unit *guard)
{
struct unit_ai *guard_data = def_ai_unit_data(guard);
const struct unit *charge_unit = game_unit_by_number(guard_data->charge);
const struct city *charge_city = game_city_by_number(guard_data->charge);
const struct player *guard_owner = unit_owner(guard);
const struct player *charge_owner = NULL;
fc_assert_ret(BODYGUARD_NONE <= guard_data->charge);
/* IDs always distinct */
fc_assert_ret(charge_unit == NULL || charge_city == NULL);
if (charge_unit) {
charge_owner = unit_owner(charge_unit);
} else if (charge_city) {
charge_owner = city_owner(charge_city);
}
if (!charge_unit && !charge_city && 0 < guard_data->charge) {
guard_data->charge = BODYGUARD_NONE;
BODYGUARD_LOG(LOGLEVEL_BODYGUARD, guard, "charge was destroyed");
}
if (charge_owner && charge_owner != guard_owner) {
BODYGUARD_LOG(LOGLEVEL_BODYGUARD, guard, "charge transferred, dismiss");
aiguard_clear_charge(guard);
}
CHECK_GUARD(guard);
}
/**************************************************************************
Do sanity checks on a guard, reporting error messages to the log
if necessary.
Inconsistent references do not always indicate an error, because units
can change owners (for example, because of civil war) outside the control
the the AI code.
**************************************************************************/
void aiguard_check_guard(const struct unit *guard)
{
struct unit_ai *guard_data = def_ai_unit_data(guard);
const struct unit *charge_unit = game_unit_by_number(guard_data->charge);
const struct city *charge_city = game_city_by_number(guard_data->charge);
const struct player *guard_owner = unit_owner(guard);
const struct player *charge_owner = NULL;
struct unit_ai *charge_data = NULL;
fc_assert_ret(BODYGUARD_NONE <= guard_data->charge);
/* IDs always distinct */
fc_assert_ret(charge_unit == NULL || charge_city == NULL);
if (charge_unit) {
charge_owner = unit_owner(charge_unit);
charge_data = def_ai_unit_data(charge_unit);
} else if (charge_city) {
charge_owner = city_owner(charge_city);
}
if (charge_unit && charge_data->bodyguard != guard->id) {
BODYGUARD_LOG(LOG_DEBUG, guard, "inconsistent guard references");
} else if (!charge_unit && !charge_city && 0 < guard_data->charge) {
BODYGUARD_LOG(LOG_DEBUG, guard, "dangling guard reference");
}
if (charge_owner && pplayers_at_war(charge_owner, guard_owner)) {
/* Probably due to civil war */
BODYGUARD_LOG(LOG_DEBUG, guard, "enemy charge");
} else if (charge_owner && charge_owner != guard_owner) {
/* Probably sold a city with its supported units. */
BODYGUARD_LOG(LOG_DEBUG, guard, "foreign charge");
}
}
/****************************************************************
...
*****************************************************************/
static void spy_steal_popup(Widget w, XtPointer client_data,
XtPointer call_data)
{
struct city *pvcity = game_city_by_number(diplomat_target_id);
struct player *pvictim = NULL;
if(pvcity)
pvictim = city_owner(pvcity);
/* it is concievable that pvcity will not be found, because something
has happened to the city during latency. Therefore we must initialize
pvictim to NULL and account for !pvictim in create_advances_list. -- Syela */
destroy_message_dialog(w);
diplomat_dialog = NULL;
if(!spy_tech_shell){
Position x, y;
Dimension width, height;
spy_tech_shell_is_modal=1;
create_advances_list(client.conn.playing, pvictim, spy_tech_shell_is_modal);
XtVaGetValues(toplevel, XtNwidth, &width, XtNheight, &height, NULL);
XtTranslateCoords(toplevel, (Position) width/10, (Position) height/10,
&x, &y);
XtVaSetValues(spy_tech_shell, XtNx, x, XtNy, y, NULL);
XtPopup(spy_tech_shell, XtGrabNone);
}
}
/****************************************************************
User selected poisoning from choice dialog
*****************************************************************/
static void spy_poison_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(SPY_POISON, diplomat_id, diplomat_target_id, 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
User selected investigating from choice dialog
*****************************************************************/
static void diplomat_investigate_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_city_by_number(diplomat_target_id[ATK_CITY])
&& NULL != game_unit_by_number(diplomat_id)) {
request_diplomat_action(DIPLOMAT_INVESTIGATE, diplomat_id,
diplomat_target_id[ATK_CITY], 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
User selected stealing from choice dialog
*****************************************************************/
static void diplomat_steal_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_STEAL, diplomat_id,
diplomat_target_id, A_UNSET);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
... Ask the server how much the revolt is going to cost us
*****************************************************************/
static void diplomat_incite_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_answer(DIPLOMAT_INCITE, diplomat_id,
diplomat_target_id, 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
User selected embassy establishing from choice dialog
*****************************************************************/
static void diplomat_embassy_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_EMBASSY, diplomat_id,
diplomat_target_id, 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
Requests up-to-date list of improvements, the return of
which will trigger the popup_sabotage_dialog() function.
*****************************************************************/
static void spy_request_sabotage_list(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_answer(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
User selected sabotaging from choice dialog
*****************************************************************/
static void diplomat_sabotage_callback(GtkWidget *w, gpointer data)
{
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, B_LAST + 1);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
...
*****************************************************************/
static int diplomat_incite_yes_callback(struct widget *pWidget)
{
if (Main.event.button.button == SDL_BUTTON_LEFT) {
if (NULL != game_unit_by_number(pIncite_Dlg->diplomat_id)
&& NULL != game_city_by_number(pIncite_Dlg->diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_INCITE, pIncite_Dlg->diplomat_id,
pIncite_Dlg->diplomat_target_id, 0);
}
popdown_incite_dialog();
}
return -1;
}
/****************************************************************
User has responded to spy's sabotage building dialog
*****************************************************************/
static void spy_improvements_response(GtkWidget *w, gint response, gpointer data)
{
if (response == GTK_RESPONSE_ACCEPT && sabotage_improvement > -2) {
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, sabotage_improvement + 1);
}
}
gtk_widget_destroy(spy_sabotage_shell);
spy_sabotage_shell = NULL;
}
/****************************************************************
User responded to steal advances dialog
*****************************************************************/
static void spy_advances_response(GtkWidget *w, gint response, gpointer data)
{
if (response == GTK_RESPONSE_ACCEPT && steal_advance > 0) {
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_STEAL, diplomat_id,
diplomat_target_id, steal_advance);
}
}
gtk_widget_destroy(spy_tech_shell);
spy_tech_shell = NULL;
}
/**************************************************************************
Requests up-to-date list of improvements, the return of
which will trigger the popup_sabotage_dialog() function.
**************************************************************************/
static void spy_request_sabotage_list(Widget w, XtPointer client_data,
XtPointer call_data)
{
destroy_message_dialog(w);
diplomat_dialog = NULL;
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_answer(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, 0);
}
}
/****************************************************************
Requests up-to-date list of improvements, the return of
which will trigger the popup_sabotage_dialog() function.
*****************************************************************/
static int spy_sabotage_request(struct widget *pWidget)
{
if (NULL != game_unit_by_number(pDiplomat_Dlg->diplomat_id)
&& NULL != game_city_by_number(pDiplomat_Dlg->diplomat_target_id)) {
request_diplomat_answer(DIPLOMAT_SABOTAGE, pDiplomat_Dlg->diplomat_id,
pDiplomat_Dlg->diplomat_target_id, 0);
}
popdown_diplomat_dialog();
return -1;
}
/**************************************************************************
Asks the server how much the revolt is going to cost us
**************************************************************************/
static void diplomat_incite_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
destroy_message_dialog(w);
diplomat_dialog = NULL;
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_answer(DIPLOMAT_INCITE, diplomat_id,
diplomat_target_id, 0);
}
}
/****************************************************************
...
*****************************************************************/
static void spy_poison_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
destroy_message_dialog(w);
diplomat_dialog = NULL;
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(SPY_POISON, diplomat_id, diplomat_target_id, 0);
}
process_diplomat_arrival(NULL, 0);
}
/****************************************************************
Callback from diplomat/spy dialog for "keep moving".
(This should only occur when entering allied city.)
*****************************************************************/
static void diplomat_keep_moving_callback(GtkWidget *w, gpointer data)
{
struct unit *punit;
struct city *pcity;
if ((punit = game_unit_by_number(diplomat_id))
&& (pcity = game_city_by_number(diplomat_target_id))
&& !same_pos(unit_tile(punit), city_tile(pcity))) {
request_diplomat_action(DIPLOMAT_MOVE, diplomat_id,
diplomat_target_id, 0);
}
gtk_widget_destroy(diplomat_dialog);
}
/****************************************************************
...
*****************************************************************/
static int spy_poison_callback( struct widget *pWidget )
{
if (Main.event.button.button == SDL_BUTTON_LEFT) {
if (NULL != game_unit_by_number(pDiplomat_Dlg->diplomat_id)
&& NULL != game_city_by_number(pDiplomat_Dlg->diplomat_target_id)) {
request_diplomat_action(SPY_POISON, pDiplomat_Dlg->diplomat_id,
pDiplomat_Dlg->diplomat_target_id, 0);
}
popdown_diplomat_dialog();
}
return -1;
}
/****************************************************************
...
*****************************************************************/
static int diplomat_steal_callback(struct widget *pWidget)
{
if (Main.event.button.button == SDL_BUTTON_LEFT) {
if (NULL != game_unit_by_number(pDiplomat_Dlg->diplomat_id)
&& NULL != game_city_by_number(pDiplomat_Dlg->diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_STEAL, pDiplomat_Dlg->diplomat_id,
pDiplomat_Dlg->diplomat_target_id, A_UNSET);
}
popdown_diplomat_dialog();
}
return -1;
}
/****************************************************************
...
*****************************************************************/
static void diplomat_steal_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
destroy_message_dialog(w);
diplomat_dialog = NULL;
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_STEAL, diplomat_id,
diplomat_target_id, A_UNSET);
}
process_diplomat_arrival(NULL, 0);
}
/****************************************************************
Callback from diplomat/spy dialog for "keep moving".
(This should only occur when entering allied city.)
*****************************************************************/
static int diplomat_keep_moving_callback(struct widget *pWidget)
{
if (Main.event.button.button == SDL_BUTTON_LEFT) {
struct unit *punit;
struct city *pcity;
if ((punit = game_unit_by_number(pDiplomat_Dlg->diplomat_id))
&& (pcity = game_city_by_number(pDiplomat_Dlg->diplomat_target_id))
&& !same_pos(unit_tile(punit), city_tile(pcity))) {
request_diplomat_action(DIPLOMAT_MOVE, pDiplomat_Dlg->diplomat_id,
pDiplomat_Dlg->diplomat_target_id, 0);
}
popdown_diplomat_dialog();
}
return -1;
}
/****************************************************************
Fills the buf with proper text which should be displayed on
the helpbuild wonder button.
*****************************************************************/
static void get_help_build_wonder_button_label(char* buf, int bufsize,
bool* help_build_possible)
{
struct city* destcity = game_city_by_number(caravan_city_id);
struct unit* caravan = game_unit_by_number(caravan_unit_id);
if (destcity && caravan
&& unit_can_help_build_wonder(caravan, destcity)) {
fc_snprintf(buf, bufsize, _("Help build _Wonder (%d remaining)"),
impr_build_shield_cost(destcity->production.value.building)
- destcity->shield_stock);
*help_build_possible = TRUE;
} else {
fc_snprintf(buf, bufsize, _("Help build _Wonder"));
*help_build_possible = FALSE;
}
}
/**************************************************************************
Callback from diplomat/spy dialog for "keep moving".
(This should only occur when entering allied city.)
**************************************************************************/
static void diplomat_keep_moving_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
struct unit *punit;
struct city *pcity;
destroy_message_dialog(w);
diplomat_dialog = NULL;
if ((punit = game_unit_by_number(diplomat_id))
&& (pcity = game_city_by_number(diplomat_target_id))
&& !same_pos(unit_tile(punit), city_tile(pcity))) {
request_diplomat_action(DIPLOMAT_MOVE, diplomat_id,
diplomat_target_id, 0);
}
process_diplomat_arrival(NULL, 0);
}
/****************************************************************
Popup tech stealing dialog with list of possible techs
*****************************************************************/
static void spy_steal_popup(GtkWidget *w, gpointer data)
{
struct city *pvcity = game_city_by_number(diplomat_target_id);
struct player *pvictim = NULL;
if(pvcity)
pvictim = city_owner(pvcity);
/* it is concievable that pvcity will not be found, because something
has happened to the city during latency. Therefore we must initialize
pvictim to NULL and account for !pvictim in create_advances_list. -- Syela */
if(!spy_tech_shell){
create_advances_list(client.conn.playing, pvictim);
gtk_window_present(GTK_WINDOW(spy_tech_shell));
}
gtk_widget_destroy(diplomat_dialog);
}
/**************************************************************************
Remove the assignment of a charge to a guard.
Assumes that a unit can have at most one guard.
**************************************************************************/
void aiguard_clear_charge(struct unit *guard)
{
struct unit_ai *guard_data = def_ai_unit_data(guard);
struct unit *charge_unit = game_unit_by_number(guard_data->charge);
struct city *charge_city = game_city_by_number(guard_data->charge);
/* IDs always distinct */
fc_assert_ret(charge_unit == NULL || charge_city == NULL);
if (charge_unit) {
BODYGUARD_LOG(LOGLEVEL_BODYGUARD, guard, "unassigned (unit)");
def_ai_unit_data(charge_unit)->bodyguard = BODYGUARD_NONE;
} else if (charge_city) {
BODYGUARD_LOG(LOGLEVEL_BODYGUARD, guard, "unassigned (city)");
}
/* else not assigned or charge was destroyed */
guard_data->charge = BODYGUARD_NONE;
CHECK_GUARD(guard);
}
/****************************************************************
...
*****************************************************************/
static void spy_steal_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
XtDestroyWidget(spy_tech_shell);
spy_tech_shell = 0l;
if(!steal_advance){
log_error("Bug in spy steal tech code");
process_diplomat_arrival(NULL, 0);
return;
}
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_STEAL, diplomat_id,
diplomat_target_id, steal_advance);
}
process_diplomat_arrival(NULL, 0);
}
/****************************************************************
...
*****************************************************************/
static void spy_sabotage_callback(Widget w, XtPointer client_data,
XtPointer call_data)
{
XtDestroyWidget(spy_sabotage_shell);
spy_sabotage_shell = 0l;
if(!sabotage_improvement){
log_error("Bug in spy sabotage code");
process_diplomat_arrival(NULL, 0);
return;
}
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, sabotage_improvement + 1);
}
process_diplomat_arrival(NULL, 0);
}
static int sabotage_impr_callback(struct widget *pWidget)
{
if (Main.event.button.button == SDL_BUTTON_LEFT) {
int sabotage_improvement = MAX_ID - pWidget->ID;
int diplomat_target_id = pWidget->data.cont->id0;
int diplomat_id = pWidget->data.cont->id1;
popdown_advanced_terrain_dialog();
if(sabotage_improvement == 1000)
{
sabotage_improvement = -1;
}
if (NULL != game_unit_by_number(diplomat_id)
&& NULL != game_city_by_number(diplomat_target_id)) {
request_diplomat_action(DIPLOMAT_SABOTAGE, diplomat_id,
diplomat_target_id, sabotage_improvement + 1);
}
}
return -1;
}
/**********************************************************************
Returns an estimate for the profit gained through attack.
Assumes that the victim is within one day's flight
**********************************************************************/
static int dai_evaluate_tile_for_air_attack(struct unit *punit,
struct tile *dst_tile)
{
struct unit *pdefender;
/* unit costs in shields */
int balanced_cost, unit_cost, victim_cost = 0;
/* unit stats */
int unit_attack, victim_defence;
/* final answer */
int profit;
/* time spent in the air */
int sortie_time;
#define PROB_MULTIPLIER 100 /* should unify with those in combat.c */
if (!can_unit_attack_tile(punit, dst_tile)
|| !(pdefender = get_defender(punit, dst_tile))) {
return 0;
}
/* Ok, we can attack, but is it worth it? */
/* Cost of our unit */
unit_cost = unit_build_shield_cost(punit);
/* This is to say "wait, ill unit will get better!" */
unit_cost = unit_cost * unit_type(punit)->hp / punit->hp;
/* Determine cost of enemy units */
victim_cost = stack_cost(punit, pdefender);
if (0 == victim_cost) {
return 0;
}
/* Missile would die 100% so we adjust the victim_cost -- GB */
if (uclass_has_flag(unit_class(punit), UCF_MISSILE)) {
victim_cost -= unit_build_shield_cost(punit);
}
unit_attack = (int) (PROB_MULTIPLIER
* unit_win_chance(punit, pdefender));
victim_defence = PROB_MULTIPLIER - unit_attack;
balanced_cost = build_cost_balanced(unit_type(punit));
sortie_time = (unit_has_type_flag(punit, UTYF_ONEATTACK) ? 1 : 0);
profit = kill_desire(victim_cost, unit_attack, unit_cost, victim_defence, 1)
- SHIELD_WEIGHTING + 2 * TRADE_WEIGHTING;
if (profit > 0) {
profit = military_amortize(unit_owner(punit),
game_city_by_number(punit->homecity),
profit, sortie_time, balanced_cost);
log_debug("%s at (%d, %d) is a worthy target with profit %d",
unit_rule_name(pdefender), TILE_XY(dst_tile), profit);
} else {
log_debug("%s(%d, %d): %s at (%d, %d) is unworthy with profit %d",
unit_rule_name(punit), TILE_XY(unit_tile(punit)),
unit_rule_name(pdefender), TILE_XY(dst_tile), profit);
profit = 0;
}
return profit;
}