]> git.donarmstrong.com Git - mothur.git/blob - secondarystructurecommand.cpp
rewrote metastats command in c++, added mothurRemove function to handle ~ error....
[mothur.git] / secondarystructurecommand.cpp
1 /*
2  *  secondarystructurecommand.cpp
3  *  Mothur
4  *
5  *  Created by westcott on 9/18/09.
6  *  Copyright 2009 Schloss Lab. All rights reserved.
7  *
8  */
9
10 #include "secondarystructurecommand.h"
11 #include "sequence.hpp"
12
13 //**********************************************************************************************************************
14 vector<string> AlignCheckCommand::setParameters(){      
15         try {
16                 CommandParameter pfasta("fasta", "InputTypes", "", "", "none", "none", "none",false,true); parameters.push_back(pfasta);
17                 CommandParameter pmap("map", "InputTypes", "", "", "none", "none", "none",false,true); parameters.push_back(pmap);
18                 CommandParameter pinputdir("inputdir", "String", "", "", "", "", "",false,false); parameters.push_back(pinputdir);
19                 CommandParameter poutputdir("outputdir", "String", "", "", "", "", "",false,false); parameters.push_back(poutputdir);
20                 
21                 vector<string> myArray;
22                 for (int i = 0; i < parameters.size(); i++) {   myArray.push_back(parameters[i].name);          }
23                 return myArray;
24         }
25         catch(exception& e) {
26                 m->errorOut(e, "AlignCheckCommand", "setParameters");
27                 exit(1);
28         }
29 }
30 //**********************************************************************************************************************
31 string AlignCheckCommand::getHelpString(){      
32         try {
33                 string helpString = "";
34                 helpString += "The align.check command reads a fasta file and map file.\n";
35                 helpString += "It outputs a file containing the secondary structure matches in the .align.check file.\n";
36                 helpString += "The align.check command parameters are fasta and map, both are required.\n";
37                 helpString += "The align.check command should be in the following format: align.check(fasta=yourFasta, map=yourMap).\n";
38                 helpString += "Example align.check(map=silva.ss.map, fasta=amazon.fasta).\n";
39                 helpString += "Note: No spaces between parameter labels (i.e. fasta), '=' and parameters (i.e.yourFasta).\n";
40                 return helpString;
41         }
42         catch(exception& e) {
43                 m->errorOut(e, "AlignCheckCommand", "getHelpString");
44                 exit(1);
45         }
46 }
47 //**********************************************************************************************************************
48 AlignCheckCommand::AlignCheckCommand(){ 
49         try {
50                 abort = true; calledHelp = true; 
51                 setParameters();
52                 vector<string> tempOutNames;
53                 outputTypes["aligncheck"] = tempOutNames;
54         }
55         catch(exception& e) {
56                 m->errorOut(e, "AlignCheckCommand", "AlignCheckCommand");
57                 exit(1);
58         }
59 }
60 //**********************************************************************************************************************
61
62 AlignCheckCommand::AlignCheckCommand(string option)  {
63         try {
64                 abort = false; calledHelp = false;   
65                 haderror = 0;
66                         
67                 //allow user to run help
68                 if(option == "help") { help(); abort = true; calledHelp = true; }
69                 else if(option == "citation") { citation(); abort = true; calledHelp = true;}
70                 
71                 else {
72                         vector<string> myArray = setParameters();
73                         
74                         OptionParser parser(option);
75                         map<string,string> parameters = parser.getParameters();
76                         
77                         ValidParameters validParameter;
78                         map<string,string>::iterator it;
79                         
80                         //check to make sure all parameters are valid for command
81                         for (it = parameters.begin(); it != parameters.end(); it++) { 
82                                 if (validParameter.isValidParameter(it->first, myArray, it->second) != true) {  abort = true;  }
83                         }
84                         
85                         //initialize outputTypes
86                         vector<string> tempOutNames;
87                         outputTypes["aligncheck"] = tempOutNames;
88                         
89                         //if the user changes the input directory command factory will send this info to us in the output parameter 
90                         string inputDir = validParameter.validFile(parameters, "inputdir", false);              
91                         if (inputDir == "not found"){   inputDir = "";          }
92                         else {
93                                 string path;
94                                 it = parameters.find("fasta");
95                                 //user has given a template file
96                                 if(it != parameters.end()){ 
97                                         path = m->hasPath(it->second);
98                                         //if the user has not given a path then, add inputdir. else leave path alone.
99                                         if (path == "") {       parameters["fasta"] = inputDir + it->second;            }
100                                 }
101                                 
102                                 it = parameters.find("map");
103                                 //user has given a template file
104                                 if(it != parameters.end()){ 
105                                         path = m->hasPath(it->second);
106                                         //if the user has not given a path then, add inputdir. else leave path alone.
107                                         if (path == "") {       parameters["map"] = inputDir + it->second;              }
108                                 }
109                                 
110                                 it = parameters.find("name");
111                                 //user has given a template file
112                                 if(it != parameters.end()){ 
113                                         path = m->hasPath(it->second);
114                                         //if the user has not given a path then, add inputdir. else leave path alone.
115                                         if (path == "") {       parameters["name"] = inputDir + it->second;             }
116                                 }
117                         }
118
119                         //check for required parameters
120                         mapfile = validParameter.validFile(parameters, "map", true);
121                         if (mapfile == "not open") { abort = true; }
122                         else if (mapfile == "not found") {  mapfile = "";  m->mothurOut("You must provide an map file."); m->mothurOutEndLine(); abort = true; }        
123                         
124                         fastafile = validParameter.validFile(parameters, "fasta", true);
125                         if (fastafile == "not open") { abort = true; }
126                         else if (fastafile == "not found") {                            
127                                 fastafile = m->getFastaFile(); 
128                                 if (fastafile != "") { m->mothurOut("Using " + fastafile + " as input file for the fasta parameter."); m->mothurOutEndLine(); }
129                                 else {  m->mothurOut("You have no current fastafile and the fasta parameter is required."); m->mothurOutEndLine(); abort = true; }
130                         }else { m->setFastaFile(fastafile); }   
131                         
132                         namefile = validParameter.validFile(parameters, "name", true);
133                         if (namefile == "not open") { namefile = ""; abort = true; }
134                         else if (namefile == "not found") { namefile = "";  }   
135                         else { m->setNameFile(namefile); }
136                         
137                         //if the user changes the output directory command factory will send this info to us in the output parameter 
138                         outputDir = validParameter.validFile(parameters, "outputdir", false);           if (outputDir == "not found"){  
139                                 outputDir = ""; 
140                                 outputDir += m->hasPath(fastafile); //if user entered a file with a path then preserve it       
141                         }
142
143                 }
144
145         }
146         catch(exception& e) {
147                 m->errorOut(e, "AlignCheckCommand", "AlignCheckCommand");
148                 exit(1);
149         }
150 }
151 //**********************************************************************************************************************
152
153 int AlignCheckCommand::execute(){
154         try {
155                 
156                 if (abort == true) { if (calledHelp) { return 0; }  return 2;   }
157                 
158                 //get secondary structure info.
159                 readMap();
160                 
161                 if (namefile != "") { nameMap = m->readNames(namefile); }
162                 
163                 if (m->control_pressed) { return 0; }
164                 
165                 ifstream in;
166                 m->openInputFile(fastafile, in);
167                 
168                 ofstream out;
169                 string outfile = outputDir + m->getRootName(m->getSimpleName(fastafile)) + "align.check";
170                 m->openOutputFile(outfile, out);
171                 
172                                 
173                 out << "name" << '\t' << "pound" << '\t' << "dash" << '\t' << "plus" << '\t' << "equal" << '\t';
174                 out << "loop" << '\t' << "tilde" << '\t' << "total"  << '\t' << "numseqs" << endl;
175
176                 vector<int> pound;
177                 vector<int> dash;
178                 vector<int> plus;
179                 vector<int> equal;
180                 vector<int> loop;
181                 vector<int> tilde;
182                 vector<int> total;
183                 
184                 int count = 0;
185                 while(!in.eof()){
186                         if (m->control_pressed) { in.close(); out.close(); m->mothurRemove(outfile); return 0; }
187                         
188                         Sequence seq(in);  m->gobble(in);
189                         if (seq.getName() != "") {
190                                 statData data = getStats(seq.getAligned());
191                                 
192                                 if (haderror == 1) { m->control_pressed = true; break; }
193                                 
194                                 int num = 1;
195                                 if (namefile != "") {
196                                         //make sure this sequence is in the namefile, else error 
197                                         map<string, int>::iterator it = nameMap.find(seq.getName());
198                                         
199                                         if (it == nameMap.end()) { m->mothurOut("[ERROR]: " + seq.getName() + " is not in your namefile, please correct."); m->mothurOutEndLine(); m->control_pressed = true; }
200                                         else { num = it->second; }
201                                 }
202                                 
203                                 //for each sequence this sequence represents
204                                 for (int i = 0; i < num; i++) {
205                                         pound.push_back(data.pound);
206                                         dash.push_back(data.dash);
207                                         plus.push_back(data.plus);
208                                         equal.push_back(data.equal);
209                                         loop.push_back(data.loop);
210                                         tilde.push_back(data.tilde);
211                                         total.push_back(data.total);
212                                 }       
213                                 count++;
214                                 
215                                 out << seq.getName() << '\t' << data.pound << '\t' << data.dash << '\t' << data.plus << '\t' << data.equal << '\t';
216                                 out << data.loop << '\t' << data.tilde << '\t' << data.total << '\t' << num << endl;
217                         }
218                 }
219
220                 in.close();
221                 out.close();
222                 
223                 if (m->control_pressed) {  m->mothurRemove(outfile); return 0; }
224                 
225                 sort(pound.begin(), pound.end());
226                 sort(dash.begin(), dash.end());
227                 sort(plus.begin(), plus.end());
228                 sort(equal.begin(), equal.end());
229                 sort(loop.begin(), loop.end());
230                 sort(tilde.begin(), tilde.end());
231                 sort(total.begin(), total.end());
232                 int size = pound.size();
233                 
234                 int ptile0_25   = int(size * 0.025);
235                 int ptile25             = int(size * 0.250);
236                 int ptile50             = int(size * 0.500);
237                 int ptile75             = int(size * 0.750);
238                 int ptile97_5   = int(size * 0.975);
239                 int ptile100    = size - 1;
240                 
241                 if (m->control_pressed) {  m->mothurRemove(outfile); return 0; }
242                 
243                 m->mothurOutEndLine();
244                 m->mothurOut("\t\tPound\tDash\tPlus\tEqual\tLoop\tTilde\tTotal"); m->mothurOutEndLine();
245                 m->mothurOut("Minimum:\t" + toString(pound[0]) + "\t" + toString(dash[0]) + "\t" + toString(plus[0]) + "\t" + toString(equal[0]) + "\t" + toString(loop[0]) + "\t" + toString(tilde[0]) + "\t" + toString(total[0])); m->mothurOutEndLine();
246                 m->mothurOut("2.5%-tile:\t" + toString(pound[ptile0_25]) + "\t" + toString(dash[ptile0_25]) + "\t" + toString(plus[ptile0_25]) + "\t" + toString(equal[ptile0_25]) + "\t"+ toString(loop[ptile0_25]) + "\t"+ toString(tilde[ptile0_25]) + "\t"+ toString(total[ptile0_25])); m->mothurOutEndLine();
247                 m->mothurOut("25%-tile:\t" + toString(pound[ptile25]) + "\t" + toString(dash[ptile25]) + "\t" + toString(plus[ptile25]) + "\t" + toString(equal[ptile25]) + "\t" + toString(loop[ptile25]) + "\t" + toString(tilde[ptile25]) + "\t" + toString(total[ptile25])); m->mothurOutEndLine();
248                 m->mothurOut("Median: \t" + toString(pound[ptile50]) + "\t" + toString(dash[ptile50]) + "\t" + toString(plus[ptile50]) + "\t" + toString(equal[ptile50]) + "\t" + toString(loop[ptile50]) + "\t" + toString(tilde[ptile50]) + "\t" + toString(total[ptile50])); m->mothurOutEndLine();
249                 m->mothurOut("75%-tile:\t" + toString(pound[ptile75]) + "\t" + toString(dash[ptile75]) + "\t" + toString(plus[ptile75]) + "\t" + toString(equal[ptile75]) + "\t" + toString(loop[ptile75]) + "\t" + toString(tilde[ptile75]) + "\t" + toString(total[ptile75])); m->mothurOutEndLine();
250                 m->mothurOut("97.5%-tile:\t" + toString(pound[ptile97_5]) + "\t" + toString(dash[ptile97_5]) + "\t" + toString(plus[ptile97_5]) + "\t" + toString(equal[ptile97_5]) + "\t" + toString(loop[ptile97_5]) + "\t" + toString(tilde[ptile97_5]) + "\t" + toString(total[ptile97_5])); m->mothurOutEndLine();
251                 m->mothurOut("Maximum:\t" + toString(pound[ptile100]) + "\t" + toString(dash[ptile100]) + "\t" + toString(plus[ptile100]) + "\t" + toString(equal[ptile100]) + "\t" + toString(loop[ptile100]) + "\t" + toString(tilde[ptile100]) + "\t" + toString(total[ptile100])); m->mothurOutEndLine();
252                 if (namefile == "") {  m->mothurOut("# of Seqs:\t" + toString(count)); m->mothurOutEndLine(); }
253                 else { m->mothurOut("# of unique seqs:\t" + toString(count)); m->mothurOutEndLine(); m->mothurOut("total # of seqs:\t" + toString(size)); m->mothurOutEndLine(); }
254                 
255                 
256                 m->mothurOutEndLine();
257                 m->mothurOut("Output File Name: "); m->mothurOutEndLine();
258                 m->mothurOut(outfile); m->mothurOutEndLine();   outputNames.push_back(outfile); outputTypes["aligncheck"].push_back(outfile);
259                 m->mothurOutEndLine();
260                 
261                 return 0;               
262         }
263
264         catch(exception& e) {
265                 m->errorOut(e, "AlignCheckCommand", "execute");
266                 exit(1);
267         }
268 }
269 //**********************************************************************************************************************
270 void AlignCheckCommand::readMap(){
271         try {
272                         
273                 structMap.resize(1, 0);
274                 ifstream in;
275                 
276                 m->openInputFile(mapfile, in);
277                 
278                 while(!in.eof()){
279                         int position;
280                         in >> position;
281                         structMap.push_back(position);  
282                         m->gobble(in);
283                 }
284                 in.close();
285
286                 seqLength = structMap.size();
287                 
288                 
289                 //check you make sure is structMap[10] = 380 then structMap[380] = 10.
290                 for(int i=0;i<seqLength;i++){
291                         if(structMap[i] != 0){
292                                 if(structMap[structMap[i]] != i){
293                                         m->mothurOut("Your map file contains an error:  line " + toString(i) + " does not match line " + toString(structMap[i]) + "."); m->mothurOutEndLine();
294                                 }
295                         }
296                 }
297                 
298                 
299         }
300         catch(exception& e) {
301                 m->errorOut(e, "AlignCheckCommand", "readMap");
302                 exit(1);
303         }
304 }
305 /**************************************************************************************************/
306
307 statData AlignCheckCommand::getStats(string sequence){
308         try {
309         
310                 statData data;
311                 sequence = "*" + sequence; // need to pad the sequence so we can index it by 1
312                 
313                 int length = sequence.length();
314                 
315                 if (length != seqLength) { m->mothurOut("your sequences are " + toString(length) + " long, but your map file only contains " + toString(seqLength) + " entries. please correct."); m->mothurOutEndLine(); haderror = 1; return data;  }
316                 
317                 for(int i=1;i<length;i++){
318                         if(structMap[i] != 0){
319                                 if(sequence[i] == 'A'){
320                                         if(sequence[structMap[i]] == 'T')               {       data.tilde++;   }
321                                         else if(sequence[structMap[i]] == 'A')  {       data.pound++;   }
322                                         else if(sequence[structMap[i]] == 'G')  {       data.equal++;   }
323                                         else if(sequence[structMap[i]] == 'C')  {       data.pound++;   }
324                                         else if(sequence[structMap[i]] == '-')  {       data.pound++;   }
325                                         data.total++;
326                                 }
327                                 else if(sequence[i] == 'T'){
328                                         if(sequence[structMap[i]] == 'T')               {       data.plus++;    }
329                                         else if(sequence[structMap[i]] == 'A')  {       data.tilde++;   }
330                                         else if(sequence[structMap[i]] == 'G')  {       data.dash++;    }
331                                         else if(sequence[structMap[i]] == 'C')  {       data.pound++;   }
332                                         else if(sequence[structMap[i]] == '-')  {       data.pound++;   }
333                                         data.total++;
334                                 }
335                                 else if(sequence[i] == 'G'){
336                                         if(sequence[structMap[i]] == 'T')               {       data.dash++;    }
337                                         else if(sequence[structMap[i]] == 'A')  {       data.equal++;   }
338                                         else if(sequence[structMap[i]] == 'G')  {       data.pound++;   }
339                                         else if(sequence[structMap[i]] == 'C')  {       data.tilde++;   }
340                                         else if(sequence[structMap[i]] == '-')  {       data.pound++;   }
341                                         data.total++;
342                                 }
343                                 else if(sequence[i] == 'C'){
344                                         if(sequence[structMap[i]] == 'T')               {       data.pound++;   }
345                                         else if(sequence[structMap[i]] == 'A')  {       data.pound++;   }
346                                         else if(sequence[structMap[i]] == 'G')  {       data.tilde++;   }
347                                         else if(sequence[structMap[i]] == 'C')  {       data.pound++;   }
348                                         else if(sequence[structMap[i]] == '-')  {       data.pound++;   }
349                                         data.total++;
350                                 }
351                                 else if(sequence[i] == '-'){
352                                         if(sequence[structMap[i]] == 'T')               {       data.pound++;   data.total++;   }
353                                         else if(sequence[structMap[i]] == 'A')  {       data.pound++;   data.total++;   }
354                                         else if(sequence[structMap[i]] == 'G')  {       data.pound++;   data.total++;   }
355                                         else if(sequence[structMap[i]] == 'C')  {       data.pound++;   data.total++;   }
356                                         else if(sequence[structMap[i]] == '-')  {               /*donothing*/                           }
357                                 }                       
358                         }
359                         else if(isalnum(sequence[i])){
360                                 data.loop++;
361                                 data.total++;
362                         }
363                 }
364                 return data;
365                 
366         }
367         catch(exception& e) {
368                 m->errorOut(e, "AlignCheckCommand", "getStats");
369                 exit(1);
370         }
371 }
372 //**********************************************************************************************************************