source: tags/arb_5.3/GENOM/EXP_main.cxx

Last change on this file was 6063, checked in by westram, 15 years ago
  • enabled PGT for DEBUG version
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 7.4 KB
Line 
1//  ==================================================================== //
2//                                                                       //
3//    File      : EXP_main.cxx                                           //
4//    Purpose   :                                                        //
5//                                                                       //
6//                                                                       //
7//  Coded by Ralf Westram (coder@reallysoft.de) in September 2001        //
8//  Copyright Department of Microbiology (Technical University Munich)   //
9//                                                                       //
10//  Visit our web site at: http://www.arb-home.de/                       //
11//                                                                       //
12//                                                                       //
13//  ==================================================================== //
14
15#include <awt.hxx>
16#include <awt_input_mask.hxx>
17#include <aw_awars.hxx>
18#include <arbdbt.h>
19#include <ntree.hxx>
20
21class AWT_canvas;
22#include <../NTREE/nt_cb.hxx>
23
24#include "EXP.hxx"
25#include "EXP_local.hxx"
26#include "EXP_interface.hxx"
27
28#include <cstdlib>
29
30using namespace std;
31
32//  -------------------------------------------------------
33//      void EXP_species_name_changed_cb(AW_root *awr)
34//  -------------------------------------------------------
35void EXP_species_name_changed_cb(AW_root */*awr*/) {
36}
37
38//  --------------------------------------------------
39//      void EXP_update_combined_cb(AW_root *awr)
40//  --------------------------------------------------
41void EXP_update_combined_cb(AW_root *awr) {
42    char       *organism   = awr->awar(AWAR_ORGANISM_NAME)->read_string();
43    char       *experiment = awr->awar(AWAR_EXPERIMENT_NAME)->read_string();
44    const char *combined   = GBS_global_string("%s/%s", organism, experiment);
45    awr->awar(AWAR_COMBINED_EXPERIMENT_NAME)->write_string(combined);
46    free(experiment);
47    free(organism);
48}
49
50//  -------------------------------------------------------------------
51//      void EXP_create_awars(AW_root *aw_root, AW_default aw_def)
52//  -------------------------------------------------------------------
53void EXP_create_awars(AW_root *aw_root, AW_default /*aw_def*/) {
54    aw_root->awar_string(AWAR_EXPERIMENT_NAME, "" , GLOBAL_gb_main)->add_callback((AW_RCB0)EXP_update_combined_cb);
55    aw_root->awar_string(AWAR_PROTEOM_NAME, "" , GLOBAL_gb_main);
56    aw_root->awar_string(AWAR_PROTEIN_NAME, "" , GLOBAL_gb_main);
57    aw_root->awar_string(AWAR_ORGANISM_NAME, "" ,   GLOBAL_gb_main)->add_callback((AW_RCB0)EXP_update_combined_cb);
58    aw_root->awar_string(AWAR_COMBINED_EXPERIMENT_NAME, "" , GLOBAL_gb_main);
59
60    aw_root->awar_string(AWAR_SPECIES_NAME,"",GLOBAL_gb_main)->add_callback((AW_RCB0)EXP_species_name_changed_cb);
61    aw_root->awar_string(AWAR_EXPERIMENT_DEST, "" , GLOBAL_gb_main);
62}
63
64//  -----------------------------------------------------------------------------
65//      class EXP_item_type_species_selector : public awt_item_type_selector
66//  -----------------------------------------------------------------------------
67class EXP_item_type_species_selector : public awt_item_type_selector {
68public:
69    EXP_item_type_species_selector() : awt_item_type_selector(AWT_IT_EXPERIMENT) {}
70    virtual ~EXP_item_type_species_selector() {}
71
72    virtual const char *get_self_awar() const {
73        return AWAR_COMBINED_EXPERIMENT_NAME;
74    }
75    virtual size_t get_self_awar_content_length() const {
76        return 12 + 1 + 40; // species-name+'/'+experiment_name
77    }
78    virtual void add_awar_callbacks(AW_root *root, void (*f)(AW_root*, AW_CL), AW_CL cl_mask) const { // add callbacks to awars
79        root->awar(get_self_awar())->add_callback(f, cl_mask);
80    }
81    virtual void remove_awar_callbacks(AW_root *root, void (*f)(AW_root*, AW_CL), AW_CL cl_mask) const { // add callbacks to awars
82        root->awar(get_self_awar())->remove_callback(f, cl_mask);
83    }
84    virtual GBDATA *current(AW_root *root) const { // give the current item
85        char   *species_name    = root->awar(AWAR_ORGANISM_NAME)->read_string();
86        char   *experiment_name = root->awar(AWAR_EXPERIMENT_NAME)->read_string();
87        GBDATA *gb_experiment   = 0;
88
89        if (species_name[0] && experiment_name[0]) {
90            GB_transaction dummy(GLOBAL_gb_main);
91            GBDATA *gb_species = GBT_find_species(GLOBAL_gb_main,species_name);
92            if (gb_species) {
93                gb_experiment = EXP_find_experiment(gb_species, experiment_name);
94            }
95        }
96
97        free(experiment_name);
98        free(species_name);
99
100        return gb_experiment;
101    }
102    virtual const char *getKeyPath() const { // give the keypath for items
103        return CHANGE_KEY_PATH_EXPERIMENTS;
104    }
105};
106
107static EXP_item_type_species_selector item_type_experiment;
108
109//  -----------------------------------------------------------------------------
110//      static void EXP_open_mask_window(AW_window *aww, AW_CL cl_id, AW_CL)
111//  -----------------------------------------------------------------------------
112static void EXP_open_mask_window(AW_window *aww, AW_CL cl_id, AW_CL) {
113    int                              id         = int(cl_id);
114    const awt_input_mask_descriptor *descriptor = AWT_look_input_mask(id);
115    exp_assert(descriptor);
116    if (descriptor) AWT_initialize_input_mask(aww->get_root(), GLOBAL_gb_main, &item_type_experiment, descriptor->get_internal_maskname(), descriptor->is_local_mask());
117}
118
119//  -----------------------------------------------------------------------
120//      static void GEN_create_mask_submenu(AW_window_menu_modes *awm)
121//  -----------------------------------------------------------------------
122static void EXP_create_mask_submenu(AW_window_menu_modes *awm) {
123    AWT_create_mask_submenu(awm, AWT_IT_EXPERIMENT, EXP_open_mask_window);
124}
125
126static AW_window *EXP_create_experiment_colorize_window(AW_root *aw_root) {
127    return awt_create_item_colorizer(aw_root, GLOBAL_gb_main, &EXP_item_selector);
128}
129
130#define AWMIMT awm->insert_menu_topic
131//  -------------------------------------------------------------------------------------
132//      void EXP_create_experiments_submenu(AW_window_menu_modes *awm, bool submenu)
133//  -------------------------------------------------------------------------------------
134void EXP_create_experiments_submenu(AW_window_menu_modes *awm, bool submenu) {
135    const char *title  = "Experiment";
136    const char *hotkey = "x";
137
138    if (submenu) awm->insert_sub_menu(title, hotkey);
139    else awm->create_menu(title, hotkey, "no.hlp", AWM_ALL);
140
141    {
142        AWMIMT( "experiment_info",   "Experiment information", "i", "experiment_info.hlp", AWM_ALL,EXP_popup_experiment_window, 0, 0);
143//         AWMIMT( "experiment_info",   "Experiment information", "i", "experiment_info.hlp", AWM_ALL,AW_POPUP,   (AW_CL)EXP_create_experiment_window, 0 );
144        AWMIMT( "experiment_search", "Search and query",       "q", "experiment_search.hlp", AWM_ALL,AW_POPUP,   (AW_CL)EXP_create_experiment_query_window, 0 );
145
146        EXP_create_mask_submenu(awm);
147
148        awm->insert_separator();
149        AWMIMT( "experiment_colors",    "Colors ...",           "C",    "mark_colors.hlp", AWM_ALL,AW_POPUP,   (AW_CL)EXP_create_experiment_colorize_window, 0);
150
151#if defined(DEBUG)
152        awm->insert_separator();
153        AWMIMT("pgt", "[debug-only] Proteom Genome Toolkit (PGT)", "P", "pgt.hlp", AWM_ALL, NT_system_cb, (AW_CL)"arb_pgt &", 0);
154#endif // DEVEL_KAI
155    }
156    if (submenu) awm->close_sub_menu();
157}
158
Note: See TracBrowser for help on using the repository browser.