ARB
MG_main.cxx
Go to the documentation of this file.
1 // =============================================================== //
2 // //
3 // File : MG_main.cxx //
4 // Purpose : //
5 // //
6 // Institute of Microbiology (Technical University Munich) //
7 // http://www.arb-home.de/ //
8 // //
9 // =============================================================== //
10 
11 #include "merge.hxx"
12 #include <AW_rename.hxx>
13 #include <awt.hxx>
14 #include <awt_misc.hxx>
15 
16 #include <aw_preset.hxx>
17 #include <aw_awars.hxx>
18 #include <aw_file.hxx>
19 #include <aw_msg.hxx>
20 #include <aw_root.hxx>
21 #include <aw_question.hxx>
22 
23 #include <arb_progress.h>
24 #include <arb_file.h>
25 #include <macros.hxx>
26 
27 // AISC_MKPT_PROMOTE:// source and destination DBs for merge:
28 // AISC_MKPT_PROMOTE:extern GBDATA *GLOBAL_gb_src;
29 // AISC_MKPT_PROMOTE:extern GBDATA *GLOBAL_gb_dst;
30 
33 
34 static void (*MG_exit_cb)(const char *) = NULp;
35 
36 static void MG_exit(AW_window *aww, bool start_dst_db) {
37  char *arb_ntree_restart_args = NULp;
38 
39  if (start_dst_db) {
40  // restart with destination DB
41  const char *dst_db_name = aww->get_root()->awar(AWAR_DB_DST"/file_name")->read_char_pntr();
42  arb_ntree_restart_args = GBS_global_string_copy("'%s'", dst_db_name);
43  }
44  else {
45  // restart in directory of destination- or source-DB
46  const char *dst_db_dir = aww->get_root()->awar(AWAR_DB_DST"/directory")->read_char_pntr();
47  if (GB_is_directory(dst_db_dir)) {
48  arb_ntree_restart_args = GBS_global_string_copy("'%s'", dst_db_dir);
49  }
50  else {
51  const char *src_db_dir = aww->get_root()->awar(AWAR_DB_SRC"/directory")->read_char_pntr();
52  if (GB_is_directory(src_db_dir)) {
53  arb_ntree_restart_args = GBS_global_string_copy("'%s'", src_db_dir);
54  }
55  }
56  }
57 
59 
60  // @@@ code below duplicates code from nt_disconnect_from_db()
61  aww->get_root()->unlink_awars_from_DB(GLOBAL_gb_src);
62  aww->get_root()->unlink_awars_from_DB(GLOBAL_gb_dst);
63 
64  GB_close(GLOBAL_gb_src);
65  GB_close(GLOBAL_gb_dst);
66 
68 
69  MG_exit_cb(arb_ntree_restart_args);
70 }
71 
72 static void MG_save_cb(AW_window *aww, bool source_database) {
73  GBDATA *gb_db_to_save = source_database ? GLOBAL_gb_src : GLOBAL_gb_dst;
74  const char *base_name = source_database ? AWAR_DB_SRC : AWAR_DB_DST; // awar basename
75 
76  AW_root *awr = aww->get_root();
77  char *name = awr->awar(GBS_global_string("%s/file_name", base_name))->read_string();
78  const char *atype = awr->awar(GBS_global_string("%s/type", base_name))->read_char_pntr();
79  const char *ctype = awr->awar(GBS_global_string("%s/compression", base_name))->read_char_pntr();
80  char *type = GBS_global_string_copy("%s%s", atype, ctype);
81 
82  arb_progress progress(GBS_global_string("Saving %s database", source_database ? "source" : "target"));
83 
84  awr->dont_save_awars_with_default_value(gb_db_to_save); // has to be done outside transaction!
85  GB_begin_transaction(gb_db_to_save);
86  GBT_check_data(gb_db_to_save, NULp);
87  GB_commit_transaction(gb_db_to_save);
88 
89  GB_ERROR error = GB_save(gb_db_to_save, name, type);
90  if (error) aw_message(error);
91  else AW_refresh_fileselection(awr, base_name);
92 
93  free(type);
94  free(name);
95 }
96 
97 static AW_window *MG_create_save_as_window(AW_root *aw_root, bool source_database) {
98  GBDATA *gb_db_to_save = source_database ? GLOBAL_gb_src : GLOBAL_gb_dst;
99  const char *base_name = source_database ? AWAR_DB_SRC : AWAR_DB_DST; // awar basename
100  const char *window_id = source_database ? "MERGE_SAVE_DB_I" : "MERGE_SAVE_WHOLE_DB";
101 
102  aw_root->awar_string(AWAR_DB_COMMENT, "<no description>", gb_db_to_save);
103 
104  AW_window_simple *aws = new AW_window_simple;
105  aws->init(aw_root, window_id, GBS_global_string("Save whole %s database", source_database ? "source" : "target"));
106  aws->load_xfig("save_as.fig");
107 
108  aws->at("close");
109  aws->callback(AW_POPDOWN);
110  aws->create_button("CLOSE", "CLOSE", "C");
111 
112  aws->at("help");
113  aws->callback(makeHelpCallback("save.hlp"));
114  aws->create_button("HELP", "HELP", "H");
115 
116  AW_create_standard_fileselection(aws, base_name);
117 
118  aws->at("type");
119  AWT_insert_DBsaveType_selector(aws, GBS_global_string("%s/type", base_name));
120 
121  aws->at("compression");
122  AWT_insert_DBcompression_selector(aws, GBS_global_string("%s/compression", base_name));
123 
124  aws->at("save");
125  aws->callback(makeWindowCallback(MG_save_cb, source_database));
126  aws->create_button("SAVE", "SAVE", "S");
127 
128  aws->at("comment");
129  aws->create_text_field(AWAR_DB_COMMENT);
130 
131  return aws;
132 }
133 
135  char *name = aww->get_root()->awar(AWAR_DB_DST"/file_name")->read_string();
136 
137  arb_progress progress("Saving database");
138  GB_begin_transaction(GLOBAL_gb_dst);
139  GBT_check_data(GLOBAL_gb_dst, NULp);
140  GB_commit_transaction(GLOBAL_gb_dst);
141 
142  GB_ERROR error = GB_save_quick_as(GLOBAL_gb_dst, name);
143  if (error) aw_message(error);
145 
146  free(name);
147 }
148 
149 static void MG_create_db_dependent_awars(AW_root *aw_root, GBDATA *gb_src, GBDATA *gb_dst) {
150  MG_create_db_dependent_rename_awars(aw_root, gb_src, gb_dst);
151 }
152 
153 AW_window *MERGE_create_main_window(AW_root *aw_root, bool dst_is_new, void (*exit_cb)(const char *)) {
154  // 'dst_is_new' == true -> setup dest DB according to source-DB
155  //
156  // GLOBAL_gb_src and GLOBAL_gb_dst have to be opened before
157 
158  // @@@ add GB_is_client and use that here
159  bool src_is_client = GB_read_clients(GLOBAL_gb_src)<0;
160  bool dst_is_client = GB_read_clients(GLOBAL_gb_dst)<0;
161 
162  MG_exit_cb = exit_cb;
163 
164  mg_assert(contradicted(src_is_client, GB_is_server(GLOBAL_gb_src)));
165  mg_assert(contradicted(dst_is_client, GB_is_server(GLOBAL_gb_dst)));
166 
167  mg_assert(!(src_is_client && dst_is_client));
168 
169  bool save_src_enabled = !src_is_client;
170  bool save_dst_enabled = !dst_is_client;
171 
172  {
173  GBDATA *gb_main_4_macros = NULp;
174  const char *app_id = NULp;
175 
176  if (src_is_client) {
177  gb_main_4_macros = GLOBAL_gb_src;
178  app_id = "ARB_MERGE_OUTOF";
179  }
180  else if (dst_is_client) {
181  gb_main_4_macros = GLOBAL_gb_dst;
182  app_id = "ARB_MERGE_INTO";
183  }
184  else {
185  gb_main_4_macros = GLOBAL_gb_dst; // does not matter
186  app_id = "ARB_MERGE";
187  }
188 
189  GB_ERROR error = configure_macro_recording(aw_root, app_id, gb_main_4_macros);
190  aw_message_if(error);
191  }
192 
193  mg_assert(aw_root);
194 
195  {
196  GB_transaction ta_merge(GLOBAL_gb_src);
197  GB_transaction ta_dest(GLOBAL_gb_dst);
198 
199  GBT_mark_all(GLOBAL_gb_dst, 0); // unmark everything in dest DB
200 
201  // set DB-type to non-genome (compatibility to old DBs)
202  // when exporting to new DB (dest_is_new == true) -> use DB-type of merge-DB
203  bool merge_is_genome = GEN_is_genome_db(GLOBAL_gb_src, 0);
204 
205  int dest_genome = 0;
206  if (dst_is_new) {
207  if (merge_is_genome) {
208  dest_genome = aw_question("select_dest_dbtype", "Enter destination DB-type", "Normal,Genome");
209  }
210  else {
211  dest_genome = 0; // from non-genome -> to non-genome
212  }
213  }
214 
215  GEN_is_genome_db(GLOBAL_gb_dst, dest_genome); // does not change anything if type is already defined
216  }
217 
218  {
219  GB_transaction ta_merge(GLOBAL_gb_src);
220  GB_transaction ta_dest(GLOBAL_gb_dst);
221 
222  GB_change_my_security(GLOBAL_gb_dst, 6); // generally raises user securities in merge tool (allow anything)
223  GB_change_my_security(GLOBAL_gb_src, 6);
224 
225  MG_create_db_dependent_awars(aw_root, GLOBAL_gb_src, GLOBAL_gb_dst);
226  }
227 
228  {
229  GB_transaction ta_merge(GLOBAL_gb_src);
230  GB_transaction ta_dest(GLOBAL_gb_dst);
231 
232  MG_set_renamed(false, aw_root, "Not renamed yet.");
233 
235  awm->init(aw_root, "ARB_MERGE", "ARB_MERGE");
236  awm->load_xfig("merge/main.fig");
237 
238  // create menus
239 #if defined(DEBUG)
240  AWT_create_debug_menu(awm);
241 #endif // DEBUG
242 
243  awm->create_menu("File", "F", AWM_ALL);
244  if (save_src_enabled) {
245  awm->insert_menu_topic("save_DB1", "Save source DB ...", "S", "save.hlp", AWM_ALL, makeCreateWindowCallback(MG_create_save_as_window, true));
246  }
247 
248  awm->insert_menu_topic("quit", "Quit", "Q", "quit.hlp", AWM_ALL, makeWindowCallback(MG_exit, false));
249  if (save_dst_enabled) {
250  awm->insert_menu_topic("quitnstart", "Quit & start target DB", "D", "quit.hlp", AWM_ALL, makeWindowCallback(MG_exit, true));
251  }
252 
253  insert_macro_menu_entry(awm, true);
254 
255  awm->create_menu("Properties", "P", AWM_ALL);
257  awm->sep______________();
258  awm->insert_menu_topic("save_props", "Save properties (ntree.arb)", "p", "savedef.hlp", AWM_ALL, AW_save_properties);
259 
260  awm->insert_help_topic("ARB_MERGE help", "M", "arb_merge.hlp", AWM_ALL, makeHelpCallback("arb_merge.hlp"));
261 
262 
263  // display involved databases
264  awm->button_length(28);
265 
266  awm->at("db1"); awm->create_button(NULp, AWAR_DB_SRC"/name", NULp, "+");
267  awm->at("db2"); awm->create_button(NULp, AWAR_DB_DST"/name", NULp, "+");
268 
269 
270  // add main controls
271  awm->button_length(32);
272 
273  {
274  // conditional section:
275  // when exporting into a new database there is no need to adapt alignments or names
276 
277  if (dst_is_new) awm->sens_mask(AWM_DISABLED);
278 
279  awm->at("alignment");
281  awm->help_text("mg_alignment.hlp");
282  awm->create_button("CHECK_ALIGNMENTS", "Check alignments ...");
283 
284  awm->at("names");
286  awm->help_text("mg_names.hlp");
287  awm->create_button("CHECK_NAMES", "Check IDs ...");
288 
289  if (dst_is_new) {
290  awm->sens_mask(AWM_ALL);
291  MG_set_renamed(true, aw_root, "Not necessary");
292  }
293  }
294 
295  awm->at("species");
296  awm->callback(makeCreateWindowCallback(MG_create_merge_species_window, dst_is_new));
297  awm->help_text("mg_species.hlp");
298  awm->create_button("TRANSFER_SPECIES", "Transfer species ... ");
299 
300  awm->at("extendeds");
302  awm->help_text("mg_extendeds.hlp");
303  awm->create_button("TRANSFER_SAIS", "Transfer SAIs ...");
304 
305  awm->at("trees");
307  awm->help_text("mg_trees.hlp");
308  awm->create_button("TRANSFER_TREES", "Transfer trees ...");
309 
310  awm->at("configs");
312  awm->help_text("mg_species_configs.hlp");
313  awm->create_button("TRANSFER_CONFIGS", "Transfer configurations ...");
314 
315  {
316  // conditional section:
317  // allow save only when not merging into DB running inside ARB_NT
318 
319  if (!save_dst_enabled) awm->sens_mask(AWM_DISABLED);
320 
321  awm->at("save");
322  awm->callback(makeCreateWindowCallback(MG_create_save_as_window, false));
323  awm->help_text("save.hlp");
324  awm->create_button("SAVE_WHOLE_DB2", "Save whole target DB as ...");
325 
326  awm->at("save_quick");
328  awm->help_text("save.hlp");
329  awm->create_button("SAVE_CHANGES_OF_DB2", "Quick-save changes of target DB");
330 
331  awm->sens_mask(AWM_ALL);
332  }
333 
334  awm->at("quit");
335  awm->callback(makeWindowCallback(MG_exit, false));
336  awm->create_button("QUIT", save_dst_enabled ? "Quit" : "Close");
337 
338  awm->activate();
339 
340  return awm;
341  }
342 }
343 
345  MG_create_trees_awar(awr, aw_def);
346  MG_create_config_awar(awr, aw_def);
347  MG_create_extendeds_awars(awr, aw_def);
348  MG_create_species_awars(awr, aw_def);
349  MG_create_gene_species_awars(awr, aw_def);
350 
351  MG_create_rename_awars(awr, aw_def);
352 
353 #if defined(DEBUG)
354  AWT_create_db_browser_awars(awr, aw_def);
355 #endif // DEBUG
356 }
357 
358 inline const char *get_awar_name(const char *awar_base_name, const char *entry) {
359  return GBS_global_string("%s/%s", awar_base_name, entry);
360 }
361 
362 static void filename_changed_cb(AW_root *awr, const char *awar_base_name) {
363  AW_awar *filename_awar = awr->awar(get_awar_name(awar_base_name, "file_name"));
364 
365  char *name;
366  char *suffix;
367  GB_split_full_path(filename_awar->read_char_pntr(), NULp, NULp, &name, &suffix);
368 
369  if (name) {
370  AW_awar *name_awar = awr->awar(get_awar_name(awar_base_name, "name"));
371  const char *shown_name;
372  if (strcmp(name, ":") == 0 && !suffix) {
373  shown_name = ": (DB loaded in ARB_NT)";
374  }
375  else {
376  shown_name = GB_append_suffix(name, suffix);
377  }
378  name_awar->write_string(shown_name);
379  }
380 
381  free(name);
382  free(suffix);
383 }
384 
385 static void create_fileselection_and_name_awars(AW_root *awr, AW_default aw_def, const char *awar_base_name, const char *filename) {
386  AW_create_fileselection_awars(awr, awar_base_name, "", ".arb", filename);
387 
388  awr->awar_string(get_awar_name(awar_base_name, "name"), "", aw_def); // create awar to display DB-names w/o path
389  AW_awar *filename_awar = awr->awar(get_awar_name(awar_base_name, "file_name")); // defined by AW_create_fileselection_awars above
390 
391  filename_awar->add_callback(makeRootCallback(filename_changed_cb, awar_base_name));
392  filename_awar->touch(); // trigger callback once
393 }
394 
395 void MERGE_create_db_file_awars(AW_root *awr, AW_default aw_def, const char *src_name, const char *dst_name) {
396  create_fileselection_and_name_awars(awr, aw_def, AWAR_DB_DST, dst_name);
397  create_fileselection_and_name_awars(awr, aw_def, AWAR_DB_SRC, src_name);
398 }
399 
GB_ERROR GB_begin_transaction(GBDATA *gbd)
Definition: arbdb.cxx:2516
void MG_create_trees_awar(AW_root *aw_root, AW_default aw_def)
Definition: MG_trees.cxx:33
const char * GB_ERROR
Definition: arb_core.h:25
GB_TYPES type
GB_ERROR GB_commit_transaction(GBDATA *gbd)
Definition: arbdb.cxx:2539
void MERGE_create_db_file_awars(AW_root *awr, AW_default aw_def, const char *src_name, const char *dst_name)
Definition: MG_main.cxx:395
void button_length(int length)
Definition: AW_at.cxx:283
void sens_mask(AW_active mask)
Definition: AW_window.cxx:124
bool GB_is_server(GBDATA *gbd)
Definition: adcomm.cxx:1697
GB_ERROR GB_save(GBDATA *gb, const char *path, const char *savetype)
void insert_menu_topic(const char *id, const char *name, const char *mnemonic, const char *help_text_, AW_active mask, const WindowCallback &wcb)
Definition: AW_window.cxx:592
void load_xfig(const char *file, bool resize=true)
Definition: AW_window.cxx:717
AW_window * MERGE_create_main_window(AW_root *aw_root, bool dst_is_new, void(*exit_cb)(const char *))
Definition: MG_main.cxx:153
void at(int x, int y)
Definition: AW_at.cxx:93
void dont_save_awars_with_default_value(GBDATA *gb_db)
Definition: AW_root.cxx:605
void AW_create_standard_fileselection(AW_window *aws, const char *awar_prefix)
Definition: aw_file.hxx:30
static void MG_exit(AW_window *aww, bool start_dst_db)
Definition: MG_main.cxx:36
const char * GBS_global_string(const char *templat,...)
Definition: arb_msg.cxx:204
static void create_fileselection_and_name_awars(AW_root *awr, AW_default aw_def, const char *awar_base_name, const char *filename)
Definition: MG_main.cxx:385
void AW_POPDOWN(AW_window *window)
Definition: AW_window.cxx:52
void AW_insert_common_property_menu_entries(AW_window_menu_modes *awmm)
Definition: AW_preset.cxx:1445
static void MG_save_cb(AW_window *aww, bool source_database)
Definition: MG_main.cxx:72
__ATTR__USERESULT GB_ERROR configure_macro_recording(AW_root *aw_root, const char *client_id, GBDATA *gb_main)
Definition: trackers.cxx:454
void activate()
Definition: aw_window.hxx:354
void AWT_insert_DBcompression_selector(AW_window *aww, const char *awar_name)
Definition: AWT_misc.cxx:62
GBDATA * GLOBAL_gb_dst
Definition: MG_main.cxx:32
#define AWAR_DB_SRC
Definition: merge.hxx:32
AW_awar * add_callback(const RootCallback &cb)
Definition: AW_awar.cxx:234
void GB_change_my_security(GBDATA *gbd, int level)
Definition: arbdb.cxx:1625
const char * read_char_pntr() const
Definition: AW_awar.cxx:171
static AW_root * SINGLETON
Definition: aw_root.hxx:102
WindowCallback makeHelpCallback(const char *helpfile)
Definition: aw_window.hxx:106
void MG_create_db_dependent_rename_awars(AW_root *aw_root, GBDATA *gb_src, GBDATA *gb_dst)
Definition: MG_names.cxx:58
AW_window * MG_create_merge_trees_window(AW_root *awr)
Definition: MG_trees.cxx:207
void MERGE_create_all_awars(AW_root *awr, AW_default aw_def)
Definition: MG_main.cxx:344
#define mg_assert(bed)
Definition: merge.hxx:24
void AW_save_properties(AW_window *aw)
Definition: AW_preset.cxx:1452
static void MG_create_db_dependent_awars(AW_root *aw_root, GBDATA *gb_src, GBDATA *gb_dst)
Definition: MG_main.cxx:149
void create_menu(const char *name, const char *mnemonic, AW_active mask=AWM_ALL)
Definition: AW_window.cxx:469
void MG_create_extendeds_awars(AW_root *aw_root, AW_default aw_def)
void help_text(const char *id)
Definition: AW_window.cxx:113
void touch()
Definition: AW_awar.cxx:210
static void error(const char *msg)
Definition: mkptypes.cxx:96
void AW_create_fileselection_awars(AW_root *awr, const char *awar_base, const char *directories, const char *filter, const char *file_name)
Definition: AW_file.cxx:72
void MG_create_species_awars(AW_root *aw_root, AW_default aw_def)
Definition: MG_species.cxx:65
void insert_help_topic(const char *labeli, const char *mnemonic, const char *helpText, AW_active mask, const WindowCallback &cb)
Definition: AW_window.cxx:566
long GB_read_clients(GBDATA *gbd)
Definition: adcomm.cxx:1682
void MG_set_renamed(bool renamed, AW_root *aw_root, const char *reason)
Definition: MG_names.cxx:114
char * read_string() const
Definition: AW_awar.cxx:201
AW_awar * awar(const char *awar)
Definition: AW_root.cxx:554
GB_ERROR GB_save_quick_as(GBDATA *gbd, const char *path)
void AWT_insert_DBsaveType_selector(AW_window *aww, const char *awar_name)
Definition: AWT_misc.cxx:39
void AW_refresh_fileselection(AW_root *awr, const char *awar_prefix)
Definition: AW_file.cxx:944
AW_window * MG_create_merge_species_window(AW_root *awr, bool dst_is_new)
GBDATA * GLOBAL_gb_src
Definition: MG_main.cxx:31
static AW_window_menu_modes_opengl * awm
void unlink_awars_from_DB(GBDATA *gb_main)
Definition: AW_root.cxx:635
GB_CSTR GB_append_suffix(const char *name, const char *suffix)
Definition: adsocket.cxx:952
AW_window * MG_create_merge_names_window(AW_root *awr)
Definition: MG_names.cxx:173
void MG_create_rename_awars(AW_root *aw_root, AW_default aw_def)
Definition: MG_names.cxx:32
void MG_create_gene_species_awars(AW_root *aw_root, AW_default aw_def)
int aw_question(const char *unique_id, const char *question, const char *buttons, bool sameSizeButtons, const char *helpfile)
Definition: AW_question.cxx:26
static void filename_changed_cb(AW_root *awr, const char *awar_base_name)
Definition: MG_main.cxx:362
#define AWAR_DB_DST
Definition: merge.hxx:33
bool GB_is_directory(const char *path)
Definition: arb_file.cxx:176
#define AWAR_DB_COMMENT
AW_window * MG_create_merge_SAIs_window(AW_root *awr)
void aw_message(const char *msg)
Definition: AW_status.cxx:932
void insert_macro_menu_entry(AW_window *awm, bool prepend_separator)
Definition: macro_gui.cxx:171
AW_root * get_root()
Definition: aw_window.hxx:348
void GB_split_full_path(const char *fullpath, char **res_dir, char **res_fullname, char **res_name_only, char **res_suffix)
Definition: adsocket.cxx:1234
static AW_window * MG_create_save_as_window(AW_root *aw_root, bool source_database)
Definition: MG_main.cxx:97
void shutdown_macro_recording(AW_root *aw_root)
Definition: trackers.cxx:470
#define NULp
Definition: cxxforward.h:97
AW_window * MG_create_merge_configs_window(AW_root *awr)
Definition: MG_configs.cxx:122
GB_ERROR write_string(const char *aw_string)
const char * get_awar_name(const char *awar_base_name, const char *entry)
Definition: MG_main.cxx:358
void sep______________()
Definition: AW_window.cxx:750
static void MG_save_quick_result_cb(AW_window *aww)
Definition: MG_main.cxx:134
void GBT_mark_all(GBDATA *gb_main, int flag)
Definition: aditem.cxx:295
void callback(const WindowCallback &cb)
Definition: AW_window.cxx:130
AW_awar * awar_string(const char *var_name, const char *default_value="", AW_default default_file=AW_ROOT_DEFAULT)
Definition: AW_root.cxx:570
AW_window * MG_create_merge_alignment_window(AW_root *awr)
GB_ERROR GBT_check_data(GBDATA *Main, const char *alignment_name)
Definition: adali.cxx:217
bool GEN_is_genome_db(GBDATA *gb_main, int default_value)
Definition: adGene.cxx:20
static void(* MG_exit_cb)(const char *)
Definition: MG_main.cxx:34
void MG_create_config_awar(AW_root *aw_root, AW_default aw_def)
Definition: MG_configs.cxx:31
void init(AW_root *root, const char *wid, const char *windowname)
Definition: AW_window.cxx:2817
void aw_message_if(GB_ERROR error)
Definition: aw_msg.hxx:21
char * GBS_global_string_copy(const char *templat,...)
Definition: arb_msg.cxx:195
void GB_close(GBDATA *gbd)
Definition: arbdb.cxx:649
void create_button(const char *macro_name, AW_label label, const char *mnemonic=NULp, const char *color=NULp)
Definition: AW_button.cxx:446