in progress
[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                     final String gn = db_entry.getGeneName().replace( ' ', '_' );
245                     try {
246                         seq.setSymbol( gn );
247                     }
248                     catch ( PhyloXmlDataFormatException e ) {
249                         // Eat this exception.
250                     }
251                 }
252                 if ( !ForesterUtil.isEmpty( db_entry.getGeneName() ) ) {
253                   //  seq.addAnnotation( new Annotation( "GN", db_entry.getGeneName() ) );
254                 }
255                 if ( db_entry.getGoTerms() != null &&  !db_entry.getGoTerms().isEmpty() ) {
256                     for( final GoTerm go : db_entry.getGoTerms() ) {
257                         seq.addAnnotation( new Annotation( go.getGoId().getId(), go.getName() ) );
258                     }
259                 }
260                 
261                 final Taxonomy tax = node.getNodeData().isHasTaxonomy() ? node.getNodeData().getTaxonomy()
262                         : new Taxonomy();
263                 if ( !ForesterUtil.isEmpty( db_entry.getTaxonomyScientificName() ) ) {
264                     tax.setScientificName( db_entry.getTaxonomyScientificName() );
265                 }
266                 if ( allow_to_set_taxonomic_data && !ForesterUtil.isEmpty( db_entry.getTaxonomyIdentifier() ) ) {
267                     tax.setIdentifier( new Identifier( db_entry.getTaxonomyIdentifier(), "uniprot" ) );
268                 }
269                 node.getNodeData().setTaxonomy( tax );
270                 node.getNodeData().setSequence( seq );
271             }
272             else if ( db != Db.NONE ) {
273                 not_found.add( node.getName() );
274             }
275             try {
276                 Thread.sleep( 10 );// Sleep for 10 ms
277             }
278             catch ( final InterruptedException ie ) {
279             }
280         }
281         return not_found;
282     }
283
284     public static SequenceDatabaseEntry obtainUniProtEntry( final String query, final int max_lines_to_return )
285             throws IOException {
286         final List<String> lines = queryUniprot( "uniprot/" + query + ".txt", max_lines_to_return );
287         return UniProtEntry.createInstanceFromPlainText( lines );
288     }
289
290     public static List<String> queryDb( final String query, int max_lines_to_return, final String base_url )
291             throws IOException {
292         if ( ForesterUtil.isEmpty( query ) ) {
293             throw new IllegalArgumentException( "illegal attempt to use empty query " );
294         }
295         if ( max_lines_to_return < 1 ) {
296             max_lines_to_return = 1;
297         }
298         final URL url = new URL( base_url + query );
299         if ( DEBUG ) {
300             System.out.println( "url: " + url.toString() );
301         }
302         final URLConnection urlc = url.openConnection();
303         final BufferedReader in = new BufferedReader( new InputStreamReader( urlc.getInputStream() ) );
304         String line;
305         final List<String> result = new ArrayList<String>();
306         while ( ( line = in.readLine() ) != null ) {
307             if ( DEBUG ) {
308                 System.out.println( line );
309             }
310             result.add( line );
311             if ( result.size() > max_lines_to_return ) {
312                 break;
313             }
314         }
315         in.close();
316         try {
317             // To prevent accessing online dbs in too quick succession. 
318             Thread.sleep( 20 );
319         }
320         catch ( final InterruptedException e ) {
321             e.printStackTrace();
322         }
323         return result;
324     }
325
326     public static List<String> queryEmblDb( final Identifier id, final int max_lines_to_return ) throws IOException {
327         final StringBuilder url_sb = new StringBuilder();
328         url_sb.append( BASE_EMBL_DB_URL );
329         if ( ForesterUtil.isEmpty( id.getProvider() ) || id.getProvider().equalsIgnoreCase( Identifier.NCBI ) ) {
330             url_sb.append( SequenceDbWsTools.EMBL_DBS_EMBL );
331             url_sb.append( '/' );
332         }
333         else if ( id.getProvider().equalsIgnoreCase( Identifier.REFSEQ ) ) {
334             if ( id.getValue().toUpperCase().indexOf( 'P' ) == 1 ) {
335                 url_sb.append( SequenceDbWsTools.EMBL_DBS_REFSEQ_P );
336                 url_sb.append( '/' );
337             }
338             else {
339                 url_sb.append( SequenceDbWsTools.EMBL_DBS_REFSEQ_N );
340                 url_sb.append( '/' );
341             }
342         }
343         return queryDb( id.getValue(), max_lines_to_return, url_sb.toString() );
344     }
345
346     public static List<String> queryUniprot( final String query, final int max_lines_to_return ) throws IOException {
347         return queryDb( query, max_lines_to_return, BASE_UNIPROT_URL );
348     }
349
350     private static String encode( final String str ) throws UnsupportedEncodingException {
351         return URLEncoder.encode( str.trim(), URL_ENC );
352     }
353
354     private static List<String> getTaxonomyStringFromCommonName( final String cn, final int max_lines_to_return )
355             throws IOException {
356         return queryUniprot( "taxonomy/?query=common%3a%22" + encode( cn ) + "%22&format=tab", max_lines_to_return );
357     }
358
359     private static List<String> getTaxonomyStringFromId( final String id, final int max_lines_to_return )
360             throws IOException {
361         return queryUniprot( "taxonomy/?query=id%3a%22" + encode( id ) + "%22&format=tab", max_lines_to_return );
362     }
363
364     private static List<String> getTaxonomyStringFromScientificName( final String sn, final int max_lines_to_return )
365             throws IOException {
366         return queryUniprot( "taxonomy/?query=scientific%3a%22" + encode( sn ) + "%22&format=tab", max_lines_to_return );
367     }
368
369     private static List<String> getTaxonomyStringFromTaxonomyCode( final String code, final int max_lines_to_return )
370             throws IOException {
371         return queryUniprot( "taxonomy/?query=mnemonic%3a%22" + encode( code ) + "%22&format=tab", max_lines_to_return );
372     }
373
374     private static List<UniProtTaxonomy> parseUniProtTaxonomy( final List<String> result ) throws IOException {
375         final List<UniProtTaxonomy> taxonomies = new ArrayList<UniProtTaxonomy>();
376         for( final String line : result ) {
377             if ( ForesterUtil.isEmpty( line ) ) {
378                 // Ignore empty lines.
379             }
380             else if ( line.startsWith( "Taxon" ) ) {
381                 final String[] items = line.split( "\t" );
382                 if ( !( items[ 1 ].equalsIgnoreCase( "Mnemonic" ) && items[ 2 ].equalsIgnoreCase( "Scientific name" )
383                         && items[ 3 ].equalsIgnoreCase( "Common name" ) && items[ 4 ].equalsIgnoreCase( "Synonym" )
384                         && items[ 5 ].equalsIgnoreCase( "Other Names" ) && items[ 6 ].equalsIgnoreCase( "Reviewed" )
385                         && items[ 7 ].equalsIgnoreCase( "Rank" ) && items[ 8 ].equalsIgnoreCase( "Lineage" ) ) ) {
386                     throw new IOException( "Unreconized UniProt Taxonomy format: " + line );
387                 }
388             }
389             else {
390                 if ( line.split( "\t" ).length > 4 ) {
391                     taxonomies.add( new UniProtTaxonomy( line ) );
392                 }
393             }
394         }
395         return taxonomies;
396     }
397
398     public enum Db {
399         UNIPROT, EMBL, NCBI, NONE, REFSEQ;
400     }
401 }