]> git.donarmstrong.com Git - mothur.git/blob - removelineagecommand.cpp
added citation function to commands
[mothur.git] / removelineagecommand.cpp
1 /*
2  *  removelineagecommand.cpp
3  *  Mothur
4  *
5  *  Created by westcott on 9/24/10.
6  *  Copyright 2010 Schloss Lab. All rights reserved.
7  *
8  */
9
10 #include "removelineagecommand.h"
11 #include "sequence.hpp"
12 #include "listvector.hpp"
13
14 //**********************************************************************************************************************
15 vector<string> RemoveLineageCommand::setParameters(){   
16         try {
17                 CommandParameter pfasta("fasta", "InputTypes", "", "", "none", "FNGLT", "none",false,false); parameters.push_back(pfasta);
18                 CommandParameter pname("name", "InputTypes", "", "", "none", "FNGLT", "none",false,false); parameters.push_back(pname);
19                 CommandParameter pgroup("group", "InputTypes", "", "", "none", "FNGLT", "none",false,false); parameters.push_back(pgroup);
20                 CommandParameter plist("list", "InputTypes", "", "", "none", "FNGLT", "none",false,false); parameters.push_back(plist);
21                 CommandParameter ptaxonomy("taxonomy", "InputTypes", "", "", "none", "FNGLT", "none",false,true); parameters.push_back(ptaxonomy);
22                 CommandParameter palignreport("alignreport", "InputTypes", "", "", "none", "FNGLT", "none",false,false); parameters.push_back(palignreport);
23                 CommandParameter ptaxon("taxon", "String", "", "", "", "", "",false,true); parameters.push_back(ptaxon);
24                 CommandParameter pdups("dups", "Boolean", "", "T", "", "", "",false,false); parameters.push_back(pdups);
25                 CommandParameter pinputdir("inputdir", "String", "", "", "", "", "",false,false); parameters.push_back(pinputdir);
26                 CommandParameter poutputdir("outputdir", "String", "", "", "", "", "",false,false); parameters.push_back(poutputdir);
27                 
28                 vector<string> myArray;
29                 for (int i = 0; i < parameters.size(); i++) {   myArray.push_back(parameters[i].name);          }
30                 return myArray;
31         }
32         catch(exception& e) {
33                 m->errorOut(e, "RemoveLineageCommand", "setParameters");
34                 exit(1);
35         }
36 }
37 //**********************************************************************************************************************
38 string RemoveLineageCommand::getHelpString(){   
39         try {
40                 string helpString = "";
41                 helpString += "The remove.lineage command reads a taxonomy file and any of the following file types: fasta, name, group, list or alignreport file.\n";
42                 helpString += "It outputs a file containing only the sequences from the taxonomy file that are not from the taxon you requested to be removed.\n";
43                 helpString += "The remove.lineage command parameters are taxon, fasta, name, group, list, taxonomy, alignreport and dups.  You must provide taxonomy unless you have a valid current taxonomy file.\n";
44                 helpString += "The dups parameter allows you to add the entire line from a name file if you add any name from the line. default=false. \n";
45                 helpString += "The taxon parameter allows you to select the taxons you would like to remove, and is required.\n";
46                 helpString += "You may enter your taxons with confidence scores, doing so will remove only those sequences that belong to the taxonomy and whose cofidence scores fall below the scores you give.\n";
47                 helpString += "If they belong to the taxonomy and have confidences above those you provide the sequence will not be removed.\n";
48                 helpString += "The remove.lineage command should be in the following format: remove.lineage(taxonomy=yourTaxonomyFile, taxon=yourTaxons).\n";
49                 helpString += "Example remove.lineage(taxonomy=amazon.silva.taxonomy, taxon=Bacteria;Firmicutes;Bacilli;Lactobacillales;).\n";
50                 helpString += "Note: If you are running mothur in script mode you must wrap the taxon in ' characters so mothur will ignore the ; in the taxon.\n";
51                 helpString += "Example remove.lineage(taxonomy=amazon.silva.taxonomy, taxon='Bacteria;Firmicutes;Bacilli;Lactobacillales;').\n";
52                 helpString += "Note: No spaces between parameter labels (i.e. fasta), '=' and parameters (i.e.yourFasta).\n";
53                 return helpString;
54         }
55         catch(exception& e) {
56                 m->errorOut(e, "RemoveLineageCommand", "getHelpString");
57                 exit(1);
58         }
59 }
60
61
62 //**********************************************************************************************************************
63 RemoveLineageCommand::RemoveLineageCommand(){   
64         try {
65                 abort = true; calledHelp = true; 
66                 setParameters();
67                 vector<string> tempOutNames;
68                 outputTypes["fasta"] = tempOutNames;
69                 outputTypes["taxonomy"] = tempOutNames;
70                 outputTypes["name"] = tempOutNames;
71                 outputTypes["group"] = tempOutNames;
72                 outputTypes["alignreport"] = tempOutNames;
73                 outputTypes["list"] = tempOutNames;
74         }
75         catch(exception& e) {
76                 m->errorOut(e, "RemoveLineageCommand", "RemoveLineageCommand");
77                 exit(1);
78         }
79 }
80 //**********************************************************************************************************************
81 RemoveLineageCommand::RemoveLineageCommand(string option)  {
82         try {
83                 abort = false; calledHelp = false;   
84                                 
85                 //allow user to run help
86                 if(option == "help") { help(); abort = true; calledHelp = true; }
87                 else if(option == "citation") { citation(); abort = true; calledHelp = true;}
88                 
89                 else {
90                         vector<string> myArray = setParameters();       
91                         
92                         OptionParser parser(option);
93                         map<string,string> parameters = parser.getParameters();
94                         
95                         ValidParameters validParameter;
96                         map<string,string>::iterator it;
97                         
98                         //check to make sure all parameters are valid for command
99                         for (it = parameters.begin(); it != parameters.end(); it++) { 
100                                 if (validParameter.isValidParameter(it->first, myArray, it->second) != true) {  abort = true;  }
101                         }
102                         
103                         //initialize outputTypes
104                         vector<string> tempOutNames;
105                         outputTypes["fasta"] = tempOutNames;
106                         outputTypes["taxonomy"] = tempOutNames;
107                         outputTypes["name"] = tempOutNames;
108                         outputTypes["group"] = tempOutNames;
109                         outputTypes["alignreport"] = tempOutNames;
110                         outputTypes["list"] = tempOutNames;
111                         
112                         //if the user changes the output directory command factory will send this info to us in the output parameter 
113                         outputDir = validParameter.validFile(parameters, "outputdir", false);           if (outputDir == "not found"){  outputDir = "";         }
114                         
115                         //if the user changes the input directory command factory will send this info to us in the output parameter 
116                         string inputDir = validParameter.validFile(parameters, "inputdir", false);              
117                         if (inputDir == "not found"){   inputDir = "";          }
118                         else {
119                                 string path;
120                                 it = parameters.find("alignreport");
121                                 //user has given a template file
122                                 if(it != parameters.end()){ 
123                                         path = m->hasPath(it->second);
124                                         //if the user has not given a path then, add inputdir. else leave path alone.
125                                         if (path == "") {       parameters["alignreport"] = inputDir + it->second;              }
126                                 }
127                                 
128                                 it = parameters.find("fasta");
129                                 //user has given a template file
130                                 if(it != parameters.end()){ 
131                                         path = m->hasPath(it->second);
132                                         //if the user has not given a path then, add inputdir. else leave path alone.
133                                         if (path == "") {       parameters["fasta"] = inputDir + it->second;            }
134                                 }
135                                 
136                                 it = parameters.find("list");
137                                 //user has given a template file
138                                 if(it != parameters.end()){ 
139                                         path = m->hasPath(it->second);
140                                         //if the user has not given a path then, add inputdir. else leave path alone.
141                                         if (path == "") {       parameters["list"] = inputDir + it->second;             }
142                                 }
143                                 
144                                 it = parameters.find("name");
145                                 //user has given a template file
146                                 if(it != parameters.end()){ 
147                                         path = m->hasPath(it->second);
148                                         //if the user has not given a path then, add inputdir. else leave path alone.
149                                         if (path == "") {       parameters["name"] = inputDir + it->second;             }
150                                 }
151                                 
152                                 it = parameters.find("group");
153                                 //user has given a template file
154                                 if(it != parameters.end()){ 
155                                         path = m->hasPath(it->second);
156                                         //if the user has not given a path then, add inputdir. else leave path alone.
157                                         if (path == "") {       parameters["group"] = inputDir + it->second;            }
158                                 }
159                                 
160                                 it = parameters.find("taxonomy");
161                                 //user has given a template file
162                                 if(it != parameters.end()){ 
163                                         path = m->hasPath(it->second);
164                                         //if the user has not given a path then, add inputdir. else leave path alone.
165                                         if (path == "") {       parameters["taxonomy"] = inputDir + it->second;         }
166                                 }
167                         }
168
169                         
170                         //check for required parameters                 
171                         fastafile = validParameter.validFile(parameters, "fasta", true);
172                         if (fastafile == "not open") { abort = true; }
173                         else if (fastafile == "not found") {  fastafile = "";  }        
174                         
175                         namefile = validParameter.validFile(parameters, "name", true);
176                         if (namefile == "not open") { abort = true; }
177                         else if (namefile == "not found") {  namefile = "";  }  
178                         
179                         groupfile = validParameter.validFile(parameters, "group", true);
180                         if (groupfile == "not open") { abort = true; }
181                         else if (groupfile == "not found") {  groupfile = "";  }        
182                         
183                         alignfile = validParameter.validFile(parameters, "alignreport", true);
184                         if (alignfile == "not open") { abort = true; }
185                         else if (alignfile == "not found") {  alignfile = "";  }
186                         
187                         listfile = validParameter.validFile(parameters, "list", true);
188                         if (listfile == "not open") { abort = true; }
189                         else if (listfile == "not found") {  listfile = "";  }
190                         
191                         taxfile = validParameter.validFile(parameters, "taxonomy", true);
192                         if (taxfile == "not open") { abort = true; }
193                         else if (taxfile == "not found") {              
194                                 taxfile = m->getTaxonomyFile(); 
195                                 if (taxfile != "") { m->mothurOut("Using " + taxfile + " as input file for the taxonomy parameter."); m->mothurOutEndLine(); }
196                                 else {  m->mothurOut("You have no current taxonomy file and the taxonomy parameter is required."); m->mothurOutEndLine(); abort = true; }
197                         }
198                         
199                         string usedDups = "true";
200                         string temp = validParameter.validFile(parameters, "dups", false);      
201                         if (temp == "not found") { 
202                                 if (namefile != "") {  temp = "true";                                   }
203                                 else                            {  temp = "false"; usedDups = "";       }
204                         }
205                         dups = m->isTrue(temp);
206                         
207                         taxons = validParameter.validFile(parameters, "taxon", false);  
208                         if (taxons == "not found") { taxons = "";  m->mothurOut("No taxons given, please correct."); m->mothurOutEndLine();  abort = true;  }
209                         else { 
210                                 //rip off quotes
211                                 if (taxons[0] == '\'') {  taxons = taxons.substr(1); }
212                                 if (taxons[(taxons.length()-1)] == '\'') {  taxons = taxons.substr(0, (taxons.length()-1)); }
213                         }
214                         
215                         
216                         if ((fastafile == "") && (namefile == "") && (groupfile == "") && (alignfile == "") && (listfile == "") && (taxfile == ""))  { m->mothurOut("You must provide one of the following: fasta, name, group, alignreport, taxonomy or listfile."); m->mothurOutEndLine(); abort = true; }
217                 
218                         if ((usedDups != "") && (namefile == "")) {  m->mothurOut("You may only use dups with the name option."); m->mothurOutEndLine();  abort = true; }                       
219
220                 }
221
222         }
223         catch(exception& e) {
224                 m->errorOut(e, "RemoveLineageCommand", "RemoveLineageCommand");
225                 exit(1);
226         }
227 }
228 //**********************************************************************************************************************
229
230 int RemoveLineageCommand::execute(){
231         try {
232                 
233                 if (abort == true) { if (calledHelp) { return 0; }  return 2;   }
234                 
235                 if (m->control_pressed) { return 0; }
236                 
237                 //read through the correct file and output lines you want to keep
238                 if (taxfile != "")                      {               readTax();              }  //fills the set of names to remove
239                 if (namefile != "")                     {               readName();             }
240                 if (fastafile != "")            {               readFasta();    }
241                 if (groupfile != "")            {               readGroup();    }
242                 if (alignfile != "")            {               readAlign();    }
243                 if (listfile != "")                     {               readList();             }
244                 
245                 
246                 if (m->control_pressed) { for (int i = 0; i < outputNames.size(); i++) {        remove(outputNames[i].c_str());  } return 0; }
247                 
248                 if (outputNames.size() != 0) {
249                         m->mothurOutEndLine();
250                         m->mothurOut("Output File Names: "); m->mothurOutEndLine();
251                         for (int i = 0; i < outputNames.size(); i++) {  m->mothurOut(outputNames[i]); m->mothurOutEndLine();    }
252                         m->mothurOutEndLine();
253                         
254                         //set fasta file as new current fastafile
255                         string current = "";
256                         itTypes = outputTypes.find("fasta");
257                         if (itTypes != outputTypes.end()) {
258                                 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setFastaFile(current); }
259                         }
260                         
261                         itTypes = outputTypes.find("name");
262                         if (itTypes != outputTypes.end()) {
263                                 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setNameFile(current); }
264                         }
265                         
266                         itTypes = outputTypes.find("group");
267                         if (itTypes != outputTypes.end()) {
268                                 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setGroupFile(current); }
269                         }
270                         
271                         itTypes = outputTypes.find("list");
272                         if (itTypes != outputTypes.end()) {
273                                 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setListFile(current); }
274                         }
275                         
276                         itTypes = outputTypes.find("taxonomy");
277                         if (itTypes != outputTypes.end()) {
278                                 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setTaxonomyFile(current); }
279                         }
280                 }
281                 
282                 return 0;               
283         }
284
285         catch(exception& e) {
286                 m->errorOut(e, "RemoveLineageCommand", "execute");
287                 exit(1);
288         }
289 }
290
291 //**********************************************************************************************************************
292 int RemoveLineageCommand::readFasta(){
293         try {
294                 string thisOutputDir = outputDir;
295                 if (outputDir == "") {  thisOutputDir += m->hasPath(fastafile);  }
296                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(fastafile)) + "pick" + m->getExtension(fastafile);
297                 
298                 ofstream out;
299                 m->openOutputFile(outputFileName, out);
300                 
301                 ifstream in;
302                 m->openInputFile(fastafile, in);
303                 string name;
304                 
305                 bool wroteSomething = false;
306                 
307                 while(!in.eof()){
308                         if (m->control_pressed) { in.close();  out.close();  remove(outputFileName.c_str());  return 0; }
309                         
310                         Sequence currSeq(in);
311                         name = currSeq.getName();
312                         
313                         if (name != "") {
314                                 //if this name is in the accnos file
315                                 if (names.count(name) == 0) {
316                                         wroteSomething = true;
317                                         
318                                         currSeq.printSequence(out);
319                                 }
320                         }
321                         m->gobble(in);
322                 }
323                 in.close();     
324                 out.close();
325                 
326                 if (wroteSomething == false) {  m->mothurOut("Your fasta file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
327                 outputNames.push_back(outputFileName); outputTypes["fasta"].push_back(outputFileName); 
328                 
329                 return 0;
330                 
331         }
332         catch(exception& e) {
333                 m->errorOut(e, "RemoveLineageCommand", "readFasta");
334                 exit(1);
335         }
336 }
337 //**********************************************************************************************************************
338 int RemoveLineageCommand::readList(){
339         try {
340                 string thisOutputDir = outputDir;
341                 if (outputDir == "") {  thisOutputDir += m->hasPath(listfile);  }
342                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(listfile)) + "pick" +  m->getExtension(listfile);
343                 
344                 ofstream out;
345                 m->openOutputFile(outputFileName, out);
346                 
347                 ifstream in;
348                 m->openInputFile(listfile, in);
349                 
350                 bool wroteSomething = false;
351                 
352                 while(!in.eof()){
353                         //read in list vector
354                         ListVector list(in);
355                         
356                         //make a new list vector
357                         ListVector newList;
358                         newList.setLabel(list.getLabel());
359                         
360                         //for each bin
361                         for (int i = 0; i < list.getNumBins(); i++) {
362                                 if (m->control_pressed) { in.close();  out.close();  remove(outputFileName.c_str());  return 0; }
363                         
364                                 //parse out names that are in accnos file
365                                 string binnames = list.get(i);
366                                 
367                                 string newNames = "";
368                                 while (binnames.find_first_of(',') != -1) { 
369                                         string name = binnames.substr(0,binnames.find_first_of(','));
370                                         binnames = binnames.substr(binnames.find_first_of(',')+1, binnames.length());
371                                         
372                                         //if that name is in the .accnos file, add it
373                                         if (names.count(name) == 0) {  newNames += name + ",";  }
374                                 }
375                         
376                                 //get last name
377                                 if (names.count(binnames) == 0) {  newNames += binnames + ",";  }
378
379                                 //if there are names in this bin add to new list
380                                 if (newNames != "") {  
381                                         newNames = newNames.substr(0, newNames.length()-1); //rip off extra comma
382                                         newList.push_back(newNames);    
383                                 }
384                         }
385                                 
386                         //print new listvector
387                         if (newList.getNumBins() != 0) {
388                                 wroteSomething = true;
389                                 newList.print(out);
390                         }
391                         
392                         m->gobble(in);
393                 }
394                 in.close();     
395                 out.close();
396                 
397                 if (wroteSomething == false) {  m->mothurOut("Your list file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
398                 outputNames.push_back(outputFileName); outputTypes["list"].push_back(outputFileName); 
399                                 
400                 return 0;
401
402         }
403         catch(exception& e) {
404                 m->errorOut(e, "RemoveLineageCommand", "readList");
405                 exit(1);
406         }
407 }
408 //**********************************************************************************************************************
409 int RemoveLineageCommand::readName(){
410         try {
411                 string thisOutputDir = outputDir;
412                 if (outputDir == "") {  thisOutputDir += m->hasPath(namefile);  }
413                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(namefile)) + "pick" + m->getExtension(namefile);
414
415                 ofstream out;
416                 m->openOutputFile(outputFileName, out);
417
418                 ifstream in;
419                 m->openInputFile(namefile, in);
420                 string name, firstCol, secondCol;
421                 
422                 bool wroteSomething = false;
423                 
424                 while(!in.eof()){
425                         if (m->control_pressed) { in.close();  out.close();  remove(outputFileName.c_str());  return 0; }
426
427                         in >> firstCol;                         
428                         in >> secondCol;                        
429
430                         vector<string> parsedNames;
431                         m->splitAtComma(secondCol, parsedNames);
432                         
433                         vector<string> validSecond;  validSecond.clear();
434                         for (int i = 0; i < parsedNames.size(); i++) {
435                                 if (names.count(parsedNames[i]) == 0) {
436                                         validSecond.push_back(parsedNames[i]);
437                                 }
438                         }
439                         
440                         if ((dups) && (validSecond.size() != parsedNames.size())) {  //if dups is true and we want to get rid of anyone, get rid of everyone
441                                 for (int i = 0; i < parsedNames.size(); i++) {  names.insert(parsedNames[i]);  }
442                         }else {
443                                         //if the name in the first column is in the set then print it and any other names in second column also in set
444                                 if (names.count(firstCol) == 0) {
445                                         
446                                         wroteSomething = true;
447                                         
448                                         out << firstCol << '\t';
449                                         
450                                         //you know you have at least one valid second since first column is valid
451                                         for (int i = 0; i < validSecond.size()-1; i++) {  out << validSecond[i] << ',';  }
452                                         out << validSecond[validSecond.size()-1] << endl;
453                                         
454                                         //make first name in set you come to first column and then add the remaining names to second column
455                                 }else {
456                                         
457                                         //you want part of this row
458                                         if (validSecond.size() != 0) {
459                                                 
460                                                 wroteSomething = true;
461                                                 
462                                                 out << validSecond[0] << '\t';
463                                                 
464                                                 //you know you have at least one valid second since first column is valid
465                                                 for (int i = 0; i < validSecond.size()-1; i++) {  out << validSecond[i] << ',';  }
466                                                 out << validSecond[validSecond.size()-1] << endl;
467                                         }
468                                 }
469                         }
470                         m->gobble(in);
471                 }
472                 in.close();
473                 out.close();
474
475                 if (wroteSomething == false) {  m->mothurOut("Your name file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
476                 outputNames.push_back(outputFileName); outputTypes["name"].push_back(outputFileName);
477                                 
478                 return 0;
479         }
480         catch(exception& e) {
481                 m->errorOut(e, "RemoveLineageCommand", "readName");
482                 exit(1);
483         }
484 }
485
486 //**********************************************************************************************************************
487 int RemoveLineageCommand::readGroup(){
488         try {
489                 string thisOutputDir = outputDir;
490                 if (outputDir == "") {  thisOutputDir += m->hasPath(groupfile);  }
491                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(groupfile)) + "pick" + m->getExtension(groupfile);
492                 
493                 ofstream out;
494                 m->openOutputFile(outputFileName, out);
495
496                 ifstream in;
497                 m->openInputFile(groupfile, in);
498                 string name, group;
499                 
500                 bool wroteSomething = false;
501                 
502                 while(!in.eof()){
503                         if (m->control_pressed) { in.close();  out.close();  remove(outputFileName.c_str());  return 0; }
504                         
505                         in >> name;                             //read from first column
506                         in >> group;                    //read from second column
507                         
508                         //if this name is in the accnos file
509                         if (names.count(name) == 0) {
510                                 wroteSomething = true;
511                                 out << name << '\t' << group << endl;
512                         }
513                                         
514                         m->gobble(in);
515                 }
516                 in.close();
517                 out.close();
518                 
519                 if (wroteSomething == false) {  m->mothurOut("Your group file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
520                 outputNames.push_back(outputFileName); outputTypes["group"].push_back(outputFileName);
521                 
522                 return 0;
523         }
524         catch(exception& e) {
525                 m->errorOut(e, "RemoveLineageCommand", "readGroup");
526                 exit(1);
527         }
528 }
529 //**********************************************************************************************************************
530 int RemoveLineageCommand::readTax(){
531         try {
532                 string thisOutputDir = outputDir;
533                 if (outputDir == "") {  thisOutputDir += m->hasPath(taxfile);  }
534                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(taxfile)) + "pick" + m->getExtension(taxfile);
535                 ofstream out;
536                 m->openOutputFile(outputFileName, out);
537                 
538                 ifstream in;
539                 m->openInputFile(taxfile, in);
540                 string name, tax;
541                 
542                 bool wroteSomething = false;
543                 
544                 bool taxonsHasConfidence = false;
545                 vector< map<string, float> > searchTaxons;
546                 string noConfidenceTaxons = taxons;
547                 int hasConPos = taxons.find_first_of('(');
548                 if (hasConPos != string::npos) {  
549                         taxonsHasConfidence = true; 
550                         searchTaxons = getTaxons(taxons); 
551                         noConfidenceTaxons = removeConfidences(taxons);
552                 }
553                 
554                 
555                 while(!in.eof()){
556
557                         if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str());  return 0; }
558
559                         in >> name;                             //read from first column
560                         in >> tax;                      //read from second column
561                         
562                         string newtax = tax;
563                         
564                         //if the users file contains confidence scores we want to ignore them when searching for the taxons, unless the taxon has them
565                         if (!taxonsHasConfidence) {
566                                 
567                                 int hasConfidences = tax.find_first_of('(');
568                                 if (hasConfidences != string::npos) { 
569                                         newtax = removeConfidences(tax);
570                                 }
571                                 
572                                 int pos = newtax.find(taxons);
573                                 
574                                 if (pos == string::npos) { 
575                                         wroteSomething = true;
576                                         out << name << '\t' << tax << endl;
577                                 }else{ //this sequence contains the taxon the user wants to remove
578                                         names.insert(name);
579                                 }
580                                 
581                         }else{//if taxons has them and you don't them remove taxons
582                                 int hasConfidences = tax.find_first_of('(');
583                                 if (hasConfidences == string::npos) { 
584                                 
585                                         int pos = newtax.find(noConfidenceTaxons);
586                                         
587                                         if (pos == string::npos) { 
588                                                 wroteSomething = true;
589                                                 out << name << '\t' << tax << endl;
590                                         }else{ //this sequence contains the taxon the user wants to remove
591                                                 names.insert(name);
592                                         }
593                                 }else { //both have confidences so we want to make sure the users confidences are greater then or equal to the taxons
594                                         //first remove confidences from both and see if the taxonomy exists
595                                 
596                                         string noNewTax = tax;
597                                         int hasConfidences = tax.find_first_of('(');
598                                         if (hasConfidences != string::npos) { 
599                                                 noNewTax = removeConfidences(tax);
600                                         }
601                                         
602                                         int pos = noNewTax.find(noConfidenceTaxons);
603                                         
604                                         if (pos != string::npos) { //if yes, then are the confidences okay
605                                                 
606                                                 bool remove = false;
607                                                 vector< map<string, float> > usersTaxon = getTaxons(newtax);
608                                                 
609                                                 //the usersTaxon is most likely longer than the searchTaxons, and searchTaxon[0] may relate to userTaxon[4]
610                                                 //we want to "line them up", so we will find the the index where the searchstring starts
611                                                 int index = 0;
612                                                 for (int i = 0; i < usersTaxon.size(); i++) {
613                                                         
614                                                         if (usersTaxon[i].begin()->first == searchTaxons[0].begin()->first) { 
615                                                                 index = i;  
616                                                                 int spot = 0;
617                                                                 bool goodspot = true;
618                                                                 //is this really the start, or are we dealing with a taxon of the same name?
619                                                                 while ((spot < searchTaxons.size()) && ((i+spot) < usersTaxon.size())) {
620                                                                         if (usersTaxon[i+spot].begin()->first != searchTaxons[spot].begin()->first) { goodspot = false; break; }
621                                                                         else { spot++; }
622                                                                 }
623                                                                 
624                                                                 if (goodspot) { break; }
625                                                         }
626                                                 }
627                                                 
628                                                 for (int i = 0; i < searchTaxons.size(); i++) {
629                                                         
630                                                         if ((i+index) < usersTaxon.size()) { //just in case, should never be false
631                                                                 if (usersTaxon[i+index].begin()->second < searchTaxons[i].begin()->second) { //is the users cutoff less than the search taxons
632                                                                         remove = true;
633                                                                         break;
634                                                                 }
635                                                         }else {
636                                                                 remove = true;
637                                                                 break;
638                                                         }
639                                                 }
640                                                 
641                                                 //passed the test so remove you
642                                                 if (remove) {
643                                                         names.insert(name);
644                                                 }else {
645                                                         wroteSomething = true;
646                                                         out << name << '\t' << tax << endl;
647                                                 }
648                                         }else {
649                                                 wroteSomething = true;
650                                                 out << name << '\t' << tax << endl;
651                                         }
652                                 }
653                         }
654                         
655                         
656                         
657                         
658                         m->gobble(in);
659                 }
660                 in.close();
661                 out.close();
662                 
663                 if (!wroteSomething) { m->mothurOut("Your taxonomy file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
664                 outputNames.push_back(outputFileName); outputTypes["taxonomy"].push_back(outputFileName);
665                         
666                 return 0;
667
668         }
669         catch(exception& e) {
670                 m->errorOut(e, "RemoveLineageCommand", "readTax");
671                 exit(1);
672         }
673 }
674 /**************************************************************************************************/
675 vector< map<string, float> > RemoveLineageCommand::getTaxons(string tax) {
676         try {
677                 
678                 vector< map<string, float> > t;
679                 string taxon = "";
680                 int taxLength = tax.length();
681                 for(int i=0;i<taxLength;i++){
682                         if(tax[i] == ';'){
683                                 
684                                 int openParen = taxon.find_first_of('(');
685                                 int closeParen = taxon.find_last_of(')');
686                                 
687                                 string newtaxon, confidence;
688                                 if ((openParen != string::npos) && (closeParen != string::npos)) {
689                                         newtaxon = taxon.substr(0, openParen); //rip off confidence
690                                         confidence = taxon.substr((openParen+1), (closeParen-openParen-1));  
691                                 }else{
692                                         newtaxon = taxon;
693                                         confidence = "0";
694                                 }
695                                 float con = 0;
696                                 convert(confidence, con);
697                                 
698                                 map<string, float> temp;
699                                 temp[newtaxon] = con;
700                                 t.push_back(temp);
701                                 
702                                 taxon = "";
703                         }
704                         else{
705                                 taxon += tax[i];
706                         }
707                 }
708                 
709                 return t;
710         }
711         catch(exception& e) {
712                 m->errorOut(e, "RemoveLineageCommand", "getTaxons");
713                 exit(1);
714         }
715 }
716 /**************************************************************************************************/
717 string RemoveLineageCommand::removeConfidences(string tax) {
718         try {
719                 
720                 string taxon = "";
721                 int taxLength = tax.length();
722                 for(int i=0;i<taxLength;i++){
723                         if(tax[i] == ';'){
724                                 taxon = taxon.substr(0, taxon.find_first_of('(')); //rip off confidence
725                                 taxon += ";";
726                         }
727                         else{
728                                 taxon += tax[i];
729                         }
730                 }
731                                 
732                 return taxon;
733         }
734         catch(exception& e) {
735                 m->errorOut(e, "RemoveLineageCommand", "removeConfidences");
736                 exit(1);
737         }
738 }
739 //**********************************************************************************************************************
740 //alignreport file has a column header line then all other lines contain 16 columns.  we just want the first column since that contains the name
741 int RemoveLineageCommand::readAlign(){
742         try {
743                 string thisOutputDir = outputDir;
744                 if (outputDir == "") {  thisOutputDir += m->hasPath(alignfile);  }
745                 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(alignfile)) + "pick.align.report";
746                 
747                 ofstream out;
748                 m->openOutputFile(outputFileName, out);
749
750                 ifstream in;
751                 m->openInputFile(alignfile, in);
752                 string name, junk;
753                 
754                 bool wroteSomething = false;
755                 
756                 //read column headers
757                 for (int i = 0; i < 16; i++) {  
758                         if (!in.eof())  {       in >> junk;      out << junk << '\t';   }
759                         else                    {       break;                  }
760                 }
761                 out << endl;
762                 
763                 while(!in.eof()){
764                         if (m->control_pressed) { in.close();  out.close();  remove(outputFileName.c_str());  return 0; }
765                         
766                         in >> name;                             //read from first column
767                         
768                         //if this name is in the accnos file
769                         if (names.count(name) == 0) {
770                                 wroteSomething = true;
771                                 
772                                 out << name << '\t';
773                                 
774                                 //read rest
775                                 for (int i = 0; i < 15; i++) {  
776                                         if (!in.eof())  {       in >> junk;      out << junk << '\t';   }
777                                         else                    {       break;                  }
778                                 }
779                                 out << endl;
780                                 
781                         }else {//still read just don't do anything with it
782                                 
783                                 //read rest
784                                 for (int i = 0; i < 15; i++) {  
785                                         if (!in.eof())  {       in >> junk;             }
786                                         else                    {       break;                  }
787                                 }
788                         }
789                         
790                         m->gobble(in);
791                 }
792                 in.close();
793                 out.close();
794                 
795                 if (wroteSomething == false) {  m->mothurOut("Your align file contains only sequences from " + taxons + "."); m->mothurOutEndLine();  }
796                 outputNames.push_back(outputFileName); outputTypes["alignreport"].push_back(outputFileName);
797                 
798                 return 0;
799                 
800         }
801         catch(exception& e) {
802                 m->errorOut(e, "RemoveLineageCommand", "readAlign");
803                 exit(1);
804         }
805 }
806 //**********************************************************************************************************************
807