/**************************************************************************
Log player tech messages.
**************************************************************************/
void real_tech_log(const char *file, const char *function, int line,
enum log_level level, bool notify,
const struct player *pplayer, struct advance *padvance,
const char *msg, ...)
{
char buffer[500];
char buffer2[500];
va_list ap;
if (!valid_advance(padvance) || advance_by_number(A_NONE) == padvance) {
return;
}
fc_snprintf(buffer, sizeof(buffer), "%s::%s (want %d, dist %d) ",
player_name(pplayer),
advance_name_by_player(pplayer, advance_number(padvance)),
pplayer->ai_common.tech_want[advance_index(padvance)],
num_unknown_techs_for_goal(pplayer, advance_number(padvance)));
va_start(ap, msg);
fc_vsnprintf(buffer2, sizeof(buffer2), msg, ap);
va_end(ap);
cat_snprintf(buffer, sizeof(buffer), "%s", buffer2);
if (notify) {
notify_conn(NULL, NULL, E_AI_DEBUG, ftc_log, "%s", buffer);
}
do_log(file, function, line, FALSE, level, "%s", buffer);
}
/**************************************************************************
Log player tech messages.
**************************************************************************/
void TECH_LOG(int level, const struct player *pplayer,
struct advance *padvance, const char *msg, ...)
{
char buffer[500];
char buffer2[500];
va_list ap;
int minlevel = MIN(LOGLEVEL_TECH, level);
if (!valid_advance(padvance) || advance_by_number(A_NONE) == padvance) {
return;
}
if (BV_ISSET(pplayer->debug, PLAYER_DEBUG_TECH)) {
minlevel = LOG_TEST;
} else if (minlevel > fc_log_level) {
return;
}
my_snprintf(buffer, sizeof(buffer), "%s::%s (want %d, dist %d) ",
player_name(pplayer),
advance_name_by_player(pplayer, advance_number(padvance)),
pplayer->ai_data.tech_want[advance_index(padvance)],
num_unknown_techs_for_goal(pplayer, advance_number(padvance)));
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_TECH)) {
notify_conn(NULL, NULL, E_AI_DEBUG, ftc_log, "%s", buffer);
}
freelog(minlevel, "%s", buffer);
}
/**************************************************************************
Give pplayer technology ptech. Quietly returns A_NONE (zero) if
player already has this tech; otherwise returns the tech granted.
Use NULL for ptech to grant a random tech.
sends script signal "tech_researched" with the given reason
**************************************************************************/
Tech_Type *api_actions_give_technology(Player *pplayer, Tech_Type *ptech,
const char *reason)
{
Tech_type_id id;
Tech_Type *result;
if (ptech) {
id = advance_number(ptech);
} else {
if (get_player_research(pplayer)->researching == A_UNSET) {
choose_random_tech(pplayer);
}
id = get_player_research(pplayer)->researching;
}
if (player_invention_state(pplayer, id) != TECH_KNOWN) {
do_free_cost(pplayer, id);
found_new_tech(pplayer, id, FALSE, TRUE);
result = advance_by_number(id);
script_signal_emit("tech_researched", 3,
API_TYPE_TECH_TYPE, result,
API_TYPE_PLAYER, pplayer,
API_TYPE_STRING, reason);
return result;
} else {
return advance_by_number(A_NONE);
}
}
/**************************************************************************
Accessor for requirements.
**************************************************************************/
Tech_type_id advance_required(const Tech_type_id tech,
enum tech_req require)
{
fc_assert_ret_val(require >= 0 && require < AR_SIZE, -1);
fc_assert_ret_val(tech >= A_NONE || tech < A_LAST, -1);
if (A_NEVER == advances[tech].require[require]) {
/* out of range */
return A_LAST;
}
return advance_number(advances[tech].require[require]);
}
/**************************************************************************
...
**************************************************************************/
static int spy_steal_popup(struct widget *pWidget)
{
struct city *pVcity = pWidget->data.city;
int id = MAX_ID - pWidget->ID;
struct player *pVictim = NULL;
struct CONTAINER *pCont;
struct widget *pBuf = NULL;
struct widget *pWindow;
SDL_String16 *pStr;
SDL_Surface *pSurf;
int max_col, max_row, col, i, count = 0;
SDL_Rect area;
popdown_diplomat_dialog();
if(pVcity)
{
pVictim = city_owner(pVcity);
}
if (pDiplomat_Dlg || !pVictim) {
return 1;
}
count = 0;
advance_index_iterate(A_FIRST, i) {
if (player_invention_reachable(client.conn.playing, i, FALSE)
&& TECH_KNOWN == player_invention_state(pVictim, i)
&& (TECH_UNKNOWN == player_invention_state(client.conn.playing, i)
|| TECH_PREREQS_KNOWN ==
player_invention_state(client.conn.playing, i))) {
count++;
}
} advance_index_iterate_end;
if(!count) {
/* if there is no known tech to steal then
send steal order at Spy's Discretion */
int target_id = pVcity->id;
request_diplomat_action(DIPLOMAT_STEAL, id, target_id, advance_count());
return -1;
}
pCont = fc_calloc(1, sizeof(struct CONTAINER));
pCont->id0 = pVcity->id;
pCont->id1 = id;/* spy id */
pDiplomat_Dlg = fc_calloc(1, sizeof(struct diplomat_dialog));
pDiplomat_Dlg->diplomat_id = id;
pDiplomat_Dlg->diplomat_target_id = pVcity->id;
pDiplomat_Dlg->pdialog = fc_calloc(1, sizeof(struct ADVANCED_DLG));
pStr = create_str16_from_char(_("Select Advance to Steal"), adj_font(12));
pStr->style |= TTF_STYLE_BOLD;
pWindow = create_window_skeleton(NULL, pStr, 0);
pWindow->action = spy_steal_dlg_window_callback;
set_wstate(pWindow , FC_WS_NORMAL);
add_to_gui_list(ID_DIPLOMAT_DLG_WINDOW, pWindow);
pDiplomat_Dlg->pdialog->pEndWidgetList = pWindow;
area = pWindow->area;
area.w = MAX(area.w, adj_size(8));
/* ------------------ */
/* exit button */
pBuf = create_themeicon(pTheme->Small_CANCEL_Icon, pWindow->dst,
WF_WIDGET_HAS_INFO_LABEL | WF_RESTORE_BACKGROUND);
pBuf->info_label = create_str16_from_char(_("Close Dialog (Esc)"),
adj_font(12));
area.w += pBuf->size.w + adj_size(10);
pBuf->action = exit_spy_steal_dlg_callback;
set_wstate(pBuf, FC_WS_NORMAL);
pBuf->key = SDLK_ESCAPE;
add_to_gui_list(ID_TERRAIN_ADV_DLG_EXIT_BUTTON, pBuf);
/* ------------------------- */
count++; /* count + at Spy's Discretion */
/* max col - 104 is steal tech widget width */
max_col = (Main.screen->w - (pWindow->size.w - pWindow->area.w) - adj_size(2)) / adj_size(104);
/* max row - 204 is steal tech widget height */
max_row = (Main.screen->h - (pWindow->size.h - pWindow->area.h)) / adj_size(204);
/* make space on screen for scrollbar */
if (max_col * max_row < count) {
max_col--;
}
if (count < max_col + 1) {
col = count;
} else {
if (count < max_col + adj_size(3)) {
col = max_col - adj_size(2);
} else {
if (count < max_col + adj_size(5)) {
col = max_col - 1;
} else {
col = max_col;
}
}
}
pStr = create_string16(NULL, 0, adj_font(10));
pStr->style |= (TTF_STYLE_BOLD | SF_CENTER);
count = 0;
advance_index_iterate(A_FIRST, i) {
if (player_invention_reachable(client.conn.playing, i, FALSE)
&& TECH_KNOWN == player_invention_state(pVictim, i)
&& (TECH_UNKNOWN == player_invention_state(client.conn.playing, i)
|| TECH_PREREQS_KNOWN ==
player_invention_state(client.conn.playing, i))) {
count++;
copy_chars_to_string16(pStr, advance_name_translation(advance_by_number(i)));
pSurf = create_sellect_tech_icon(pStr, i, FULL_MODE);
pBuf = create_icon2(pSurf, pWindow->dst,
WF_FREE_THEME | WF_RESTORE_BACKGROUND);
set_wstate(pBuf, FC_WS_NORMAL);
pBuf->action = spy_steal_callback;
pBuf->data.cont = pCont;
add_to_gui_list(MAX_ID - i, pBuf);
if (count > (col * max_row)) {
set_wflag(pBuf, WF_HIDDEN);
}
}
} advance_index_iterate_end;
/* get spy tech */
i = advance_number(unit_type(game_unit_by_number(id))->require_advance);
copy_chars_to_string16(pStr, _("At Spy's Discretion"));
pSurf = create_sellect_tech_icon(pStr, i, FULL_MODE);
pBuf = create_icon2(pSurf, pWindow->dst,
(WF_FREE_THEME | WF_RESTORE_BACKGROUND| WF_FREE_DATA));
set_wstate(pBuf, FC_WS_NORMAL);
pBuf->action = spy_steal_callback;
pBuf->data.cont = pCont;
add_to_gui_list(MAX_ID - advance_count(), pBuf);
count++;
/* --------------------------------------------------------- */
FREESTRING16(pStr);
pDiplomat_Dlg->pdialog->pBeginWidgetList = pBuf;
pDiplomat_Dlg->pdialog->pBeginActiveWidgetList = pDiplomat_Dlg->pdialog->pBeginWidgetList;
pDiplomat_Dlg->pdialog->pEndActiveWidgetList = pDiplomat_Dlg->pdialog->pEndWidgetList->prev->prev;
/* -------------------------------------------------------------- */
i = 0;
if (count > col) {
count = (count + (col - 1)) / col;
if (count > max_row) {
pDiplomat_Dlg->pdialog->pActiveWidgetList = pDiplomat_Dlg->pdialog->pEndActiveWidgetList;
count = max_row;
i = create_vertical_scrollbar(pDiplomat_Dlg->pdialog, col, count, TRUE, TRUE);
}
} else {
count = 1;
}
area.w = MAX(area.w, (col * pBuf->size.w + adj_size(2) + i));
area.h = count * pBuf->size.h + adj_size(2);
/* alloca window theme and win background buffer */
pSurf = theme_get_background(theme, BACKGROUND_SPYSTEALDLG);
if (resize_window(pWindow, pSurf, NULL,
(pWindow->size.w - pWindow->area.w) + area.w,
(pWindow->size.h - pWindow->area.h) + area.h))
{
FREESURFACE(pSurf);
}
area = pWindow->area;
widget_set_position(pWindow,
(Main.screen->w - pWindow->size.w) / 2,
(Main.screen->h - pWindow->size.h) / 2);
/* exit button */
pBuf = pWindow->prev;
pBuf->size.x = area.x + area.w - pBuf->size.w - 1;
pBuf->size.y = pWindow->size.y + adj_size(2);
setup_vertical_widgets_position(col, area.x + 1,
area.y, 0, 0,
pDiplomat_Dlg->pdialog->pBeginActiveWidgetList,
pDiplomat_Dlg->pdialog->pEndActiveWidgetList);
if(pDiplomat_Dlg->pdialog->pScroll) {
setup_vertical_scrollbar_area(pDiplomat_Dlg->pdialog->pScroll,
area.x + area.w, area.y,
area.h, TRUE);
}
redraw_group(pDiplomat_Dlg->pdialog->pBeginWidgetList, pWindow, FALSE);
widget_mark_dirty(pWindow);
return -1;
}
/**************************************************************************
Slot for selecting player/nation
**************************************************************************/
void plr_widget::nation_selected(const QItemSelection &sl,
const QItemSelection &ds)
{
QModelIndex index;
QVariant qvar;
QModelIndexList indexes = sl.indexes();
struct city *pcity;
const struct player_diplstate *state;
struct player_research *research;
char tbuf[256];
QString res;
QString sp = " ";
QString nl = "<br>";
struct player *pplayer;
int a , b;
bool added;
bool entry_exist = false;
struct player *me;
Tech_type_id tech_id;
other_player = NULL;
intel_str.clear();
tech_str.clear();
ally_str.clear();
if (indexes.isEmpty()) {
plr->update_report();
return;
}
index = indexes.at(0);
qvar = index.data(Qt::UserRole);
pplayer = reinterpret_cast<player *>(qvar.value<void *>());
other_player = pplayer;
if (pplayer->is_alive == false) {
plr->update_report();
return;
}
pcity = player_capital(pplayer);
research = player_research_get(pplayer);
switch (research->researching) {
case A_UNKNOWN:
res = _("(Unknown)");
break;
case A_UNSET:
res = _("(none)");
break;
default:
res = QString(advance_name_researching(pplayer))
+ sp + "(" + QString::number(research->bulbs_researched) + "/"
+ QString::number(total_bulbs_required(pplayer)) + ")";
break;
}
/** Formatting rich text */
intel_str =
QString("<table><tr><td><b>") + _("Nation") + QString("</b></td><td>")
+ QString(nation_adjective_for_player(pplayer))
+ QString("</td><tr><td><b>") + N_("Ruler:") + QString("</b></td><td>")
+ QString(ruler_title_for_player(pplayer, tbuf, sizeof(tbuf)))
+ QString("</td></tr><tr><td><b>") + N_("Government:")
+ QString("</b></td><td>") + QString(government_name_for_player(pplayer))
+ QString("</td></tr><tr><td><b>") + N_("Capital:")
+ QString("</b></td><td>")
+ QString(((!pcity) ? _("(unknown)") : city_name(pcity)))
+ QString("</td></tr><tr><td><b>") + N_("Gold:")
+ QString("</b></td><td>") + QString::number(pplayer->economic.gold)
+ QString("</td></tr><tr><td><b>") + N_("Tax:")
+ QString("</b></td><td>") + QString::number(pplayer->economic.tax)
+ QString("%</td></tr><tr><td><b>") + N_("Science:")
+ QString("</b></td><td>") + QString::number(pplayer->economic.science)
+ QString("%</td></tr><tr><td><b>") + N_("Luxury:")
+ QString("</b></td><td>") + QString::number(pplayer->economic.luxury)
+ QString("%</td></tr><tr><td><b>") + N_("Researching:")
+ QString("</b></td><td>") + res + QString("</td></table>");
for (int i = 0; i < static_cast<int>(DS_LAST); i++) {
added = false;
if (entry_exist) {
ally_str += "<br>";
}
entry_exist = false;
players_iterate_alive(other) {
if (other == pplayer) {
continue;
}
state = player_diplstate_get(pplayer, other);
if (static_cast<int>(state->type) == i) {
if (added == false) {
ally_str = ally_str + QString("<b>")
+ QString(diplstate_type_translated_name(
static_cast<diplstate_type>(i)))
+ ": " + QString("</b>") + nl;
added = true;
}
ally_str = ally_str + nation_plural_for_player(other) + ", ";
entry_exist = true;
}
}
players_iterate_alive_end;
if (entry_exist) {
ally_str.replace(ally_str.lastIndexOf(","), 1, ".");
}
}
me = client_player();
if ((player_has_embassy(me, pplayer) || client_is_global_observer())
&& me != pplayer) {
a = 0;
b = 0;
techs_known = QString("<b>") + _("Techs unknown by") + sp
+ QString(nation_adjective_for_player(pplayer)) + sp
+ QString(_("nation")) + QString("</b> :");
techs_unknown = QString("<b>") + _("Techs unkown by you") + sp
+ QString("</b> :");
advance_iterate(A_FIRST, padvance) {
tech_id = advance_number(padvance);
if (player_invention_state(me, tech_id) == TECH_KNOWN
&& (player_invention_state(pplayer, tech_id) == TECH_UNKNOWN)) {
a++;
techs_known = techs_known + QString("<i>")
+ advance_name_for_player(pplayer, tech_id)
+ "," + QString("</i>") + sp;
}
if (player_invention_state(me, tech_id) == TECH_UNKNOWN
&& (player_invention_state(pplayer, tech_id) == TECH_KNOWN)) {
b++;
techs_unknown = techs_unknown + QString("<i>")
+ advance_name_for_player(pplayer, tech_id)
+ "," + QString("</i>") + sp;
}
} advance_iterate_end;
