f28a8f126fba7eeaaaa178adffeebc25cd74e9e0
[jalview.git] / forester / java / src / org / forester / ws / seqdb / SequenceDbWsTools.java
1 // $Id:
2 // forester -- software libraries and applications
3 // for genomics and evolutionary biology research.
4 //
5 // Copyright (C) 2010 Christian M Zmasek
6 // Copyright (C) 2010 Sanford-Burnham Medical Research Institute
7 // All rights reserved
8 //
9 // This library is free software; you can redistribute it and/or
10 // modify it under the terms of the GNU Lesser General Public
11 // License as published by the Free Software Foundation; either
12 // version 2.1 of the License, or (at your option) any later version.
13 //
14 // This library is distributed in the hope that it will be useful,
15 // but WITHOUT ANY WARRANTY; without even the implied warranty of
16 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 // Lesser General Public License for more details.
18 //
19 // You should have received a copy of the GNU Lesser General Public
20 // License along with this library; if not, write to the Free Software
21 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
22 //
23 // Contact: phylosoft @ gmail . com
24 // WWW: https://sites.google.com/site/cmzmasek/home/software/forester
25
26 package org.forester.ws.seqdb;
27
28 import java.io.BufferedReader;
29 import java.io.IOException;
30 import java.io.InputStreamReader;
31 import java.io.UnsupportedEncodingException;
32 import java.net.URL;
33 import java.net.URLConnection;
34 import java.net.URLEncoder;
35 import java.util.ArrayList;
36 import java.util.List;
37 import java.util.SortedSet;
38 import java.util.TreeSet;
39
40 import org.forester.go.GoTerm;
41 import org.forester.io.parsers.phyloxml.PhyloXmlDataFormatException;
42 import org.forester.phylogeny.Phylogeny;
43 import org.forester.phylogeny.PhylogenyNode;
44 import org.forester.phylogeny.data.Accession;
45 import org.forester.phylogeny.data.Annotation;
46 import org.forester.phylogeny.data.Identifier;
47 import org.forester.phylogeny.data.Sequence;
48 import org.forester.phylogeny.data.Taxonomy;
49 import org.forester.phylogeny.iterators.PhylogenyNodeIterator;
50 import org.forester.util.ForesterUtil;
51 import org.forester.util.SequenceIdParser;
52
53 public final class SequenceDbWsTools {
54
55     public final static String   BASE_UNIPROT_URL  = "http://www.uniprot.org/";
56     public final static String   BASE_EMBL_DB_URL  = "http://www.ebi.ac.uk/Tools/dbfetch/dbfetch/";
57     public final static String   EMBL_DBS_EMBL     = "embl";
58     public final static String   EMBL_DBS_REFSEQ_P = "refseqp";
59     public final static String   EMBL_DBS_REFSEQ_N = "refseqn";
60     private final static String  URL_ENC           = "UTF-8";
61     private final static boolean DEBUG             = false;
62
63     private static List<UniProtTaxonomy> getTaxonomiesFromCommonName( final String cn, final int max_taxonomies_return )
64             throws IOException {
65         final List<String> result = getTaxonomyStringFromCommonName( cn, max_taxonomies_return );
66         if ( result.size() > 0 ) {
67             return parseUniProtTaxonomy( result );
68         }
69         return null;
70     }
71
72     public static List<UniProtTaxonomy> getTaxonomiesFromCommonNameStrict( final String cn,
73                                                                            final int max_taxonomies_return )
74             throws IOException {
75         final List<UniProtTaxonomy> taxonomies = getTaxonomiesFromCommonName( cn, max_taxonomies_return );
76         if ( ( taxonomies != null ) && ( taxonomies.size() > 0 ) ) {
77             final List<UniProtTaxonomy> filtered_taxonomies = new ArrayList<UniProtTaxonomy>();
78             for( final UniProtTaxonomy taxonomy : taxonomies ) {
79                 if ( taxonomy.getCommonName().equalsIgnoreCase( cn ) ) {
80                     filtered_taxonomies.add( taxonomy );
81                 }
82             }
83             return filtered_taxonomies;
84         }
85         return null;
86     }
87
88     public static List<UniProtTaxonomy> getTaxonomiesFromId( final String id, final int max_taxonomies_return )
89             throws IOException {
90         final List<String> result = getTaxonomyStringFromId( id, max_taxonomies_return );
91         if ( result.size() > 0 ) {
92             return parseUniProtTaxonomy( result );
93         }
94         return null;
95     }
96
97     private static List<UniProtTaxonomy> getTaxonomiesFromScientificName( final String sn,
98                                                                           final int max_taxonomies_return )
99             throws IOException {
100         final List<String> result = getTaxonomyStringFromScientificName( sn, max_taxonomies_return );
101         if ( result.size() > 0 ) {
102             return parseUniProtTaxonomy( result );
103         }
104         return null;
105     }
106
107     /**
108      * Does not return "sub-types".
109      * For example, for "Mus musculus" only returns "Mus musculus"
110      * and not "Mus musculus", "Mus musculus bactrianus", ...
111      * 
112      */
113     public static List<UniProtTaxonomy> getTaxonomiesFromScientificNameStrict( final String sn,
114                                                                                final int max_taxonomies_return )
115             throws IOException {
116         final List<UniProtTaxonomy> taxonomies = getTaxonomiesFromScientificName( sn, max_taxonomies_return );
117         if ( ( taxonomies != null ) && ( taxonomies.size() > 0 ) ) {
118             final List<UniProtTaxonomy> filtered_taxonomies = new ArrayList<UniProtTaxonomy>();
119             for( final UniProtTaxonomy taxonomy : taxonomies ) {
120                 if ( taxonomy.getScientificName().equalsIgnoreCase( sn ) ) {
121                     filtered_taxonomies.add( taxonomy );
122                 }
123             }
124             return filtered_taxonomies;
125         }
126         return null;
127     }
128
129     public static List<UniProtTaxonomy> getTaxonomiesFromTaxonomyCode( final String code,
130                                                                        final int max_taxonomies_return )
131             throws IOException {
132         final String my_code = new String( code );
133         final List<String> result = getTaxonomyStringFromTaxonomyCode( my_code, max_taxonomies_return );
134         if ( result.size() > 0 ) {
135             return parseUniProtTaxonomy( result );
136         }
137         return null;
138     }
139
140     public static SequenceDatabaseEntry obtainEmblEntry( final Identifier id, final int max_lines_to_return )
141             throws IOException {
142         final List<String> lines = queryEmblDb( id, max_lines_to_return );
143         return EbiDbEntry.createInstanceFromPlainText( lines );
144     }
145
146     public static SequenceDatabaseEntry obtainRefSeqEntryFromEmbl( final Identifier id, final int max_lines_to_return )
147             throws IOException {
148         final List<String> lines = queryEmblDb( id, max_lines_to_return );
149         return EbiDbEntry.createInstanceFromPlainTextForRefSeq( lines );
150     }
151
152     public static SortedSet<String> obtainSeqInformation( final Phylogeny phy,
153                                                           final boolean ext_nodes_only,
154                                                           final boolean allow_to_set_taxonomic_data,
155                                                           final int lines_to_return ) throws IOException {
156         final SortedSet<String> not_found = new TreeSet<String>();
157         for( final PhylogenyNodeIterator iter = phy.iteratorPostorder(); iter.hasNext(); ) {
158             final PhylogenyNode node = iter.next();
159             if ( ext_nodes_only && node.isInternal() ) {
160                 continue;
161             }
162             String query = null;
163             Identifier id = null;
164             Db db = Db.NONE;
165             if ( node.getNodeData().isHasSequence() && ( node.getNodeData().getSequence().getAccession() != null )
166                     && !ForesterUtil.isEmpty( node.getNodeData().getSequence().getAccession().getSource() )
167                     && !ForesterUtil.isEmpty( node.getNodeData().getSequence().getAccession().getValue() )
168                     && node.getNodeData().getSequence().getAccession().getValue().toLowerCase().startsWith( "uniprot" ) ) {
169                 query = node.getNodeData().getSequence().getAccession().getValue();
170                 db = Db.UNIPROT;
171             }
172             else if ( node.getNodeData().isHasSequence()
173                     && ( node.getNodeData().getSequence().getAccession() != null )
174                     && !ForesterUtil.isEmpty( node.getNodeData().getSequence().getAccession().getSource() )
175                     && !ForesterUtil.isEmpty( node.getNodeData().getSequence().getAccession().getValue() )
176                     && ( node.getNodeData().getSequence().getAccession().getValue().toLowerCase().startsWith( "embl" ) || node
177                             .getNodeData().getSequence().getAccession().getValue().toLowerCase().startsWith( "ebi" ) ) ) {
178                 query = node.getNodeData().getSequence().getAccession().getValue();
179                 db = Db.EMBL;
180             }
181             else if ( !ForesterUtil.isEmpty( node.getName() ) ) {
182                 if ( ( query = ForesterUtil.extractUniProtKbProteinSeqIdentifier( node ) ) != null ) {
183                     db = Db.UNIPROT;
184                 }
185                 else if ( ( id = SequenceIdParser.parse( node.getName() ) ) != null ) {
186                     if ( id.getProvider().equalsIgnoreCase( Identifier.NCBI ) ) {
187                         db = Db.NCBI;
188                     }
189                     else if ( id.getProvider().equalsIgnoreCase( Identifier.REFSEQ ) ) {
190                         db = Db.REFSEQ;
191                     }
192                 }
193             }
194             if ( db == Db.NONE ) {
195                 not_found.add( node.getName() );
196             }
197             SequenceDatabaseEntry db_entry = null;
198             if ( !ForesterUtil.isEmpty( query ) ) {
199                 if ( db == Db.UNIPROT ) {
200                     if ( DEBUG ) {
201                         System.out.println( "uniprot: " + query );
202                     }
203                     db_entry = obtainUniProtEntry( query, lines_to_return );
204                 }
205                 if ( ( db == Db.EMBL ) || ( ( db == Db.UNIPROT ) && ( db_entry == null ) ) ) {
206                     if ( DEBUG ) {
207                         System.out.println( "embl: " + query );
208                     }
209                     db_entry = obtainEmblEntry( new Identifier( query ), lines_to_return );
210                     if ( ( db == Db.UNIPROT ) && ( db_entry != null ) ) {
211                         db = Db.EMBL;
212                     }
213                 }
214             }
215             else if ( ( db == Db.REFSEQ ) && ( id != null ) ) {
216                 db_entry = obtainRefSeqEntryFromEmbl( id, lines_to_return );
217             }
218             else if ( ( db == Db.NCBI ) && ( id != null ) ) {
219                 db_entry = obtainEmblEntry( id, lines_to_return ); //TODO ?
220             }
221             if ( ( db_entry != null ) && !db_entry.isEmpty() ) {
222                 final Sequence seq = node.getNodeData().isHasSequence() ? node.getNodeData().getSequence()
223                         : new Sequence();
224                 if ( !ForesterUtil.isEmpty( db_entry.getAccession() ) ) {
225                     String type = null;
226                     if ( db == Db.EMBL ) {
227                         type = "embl";
228                     }
229                     else if ( db == Db.UNIPROT ) {
230                         type = "uniprot";
231                     }
232                     else if ( db == Db.NCBI ) {
233                         type = "ncbi";
234                     }
235                     else if ( db == Db.REFSEQ ) {
236                         type = "refseq";
237                     }
238                     seq.setAccession( new Accession( db_entry.getAccession(), type ) );
239                 }
240                 if ( !ForesterUtil.isEmpty( db_entry.getSequenceName() ) ) {
241                     seq.setName( db_entry.getSequenceName() );
242                 }
243                 if ( !ForesterUtil.isEmpty( db_entry.getGeneName() ) ) {
244                     try {
245                         seq.setSymbol( db_entry.getGeneName() );
246                     }
247                     catch ( PhyloXmlDataFormatException e ) {
248                         // Eat this exception.
249                     }
250                 }
251                 if ( !ForesterUtil.isEmpty( db_entry.getGeneName() ) ) {
252                   //  seq.addAnnotation( new Annotation( "GN", db_entry.getGeneName() ) );
253                 }
254                 if ( db_entry.getGoTerms() != null &&  !db_entry.getGoTerms().isEmpty() ) {
255                     for( final GoTerm go : db_entry.getGoTerms() ) {
256                         seq.addAnnotation( new Annotation( go.getGoId().getId(), go.getName() ) );
257                     }
258                 }
259                 
260                 final Taxonomy tax = node.getNodeData().isHasTaxonomy() ? node.getNodeData().getTaxonomy()
261                         : new Taxonomy();
262                 if ( !ForesterUtil.isEmpty( db_entry.getTaxonomyScientificName() ) ) {
263                     tax.setScientificName( db_entry.getTaxonomyScientificName() );
264                 }
265                 if ( allow_to_set_taxonomic_data && !ForesterUtil.isEmpty( db_entry.getTaxonomyIdentifier() ) ) {
266                     tax.setIdentifier( new Identifier( db_entry.getTaxonomyIdentifier(), "uniprot" ) );
267                 }
268                 node.getNodeData().setTaxonomy( tax );
269                 node.getNodeData().setSequence( seq );
270             }
271             else if ( db != Db.NONE ) {
272                 not_found.add( node.getName() );
273             }
274             try {
275                 Thread.sleep( 10 );// Sleep for 10 ms
276             }
277             catch ( final InterruptedException ie ) {
278             }
279         }
280         return not_found;
281     }
282
283     public static SequenceDatabaseEntry obtainUniProtEntry( final String query, final int max_lines_to_return )
284             throws IOException {
285         final List<String> lines = queryUniprot( "uniprot/" + query + ".txt", max_lines_to_return );
286         return UniProtEntry.createInstanceFromPlainText( lines );
287     }
288
289     public static List<String> queryDb( final String query, int max_lines_to_return, final String base_url )
290             throws IOException {
291         if ( ForesterUtil.isEmpty( query ) ) {
292             throw new IllegalArgumentException( "illegal attempt to use empty query " );
293         }
294         if ( max_lines_to_return < 1 ) {
295             max_lines_to_return = 1;
296         }
297         final URL url = new URL( base_url + query );
298         if ( DEBUG ) {
299             System.out.println( "url: " + url.toString() );
300         }
301         final URLConnection urlc = url.openConnection();
302         final BufferedReader in = new BufferedReader( new InputStreamReader( urlc.getInputStream() ) );
303         String line;
304         final List<String> result = new ArrayList<String>();
305         while ( ( line = in.readLine() ) != null ) {
306             if ( DEBUG ) {
307                 System.out.println( line );
308             }
309             result.add( line );
310             if ( result.size() > max_lines_to_return ) {
311                 break;
312             }
313         }
314         in.close();
315         try {
316             // To prevent accessing online dbs in too quick succession. 
317             Thread.sleep( 20 );
318         }
319         catch ( final InterruptedException e ) {
320             e.printStackTrace();
321         }
322         return result;
323     }
324
325     public static List<String> queryEmblDb( final Identifier id, final int max_lines_to_return ) throws IOException {
326         final StringBuilder url_sb = new StringBuilder();
327         url_sb.append( BASE_EMBL_DB_URL );
328         if ( ForesterUtil.isEmpty( id.getProvider() ) || id.getProvider().equalsIgnoreCase( Identifier.NCBI ) ) {
329             url_sb.append( SequenceDbWsTools.EMBL_DBS_EMBL );
330             url_sb.append( '/' );
331         }
332         else if ( id.getProvider().equalsIgnoreCase( Identifier.REFSEQ ) ) {
333             if ( id.getValue().toUpperCase().indexOf( 'P' ) == 1 ) {
334                 url_sb.append( SequenceDbWsTools.EMBL_DBS_REFSEQ_P );
335                 url_sb.append( '/' );
336             }
337             else {
338                 url_sb.append( SequenceDbWsTools.EMBL_DBS_REFSEQ_N );
339                 url_sb.append( '/' );
340             }
341         }
342         return queryDb( id.getValue(), max_lines_to_return, url_sb.toString() );
343     }
344
345     public static List<String> queryUniprot( final String query, final int max_lines_to_return ) throws IOException {
346         return queryDb( query, max_lines_to_return, BASE_UNIPROT_URL );
347     }
348
349     private static String encode( final String str ) throws UnsupportedEncodingException {
350         return URLEncoder.encode( str.trim(), URL_ENC );
351     }
352
353     private static List<String> getTaxonomyStringFromCommonName( final String cn, final int max_lines_to_return )
354             throws IOException {
355         return queryUniprot( "taxonomy/?query=common%3a%22" + encode( cn ) + "%22&format=tab", max_lines_to_return );
356     }
357
358     private static List<String> getTaxonomyStringFromId( final String id, final int max_lines_to_return )
359             throws IOException {
360         return queryUniprot( "taxonomy/?query=id%3a%22" + encode( id ) + "%22&format=tab", max_lines_to_return );
361     }
362
363     private static List<String> getTaxonomyStringFromScientificName( final String sn, final int max_lines_to_return )
364             throws IOException {
365         return queryUniprot( "taxonomy/?query=scientific%3a%22" + encode( sn ) + "%22&format=tab", max_lines_to_return );
366     }
367
368     private static List<String> getTaxonomyStringFromTaxonomyCode( final String code, final int max_lines_to_return )
369             throws IOException {
370         return queryUniprot( "taxonomy/?query=mnemonic%3a%22" + encode( code ) + "%22&format=tab", max_lines_to_return );
371     }
372
373     private static List<UniProtTaxonomy> parseUniProtTaxonomy( final List<String> result ) throws IOException {
374         final List<UniProtTaxonomy> taxonomies = new ArrayList<UniProtTaxonomy>();
375         for( final String line : result ) {
376             if ( ForesterUtil.isEmpty( line ) ) {
377                 // Ignore empty lines.
378             }
379             else if ( line.startsWith( "Taxon" ) ) {
380                 final String[] items = line.split( "\t" );
381                 if ( !( items[ 1 ].equalsIgnoreCase( "Mnemonic" ) && items[ 2 ].equalsIgnoreCase( "Scientific name" )
382                         && items[ 3 ].equalsIgnoreCase( "Common name" ) && items[ 4 ].equalsIgnoreCase( "Synonym" )
383                         && items[ 5 ].equalsIgnoreCase( "Other Names" ) && items[ 6 ].equalsIgnoreCase( "Reviewed" )
384                         && items[ 7 ].equalsIgnoreCase( "Rank" ) && items[ 8 ].equalsIgnoreCase( "Lineage" ) ) ) {
385                     throw new IOException( "Unreconized UniProt Taxonomy format: " + line );
386                 }
387             }
388             else {
389                 if ( line.split( "\t" ).length > 4 ) {
390                     taxonomies.add( new UniProtTaxonomy( line ) );
391                 }
392             }
393         }
394         return taxonomies;
395     }
396
397     public enum Db {
398         UNIPROT, EMBL, NCBI, NONE, REFSEQ;
399     }
400 }