/**************************************************************************
Popup a dialog to display information about an event that has a
specific location. The user should be given the option to goto that
location.
**************************************************************************/
void popup_notify_goto_dialog(const char *headline, const char *lines,
const struct text_tag_list *tags,
struct tile *ptile)
{
Widget notify_dialog_shell, notify_form, notify_command, notify_goto_command;
Widget notify_headline, notify_label;
Dimension width, width2, width_1, width_2;
if (!ptile) {
popup_notify_dialog("Message:", headline, lines);
return;
}
notify_dialog_shell = XtCreatePopupShell("Message:",
transientShellWidgetClass,
toplevel, NULL, 0);
notify_form = XtVaCreateManagedWidget("notifyform",
formWidgetClass,
notify_dialog_shell, NULL);
notify_headline=XtVaCreateManagedWidget("notifyheadline",
labelWidgetClass, notify_form,
XtNlabel, headline,
NULL);
notify_label=XtVaCreateManagedWidget("notifylabel",
labelWidgetClass, notify_form,
XtNlabel, lines,
NULL);
notify_command =
I_L(XtVaCreateManagedWidget("notifycommand",
commandWidgetClass,
notify_form,
NULL));
notify_goto_command =
I_L(XtVaCreateManagedWidget("notifygotocommand",
commandWidgetClass,
notify_form,
NULL));
XtVaGetValues(notify_label, XtNwidth, &width, NULL);
XtVaGetValues(notify_headline, XtNwidth, &width2, NULL);
XtVaGetValues(notify_command, XtNwidth, &width_1, NULL);
XtVaGetValues(notify_goto_command, XtNwidth, &width_2, NULL);
if (width_1 + width_2 > width) width = width_1 + width_2;
if(width>width2)
XtVaSetValues(notify_headline, XtNwidth, width, NULL);
XtAddCallback(notify_command, XtNcallback, notify_no_goto_command_callback, NULL);
XtAddCallback(notify_goto_command, XtNcallback, notify_goto_command_callback, NULL);
notify_goto_add_widget_tile(notify_goto_command, ptile);
xaw_set_relative_position(toplevel, notify_dialog_shell, 25, 5);
XtPopup(notify_dialog_shell, XtGrabNone);
/* XtSetSensitive(toplevel, FALSE); */
}
/****************************************************************************
Popups Servers List dialog.
****************************************************************************/
void connectdlg_serverlist_popup(void)
{
if (!connectdlg_serverlist_shell) {
connectdlg_serverlist_create();
}
xaw_set_relative_position(toplevel, connectdlg_serverlist_shell, 15, 15);
XtPopup(connectdlg_serverlist_shell, XtGrabNone);
}
/**************************************************************************
Popups connect dialog.
**************************************************************************/
static void connectdlg_popup(void)
{
if (!connectdlg_shell) {
connectdlg_create();
}
connectdlg_align_labels();
xaw_set_relative_position(toplevel, connectdlg_shell, 20, 20);
XtPopup(connectdlg_shell, XtGrabNone);
}
/****************************************************************
popup the dialog 10% inside the main-window
*****************************************************************/
void popup_city_dialog(struct city *pcity, int make_modal)
{
struct city_dialog *pdialog;
if(!(pdialog=get_city_dialog(pcity)))
pdialog=create_city_dialog(pcity, make_modal);
xaw_set_relative_position(toplevel, pdialog->shell, 10, 10);
XtPopup(pdialog->shell, XtGrabNone);
}
/****************************************************************
...
*****************************************************************/
void popup_option_dialog(void)
{
create_option_dialog();
XtVaSetValues(option_bg_toggle, XtNstate, use_solid_color_behind_units, NULL);
XtVaSetValues(option_bell_toggle, XtNstate, sound_bell_at_new_turn, NULL);
xaw_set_relative_position(toplevel, option_dialog_shell, 25, 25);
XtPopup(option_dialog_shell, XtGrabNone);
XtSetSensitive(main_form, FALSE);
}
/****************************************************************
...
*****************************************************************/
Widget input_dialog_create(Widget parent, const char *dialogname,
const char *text, const char *postinputtest,
XtCallbackProc ok_callback,
XtPointer ok_cli_data,
XtCallbackProc cancel_callback,
XtPointer cancel_cli_data)
{
Widget shell, form, label, input, ok, cancel;
XtSetSensitive(parent, FALSE);
I_T(shell=XtCreatePopupShell(dialogname, transientShellWidgetClass,
parent, NULL, 0));
form=XtVaCreateManagedWidget("iform", formWidgetClass, shell, NULL);
/* Caller should i18n the text passed in as desired */
label=XtVaCreateManagedWidget("ilabel", labelWidgetClass, form,
XtNlabel, (XtArgVal)text, NULL);
input=XtVaCreateManagedWidget("iinput",
asciiTextWidgetClass,
form,
XtNfromVert, (XtArgVal)label,
XtNeditType, XawtextEdit,
XtNstring, postinputtest,
NULL);
ok=XtVaCreateManagedWidget("iokcommand",
commandWidgetClass,
form,
XtNlabel, (XtArgVal)_("Ok"),
XtNfromVert, input,
NULL);
cancel=XtVaCreateManagedWidget("icancelcommand",
commandWidgetClass,
form,
XtNlabel, (XtArgVal)_("Cancel"),
XtNfromVert, input,
XtNfromHoriz, ok,
NULL);
xaw_set_relative_position(parent, shell, 10, 10);
XtPopup(shell, XtGrabNone);
XtAddCallback(ok, XtNcallback, ok_callback, ok_cli_data);
XtAddCallback(cancel, XtNcallback, cancel_callback,
cancel_cli_data);
XtSetKeyboardFocus(parent, input);
return shell;
}
/****************************************************************
popup the dialog somewhat inside the main-window
*****************************************************************/
void popup_players_dialog(bool raise)
{
players_dialog_shell_is_raised = raise;
if(!players_dialog_shell)
create_players_dialog(raise);
if (raise) {
XtSetSensitive(main_form, FALSE);
}
xaw_set_relative_position(toplevel, players_dialog_shell, 5, 25);
XtPopup(players_dialog_shell, XtGrabNone);
}
/**************************************************************************
Popup a generic dialog to display some generic information.
**************************************************************************/
void popup_notify_dialog(const char *caption, const char *headline,
const char *lines)
{
Widget notify_form, notify_command;
Widget notify_headline, notify_label;
Dimension width, width2;
notify_dialog_shell = XtCreatePopupShell(caption,
transientShellWidgetClass,
toplevel, NULL, 0);
notify_form = XtVaCreateManagedWidget("notifyform",
formWidgetClass,
notify_dialog_shell, NULL);
notify_headline=XtVaCreateManagedWidget("notifyheadline",
labelWidgetClass, notify_form,
XtNlabel, headline,
NULL);
notify_label=XtVaCreateManagedWidget("notifylabel",
labelWidgetClass, notify_form,
XtNlabel, lines,
NULL);
notify_command =
I_L(XtVaCreateManagedWidget("notifycommand",
commandWidgetClass,
notify_form,
NULL));
XtVaGetValues(notify_label, XtNwidth, &width, NULL);
XtVaGetValues(notify_headline, XtNwidth, &width2, NULL);
if(width>width2)
XtVaSetValues(notify_headline, XtNwidth, width, NULL);
XtAddCallback(notify_command, XtNcallback, notify_command_callback, NULL);
xaw_set_relative_position(toplevel, notify_dialog_shell, 25, 5);
XtPopup(notify_dialog_shell, XtGrabNone);
XtSetSensitive(toplevel, FALSE);
}
/**************************************************************************
...
**************************************************************************/
void popup_messageopt_dialog(void)
{
Widget shell;
int i, j, state;
shell=create_messageopt_dialog();
/* Doing this here makes the "No"'s centered consistently */
for(i=0; i<E_LAST; i++) {
for(j=0; j<NUM_MW; j++) {
state = messages_where[i] & (1<<j);
XtVaSetValues(messageopt_toggles[i][j],
XtNstate, state,
XtNlabel, state? _("Yes") : _("No"), NULL);
}
}
xaw_set_relative_position(toplevel, shell, 15, 0);
XtPopup(shell, XtGrabNone);
XtSetSensitive(main_form, FALSE);
}
/**************************************************************************
Show the Citizen Management Agent Dialog for the current city.
**************************************************************************/
void show_cma_dialog(struct city *pcity, Widget citydlg)
{
Widget add_button, remove_button, help_button;
Widget form, preset_viewport, close_button;
Widget surplus_header, factor_header, prev;
struct cm_parameter parameter;
struct cm_result *result = cm_result_new(pcity);
int i;
current_city = pcity;
stat_surplus_label = fc_malloc((O_LAST + 1) * sizeof(Widget));
stat_factor_label = fc_malloc((O_LAST + 1) * sizeof(Widget));
cma_dialog =
I_T(XtCreatePopupShell("cmapopup",
topLevelShellWidgetClass,
citydlg, NULL, 0));
form =
XtVaCreateManagedWidget("cmaform",
formWidgetClass,
cma_dialog, NULL);
preset_viewport =
XtVaCreateManagedWidget("cmapresetviewport",
viewportWidgetClass, form,
NULL);
preset_list =
XtVaCreateManagedWidget("cmapresetlist",
listWidgetClass, preset_viewport,
XtNlist, (XtArgVal)initial_preset_list,
NULL);
result_label =
I_L(XtVaCreateManagedWidget("cmaresultlabel",
labelWidgetClass, form,
XtNfromHoriz, preset_viewport,
NULL));
surplus_header =
I_L(XtVaCreateManagedWidget("cmasurpluslabel",
labelWidgetClass, form,
XtNfromHoriz, preset_viewport,
XtNfromVert, result_label,
NULL));
/* Create labels in the minimal surplus column. */
prev = surplus_header;
for (i = 0; i < (O_LAST + 1); i++) {
I_L(stat_surplus_label[i] =
XtVaCreateManagedWidget("cmastatlabel",
labelWidgetClass, form,
XtNfromHoriz, preset_viewport,
XtNfromVert, prev,
XtNvertDistance, 1,
XtNlabel, (i == O_LAST) ?
_("Celebrate") : get_output_name(i),
NULL));
prev = stat_surplus_label[i];
}
/* Create scrollbars in the minimal surplus column. */
prev = surplus_header;
output_type_iterate(i) {
surplus_slider[i] =
XtVaCreateManagedWidget("cmapresetscroll",
scrollbarWidgetClass, form,
XtNfromHoriz, stat_surplus_label[i],
XtNfromVert, prev,
NULL);
prev = stat_surplus_label[i];
} output_type_iterate_end;
celebrate_toggle =
I_L(XtVaCreateManagedWidget("cmapresettoggle",
toggleWidgetClass,form,
XtNfromHoriz, stat_surplus_label[0],
XtNfromVert, stat_surplus_label[O_LAST - 1],
NULL));
/* Create header label in the factor column. */
factor_header =
I_L(XtVaCreateManagedWidget("cmafactorlabel",
labelWidgetClass, form,
XtNfromHoriz, surplus_slider[0],
XtNfromVert, result_label,
NULL));
/* Create stat labels in the factor column. */
prev = factor_header;
for (i = 0; i < (O_LAST + 1); i++) {
I_L(stat_factor_label[i] =
XtVaCreateManagedWidget("cmastatlabel",
labelWidgetClass, form,
XtNfromHoriz, surplus_slider[0],
XtNfromVert, prev,
XtNvertDistance, 1,
XtNlabel, (i == O_LAST) ?
_("Celebrate") : get_output_name(i),
NULL));
prev = stat_factor_label[i];
}
/* Create scrollbars in the factor column. */
prev = factor_header;
for (i = 0; i < (O_LAST + 1); i++) {
factor_slider[i] =
XtVaCreateManagedWidget("cmapresetscroll",
scrollbarWidgetClass, form,
XtNfromHoriz, stat_factor_label[i],
XtNfromVert, prev,
NULL);
prev = stat_factor_label[i];
}
close_button =
I_L(XtVaCreateManagedWidget("cmaclosebutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
NULL));
control_button =
I_L(XtVaCreateManagedWidget("cmacontrolbutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, close_button,
NULL));
release_button =
I_L(XtVaCreateManagedWidget("cmareleasebutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, control_button,
NULL));
change_button =
I_L(XtVaCreateManagedWidget("cmachangebutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, release_button,
NULL));
add_button =
I_L(XtVaCreateManagedWidget("cmaaddbutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, change_button,
NULL));
remove_button =
I_L(XtVaCreateManagedWidget("cmaremovebutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, add_button,
NULL));
help_button =
I_L(XtVaCreateManagedWidget("cmahelpbutton",
commandWidgetClass, form,
XtNfromVert, preset_viewport,
XtNfromHoriz, remove_button,
NULL));
XtAddCallback(control_button, XtNcallback, control_city,
(XtPointer)preset_list);
XtAddCallback(release_button, XtNcallback, release_city,
(XtPointer)preset_list);
XtAddCallback(change_button, XtNcallback, change_callback,
(XtPointer)preset_list);
XtAddCallback(add_button, XtNcallback, add_preset,
(XtPointer)preset_list);
XtAddCallback(remove_button, XtNcallback, remove_preset,
(XtPointer)preset_list);
XtAddCallback(preset_list, XtNcallback, select_preset,
(XtPointer)preset_list);
XtAddCallback(help_button, XtNcallback, cma_help,
(XtPointer)preset_list);
XtAddCallback(celebrate_toggle, XtNcallback,
celebrate_callback, NULL);
XtAddCallback(close_button, XtNcallback,
close_callback, NULL);
output_type_iterate(i) {
XtAddCallback(surplus_slider[i], XtNscrollProc,
sliders_scroll_callback, NULL);
XtAddCallback(surplus_slider[i], XtNjumpProc,
sliders_jump_callback, NULL);
} output_type_iterate_end;
for (i = 0; i < (O_LAST + 1); i++) {
XtAddCallback(factor_slider[i], XtNscrollProc,
sliders_scroll_callback, NULL);
XtAddCallback(factor_slider[i], XtNjumpProc,
sliders_jump_callback, NULL);
}
/* Update dialog with CMA parameters from city. */
cmafec_get_fe_parameter(current_city, ¶meter);
output_type_iterate(i) {
minimal_surplus[i] = parameter.minimal_surplus[i];
} output_type_iterate_end;
XtVaSetValues(celebrate_toggle,
XtNlabel, parameter.require_happy ? _("Yes") : _("No"),
XtNstate, parameter.require_happy, NULL);
if (parameter.happy_factor > 0) {
factors[O_LAST] = parameter.happy_factor;
} else {
factors[O_LAST] = 1;
}
output_type_iterate(i) {
factors[i] = parameter.factor[i];
} output_type_iterate_end;
set_slider_values();
update_cma_preset_list();
XtVaSetValues(preset_list, XtNwidth, 200, NULL);
XtVaSetValues(preset_list, XtNheight, 300, NULL);
XtVaSetValues(celebrate_toggle, XtNwidth, 30, NULL);
XtVaSetValues(result_label, XtNwidth, 360, NULL);
XtVaSetValues(result_label, XtNheight, 110, NULL);
output_type_iterate(i) {
XtVaSetValues(stat_surplus_label[i], XtNwidth, 90, NULL);
XtVaSetValues(stat_factor_label[i], XtNwidth, 90, NULL);
} output_type_iterate_end;
/* FIXME! Now we assume that output_type_iterate ends with O_LAST. */
XtVaSetValues(stat_factor_label[O_LAST], XtNwidth, 90, NULL);
XtRealizeWidget(cma_dialog);
update_stat_labels(True);
cm_result_from_main_map(result, pcity);
xaw_set_label(result_label,
(char *) cmafec_get_result_descr(current_city, result, ¶meter));
XSetWMProtocols(display, XtWindow(cma_dialog),
&wm_delete_window, 1);
XtVaSetValues(preset_viewport, XtNforceBars, True, NULL);
xaw_set_relative_position(citydlg, cma_dialog, 5, 5);
XtPopup(cma_dialog, XtGrabNone);
cm_result_destroy(result);
}
/****************************************************************
popup the dialog 10% inside the main-window
*****************************************************************/
void unit_select_dialog_popup(struct tile *ptile)
{
int i,n,r;
char buffer[512];
Arg args[4];
int nargs;
Widget unit_select_all_command, unit_select_close_command;
Widget firstcolumn=0,column=0;
Pixel bg;
struct unit *unit_list[unit_list_size(ptile->units)];
XtSetSensitive(main_form, FALSE);
unit_select_dialog_shell =
I_T(XtCreatePopupShell("unitselectdialogshell",
transientShellWidgetClass,
toplevel, NULL, 0));
unit_select_form = XtVaCreateManagedWidget("unitselectform",
formWidgetClass,
unit_select_dialog_shell, NULL);
XtVaGetValues(unit_select_form, XtNbackground, &bg, NULL);
XSetForeground(display, fill_bg_gc, bg);
n = MIN(MAX_SELECT_UNITS, unit_list_size(ptile->units));
r = number_of_rows(n);
fill_tile_unit_list(ptile, unit_list);
for(i=0; i<n; i++) {
struct unit *punit = unit_list[i];
struct unit_type *punittemp=unit_type(punit);
struct city *pcity;
struct canvas store;
if(!(i%r)) {
nargs=0;
if(i) { XtSetArg(args[nargs], XtNfromHoriz, column); nargs++;}
column = XtCreateManagedWidget("column", formWidgetClass,
unit_select_form,
args, nargs);
if(!i) firstcolumn=column;
}
unit_select_ids[i]=punit->id;
pcity = player_city_by_number(client_player(), punit->homecity);
fc_snprintf(buffer, sizeof(buffer), "%s(%s)\n%s",
utype_name_translation(punittemp),
pcity ? city_name(pcity) : "",
unit_activity_text(punit));
unit_select_pixmaps[i]=XCreatePixmap(display, XtWindow(map_canvas),
tileset_full_tile_width(tileset), tileset_full_tile_height(tileset),
display_depth);
XFillRectangle(display, unit_select_pixmaps[i], fill_bg_gc,
0, 0, tileset_full_tile_width(tileset), tileset_full_tile_height(tileset));
store.pixmap = unit_select_pixmaps[i];
put_unit(punit, &store, 0, 0);
nargs=0;
XtSetArg(args[nargs], XtNbitmap, (XtArgVal)unit_select_pixmaps[i]);nargs++;
XtSetArg(args[nargs], XtNsensitive,
can_unit_do_activity(punit, ACTIVITY_IDLE));nargs++;
if(i%r) {
XtSetArg(args[nargs], XtNfromVert, unit_select_commands[i-1]); nargs++;
}
unit_select_commands[i]=XtCreateManagedWidget("unitselectcommands",
commandWidgetClass,
column, args, nargs);
nargs=0;
XtSetArg(args[nargs], XtNlabel, (XtArgVal)buffer); nargs++;
XtSetArg(args[nargs], XtNfromHoriz, unit_select_commands[i]); nargs++;
if(i%r) {
XtSetArg(args[nargs], XtNfromVert, unit_select_commands[i-1]); nargs++;
}
unit_select_labels[i]=XtCreateManagedWidget("unitselectlabels",
labelWidgetClass,
column, args, nargs);
XtAddCallback(unit_select_commands[i],
XtNdestroyCallback,free_bitmap_destroy_callback, NULL);
XtAddCallback(unit_select_commands[i],
XtNcallback, unit_select_callback, NULL);
}
unit_select_no=i;
unit_select_close_command =
I_L(XtVaCreateManagedWidget("unitselectclosecommand",
commandWidgetClass,
unit_select_form,
XtNfromVert, firstcolumn,
NULL));
unit_select_all_command =
I_L(XtVaCreateManagedWidget("unitselectallcommand",
commandWidgetClass,
unit_select_form,
XtNfromVert, firstcolumn,
NULL));
XtAddCallback(unit_select_close_command, XtNcallback, unit_select_callback, NULL);
XtAddCallback(unit_select_all_command, XtNcallback, unit_select_all_callback, NULL);
xaw_set_relative_position(toplevel, unit_select_dialog_shell, 15, 10);
XtPopup(unit_select_dialog_shell, XtGrabNone);
}
/**************************************************************************
Popup a dialog asking the unit which improvement they would like to
pillage.
**************************************************************************/
void popup_pillage_dialog(struct unit *punit,
bv_special spe,
bv_bases bases,
bv_roads roads)
{
Widget shell, form, dlabel, button, prev;
struct act_tgt tgt;
if (is_showing_pillage_dialog) {
return;
}
is_showing_pillage_dialog = TRUE;
unit_to_use_to_pillage = punit->id;
XtSetSensitive (toplevel, FALSE);
shell = I_T(XtCreatePopupShell("pillagedialog", transientShellWidgetClass,
toplevel, NULL, 0));
form = XtVaCreateManagedWidget ("form", formWidgetClass, shell, NULL);
dlabel = I_L(XtVaCreateManagedWidget("dlabel", labelWidgetClass, form, NULL));
prev = dlabel;
while (get_preferred_pillage(&tgt, spe, bases, roads)) {
bv_special what_spe;
bv_bases what_base;
bv_roads what_road;
int what = S_LAST;
BV_CLR_ALL(what_spe);
BV_CLR_ALL(what_base);
BV_CLR_ALL(what_road);
switch (tgt.type) {
case ATT_SPECIAL:
BV_SET(what_spe, tgt.obj.spe);
what = tgt.obj.spe;
clear_special(&spe, tgt.obj.spe);
break;
case ATT_BASE:
BV_SET(what_base, tgt.obj.base);
what = tgt.obj.base + S_LAST;
BV_CLR(bases, tgt.obj.base);
break;
case ATT_ROAD:
BV_SET(what_road, tgt.obj.road);
what = tgt.obj.road + S_LAST + game.control.num_base_types;
BV_CLR(roads, tgt.obj.road);
break;
}
button =
XtVaCreateManagedWidget ("button", commandWidgetClass, form,
XtNfromVert, prev,
XtNlabel,
(XtArgVal)(get_infrastructure_text(what_spe,
what_base,
what_road)),
NULL);
XtAddCallback(button, XtNcallback, pillage_callback,
INT_TO_XTPOINTER(what));
prev = button;
}
button =
I_L(XtVaCreateManagedWidget("closebutton", commandWidgetClass, form,
XtNfromVert, prev,
NULL));
XtAddCallback (button, XtNcallback, pillage_callback, NULL);
xaw_set_relative_position (toplevel, shell, 10, 0);
XtPopup (shell, XtGrabNone);
}
