source: tags/svn.1.5.4/RNA3D/RNA3D_Interface.cxx

Last change on this file was 8309, checked in by westram, 14 years ago
  • moved much code into static scope

(partly reverted by [8310])
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 27.0 KB
Line 
1#include "RNA3D_GlobalHeader.hxx"
2
3#include <GL/aw_window_ogl.hxx>
4#include <aw_window_Xm_interface.hxx>
5
6#include "RNA3D_Global.hxx"
7#include "RNA3D_Graphics.hxx"
8#include "RNA3D_OpenGLEngine.hxx"
9#include "RNA3D_Interface.hxx"
10#include "RNA3D_OpenGLGraphics.hxx"
11#include "RNA3D_StructureData.hxx"
12
13#include <string>
14#include <iostream>
15
16#include <X11/keysym.h>
17
18#include <aw_preset.hxx>
19#include <aw_root.hxx>
20#include <aw_msg.hxx>
21#include <aw_awars.hxx>
22
23
24using namespace std;
25
26static AW_window_menu_modes_opengl *awm;
27static XtAppContext                 appContext;
28static XtWorkProcId                 workId   = 0;
29
30// ========= SpinMolecule(XtPointer ...) : The Actual WorkProc Routine ============//
31// => Sets the Rotation speed to 0.05 : default speed in Rotation Mode.
32// => Calls RefreshOpenGLDisplay() : to calculate new rotate matrix
33//    and then, redraws the entire scene.
34// => Returns False : so that the work proc remains registered and
35//    the animation will continue.
36// ===============================================================================//
37
38static Boolean SpinMolecule(XtPointer /* clientData */) {
39    RNA3D->ROTATION_SPEED = 0.05;
40    RefreshOpenGLDisplay();
41    return false; // leave work proc active
42}
43
44// ========== RotateMoleculeStateChanged(void)==================================//
45// => if bAutoRotate, removes the WorkProc routine and sets bAutoRotate to false.
46// => if not, adds the WorkProc routine [SpinMolecule()] and sets bAutoRotate to true.
47// bAutoRotate is used in recalculation of Rotation Matrix
48// in RenderOpenGLScene() ==> defined in RNA3D_OpenGLEngine.cxx.
49// ===============================================================================//
50
51static void RotateMoleculeStateChanged(AW_root *awr) {
52    bool rotate = awr->awar(AWAR_3D_MOL_ROTATE)->read_int();
53    if (rotate != RNA3D->bAutoRotate) {
54        if (RNA3D->bAutoRotate) {
55            XtRemoveWorkProc(workId);
56            RNA3D->bAutoRotate = false;
57        }
58        else {
59            workId = XtAppAddWorkProc(appContext, SpinMolecule, NULL);
60            RNA3D->bAutoRotate = true;
61        }
62    }
63}
64
65// ============ RotateMoleculeStateChanged_cb(AW_root *awr)===========================//
66// Callback bound to Rotatation Awar (AWAR_3D_MOL_ROTATE)
67// Is called when the
68// 1. Rotation Awar is changed.
69// 2. Also when the Spacebar is pressed in KeyBoardEventHandler().
70// ===============================================================================//
71
72static void RotateMoleculeStateChanged_cb(AW_root *awr) {
73    MapDisplayParameters(awr);
74    RotateMoleculeStateChanged(awr);
75    RefreshOpenGLDisplay();
76}
77
78static void ResizeOpenGLWindow(Widget /* w */, XtPointer /* client_data */, XEvent *event, char* /* x */) {
79    XConfigureEvent *evt;
80    evt = (XConfigureEvent*) event;
81
82    if (RNA3D->OpenGLEngineState == NOT_CREATED) {
83        return;
84    }
85
86    ReshapeOpenGLWindow((GLint) evt->width, (GLint) evt->height);
87
88    RefreshOpenGLDisplay();
89}
90
91static void KeyReleaseEventHandler(Widget /* w */, XtPointer /* client_data */, XEvent * /* event */, char* /* x */) {
92    RefreshOpenGLDisplay();
93}
94
95static void KeyPressEventHandler(Widget /* w */, XtPointer /* client_data */, XEvent *event, char* /* x */) {
96    char   buffer[1];
97    KeySym keysym;
98
99    // Converting keycode to keysym
100    XLookupString((XKeyEvent *) event, buffer, 1, &keysym, NULL);
101
102    switch (keysym) {
103        case XK_space:
104            RNA3D->iRotateMolecule = !RNA3D->iRotateMolecule;
105            RNA3D->root->awar(AWAR_3D_MOL_ROTATE)->write_int(RNA3D->iRotateMolecule);
106            break;
107        case XK_Escape:
108            RNA3D->bDisplayComments = !RNA3D->bDisplayComments;
109            break;
110        case XK_Tab:
111            RNA3D->bDisplayMask = !RNA3D->bDisplayMask;
112            break;
113        case XK_Up:
114            RNA3D->Center.y -= 0.1;
115            break;
116        case XK_Down:
117            RNA3D->Center.y += 0.1;
118            break;
119        case XK_Left:
120            RNA3D->Center.x -= 0.1;
121            break;
122        case XK_Right:
123            RNA3D->Center.x += 0.1;
124            break;
125    }
126
127    RefreshOpenGLDisplay();
128}
129
130static void ButtonReleaseEventHandler(Widget /* w */, XtPointer /* client_data */, XEvent *event, char* /* x */) {
131    XButtonEvent *xr;
132    xr = (XButtonEvent*) event;
133
134    switch (xr->button)
135    {
136        case LEFT_BUTTON:
137            RNA3D->bRotateMolecule = false;
138            break;
139
140        case MIDDLE_BUTTON:
141            break;
142
143        case RIGHT_BUTTON:
144            break;
145    }
146
147    RefreshOpenGLDisplay();
148}
149
150static void ButtonPressEventHandler(Widget /* w */, XtPointer /* client_data */, XEvent *event, char* /* x */) {
151
152    XButtonEvent *xp;
153    xp = (XButtonEvent*) event;
154
155    switch (xp->button)
156    {
157        case LEFT_BUTTON:
158            RNA3D->bRotateMolecule = true;
159            RNA3D->saved_x = xp->x;
160            RNA3D->saved_y = xp->y;
161            break;
162
163        case MIDDLE_BUTTON:
164            RNA3D->gl_Canvas->set_mode(AWT_MODE_NONE);
165            break;
166
167        case RIGHT_BUTTON:
168            break;
169
170        case WHEEL_UP:
171            RNA3D->scale += ZOOM_FACTOR;
172            break;
173
174        case WHEEL_DOWN:
175            RNA3D->scale -= ZOOM_FACTOR;
176            break;
177    }
178
179    RefreshOpenGLDisplay();
180}
181
182static void MouseMoveEventHandler(Widget /* w */, XtPointer /* client_data */, XEvent *event, char* /* x */) {
183
184    XMotionEvent *xp;
185    xp = (XMotionEvent*) event;
186
187    if (!RNA3D->bAutoRotate) {
188        RNA3D->ROTATION_SPEED = 0.5;
189    }
190
191    if (RNA3D->bRotateMolecule) {
192        // ComputeRotationXY : computes new rotation X and Y based on the mouse movement
193        ComputeRotationXY(xp->x, xp->y);
194    }
195
196    RefreshOpenGLDisplay();
197}
198
199static void ExposeOpenGLWindow(Widget  w, XtPointer /* client_data */, XEvent *event, char* /* x */) {
200    static bool ok = false;
201
202    if (RNA3D->OpenGLEngineState == NOT_CREATED) {
203        InitializeOpenGLWindow(w);
204
205        XExposeEvent *evt;
206        evt = (XExposeEvent*) event;
207
208        try {
209            InitializeOpenGLEngine((GLint) evt->height, (GLint) evt->height);
210            ReshapeOpenGLWindow((GLint) evt->width, (GLint) evt->height);
211            ok =  true;
212        }
213        catch (string& err) {
214            // errors catched here should close the RNA3D window again (or prevent it from opening)
215            aw_message(GBS_global_string("Error in RNA3D: %s", err.c_str()));
216            awm->hide();
217        }
218    }
219
220    if (ok) RefreshOpenGLDisplay();
221}
222
223void RefreshOpenGLDisplay() {
224
225    if (RNA3D->OpenGLEngineState == CREATED) {
226        RenderOpenGLScene(RNA3D->glw);
227    }
228}
229
230static void RefreshCanvas(AW_root *awr) {
231    MapDisplayParameters(awr);
232    RefreshOpenGLDisplay();
233}
234
235static void SynchronizeColorsWithEditor(AW_window *aww) {
236    // overwrites color settings with those from EDIT4
237
238    AW_copy_GCs(aww->get_root(), "ARB_EDIT4", "RNA3D", false,
239                "User1",   "User2",   "Probe",
240                "Primerl", "Primerr", "Primerg",
241                "Sigl",    "Sigr",    "Sigg",
242                "RANGE_0", "RANGE_1", "RANGE_2",
243                "RANGE_3", "RANGE_4", "RANGE_5",
244                "RANGE_6", "RANGE_7", "RANGE_8",
245                "RANGE_9",
246                NULL);
247}
248
249static void Change3DMolecule_CB(AW_root *awr) {
250    cout<<"Rendering new 3D molecule.... please wait..."<<endl;
251
252    RNA3D->cStructure->LSU_molID = awr->awar(AWAR_3D_23S_RRNA_MOL)->read_int();
253
254    RNA3D->cStructure->DeleteOldMoleculeData();        // Deleting the old molecule data
255    RNA3D->cStructure->ReadCoOrdinateFile();           // Reading Structure information
256    RNA3D->cStructure->GetSecondaryStructureInfo();    // Getting Secondary Structure Information
257    RNA3D->cStructure->Combine2Dand3DstructureInfo();  // Combining Secondary Structure data with 3D Coordinates
258    RNA3D->cStructure->GenerateDisplayLists();         // Generating Display Lists for Rendering
259
260    // recalculate the mapping information
261    awr->awar(AWAR_SPECIES_NAME)->touch();
262
263    // recalculate helix numbering
264    awr->awar(AWAR_3D_HELIX_FROM)->touch();
265
266    // render new structure in OpenGL window
267    RefreshCanvas(awr);
268}
269
270static void Change3DMolecule(AW_window *aww, long int molID) {
271    // changes the displayed 3D structure in the case of 23S rRNA
272    aww->get_root()->awar(AWAR_3D_23S_RRNA_MOL)->write_int(molID);
273}
274
275static void DisplayMoleculeMask(AW_root * /* awr */) {
276    RNA3D->bDisplayMask = !RNA3D->bDisplayMask;
277    RefreshOpenGLDisplay();
278}
279
280
281// ---------------------------- Creating WINDOWS ------------------------------
282static void AddCallBacks(AW_root *awr) {
283    // adding callbacks to the awars to refresh the display if received any changes
284
285    // General Molecule Display  Section
286    awr->awar(AWAR_3D_MOL_BACKBONE)->add_callback(RefreshCanvas);
287    awr->awar(AWAR_3D_MOL_COLORIZE)->add_callback(RefreshCanvas);
288    awr->awar(AWAR_3D_MOL_SIZE)->add_callback(RefreshCanvas);
289    awr->awar(AWAR_3D_MOL_DISP_POS)->add_callback(RefreshCanvas);
290    awr->awar(AWAR_3D_MOL_ROTATE)->add_callback(RotateMoleculeStateChanged_cb);
291    awr->awar(AWAR_3D_MOL_POS_INTERVAL)->add_callback(DisplayPostionsIntervalChanged_CB);
292    awr->awar(AWAR_3D_CURSOR_POSITION)->add_callback(RefreshCanvas);
293    awr->awar(AWAR_CURSOR_POSITION)->add_callback(CursorPositionChanged_CB);
294
295    // Display Base Section
296    awr->awar(AWAR_3D_DISPLAY_BASES)->add_callback(RefreshCanvas);
297    awr->awar(AWAR_3D_DISPLAY_SIZE)->add_callback(RefreshCanvas);
298    awr->awar(AWAR_3D_BASES_MODE)->add_callback(RefreshCanvas);
299    awr->awar(AWAR_3D_BASES_HELIX)->add_callback(RefreshCanvas);
300    awr->awar(AWAR_3D_BASES_UNPAIRED_HELIX)->add_callback(RefreshCanvas);
301    awr->awar(AWAR_3D_BASES_NON_HELIX)->add_callback(RefreshCanvas);
302    awr->awar(AWAR_3D_SHAPES_HELIX)->add_callback(RefreshCanvas);
303    awr->awar(AWAR_3D_SHAPES_UNPAIRED_HELIX)->add_callback(RefreshCanvas);
304    awr->awar(AWAR_3D_SHAPES_NON_HELIX)->add_callback(RefreshCanvas);
305
306    // Display Helix Section
307    awr->awar(AWAR_3D_DISPLAY_HELIX)->add_callback(RefreshCanvas);
308    awr->awar(AWAR_3D_HELIX_BACKBONE)->add_callback(RefreshCanvas);
309    awr->awar(AWAR_3D_HELIX_MIDPOINT)->add_callback(RefreshCanvas);
310    awr->awar(AWAR_3D_HELIX_FROM)->add_callback(DisplayHelixNrsChanged_CB);
311    awr->awar(AWAR_3D_HELIX_TO)->add_callback(DisplayHelixNrsChanged_CB);
312    awr->awar(AWAR_3D_HELIX_NUMBER)->add_callback(RefreshCanvas);
313    awr->awar(AWAR_3D_HELIX_SIZE)->add_callback(RefreshCanvas);
314    awr->awar(AWAR_3D_DISPLAY_TERTIARY_INTRACTIONS)->add_callback(RefreshCanvas);
315
316    // Mapping Sequence Data Section
317    awr->awar(AWAR_SPECIES_NAME)->add_callback(MapSelectedSpeciesChanged_CB);
318    awr->awar(AWAR_3D_MAP_ENABLE)->add_callback(RefreshCanvas);
319
320    awr->awar(AWAR_3D_MAP_SAI)->add_callback(RefreshCanvas);
321    awr->awar(AWAR_SAI_GLOBAL)->add_callback(MapSaiToEcoliTemplateChanged_CB);
322    awr->awar(AWAR_3D_MAP_SEARCH_STRINGS)->add_callback(RefreshCanvas);
323
324    awr->awar(AWAR_3D_MAP_SPECIES)->add_callback(RefreshCanvas);
325    awr->awar(AWAR_3D_MAP_SPECIES_DISP_BASE)->add_callback(RefreshCanvas);
326    awr->awar(AWAR_3D_MAP_SPECIES_DISP_POS)->add_callback(RefreshCanvas);
327    awr->awar(AWAR_3D_MAP_SPECIES_DISP_DELETIONS)->add_callback(RefreshCanvas);
328    awr->awar(AWAR_3D_MAP_SPECIES_DISP_MISSING)->add_callback(RefreshCanvas);
329    awr->awar(AWAR_3D_MAP_SPECIES_DISP_INSERTIONS)->add_callback(RefreshCanvas);
330    awr->awar(AWAR_3D_MAP_SPECIES_DISP_INSERTIONS_INFO)->add_callback(RefreshCanvas);
331
332    awr->awar(AWAR_3D_DISPLAY_MASK)->add_callback(DisplayMoleculeMask);
333    awr->awar(AWAR_3D_23S_RRNA_MOL)->add_callback(Change3DMolecule_CB);
334}
335
336static void InitCallBacks(AW_root *awr) {
337    // init callbacks
338    RotateMoleculeStateChanged_cb(awr);
339}
340
341static void RefreshMappingDisplay(AW_window * /* aw */) {
342    // Refreshes the SAI Display if and when ...
343    // 1.Changes made to SAI related settings in EDIT4 and not updated automatically
344    // 2.Colors related to SAI Display changed in RNA3D Application
345    MapSaiToEcoliTemplateChanged_CB(RNA3D->root);
346
347    // Refreshes the Search Strings Display if
348    // Colors related to Search Strings changed in RNA3D Application
349    // and not updated automatically
350    MapSearchStringsToEcoliTemplateChanged_CB(RNA3D->root);
351
352    // Resetting the Molecule Transformations
353    // 1.Reset the Molecule view to Center of the viewer (default view).
354    // 2.Zoom the Molecule to fit to window (default zoom).
355    RNA3D->Center = Vector3(0.0, 0.0, 0.0);
356    RNA3D->scale = 0.01;
357
358    RefreshCanvas(RNA3D->root);
359}
360
361static AW_window *CreateDisplayBases_window(AW_root *aw_root) {
362    static AW_window_simple *aws = 0;
363    if (aws) return (AW_window *)aws;
364
365    aws = new AW_window_simple;
366
367    aws->init(aw_root, "DISPLAY_BASES", "RNA3D : Display BASES");
368    aws->load_xfig("RNA3D_DisplayBases.fig");
369
370    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_dispBases.hlp");
371    aws->at("help");
372    aws->button_length(0);
373    aws->create_button("HELP", "#help.xpm");
374
375    aws->at("close");
376    aws->callback((AW_CB0)AW_POPDOWN);
377    aws->button_length(0);
378    aws->create_button("CLOSE", "#closeText.xpm");
379
380    {  // Display Bases Section
381        aws->at("dispBases");
382        aws->create_toggle(AWAR_3D_DISPLAY_BASES);
383
384        aws->at("helix");
385        aws->create_toggle(AWAR_3D_BASES_HELIX);
386        aws->at("unpairHelix");
387        aws->create_toggle(AWAR_3D_BASES_UNPAIRED_HELIX);
388        aws->at("nonHelix");
389        aws->create_toggle(AWAR_3D_BASES_NON_HELIX);
390
391        aws->at("shapesSize");
392        aws->create_input_field(AWAR_3D_DISPLAY_SIZE, 5);
393
394        aws->at("basesMode");
395        aws->create_toggle_field(AWAR_3D_BASES_MODE, 0);
396        aws->insert_toggle("CHARACTERS", "C", 0);
397        aws->insert_toggle("SHAPES", "S", 1);
398        aws->update_toggle_field();
399
400        aws->at("spHelix");
401        aws->create_toggle_field(AWAR_3D_SHAPES_HELIX, 1);
402        aws->insert_toggle("#circle.bitmap",    "C", 0);
403        aws->insert_toggle("#diamond.bitmap",   "D", 1);
404        aws->insert_toggle("#polygon.bitmap",   "P", 2);
405        aws->insert_toggle("#star.bitmap",      "S", 3);
406        aws->insert_toggle("#rectangle.bitmap", "R", 4);
407        aws->update_toggle_field();
408
409        aws->at("spUnpairedHelix");
410        aws->create_toggle_field(AWAR_3D_SHAPES_UNPAIRED_HELIX, 1);
411        aws->insert_toggle("#circle.bitmap",    "C", 0);
412        aws->insert_toggle("#diamond.bitmap",   "D", 1);
413        aws->insert_toggle("#polygon.bitmap",   "P", 2);
414        aws->insert_toggle("#star.bitmap",      "S", 3);
415        aws->insert_toggle("#rectangle.bitmap", "R", 4);
416        aws->update_toggle_field();
417
418        aws->at("spNonHelix");
419        aws->create_toggle_field(AWAR_3D_SHAPES_NON_HELIX, 1);
420        aws->insert_toggle("#circle.bitmap",    "C", 0);
421        aws->insert_toggle("#diamond.bitmap",   "D", 1);
422        aws->insert_toggle("#polygon.bitmap",   "P", 2);
423        aws->insert_toggle("#star.bitmap",      "S", 3);
424        aws->insert_toggle("#rectangle.bitmap", "R", 4);
425        aws->update_toggle_field();
426    }
427
428    aws->show();
429
430    return (AW_window *)aws;
431}
432
433static AW_window *CreateDisplayHelices_window(AW_root *aw_root) {
434    static AW_window_simple *aws = 0;
435    if (aws) return (AW_window *)aws;
436
437    aws = new AW_window_simple;
438
439    aws->init(aw_root, "DISPLAY_HELICES", "RNA3D : Display HELICES");
440    aws->load_xfig("RNA3D_DisplayHelices.fig");
441
442    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_dispHelices.hlp");
443    aws->at("help");
444    aws->button_length(0);
445    aws->create_button("HELP", "#help.xpm");
446
447    aws->at("close");
448    aws->callback((AW_CB0)AW_POPDOWN);
449    aws->button_length(0);
450    aws->create_button("CLOSE", "#closeText.xpm");
451
452    {  // Display Helices Section
453        aws->at("dispHelix");
454        aws->create_toggle(AWAR_3D_DISPLAY_HELIX);
455
456        aws->at("backbone");
457        aws->create_toggle(AWAR_3D_HELIX_BACKBONE);
458        aws->at("midHelix");
459        aws->create_toggle(AWAR_3D_HELIX_MIDPOINT);
460        aws->at("helixNr");
461        aws->create_toggle(AWAR_3D_HELIX_NUMBER);
462        aws->at("from");
463        aws->create_input_field(AWAR_3D_HELIX_FROM, 5);
464        aws->at("to");
465        aws->create_input_field(AWAR_3D_HELIX_TO, 5);
466        aws->at("helixSize");
467        aws->create_input_field(AWAR_3D_HELIX_SIZE, 5);
468        {
469            const char *helixRange;
470            Structure3D *s;
471#if defined(WARN_TODO)
472#warning s is not initialized here
473#endif
474            int rnaType = s->FindTypeOfRNA();
475
476            switch (rnaType) {
477                case LSU_23S: helixRange = "[1-101]"; break;
478                case SSU_16S: helixRange = "[1-50]";  break;
479                case LSU_5S:  helixRange = "[1-5]";   break;
480            }
481            aws->at("rangeLabel");
482            aws->create_autosize_button(0, helixRange);
483        }
484
485        aws->at("dispTI");
486        aws->create_toggle(AWAR_3D_DISPLAY_TERTIARY_INTRACTIONS);
487    }
488    aws->show();
489    return (AW_window *)aws;
490}
491
492static AW_window *CreateDisplayOptions_window(AW_root *aw_root) {
493    static AW_window_simple *aws = 0;
494    if (aws) return (AW_window *)aws;
495
496    aws = new AW_window_simple;
497
498    aws->init(aw_root, "GENERAL_DISPLAY", "RNA3D : General Display ");
499    aws->load_xfig("RNA3D_DisplayOptions.fig");
500
501    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_dispMolecule.hlp");
502    aws->at("help");
503    aws->button_length(0);
504    aws->create_button("HELP", "#help.xpm");
505
506    aws->at("close");
507    aws->callback((AW_CB0)AW_POPDOWN);
508    aws->button_length(0);
509    aws->create_button("CLOSE", "#closeText.xpm");
510
511    {  // Display Molecule Section
512        aws->at("backbone");
513        aws->create_toggle(AWAR_3D_MOL_BACKBONE);
514        aws->at("color");
515        aws->create_toggle(AWAR_3D_MOL_COLORIZE);
516        aws->at("dispPos");
517        aws->create_toggle(AWAR_3D_MOL_DISP_POS);
518        aws->at("rot");
519        aws->create_toggle(AWAR_3D_MOL_ROTATE);
520        aws->at("pos");
521        aws->create_input_field(AWAR_3D_MOL_POS_INTERVAL, 2);
522        aws->at("molSize");
523        aws->create_input_field(AWAR_3D_MOL_SIZE, 5);
524        aws->at("cp");
525        aws->create_toggle(AWAR_3D_CURSOR_POSITION);
526    }
527    aws->show();
528    return (AW_window *)aws;
529}
530
531
532static AW_window *CreateMapSequenceData_window(AW_root *aw_root) {
533    static AW_window_simple *aws = 0;
534    if (aws) return (AW_window *)aws;
535
536    aws = new AW_window_simple;
537
538    aws->init(aw_root, "MAP_SPECIES", "RNA3D : Map Sequence Data ");
539    aws->load_xfig("RNA3D_SeqMapping.fig");
540
541    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_mapSeqData.hlp");
542    aws->at("help");
543    aws->button_length(0);
544    aws->create_button("HELP", "#help.xpm");
545
546    aws->at("close");
547    aws->callback((AW_CB0)AW_POPDOWN);
548    aws->button_length(0);
549    aws->create_button("CLOSE", "#closeText.xpm");
550
551    aws->callback(SynchronizeColorsWithEditor);
552    aws->at("sync");
553    aws->button_length(35);
554    aws->create_button("SYNC", "SYNCHRONIZE COLORS WITH EDITOR");
555
556    {  // Display Map Current Species Section
557        aws->at("en");
558        aws->create_toggle(AWAR_3D_MAP_ENABLE);
559
560        aws->at("src");
561        aws->create_toggle(AWAR_3D_MAP_SEARCH_STRINGS);
562
563        aws->at("sai");
564        aws->create_toggle(AWAR_3D_MAP_SAI);
565
566        aws->callback(RefreshMappingDisplay);
567        aws->at("ref");
568        aws->button_length(0);
569        aws->create_button("REFRESH", "#refresh.xpm");
570
571        aws->at("sp");
572        aws->create_toggle(AWAR_3D_MAP_SPECIES);
573        aws->at("base");
574        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_BASE);
575        aws->at("pos");
576        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_POS);
577        aws->at("del");
578        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_DELETIONS);
579        aws->at("mis");
580        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_MISSING);
581        aws->at("ins");
582        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_INSERTIONS);
583        aws->at("bs");
584        aws->create_toggle(AWAR_3D_MAP_SPECIES_DISP_INSERTIONS_INFO);
585    }
586    aws->show();
587    return (AW_window *)aws;
588}
589
590static AW_window *CreateChangeMolecule_window(AW_root *aw_root) {
591    static AW_window_simple *aws = 0;
592    if (aws) return (AW_window *)aws;
593
594    aws = new AW_window_simple;
595
596    aws->init(aw_root, "CHANGE_MOLECULE", "RNA3D : Change 3D Molecule");
597    aws->load_xfig("RNA3D_ChangeMolecule.fig");
598
599    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_changeMolecule.hlp");
600    aws->at("help");
601    aws->button_length(0);
602    aws->create_button("HELP", "#help.xpm");
603
604    aws->at("close");
605    aws->callback((AW_CB0)AW_POPDOWN);
606    aws->button_length(0);
607    aws->create_button("CLOSE", "#closeText.xpm");
608
609    aws->callback(Change3DMolecule, 1);
610    aws->at("1pnu");
611    aws->button_length(73);
612    aws->create_button(0, "1PNU: 8.7 A^ Vila-Sanjurjo et al. Proc.Nat.Acad.Sci.(2003) 100, 8682.");
613
614    aws->callback(Change3DMolecule, 2);
615    aws->at("1vor");
616    aws->button_length(73);
617    aws->create_button(0, "1VOR: 11.5 A^ Vila-Sanjurjo et al. Nat.Struct.Mol.Biol.(2004) 11, 1054.");
618
619    aws->callback(Change3DMolecule, 3);
620    aws->at("1c2w");
621    aws->button_length(73);
622    aws->create_button(0, "1C2W: 7.5 A^ Mueller et al. J.Mol.Biol.(2000) 298, 35-59.", 0, "white");
623
624    aws->show();
625    return (AW_window *)aws;
626}
627
628static AW_window *CreateHelp_window(AW_root *aw_root) {
629    static AW_window_simple *aws = 0;
630    if (aws) return (AW_window *)aws;
631
632    aws = new AW_window_simple;
633
634    aws->init(aw_root, "HELP", "RNA3D : Display Options & Shortcuts");
635    aws->load_xfig("RNA3D_Help.fig");
636
637    aws->button_length(0);
638
639    aws->callback(AW_POPUP_HELP, (AW_CL)"rna3d_general.hlp");
640    aws->at("help");
641    aws->create_button("HELP", "#help.xpm");
642
643    aws->at("close");
644    aws->callback((AW_CB0)AW_POPDOWN);
645    aws->create_button("CLOSE", "#closeText.xpm");
646
647    aws->at("reload");
648    aws->create_button("reload", "#refresh.xpm");
649    aws->at("color");
650    aws->create_button("colors", "#colors.xpm");
651    aws->at("base");
652    aws->create_button("displayBases", "#bases.xpm");
653    aws->at("helix");
654    aws->create_button("displayHelix", "#helix.xpm");
655    aws->at("mol");
656    aws->create_button("displayMolecule", "#molText.xpm");
657    aws->at("map");
658    aws->create_button("mapSpecies", "#mapping.xpm");
659    aws->at("check");
660    aws->create_button("check", "#check.xpm");
661    aws->at("uncheck");
662    aws->create_button("uncheck", "#uncheck.xpm");
663    aws->at("mask");
664    aws->create_button("mask", "#mask.xpm");
665    aws->at("unmask");
666    aws->create_button("unmask", "#unmask.xpm");
667    aws->at("exit");
668    aws->create_button("exit", "#quit.xpm");
669
670    aws->show();
671    return (AW_window *)aws;
672}
673
674AW_window *CreateRNA3DMainWindow(AW_root *awr, GBDATA *gb_main, ED4_plugin_host& host) {
675    // Main Window - Canvas on which the actual painting is done
676    GB_transaction dummy(gb_main);
677
678    awr->awar_int(AWAR_3D_SAI_SELECTED, 0, AW_ROOT_DEFAULT);
679
680    RNA3D_init_global_data(host);
681
682    awm = new AW_window_menu_modes_opengl();
683    awm->init(awr, "RNA3D", "RNA3D: 3D Structure of Ribosomal RNA", WINDOW_WIDTH, WINDOW_HEIGHT);
684
685    AW_gc_manager   aw_gc_manager;
686    RNA3D_Graphics *rna3DGraphics = new RNA3D_Graphics(awr, gb_main);
687
688    Structure3D::gb_main = gb_main;
689
690    RNA3D->gl_Canvas = new AWT_canvas(Structure3D::gb_main, awm, rna3DGraphics, aw_gc_manager, AWAR_SPECIES_NAME);
691
692    RNA3D->gl_Canvas->recalc_size_and_refresh();
693    RNA3D->gl_Canvas->set_mode(AWT_MODE_NONE);
694
695    awm->create_menu("File", "F", AWM_ALL);
696    {
697        Structure3D *s;
698        int rnaType = s->FindTypeOfRNA();
699        if (rnaType == LSU_23S)
700            awm->insert_menu_topic("changeMolecule", "Change Molecule", "M", "rna3d_changeMolecule.hlp", AWM_ALL, AW_POPUP, (AW_CL)CreateChangeMolecule_window, 0);
701    }
702    awm->insert_menu_topic("close", "Close", "C", "quit.hlp", AWM_ALL, (AW_CB)AW_POPDOWN, 0, 0);
703
704    {
705        awm->at(1, 2);
706        awm->auto_space(2, 0);
707        awm->shadow_width(1);
708
709        int cur_x, cur_y, start_x, first_line_y, second_line_y;
710        awm->get_at_position(&start_x, &first_line_y);
711        awm->button_length(0);
712        awm->callback((AW_CB0)AW_POPDOWN);
713        awm->create_button("Quit", "#quit.xpm");
714
715        awm->get_at_position(&cur_x, &cur_y);
716        awm->callback(RefreshMappingDisplay);
717        awm->button_length(0);
718        awm->create_button("REFRESH", "#refresh.xpm");
719
720        awm->get_at_position(&cur_x, &cur_y);
721        awm->button_length(0);
722        awm->create_toggle(AWAR_3D_DISPLAY_MASK, "#unmask.xpm", "#mask.xpm");
723
724        awm->get_at_position(&cur_x, &cur_y);
725        awm->callback(AW_POPUP, (AW_CL)AW_create_gc_window, (AW_CL)aw_gc_manager);
726        awm->button_length(0);
727        awm->create_button("setColors", "#colors.xpm");
728
729        awm->get_at_position(&cur_x, &cur_y);
730        awm->callback(AW_POPUP, (AW_CL)CreateDisplayBases_window, (AW_CL)0);
731        awm->button_length(0);
732        awm->create_button("displayBases", "#basesText.xpm");
733
734        awm->get_at_position(&cur_x, &cur_y);
735        awm->at(cur_x-10, cur_y);
736        awm->create_toggle(AWAR_3D_DISPLAY_BASES, "#uncheck.xpm", "#check.xpm");
737
738        awm->get_at_position(&cur_x, &cur_y);
739        awm->callback(AW_POPUP, (AW_CL)CreateDisplayHelices_window, (AW_CL)0);
740        awm->button_length(0);
741        awm->create_button("displayHelix", "#helixText.xpm");
742
743        awm->get_at_position(&cur_x, &cur_y);
744        awm->at(cur_x-10, cur_y);
745        awm->create_toggle(AWAR_3D_DISPLAY_HELIX, "#uncheck.xpm", "#check.xpm");
746
747        awm->get_at_position(&cur_x, &cur_y);
748        awm->callback(AW_POPUP, (AW_CL)CreateDisplayOptions_window, (AW_CL)0);
749        awm->button_length(0);
750        awm->create_button("displayMolecule", "#molText.xpm");
751
752        awm->get_at_position(&cur_x, &cur_y);
753        awm->callback(AW_POPUP, (AW_CL)CreateMapSequenceData_window, (AW_CL)0);
754        awm->button_length(0);
755        awm->create_button("mapSpecies", "#mapping.xpm");
756
757        awm->get_at_position(&cur_x, &cur_y);
758        awm->at(cur_x-10, cur_y);
759        awm->create_toggle(AWAR_3D_MAP_ENABLE, "#uncheck.xpm", "#check.xpm");
760
761        awm->get_at_position(&cur_x, &cur_y);
762        awm->callback(AW_POPUP, (AW_CL)CreateHelp_window, (AW_CL)0);
763        awm->button_length(0);
764        awm->create_button("help", "#helpText.xpm");
765
766        awm->at_newline();
767        awm->get_at_position(&cur_x, &second_line_y);
768        awm->create_autosize_button(0, " Spacebar = auto rotate mode on/off | Mouse Left Button + Move = Rotates Molecule | Mouse Wheel = Zoom in/out");
769    }
770
771    AddCallBacks(awr);
772    RNA3D->root = awr;
773
774    appContext = AW_get_XtAppContext(awr);
775
776    RNA3D->OpenGLEngineState = NOT_CREATED;
777
778    // Add event handlers:
779    Widget middle_area_widget = AW_get_AreaWidget(RNA3D->gl_Canvas->aww, AW_MIDDLE_AREA);
780
781    XtAddEventHandler(middle_area_widget, StructureNotifyMask, 0, ResizeOpenGLWindow,        (XtPointer)0);
782    XtAddEventHandler(middle_area_widget, ExposureMask,        0, ExposeOpenGLWindow,        (XtPointer)0);
783    XtAddEventHandler(middle_area_widget, KeyPressMask,        0, KeyPressEventHandler,      (XtPointer)0);
784    XtAddEventHandler(middle_area_widget, KeyReleaseMask,      0, KeyReleaseEventHandler,    (XtPointer)0);
785    XtAddEventHandler(middle_area_widget, ButtonPressMask,     0, ButtonPressEventHandler,   (XtPointer)0);
786    XtAddEventHandler(middle_area_widget, ButtonReleaseMask,   0, ButtonReleaseEventHandler, (XtPointer)0);
787    XtAddEventHandler(middle_area_widget, PointerMotionMask,   0, MouseMoveEventHandler,     (XtPointer)0);
788
789#ifdef DEBUG
790    cout<<"RNA3D: OpenGL Window created!"<<endl;
791#endif
792
793    InitCallBacks(awr);
794   
795    return awm;
796}
Note: See TracBrowser for help on using the repository browser.