2 * getlineagecommand.cpp
5 * Created by westcott on 9/24/10.
6 * Copyright 2010 Schloss Lab. All rights reserved.
10 #include "getlineagecommand.h"
11 #include "sequence.hpp"
12 #include "listvector.hpp"
15 //**********************************************************************************************************************
16 vector<string> GetLineageCommand::getValidParameters(){
18 string Array[] = {"fasta","name", "group", "alignreport", "taxon", "dups", "list","taxonomy","outputdir","inputdir"};
19 vector<string> myArray (Array, Array+(sizeof(Array)/sizeof(string)));
23 m->errorOut(e, "GetLineageCommand", "getValidParameters");
27 //**********************************************************************************************************************
28 GetLineageCommand::GetLineageCommand(){
30 abort = true; calledHelp = true;
31 vector<string> tempOutNames;
32 outputTypes["fasta"] = tempOutNames;
33 outputTypes["taxonomy"] = tempOutNames;
34 outputTypes["name"] = tempOutNames;
35 outputTypes["group"] = tempOutNames;
36 outputTypes["alignreport"] = tempOutNames;
37 outputTypes["list"] = tempOutNames;
40 m->errorOut(e, "GetLineageCommand", "GetLineageCommand");
44 //**********************************************************************************************************************
45 vector<string> GetLineageCommand::getRequiredParameters(){
47 string Array[] = {"taxonomy","taxon"};
48 vector<string> myArray (Array, Array+(sizeof(Array)/sizeof(string)));
52 m->errorOut(e, "GetLineageCommand", "getRequiredParameters");
56 //**********************************************************************************************************************
57 vector<string> GetLineageCommand::getRequiredFiles(){
59 vector<string> myArray;
63 m->errorOut(e, "GetLineageCommand", "getRequiredFiles");
67 //**********************************************************************************************************************
68 GetLineageCommand::GetLineageCommand(string option) {
70 abort = false; calledHelp = false;
72 //allow user to run help
73 if(option == "help") { help(); abort = true; calledHelp = true; }
76 //valid paramters for this command
77 string Array[] = {"fasta","name", "group", "alignreport", "taxon", "dups", "list","taxonomy","outputdir","inputdir"};
78 vector<string> myArray (Array, Array+(sizeof(Array)/sizeof(string)));
80 OptionParser parser(option);
81 map<string,string> parameters = parser.getParameters();
83 ValidParameters validParameter;
84 map<string,string>::iterator it;
86 //check to make sure all parameters are valid for command
87 for (it = parameters.begin(); it != parameters.end(); it++) {
88 if (validParameter.isValidParameter(it->first, myArray, it->second) != true) { abort = true; }
91 //initialize outputTypes
92 vector<string> tempOutNames;
93 outputTypes["fasta"] = tempOutNames;
94 outputTypes["taxonomy"] = tempOutNames;
95 outputTypes["name"] = tempOutNames;
96 outputTypes["group"] = tempOutNames;
97 outputTypes["alignreport"] = tempOutNames;
98 outputTypes["list"] = tempOutNames;
100 //if the user changes the output directory command factory will send this info to us in the output parameter
101 outputDir = validParameter.validFile(parameters, "outputdir", false); if (outputDir == "not found"){ outputDir = ""; }
103 //if the user changes the input directory command factory will send this info to us in the output parameter
104 string inputDir = validParameter.validFile(parameters, "inputdir", false);
105 if (inputDir == "not found"){ inputDir = ""; }
108 it = parameters.find("alignreport");
109 //user has given a template file
110 if(it != parameters.end()){
111 path = m->hasPath(it->second);
112 //if the user has not given a path then, add inputdir. else leave path alone.
113 if (path == "") { parameters["alignreport"] = inputDir + it->second; }
116 it = parameters.find("fasta");
117 //user has given a template file
118 if(it != parameters.end()){
119 path = m->hasPath(it->second);
120 //if the user has not given a path then, add inputdir. else leave path alone.
121 if (path == "") { parameters["fasta"] = inputDir + it->second; }
124 it = parameters.find("list");
125 //user has given a template file
126 if(it != parameters.end()){
127 path = m->hasPath(it->second);
128 //if the user has not given a path then, add inputdir. else leave path alone.
129 if (path == "") { parameters["list"] = inputDir + it->second; }
132 it = parameters.find("name");
133 //user has given a template file
134 if(it != parameters.end()){
135 path = m->hasPath(it->second);
136 //if the user has not given a path then, add inputdir. else leave path alone.
137 if (path == "") { parameters["name"] = inputDir + it->second; }
140 it = parameters.find("group");
141 //user has given a template file
142 if(it != parameters.end()){
143 path = m->hasPath(it->second);
144 //if the user has not given a path then, add inputdir. else leave path alone.
145 if (path == "") { parameters["group"] = inputDir + it->second; }
148 it = parameters.find("taxonomy");
149 //user has given a template file
150 if(it != parameters.end()){
151 path = m->hasPath(it->second);
152 //if the user has not given a path then, add inputdir. else leave path alone.
153 if (path == "") { parameters["taxonomy"] = inputDir + it->second; }
158 //check for required parameters
159 fastafile = validParameter.validFile(parameters, "fasta", true);
160 if (fastafile == "not open") { abort = true; }
161 else if (fastafile == "not found") { fastafile = ""; }
163 namefile = validParameter.validFile(parameters, "name", true);
164 if (namefile == "not open") { abort = true; }
165 else if (namefile == "not found") { namefile = ""; }
167 groupfile = validParameter.validFile(parameters, "group", true);
168 if (groupfile == "not open") { abort = true; }
169 else if (groupfile == "not found") { groupfile = ""; }
171 alignfile = validParameter.validFile(parameters, "alignreport", true);
172 if (alignfile == "not open") { abort = true; }
173 else if (alignfile == "not found") { alignfile = ""; }
175 listfile = validParameter.validFile(parameters, "list", true);
176 if (listfile == "not open") { abort = true; }
177 else if (listfile == "not found") { listfile = ""; }
179 taxfile = validParameter.validFile(parameters, "taxonomy", true);
180 if (taxfile == "not open") { abort = true; }
181 else if (taxfile == "not found") { taxfile = ""; m->mothurOut("The taxonomy parameter is required for the get.lineage command."); m->mothurOutEndLine(); abort = true; }
183 string usedDups = "true";
184 string temp = validParameter.validFile(parameters, "dups", false);
185 if (temp == "not found") {
186 if (namefile != "") { temp = "true"; }
187 else { temp = "false"; usedDups = ""; }
189 dups = m->isTrue(temp);
191 taxons = validParameter.validFile(parameters, "taxon", false);
192 if (taxons == "not found") { taxons = ""; m->mothurOut("No taxons given, please correct."); m->mothurOutEndLine(); abort = true; }
195 if (taxons[0] == '\'') { taxons = taxons.substr(1); }
196 if (taxons[(taxons.length()-1)] == '\'') { taxons = taxons.substr(0, (taxons.length()-1)); }
200 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; }
202 if ((usedDups != "") && (namefile == "")) { m->mothurOut("You may only use dups with the name option."); m->mothurOutEndLine(); abort = true; }
207 catch(exception& e) {
208 m->errorOut(e, "GetLineageCommand", "GetLineageCommand");
212 //**********************************************************************************************************************
214 void GetLineageCommand::help(){
216 m->mothurOut("The get.lineage command reads a taxonomy file and any of the following file types: fasta, name, group, list or alignreport file.\n");
217 m->mothurOut("It outputs a file containing only the sequences from the taxonomy file that are from the taxon requested.\n");
218 m->mothurOut("The get.lineage command parameters are taxon, fasta, name, group, list, taxonomy, alignreport and dups. You must provide taxonomy and taxon.\n");
219 m->mothurOut("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");
220 m->mothurOut("The taxon parameter allows you to select the taxons you would like to get.\n");
221 m->mothurOut("You may enter your taxons with confidence scores, doing so will get only those sequences that belong to the taxonomy and whose cofidence scores is above the scores you give.\n");
222 m->mothurOut("If they belong to the taxonomy and have confidences below those you provide the sequence will not be selected.\n");
223 m->mothurOut("The get.lineage command should be in the following format: get.lineage(taxonomy=yourTaxonomyFile, taxon=yourTaxons).\n");
224 m->mothurOut("Example get.lineage(taxonomy=amazon.silva.taxonomy, taxon=Bacteria;Firmicutes;Bacilli;Lactobacillales;).\n");
225 m->mothurOut("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");
226 m->mothurOut("Example get.lineage(taxonomy=amazon.silva.taxonomy, taxon='Bacteria;Firmicutes;Bacilli;Lactobacillales;').\n");
227 m->mothurOut("Note: No spaces between parameter labels (i.e. fasta), '=' and parameters (i.e.yourFasta).\n\n");
229 catch(exception& e) {
230 m->errorOut(e, "GetLineageCommand", "help");
235 //**********************************************************************************************************************
237 int GetLineageCommand::execute(){
240 if (abort == true) { if (calledHelp) { return 0; } return 2; }
242 if (m->control_pressed) { return 0; }
244 //read through the correct file and output lines you want to keep
245 if (taxfile != "") { readTax(); } //fills the set of names to get
246 if (namefile != "") { readName(); }
247 if (fastafile != "") { readFasta(); }
248 if (groupfile != "") { readGroup(); }
249 if (alignfile != "") { readAlign(); }
250 if (listfile != "") { readList(); }
253 if (m->control_pressed) { outputTypes.clear(); for (int i = 0; i < outputNames.size(); i++) { remove(outputNames[i].c_str()); } return 0; }
255 if (outputNames.size() != 0) {
256 m->mothurOutEndLine();
257 m->mothurOut("Output File Names: "); m->mothurOutEndLine();
258 for (int i = 0; i < outputNames.size(); i++) { m->mothurOut(outputNames[i]); m->mothurOutEndLine(); }
259 m->mothurOutEndLine();
261 //set fasta file as new current fastafile
263 itTypes = outputTypes.find("fasta");
264 if (itTypes != outputTypes.end()) {
265 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setFastaFile(current); }
268 itTypes = outputTypes.find("name");
269 if (itTypes != outputTypes.end()) {
270 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setNameFile(current); }
273 itTypes = outputTypes.find("group");
274 if (itTypes != outputTypes.end()) {
275 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setGroupFile(current); }
278 itTypes = outputTypes.find("list");
279 if (itTypes != outputTypes.end()) {
280 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setListFile(current); }
283 itTypes = outputTypes.find("taxonomy");
284 if (itTypes != outputTypes.end()) {
285 if ((itTypes->second).size() != 0) { current = (itTypes->second)[0]; m->setTaxonomyFile(current); }
292 catch(exception& e) {
293 m->errorOut(e, "GetLineageCommand", "execute");
298 //**********************************************************************************************************************
299 int GetLineageCommand::readFasta(){
301 string thisOutputDir = outputDir;
302 if (outputDir == "") { thisOutputDir += m->hasPath(fastafile); }
303 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(fastafile)) + "pick" + m->getExtension(fastafile);
305 m->openOutputFile(outputFileName, out);
309 m->openInputFile(fastafile, in);
312 bool wroteSomething = false;
316 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
318 Sequence currSeq(in);
319 name = currSeq.getName();
322 //if this name is in the accnos file
323 if (names.count(name) != 0) {
324 wroteSomething = true;
326 currSeq.printSequence(out);
334 if (wroteSomething == false) { m->mothurOut("Your file does not contain any sequence from the .accnos file."); m->mothurOutEndLine(); }
335 outputNames.push_back(outputFileName); outputTypes["fasta"].push_back(outputFileName);
340 catch(exception& e) {
341 m->errorOut(e, "GetLineageCommand", "readFasta");
345 //**********************************************************************************************************************
346 int GetLineageCommand::readList(){
348 string thisOutputDir = outputDir;
349 if (outputDir == "") { thisOutputDir += m->hasPath(listfile); }
350 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(listfile)) + "pick" + m->getExtension(listfile);
352 m->openOutputFile(outputFileName, out);
355 m->openInputFile(listfile, in);
357 bool wroteSomething = false;
361 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
363 //read in list vector
366 //make a new list vector
368 newList.setLabel(list.getLabel());
371 for (int i = 0; i < list.getNumBins(); i++) {
373 //parse out names that are in accnos file
374 string binnames = list.get(i);
376 string newNames = "";
377 while (binnames.find_first_of(',') != -1) {
378 string name = binnames.substr(0,binnames.find_first_of(','));
379 binnames = binnames.substr(binnames.find_first_of(',')+1, binnames.length());
381 //if that name is in the .accnos file, add it
382 if (names.count(name) != 0) { newNames += name + ","; }
386 if (names.count(binnames) != 0) { newNames += binnames + ","; }
388 //if there are names in this bin add to new list
389 if (newNames != "") {
390 newNames = newNames.substr(0, newNames.length()-1); //rip off extra comma
391 newList.push_back(newNames);
395 //print new listvector
396 if (newList.getNumBins() != 0) {
397 wroteSomething = true;
406 if (wroteSomething == false) { m->mothurOut("Your file does not contain any sequence from the .accnos file."); m->mothurOutEndLine(); }
407 outputNames.push_back(outputFileName); outputTypes["list"].push_back(outputFileName);
412 catch(exception& e) {
413 m->errorOut(e, "GetLineageCommand", "readList");
417 //**********************************************************************************************************************
418 int GetLineageCommand::readName(){
420 string thisOutputDir = outputDir;
421 if (outputDir == "") { thisOutputDir += m->hasPath(namefile); }
422 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(namefile)) + "pick" + m->getExtension(namefile);
424 m->openOutputFile(outputFileName, out);
428 m->openInputFile(namefile, in);
429 string name, firstCol, secondCol;
431 bool wroteSomething = false;
436 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
442 if (dups) { hold = secondCol; }
444 vector<string> parsedNames;
445 m->splitAtComma(secondCol, parsedNames);
447 vector<string> validSecond;
448 for (int i = 0; i < parsedNames.size(); i++) {
449 if (names.count(parsedNames[i]) != 0) {
450 validSecond.push_back(parsedNames[i]);
454 if ((dups) && (validSecond.size() != 0)) { //dups = true and we want to add someone, then add everyone
455 for (int i = 0; i < parsedNames.size(); i++) { names.insert(parsedNames[i]); }
456 out << firstCol << '\t' << hold << endl;
457 wroteSomething = true;
459 //if the name in the first column is in the set then print it and any other names in second column also in set
460 if (names.count(firstCol) != 0) {
462 wroteSomething = true;
464 out << firstCol << '\t';
466 //you know you have at least one valid second since first column is valid
467 for (int i = 0; i < validSecond.size()-1; i++) { out << validSecond[i] << ','; }
468 out << validSecond[validSecond.size()-1] << endl;
471 //make first name in set you come to first column and then add the remaining names to second column
473 //you want part of this row
474 if (validSecond.size() != 0) {
476 wroteSomething = true;
478 out << validSecond[0] << '\t';
480 //you know you have at least one valid second since first column is valid
481 for (int i = 0; i < validSecond.size()-1; i++) { out << validSecond[i] << ','; }
482 out << validSecond[validSecond.size()-1] << endl;
491 if (wroteSomething == false) { m->mothurOut("Your file does not contain any sequence from the .accnos file."); m->mothurOutEndLine(); }
492 outputNames.push_back(outputFileName); outputTypes["name"].push_back(outputFileName);
497 catch(exception& e) {
498 m->errorOut(e, "GetLineageCommand", "readName");
503 //**********************************************************************************************************************
504 int GetLineageCommand::readGroup(){
506 string thisOutputDir = outputDir;
507 if (outputDir == "") { thisOutputDir += m->hasPath(groupfile); }
508 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(groupfile)) + "pick" + m->getExtension(groupfile);
510 m->openOutputFile(outputFileName, out);
514 m->openInputFile(groupfile, in);
517 bool wroteSomething = false;
521 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
524 in >> name; //read from first column
525 in >> group; //read from second column
527 //if this name is in the accnos file
528 if (names.count(name) != 0) {
529 wroteSomething = true;
531 out << name << '\t' << group << endl;
539 if (wroteSomething == false) { m->mothurOut("Your file does not contain any sequence from the .accnos file."); m->mothurOutEndLine(); }
540 outputNames.push_back(outputFileName); outputTypes["group"].push_back(outputFileName);
545 catch(exception& e) {
546 m->errorOut(e, "GetLineageCommand", "readGroup");
550 //**********************************************************************************************************************
551 int GetLineageCommand::readTax(){
553 string thisOutputDir = outputDir;
554 if (outputDir == "") { thisOutputDir += m->hasPath(taxfile); }
555 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(taxfile)) + "pick" + m->getExtension(taxfile);
557 m->openOutputFile(outputFileName, out);
560 m->openInputFile(taxfile, in);
563 //bool wroteSomething = false;
565 bool taxonsHasConfidence = false;
566 vector< map<string, float> > searchTaxons;
567 string noConfidenceTaxons = taxons;
568 int hasConPos = taxons.find_first_of('(');
569 if (hasConPos != string::npos) {
570 taxonsHasConfidence = true;
571 searchTaxons = getTaxons(taxons);
572 noConfidenceTaxons = removeConfidences(taxons);
578 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
580 in >> name; //read from first column
581 in >> tax; //read from second column
586 //if the users file contains confidence scores we want to ignore them when searching for the taxons, unless the taxon has them
587 if (!taxonsHasConfidence) {
588 int hasConfidences = tax.find_first_of('(');
589 if (hasConfidences != string::npos) {
590 newtax = removeConfidences(tax);
593 int pos = newtax.find(taxons);
595 if (pos != string::npos) { //this sequence contains the taxon the user wants
597 out << name << '\t' << tax << endl;
600 }else{//if taxons has them and you don't them remove taxons
601 int hasConfidences = tax.find_first_of('(');
602 if (hasConfidences == string::npos) {
604 int pos = newtax.find(noConfidenceTaxons);
606 if (pos != string::npos) { //this sequence contains the taxon the user wants
608 out << name << '\t' << tax << endl;
610 }else { //both have confidences so we want to make sure the users confidences are greater then or equal to the taxons
611 //first remove confidences from both and see if the taxonomy exists
613 string noNewTax = tax;
614 int hasConfidences = tax.find_first_of('(');
615 if (hasConfidences != string::npos) {
616 noNewTax = removeConfidences(tax);
619 int pos = noNewTax.find(noConfidenceTaxons);
621 if (pos != string::npos) { //if yes, then are the confidences okay
624 vector< map<string, float> > usersTaxon = getTaxons(newtax);
626 //the usersTaxon is most likely longer than the searchTaxons, and searchTaxon[0] may relate to userTaxon[4]
627 //we want to "line them up", so we will find the the index where the searchstring starts
629 for (int i = 0; i < usersTaxon.size(); i++) {
631 if (usersTaxon[i].begin()->first == searchTaxons[0].begin()->first) {
634 bool goodspot = true;
635 //is this really the start, or are we dealing with a taxon of the same name?
636 while ((spot < searchTaxons.size()) && ((i+spot) < usersTaxon.size())) {
637 if (usersTaxon[i+spot].begin()->first != searchTaxons[spot].begin()->first) { goodspot = false; break; }
641 if (goodspot) { break; }
645 for (int i = 0; i < searchTaxons.size(); i++) {
647 if ((i+index) < usersTaxon.size()) { //just in case, should never be false
648 if (usersTaxon[i+index].begin()->second < searchTaxons[i].begin()->second) { //is the users cutoff less than the search taxons
658 //passed the test so add you
661 out << name << '\t' << tax << endl;
674 if (names.size() == 0) { m->mothurOut("Your taxonomy file does not contain any sequences from " + taxons + "."); m->mothurOutEndLine(); }
675 outputNames.push_back(outputFileName); outputTypes["taxonomy"].push_back(outputFileName);
680 catch(exception& e) {
681 m->errorOut(e, "GetLineageCommand", "readTax");
685 /**************************************************************************************************/
686 vector< map<string, float> > GetLineageCommand::getTaxons(string tax) {
689 vector< map<string, float> > t;
691 int taxLength = tax.length();
692 for(int i=0;i<taxLength;i++){
695 int openParen = taxon.find_first_of('(');
696 int closeParen = taxon.find_last_of(')');
698 string newtaxon, confidence;
699 if ((openParen != string::npos) && (closeParen != string::npos)) {
700 newtaxon = taxon.substr(0, openParen); //rip off confidence
701 confidence = taxon.substr((openParen+1), (closeParen-openParen-1));
707 convert(confidence, con);
709 map<string, float> temp;
710 temp[newtaxon] = con;
722 catch(exception& e) {
723 m->errorOut(e, "GetLineageCommand", "getTaxons");
727 /**************************************************************************************************/
728 string GetLineageCommand::removeConfidences(string tax) {
732 int taxLength = tax.length();
733 for(int i=0;i<taxLength;i++){
735 taxon = taxon.substr(0, taxon.find_first_of('(')); //rip off confidence
745 catch(exception& e) {
746 m->errorOut(e, "GetLineageCommand", "removeConfidences");
750 //**********************************************************************************************************************
751 //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
752 int GetLineageCommand::readAlign(){
754 string thisOutputDir = outputDir;
755 if (outputDir == "") { thisOutputDir += m->hasPath(alignfile); }
756 string outputFileName = thisOutputDir + m->getRootName(m->getSimpleName(alignfile)) + "pick.align.report";
758 m->openOutputFile(outputFileName, out);
762 m->openInputFile(alignfile, in);
765 bool wroteSomething = false;
767 //read column headers
768 for (int i = 0; i < 16; i++) {
769 if (!in.eof()) { in >> junk; out << junk << '\t'; }
776 if (m->control_pressed) { in.close(); out.close(); remove(outputFileName.c_str()); return 0; }
779 in >> name; //read from first column
781 //if this name is in the accnos file
782 if (names.count(name) != 0) {
783 wroteSomething = true;
788 for (int i = 0; i < 15; i++) {
789 if (!in.eof()) { in >> junk; out << junk << '\t'; }
794 }else {//still read just don't do anything with it
796 for (int i = 0; i < 15; i++) {
797 if (!in.eof()) { in >> junk; }
807 if (wroteSomething == false) { m->mothurOut("Your file does not contain any sequence from the .accnos file."); m->mothurOutEndLine(); }
808 outputNames.push_back(outputFileName); outputTypes["alignreport"].push_back(outputFileName);
813 catch(exception& e) {
814 m->errorOut(e, "GetLineageCommand", "readAlign");
818 //**********************************************************************************************************************