1 /* @source entrails application
2 **
3 ** Show EMBOSS internals
4 **
5 ** @author Copyright (C) Peter Rice
6 ** @@
7 **
8 ** This program is free software; you can redistribute it and/or
9 ** modify it under the terms of the GNU General Public License
10 ** as published by the Free Software Foundation; either version 2
11 ** of the License, or (at your option) any later version.
12 **
13 ** This program is distributed in the hope that it will be useful,
14 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
15 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 ** GNU General Public License for more details.
17 **
18 ** You should have received a copy of the GNU General Public License
19 ** along with this program; if not, write to the Free Software
20 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 ******************************************************************************/
22 #include "emboss.h"
23
24
25
26
27 /* @prog entrailshtml *********************************************************
28 **
29 ** Reports internal data structures in HTML
30 **
31 ******************************************************************************/
32
main(int argc,char ** argv)33 int main(int argc, char **argv)
34 {
35
36 AjPFile outf;
37 AjBool doall = ajFalse;
38 AjPStr *tables = NULL;
39 ajuint i;
40
41 embInit("entrailshtml", argc, argv);
42
43 outf = ajAcdGetOutfile("outfile");
44 tables = ajAcdGetList("tables");
45
46 for(i=0;tables[i];i++)
47 {
48 if(ajStrMatchC(tables[i], "all"))
49 doall = ajTrue;
50
51 if(doall || ajStrMatchC(tables[i], "inseq"))
52 ajSeqPrinthtmlInFormat(outf);
53
54 if(doall || ajStrMatchC(tables[i], "outseq"))
55 ajSeqoutPrinthtmlFormat(outf);
56
57 if(doall || ajStrMatchC(tables[i], "infeat"))
58 ajFeatinPrinthtmlFormat(outf);
59
60 if(doall || ajStrMatchC(tables[i], "outfeat"))
61 ajFeatoutPrinthtmlFormat(outf);
62
63 if(doall || ajStrMatchC(tables[i], "report"))
64 ajReportPrinthtmlFormat(outf);
65
66 if(doall || ajStrMatchC(tables[i], "align"))
67 ajAlignPrinthtmlFormat(outf);
68
69 if(doall || ajStrMatchC(tables[i], "assembly"))
70 {
71 ajAsseminprintHtml(outf);
72 ajAssemoutprintHtml(outf);
73 }
74
75 if(doall || ajStrMatchC(tables[i], "resource"))
76 {
77 ajResourceinprintHtml(outf);
78 ajResourceoutprintHtml(outf);
79 }
80
81 if(doall || ajStrMatchC(tables[i], "taxonomy"))
82 {
83 ajTaxinprintHtml(outf);
84 ajTaxoutprintHtml(outf);
85 }
86 }
87
88 ajFileClose(&outf);
89
90 embExit();
91
92 return 0;
93 }
94