/********************************************************************** Freeciv - Copyright (C) 1996 - A Kjeldberg, L Gregersen, P Unold This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. ***********************************************************************/ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include extern int UNIT_TILES; extern Widget toplevel, main_form; Widget help_dialog_shell; Widget help_form; Widget help_viewport; Widget help_list; Widget help_text; Widget help_close_command; Widget help_right_form; Widget help_title; Widget help_improvement_cost, help_improvement_cost_data; Widget help_improvement_upkeep, help_improvement_upkeep_data; Widget help_improvement_req, help_improvement_req_data; Widget help_wonder_obsolete, help_wonder_obsolete_data; Widget help_improvement_tree; Widget help_unit_attack, help_unit_attack_data; Widget help_unit_def, help_unit_def_data; Widget help_unit_move, help_unit_move_data; Widget help_unit_hp, help_unit_hp_data; Widget help_unit_fp, help_unit_fp_data; Widget help_unit_cost, help_unit_cost_data; Widget help_unit_visrange, help_unit_visrange_data; Widget help_unit_tile; enum help_page_type {HELP_TEXT, HELP_UNIT, HELP_IMPROVEMENT, HELP_WONDER, HELP_TECH} help_type; void create_help_page(enum help_page_type type); void update_help_dialog(Widget help_list); void help_close_command_callback(Widget w, XtPointer client_data, XtPointer call_data); void help_list_callback(Widget w, XtPointer client_data, XtPointer call_data); void help_tree_node_callback(Widget w, XtPointer client_data, XtPointer call_data); void create_help_dialog(void); void select_help_item(int item); void select_help_item_string(char *item); extern struct improvement_type improvement_types[]; extern struct advance advances[]; struct help_item { char *topic, *text; int indent; struct help_item *next; }; struct help_item *head, *tail; char *topic_list[1024]; struct help_item *find_help_item_by_topic(char *topic) { struct help_item *pitem=head; while(pitem) { char *p=pitem->topic; while(*p==' ') ++p; if(!strcmp(topic, p)) return pitem; } return 0; } struct help_item *find_help_item_position(int pos) { struct help_item *pitem=head; while(pitem && pos) pitem=pitem->next, --pos; return pitem; } void set_title_topic(struct help_item *pitem) { if(!strcmp(pitem->topic, "Freeciv") || !strcmp(pitem->topic, "About")) xaw_set_label(help_title, FREECIV_NAME_VERSION); else xaw_set_label(help_title, pitem->topic); } void boot_help_texts(void) { FILE *fs; char buf[512], *p, text[64000]; int len; struct help_item *pitem; fs=fopen(datafilename("helpdata.txt"), "r"); if(fs==NULL) { log(LOG_NORMAL, "failed reading help-texts"); return; } while(1) { fgets(buf, 512, fs); buf[strlen(buf)-1]='\0'; if(!strncmp(buf, "%%", 2)) continue; len=strlen(buf); p=strchr(buf, '#'); if(!p) { break; } pitem=(struct help_item *)malloc(sizeof(struct help_item)); pitem->indent=p-buf; pitem->topic=mystrdup(p+1); pitem->next=0; text[0]='\0'; while(1) { fgets(buf, 512, fs); buf[strlen(buf)-1]='\0'; if(!strncmp(buf, "%%", 2)) continue; if(!strcmp(buf, "---")) break; strcat(text, buf); strcat(text, "\n"); } pitem->text=mystrdup(text); if(head==0) { head=pitem; tail=pitem; } else { tail->next=pitem; tail=pitem; } } fclose(fs); } /**************************************************************** ... *****************************************************************/ void popup_help_dialog_string(char *item) { Position x, y; Dimension width, height; if(!help_dialog_shell) { create_help_dialog(); XtVaGetValues(toplevel, XtNwidth, &width, XtNheight, &height, NULL); XtTranslateCoords(toplevel, (Position) width/10, (Position) height/10, &x, &y); XtVaSetValues(help_dialog_shell, XtNx, x, XtNy, y, NULL); } XtPopup(help_dialog_shell, XtGrabNone); select_help_item_string(item); } /************************************************************************** ... **************************************************************************/ void create_help_dialog(void) { int i; struct help_item *pitem; for(pitem=head, i=0; pitem; pitem=pitem->next) topic_list[i++]=pitem->topic; topic_list[i]=0; help_dialog_shell = XtCreatePopupShell("helpdialog", topLevelShellWidgetClass, toplevel, NULL, 0); help_form = XtVaCreateManagedWidget("helpform", formWidgetClass, help_dialog_shell, NULL); help_viewport = XtVaCreateManagedWidget("helpviewport", viewportWidgetClass, help_form, NULL); help_list = XtVaCreateManagedWidget("helplist", listWidgetClass, help_viewport, XtNlist, (XtArgVal)topic_list, NULL); help_right_form=XtVaCreateManagedWidget("helprightform", formWidgetClass, help_form, NULL); help_title=XtVaCreateManagedWidget("helptitle", labelWidgetClass, help_right_form, NULL); help_close_command = XtVaCreateManagedWidget("helpclosecommand", commandWidgetClass, help_form, NULL); XtAddCallback(help_close_command, XtNcallback, help_close_command_callback, NULL); XtAddCallback(help_list, XtNcallback, help_list_callback, NULL); XtRealizeWidget(help_dialog_shell); create_help_page(HELP_IMPROVEMENT); } void create_tech_tree(Widget tree, Widget parent, int tech, int levels) { Widget l; int type=get_invention(game.player_ptr, tech); char *bg=""; char label[MAX_LENGTH_NAME+3]; switch(type) { case TECH_UNKNOWN: bg=TREE_NODE_UNKNOWN_TECH_BG; break; case TECH_KNOWN: bg=TREE_NODE_KNOWN_TECH_BG; break; case TECH_REACHABLE: bg=TREE_NODE_REACHABLE_TECH_BG; break; } if(advances[tech].req[0]==A_LAST && advances[tech].req[1]==A_LAST) { strcpy(label,"Removed"); bg=TREE_NODE_UNKNOWN_TECH_BG; l=XtVaCreateManagedWidget("treenode", commandWidgetClass, tree, XtNlabel, label, XtNbackground, bg, NULL); return; } sprintf(label,"%s:%d",advances[tech].name, tech_goal_turns(game.player_ptr,tech)); if(parent) { l=XtVaCreateManagedWidget("treenode", commandWidgetClass, tree, XtNlabel, label, XtNtreeParent, parent, NULL); } else { l=XtVaCreateManagedWidget("treenode", commandWidgetClass, tree, XtNlabel, label, NULL); } XtAddCallback(l, XtNcallback, help_tree_node_callback, (XtPointer)tech); XtVaSetValues(l, XtVaTypedArg, XtNbackground, XtRString, bg, strlen(bg)+1, NULL); if(--levels>0) { if(advances[tech].req[0]!=A_NONE) create_tech_tree(tree, l, advances[tech].req[0], levels); if(advances[tech].req[1]!=A_NONE) create_tech_tree(tree, l, advances[tech].req[1], levels); } } void create_help_page(enum help_page_type type) { Dimension w, h, w2, h2; XtVaGetValues(help_right_form, XtNwidth, &w, NULL); XtVaGetValues(help_viewport, XtNheight, &h, NULL); XtVaGetValues(help_title, XtNwidth, &w2, XtNheight, &h2, NULL); XtDestroyWidget(help_right_form); help_right_form=XtVaCreateManagedWidget("helprightform", formWidgetClass, help_form, XtNwidth, w, XtNheight, h, NULL); help_title=XtVaCreateManagedWidget("helptitle", labelWidgetClass, help_right_form, XtNwidth, w2, NULL); if(type==HELP_TEXT) { help_text = XtVaCreateManagedWidget("helptext", asciiTextWidgetClass, help_right_form, XtNeditType, XawtextRead, XtNscrollVertical, XawtextScrollAlways, XtNwidth, w2, XtNheight, h-h2-15, NULL); help_type=HELP_TEXT; } else if(type==HELP_IMPROVEMENT || type==HELP_WONDER) { help_text = XtVaCreateManagedWidget("helptext", asciiTextWidgetClass, help_right_form, XtNeditType, XawtextRead, XtNscrollVertical, XawtextScrollAlways, XtNwidth, w2, XtNheight, 70, NULL); help_improvement_cost=XtVaCreateManagedWidget("helpimprcost", labelWidgetClass, help_right_form, NULL); help_improvement_cost_data=XtVaCreateManagedWidget("helpimprcostdata", labelWidgetClass, help_right_form, NULL); help_improvement_req=XtVaCreateManagedWidget("helpimprreq", labelWidgetClass, help_right_form, NULL); help_improvement_req_data=XtVaCreateManagedWidget("helpimprreqdata", labelWidgetClass, help_right_form, NULL); if(type==HELP_IMPROVEMENT) { help_improvement_upkeep=XtVaCreateManagedWidget("helpimprupkeep", labelWidgetClass, help_right_form, NULL); help_improvement_upkeep_data=XtVaCreateManagedWidget("helpimprupkeepdata", labelWidgetClass, help_right_form, NULL); } else { help_wonder_obsolete=XtVaCreateManagedWidget("helpwonderobsolete", labelWidgetClass, help_right_form, NULL); help_wonder_obsolete_data=XtVaCreateManagedWidget("helpwonderobsoletedata", labelWidgetClass, help_right_form, NULL); } help_improvement_tree=XtVaCreateManagedWidget("helptree", treeWidgetClass, help_right_form, XtNwidth, w2, XtNheight, 2*70, NULL); XawTreeForceLayout(help_improvement_tree); help_type=HELP_IMPROVEMENT; } else if(type==HELP_UNIT) { help_text = XtVaCreateManagedWidget("helptext", asciiTextWidgetClass, help_right_form, XtNeditType, XawtextRead, XtNscrollVertical, XawtextScrollAlways, XtNwidth, w2, XtNheight, 70, NULL); help_unit_cost=XtVaCreateManagedWidget("helpunitcost", labelWidgetClass, help_right_form, NULL); help_unit_cost_data=XtVaCreateManagedWidget("helpunitcostdata", labelWidgetClass, help_right_form, NULL); help_unit_attack=XtVaCreateManagedWidget("helpunitattack", labelWidgetClass, help_right_form, NULL); help_unit_attack_data=XtVaCreateManagedWidget("helpunitattackdata", labelWidgetClass, help_right_form, NULL); help_unit_def=XtVaCreateManagedWidget("helpunitdef", labelWidgetClass, help_right_form, NULL); help_unit_def_data=XtVaCreateManagedWidget("helpunitdefdata", labelWidgetClass, help_right_form, NULL); help_unit_move=XtVaCreateManagedWidget("helpunitmove", labelWidgetClass, help_right_form, NULL); help_unit_move_data=XtVaCreateManagedWidget("helpunitmovedata", labelWidgetClass, help_right_form, NULL); help_unit_tile=XtVaCreateManagedWidget("helpunittile", labelWidgetClass, help_right_form, XtNwidth, NORMAL_TILE_WIDTH, XtNheight, NORMAL_TILE_HEIGHT, NULL); XtAddCallback(help_unit_tile, XtNdestroyCallback,free_bitmap_destroy_callback, NULL); help_unit_fp=XtVaCreateManagedWidget("helpunitfp", labelWidgetClass, help_right_form, NULL); help_unit_fp_data=XtVaCreateManagedWidget("helpunitfpdata", labelWidgetClass, help_right_form, NULL); help_unit_hp=XtVaCreateManagedWidget("helpunithp", labelWidgetClass, help_right_form, NULL); help_unit_hp_data=XtVaCreateManagedWidget("helpunithpdata", labelWidgetClass, help_right_form, NULL); help_unit_visrange=XtVaCreateManagedWidget("helpunitvisrange", labelWidgetClass, help_right_form, NULL); help_unit_visrange_data=XtVaCreateManagedWidget("helpunitvisrangedata", labelWidgetClass, help_right_form, NULL); help_improvement_req=XtVaCreateManagedWidget("helpimprreq", labelWidgetClass, help_right_form, XtNfromVert,help_unit_hp, NULL); help_improvement_req_data=XtVaCreateManagedWidget("helpimprreqdata", labelWidgetClass, help_right_form, XtNfromVert,help_unit_hp, NULL); help_wonder_obsolete=XtVaCreateManagedWidget("helpwonderobsolete", labelWidgetClass, help_right_form, XtNfromVert,help_unit_hp, NULL); help_wonder_obsolete_data=XtVaCreateManagedWidget("helpwonderobsoletedata", labelWidgetClass, help_right_form, XtNfromVert,help_unit_hp, NULL); help_improvement_tree=XtVaCreateManagedWidget("helptree", treeWidgetClass, help_right_form, XtNwidth, w2, XtNheight, 2*70, NULL); XawTreeForceLayout(help_improvement_tree); } else if(type==HELP_TECH) { help_text = XtVaCreateManagedWidget("helptext", asciiTextWidgetClass, help_right_form, XtNeditType, XawtextRead, XtNscrollVertical, XawtextScrollAlways, XtNwidth, w2, XtNheight, 70, NULL); help_improvement_tree=XtVaCreateManagedWidget("helptree", treeWidgetClass, help_right_form, XtNwidth, w2, XtNheight, 2*70, XtNfromVert,help_text, NULL); XawTreeForceLayout(help_improvement_tree); } } /************************************************************************** ... **************************************************************************/ void help_update_dialog(struct help_item *pitem) { int i, j; char *top; set_title_topic(pitem); /* figure out what kind of item is required for pitem ingo */ for(top=pitem->topic; *top==' '; ++top); for(i=0; itext, NULL); } else { create_help_page(HELP_WONDER); sprintf(buf, "%d ", improvement_types[i].build_cost); xaw_set_label(help_improvement_cost_data, buf); xaw_set_label(help_improvement_req_data, advances[improvement_types[i].tech_requirement].name); xaw_set_label(help_wonder_obsolete_data, advances[improvement_types[i].obsolete_by].name); create_tech_tree(help_improvement_tree, 0, improvement_types[i].tech_requirement, 3); set_title_topic(pitem); XtVaSetValues(help_text, XtNstring, pitem->text, NULL); } return; } } for(i=0; iname)) { char buf[64]; create_help_page(HELP_UNIT); sprintf(buf, "%d ", get_unit_type(i)->build_cost); xaw_set_label(help_unit_cost_data, buf); sprintf(buf, "%d ", get_unit_type(i)->attack_strength); xaw_set_label(help_unit_attack_data, buf); sprintf(buf, "%d ", get_unit_type(i)->defense_strength); xaw_set_label(help_unit_def_data, buf); sprintf(buf, "%d ", get_unit_type(i)->move_rate/3); xaw_set_label(help_unit_move_data, buf); sprintf(buf, "%d ", get_unit_type(i)->firepower); xaw_set_label(help_unit_fp_data, buf); sprintf(buf, "%d ", get_unit_type(i)->hp); xaw_set_label(help_unit_hp_data, buf); sprintf(buf, "%d ", get_unit_type(i)->vision_range); xaw_set_label(help_unit_visrange_data, buf); XtVaSetValues(help_text, XtNstring, pitem->text, NULL); if(get_unit_type(i)->tech_requirement==A_LAST) xaw_set_label(help_improvement_req_data, "None"); else { xaw_set_label(help_improvement_req_data, advances[get_unit_type(i)->tech_requirement].name); create_tech_tree(help_improvement_tree, 0, get_unit_type(i)->tech_requirement, 3); } if(get_unit_type(i)->obsoleted_by==-1) xaw_set_label(help_wonder_obsolete_data, "None"); else xaw_set_label(help_wonder_obsolete_data, get_unit_type(get_unit_type(i)->obsoleted_by)->name); xaw_set_bitmap(help_unit_tile, create_overlay_unit(i)); set_title_topic(pitem); return; } } for(i=0; itext); for(j=0; jtech_requirement) sprintf(buf+strlen(buf), "Allows %s.\n", get_unit_type(j)->name); } for(j=0; jtext, NULL); } /************************************************************************** ... **************************************************************************/ int help_tree_destroy_children(Widget w) { Widget *children=0; Cardinal cnt; int did_destroy=0; XtVaGetValues(help_improvement_tree, XtNchildren, &children, XtNnumChildren, &cnt, NULL); for(; cnt>0; --cnt, ++children) { if(XtIsSubclass(*children, commandWidgetClass)) { Widget par; XtVaGetValues(*children, XtNtreeParent, &par, NULL); if(par==w) { help_tree_destroy_children(*children); XtDestroyWidget(*children); did_destroy=1; } } } return did_destroy; } /************************************************************************** ... **************************************************************************/ void help_tree_node_callback(Widget w, XtPointer client_data, XtPointer call_data) { int tech=(int)client_data; if(!help_tree_destroy_children(w)) { if(advances[tech].req[0]!=A_NONE) create_tech_tree(help_improvement_tree, w, advances[tech].req[0], 1); if(advances[tech].req[1]!=A_NONE) create_tech_tree(help_improvement_tree, w, advances[tech].req[1], 1); } } /************************************************************************** ... **************************************************************************/ void help_list_callback(Widget w, XtPointer client_data, XtPointer call_data) { XawListReturnStruct *ret; ret=XawListShowCurrent(help_list); if(ret->list_index!=XAW_LIST_NONE) { struct help_item *pitem=find_help_item_position(ret->list_index); if(pitem) { help_update_dialog(pitem); set_title_topic(pitem); /* XtVaSetValues(help_text, XtNstring, pitem->text, NULL);*/ } XawListHighlight(help_list, ret->list_index); } } /************************************************************************** ... **************************************************************************/ void help_close_command_callback(Widget w, XtPointer client_data, XtPointer call_data) { XtDestroyWidget(help_dialog_shell); help_dialog_shell=0; } /************************************************************************** ... **************************************************************************/ void select_help_item(int item) { int nitems, pos; Dimension height; XtVaGetValues(help_list, XtNnumberStrings, &nitems, NULL); XtVaGetValues(help_list, XtNheight, &height, NULL); pos= (((double)item)/nitems)*height; XawViewportSetCoordinates(help_viewport, 0, pos); XawListHighlight(help_list, item); } void select_help_item_string(char *item) { int idx; struct help_item *pitem; for(idx=0, pitem=head; pitem; pitem=pitem->next, ++idx) { char *p=pitem->topic; while(*p==' ') ++p; if(!strcmp(item, p)) break; } if(!pitem) return; select_help_item(idx); help_update_dialog(pitem); }