compactor work
[jalview.git] / forester / java / src / org / forester / archaeopteryx / MainFrameApplication.java
1 // $Id:\r
2 // FORESTER -- software libraries and applications\r
3 // for evolutionary biology research and applications.\r
4 //\r
5 // Copyright (C) 2008-2009 Christian M. Zmasek\r
6 // Copyright (C) 2008-2009 Burnham Institute for Medical Research\r
7 // Copyright (C) 2003-2007 Ethalinda K.S. Cannon\r
8 // All rights reserved\r
9 //\r
10 // This library is free software; you can redistribute it and/or\r
11 // modify it under the terms of the GNU Lesser General Public\r
12 // License as published by the Free Software Foundation; either\r
13 // version 2.1 of the License, or (at your option) any later version.\r
14 //\r
15 // This library is distributed in the hope that it will be useful,\r
16 // but WITHOUT ANY WARRANTY; without even the implied warranty of\r
17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\r
18 // Lesser General Public License for more details.\r
19 //\r
20 // You should have received a copy of the GNU Lesser General Public\r
21 // License along with this library; if not, write to the Free Software\r
22 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA\r
23 //\r
24 // Contact: phylosoft @ gmail . com\r
25 // WWW: https://sites.google.com/site/cmzmasek/home/software/forester\r
26 \r
27 package org.forester.archaeopteryx;\r
28 \r
29 import java.awt.BorderLayout;\r
30 import java.awt.Font;\r
31 import java.awt.event.ActionEvent;\r
32 import java.awt.event.ComponentAdapter;\r
33 import java.awt.event.ComponentEvent;\r
34 import java.awt.event.WindowAdapter;\r
35 import java.awt.event.WindowEvent;\r
36 import java.io.File;\r
37 import java.io.FileInputStream;\r
38 import java.io.IOException;\r
39 import java.io.InputStream;\r
40 import java.net.MalformedURLException;\r
41 import java.net.URL;\r
42 import java.util.ArrayList;\r
43 import java.util.HashSet;\r
44 import java.util.List;\r
45 import java.util.Set;\r
46 \r
47 import javax.swing.ButtonGroup;\r
48 import javax.swing.JCheckBoxMenuItem;\r
49 import javax.swing.JFileChooser;\r
50 import javax.swing.JMenu;\r
51 import javax.swing.JMenuBar;\r
52 import javax.swing.JMenuItem;\r
53 import javax.swing.JOptionPane;\r
54 import javax.swing.JRadioButtonMenuItem;\r
55 import javax.swing.UIManager;\r
56 import javax.swing.UnsupportedLookAndFeelException;\r
57 import javax.swing.WindowConstants;\r
58 import javax.swing.event.ChangeEvent;\r
59 import javax.swing.event.ChangeListener;\r
60 import javax.swing.filechooser.FileFilter;\r
61 import javax.swing.plaf.synth.SynthLookAndFeel;\r
62 \r
63 import org.forester.analysis.TaxonomyDataManager;\r
64 import org.forester.archaeopteryx.AptxUtil.GraphicsExportType;\r
65 import org.forester.archaeopteryx.Options.CLADOGRAM_TYPE;\r
66 import org.forester.archaeopteryx.Options.NODE_LABEL_DIRECTION;\r
67 import org.forester.archaeopteryx.Options.PHYLOGENY_GRAPHICS_TYPE;\r
68 import org.forester.archaeopteryx.tools.AncestralTaxonomyInferrer;\r
69 import org.forester.archaeopteryx.tools.InferenceManager;\r
70 import org.forester.archaeopteryx.tools.PhyloInferenceDialog;\r
71 import org.forester.archaeopteryx.tools.PhylogeneticInferenceOptions;\r
72 import org.forester.archaeopteryx.tools.PhylogeneticInferrer;\r
73 import org.forester.archaeopteryx.tools.SequenceDataRetriver;\r
74 import org.forester.archaeopteryx.webservices.PhylogeniesWebserviceClient;\r
75 import org.forester.archaeopteryx.webservices.WebservicesManager;\r
76 import org.forester.io.parsers.FastaParser;\r
77 import org.forester.io.parsers.GeneralMsaParser;\r
78 import org.forester.io.parsers.PhylogenyParser;\r
79 import org.forester.io.parsers.nexus.NexusPhylogeniesParser;\r
80 import org.forester.io.parsers.nhx.NHXParser;\r
81 import org.forester.io.parsers.nhx.NHXParser.TAXONOMY_EXTRACTION;\r
82 import org.forester.io.parsers.phyloxml.PhyloXmlDataFormatException;\r
83 import org.forester.io.parsers.phyloxml.PhyloXmlParser;\r
84 import org.forester.io.parsers.phyloxml.PhyloXmlUtil;\r
85 import org.forester.io.parsers.tol.TolParser;\r
86 import org.forester.io.parsers.util.ParserUtils;\r
87 import org.forester.io.writers.PhylogenyWriter;\r
88 import org.forester.io.writers.SequenceWriter;\r
89 import org.forester.msa.Msa;\r
90 import org.forester.msa.MsaFormatException;\r
91 import org.forester.phylogeny.Phylogeny;\r
92 import org.forester.phylogeny.PhylogenyMethods;\r
93 import org.forester.phylogeny.PhylogenyNode;\r
94 import org.forester.phylogeny.PhylogenyNode.NH_CONVERSION_SUPPORT_VALUE_STYLE;\r
95 import org.forester.phylogeny.data.Confidence;\r
96 import org.forester.phylogeny.data.PhylogenyDataUtil;\r
97 import org.forester.phylogeny.data.Sequence;\r
98 import org.forester.phylogeny.data.Taxonomy;\r
99 import org.forester.phylogeny.factories.ParserBasedPhylogenyFactory;\r
100 import org.forester.phylogeny.factories.PhylogenyFactory;\r
101 import org.forester.phylogeny.iterators.PhylogenyNodeIterator;\r
102 import org.forester.sequence.MolecularSequence;\r
103 import org.forester.util.BasicDescriptiveStatistics;\r
104 import org.forester.util.BasicTable;\r
105 import org.forester.util.BasicTableParser;\r
106 import org.forester.util.DescriptiveStatistics;\r
107 import org.forester.util.ForesterUtil;\r
108 import org.forester.util.WindowsUtils;\r
109 \r
110 public final class MainFrameApplication extends MainFrame {\r
111 \r
112     static final String                      INFER_ANCESTOR_TAXONOMIES             = "Infer Ancestor Taxonomies";\r
113     static final String                      OBTAIN_DETAILED_TAXONOMIC_INFORMATION = "Obtain Detailed Taxonomic Information";\r
114     private final static int                 FRAME_X_SIZE                          = 800;\r
115     private final static int                 FRAME_Y_SIZE                          = 800;\r
116     // Filters for the file-open dialog (classes defined in this file)\r
117     private final static NHFilter            nhfilter                              = new NHFilter();\r
118     private final static NHXFilter           nhxfilter                             = new NHXFilter();\r
119     private final static XMLFilter           xmlfilter                             = new XMLFilter();\r
120     private final static TolFilter           tolfilter                             = new TolFilter();\r
121     private final static NexusFilter         nexusfilter                           = new NexusFilter();\r
122     private final static PdfFilter           pdffilter                             = new PdfFilter();\r
123     private final static GraphicsFileFilter  graphicsfilefilter                    = new GraphicsFileFilter();\r
124     private final static MsaFileFilter       msafilter                             = new MsaFileFilter();\r
125     private final static SequencesFileFilter seqsfilter                            = new SequencesFileFilter();\r
126     private final static DefaultFilter       defaultfilter                         = new DefaultFilter();\r
127     private static final long                serialVersionUID                      = -799735726778865234L;\r
128     private static final boolean             PREPROCESS_TREES                      = false;\r
129     private final JFileChooser               _values_filechooser;\r
130     private final JFileChooser               _sequences_filechooser;\r
131     private final JFileChooser               _open_filechooser;\r
132     private final JFileChooser               _msa_filechooser;\r
133     private final JFileChooser               _seqs_pi_filechooser;\r
134     private final JFileChooser               _open_filechooser_for_species_tree;\r
135     private final JFileChooser               _save_filechooser;\r
136     private final JFileChooser               _writetopdf_filechooser;\r
137     private final JFileChooser               _writetographics_filechooser;\r
138     // Application-only print menu items\r
139     private JMenuItem                        _print_item;\r
140     private JMenuItem                        _write_to_pdf_item;\r
141     private JMenuItem                        _write_to_jpg_item;\r
142     private JMenuItem                        _write_to_gif_item;\r
143     private JMenuItem                        _write_to_tif_item;\r
144     private JMenuItem                        _write_to_png_item;\r
145     private JMenuItem                        _write_to_bmp_item;\r
146     private JMenuItem                        _collapse_below_threshold;\r
147     private JMenuItem                        _collapse_below_branch_length;\r
148     private File                             _current_dir;\r
149     private ButtonGroup                      _radio_group_1;\r
150     private ButtonGroup                      _radio_group_2;\r
151     // Others:\r
152     double                                   _min_not_collapse                     = Constants.MIN_NOT_COLLAPSE_DEFAULT;\r
153     double                                   _min_not_collapse_bl                  = 0.001;\r
154     // Phylogeny Inference menu\r
155     private JMenu                            _inference_menu;\r
156     private JMenuItem                        _inference_from_msa_item;\r
157     private JMenuItem                        _inference_from_seqs_item;\r
158     // Phylogeny Inference\r
159     private PhylogeneticInferenceOptions     _phylogenetic_inference_options       = null;\r
160     private Msa                              _msa                                  = null;\r
161     private File                             _msa_file                             = null;\r
162     private List<MolecularSequence>          _seqs                                 = null;\r
163     private File                             _seqs_file                            = null;\r
164     JMenuItem                                _read_values_jmi;\r
165     JMenuItem                                _read_seqs_jmi;\r
166 \r
167     private MainFrameApplication( final Phylogeny[] phys, final Configuration config ) {\r
168         _configuration = config;\r
169         if ( _configuration == null ) {\r
170             throw new IllegalArgumentException( "configuration is null" );\r
171         }\r
172         setVisible( false );\r
173         setOptions( Options.createInstance( _configuration ) );\r
174         _mainpanel = new MainPanel( _configuration, this );\r
175         _open_filechooser = null;\r
176         _open_filechooser_for_species_tree = null;\r
177         _save_filechooser = null;\r
178         _writetopdf_filechooser = null;\r
179         _writetographics_filechooser = null;\r
180         _msa_filechooser = null;\r
181         _seqs_pi_filechooser = null;\r
182         _values_filechooser = null;\r
183         _sequences_filechooser = null;\r
184         _jmenubar = new JMenuBar();\r
185         buildFileMenu();\r
186         buildTypeMenu();\r
187         _contentpane = getContentPane();\r
188         _contentpane.setLayout( new BorderLayout() );\r
189         _contentpane.add( _mainpanel, BorderLayout.CENTER );\r
190         // App is this big\r
191         setSize( MainFrameApplication.FRAME_X_SIZE, MainFrameApplication.FRAME_Y_SIZE );\r
192         // The window listener\r
193         setDefaultCloseOperation( WindowConstants.DO_NOTHING_ON_CLOSE );\r
194         addWindowListener( new WindowAdapter() {\r
195 \r
196             @Override\r
197             public void windowClosing( final WindowEvent e ) {\r
198                 exit();\r
199             }\r
200         } );\r
201         //   setVisible( true );\r
202         if ( ( phys != null ) && ( phys.length > 0 ) ) {\r
203             AptxUtil.addPhylogeniesToTabs( phys, "", null, _configuration, _mainpanel );\r
204             validate();\r
205             getMainPanel().getControlPanel().showWholeAll();\r
206             getMainPanel().getControlPanel().showWhole();\r
207         }\r
208         //activateSaveAllIfNeeded();\r
209         // ...and its children\r
210         _contentpane.repaint();\r
211     }\r
212 \r
213     private MainFrameApplication( final Phylogeny[] phys, final Configuration config, final String title ) {\r
214         this( phys, config, title, null );\r
215     }\r
216 \r
217     private MainFrameApplication( final Phylogeny[] phys,\r
218                                   final Configuration config,\r
219                                   final String title,\r
220                                   final File current_dir ) {\r
221         super();\r
222         _configuration = config;\r
223         if ( _configuration == null ) {\r
224             throw new IllegalArgumentException( "configuration is null" );\r
225         }\r
226         try {\r
227             boolean synth_exception = false;\r
228             if ( Constants.__SYNTH_LF ) {\r
229                 try {\r
230                     final SynthLookAndFeel synth = new SynthLookAndFeel();\r
231                     synth.load( MainFrameApplication.class.getResourceAsStream( "/resources/synth_look_and_feel_1.xml" ),\r
232                                 MainFrameApplication.class );\r
233                     UIManager.setLookAndFeel( synth );\r
234                 }\r
235                 catch ( final Exception ex ) {\r
236                     synth_exception = true;\r
237                     ForesterUtil.printWarningMessage( Constants.PRG_NAME,\r
238                                                       "could not create synth look and feel: "\r
239                                                               + ex.getLocalizedMessage() );\r
240                 }\r
241             }\r
242             if ( !Constants.__SYNTH_LF || synth_exception ) {\r
243                 if ( _configuration.isUseNativeUI() ) {\r
244                     UIManager.setLookAndFeel( UIManager.getSystemLookAndFeelClassName() );\r
245                 }\r
246                 else {\r
247                     UIManager.setLookAndFeel( UIManager.getCrossPlatformLookAndFeelClassName() );\r
248                 }\r
249             }\r
250             //UIManager.setLookAndFeel( "com.sun.java.swing.plaf.nimbus.NimbusLookAndFeel" );\r
251         }\r
252         catch ( final UnsupportedLookAndFeelException e ) {\r
253             AptxUtil.dieWithSystemError( "unsupported look and feel: " + e.toString() );\r
254         }\r
255         catch ( final ClassNotFoundException e ) {\r
256             AptxUtil.dieWithSystemError( "class not found exception: " + e.toString() );\r
257         }\r
258         catch ( final InstantiationException e ) {\r
259             AptxUtil.dieWithSystemError( "instantiation exception: " + e.toString() );\r
260         }\r
261         catch ( final IllegalAccessException e ) {\r
262             AptxUtil.dieWithSystemError( "illegal access exception: " + e.toString() );\r
263         }\r
264         if ( ( current_dir != null ) && current_dir.canRead() && current_dir.isDirectory() ) {\r
265             setCurrentDir( current_dir );\r
266         }\r
267         // hide until everything is ready\r
268         setVisible( false );\r
269         setOptions( Options.createInstance( _configuration ) );\r
270         setInferenceManager( InferenceManager.createInstance( _configuration ) );\r
271         setPhylogeneticInferenceOptions( PhylogeneticInferenceOptions.createInstance( _configuration ) );\r
272         //     _textframe = null; #~~~~\r
273         // set title\r
274         setTitle( Constants.PRG_NAME + " " + Constants.VERSION + " (" + Constants.PRG_DATE + ")" );\r
275         _mainpanel = new MainPanel( _configuration, this );\r
276         // The file dialogs\r
277         _open_filechooser = new JFileChooser();\r
278         _open_filechooser.setCurrentDirectory( new File( "." ) );\r
279         _open_filechooser.setMultiSelectionEnabled( false );\r
280         _open_filechooser.addChoosableFileFilter( MainFrameApplication.xmlfilter );\r
281         _open_filechooser.addChoosableFileFilter( MainFrameApplication.nhxfilter );\r
282         _open_filechooser.addChoosableFileFilter( MainFrameApplication.nhfilter );\r
283         _open_filechooser.addChoosableFileFilter( MainFrameApplication.nexusfilter );\r
284         _open_filechooser.addChoosableFileFilter( MainFrameApplication.tolfilter );\r
285         _open_filechooser.addChoosableFileFilter( _open_filechooser.getAcceptAllFileFilter() );\r
286         _open_filechooser.setFileFilter( MainFrameApplication.defaultfilter );\r
287         _open_filechooser_for_species_tree = new JFileChooser();\r
288         _open_filechooser_for_species_tree.setCurrentDirectory( new File( "." ) );\r
289         _open_filechooser_for_species_tree.setMultiSelectionEnabled( false );\r
290         _open_filechooser_for_species_tree.addChoosableFileFilter( MainFrameApplication.xmlfilter );\r
291         _open_filechooser_for_species_tree.addChoosableFileFilter( MainFrameApplication.tolfilter );\r
292         _open_filechooser_for_species_tree.setFileFilter( MainFrameApplication.xmlfilter );\r
293         _save_filechooser = new JFileChooser();\r
294         _save_filechooser.setCurrentDirectory( new File( "." ) );\r
295         _save_filechooser.setMultiSelectionEnabled( false );\r
296         _save_filechooser.setFileFilter( MainFrameApplication.xmlfilter );\r
297         _save_filechooser.addChoosableFileFilter( MainFrameApplication.nhfilter );\r
298         _save_filechooser.addChoosableFileFilter( MainFrameApplication.nexusfilter );\r
299         _save_filechooser.addChoosableFileFilter( _save_filechooser.getAcceptAllFileFilter() );\r
300         _writetopdf_filechooser = new JFileChooser();\r
301         _writetopdf_filechooser.addChoosableFileFilter( MainFrameApplication.pdffilter );\r
302         _writetographics_filechooser = new JFileChooser();\r
303         _writetographics_filechooser.addChoosableFileFilter( MainFrameApplication.graphicsfilefilter );\r
304         // Msa:\r
305         _msa_filechooser = new JFileChooser();\r
306         _msa_filechooser.setName( "Read Multiple Sequence Alignment File" );\r
307         _msa_filechooser.setCurrentDirectory( new File( "." ) );\r
308         _msa_filechooser.setMultiSelectionEnabled( false );\r
309         _msa_filechooser.addChoosableFileFilter( _msa_filechooser.getAcceptAllFileFilter() );\r
310         _msa_filechooser.addChoosableFileFilter( MainFrameApplication.msafilter );\r
311         // Seqs:\r
312         _seqs_pi_filechooser = new JFileChooser();\r
313         _seqs_pi_filechooser.setName( "Read Sequences File" );\r
314         _seqs_pi_filechooser.setCurrentDirectory( new File( "." ) );\r
315         _seqs_pi_filechooser.setMultiSelectionEnabled( false );\r
316         _seqs_pi_filechooser.addChoosableFileFilter( _seqs_pi_filechooser.getAcceptAllFileFilter() );\r
317         _seqs_pi_filechooser.addChoosableFileFilter( MainFrameApplication.seqsfilter );\r
318         // Expression\r
319         _values_filechooser = new JFileChooser();\r
320         _values_filechooser.setCurrentDirectory( new File( "." ) );\r
321         _values_filechooser.setMultiSelectionEnabled( false );\r
322         // Sequences\r
323         _sequences_filechooser = new JFileChooser();\r
324         _sequences_filechooser.setCurrentDirectory( new File( "." ) );\r
325         _sequences_filechooser.setMultiSelectionEnabled( false );\r
326         // build the menu bar\r
327         _jmenubar = new JMenuBar();\r
328         if ( !_configuration.isUseNativeUI() ) {\r
329             _jmenubar.setBackground( getConfiguration().getGuiMenuBackgroundColor() );\r
330         }\r
331         buildFileMenu();\r
332         if ( Constants.__ALLOW_PHYLOGENETIC_INFERENCE ) {\r
333             buildPhylogeneticInferenceMenu();\r
334         }\r
335         buildAnalysisMenu();\r
336         buildToolsMenu();\r
337         buildViewMenu();\r
338         buildFontSizeMenu();\r
339         buildOptionsMenu();\r
340         buildTypeMenu();\r
341         buildHelpMenu();\r
342         setJMenuBar( _jmenubar );\r
343         _jmenubar.add( _help_jmenu );\r
344         _contentpane = getContentPane();\r
345         _contentpane.setLayout( new BorderLayout() );\r
346         _contentpane.add( _mainpanel, BorderLayout.CENTER );\r
347         // App is this big\r
348         setSize( MainFrameApplication.FRAME_X_SIZE, MainFrameApplication.FRAME_Y_SIZE );\r
349         //        addWindowFocusListener( new WindowAdapter() {\r
350         //\r
351         //            @Override\r
352         //            public void windowGainedFocus( WindowEvent e ) {\r
353         //                requestFocusInWindow();\r
354         //            }\r
355         //        } );\r
356         // The window listener\r
357         setDefaultCloseOperation( WindowConstants.DO_NOTHING_ON_CLOSE );\r
358         addWindowListener( new WindowAdapter() {\r
359 \r
360             @Override\r
361             public void windowClosing( final WindowEvent e ) {\r
362                 if ( isUnsavedDataPresent() ) {\r
363                     final int r = JOptionPane.showConfirmDialog( null,\r
364                                                                  "Exit despite potentially unsaved changes?",\r
365                                                                  "Exit?",\r
366                                                                  JOptionPane.YES_NO_OPTION );\r
367                     if ( r != JOptionPane.YES_OPTION ) {\r
368                         return;\r
369                     }\r
370                 }\r
371                 else {\r
372                     final int r = JOptionPane.showConfirmDialog( null,\r
373                                                                  "Exit Archaeopteryx?",\r
374                                                                  "Exit?",\r
375                                                                  JOptionPane.YES_NO_OPTION );\r
376                     if ( r != JOptionPane.YES_OPTION ) {\r
377                         return;\r
378                     }\r
379                 }\r
380                 exit();\r
381             }\r
382         } );\r
383         // The component listener\r
384         addComponentListener( new ComponentAdapter() {\r
385 \r
386             @Override\r
387             public void componentResized( final ComponentEvent e ) {\r
388                 if ( _mainpanel.getCurrentTreePanel() != null ) {\r
389                     _mainpanel.getCurrentTreePanel().calcParametersForPainting( _mainpanel.getCurrentTreePanel()\r
390                                                                                         .getWidth(),\r
391                                                                                 _mainpanel.getCurrentTreePanel()\r
392                                                                                         .getHeight() );\r
393                 }\r
394             }\r
395         } );\r
396         requestFocusInWindow();\r
397         // addKeyListener( this );\r
398         setVisible( true );\r
399         if ( ( phys != null ) && ( phys.length > 0 ) ) {\r
400             AptxUtil.addPhylogeniesToTabs( phys, title, null, _configuration, _mainpanel );\r
401             validate();\r
402             getMainPanel().getControlPanel().showWholeAll();\r
403             getMainPanel().getControlPanel().showWhole();\r
404         }\r
405         activateSaveAllIfNeeded();\r
406         // ...and its children\r
407         _contentpane.repaint();\r
408         System.gc();\r
409     }\r
410 \r
411     private MainFrameApplication( final Phylogeny[] phys, final String config_file, final String title ) {\r
412         // Reads the config file (false, false => not url, not applet):\r
413         this( phys, new Configuration( config_file, false, false, true ), title );\r
414     }\r
415 \r
416     @Override\r
417     public void actionPerformed( final ActionEvent e ) {\r
418         try {\r
419             super.actionPerformed( e );\r
420             final Object o = e.getSource();\r
421             // Handle app-specific actions here:\r
422             if ( o == _open_item ) {\r
423                 readPhylogeniesFromFile();\r
424             }\r
425             if ( o == _open_url_item ) {\r
426                 readPhylogeniesFromURL();\r
427             }\r
428             else if ( o == _save_item ) {\r
429                 writeToFile( _mainpanel.getCurrentPhylogeny() );\r
430                 // If subtree currently displayed, save it, instead of complete\r
431                 // tree.\r
432             }\r
433             else if ( o == _new_item ) {\r
434                 newTree();\r
435             }\r
436             else if ( o == _save_all_item ) {\r
437                 writeAllToFile();\r
438             }\r
439             else if ( o == _close_item ) {\r
440                 closeCurrentPane();\r
441             }\r
442             else if ( o == _write_to_pdf_item ) {\r
443                 writeToPdf( _mainpanel.getCurrentPhylogeny() );\r
444             }\r
445             else if ( o == _write_to_jpg_item ) {\r
446                 writeToGraphicsFile( _mainpanel.getCurrentPhylogeny(), GraphicsExportType.JPG );\r
447             }\r
448             else if ( o == _write_to_png_item ) {\r
449                 writeToGraphicsFile( _mainpanel.getCurrentPhylogeny(), GraphicsExportType.PNG );\r
450             }\r
451             else if ( o == _write_to_gif_item ) {\r
452                 writeToGraphicsFile( _mainpanel.getCurrentPhylogeny(), GraphicsExportType.GIF );\r
453             }\r
454             else if ( o == _write_to_tif_item ) {\r
455                 writeToGraphicsFile( _mainpanel.getCurrentPhylogeny(), GraphicsExportType.TIFF );\r
456             }\r
457             else if ( o == _write_to_bmp_item ) {\r
458                 writeToGraphicsFile( _mainpanel.getCurrentPhylogeny(), GraphicsExportType.BMP );\r
459             }\r
460             else if ( o == _print_item ) {\r
461                 print();\r
462             }\r
463             else if ( o == _load_species_tree_item ) {\r
464                 readSpeciesTreeFromFile();\r
465             }\r
466             else if ( o == _lineage_inference ) {\r
467                 if ( isSubtreeDisplayed() ) {\r
468                     JOptionPane.showMessageDialog( this,\r
469                                                    "Subtree is shown.",\r
470                                                    "Cannot infer ancestral taxonomies",\r
471                                                    JOptionPane.ERROR_MESSAGE );\r
472                     return;\r
473                 }\r
474                 executeLineageInference();\r
475             }\r
476             else if ( o == _obtain_detailed_taxonomic_information_jmi ) {\r
477                 if ( isSubtreeDisplayed() ) {\r
478                     return;\r
479                 }\r
480                 obtainDetailedTaxonomicInformation();\r
481             }\r
482             else if ( o == _obtain_detailed_taxonomic_information_deleting_jmi ) {\r
483                 if ( isSubtreeDisplayed() ) {\r
484                     return;\r
485                 }\r
486                 obtainDetailedTaxonomicInformationDelete();\r
487             }\r
488             else if ( o == _obtain_seq_information_jmi ) {\r
489                 obtainSequenceInformation();\r
490             }\r
491             else if ( o == _read_values_jmi ) {\r
492                 if ( isSubtreeDisplayed() ) {\r
493                     return;\r
494                 }\r
495                 addExpressionValuesFromFile();\r
496             }\r
497             else if ( o == _read_seqs_jmi ) {\r
498                 if ( isSubtreeDisplayed() ) {\r
499                     return;\r
500                 }\r
501                 addSequencesFromFile();\r
502             }\r
503             else if ( o == _move_node_names_to_tax_sn_jmi ) {\r
504                 moveNodeNamesToTaxSn();\r
505             }\r
506             else if ( o == _move_node_names_to_seq_names_jmi ) {\r
507                 moveNodeNamesToSeqNames();\r
508             }\r
509             else if ( o == _extract_tax_code_from_node_names_jmi ) {\r
510                 extractTaxDataFromNodeNames();\r
511             }\r
512             else if ( o == _graphics_export_visible_only_cbmi ) {\r
513                 updateOptions( getOptions() );\r
514             }\r
515             else if ( o == _antialias_print_cbmi ) {\r
516                 updateOptions( getOptions() );\r
517             }\r
518             else if ( o == _print_black_and_white_cbmi ) {\r
519                 updateOptions( getOptions() );\r
520             }\r
521             else if ( o == _print_using_actual_size_cbmi ) {\r
522                 updateOptions( getOptions() );\r
523             }\r
524             else if ( o == _graphics_export_using_actual_size_cbmi ) {\r
525                 updateOptions( getOptions() );\r
526             }\r
527             else if ( o == _print_size_mi ) {\r
528                 choosePrintSize();\r
529             }\r
530             else if ( o == _choose_pdf_width_mi ) {\r
531                 choosePdfWidth();\r
532             }\r
533             else if ( o == _internal_number_are_confidence_for_nh_parsing_cbmi ) {\r
534                 updateOptions( getOptions() );\r
535             }\r
536             else if ( o == _replace_underscores_cbmi ) {\r
537                 if ( ( _extract_taxonomy_no_rbmi != null ) && !_extract_taxonomy_no_rbmi.isSelected() ) {\r
538                     _extract_taxonomy_no_rbmi.setSelected( true );\r
539                 }\r
540                 updateOptions( getOptions() );\r
541             }\r
542             else if ( o == _allow_errors_in_distance_to_parent_cbmi ) {\r
543                 updateOptions( getOptions() );\r
544             }\r
545             else if ( o == _collapse_below_threshold ) {\r
546                 if ( isSubtreeDisplayed() ) {\r
547                     return;\r
548                 }\r
549                 collapseBelowThreshold();\r
550             }\r
551             else if ( o == _collapse_below_branch_length ) {\r
552                 if ( isSubtreeDisplayed() ) {\r
553                     return;\r
554                 }\r
555                 collapseBelowBranchLengthThreshold();\r
556             }\r
557             else if ( ( o == _extract_taxonomy_pfam_strict_rbmi ) || ( o == _extract_taxonomy_pfam_relaxed_rbmi )\r
558                     || ( o == _extract_taxonomy_agressive_rbmi ) ) {\r
559                 if ( _replace_underscores_cbmi != null ) {\r
560                     _replace_underscores_cbmi.setSelected( false );\r
561                 }\r
562                 updateOptions( getOptions() );\r
563             }\r
564             else if ( o == _extract_taxonomy_no_rbmi ) {\r
565                 updateOptions( getOptions() );\r
566             }\r
567             else if ( o == _inference_from_msa_item ) {\r
568                 executePhyleneticInference( false );\r
569             }\r
570             else if ( o == _inference_from_seqs_item ) {\r
571                 executePhyleneticInference( true );\r
572             }\r
573             _contentpane.repaint();\r
574         }\r
575         catch ( final Exception ex ) {\r
576             AptxUtil.unexpectedException( ex );\r
577         }\r
578         catch ( final Error err ) {\r
579             AptxUtil.unexpectedError( err );\r
580         }\r
581     }\r
582 \r
583     public void end() {\r
584         _mainpanel.terminate();\r
585         _contentpane.removeAll();\r
586         setVisible( false );\r
587         dispose();\r
588     }\r
589 \r
590     @Override\r
591     public MainPanel getMainPanel() {\r
592         return _mainpanel;\r
593     }\r
594 \r
595     public Msa getMsa() {\r
596         return _msa;\r
597     }\r
598 \r
599     public File getMsaFile() {\r
600         return _msa_file;\r
601     }\r
602 \r
603     public List<MolecularSequence> getSeqs() {\r
604         return _seqs;\r
605     }\r
606 \r
607     public File getSeqsFile() {\r
608         return _seqs_file;\r
609     }\r
610 \r
611     public void readMsaFromFile() {\r
612         // Set an initial directory if none set yet\r
613         final File my_dir = getCurrentDir();\r
614         _msa_filechooser.setMultiSelectionEnabled( false );\r
615         // Open file-open dialog and set current directory\r
616         if ( my_dir != null ) {\r
617             _msa_filechooser.setCurrentDirectory( my_dir );\r
618         }\r
619         final int result = _msa_filechooser.showOpenDialog( _contentpane );\r
620         // All done: get the msa\r
621         final File file = _msa_filechooser.getSelectedFile();\r
622         setCurrentDir( _msa_filechooser.getCurrentDirectory() );\r
623         if ( ( file != null ) && !file.isDirectory() && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
624             setMsaFile( null );\r
625             setMsa( null );\r
626             Msa msa = null;\r
627             try {\r
628                 final InputStream is = new FileInputStream( file );\r
629                 if ( FastaParser.isLikelyFasta( file ) ) {\r
630                     msa = FastaParser.parseMsa( is );\r
631                 }\r
632                 else {\r
633                     msa = GeneralMsaParser.parse( is );\r
634                 }\r
635             }\r
636             catch ( final MsaFormatException e ) {\r
637                 setArrowCursor();\r
638                 JOptionPane.showMessageDialog( this,\r
639                                                e.getLocalizedMessage(),\r
640                                                "Multiple sequence alignment format error",\r
641                                                JOptionPane.ERROR_MESSAGE );\r
642                 return;\r
643             }\r
644             catch ( final IOException e ) {\r
645                 setArrowCursor();\r
646                 JOptionPane.showMessageDialog( this,\r
647                                                e.getLocalizedMessage(),\r
648                                                "Failed to read multiple sequence alignment",\r
649                                                JOptionPane.ERROR_MESSAGE );\r
650                 return;\r
651             }\r
652             catch ( final IllegalArgumentException e ) {\r
653                 setArrowCursor();\r
654                 JOptionPane.showMessageDialog( this,\r
655                                                e.getLocalizedMessage(),\r
656                                                "Unexpected error during reading of multiple sequence alignment",\r
657                                                JOptionPane.ERROR_MESSAGE );\r
658                 return;\r
659             }\r
660             catch ( final Exception e ) {\r
661                 setArrowCursor();\r
662                 e.printStackTrace();\r
663                 JOptionPane.showMessageDialog( this,\r
664                                                e.getLocalizedMessage(),\r
665                                                "Unexpected error during reading of multiple sequence alignment",\r
666                                                JOptionPane.ERROR_MESSAGE );\r
667                 return;\r
668             }\r
669             if ( ( msa == null ) || ( msa.getNumberOfSequences() < 1 ) ) {\r
670                 JOptionPane.showMessageDialog( this,\r
671                                                "Multiple sequence alignment is empty",\r
672                                                "Illegal Multiple Sequence Alignment",\r
673                                                JOptionPane.ERROR_MESSAGE );\r
674                 return;\r
675             }\r
676             if ( msa.getNumberOfSequences() < 4 ) {\r
677                 JOptionPane.showMessageDialog( this,\r
678                                                "Multiple sequence alignment needs to contain at least 3 sequences",\r
679                                                "Illegal multiple sequence alignment",\r
680                                                JOptionPane.ERROR_MESSAGE );\r
681                 return;\r
682             }\r
683             if ( msa.getLength() < 2 ) {\r
684                 JOptionPane.showMessageDialog( this,\r
685                                                "Multiple sequence alignment needs to contain at least 2 residues",\r
686                                                "Illegal multiple sequence alignment",\r
687                                                JOptionPane.ERROR_MESSAGE );\r
688                 return;\r
689             }\r
690             System.gc();\r
691             setMsaFile( _msa_filechooser.getSelectedFile() );\r
692             setMsa( msa );\r
693         }\r
694     }\r
695 \r
696     public void readSeqsFromFileforPI() {\r
697         // Set an initial directory if none set yet\r
698         final File my_dir = getCurrentDir();\r
699         _seqs_pi_filechooser.setMultiSelectionEnabled( false );\r
700         // Open file-open dialog and set current directory\r
701         if ( my_dir != null ) {\r
702             _seqs_pi_filechooser.setCurrentDirectory( my_dir );\r
703         }\r
704         final int result = _seqs_pi_filechooser.showOpenDialog( _contentpane );\r
705         // All done: get the seqs\r
706         final File file = _seqs_pi_filechooser.getSelectedFile();\r
707         setCurrentDir( _seqs_pi_filechooser.getCurrentDirectory() );\r
708         if ( ( file != null ) && !file.isDirectory() && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
709             setSeqsFile( null );\r
710             setSeqs( null );\r
711             List<MolecularSequence> seqs = null;\r
712             try {\r
713                 if ( FastaParser.isLikelyFasta( new FileInputStream( file ) ) ) {\r
714                     seqs = FastaParser.parse( new FileInputStream( file ) );\r
715                     for( final MolecularSequence seq : seqs ) {\r
716                         System.out.println( SequenceWriter.toFasta( seq, 60 ) );\r
717                     }\r
718                 }\r
719                 else {\r
720                     //TODO error\r
721                 }\r
722             }\r
723             catch ( final MsaFormatException e ) {\r
724                 setArrowCursor();\r
725                 JOptionPane.showMessageDialog( this,\r
726                                                e.getLocalizedMessage(),\r
727                                                "Multiple sequence file format error",\r
728                                                JOptionPane.ERROR_MESSAGE );\r
729                 return;\r
730             }\r
731             catch ( final IOException e ) {\r
732                 setArrowCursor();\r
733                 JOptionPane.showMessageDialog( this,\r
734                                                e.getLocalizedMessage(),\r
735                                                "Failed to read multiple sequence file",\r
736                                                JOptionPane.ERROR_MESSAGE );\r
737                 return;\r
738             }\r
739             catch ( final IllegalArgumentException e ) {\r
740                 setArrowCursor();\r
741                 JOptionPane.showMessageDialog( this,\r
742                                                e.getLocalizedMessage(),\r
743                                                "Unexpected error during reading of multiple sequence file",\r
744                                                JOptionPane.ERROR_MESSAGE );\r
745                 return;\r
746             }\r
747             catch ( final Exception e ) {\r
748                 setArrowCursor();\r
749                 e.printStackTrace();\r
750                 JOptionPane.showMessageDialog( this,\r
751                                                e.getLocalizedMessage(),\r
752                                                "Unexpected error during reading of multiple sequence file",\r
753                                                JOptionPane.ERROR_MESSAGE );\r
754                 return;\r
755             }\r
756             if ( ( seqs == null ) || ( seqs.size() < 1 ) ) {\r
757                 JOptionPane.showMessageDialog( this,\r
758                                                "Multiple sequence file is empty",\r
759                                                "Illegal multiple sequence file",\r
760                                                JOptionPane.ERROR_MESSAGE );\r
761                 return;\r
762             }\r
763             if ( seqs.size() < 4 ) {\r
764                 JOptionPane.showMessageDialog( this,\r
765                                                "Multiple sequence file needs to contain at least 3 sequences",\r
766                                                "Illegal multiple sequence file",\r
767                                                JOptionPane.ERROR_MESSAGE );\r
768                 return;\r
769             }\r
770             //  if ( msa.getLength() < 2 ) {\r
771             //       JOptionPane.showMessageDialog( this,\r
772             //                                      "Multiple sequence alignment needs to contain at least 2 residues",\r
773             //                                      "Illegal multiple sequence file",\r
774             //                                      JOptionPane.ERROR_MESSAGE );\r
775             //       return;\r
776             //   }\r
777             System.gc();\r
778             setSeqsFile( _seqs_pi_filechooser.getSelectedFile() );\r
779             setSeqs( seqs );\r
780         }\r
781     }\r
782 \r
783     void buildAnalysisMenu() {\r
784         _analysis_menu = MainFrame.createMenu( "Analysis", getConfiguration() );\r
785         _analysis_menu.add( _gsdi_item = new JMenuItem( "GSDI (Generalized Speciation Duplication Inference)" ) );\r
786         _analysis_menu.add( _gsdir_item = new JMenuItem( "GSDIR (GSDI with re-rooting)" ) );\r
787         _analysis_menu.add( _load_species_tree_item = new JMenuItem( "Load Species Tree..." ) );\r
788         customizeJMenuItem( _gsdi_item );\r
789         customizeJMenuItem( _gsdir_item );\r
790         customizeJMenuItem( _load_species_tree_item );\r
791         _analysis_menu.addSeparator();\r
792         _analysis_menu.add( _lineage_inference = new JMenuItem( INFER_ANCESTOR_TAXONOMIES ) );\r
793         customizeJMenuItem( _lineage_inference );\r
794         _lineage_inference.setToolTipText( "Inference of ancestor taxonomies/lineages" );\r
795         _jmenubar.add( _analysis_menu );\r
796     }\r
797 \r
798     @Override\r
799     void buildFileMenu() {\r
800         _file_jmenu = MainFrame.createMenu( "File", getConfiguration() );\r
801         _file_jmenu.add( _open_item = new JMenuItem( "Read Tree from File..." ) );\r
802         _file_jmenu.addSeparator();\r
803         _file_jmenu.add( _open_url_item = new JMenuItem( "Read Tree from URL/Webservice..." ) );\r
804         _file_jmenu.addSeparator();\r
805         final WebservicesManager webservices_manager = WebservicesManager.getInstance();\r
806         _load_phylogeny_from_webservice_menu_items = new JMenuItem[ webservices_manager\r
807                 .getAvailablePhylogeniesWebserviceClients().size() ];\r
808         for( int i = 0; i < webservices_manager.getAvailablePhylogeniesWebserviceClients().size(); ++i ) {\r
809             final PhylogeniesWebserviceClient client = webservices_manager.getAvailablePhylogeniesWebserviceClient( i );\r
810             _load_phylogeny_from_webservice_menu_items[ i ] = new JMenuItem( client.getMenuName() );\r
811             _file_jmenu.add( _load_phylogeny_from_webservice_menu_items[ i ] );\r
812         }\r
813         if ( getConfiguration().isEditable() ) {\r
814             _file_jmenu.addSeparator();\r
815             _file_jmenu.add( _new_item = new JMenuItem( "New" ) );\r
816             _new_item.setToolTipText( "to create a new tree with one node, as source for manual tree construction" );\r
817         }\r
818         _file_jmenu.addSeparator();\r
819         _file_jmenu.add( _save_item = new JMenuItem( "Save Tree As..." ) );\r
820         _file_jmenu.add( _save_all_item = new JMenuItem( "Save All Trees As..." ) );\r
821         _save_all_item.setToolTipText( "Write all phylogenies to one file." );\r
822         _save_all_item.setEnabled( false );\r
823         _file_jmenu.addSeparator();\r
824         _file_jmenu.add( _write_to_pdf_item = new JMenuItem( "Export to PDF file ..." ) );\r
825         if ( AptxUtil.canWriteFormat( "tif" ) || AptxUtil.canWriteFormat( "tiff" ) || AptxUtil.canWriteFormat( "TIF" ) ) {\r
826             _file_jmenu.add( _write_to_tif_item = new JMenuItem( "Export to TIFF file..." ) );\r
827         }\r
828         _file_jmenu.add( _write_to_png_item = new JMenuItem( "Export to PNG file..." ) );\r
829         _file_jmenu.add( _write_to_jpg_item = new JMenuItem( "Export to JPG file..." ) );\r
830         if ( AptxUtil.canWriteFormat( "gif" ) ) {\r
831             _file_jmenu.add( _write_to_gif_item = new JMenuItem( "Export to GIF file..." ) );\r
832         }\r
833         if ( AptxUtil.canWriteFormat( "bmp" ) ) {\r
834             _file_jmenu.add( _write_to_bmp_item = new JMenuItem( "Export to BMP file..." ) );\r
835         }\r
836         _file_jmenu.addSeparator();\r
837         _file_jmenu.add( _print_item = new JMenuItem( "Print..." ) );\r
838         _file_jmenu.addSeparator();\r
839         _file_jmenu.add( _close_item = new JMenuItem( "Close Tab" ) );\r
840         _close_item.setToolTipText( "To close the current pane." );\r
841         _close_item.setEnabled( true );\r
842         _file_jmenu.addSeparator();\r
843         _file_jmenu.add( _exit_item = new JMenuItem( "Exit" ) );\r
844         customizeJMenuItem( _open_item );\r
845         _open_item\r
846                 .setFont( new Font( _open_item.getFont().getFontName(), Font.BOLD, _open_item.getFont().getSize() + 4 ) );\r
847         customizeJMenuItem( _open_url_item );\r
848         for( int i = 0; i < webservices_manager.getAvailablePhylogeniesWebserviceClients().size(); ++i ) {\r
849             customizeJMenuItem( _load_phylogeny_from_webservice_menu_items[ i ] );\r
850         }\r
851         customizeJMenuItem( _save_item );\r
852         if ( getConfiguration().isEditable() ) {\r
853             customizeJMenuItem( _new_item );\r
854         }\r
855         customizeJMenuItem( _close_item );\r
856         customizeJMenuItem( _save_all_item );\r
857         customizeJMenuItem( _write_to_pdf_item );\r
858         customizeJMenuItem( _write_to_png_item );\r
859         customizeJMenuItem( _write_to_jpg_item );\r
860         customizeJMenuItem( _write_to_gif_item );\r
861         customizeJMenuItem( _write_to_tif_item );\r
862         customizeJMenuItem( _write_to_bmp_item );\r
863         customizeJMenuItem( _print_item );\r
864         customizeJMenuItem( _exit_item );\r
865         _jmenubar.add( _file_jmenu );\r
866     }\r
867 \r
868     void buildOptionsMenu() {\r
869         _options_jmenu = MainFrame.createMenu( OPTIONS_HEADER, getConfiguration() );\r
870         _options_jmenu.addChangeListener( new ChangeListener() {\r
871 \r
872             @Override\r
873             public void stateChanged( final ChangeEvent e ) {\r
874                 MainFrame.setOvPlacementColorChooseMenuItem( _overview_placment_mi, getOptions() );\r
875                 MainFrame.setTextColorChooseMenuItem( _switch_colors_mi, getCurrentTreePanel() );\r
876                 MainFrame\r
877                         .setTextMinSupportMenuItem( _choose_minimal_confidence_mi, getOptions(), getCurrentTreePanel() );\r
878                 MainFrame.setTextForFontChooserMenuItem( _choose_font_mi, MainFrame\r
879                         .createCurrentFontDesc( getMainPanel().getTreeFontSet() ) );\r
880                 setTextForGraphicsSizeChooserMenuItem( _print_size_mi, getOptions() );\r
881                 setTextForPdfLineWidthChooserMenuItem( _choose_pdf_width_mi, getOptions() );\r
882                 MainFrame.setCycleNodeFillMenuItem( _cycle_node_fill_mi, getOptions() );\r
883                 MainFrame.setCycleNodeShapeMenuItem( _cycle_node_shape_mi, getOptions() );\r
884                 \r
885                 MainFrame.setCycleDataReturnMenuItem( _cycle_data_return, getOptions() );\r
886                 MainFrame.setTextNodeSizeMenuItem( _choose_node_size_mi, getOptions() );\r
887                 try {\r
888                     getMainPanel().getControlPanel().setVisibilityOfDomainStrucureCB();\r
889                     getMainPanel().getControlPanel().setVisibilityOfX();\r
890                 }\r
891                 catch ( final Exception ignore ) {\r
892                     // do nothing, not important.\r
893                 }\r
894             }\r
895         } );\r
896         _options_jmenu.add( customizeMenuItemAsLabel( new JMenuItem( DISPLAY_SUBHEADER ), getConfiguration() ) );\r
897         _options_jmenu\r
898                 .add( _ext_node_dependent_cladogram_rbmi = new JRadioButtonMenuItem( MainFrame.NONUNIFORM_CLADOGRAMS_LABEL ) );\r
899         _options_jmenu.add( _uniform_cladograms_rbmi = new JRadioButtonMenuItem( MainFrame.UNIFORM_CLADOGRAMS_LABEL ) );\r
900         _options_jmenu.add( _non_lined_up_cladograms_rbmi = new JRadioButtonMenuItem( NON_LINED_UP_CLADOGRAMS_LABEL ) );\r
901         _radio_group_1 = new ButtonGroup();\r
902         _radio_group_1.add( _ext_node_dependent_cladogram_rbmi );\r
903         _radio_group_1.add( _uniform_cladograms_rbmi );\r
904         _radio_group_1.add( _non_lined_up_cladograms_rbmi );\r
905         _options_jmenu.add( _show_overview_cbmi = new JCheckBoxMenuItem( SHOW_OVERVIEW_LABEL ) );\r
906         _options_jmenu.add( _show_scale_cbmi = new JCheckBoxMenuItem( DISPLAY_SCALE_LABEL ) );\r
907         _options_jmenu\r
908                 .add( _show_default_node_shapes_internal_cbmi = new JCheckBoxMenuItem( DISPLAY_NODE_BOXES_LABEL_INT ) );\r
909         _options_jmenu\r
910                 .add( _show_default_node_shapes_external_cbmi = new JCheckBoxMenuItem( DISPLAY_NODE_BOXES_LABEL_EXT ) );\r
911         _options_jmenu\r
912                 .add( _show_default_node_shapes_for_marked_cbmi = new JCheckBoxMenuItem( MainFrame.DISPLAY_NODE_BOXES_LABEL_MARKED ) );\r
913         _options_jmenu.add( _line_up_renderable_data_cbmi = new JCheckBoxMenuItem( MainFrame.LINE_UP_RENDERABLE_DATA ) );\r
914         if ( getConfiguration().doDisplayOption( Configuration.show_domain_architectures ) ) {\r
915             _options_jmenu.add( _right_line_up_domains_cbmi = new JCheckBoxMenuItem( MainFrame.RIGHT_LINE_UP_DOMAINS ) );\r
916             _options_jmenu.add( _show_domain_labels = new JCheckBoxMenuItem( MainFrame.SHOW_DOMAIN_LABELS_LABEL ) );\r
917         }\r
918         _options_jmenu.add( _show_annotation_ref_source = new JCheckBoxMenuItem( SHOW_ANN_REF_SOURCE_LABEL ) );\r
919         _options_jmenu.add( _show_confidence_stddev_cbmi = new JCheckBoxMenuItem( SHOW_CONF_STDDEV_LABEL ) );\r
920         _options_jmenu.add( _color_by_taxonomic_group_cbmi = new JCheckBoxMenuItem( COLOR_BY_TAXONOMIC_GROUP ) );\r
921         _options_jmenu.add( _color_labels_same_as_parent_branch = new JCheckBoxMenuItem( COLOR_LABELS_LABEL ) );\r
922         _color_labels_same_as_parent_branch.setToolTipText( MainFrame.COLOR_LABELS_TIP );\r
923         _options_jmenu.add( _abbreviate_scientific_names = new JCheckBoxMenuItem( ABBREV_SN_LABEL ) );\r
924         _options_jmenu.add( _label_direction_cbmi = new JCheckBoxMenuItem( LABEL_DIRECTION_LABEL ) );\r
925         _label_direction_cbmi.setToolTipText( LABEL_DIRECTION_TIP );\r
926         _options_jmenu.add( _screen_antialias_cbmi = new JCheckBoxMenuItem( SCREEN_ANTIALIAS_LABEL ) );\r
927         _options_jmenu.add( _background_gradient_cbmi = new JCheckBoxMenuItem( BG_GRAD_LABEL ) );\r
928         _options_jmenu.add( _cycle_node_shape_mi = new JMenuItem( MainFrame.CYCLE_NODE_SHAPE_LABEL ) );\r
929         _options_jmenu.add( _cycle_node_fill_mi = new JMenuItem( MainFrame.CYCLE_NODE_FILL_LABEL ) );\r
930         _options_jmenu.add( _choose_node_size_mi = new JMenuItem( MainFrame.CHOOSE_NODE_SIZE_LABEL ) );\r
931         _options_jmenu.add( _choose_minimal_confidence_mi = new JMenuItem( "" ) );\r
932         _options_jmenu.add( _overview_placment_mi = new JMenuItem( "" ) );\r
933         _options_jmenu.add( _switch_colors_mi = new JMenuItem( "" ) );\r
934         _options_jmenu.add( _choose_font_mi = new JMenuItem( "" ) );\r
935         _options_jmenu.addSeparator();\r
936         _options_jmenu.add( _cycle_data_return = new JMenuItem( "Cycle Data Return" ) );\r
937         _options_jmenu.addSeparator();\r
938         _options_jmenu.add( customizeMenuItemAsLabel( new JMenuItem( SEARCH_SUBHEADER ), getConfiguration() ) );\r
939         _options_jmenu.add( _search_case_senstive_cbmi = new JCheckBoxMenuItem( SEARCH_CASE_SENSITIVE_LABEL ) );\r
940         _options_jmenu.add( _search_whole_words_only_cbmi = new JCheckBoxMenuItem( SEARCH_TERMS_ONLY_LABEL ) );\r
941         _options_jmenu.add( _search_with_regex_cbmi = new JCheckBoxMenuItem( MainFrame.SEARCH_REGEX_LABEL ) );\r
942         _search_with_regex_cbmi.setToolTipText( MainFrame.SEARCH_WITH_REGEX_TIP );\r
943         _options_jmenu.add( _inverse_search_result_cbmi = new JCheckBoxMenuItem( INVERSE_SEARCH_RESULT_LABEL ) );\r
944         _options_jmenu.addSeparator();\r
945         _options_jmenu.add( customizeMenuItemAsLabel( new JMenuItem( "Graphics Export & Printing:" ),\r
946                                                       getConfiguration() ) );\r
947         _options_jmenu.add( _antialias_print_cbmi = new JCheckBoxMenuItem( "Antialias" ) );\r
948         _options_jmenu.add( _print_black_and_white_cbmi = new JCheckBoxMenuItem( "Export in Black and White" ) );\r
949         _options_jmenu\r
950                 .add( _print_using_actual_size_cbmi = new JCheckBoxMenuItem( "Use Current Image Size for PDF export and Printing" ) );\r
951         _options_jmenu\r
952                 .add( _graphics_export_using_actual_size_cbmi = new JCheckBoxMenuItem( "Use Current Image Size for PNG, JPG, and GIF export" ) );\r
953         _options_jmenu\r
954                 .add( _graphics_export_visible_only_cbmi = new JCheckBoxMenuItem( "Limit to Visible ('Screenshot') for PNG, JPG, and GIF export" ) );\r
955         _options_jmenu.add( _print_size_mi = new JMenuItem( "" ) );\r
956         _options_jmenu.add( _choose_pdf_width_mi = new JMenuItem( "" ) );\r
957         _options_jmenu.addSeparator();\r
958         _options_jmenu.add( customizeMenuItemAsLabel( new JMenuItem( "Newick/NHX/Nexus Input:" ), getConfiguration() ) );\r
959         _options_jmenu\r
960                 .add( _internal_number_are_confidence_for_nh_parsing_cbmi = new JCheckBoxMenuItem( "Internal Node Names are Confidence Values" ) );\r
961         _options_jmenu.add( _replace_underscores_cbmi = new JCheckBoxMenuItem( "Replace Underscores with Spaces" ) );\r
962         _options_jmenu\r
963                 .add( _allow_errors_in_distance_to_parent_cbmi = new JCheckBoxMenuItem( "Ignore Distance Values Format Errors" ) );\r
964         _options_jmenu.add( _extract_taxonomy_no_rbmi = new JRadioButtonMenuItem( "No Taxonomy Extraction" ) );\r
965         _options_jmenu\r
966                 .add( _extract_taxonomy_pfam_strict_rbmi = new JRadioButtonMenuItem( "Extract Taxonomy Codes/Ids from Pfam-style Node Names" ) );\r
967         _options_jmenu\r
968                 .add( _extract_taxonomy_pfam_relaxed_rbmi = new JRadioButtonMenuItem( "Extract Taxonomy Codes/Ids from Pfam-style like Node Names" ) );\r
969         _options_jmenu\r
970                 .add( _extract_taxonomy_agressive_rbmi = new JRadioButtonMenuItem( "Extract Taxonomy Codes/Ids/Scientific Names from Node Names" ) );\r
971         _extract_taxonomy_pfam_strict_rbmi\r
972                 .setToolTipText( "To extract taxonomy codes/ids from node names in the form of e.g. \"BCL2_MOUSE/123-304\" or \"BCL2_10090/123-304\"" );\r
973         _extract_taxonomy_pfam_relaxed_rbmi\r
974                 .setToolTipText( "To extract taxonomy codes/ids from node names in the form of e.g. \"bax_MOUSE\" or \"bax_10090\"" );\r
975         _extract_taxonomy_agressive_rbmi\r
976                 .setToolTipText( "To extract taxonomy codes/ids or scientific names from node names in the form of e.g. \"MOUSE\" or \"10090\" or \"xyz_Nematostella_vectensis\"" );\r
977         _radio_group_2 = new ButtonGroup();\r
978         _radio_group_2.add( _extract_taxonomy_no_rbmi );\r
979         _radio_group_2.add( _extract_taxonomy_pfam_strict_rbmi );\r
980         _radio_group_2.add( _extract_taxonomy_pfam_relaxed_rbmi );\r
981         _radio_group_2.add( _extract_taxonomy_agressive_rbmi );\r
982         _options_jmenu.add( customizeMenuItemAsLabel( new JMenuItem( "Newick/Nexus Output:" ), getConfiguration() ) );\r
983         _options_jmenu\r
984                 .add( _use_brackets_for_conf_in_nh_export_cbmi = new JCheckBoxMenuItem( USE_BRACKETS_FOR_CONF_IN_NH_LABEL ) );\r
985         _use_brackets_for_conf_in_nh_export_cbmi\r
986                 .setToolTipText( "e.g. \"0.1[90]\" for a branch with support 90 and a length of 0.1" );\r
987         _options_jmenu\r
988                 .add( _use_internal_names_for_conf_in_nh_export_cbmi = new JCheckBoxMenuItem( USE_INTERNAL_NAMES_FOR_CONF_IN_NH_LABEL ) );\r
989         customizeJMenuItem( _choose_font_mi );\r
990         customizeJMenuItem( _choose_minimal_confidence_mi );\r
991         customizeJMenuItem( _switch_colors_mi );\r
992         customizeJMenuItem( _print_size_mi );\r
993         customizeJMenuItem( _choose_pdf_width_mi );\r
994         customizeJMenuItem( _overview_placment_mi );\r
995         customizeCheckBoxMenuItem( _show_default_node_shapes_external_cbmi, getOptions()\r
996                 .isShowDefaultNodeShapesExternal() );\r
997         customizeCheckBoxMenuItem( _show_default_node_shapes_internal_cbmi, getOptions()\r
998                 .isShowDefaultNodeShapesInternal() );\r
999         customizeCheckBoxMenuItem( _show_default_node_shapes_for_marked_cbmi, getOptions()\r
1000                 .isShowDefaultNodeShapesForMarkedNodes() );\r
1001         customizeJMenuItem( _cycle_node_shape_mi );\r
1002         customizeJMenuItem( _cycle_node_fill_mi );\r
1003         customizeJMenuItem( _choose_node_size_mi );\r
1004         customizeJMenuItem( _cycle_data_return);\r
1005         \r
1006         customizeCheckBoxMenuItem( _color_labels_same_as_parent_branch, getOptions().isColorLabelsSameAsParentBranch() );\r
1007         customizeCheckBoxMenuItem( _color_by_taxonomic_group_cbmi, getOptions().isColorByTaxonomicGroup() );\r
1008         customizeCheckBoxMenuItem( _screen_antialias_cbmi, getOptions().isAntialiasScreen() );\r
1009         customizeCheckBoxMenuItem( _background_gradient_cbmi, getOptions().isBackgroundColorGradient() );\r
1010         customizeCheckBoxMenuItem( _show_domain_labels, getOptions().isShowDomainLabels() );\r
1011         customizeCheckBoxMenuItem( _show_annotation_ref_source, getOptions().isShowAnnotationRefSource() );\r
1012         customizeCheckBoxMenuItem( _abbreviate_scientific_names, getOptions().isAbbreviateScientificTaxonNames() );\r
1013         customizeCheckBoxMenuItem( _search_case_senstive_cbmi, getOptions().isSearchCaseSensitive() );\r
1014         customizeCheckBoxMenuItem( _show_scale_cbmi, getOptions().isShowScale() );\r
1015         customizeRadioButtonMenuItem( _non_lined_up_cladograms_rbmi,\r
1016                                       getOptions().getCladogramType() == CLADOGRAM_TYPE.NON_LINED_UP );\r
1017         customizeRadioButtonMenuItem( _uniform_cladograms_rbmi,\r
1018                                       getOptions().getCladogramType() == CLADOGRAM_TYPE.TOTAL_NODE_SUM_DEP );\r
1019         customizeRadioButtonMenuItem( _ext_node_dependent_cladogram_rbmi,\r
1020                                       getOptions().getCladogramType() == CLADOGRAM_TYPE.EXT_NODE_SUM_DEP );\r
1021         customizeCheckBoxMenuItem( _show_overview_cbmi, getOptions().isShowOverview() );\r
1022         customizeCheckBoxMenuItem( _label_direction_cbmi,\r
1023                                    getOptions().getNodeLabelDirection() == NODE_LABEL_DIRECTION.RADIAL );\r
1024         customizeCheckBoxMenuItem( _antialias_print_cbmi, getOptions().isAntialiasPrint() );\r
1025         customizeCheckBoxMenuItem( _print_black_and_white_cbmi, getOptions().isPrintBlackAndWhite() );\r
1026         customizeCheckBoxMenuItem( _internal_number_are_confidence_for_nh_parsing_cbmi, getOptions()\r
1027                 .isInternalNumberAreConfidenceForNhParsing() );\r
1028         customizeRadioButtonMenuItem( _extract_taxonomy_no_rbmi,\r
1029                                       getOptions().getTaxonomyExtraction() == TAXONOMY_EXTRACTION.NO );\r
1030         customizeRadioButtonMenuItem( _extract_taxonomy_pfam_strict_rbmi,\r
1031                                       getOptions().getTaxonomyExtraction() == TAXONOMY_EXTRACTION.PFAM_STYLE_STRICT );\r
1032         customizeRadioButtonMenuItem( _extract_taxonomy_pfam_relaxed_rbmi,\r
1033                                       getOptions().getTaxonomyExtraction() == TAXONOMY_EXTRACTION.PFAM_STYLE_RELAXED );\r
1034         customizeRadioButtonMenuItem( _extract_taxonomy_agressive_rbmi,\r
1035                                       getOptions().getTaxonomyExtraction() == TAXONOMY_EXTRACTION.AGGRESSIVE );\r
1036         customizeCheckBoxMenuItem( _replace_underscores_cbmi, getOptions().isReplaceUnderscoresInNhParsing() );\r
1037         customizeCheckBoxMenuItem( _allow_errors_in_distance_to_parent_cbmi, getOptions()\r
1038                 .isReplaceUnderscoresInNhParsing() );\r
1039         customizeCheckBoxMenuItem( _search_with_regex_cbmi, getOptions().isSearchWithRegex() );\r
1040         customizeCheckBoxMenuItem( _search_whole_words_only_cbmi, getOptions().isMatchWholeTermsOnly() );\r
1041         customizeCheckBoxMenuItem( _inverse_search_result_cbmi, getOptions().isInverseSearchResult() );\r
1042         customizeCheckBoxMenuItem( _graphics_export_visible_only_cbmi, getOptions().isGraphicsExportVisibleOnly() );\r
1043         customizeCheckBoxMenuItem( _print_using_actual_size_cbmi, getOptions().isPrintUsingActualSize() );\r
1044         customizeCheckBoxMenuItem( _graphics_export_using_actual_size_cbmi, getOptions()\r
1045                 .isGraphicsExportUsingActualSize() );\r
1046         customizeCheckBoxMenuItem( _show_confidence_stddev_cbmi, getOptions().isShowConfidenceStddev() );\r
1047         customizeCheckBoxMenuItem( _use_brackets_for_conf_in_nh_export_cbmi, getOptions()\r
1048                 .getNhConversionSupportValueStyle() == NH_CONVERSION_SUPPORT_VALUE_STYLE.IN_SQUARE_BRACKETS );\r
1049         customizeCheckBoxMenuItem( _use_internal_names_for_conf_in_nh_export_cbmi, getOptions()\r
1050                 .getNhConversionSupportValueStyle() == NH_CONVERSION_SUPPORT_VALUE_STYLE.AS_INTERNAL_NODE_NAMES );\r
1051         customizeCheckBoxMenuItem( _line_up_renderable_data_cbmi, getOptions().isLineUpRendarableNodeData() );\r
1052         customizeCheckBoxMenuItem( _right_line_up_domains_cbmi, getOptions().isRightLineUpDomains() );\r
1053         _jmenubar.add( _options_jmenu );\r
1054     }\r
1055 \r
1056     void buildPhylogeneticInferenceMenu() {\r
1057         final InferenceManager im = getInferenceManager();\r
1058         _inference_menu = MainFrame.createMenu( "Inference", getConfiguration() );\r
1059         _inference_menu.add( _inference_from_msa_item = new JMenuItem( "From Multiple Sequence Alignment..." ) );\r
1060         customizeJMenuItem( _inference_from_msa_item );\r
1061         _inference_from_msa_item.setToolTipText( "Basic phylogenetic inference from MSA" );\r
1062         if ( im.canDoMsa() ) {\r
1063             _inference_menu.add( _inference_from_seqs_item = new JMenuItem( "From Unaligned Sequences..." ) );\r
1064             customizeJMenuItem( _inference_from_seqs_item );\r
1065             _inference_from_seqs_item\r
1066                     .setToolTipText( "Basic phylogenetic inference including multiple sequence alignment" );\r
1067         }\r
1068         else {\r
1069             _inference_menu\r
1070                     .add( _inference_from_seqs_item = new JMenuItem( "From Unaligned Sequences (no program found)" ) );\r
1071             customizeJMenuItem( _inference_from_seqs_item );\r
1072             _inference_from_seqs_item.setEnabled( false );\r
1073         }\r
1074         _jmenubar.add( _inference_menu );\r
1075     }\r
1076 \r
1077     void buildToolsMenu() {\r
1078         _tools_menu = createMenu( "Tools", getConfiguration() );\r
1079         _tools_menu.add( _confcolor_item = new JMenuItem( "Colorize Branches Depending on Confidence" ) );\r
1080         customizeJMenuItem( _confcolor_item );\r
1081         _tools_menu.add( _color_rank_jmi = new JMenuItem( "Colorize Subtrees via Taxonomic Rank" ) );\r
1082         customizeJMenuItem( _color_rank_jmi );\r
1083         _color_rank_jmi.setToolTipText( "for example, at \"Class\" level, colorize mammal specific subtree red" );\r
1084         _tools_menu.add( _taxcolor_item = new JMenuItem( "Taxonomy Colorize Branches" ) );\r
1085         customizeJMenuItem( _taxcolor_item );\r
1086         _tools_menu.addSeparator();\r
1087         _tools_menu.add( _remove_visual_styles_item = new JMenuItem( "Delete All Visual Styles From Nodes" ) );\r
1088         _remove_visual_styles_item\r
1089                 .setToolTipText( "To remove all node visual styles (fonts, colors) from the current phylogeny" );\r
1090         customizeJMenuItem( _remove_visual_styles_item );\r
1091         _tools_menu.add( _remove_branch_color_item = new JMenuItem( "Delete All Colors From Branches" ) );\r
1092         _remove_branch_color_item.setToolTipText( "To remove all branch color values from the current phylogeny" );\r
1093         customizeJMenuItem( _remove_branch_color_item );\r
1094         _tools_menu.addSeparator();\r
1095         _tools_menu.add( _annotate_item = new JMenuItem( "Annotate Sequences of Selected Nodes" ) );\r
1096         customizeJMenuItem( _annotate_item );\r
1097         _tools_menu.addSeparator();\r
1098         _tools_menu.add( _midpoint_root_item = new JMenuItem( "Midpoint-Root" ) );\r
1099         customizeJMenuItem( _midpoint_root_item );\r
1100         _tools_menu.addSeparator();\r
1101         _tools_menu.add( _delete_selected_nodes_item = new JMenuItem( "Delete Selected Nodes" ) );\r
1102         _delete_selected_nodes_item.setToolTipText( "To delete all selected external nodes" );\r
1103         customizeJMenuItem( _delete_selected_nodes_item );\r
1104         _tools_menu.add( _delete_not_selected_nodes_item = new JMenuItem( "Retain Selected Nodes" ) );\r
1105         _delete_not_selected_nodes_item.setToolTipText( "To delete all not selected external nodes" );\r
1106         customizeJMenuItem( _delete_not_selected_nodes_item );\r
1107         _tools_menu.addSeparator();\r
1108         _tools_menu.add( _collapse_species_specific_subtrees = new JMenuItem( "Collapse Species-Specific Subtrees" ) );\r
1109         customizeJMenuItem( _collapse_species_specific_subtrees );\r
1110         _collapse_species_specific_subtrees.setToolTipText( "To (reversibly) collapse species-specific subtrees" );\r
1111         _tools_menu\r
1112                 .add( _collapse_below_threshold = new JMenuItem( "Collapse Branches with Confidence Below Threshold into Multifurcations" ) );\r
1113         customizeJMenuItem( _collapse_below_threshold );\r
1114         _collapse_below_threshold\r
1115                 .setToolTipText( "To (permanently) collapse branches with confidence values below a threshold into multifurcations (in the case of multiple confidences per branch: without at least one confidence value above a threshold)" );\r
1116         //\r
1117         _tools_menu\r
1118                 .add( _collapse_below_branch_length = new JMenuItem( "Collapse Branches with Branch Lengths Below Threshold into Multifurcations" ) );\r
1119         customizeJMenuItem( _collapse_below_branch_length );\r
1120         _collapse_below_branch_length\r
1121                 .setToolTipText( "To (permanently) collapse branches with branches with branch lengths below a threshold into multifurcations" );\r
1122         //\r
1123         _tools_menu.addSeparator();\r
1124         _tools_menu\r
1125                 .add( _extract_tax_code_from_node_names_jmi = new JMenuItem( "Extract Taxonomic Data from Node Names" ) );\r
1126         customizeJMenuItem( _extract_tax_code_from_node_names_jmi );\r
1127         _extract_tax_code_from_node_names_jmi\r
1128                 .setToolTipText( "To extract SwissProt/Uniprot taxonomic codes (mnemonics) from nodes names in the form of 'xyz_CAEEL', Uniprot/NCBI identifiers form of 'xyz_6239', or scientific names form of 'xyz_Caenorhabditis_elegans'" );\r
1129         _tools_menu\r
1130                 .add( _move_node_names_to_tax_sn_jmi = new JMenuItem( "Transfer Node Names to Taxonomic Scientific Names" ) );\r
1131         customizeJMenuItem( _move_node_names_to_tax_sn_jmi );\r
1132         _move_node_names_to_tax_sn_jmi.setToolTipText( "To interpret node names as taxonomic scientific names" );\r
1133         _tools_menu.add( _move_node_names_to_seq_names_jmi = new JMenuItem( "Transfer Node Names to Sequence Names" ) );\r
1134         customizeJMenuItem( _move_node_names_to_seq_names_jmi );\r
1135         _move_node_names_to_seq_names_jmi.setToolTipText( "To interpret node names as sequence (protein, gene) names" );\r
1136         _tools_menu.addSeparator();\r
1137         _tools_menu.add( _obtain_seq_information_jmi = new JMenuItem( "Obtain Sequence Information" ) );\r
1138         customizeJMenuItem( _obtain_seq_information_jmi );\r
1139         _obtain_seq_information_jmi.setToolTipText( "To add additional sequence information" );\r
1140         _tools_menu\r
1141                 .add( _obtain_detailed_taxonomic_information_jmi = new JMenuItem( OBTAIN_DETAILED_TAXONOMIC_INFORMATION ) );\r
1142         customizeJMenuItem( _obtain_detailed_taxonomic_information_jmi );\r
1143         _obtain_detailed_taxonomic_information_jmi\r
1144                 .setToolTipText( "To add additional taxonomic information (from UniProt Taxonomy)" );\r
1145         _tools_menu\r
1146                 .add( _obtain_detailed_taxonomic_information_deleting_jmi = new JMenuItem( "Obtain Detailed Taxonomic Information (deletes nodes!)" ) );\r
1147         customizeJMenuItem( _obtain_detailed_taxonomic_information_deleting_jmi );\r
1148         _obtain_detailed_taxonomic_information_deleting_jmi\r
1149                 .setToolTipText( "To add additional taxonomic information, deletes nodes for which taxonomy cannot found (from UniProt Taxonomy)" );\r
1150         _tools_menu.addSeparator();\r
1151         _tools_menu.add( _read_values_jmi = new JMenuItem( "Attach Vector/Expression Values" ) );\r
1152         customizeJMenuItem( _read_values_jmi );\r
1153         _read_values_jmi.setToolTipText( "To attach vector (e.g. gene expression) values to tree nodes (beta)" );\r
1154         _jmenubar.add( _tools_menu );\r
1155         _tools_menu.add( _read_seqs_jmi = new JMenuItem( "Attach Molecular Sequences" ) );\r
1156         customizeJMenuItem( _read_seqs_jmi );\r
1157         _read_seqs_jmi\r
1158                 .setToolTipText( "To attach molecular sequences to tree nodes (from Fasta-formatted file) (beta)" );\r
1159         _jmenubar.add( _tools_menu );\r
1160     }\r
1161 \r
1162     @Override\r
1163     void close() {\r
1164         if ( isUnsavedDataPresent() ) {\r
1165             final int r = JOptionPane.showConfirmDialog( this,\r
1166                                                          "Exit despite potentially unsaved changes?",\r
1167                                                          "Exit?",\r
1168                                                          JOptionPane.YES_NO_OPTION );\r
1169             if ( r != JOptionPane.YES_OPTION ) {\r
1170                 return;\r
1171             }\r
1172         }\r
1173         exit();\r
1174     }\r
1175 \r
1176     void executeLineageInference() {\r
1177         if ( ( _mainpanel.getCurrentPhylogeny() == null ) || ( _mainpanel.getCurrentPhylogeny().isEmpty() ) ) {\r
1178             return;\r
1179         }\r
1180         if ( !_mainpanel.getCurrentPhylogeny().isRooted() ) {\r
1181             JOptionPane.showMessageDialog( this,\r
1182                                            "Phylogeny is not rooted.",\r
1183                                            "Cannot infer ancestral taxonomies",\r
1184                                            JOptionPane.ERROR_MESSAGE );\r
1185             return;\r
1186         }\r
1187         final AncestralTaxonomyInferrer inferrer = new AncestralTaxonomyInferrer( this,\r
1188                                                                                   _mainpanel.getCurrentTreePanel(),\r
1189                                                                                   _mainpanel.getCurrentPhylogeny()\r
1190                                                                                           .copy() );\r
1191         new Thread( inferrer ).start();\r
1192     }\r
1193 \r
1194     void exit() {\r
1195         removeAllTextFrames();\r
1196         _mainpanel.terminate();\r
1197         _contentpane.removeAll();\r
1198         setVisible( false );\r
1199         dispose();\r
1200        // System.exit( 0 ); //TODO reconfirm that this is OK, then remove.\r
1201     }\r
1202 \r
1203     void readPhylogeniesFromURL() {\r
1204         URL url = null;\r
1205         Phylogeny[] phys = null;\r
1206         final String message = "Please enter a complete URL, for example \"http://purl.org/phylo/treebase/phylows/study/TB2:S15480?format=nexus\"";\r
1207         final String url_string = JOptionPane.showInputDialog( this,\r
1208                                                                message,\r
1209                                                                "Use URL/webservice to obtain a phylogeny",\r
1210                                                                JOptionPane.QUESTION_MESSAGE );\r
1211         boolean nhx_or_nexus = false;\r
1212         if ( ( url_string != null ) && ( url_string.length() > 0 ) ) {\r
1213             try {\r
1214                 url = new URL( url_string );\r
1215                 PhylogenyParser parser = null;\r
1216                 if ( url.getHost().toLowerCase().indexOf( "tolweb" ) >= 0 ) {\r
1217                     parser = new TolParser();\r
1218                 }\r
1219                 else {\r
1220                     parser = ParserUtils.createParserDependingOnUrlContents( url, getConfiguration()\r
1221                             .isValidatePhyloXmlAgainstSchema() );\r
1222                 }\r
1223                 if ( parser instanceof NexusPhylogeniesParser ) {\r
1224                     nhx_or_nexus = true;\r
1225                 }\r
1226                 else if ( parser instanceof NHXParser ) {\r
1227                     nhx_or_nexus = true;\r
1228                 }\r
1229                 if ( _mainpanel.getCurrentTreePanel() != null ) {\r
1230                     _mainpanel.getCurrentTreePanel().setWaitCursor();\r
1231                 }\r
1232                 else {\r
1233                     _mainpanel.setWaitCursor();\r
1234                 }\r
1235                 final PhylogenyFactory factory = ParserBasedPhylogenyFactory.getInstance();\r
1236                 phys = factory.create( url.openStream(), parser );\r
1237             }\r
1238             catch ( final MalformedURLException e ) {\r
1239                 JOptionPane.showMessageDialog( this,\r
1240                                                "Malformed URL: " + url + "\n" + e.getLocalizedMessage(),\r
1241                                                "Malformed URL",\r
1242                                                JOptionPane.ERROR_MESSAGE );\r
1243             }\r
1244             catch ( final IOException e ) {\r
1245                 JOptionPane.showMessageDialog( this,\r
1246                                                "Could not read from " + url + "\n"\r
1247                                                        + ForesterUtil.wordWrap( e.getLocalizedMessage(), 80 ),\r
1248                                                "Failed to read URL",\r
1249                                                JOptionPane.ERROR_MESSAGE );\r
1250             }\r
1251             catch ( final Exception e ) {\r
1252                 JOptionPane.showMessageDialog( this,\r
1253                                                ForesterUtil.wordWrap( e.getLocalizedMessage(), 80 ),\r
1254                                                "Unexpected Exception",\r
1255                                                JOptionPane.ERROR_MESSAGE );\r
1256             }\r
1257             finally {\r
1258                 if ( _mainpanel.getCurrentTreePanel() != null ) {\r
1259                     _mainpanel.getCurrentTreePanel().setArrowCursor();\r
1260                 }\r
1261                 else {\r
1262                     _mainpanel.setArrowCursor();\r
1263                 }\r
1264             }\r
1265             if ( ( phys != null ) && ( phys.length > 0 ) ) {\r
1266                 if ( nhx_or_nexus && getOptions().isInternalNumberAreConfidenceForNhParsing() ) {\r
1267                     for( final Phylogeny phy : phys ) {\r
1268                         PhylogenyMethods.transferInternalNodeNamesToConfidence( phy, "" );\r
1269                     }\r
1270                 }\r
1271                 AptxUtil.addPhylogeniesToTabs( phys,\r
1272                                                new File( url.getFile() ).getName(),\r
1273                                                new File( url.getFile() ).toString(),\r
1274                                                getConfiguration(),\r
1275                                                getMainPanel() );\r
1276                 _mainpanel.getControlPanel().showWhole();\r
1277             }\r
1278         }\r
1279         activateSaveAllIfNeeded();\r
1280         System.gc();\r
1281     }\r
1282 \r
1283     void setMsa( final Msa msa ) {\r
1284         _msa = msa;\r
1285     }\r
1286 \r
1287     void setMsaFile( final File msa_file ) {\r
1288         _msa_file = msa_file;\r
1289     }\r
1290 \r
1291     void setSeqs( final List<MolecularSequence> seqs ) {\r
1292         _seqs = seqs;\r
1293     }\r
1294 \r
1295     void setSeqsFile( final File seqs_file ) {\r
1296         _seqs_file = seqs_file;\r
1297     }\r
1298 \r
1299     void writePhylogenyToGraphicsFile( final String file_name, final GraphicsExportType type ) {\r
1300         _mainpanel.getCurrentTreePanel().calcParametersForPainting( _mainpanel.getCurrentTreePanel().getWidth(),\r
1301                                                                     _mainpanel.getCurrentTreePanel().getHeight() );\r
1302         String file_written_to = "";\r
1303         boolean error = false;\r
1304         try {\r
1305             file_written_to = AptxUtil.writePhylogenyToGraphicsFile( file_name,\r
1306                                                                      _mainpanel.getCurrentTreePanel().getWidth(),\r
1307                                                                      _mainpanel.getCurrentTreePanel().getHeight(),\r
1308                                                                      _mainpanel.getCurrentTreePanel(),\r
1309                                                                      _mainpanel.getControlPanel(),\r
1310                                                                      type,\r
1311                                                                      getOptions() );\r
1312         }\r
1313         catch ( final IOException e ) {\r
1314             error = true;\r
1315             JOptionPane.showMessageDialog( this, e.getMessage(), "Error", JOptionPane.ERROR_MESSAGE );\r
1316         }\r
1317         if ( !error ) {\r
1318             if ( ( file_written_to != null ) && ( file_written_to.length() > 0 ) ) {\r
1319                 JOptionPane.showMessageDialog( this,\r
1320                                                "Wrote image to: " + file_written_to,\r
1321                                                "Graphics Export",\r
1322                                                JOptionPane.INFORMATION_MESSAGE );\r
1323             }\r
1324             else {\r
1325                 JOptionPane.showMessageDialog( this,\r
1326                                                "There was an unknown problem when attempting to write to an image file: \""\r
1327                                                        + file_name + "\"",\r
1328                                                "Error",\r
1329                                                JOptionPane.ERROR_MESSAGE );\r
1330             }\r
1331         }\r
1332         _contentpane.repaint();\r
1333     }\r
1334 \r
1335     private void addExpressionValuesFromFile() {\r
1336         if ( ( getCurrentTreePanel() == null ) || ( getCurrentTreePanel().getPhylogeny() == null ) ) {\r
1337             JOptionPane.showMessageDialog( this,\r
1338                                            "Need to load evolutionary tree first",\r
1339                                            "Can Not Read Expression Values",\r
1340                                            JOptionPane.WARNING_MESSAGE );\r
1341             return;\r
1342         }\r
1343         final File my_dir = getCurrentDir();\r
1344         if ( my_dir != null ) {\r
1345             _values_filechooser.setCurrentDirectory( my_dir );\r
1346         }\r
1347         final int result = _values_filechooser.showOpenDialog( _contentpane );\r
1348         final File file = _values_filechooser.getSelectedFile();\r
1349         if ( ( file != null ) && ( file.length() > 0 ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
1350             BasicTable<String> t = null;\r
1351             try {\r
1352                 t = BasicTableParser.parse( file, '\t' );\r
1353                 if ( t.getNumberOfColumns() < 2 ) {\r
1354                     t = BasicTableParser.parse( file, ',' );\r
1355                 }\r
1356                 if ( t.getNumberOfColumns() < 2 ) {\r
1357                     t = BasicTableParser.parse( file, ' ' );\r
1358                 }\r
1359             }\r
1360             catch ( final IOException e ) {\r
1361                 JOptionPane.showMessageDialog( this,\r
1362                                                e.getMessage(),\r
1363                                                "Could Not Read Expression Value Table",\r
1364                                                JOptionPane.ERROR_MESSAGE );\r
1365                 return;\r
1366             }\r
1367             if ( t.getNumberOfColumns() < 2 ) {\r
1368                 JOptionPane.showMessageDialog( this,\r
1369                                                "Table contains " + t.getNumberOfColumns() + " column(s)",\r
1370                                                "Problem with Expression Value Table",\r
1371                                                JOptionPane.ERROR_MESSAGE );\r
1372                 return;\r
1373             }\r
1374             if ( t.getNumberOfRows() < 1 ) {\r
1375                 JOptionPane.showMessageDialog( this,\r
1376                                                "Table contains zero rows",\r
1377                                                "Problem with Expression Value Table",\r
1378                                                JOptionPane.ERROR_MESSAGE );\r
1379                 return;\r
1380             }\r
1381             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
1382             if ( t.getNumberOfRows() != phy.getNumberOfExternalNodes() ) {\r
1383                 JOptionPane.showMessageDialog( this,\r
1384                                                "Table contains " + t.getNumberOfRows() + " rows, but tree contains "\r
1385                                                        + phy.getNumberOfExternalNodes() + " external nodes",\r
1386                                                "Warning",\r
1387                                                JOptionPane.WARNING_MESSAGE );\r
1388             }\r
1389             final DescriptiveStatistics stats = new BasicDescriptiveStatistics();\r
1390             int not_found = 0;\r
1391             for( final PhylogenyNodeIterator iter = phy.iteratorPreorder(); iter.hasNext(); ) {\r
1392                 final PhylogenyNode node = iter.next();\r
1393                 final String node_name = node.getName();\r
1394                 if ( !ForesterUtil.isEmpty( node_name ) ) {\r
1395                     int row = -1;\r
1396                     try {\r
1397                         row = t.findRow( node_name );\r
1398                     }\r
1399                     catch ( final IllegalArgumentException e ) {\r
1400                         JOptionPane\r
1401                                 .showMessageDialog( this,\r
1402                                                     e.getMessage(),\r
1403                                                     "Error Mapping Node Identifiers to Expression Value Identifiers",\r
1404                                                     JOptionPane.ERROR_MESSAGE );\r
1405                         return;\r
1406                     }\r
1407                     if ( row < 0 ) {\r
1408                         if ( node.isExternal() ) {\r
1409                             not_found++;\r
1410                         }\r
1411                         continue;\r
1412                     }\r
1413                     final List<Double> l = new ArrayList<Double>();\r
1414                     for( int col = 1; col < t.getNumberOfColumns(); ++col ) {\r
1415                         double d = -100;\r
1416                         try {\r
1417                             d = Double.parseDouble( t.getValueAsString( col, row ) );\r
1418                         }\r
1419                         catch ( final NumberFormatException e ) {\r
1420                             JOptionPane.showMessageDialog( this,\r
1421                                                            "Could not parse \"" + t.getValueAsString( col, row )\r
1422                                                                    + "\" into a decimal value",\r
1423                                                            "Issue with Expression Value Table",\r
1424                                                            JOptionPane.ERROR_MESSAGE );\r
1425                             return;\r
1426                         }\r
1427                         stats.addValue( d );\r
1428                         l.add( d );\r
1429                     }\r
1430                     if ( !l.isEmpty() ) {\r
1431                         if ( node.getNodeData().getProperties() != null ) {\r
1432                             node.getNodeData().getProperties()\r
1433                                     .removePropertiesWithGivenReferencePrefix( PhyloXmlUtil.VECTOR_PROPERTY_REF );\r
1434                         }\r
1435                         node.getNodeData().setVector( l );\r
1436                     }\r
1437                 }\r
1438             }\r
1439             if ( not_found > 0 ) {\r
1440                 JOptionPane.showMessageDialog( this, "Could not fine expression values for " + not_found\r
1441                         + " external node(s)", "Warning", JOptionPane.WARNING_MESSAGE );\r
1442             }\r
1443             getCurrentTreePanel().setStatisticsForExpressionValues( stats );\r
1444         }\r
1445     }\r
1446 \r
1447     private void addSequencesFromFile() {\r
1448         if ( ( getCurrentTreePanel() == null ) || ( getCurrentTreePanel().getPhylogeny() == null ) ) {\r
1449             JOptionPane.showMessageDialog( this,\r
1450                                            "Need to load evolutionary tree first",\r
1451                                            "Can Not Read Sequences",\r
1452                                            JOptionPane.WARNING_MESSAGE );\r
1453             return;\r
1454         }\r
1455         final File my_dir = getCurrentDir();\r
1456         if ( my_dir != null ) {\r
1457             _sequences_filechooser.setCurrentDirectory( my_dir );\r
1458         }\r
1459         final int result = _sequences_filechooser.showOpenDialog( _contentpane );\r
1460         final File file = _sequences_filechooser.getSelectedFile();\r
1461         List<MolecularSequence> seqs = null;\r
1462         if ( ( file != null ) && !file.isDirectory() && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
1463             try {\r
1464                 if ( FastaParser.isLikelyFasta( new FileInputStream( file ) ) ) {\r
1465                     seqs = FastaParser.parse( new FileInputStream( file ) );\r
1466                 }\r
1467                 else {\r
1468                     JOptionPane.showMessageDialog( this,\r
1469                                                    "Format does not appear to be Fasta",\r
1470                                                    "Multiple sequence file format error",\r
1471                                                    JOptionPane.ERROR_MESSAGE );\r
1472                     return;\r
1473                 }\r
1474             }\r
1475             catch ( final MsaFormatException e ) {\r
1476                 setArrowCursor();\r
1477                 JOptionPane.showMessageDialog( this,\r
1478                                                e.getLocalizedMessage(),\r
1479                                                "Multiple sequence file format error",\r
1480                                                JOptionPane.ERROR_MESSAGE );\r
1481                 return;\r
1482             }\r
1483             catch ( final IOException e ) {\r
1484                 setArrowCursor();\r
1485                 JOptionPane.showMessageDialog( this,\r
1486                                                e.getLocalizedMessage(),\r
1487                                                "Failed to read multiple sequence file",\r
1488                                                JOptionPane.ERROR_MESSAGE );\r
1489                 return;\r
1490             }\r
1491             catch ( final Exception e ) {\r
1492                 setArrowCursor();\r
1493                 e.printStackTrace();\r
1494                 JOptionPane.showMessageDialog( this,\r
1495                                                e.getLocalizedMessage(),\r
1496                                                "Unexpected error during reading of multiple sequence file",\r
1497                                                JOptionPane.ERROR_MESSAGE );\r
1498                 return;\r
1499             }\r
1500             if ( ( seqs == null ) || ( seqs.size() < 1 ) ) {\r
1501                 JOptionPane.showMessageDialog( this,\r
1502                                                "Multiple sequence file is empty",\r
1503                                                "Empty multiple sequence file",\r
1504                                                JOptionPane.ERROR_MESSAGE );\r
1505                 setArrowCursor();\r
1506                 return;\r
1507             }\r
1508         }\r
1509         if ( seqs != null ) {\r
1510             for( final MolecularSequence seq : seqs ) {\r
1511                 System.out.println( seq.getIdentifier() );\r
1512             }\r
1513             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
1514             int total_counter = 0;\r
1515             int attached_counter = 0;\r
1516             for( final MolecularSequence seq : seqs ) {\r
1517                 ++total_counter;\r
1518                 final String seq_name = seq.getIdentifier();\r
1519                 if ( !ForesterUtil.isEmpty( seq_name ) ) {\r
1520                     List<PhylogenyNode> nodes = phy.getNodesViaSequenceName( seq_name );\r
1521                     if ( nodes.isEmpty() ) {\r
1522                         nodes = phy.getNodesViaSequenceSymbol( seq_name );\r
1523                     }\r
1524                     if ( nodes.isEmpty() ) {\r
1525                         nodes = phy.getNodesViaGeneName( seq_name );\r
1526                     }\r
1527                     if ( nodes.isEmpty() ) {\r
1528                         nodes = phy.getNodes( seq_name );\r
1529                     }\r
1530                     if ( nodes.size() > 1 ) {\r
1531                         JOptionPane.showMessageDialog( this,\r
1532                                                        "Sequence name \"" + seq_name + "\" is not unique",\r
1533                                                        "Sequence name not unique",\r
1534                                                        JOptionPane.ERROR_MESSAGE );\r
1535                         setArrowCursor();\r
1536                         return;\r
1537                     }\r
1538                     final String[] a = seq_name.split( "\\s" );\r
1539                     if ( nodes.isEmpty() && ( a.length > 1 ) ) {\r
1540                         final String seq_name_split = a[ 0 ];\r
1541                         nodes = phy.getNodesViaSequenceName( seq_name_split );\r
1542                         if ( nodes.isEmpty() ) {\r
1543                             nodes = phy.getNodesViaSequenceSymbol( seq_name_split );\r
1544                         }\r
1545                         if ( nodes.isEmpty() ) {\r
1546                             nodes = phy.getNodes( seq_name_split );\r
1547                         }\r
1548                         if ( nodes.size() > 1 ) {\r
1549                             JOptionPane.showMessageDialog( this, "Split sequence name \"" + seq_name_split\r
1550                                     + "\" is not unique", "Sequence name not unique", JOptionPane.ERROR_MESSAGE );\r
1551                             setArrowCursor();\r
1552                             return;\r
1553                         }\r
1554                     }\r
1555                     if ( nodes.size() == 1 ) {\r
1556                         ++attached_counter;\r
1557                         final PhylogenyNode n = nodes.get( 0 );\r
1558                         if ( !n.getNodeData().isHasSequence() ) {\r
1559                             n.getNodeData().addSequence( new org.forester.phylogeny.data.Sequence() );\r
1560                         }\r
1561                         n.getNodeData().getSequence().setMolecularSequence( seq.getMolecularSequenceAsString() );\r
1562                         if ( ForesterUtil.isEmpty( n.getNodeData().getSequence().getName() ) ) {\r
1563                             n.getNodeData().getSequence().setName( seq_name );\r
1564                         }\r
1565                     }\r
1566                 }\r
1567             }\r
1568             if ( attached_counter > 0 ) {\r
1569                 int ext_nodes = 0;\r
1570                 int ext_nodes_with_seq = 0;\r
1571                 for( final PhylogenyNodeIterator iter = phy.iteratorExternalForward(); iter.hasNext(); ) {\r
1572                     ++ext_nodes;\r
1573                     final PhylogenyNode n = iter.next();\r
1574                     if ( n.getNodeData().isHasSequence()\r
1575                             && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getMolecularSequence() ) ) {\r
1576                         ++ext_nodes_with_seq;\r
1577                     }\r
1578                 }\r
1579                 final String s;\r
1580                 if ( ext_nodes == ext_nodes_with_seq ) {\r
1581                     s = "All " + ext_nodes_with_seq + " external nodes now have a molecular sequence attached to them.";\r
1582                 }\r
1583                 else {\r
1584                     s = ext_nodes_with_seq + " out of " + ext_nodes\r
1585                             + " external nodes now have a molecular sequence attached to them.";\r
1586                 }\r
1587                 if ( ( attached_counter == total_counter ) && ( ext_nodes == ext_nodes_with_seq ) ) {\r
1588                     JOptionPane.showMessageDialog( this,\r
1589                                                    "Attached all " + total_counter + " sequences to tree nodes.\n" + s,\r
1590                                                    "All sequences attached",\r
1591                                                    JOptionPane.INFORMATION_MESSAGE );\r
1592                 }\r
1593                 else {\r
1594                     JOptionPane.showMessageDialog( this, "Attached " + attached_counter\r
1595                             + " sequences out of a total of " + total_counter + " sequences.\n" + s, attached_counter\r
1596                             + " sequences attached", JOptionPane.WARNING_MESSAGE );\r
1597                 }\r
1598             }\r
1599             else {\r
1600                 JOptionPane.showMessageDialog( this, "No maching tree node for any of the " + total_counter\r
1601                         + " sequences", "Could not attach any sequences", JOptionPane.ERROR_MESSAGE );\r
1602             }\r
1603         }\r
1604     }\r
1605 \r
1606     private void choosePdfWidth() {\r
1607         final String s = ( String ) JOptionPane.showInputDialog( this,\r
1608                                                                  "Please enter the default line width for PDF export.\n"\r
1609                                                                          + "[current value: "\r
1610                                                                          + getOptions().getPrintLineWidth() + "]\n",\r
1611                                                                  "Line Width for PDF Export",\r
1612                                                                  JOptionPane.QUESTION_MESSAGE,\r
1613                                                                  null,\r
1614                                                                  null,\r
1615                                                                  getOptions().getPrintLineWidth() );\r
1616         if ( !ForesterUtil.isEmpty( s ) ) {\r
1617             boolean success = true;\r
1618             float f = 0.0f;\r
1619             final String m_str = s.trim();\r
1620             if ( !ForesterUtil.isEmpty( m_str ) ) {\r
1621                 try {\r
1622                     f = Float.parseFloat( m_str );\r
1623                 }\r
1624                 catch ( final Exception ex ) {\r
1625                     success = false;\r
1626                 }\r
1627             }\r
1628             else {\r
1629                 success = false;\r
1630             }\r
1631             if ( success && ( f > 0.0 ) ) {\r
1632                 getOptions().setPrintLineWidth( f );\r
1633             }\r
1634         }\r
1635     }\r
1636 \r
1637     private void choosePrintSize() {\r
1638         final String s = ( String ) JOptionPane.showInputDialog( this,\r
1639                                                                  "Please enter values for width and height,\nseparated by a comma.\n"\r
1640                                                                          + "[current values: "\r
1641                                                                          + getOptions().getPrintSizeX() + ", "\r
1642                                                                          + getOptions().getPrintSizeY() + "]\n"\r
1643                                                                          + "[A4: " + Constants.A4_SIZE_X + ", "\r
1644                                                                          + Constants.A4_SIZE_Y + "]\n" + "[US Letter: "\r
1645                                                                          + Constants.US_LETTER_SIZE_X + ", "\r
1646                                                                          + Constants.US_LETTER_SIZE_Y + "]",\r
1647                                                                  "Default Size for Graphics Export",\r
1648                                                                  JOptionPane.QUESTION_MESSAGE,\r
1649                                                                  null,\r
1650                                                                  null,\r
1651                                                                  getOptions().getPrintSizeX() + ", "\r
1652                                                                          + getOptions().getPrintSizeY() );\r
1653         if ( !ForesterUtil.isEmpty( s ) && ( s.indexOf( ',' ) > 0 ) ) {\r
1654             boolean success = true;\r
1655             int x = 0;\r
1656             int y = 0;\r
1657             final String[] str_ary = s.split( "," );\r
1658             if ( str_ary.length == 2 ) {\r
1659                 final String x_str = str_ary[ 0 ].trim();\r
1660                 final String y_str = str_ary[ 1 ].trim();\r
1661                 if ( !ForesterUtil.isEmpty( x_str ) && !ForesterUtil.isEmpty( y_str ) ) {\r
1662                     try {\r
1663                         x = Integer.parseInt( x_str );\r
1664                         y = Integer.parseInt( y_str );\r
1665                     }\r
1666                     catch ( final Exception ex ) {\r
1667                         success = false;\r
1668                     }\r
1669                 }\r
1670                 else {\r
1671                     success = false;\r
1672                 }\r
1673             }\r
1674             else {\r
1675                 success = false;\r
1676             }\r
1677             if ( success && ( x > 1 ) && ( y > 1 ) ) {\r
1678                 getOptions().setPrintSizeX( x );\r
1679                 getOptions().setPrintSizeY( y );\r
1680             }\r
1681         }\r
1682     }\r
1683 \r
1684     private void closeCurrentPane() {\r
1685         if ( getMainPanel().getCurrentTreePanel() != null ) {\r
1686             if ( getMainPanel().getCurrentTreePanel().isEdited() ) {\r
1687                 final int r = JOptionPane.showConfirmDialog( this,\r
1688                                                              "Close tab despite potentially unsaved changes?",\r
1689                                                              "Close Tab?",\r
1690                                                              JOptionPane.YES_NO_OPTION );\r
1691                 if ( r != JOptionPane.YES_OPTION ) {\r
1692                     return;\r
1693                 }\r
1694             }\r
1695             getMainPanel().closeCurrentPane();\r
1696             activateSaveAllIfNeeded();\r
1697         }\r
1698     }\r
1699 \r
1700     private void collapseBl( final Phylogeny phy ) {\r
1701         final PhylogenyNodeIterator it = phy.iteratorPostorder();\r
1702         final List<PhylogenyNode> to_be_removed = new ArrayList<PhylogenyNode>();\r
1703         double min_bl = Double.MAX_VALUE;\r
1704         boolean bl_present = false;\r
1705         while ( it.hasNext() ) {\r
1706             final PhylogenyNode n = it.next();\r
1707             if ( !n.isExternal() && !n.isRoot() ) {\r
1708                 final double bl = n.getDistanceToParent();\r
1709                 if ( bl != PhylogenyDataUtil.BRANCH_LENGTH_DEFAULT ) {\r
1710                     bl_present = true;\r
1711                     if ( bl < getMinNotCollapseBlValue() ) {\r
1712                         to_be_removed.add( n );\r
1713                     }\r
1714                     if ( bl < min_bl ) {\r
1715                         min_bl = bl;\r
1716                     }\r
1717                 }\r
1718             }\r
1719         }\r
1720         if ( bl_present ) {\r
1721             for( final PhylogenyNode node : to_be_removed ) {\r
1722                 PhylogenyMethods.removeNode( node, phy );\r
1723             }\r
1724             if ( to_be_removed.size() > 0 ) {\r
1725                 phy.externalNodesHaveChanged();\r
1726                 phy.clearHashIdToNodeMap();\r
1727                 phy.recalculateNumberOfExternalDescendants( true );\r
1728                 getCurrentTreePanel().resetNodeIdToDistToLeafMap();\r
1729                 getCurrentTreePanel().updateSetOfCollapsedExternalNodes();\r
1730                 getCurrentTreePanel().calculateLongestExtNodeInfo();\r
1731                 getCurrentTreePanel().setNodeInPreorderToNull();\r
1732                 getCurrentTreePanel().recalculateMaxDistanceToRoot();\r
1733                 getCurrentTreePanel().resetPreferredSize();\r
1734                 getCurrentTreePanel().setEdited( true );\r
1735                 getCurrentTreePanel().repaint();\r
1736                 repaint();\r
1737             }\r
1738             if ( to_be_removed.size() > 0 ) {\r
1739                 JOptionPane.showMessageDialog( this, "Collapsed " + to_be_removed.size()\r
1740                         + " branches with\nbranch length values below " + getMinNotCollapseBlValue(), "Collapsed "\r
1741                         + to_be_removed.size() + " branches", JOptionPane.INFORMATION_MESSAGE );\r
1742             }\r
1743             else {\r
1744                 JOptionPane.showMessageDialog( this,\r
1745                                                "No branch collapsed,\nminimum branch length is " + min_bl,\r
1746                                                "No branch collapsed",\r
1747                                                JOptionPane.INFORMATION_MESSAGE );\r
1748             }\r
1749         }\r
1750         else {\r
1751             JOptionPane.showMessageDialog( this,\r
1752                                            "No branch collapsed because no branch length values present",\r
1753                                            "No branch length values present",\r
1754                                            JOptionPane.INFORMATION_MESSAGE );\r
1755         }\r
1756     }\r
1757 \r
1758     private void collapse( final Phylogeny phy ) {\r
1759         final PhylogenyNodeIterator it = phy.iteratorPostorder();\r
1760         final List<PhylogenyNode> to_be_removed = new ArrayList<PhylogenyNode>();\r
1761         double min_support = Double.MAX_VALUE;\r
1762         boolean conf_present = false;\r
1763         while ( it.hasNext() ) {\r
1764             final PhylogenyNode n = it.next();\r
1765             if ( !n.isExternal() && !n.isRoot() ) {\r
1766                 final List<Confidence> c = n.getBranchData().getConfidences();\r
1767                 if ( ( c != null ) && ( c.size() > 0 ) ) {\r
1768                     conf_present = true;\r
1769                     double max = 0;\r
1770                     for( final Confidence confidence : c ) {\r
1771                         if ( confidence.getValue() > max ) {\r
1772                             max = confidence.getValue();\r
1773                         }\r
1774                     }\r
1775                     if ( max < getMinNotCollapseConfidenceValue() ) {\r
1776                         to_be_removed.add( n );\r
1777                     }\r
1778                     if ( max < min_support ) {\r
1779                         min_support = max;\r
1780                     }\r
1781                 }\r
1782             }\r
1783         }\r
1784         if ( conf_present ) {\r
1785             for( final PhylogenyNode node : to_be_removed ) {\r
1786                 PhylogenyMethods.removeNode( node, phy );\r
1787             }\r
1788             if ( to_be_removed.size() > 0 ) {\r
1789                 phy.externalNodesHaveChanged();\r
1790                 phy.clearHashIdToNodeMap();\r
1791                 phy.recalculateNumberOfExternalDescendants( true );\r
1792                 getCurrentTreePanel().resetNodeIdToDistToLeafMap();\r
1793                 getCurrentTreePanel().updateSetOfCollapsedExternalNodes();\r
1794                 getCurrentTreePanel().calculateLongestExtNodeInfo();\r
1795                 getCurrentTreePanel().setNodeInPreorderToNull();\r
1796                 getCurrentTreePanel().recalculateMaxDistanceToRoot();\r
1797                 getCurrentTreePanel().resetPreferredSize();\r
1798                 getCurrentTreePanel().setEdited( true );\r
1799                 getCurrentTreePanel().repaint();\r
1800                 repaint();\r
1801             }\r
1802             if ( to_be_removed.size() > 0 ) {\r
1803                 JOptionPane.showMessageDialog( this, "Collapsed " + to_be_removed.size()\r
1804                         + " branches with\nconfidence values below " + getMinNotCollapseConfidenceValue(), "Collapsed "\r
1805                         + to_be_removed.size() + " branches", JOptionPane.INFORMATION_MESSAGE );\r
1806             }\r
1807             else {\r
1808                 JOptionPane.showMessageDialog( this, "No branch collapsed,\nminimum confidence value per branch is "\r
1809                         + min_support, "No branch collapsed", JOptionPane.INFORMATION_MESSAGE );\r
1810             }\r
1811         }\r
1812         else {\r
1813             JOptionPane.showMessageDialog( this,\r
1814                                            "No branch collapsed because no confidence values present",\r
1815                                            "No confidence values present",\r
1816                                            JOptionPane.INFORMATION_MESSAGE );\r
1817         }\r
1818     }\r
1819 \r
1820     private void collapseBelowThreshold() {\r
1821         if ( getCurrentTreePanel() != null ) {\r
1822             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
1823             if ( ( phy != null ) && !phy.isEmpty() ) {\r
1824                 final String s = ( String ) JOptionPane.showInputDialog( this,\r
1825                                                                          "Please enter the minimum confidence value\n",\r
1826                                                                          "Minimal Confidence Value",\r
1827                                                                          JOptionPane.QUESTION_MESSAGE,\r
1828                                                                          null,\r
1829                                                                          null,\r
1830                                                                          getMinNotCollapseConfidenceValue() );\r
1831                 if ( !ForesterUtil.isEmpty( s ) ) {\r
1832                     boolean success = true;\r
1833                     double m = 0.0;\r
1834                     final String m_str = s.trim();\r
1835                     if ( !ForesterUtil.isEmpty( m_str ) ) {\r
1836                         try {\r
1837                             m = Double.parseDouble( m_str );\r
1838                         }\r
1839                         catch ( final Exception ex ) {\r
1840                             success = false;\r
1841                         }\r
1842                     }\r
1843                     else {\r
1844                         success = false;\r
1845                     }\r
1846                     if ( success && ( m >= 0.0 ) ) {\r
1847                         setMinNotCollapseConfidenceValue( m );\r
1848                         collapse( phy );\r
1849                     }\r
1850                 }\r
1851             }\r
1852         }\r
1853     }\r
1854 \r
1855     private void collapseBelowBranchLengthThreshold() {\r
1856         if ( getCurrentTreePanel() != null ) {\r
1857             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
1858             if ( ( phy != null ) && !phy.isEmpty() ) {\r
1859                 final String s = ( String ) JOptionPane\r
1860                         .showInputDialog( this,\r
1861                                           "Please enter the minimum branch length value\n",\r
1862                                           "Minimal Branch Length Value",\r
1863                                           JOptionPane.QUESTION_MESSAGE,\r
1864                                           null,\r
1865                                           null,\r
1866                                           getMinNotCollapseBlValue() );\r
1867                 if ( !ForesterUtil.isEmpty( s ) ) {\r
1868                     boolean success = true;\r
1869                     double m = 0.0;\r
1870                     final String m_str = s.trim();\r
1871                     if ( !ForesterUtil.isEmpty( m_str ) ) {\r
1872                         try {\r
1873                             m = Double.parseDouble( m_str );\r
1874                         }\r
1875                         catch ( final Exception ex ) {\r
1876                             success = false;\r
1877                         }\r
1878                     }\r
1879                     else {\r
1880                         success = false;\r
1881                     }\r
1882                     if ( success && ( m >= 0.0 ) ) {\r
1883                         setMinNotCollapseBlValue( m );\r
1884                         collapseBl( phy );\r
1885                     }\r
1886                 }\r
1887             }\r
1888         }\r
1889     }\r
1890 \r
1891     private PhyloXmlParser createPhyloXmlParser() {\r
1892         PhyloXmlParser xml_parser = null;\r
1893         if ( getConfiguration().isValidatePhyloXmlAgainstSchema() ) {\r
1894             try {\r
1895                 xml_parser = PhyloXmlParser.createPhyloXmlParserXsdValidating();\r
1896             }\r
1897             catch ( final Exception e ) {\r
1898                 JOptionPane.showMessageDialog( this,\r
1899                                                e.getLocalizedMessage(),\r
1900                                                "failed to create validating XML parser",\r
1901                                                JOptionPane.WARNING_MESSAGE );\r
1902             }\r
1903         }\r
1904         if ( xml_parser == null ) {\r
1905             xml_parser = PhyloXmlParser.createPhyloXmlParser();\r
1906         }\r
1907         return xml_parser;\r
1908     }\r
1909 \r
1910     private void executePhyleneticInference( final boolean from_unaligned_seqs ) {\r
1911         final PhyloInferenceDialog dialog = new PhyloInferenceDialog( this,\r
1912                                                                       getPhylogeneticInferenceOptions(),\r
1913                                                                       from_unaligned_seqs );\r
1914         dialog.activate();\r
1915         if ( dialog.getValue() == JOptionPane.OK_OPTION ) {\r
1916             if ( !from_unaligned_seqs ) {\r
1917                 if ( getMsa() != null ) {\r
1918                     final PhylogeneticInferrer inferrer = new PhylogeneticInferrer( getMsa(),\r
1919                                                                                     getPhylogeneticInferenceOptions()\r
1920                                                                                             .copy(), this );\r
1921                     new Thread( inferrer ).start();\r
1922                 }\r
1923                 else {\r
1924                     JOptionPane.showMessageDialog( this,\r
1925                                                    "No multiple sequence alignment selected",\r
1926                                                    "Phylogenetic Inference Not Launched",\r
1927                                                    JOptionPane.WARNING_MESSAGE );\r
1928                 }\r
1929             }\r
1930             else {\r
1931                 if ( getSeqs() != null ) {\r
1932                     final PhylogeneticInferrer inferrer = new PhylogeneticInferrer( getSeqs(),\r
1933                                                                                     getPhylogeneticInferenceOptions()\r
1934                                                                                             .copy(), this );\r
1935                     new Thread( inferrer ).start();\r
1936                 }\r
1937                 else {\r
1938                     JOptionPane.showMessageDialog( this,\r
1939                                                    "No input sequences selected",\r
1940                                                    "Phylogenetic Inference Not Launched",\r
1941                                                    JOptionPane.WARNING_MESSAGE );\r
1942                 }\r
1943             }\r
1944         }\r
1945     }\r
1946 \r
1947     private void extractTaxDataFromNodeNames() throws PhyloXmlDataFormatException {\r
1948         final StringBuilder sb = new StringBuilder();\r
1949         final StringBuilder sb_failed = new StringBuilder();\r
1950         int counter = 0;\r
1951         int counter_failed = 0;\r
1952         if ( getCurrentTreePanel() != null ) {\r
1953             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
1954             if ( ( phy != null ) && !phy.isEmpty() ) {\r
1955                 final PhylogenyNodeIterator it = phy.iteratorExternalForward();\r
1956                 while ( it.hasNext() ) {\r
1957                     final PhylogenyNode n = it.next();\r
1958                     final String name = n.getName().trim();\r
1959                     if ( !ForesterUtil.isEmpty( name ) ) {\r
1960                         final String nt = ParserUtils.extractTaxonomyDataFromNodeName( n,\r
1961                                                                                        TAXONOMY_EXTRACTION.AGGRESSIVE );\r
1962                         if ( !ForesterUtil.isEmpty( nt ) ) {\r
1963                             if ( counter < 15 ) {\r
1964                                 sb.append( name + ": " + nt + "\n" );\r
1965                             }\r
1966                             else if ( counter == 15 ) {\r
1967                                 sb.append( "...\n" );\r
1968                             }\r
1969                             counter++;\r
1970                         }\r
1971                         else {\r
1972                             if ( counter_failed < 15 ) {\r
1973                                 sb_failed.append( name + "\n" );\r
1974                             }\r
1975                             else if ( counter_failed == 15 ) {\r
1976                                 sb_failed.append( "...\n" );\r
1977                             }\r
1978                             counter_failed++;\r
1979                         }\r
1980                     }\r
1981                 }\r
1982                 if ( counter > 0 ) {\r
1983                     String failed = "";\r
1984                     String all = "all ";\r
1985                     if ( counter_failed > 0 ) {\r
1986                         all = "";\r
1987                         failed = "\nCould not extract taxonomic data for " + counter_failed\r
1988                                 + " named external nodes:\n" + sb_failed;\r
1989                     }\r
1990                     JOptionPane.showMessageDialog( this,\r
1991                                                    "Extracted taxonomic data from " + all + counter\r
1992                                                            + " named external nodes:\n" + sb.toString() + failed,\r
1993                                                    "Taxonomic Data Extraction Completed",\r
1994                                                    counter_failed > 0 ? JOptionPane.WARNING_MESSAGE\r
1995                                                            : JOptionPane.INFORMATION_MESSAGE );\r
1996                 }\r
1997                 else {\r
1998                     JOptionPane\r
1999                             .showMessageDialog( this,\r
2000                                                 "Could not extract any taxonomic data.\nMaybe node names are empty\n"\r
2001                                                         + "or not in the forms \"XYZ_CAEEL\", \"XYZ_6239\", or \"XYZ_Caenorhabditis_elegans\"\n"\r
2002                                                         + "or nodes already have taxonomic data?\n",\r
2003                                                 "No Taxonomic Data Extracted",\r
2004                                                 JOptionPane.ERROR_MESSAGE );\r
2005                 }\r
2006             }\r
2007         }\r
2008     }\r
2009 \r
2010     private ControlPanel getControlPanel() {\r
2011         return getMainPanel().getControlPanel();\r
2012     }\r
2013 \r
2014     private File getCurrentDir() {\r
2015         if ( ( _current_dir == null ) || !_current_dir.canRead() ) {\r
2016             if ( ForesterUtil.isWindows() ) {\r
2017                 try {\r
2018                     _current_dir = new File( WindowsUtils.getCurrentUserDesktopPath() );\r
2019                 }\r
2020                 catch ( final Exception e ) {\r
2021                     _current_dir = null;\r
2022                 }\r
2023             }\r
2024         }\r
2025         if ( ( _current_dir == null ) || !_current_dir.canRead() ) {\r
2026             if ( System.getProperty( "user.home" ) != null ) {\r
2027                 _current_dir = new File( System.getProperty( "user.home" ) );\r
2028             }\r
2029             else if ( System.getProperty( "user.dir" ) != null ) {\r
2030                 _current_dir = new File( System.getProperty( "user.dir" ) );\r
2031             }\r
2032         }\r
2033         return _current_dir;\r
2034     }\r
2035 \r
2036     private double getMinNotCollapseConfidenceValue() {\r
2037         return _min_not_collapse;\r
2038     }\r
2039 \r
2040     private double getMinNotCollapseBlValue() {\r
2041         return _min_not_collapse_bl;\r
2042     }\r
2043 \r
2044     private PhylogeneticInferenceOptions getPhylogeneticInferenceOptions() {\r
2045         if ( _phylogenetic_inference_options == null ) {\r
2046             _phylogenetic_inference_options = new PhylogeneticInferenceOptions();\r
2047         }\r
2048         return _phylogenetic_inference_options;\r
2049     }\r
2050 \r
2051     private boolean isUnsavedDataPresent() {\r
2052         final List<TreePanel> tps = getMainPanel().getTreePanels();\r
2053         for( final TreePanel tp : tps ) {\r
2054             if ( tp.isEdited() ) {\r
2055                 return true;\r
2056             }\r
2057         }\r
2058         return false;\r
2059     }\r
2060 \r
2061     private void moveNodeNamesToSeqNames() throws PhyloXmlDataFormatException {\r
2062         if ( getCurrentTreePanel() != null ) {\r
2063             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
2064             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2065                 PhylogenyMethods\r
2066                         .transferNodeNameToField( phy, PhylogenyMethods.PhylogenyNodeField.SEQUENCE_NAME, false );\r
2067             }\r
2068         }\r
2069     }\r
2070 \r
2071     private void moveNodeNamesToTaxSn() throws PhyloXmlDataFormatException {\r
2072         if ( getCurrentTreePanel() != null ) {\r
2073             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
2074             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2075                 PhylogenyMethods.transferNodeNameToField( phy,\r
2076                                                           PhylogenyMethods.PhylogenyNodeField.TAXONOMY_SCIENTIFIC_NAME,\r
2077                                                           false );\r
2078             }\r
2079         }\r
2080     }\r
2081 \r
2082     private void newTree() {\r
2083         final Phylogeny[] phys = new Phylogeny[ 1 ];\r
2084         final Phylogeny phy = new Phylogeny();\r
2085         final PhylogenyNode node = new PhylogenyNode();\r
2086         phy.setRoot( node );\r
2087         phy.setRooted( true );\r
2088         phys[ 0 ] = phy;\r
2089         AptxUtil.addPhylogeniesToTabs( phys, "", "", getConfiguration(), getMainPanel() );\r
2090         _mainpanel.getControlPanel().showWhole();\r
2091         _mainpanel.getCurrentTreePanel().setPhylogenyGraphicsType( PHYLOGENY_GRAPHICS_TYPE.RECTANGULAR );\r
2092         _mainpanel.getOptions().setPhylogenyGraphicsType( PHYLOGENY_GRAPHICS_TYPE.RECTANGULAR );\r
2093         if ( getMainPanel().getMainFrame() == null ) {\r
2094             // Must be "E" applet version.\r
2095             ( ( ArchaeopteryxE ) ( ( MainPanelApplets ) getMainPanel() ).getApplet() )\r
2096                     .setSelectedTypeInTypeMenu( PHYLOGENY_GRAPHICS_TYPE.RECTANGULAR );\r
2097         }\r
2098         else {\r
2099             getMainPanel().getMainFrame().setSelectedTypeInTypeMenu( PHYLOGENY_GRAPHICS_TYPE.RECTANGULAR );\r
2100         }\r
2101         activateSaveAllIfNeeded();\r
2102         System.gc();\r
2103     }\r
2104 \r
2105     private void obtainDetailedTaxonomicInformation() {\r
2106         if ( getCurrentTreePanel() != null ) {\r
2107             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
2108             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2109                 final TaxonomyDataManager t = new TaxonomyDataManager( this,\r
2110                                                                        _mainpanel.getCurrentTreePanel(),\r
2111                                                                        phy.copy(),\r
2112                                                                        false,\r
2113                                                                        true );\r
2114                 new Thread( t ).start();\r
2115             }\r
2116         }\r
2117     }\r
2118 \r
2119     private void obtainDetailedTaxonomicInformationDelete() {\r
2120         if ( getCurrentTreePanel() != null ) {\r
2121             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
2122             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2123                 final TaxonomyDataManager t = new TaxonomyDataManager( this,\r
2124                                                                        _mainpanel.getCurrentTreePanel(),\r
2125                                                                        phy.copy(),\r
2126                                                                        true,\r
2127                                                                        true );\r
2128                 new Thread( t ).start();\r
2129             }\r
2130         }\r
2131     }\r
2132 \r
2133     private void obtainSequenceInformation() {\r
2134         if ( getCurrentTreePanel() != null ) {\r
2135             final Phylogeny phy = getCurrentTreePanel().getPhylogeny();\r
2136             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2137                 final SequenceDataRetriver u = new SequenceDataRetriver( this,\r
2138                                                                          _mainpanel.getCurrentTreePanel(),\r
2139                                                                          phy.copy() );\r
2140                 new Thread( u ).start();\r
2141             }\r
2142         }\r
2143     }\r
2144 \r
2145     private void print() {\r
2146         if ( ( getCurrentTreePanel() == null ) || ( getCurrentTreePanel().getPhylogeny() == null )\r
2147                 || getCurrentTreePanel().getPhylogeny().isEmpty() ) {\r
2148             return;\r
2149         }\r
2150         if ( !getOptions().isPrintUsingActualSize() ) {\r
2151             getCurrentTreePanel().calcParametersForPainting( getOptions().getPrintSizeX() - 80,\r
2152                                                              getOptions().getPrintSizeY() - 140 );\r
2153             getCurrentTreePanel().resetPreferredSize();\r
2154             getCurrentTreePanel().repaint();\r
2155         }\r
2156         final String job_name = Constants.PRG_NAME;\r
2157         boolean error = false;\r
2158         String printer_name = null;\r
2159         try {\r
2160             printer_name = Printer.print( getCurrentTreePanel(), job_name );\r
2161         }\r
2162         catch ( final Exception e ) {\r
2163             error = true;\r
2164             JOptionPane.showMessageDialog( this, e.getMessage(), "Printing Error", JOptionPane.ERROR_MESSAGE );\r
2165         }\r
2166         if ( !error && ( printer_name != null ) ) {\r
2167             String msg = "Printing data sent to printer";\r
2168             if ( printer_name.length() > 1 ) {\r
2169                 msg += " [" + printer_name + "]";\r
2170             }\r
2171             JOptionPane.showMessageDialog( this, msg, "Printing...", JOptionPane.INFORMATION_MESSAGE );\r
2172         }\r
2173         if ( !getOptions().isPrintUsingActualSize() ) {\r
2174             getControlPanel().showWhole();\r
2175         }\r
2176     }\r
2177 \r
2178     private void printPhylogenyToPdf( final String file_name ) {\r
2179         if ( !getOptions().isPrintUsingActualSize() ) {\r
2180             getCurrentTreePanel()\r
2181             .calcParametersForPainting( getOptions().getPrintSizeX(), getOptions().getPrintSizeY() );\r
2182             getCurrentTreePanel().resetPreferredSize();\r
2183             getCurrentTreePanel().repaint();\r
2184         }\r
2185         String pdf_written_to = "";\r
2186         boolean error = false;\r
2187         try {\r
2188             if ( getOptions().isPrintUsingActualSize() ) {\r
2189                 pdf_written_to = PdfExporter.writePhylogenyToPdf( file_name,\r
2190                                                                   getCurrentTreePanel(),\r
2191                                                                   getCurrentTreePanel().getWidth(),\r
2192                                                                   getCurrentTreePanel().getHeight() );\r
2193             }\r
2194             else {\r
2195                 pdf_written_to = PdfExporter.writePhylogenyToPdf( file_name, getCurrentTreePanel(), getOptions()\r
2196                         .getPrintSizeX(), getOptions().getPrintSizeY() );\r
2197             }\r
2198         }\r
2199         catch ( final IOException e ) {\r
2200             error = true;\r
2201             JOptionPane.showMessageDialog( this, e.getMessage(), "Error", JOptionPane.ERROR_MESSAGE );\r
2202         }\r
2203         if ( !error ) {\r
2204             if ( !ForesterUtil.isEmpty( pdf_written_to ) ) {\r
2205                 JOptionPane.showMessageDialog( this,\r
2206                                                "Wrote PDF to: " + pdf_written_to,\r
2207                                                "Information",\r
2208                                                JOptionPane.INFORMATION_MESSAGE );\r
2209             }\r
2210             else {\r
2211                 JOptionPane.showMessageDialog( this,\r
2212                                                "There was an unknown problem when attempting to write to PDF file: \""\r
2213                                                        + file_name + "\"",\r
2214                                                "Error",\r
2215                                                JOptionPane.ERROR_MESSAGE );\r
2216             }\r
2217         }\r
2218         if ( !getOptions().isPrintUsingActualSize() ) {\r
2219             getControlPanel().showWhole();\r
2220         }\r
2221     }\r
2222 \r
2223     private void readPhylogeniesFromFile() {\r
2224         boolean exception = false;\r
2225         Phylogeny[] phys = null;\r
2226         // Set an initial directory if none set yet\r
2227         final File my_dir = getCurrentDir();\r
2228         _open_filechooser.setMultiSelectionEnabled( true );\r
2229         // Open file-open dialog and set current directory\r
2230         if ( my_dir != null ) {\r
2231             _open_filechooser.setCurrentDirectory( my_dir );\r
2232         }\r
2233         final int result = _open_filechooser.showOpenDialog( _contentpane );\r
2234         // All done: get the file\r
2235         final File[] files = _open_filechooser.getSelectedFiles();\r
2236         setCurrentDir( _open_filechooser.getCurrentDirectory() );\r
2237         boolean nhx_or_nexus = false;\r
2238         if ( ( files != null ) && ( files.length > 0 ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2239             for( final File file : files ) {\r
2240                 if ( ( file != null ) && !file.isDirectory() ) {\r
2241                     if ( _mainpanel.getCurrentTreePanel() != null ) {\r
2242                         _mainpanel.getCurrentTreePanel().setWaitCursor();\r
2243                     }\r
2244                     else {\r
2245                         _mainpanel.setWaitCursor();\r
2246                     }\r
2247                     if ( ( _open_filechooser.getFileFilter() == MainFrameApplication.nhfilter )\r
2248                             || ( _open_filechooser.getFileFilter() == MainFrameApplication.nhxfilter ) ) {\r
2249                         try {\r
2250                             final NHXParser nhx = new NHXParser();\r
2251                             setSpecialOptionsForNhxParser( nhx );\r
2252                             phys = PhylogenyMethods.readPhylogenies( nhx, file );\r
2253                             nhx_or_nexus = true;\r
2254                         }\r
2255                         catch ( final Exception e ) {\r
2256                             exception = true;\r
2257                             exceptionOccuredDuringOpenFile( e );\r
2258                         }\r
2259                     }\r
2260                     else if ( _open_filechooser.getFileFilter() == MainFrameApplication.xmlfilter ) {\r
2261                         warnIfNotPhyloXmlValidation( getConfiguration() );\r
2262                         try {\r
2263                             final PhyloXmlParser xml_parser = createPhyloXmlParser();\r
2264                             phys = PhylogenyMethods.readPhylogenies( xml_parser, file );\r
2265                         }\r
2266                         catch ( final Exception e ) {\r
2267                             exception = true;\r
2268                             exceptionOccuredDuringOpenFile( e );\r
2269                         }\r
2270                     }\r
2271                     else if ( _open_filechooser.getFileFilter() == MainFrameApplication.tolfilter ) {\r
2272                         try {\r
2273                             phys = PhylogenyMethods.readPhylogenies( new TolParser(), file );\r
2274                         }\r
2275                         catch ( final Exception e ) {\r
2276                             exception = true;\r
2277                             exceptionOccuredDuringOpenFile( e );\r
2278                         }\r
2279                     }\r
2280                     else if ( _open_filechooser.getFileFilter() == MainFrameApplication.nexusfilter ) {\r
2281                         try {\r
2282                             final NexusPhylogeniesParser nex = new NexusPhylogeniesParser();\r
2283                             setSpecialOptionsForNexParser( nex );\r
2284                             phys = PhylogenyMethods.readPhylogenies( nex, file );\r
2285                             nhx_or_nexus = true;\r
2286                         }\r
2287                         catch ( final Exception e ) {\r
2288                             exception = true;\r
2289                             exceptionOccuredDuringOpenFile( e );\r
2290                         }\r
2291                     }\r
2292                     // "*.*":\r
2293                     else {\r
2294                         try {\r
2295                             final PhylogenyParser parser = ParserUtils\r
2296                                     .createParserDependingOnFileType( file, getConfiguration()\r
2297                                             .isValidatePhyloXmlAgainstSchema() );\r
2298                             if ( parser instanceof NexusPhylogeniesParser ) {\r
2299                                 final NexusPhylogeniesParser nex = ( NexusPhylogeniesParser ) parser;\r
2300                                 setSpecialOptionsForNexParser( nex );\r
2301                                 nhx_or_nexus = true;\r
2302                             }\r
2303                             else if ( parser instanceof NHXParser ) {\r
2304                                 final NHXParser nhx = ( NHXParser ) parser;\r
2305                                 setSpecialOptionsForNhxParser( nhx );\r
2306                                 nhx_or_nexus = true;\r
2307                             }\r
2308                             else if ( parser instanceof PhyloXmlParser ) {\r
2309                                 warnIfNotPhyloXmlValidation( getConfiguration() );\r
2310                             }\r
2311                             phys = PhylogenyMethods.readPhylogenies( parser, file );\r
2312                         }\r
2313                         catch ( final Exception e ) {\r
2314                             exception = true;\r
2315                             exceptionOccuredDuringOpenFile( e );\r
2316                         }\r
2317                     }\r
2318                     if ( _mainpanel.getCurrentTreePanel() != null ) {\r
2319                         _mainpanel.getCurrentTreePanel().setArrowCursor();\r
2320                     }\r
2321                     else {\r
2322                         _mainpanel.setArrowCursor();\r
2323                     }\r
2324                     if ( !exception && ( phys != null ) && ( phys.length > 0 ) ) {\r
2325                         boolean one_desc = false;\r
2326                         if ( nhx_or_nexus ) {\r
2327                             for( final Phylogeny phy : phys ) {\r
2328                                 if ( getOptions().isInternalNumberAreConfidenceForNhParsing() ) {\r
2329                                     PhylogenyMethods.transferInternalNodeNamesToConfidence( phy, "" );\r
2330                                 }\r
2331                                 if ( PhylogenyMethods.getMinimumDescendentsPerInternalNodes( phy ) == 1 ) {\r
2332                                     one_desc = true;\r
2333                                     break;\r
2334                                 }\r
2335                             }\r
2336                         }\r
2337                         if ( PREPROCESS_TREES ) {\r
2338                             preProcessTreesUponReading( phys );\r
2339                         }\r
2340                         AptxUtil.addPhylogeniesToTabs( phys,\r
2341                                                        file.getName(),\r
2342                                                        file.getAbsolutePath(),\r
2343                                                        getConfiguration(),\r
2344                                                        getMainPanel() );\r
2345                         _mainpanel.getControlPanel().showWhole();\r
2346                         if ( nhx_or_nexus && one_desc ) {\r
2347                             JOptionPane\r
2348                                     .showMessageDialog( this,\r
2349                                                         "One or more trees contain (a) node(s) with one descendant, "\r
2350                                                                 + ForesterUtil.LINE_SEPARATOR\r
2351                                                                 + "possibly indicating illegal parentheses within node names.",\r
2352                                                         "Warning: Possible Error in New Hampshire Formatted Data",\r
2353                                                         JOptionPane.WARNING_MESSAGE );\r
2354                         }\r
2355                     }\r
2356                 }\r
2357             }\r
2358         }\r
2359         activateSaveAllIfNeeded();\r
2360         System.gc();\r
2361     }\r
2362 \r
2363     private void preProcessTreesUponReading( final Phylogeny[] phys ) {\r
2364         for( final Phylogeny phy : phys ) {\r
2365             if ( ( phy != null ) && !phy.isEmpty() ) {\r
2366                 for( final PhylogenyNodeIterator it = phy.iteratorPreorder(); it.hasNext(); ) {\r
2367                     final PhylogenyNode n = it.next();\r
2368                     if ( n.isExternal() ) {\r
2369                         if ( n.getNodeData().isHasSequence() ) {\r
2370                             final Sequence s = n.getNodeData().getSequence();\r
2371                             if ( ForesterUtil.isEmpty( s.getGeneName() ) || s.getGeneName().startsWith( "LOC" ) ) {\r
2372                                 if ( ( s.getAccession() != null )\r
2373                                         && !ForesterUtil.isEmpty( s.getAccession().getValue() ) ) {\r
2374                                     s.setGeneName( s.getAccession().getValue() );\r
2375                                 }\r
2376                                 else if ( !ForesterUtil.isEmpty( n.getName() ) ) {\r
2377                                     s.setGeneName( n.getName() );\r
2378                                 }\r
2379                             }\r
2380                         }\r
2381                     }\r
2382                 }\r
2383             }\r
2384         }\r
2385     }\r
2386 \r
2387     private void readSpeciesTreeFromFile() {\r
2388         Phylogeny t = null;\r
2389         boolean exception = false;\r
2390         final File my_dir = getCurrentDir();\r
2391         _open_filechooser_for_species_tree.setSelectedFile( new File( "" ) );\r
2392         if ( my_dir != null ) {\r
2393             _open_filechooser_for_species_tree.setCurrentDirectory( my_dir );\r
2394         }\r
2395         final int result = _open_filechooser_for_species_tree.showOpenDialog( _contentpane );\r
2396         final File file = _open_filechooser_for_species_tree.getSelectedFile();\r
2397         if ( ( file != null ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2398             if ( _open_filechooser_for_species_tree.getFileFilter() == MainFrameApplication.xmlfilter ) {\r
2399                 try {\r
2400                     final Phylogeny[] trees = PhylogenyMethods.readPhylogenies( PhyloXmlParser\r
2401                             .createPhyloXmlParserXsdValidating(), file );\r
2402                     t = trees[ 0 ];\r
2403                 }\r
2404                 catch ( final Exception e ) {\r
2405                     exception = true;\r
2406                     exceptionOccuredDuringOpenFile( e );\r
2407                 }\r
2408             }\r
2409             else if ( _open_filechooser_for_species_tree.getFileFilter() == MainFrameApplication.tolfilter ) {\r
2410                 try {\r
2411                     final Phylogeny[] trees = PhylogenyMethods.readPhylogenies( new TolParser(), file );\r
2412                     t = trees[ 0 ];\r
2413                 }\r
2414                 catch ( final Exception e ) {\r
2415                     exception = true;\r
2416                     exceptionOccuredDuringOpenFile( e );\r
2417                 }\r
2418             }\r
2419             // "*.*":\r
2420             else {\r
2421                 try {\r
2422                     final Phylogeny[] trees = PhylogenyMethods.readPhylogenies( PhyloXmlParser\r
2423                             .createPhyloXmlParserXsdValidating(), file );\r
2424                     t = trees[ 0 ];\r
2425                 }\r
2426                 catch ( final Exception e ) {\r
2427                     exception = true;\r
2428                     exceptionOccuredDuringOpenFile( e );\r
2429                 }\r
2430             }\r
2431             if ( !exception && ( t != null ) && !t.isRooted() ) {\r
2432                 exception = true;\r
2433                 t = null;\r
2434                 JOptionPane.showMessageDialog( this,\r
2435                                                "Species tree is not rooted",\r
2436                                                "Species tree not loaded",\r
2437                                                JOptionPane.ERROR_MESSAGE );\r
2438             }\r
2439             if ( !exception && ( t != null ) ) {\r
2440                 final Set<Taxonomy> tax_set = new HashSet<Taxonomy>();\r
2441                 for( final PhylogenyNodeIterator it = t.iteratorExternalForward(); it.hasNext(); ) {\r
2442                     final PhylogenyNode node = it.next();\r
2443                     if ( !node.getNodeData().isHasTaxonomy() ) {\r
2444                         exception = true;\r
2445                         t = null;\r
2446                         JOptionPane\r
2447                                 .showMessageDialog( this,\r
2448                                                     "Species tree contains external node(s) without taxonomy information",\r
2449                                                     "Species tree not loaded",\r
2450                                                     JOptionPane.ERROR_MESSAGE );\r
2451                         break;\r
2452                     }\r
2453                     else {\r
2454                         if ( tax_set.contains( node.getNodeData().getTaxonomy() ) ) {\r
2455                             exception = true;\r
2456                             t = null;\r
2457                             JOptionPane.showMessageDialog( this,\r
2458                                                            "Taxonomy ["\r
2459                                                                    + node.getNodeData().getTaxonomy().asSimpleText()\r
2460                                                                    + "] is not unique in species tree",\r
2461                                                            "Species tree not loaded",\r
2462                                                            JOptionPane.ERROR_MESSAGE );\r
2463                             break;\r
2464                         }\r
2465                         else {\r
2466                             tax_set.add( node.getNodeData().getTaxonomy() );\r
2467                         }\r
2468                     }\r
2469                 }\r
2470             }\r
2471             if ( !exception && ( t != null ) ) {\r
2472                 setSpeciesTree( t );\r
2473                 JOptionPane.showMessageDialog( this,\r
2474                                                "Species tree successfully loaded",\r
2475                                                "Species tree loaded",\r
2476                                                JOptionPane.INFORMATION_MESSAGE );\r
2477             }\r
2478             _contentpane.repaint();\r
2479             System.gc();\r
2480         }\r
2481     }\r
2482 \r
2483     private void setArrowCursor() {\r
2484         try {\r
2485             _mainpanel.getCurrentTreePanel().setArrowCursor();\r
2486         }\r
2487         catch ( final Exception ex ) {\r
2488             // Do nothing.\r
2489         }\r
2490     }\r
2491 \r
2492     private void setCurrentDir( final File current_dir ) {\r
2493         _current_dir = current_dir;\r
2494     }\r
2495 \r
2496     private void setMinNotCollapseConfidenceValue( final double min_not_collapse ) {\r
2497         _min_not_collapse = min_not_collapse;\r
2498     }\r
2499 \r
2500     private void setMinNotCollapseBlValue( final double min_not_collapse_bl ) {\r
2501         _min_not_collapse_bl = min_not_collapse_bl;\r
2502     }\r
2503 \r
2504     private void setPhylogeneticInferenceOptions( final PhylogeneticInferenceOptions phylogenetic_inference_options ) {\r
2505         _phylogenetic_inference_options = phylogenetic_inference_options;\r
2506     }\r
2507 \r
2508     private void setSpecialOptionsForNexParser( final NexusPhylogeniesParser nex ) {\r
2509         nex.setReplaceUnderscores( getOptions().isReplaceUnderscoresInNhParsing() );\r
2510         nex.setTaxonomyExtraction( getOptions().getTaxonomyExtraction() );\r
2511     }\r
2512 \r
2513     private void setSpecialOptionsForNhxParser( final NHXParser nhx ) {\r
2514         nhx.setReplaceUnderscores( getOptions().isReplaceUnderscoresInNhParsing() );\r
2515         nhx.setTaxonomyExtraction( getOptions().getTaxonomyExtraction() );\r
2516         nhx.setAllowErrorsInDistanceToParent( getOptions().isAllowErrorsInDistanceToParent() );\r
2517     }\r
2518 \r
2519     private void writeAllToFile() {\r
2520         if ( ( getMainPanel().getTabbedPane() == null ) || ( getMainPanel().getTabbedPane().getTabCount() < 1 ) ) {\r
2521             return;\r
2522         }\r
2523         final File my_dir = getCurrentDir();\r
2524         if ( my_dir != null ) {\r
2525             _save_filechooser.setCurrentDirectory( my_dir );\r
2526         }\r
2527         _save_filechooser.setSelectedFile( new File( "" ) );\r
2528         final int result = _save_filechooser.showSaveDialog( _contentpane );\r
2529         final File file = _save_filechooser.getSelectedFile();\r
2530         setCurrentDir( _save_filechooser.getCurrentDirectory() );\r
2531         if ( ( file != null ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2532             if ( file.exists() ) {\r
2533                 final int i = JOptionPane.showConfirmDialog( this,\r
2534                                                              file + " already exists. Overwrite?",\r
2535                                                              "Warning",\r
2536                                                              JOptionPane.OK_CANCEL_OPTION,\r
2537                                                              JOptionPane.WARNING_MESSAGE );\r
2538                 if ( i != JOptionPane.OK_OPTION ) {\r
2539                     return;\r
2540                 }\r
2541                 else {\r
2542                     try {\r
2543                         file.delete();\r
2544                     }\r
2545                     catch ( final Exception e ) {\r
2546                         JOptionPane.showMessageDialog( this,\r
2547                                                        "Failed to delete: " + file,\r
2548                                                        "Error",\r
2549                                                        JOptionPane.WARNING_MESSAGE );\r
2550                     }\r
2551                 }\r
2552             }\r
2553             final int count = getMainPanel().getTabbedPane().getTabCount();\r
2554             final List<Phylogeny> trees = new ArrayList<Phylogeny>();\r
2555             for( int i = 0; i < count; ++i ) {\r
2556                 final Phylogeny phy = getMainPanel().getPhylogeny( i );\r
2557                 if ( ForesterUtil.isEmpty( phy.getName() )\r
2558                         && !ForesterUtil.isEmpty( getMainPanel().getTabbedPane().getTitleAt( i ) ) ) {\r
2559                     phy.setName( getMainPanel().getTabbedPane().getTitleAt( i ) );\r
2560                 }\r
2561                 trees.add( phy );\r
2562                 getMainPanel().getTreePanels().get( i ).setEdited( false );\r
2563             }\r
2564             final PhylogenyWriter writer = new PhylogenyWriter();\r
2565             try {\r
2566                 writer.toPhyloXML( file, trees, 0, ForesterUtil.LINE_SEPARATOR );\r
2567             }\r
2568             catch ( final IOException e ) {\r
2569                 JOptionPane.showMessageDialog( this,\r
2570                                                "Failed to write to: " + file,\r
2571                                                "Error",\r
2572                                                JOptionPane.WARNING_MESSAGE );\r
2573             }\r
2574         }\r
2575     }\r
2576 \r
2577     private boolean writeAsNewHampshire( final Phylogeny t, boolean exception, final File file ) {\r
2578         try {\r
2579             final PhylogenyWriter writer = new PhylogenyWriter();\r
2580             writer.toNewHampshire( t, true, getOptions().getNhConversionSupportValueStyle(), file );\r
2581         }\r
2582         catch ( final Exception e ) {\r
2583             exception = true;\r
2584             exceptionOccuredDuringSaveAs( e );\r
2585         }\r
2586         return exception;\r
2587     }\r
2588 \r
2589     private boolean writeAsNexus( final Phylogeny t, boolean exception, final File file ) {\r
2590         try {\r
2591             final PhylogenyWriter writer = new PhylogenyWriter();\r
2592             writer.toNexus( file, t, getOptions().getNhConversionSupportValueStyle() );\r
2593         }\r
2594         catch ( final Exception e ) {\r
2595             exception = true;\r
2596             exceptionOccuredDuringSaveAs( e );\r
2597         }\r
2598         return exception;\r
2599     }\r
2600 \r
2601     private boolean writeAsPhyloXml( final Phylogeny t, boolean exception, final File file ) {\r
2602         try {\r
2603             final PhylogenyWriter writer = new PhylogenyWriter();\r
2604             writer.toPhyloXML( file, t, 0 );\r
2605         }\r
2606         catch ( final Exception e ) {\r
2607             exception = true;\r
2608             exceptionOccuredDuringSaveAs( e );\r
2609         }\r
2610         return exception;\r
2611     }\r
2612 \r
2613     private void writeToFile( final Phylogeny t ) {\r
2614         if ( t == null ) {\r
2615             return;\r
2616         }\r
2617         String initial_filename = null;\r
2618         if ( getMainPanel().getCurrentTreePanel().getTreeFile() != null ) {\r
2619             try {\r
2620                 initial_filename = getMainPanel().getCurrentTreePanel().getTreeFile().getCanonicalPath();\r
2621             }\r
2622             catch ( final IOException e ) {\r
2623                 initial_filename = null;\r
2624             }\r
2625         }\r
2626         if ( !ForesterUtil.isEmpty( initial_filename ) ) {\r
2627             _save_filechooser.setSelectedFile( new File( initial_filename ) );\r
2628         }\r
2629         else {\r
2630             _save_filechooser.setSelectedFile( new File( "" ) );\r
2631         }\r
2632         final File my_dir = getCurrentDir();\r
2633         if ( my_dir != null ) {\r
2634             _save_filechooser.setCurrentDirectory( my_dir );\r
2635         }\r
2636         final int result = _save_filechooser.showSaveDialog( _contentpane );\r
2637         final File file = _save_filechooser.getSelectedFile();\r
2638         setCurrentDir( _save_filechooser.getCurrentDirectory() );\r
2639         boolean exception = false;\r
2640         if ( ( file != null ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2641             if ( file.exists() ) {\r
2642                 final int i = JOptionPane.showConfirmDialog( this,\r
2643                                                              file + " already exists.\nOverwrite?",\r
2644                                                              "Overwrite?",\r
2645                                                              JOptionPane.OK_CANCEL_OPTION,\r
2646                                                              JOptionPane.QUESTION_MESSAGE );\r
2647                 if ( i != JOptionPane.OK_OPTION ) {\r
2648                     return;\r
2649                 }\r
2650                 else {\r
2651                     final File to = new File( file.getAbsoluteFile().toString() + Constants.BACKUP_FILE_SUFFIX );\r
2652                     try {\r
2653                         ForesterUtil.copyFile( file, to );\r
2654                     }\r
2655                     catch ( final Exception e ) {\r
2656                         JOptionPane.showMessageDialog( this,\r
2657                                                        "Failed to create backup copy " + to,\r
2658                                                        "Failed to Create Backup Copy",\r
2659                                                        JOptionPane.WARNING_MESSAGE );\r
2660                     }\r
2661                     try {\r
2662                         file.delete();\r
2663                     }\r
2664                     catch ( final Exception e ) {\r
2665                         JOptionPane.showMessageDialog( this,\r
2666                                                        "Failed to delete: " + file,\r
2667                                                        "Failed to Delete",\r
2668                                                        JOptionPane.WARNING_MESSAGE );\r
2669                     }\r
2670                 }\r
2671             }\r
2672             if ( _save_filechooser.getFileFilter() == MainFrameApplication.nhfilter ) {\r
2673                 exception = writeAsNewHampshire( t, exception, file );\r
2674             }\r
2675             else if ( _save_filechooser.getFileFilter() == MainFrameApplication.xmlfilter ) {\r
2676                 exception = writeAsPhyloXml( t, exception, file );\r
2677             }\r
2678             else if ( _save_filechooser.getFileFilter() == MainFrameApplication.nexusfilter ) {\r
2679                 exception = writeAsNexus( t, exception, file );\r
2680             }\r
2681             // "*.*":\r
2682             else {\r
2683                 final String file_name = file.getName().trim().toLowerCase();\r
2684                 if ( file_name.endsWith( ".nh" ) || file_name.endsWith( ".newick" ) || file_name.endsWith( ".phy" )\r
2685                         || file_name.endsWith( ".tree" ) ) {\r
2686                     exception = writeAsNewHampshire( t, exception, file );\r
2687                 }\r
2688                 else if ( file_name.endsWith( ".nex" ) || file_name.endsWith( ".nexus" ) ) {\r
2689                     exception = writeAsNexus( t, exception, file );\r
2690                 }\r
2691                 // XML is default:\r
2692                 else {\r
2693                     exception = writeAsPhyloXml( t, exception, file );\r
2694                 }\r
2695             }\r
2696             if ( !exception ) {\r
2697                 getMainPanel().setTitleOfSelectedTab( file.getName() );\r
2698                 getMainPanel().getCurrentTreePanel().setTreeFile( file );\r
2699                 getMainPanel().getCurrentTreePanel().setEdited( false );\r
2700             }\r
2701         }\r
2702     }\r
2703 \r
2704     private void writeToGraphicsFile( final Phylogeny t, final GraphicsExportType type ) {\r
2705         if ( ( t == null ) || t.isEmpty() ) {\r
2706             return;\r
2707         }\r
2708         String initial_filename = "";\r
2709         if ( getMainPanel().getCurrentTreePanel().getTreeFile() != null ) {\r
2710             initial_filename = getMainPanel().getCurrentTreePanel().getTreeFile().toString();\r
2711         }\r
2712         if ( initial_filename.indexOf( '.' ) > 0 ) {\r
2713             initial_filename = initial_filename.substring( 0, initial_filename.lastIndexOf( '.' ) );\r
2714         }\r
2715         initial_filename = initial_filename + "." + type;\r
2716         _writetographics_filechooser.setSelectedFile( new File( initial_filename ) );\r
2717         final File my_dir = getCurrentDir();\r
2718         if ( my_dir != null ) {\r
2719             _writetographics_filechooser.setCurrentDirectory( my_dir );\r
2720         }\r
2721         final int result = _writetographics_filechooser.showSaveDialog( _contentpane );\r
2722         File file = _writetographics_filechooser.getSelectedFile();\r
2723         setCurrentDir( _writetographics_filechooser.getCurrentDirectory() );\r
2724         if ( ( file != null ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2725             if ( !file.toString().toLowerCase().endsWith( type.toString() ) ) {\r
2726                 file = new File( file.toString() + "." + type );\r
2727             }\r
2728             if ( file.exists() ) {\r
2729                 final int i = JOptionPane.showConfirmDialog( this,\r
2730                                                              file + " already exists. Overwrite?",\r
2731                                                              "Warning",\r
2732                                                              JOptionPane.OK_CANCEL_OPTION,\r
2733                                                              JOptionPane.WARNING_MESSAGE );\r
2734                 if ( i != JOptionPane.OK_OPTION ) {\r
2735                     return;\r
2736                 }\r
2737                 else {\r
2738                     try {\r
2739                         file.delete();\r
2740                     }\r
2741                     catch ( final Exception e ) {\r
2742                         JOptionPane.showMessageDialog( this,\r
2743                                                        "Failed to delete: " + file,\r
2744                                                        "Error",\r
2745                                                        JOptionPane.WARNING_MESSAGE );\r
2746                     }\r
2747                 }\r
2748             }\r
2749             writePhylogenyToGraphicsFile( file.toString(), type );\r
2750         }\r
2751     }\r
2752 \r
2753     private void writeToPdf( final Phylogeny t ) {\r
2754         if ( ( t == null ) || t.isEmpty() ) {\r
2755             return;\r
2756         }\r
2757         String initial_filename = "";\r
2758         if ( getMainPanel().getCurrentTreePanel().getTreeFile() != null ) {\r
2759             initial_filename = getMainPanel().getCurrentTreePanel().getTreeFile().toString();\r
2760         }\r
2761         if ( initial_filename.indexOf( '.' ) > 0 ) {\r
2762             initial_filename = initial_filename.substring( 0, initial_filename.lastIndexOf( '.' ) );\r
2763         }\r
2764         initial_filename = initial_filename + ".pdf";\r
2765         _writetopdf_filechooser.setSelectedFile( new File( initial_filename ) );\r
2766         final File my_dir = getCurrentDir();\r
2767         if ( my_dir != null ) {\r
2768             _writetopdf_filechooser.setCurrentDirectory( my_dir );\r
2769         }\r
2770         final int result = _writetopdf_filechooser.showSaveDialog( _contentpane );\r
2771         File file = _writetopdf_filechooser.getSelectedFile();\r
2772         setCurrentDir( _writetopdf_filechooser.getCurrentDirectory() );\r
2773         if ( ( file != null ) && ( result == JFileChooser.APPROVE_OPTION ) ) {\r
2774             if ( !file.toString().toLowerCase().endsWith( ".pdf" ) ) {\r
2775                 file = new File( file.toString() + ".pdf" );\r
2776             }\r
2777             if ( file.exists() ) {\r
2778                 final int i = JOptionPane.showConfirmDialog( this,\r
2779                                                              file + " already exists. Overwrite?",\r
2780                                                              "WARNING",\r
2781                                                              JOptionPane.OK_CANCEL_OPTION,\r
2782                                                              JOptionPane.WARNING_MESSAGE );\r
2783                 if ( i != JOptionPane.OK_OPTION ) {\r
2784                     return;\r
2785                 }\r
2786             }\r
2787             printPhylogenyToPdf( file.toString() );\r
2788         }\r
2789     }\r
2790 \r
2791     public static MainFrameApplication createInstance( final Phylogeny[] phys, final Configuration config ) {\r
2792         return new MainFrameApplication( phys, config );\r
2793     }\r
2794 \r
2795     public static MainFrame createInstance( final Phylogeny[] phys,\r
2796                                             final Configuration config,\r
2797                                             final String title,\r
2798                                             final File current_dir ) {\r
2799         return new MainFrameApplication( phys, config, title, current_dir );\r
2800     }\r
2801 \r
2802     static MainFrame createInstance( final Phylogeny[] phys, final Configuration config, final String title ) {\r
2803         return new MainFrameApplication( phys, config, title );\r
2804     }\r
2805 \r
2806     static MainFrame createInstance( final Phylogeny[] phys, final String config_file_name, final String title ) {\r
2807         return new MainFrameApplication( phys, config_file_name, title );\r
2808     }\r
2809 \r
2810     static void setTextForGraphicsSizeChooserMenuItem( final JMenuItem mi, final Options o ) {\r
2811         mi.setText( "Enter Default Size for Graphics Export... (current: " + o.getPrintSizeX() + ", "\r
2812                 + o.getPrintSizeY() + ")" );\r
2813     }\r
2814 \r
2815     static void setTextForPdfLineWidthChooserMenuItem( final JMenuItem mi, final Options o ) {\r
2816         mi.setText( "Enter Default Line Width for PDF Export... (current: " + o.getPrintLineWidth() + ")" );\r
2817     }\r
2818 \r
2819     static void warnIfNotPhyloXmlValidation( final Configuration c ) {\r
2820         if ( !c.isValidatePhyloXmlAgainstSchema() ) {\r
2821             JOptionPane\r
2822                     .showMessageDialog( null,\r
2823                                         ForesterUtil\r
2824                                                 .wordWrap( "phyloXML XSD-based validation is turned off [enable with line 'validate_against_phyloxml_xsd_schem: true' in configuration file]",\r
2825                                                            80 ),\r
2826                                         "Warning",\r
2827                                         JOptionPane.WARNING_MESSAGE );\r
2828         }\r
2829     }\r
2830 } // MainFrameApplication.\r
2831 \r
2832 class DefaultFilter extends FileFilter {\r
2833 \r
2834     @Override\r
2835     public boolean accept( final File f ) {\r
2836         final String file_name = f.getName().trim().toLowerCase();\r
2837         return file_name.endsWith( ".nh" ) || file_name.endsWith( ".newick" ) || file_name.endsWith( ".phy" )\r
2838                 || file_name.endsWith( ".nwk" ) || file_name.endsWith( ".phb" ) || file_name.endsWith( ".ph" )\r
2839                 || file_name.endsWith( ".tr" ) || file_name.endsWith( ".dnd" ) || file_name.endsWith( ".tree" )\r
2840                 || file_name.endsWith( ".nhx" ) || file_name.endsWith( ".xml" ) || file_name.endsWith( ".phyloxml" )\r
2841                 || file_name.endsWith( "phylo.xml" ) || file_name.endsWith( ".pxml" ) || file_name.endsWith( ".nexus" )\r
2842                 || file_name.endsWith( ".nx" ) || file_name.endsWith( ".nex" ) || file_name.endsWith( ".tre" )\r
2843                 || file_name.endsWith( ".zip" ) || file_name.endsWith( ".tol" ) || file_name.endsWith( ".tolxml" )\r
2844                 || file_name.endsWith( ".con" ) || f.isDirectory();\r
2845     }\r
2846 \r
2847     @Override\r
2848     public String getDescription() {\r
2849         return "All supported files (*.xml, *.phyloxml, *phylo.xml, *.nhx, *.nh, *.newick, *.nex, *.nexus, *.phy, *.tre, *.tree, *.tol, ...)";\r
2850     }\r
2851 }\r
2852 \r
2853 class GraphicsFileFilter extends FileFilter {\r
2854 \r
2855     @Override\r
2856     public boolean accept( final File f ) {\r
2857         final String file_name = f.getName().trim().toLowerCase();\r
2858         return file_name.endsWith( ".jpg" ) || file_name.endsWith( ".jpeg" ) || file_name.endsWith( ".png" )\r
2859                 || file_name.endsWith( ".gif" ) || file_name.endsWith( ".bmp" ) || f.isDirectory();\r
2860     }\r
2861 \r
2862     @Override\r
2863     public String getDescription() {\r
2864         return "Image files (*.jpg, *.jpeg, *.png, *.gif, *.bmp)";\r
2865     }\r
2866 }\r
2867 \r
2868 class MsaFileFilter extends FileFilter {\r
2869 \r
2870     @Override\r
2871     public boolean accept( final File f ) {\r
2872         final String file_name = f.getName().trim().toLowerCase();\r
2873         return file_name.endsWith( ".msa" ) || file_name.endsWith( ".aln" ) || file_name.endsWith( ".fasta" )\r
2874                 || file_name.endsWith( ".fas" ) || file_name.endsWith( ".fa" ) || f.isDirectory();\r
2875     }\r
2876 \r
2877     @Override\r
2878     public String getDescription() {\r
2879         return "Multiple sequence alignment files (*.msa, *.aln, *.fasta, *.fa, *.fas)";\r
2880     }\r
2881 }\r
2882 \r
2883 class NexusFilter extends FileFilter {\r
2884 \r
2885     @Override\r
2886     public boolean accept( final File f ) {\r
2887         final String file_name = f.getName().trim().toLowerCase();\r
2888         return file_name.endsWith( ".nex" ) || file_name.endsWith( ".nexus" ) || file_name.endsWith( ".nx" )\r
2889                 || file_name.endsWith( ".tre" ) || f.isDirectory();\r
2890     }\r
2891 \r
2892     @Override\r
2893     public String getDescription() {\r
2894         return "Nexus files (*.nex, *.nexus, *.nx, *.tre)";\r
2895     }\r
2896 } // NexusFilter\r
2897 \r
2898 class NHFilter extends FileFilter {\r
2899 \r
2900     @Override\r
2901     public boolean accept( final File f ) {\r
2902         final String file_name = f.getName().trim().toLowerCase();\r
2903         return file_name.endsWith( ".nh" ) || file_name.endsWith( ".newick" ) || file_name.endsWith( ".phy" )\r
2904                 || file_name.endsWith( ".tr" ) || file_name.endsWith( ".tree" ) || file_name.endsWith( ".dnd" )\r
2905                 || file_name.endsWith( ".ph" ) || file_name.endsWith( ".phb" ) || file_name.endsWith( ".nwk" )\r
2906                 || f.isDirectory();\r
2907     }\r
2908 \r
2909     @Override\r
2910     public String getDescription() {\r
2911         return "New Hampshire - Newick files (*.nh, *.newick, *.phy, *.tree, *.dnd, *.tr, *.ph, *.phb, *.nwk)";\r
2912     }\r
2913 } // NHFilter\r
2914 \r
2915 class NHXFilter extends FileFilter {\r
2916 \r
2917     @Override\r
2918     public boolean accept( final File f ) {\r
2919         final String file_name = f.getName().trim().toLowerCase();\r
2920         return file_name.endsWith( ".nhx" ) || f.isDirectory();\r
2921     }\r
2922 \r
2923     @Override\r
2924     public String getDescription() {\r
2925         return "NHX files (*.nhx) [deprecated]";\r
2926     }\r
2927 }\r
2928 \r
2929 class PdfFilter extends FileFilter {\r
2930 \r
2931     @Override\r
2932     public boolean accept( final File f ) {\r
2933         return f.getName().trim().toLowerCase().endsWith( ".pdf" ) || f.isDirectory();\r
2934     }\r
2935 \r
2936     @Override\r
2937     public String getDescription() {\r
2938         return "PDF files (*.pdf)";\r
2939     }\r
2940 } // PdfFilter\r
2941 \r
2942 class SequencesFileFilter extends FileFilter {\r
2943 \r
2944     @Override\r
2945     public boolean accept( final File f ) {\r
2946         final String file_name = f.getName().trim().toLowerCase();\r
2947         return file_name.endsWith( ".fasta" ) || file_name.endsWith( ".fa" ) || file_name.endsWith( ".fas" )\r
2948                 || file_name.endsWith( ".seqs" ) || f.isDirectory();\r
2949     }\r
2950 \r
2951     @Override\r
2952     public String getDescription() {\r
2953         return "Sequences files (*.fasta, *.fa, *.fas, *.seqs )";\r
2954     }\r
2955 }\r
2956 \r
2957 class TolFilter extends FileFilter {\r
2958 \r
2959     @Override\r
2960     public boolean accept( final File f ) {\r
2961         final String file_name = f.getName().trim().toLowerCase();\r
2962         return ( file_name.endsWith( ".tol" ) || file_name.endsWith( ".tolxml" ) || file_name.endsWith( ".zip" ) || f\r
2963                 .isDirectory() ) && ( !file_name.endsWith( ".xml.zip" ) );\r
2964     }\r
2965 \r
2966     @Override\r
2967     public String getDescription() {\r
2968         return "Tree of Life files (*.tol, *.tolxml)";\r
2969     }\r
2970 } // TolFilter\r
2971 \r
2972 class XMLFilter extends FileFilter {\r
2973 \r
2974     @Override\r
2975     public boolean accept( final File f ) {\r
2976         final String file_name = f.getName().trim().toLowerCase();\r
2977         return file_name.endsWith( ".xml" ) || file_name.endsWith( ".phyloxml" ) || file_name.endsWith( "phylo.xml" )\r
2978                 || file_name.endsWith( ".pxml" ) || file_name.endsWith( ".zip" ) || f.isDirectory();\r
2979     }\r
2980 \r
2981     @Override\r
2982     public String getDescription() {\r
2983         return "phyloXML files (*.xml, *.phyloxml, *phylo.xml, *.pxml, *.zip)";\r
2984     }\r
2985 } // XMLFilter\r