]> git.donarmstrong.com Git - mothur.git/blobdiff - classify.cpp
moved utilities out of mothur.h and into mothurOut class.
[mothur.git] / classify.cpp
index 605c1f8f3c6470310a649cebfcc090141eb7d70d..875628d85d8dbcb4caf6d712b41be517eefef733 100644 (file)
 #include "kmerdb.hpp"
 #include "suffixdb.hpp"
 #include "blastdb.hpp"
+#include "distancedb.hpp"
 
 /**************************************************************************************************/
-
-Classify::Classify(string tfile, string tempFile, string method, int kmerSize, int gapOpen, int gapExtend, int match, int misMatch) : taxFile(tfile), templateFile(tempFile) {         
-       try {                                                                                   
+void Classify::generateDatabaseAndNames(string tfile, string tempFile, string method, int kmerSize, float gapOpen, float gapExtend, float match, float misMatch)  {            
+       try {   
+               taxFile = tfile;
+               readTaxonomy(taxFile);  
                
-               readTaxonomy(taxFile);
+               templateFile = tempFile;        
                
+               int start = time(NULL);
                int numSeqs = 0;
+               
+               m->mothurOut("Generating search database...    "); cout.flush();
+#ifdef USE_MPI 
+                       int pid, processors;
+                       vector<unsigned long int> positions;
+                       int tag = 2001;
+               
+                       MPI_Status status; 
+                       MPI_File inMPI;
+                       MPI_Comm_rank(MPI_COMM_WORLD, &pid); //find out who we are
+                       MPI_Comm_size(MPI_COMM_WORLD, &processors);
+
+                       //char* inFileName = new char[tempFile.length()];
+                       //memcpy(inFileName, tempFile.c_str(), tempFile.length());
+                       
+                       char inFileName[1024];
+                       strcpy(inFileName, tempFile.c_str());
+
+                       MPI_File_open(MPI_COMM_WORLD, inFileName, MPI_MODE_RDONLY, MPI_INFO_NULL, &inMPI);  //comm, filename, mode, info, filepointer
+                       //delete inFileName;
+
+                       if (pid == 0) { //only one process needs to scan file
+                               positions = m->setFilePosFasta(tempFile, numSeqs); //fills MPIPos, returns numSeqs
+
+                               //send file positions to all processes
+                               for(int i = 1; i < processors; i++) { 
+                                       MPI_Send(&numSeqs, 1, MPI_INT, i, tag, MPI_COMM_WORLD);
+                                       MPI_Send(&positions[0], (numSeqs+1), MPI_LONG, i, tag, MPI_COMM_WORLD);
+                               }
+                       }else{
+                               MPI_Recv(&numSeqs, 1, MPI_INT, 0, tag, MPI_COMM_WORLD, &status);
+                               positions.resize(numSeqs+1);
+                               MPI_Recv(&positions[0], (numSeqs+1), MPI_LONG, 0, tag, MPI_COMM_WORLD, &status);
+                       }
+                       
+                       //create database
+                       if(method == "kmer")                    {       database = new KmerDB(tempFile, kmerSize);                      }
+                       else if(method == "suffix")             {       database = new SuffixDB(numSeqs);                                                               }
+                       else if(method == "blast")              {       database = new BlastDB(gapOpen, gapExtend, match, misMatch);    }
+                       else if(method == "distance")   {       database = new DistanceDB();    }
+                       else {
+                               m->mothurOut(method + " is not a valid search option. I will run the command using kmer, ksize=8."); m->mothurOutEndLine();
+                               database = new KmerDB(tempFile, 8);
+                       }
+
+                       //read file 
+                       for(int i=0;i<numSeqs;i++){
+                               //read next sequence
+                               int length = positions[i+1] - positions[i];
+                               char* buf4 = new char[length];
+                               MPI_File_read_at(inMPI, positions[i], buf4, length, MPI_CHAR, &status);
+                               
+                               string tempBuf = buf4;
+                               if (tempBuf.length() > length) { tempBuf = tempBuf.substr(0, length); }
+                               delete buf4;
+                               istringstream iss (tempBuf,istringstream::in);
+                               
+                               Sequence temp(iss);  
+                               if (temp.getName() != "") {
+                                       names.push_back(temp.getName());
+                                       database->addSequence(temp);    
+                               }
+                       }
+                       
+                       database->generateDB();
+                       MPI_File_close(&inMPI);
+                       MPI_Barrier(MPI_COMM_WORLD); //make everyone wait - just in case
+       #else
+               
                //need to know number of template seqs for suffixdb
                if (method == "suffix") {
                        ifstream inFASTA;
-                       openInputFile(tempFile, inFASTA);
-                       numSeqs = count(istreambuf_iterator<char>(inFASTA),istreambuf_iterator<char>(), '>');
+                       m->openInputFile(tempFile, inFASTA);
+                       m->getNumSeqs(inFASTA, numSeqs);
                        inFASTA.close();
                }
 
-               mothurOut("Generating search database...    "); cout.flush();
-                               
                bool needToGenerate = true;
                string kmerDBName;
                if(method == "kmer")                    {       
@@ -38,25 +108,30 @@ Classify::Classify(string tfile, string tempFile, string method, int kmerSize, i
                        
                        kmerDBName = tempFile.substr(0,tempFile.find_last_of(".")+1) + char('0'+ kmerSize) + "mer";
                        ifstream kmerFileTest(kmerDBName.c_str());
-                       if(kmerFileTest){       needToGenerate = false;         }
+                       if(kmerFileTest){       
+                               bool GoodFile = m->checkReleaseVersion(kmerFileTest, m->getVersion());
+                               if (GoodFile) {  needToGenerate = false;        }
+                       }
                }
                else if(method == "suffix")             {       database = new SuffixDB(numSeqs);                                                               }
                else if(method == "blast")              {       database = new BlastDB(gapOpen, gapExtend, match, misMatch);    }
+               else if(method == "distance")   {       database = new DistanceDB();    }
                else {
-                       mothurOut(method + " is not a valid search option. I will run the command using kmer, ksize=8.");
-                       mothurOutEndLine();
+                       m->mothurOut(method + " is not a valid search option. I will run the command using kmer, ksize=8.");
+                       m->mothurOutEndLine();
                        database = new KmerDB(tempFile, 8);
                }
                
                if (needToGenerate) {
                        ifstream fastaFile;
-                       openInputFile(tempFile, fastaFile);
-               
+                       m->openInputFile(tempFile, fastaFile);
+                       
                        while (!fastaFile.eof()) {
                                Sequence temp(fastaFile);
-                               gobble(fastaFile);
+                               m->gobble(fastaFile);
                        
                                names.push_back(temp.getName());
+                                                       
                                database->addSequence(temp);    
                        }
                        fastaFile.close();
@@ -66,57 +141,157 @@ Classify::Classify(string tfile, string tempFile, string method, int kmerSize, i
                }else if ((method == "kmer") && (!needToGenerate)) {    
                        ifstream kmerFileTest(kmerDBName.c_str());
                        database->readKmerDB(kmerFileTest);     
-                       
-                       ifstream fastaFile;
-                       openInputFile(tempFile, fastaFile);
                
+                       ifstream fastaFile;
+                       m->openInputFile(tempFile, fastaFile);
+                       
                        while (!fastaFile.eof()) {
                                Sequence temp(fastaFile);
-                               gobble(fastaFile);
-                       
+                               m->gobble(fastaFile);
+
                                names.push_back(temp.getName());
                        }
                        fastaFile.close();
                }
-               
+#endif 
+       
                database->setNumSeqs(names.size());
                
-               mothurOut("DONE."); mothurOutEndLine();
+               //sanity check
+               bool okay = phyloTree->ErrorCheck(names);
+               
+               if (!okay) { m->control_pressed = true; }
+               
+               m->mothurOut("DONE."); m->mothurOutEndLine();
+               m->mothurOut("It took " + toString(time(NULL) - start) + " seconds generate search database. "); m->mothurOutEndLine();
 
        }
        catch(exception& e) {
-               errorOut(e, "Classify", "Classify");
+               m->errorOut(e, "Classify", "generateDatabaseAndNames");
                exit(1);
        }
 }
 /**************************************************************************************************/
+Classify::Classify() {         m = MothurOut::getInstance();   database = NULL;        }
+/**************************************************************************************************/
 
-void Classify::readTaxonomy(string file) {
+int Classify::readTaxonomy(string file) {
        try {
+               
+               phyloTree = new PhyloTree();
+               string name, taxInfo;
+               
+               m->mothurOutEndLine();
+               m->mothurOut("Reading in the " + file + " taxonomy...\t");      cout.flush();
+
+#ifdef USE_MPI 
+               int pid, num, processors;
+               vector<unsigned long int> positions;
+               int tag = 2001;
+               
+               MPI_Status status; 
+               MPI_File inMPI;
+               MPI_Comm_rank(MPI_COMM_WORLD, &pid); //find out who we are
+               MPI_Comm_size(MPI_COMM_WORLD, &processors);
+
+               //char* inFileName = new char[file.length()];
+               //memcpy(inFileName, file.c_str(), file.length());
+               
+               char inFileName[1024];
+               strcpy(inFileName, file.c_str());
+
+               MPI_File_open(MPI_COMM_WORLD, inFileName, MPI_MODE_RDONLY, MPI_INFO_NULL, &inMPI);  //comm, filename, mode, info, filepointer
+               //delete inFileName;
+
+               if (pid == 0) {
+                       positions = m->setFilePosEachLine(file, num);
+                       
+                       //send file positions to all processes
+                       for(int i = 1; i < processors; i++) { 
+                               MPI_Send(&num, 1, MPI_INT, i, tag, MPI_COMM_WORLD);
+                               MPI_Send(&positions[0], (num+1), MPI_LONG, i, tag, MPI_COMM_WORLD);
+                       }
+               }else{
+                       MPI_Recv(&num, 1, MPI_INT, 0, tag, MPI_COMM_WORLD, &status);
+                       positions.resize(num+1);
+                       MPI_Recv(&positions[0], (num+1), MPI_LONG, 0, tag, MPI_COMM_WORLD, &status);
+               }
        
+               //read file 
+               for(int i=0;i<num;i++){
+                       //read next sequence
+                       int length = positions[i+1] - positions[i];
+                       char* buf4 = new char[length];
+
+                       MPI_File_read_at(inMPI, positions[i], buf4, length, MPI_CHAR, &status);
+
+                       string tempBuf = buf4;
+                       if (tempBuf.length() > length) { tempBuf = tempBuf.substr(0, length); }
+                       delete buf4;
+
+                       istringstream iss (tempBuf,istringstream::in);
+                       iss >> name >> taxInfo;
+                       taxonomy[name] = taxInfo;
+                       phyloTree->addSeqToTree(name, taxInfo);
+               }
+               
+               MPI_File_close(&inMPI);
+               MPI_Barrier(MPI_COMM_WORLD); //make everyone wait - just in case
+#else                          
                ifstream inTax;
-               openInputFile(file, inTax);
+               m->openInputFile(file, inTax);
        
-               mothurOutEndLine();
-               mothurOut("Reading in the " + file + " taxonomy...\t"); cout.flush();
-               
-               string name, taxInfo;
                //read template seqs and save
                while (!inTax.eof()) {
                        inTax >> name >> taxInfo;
                        
                        taxonomy[name] = taxInfo;
+                       
+                       phyloTree->addSeqToTree(name, taxInfo);
                
-                       gobble(inTax);
+                       m->gobble(inTax);
                }
                inTax.close();
+#endif 
        
-               mothurOut("DONE.");
-               mothurOutEndLine();     cout.flush();
+               phyloTree->assignHeirarchyIDs(0);
+               
+               phyloTree->setUp(file);
        
+               m->mothurOut("DONE.");
+               m->mothurOutEndLine();  cout.flush();
+               
+               return phyloTree->getNumSeqs();
+       
+       }
+       catch(exception& e) {
+               m->errorOut(e, "Classify", "readTaxonomy");
+               exit(1);
+       }
+}
+/**************************************************************************************************/
+
+vector<string> Classify::parseTax(string tax) {
+       try {
+               vector<string> taxons;
+               
+               tax = tax.substr(0, tax.length()-1);  //get rid of last ';'
+       
+               //parse taxonomy
+               string individual;
+               while (tax.find_first_of(';') != -1) {
+                       individual = tax.substr(0,tax.find_first_of(';'));
+                       tax = tax.substr(tax.find_first_of(';')+1, tax.length());
+                       taxons.push_back(individual);
+                       
+               }
+               //get last one
+               taxons.push_back(tax);
+               
+               return taxons;
        }
        catch(exception& e) {
-               errorOut(e, "Classify", "readTaxonomy");
+               m->errorOut(e, "Classify", "parseTax");
                exit(1);
        }
 }