tomwalters@296: // Copyright 2008-2010, Thomas Walters
tomwalters@296: //
tomwalters@296: // AIM-C: A C++ implementation of the Auditory Image Model
tomwalters@296: // http://www.acousticscale.org/AIMC
tomwalters@296: //
tomwalters@296: // This program is free software: you can redistribute it and/or modify
tomwalters@296: // it under the terms of the GNU General Public License as published by
tomwalters@296: // the Free Software Foundation, either version 3 of the License, or
tomwalters@296: // (at your option) any later version.
tomwalters@296: //
tomwalters@296: // This program is distributed in the hope that it will be useful,
tomwalters@296: // but WITHOUT ANY WARRANTY; without even the implied warranty of
tomwalters@296: // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
tomwalters@296: // GNU General Public License for more details.
tomwalters@296: //
tomwalters@296: // You should have received a copy of the GNU General Public License
tomwalters@296: // along with this program.  If not, see <http://www.gnu.org/licenses/>.
tomwalters@296: 
tomwalters@296: /*!
tomwalters@296:  * \file AIMCopy.cpp
tomwalters@296:  * \brief AIM-C replacement for HTK's HCopy
tomwalters@296:  *
tomwalters@296:  * The following subset of the command-line flags
tomwalters@296:  * should be implemented from HCopy:
tomwalters@296:  *  -A      Print command line arguments         off
tomwalters@296:  *  -C cf   Set config file to cf                default 
tomwalters@296:  * (should be able to take multiple config files)
tomwalters@296:  *  -S f    Set script file to f                 none
tomwalters@296:  *  //! \todo -T N    Set trace flags to N                 0
tomwalters@296:  *  -V      Print version information            off
tomwalters@296:  *  -D of   Write configuration data to of       none
tomwalters@296:  *
tomwalters@296:  * \author Thomas Walters <tom@acousticscale.org>
tomwalters@296:  * \date created 2008/05/08
tomwalters@296:  * \version \$Id$
tomwalters@296:  */
tomwalters@296: 
tomwalters@296: #include <fstream>
tomwalters@296: #include <iostream>
tomwalters@296: #include <string>
tomwalters@296: #include <utility>
tomwalters@296: #include <vector>
tomwalters@296: 
tomwalters@296: #include <stdlib.h>
tomwalters@297: #include <time.h>
tomwalters@296: 
tomwalters@296: #include "Modules/Input/ModuleFileInput.h"
tomwalters@296: #include "Modules/BMM/ModuleGammatone.h"
tomwalters@296: #include "Modules/BMM/ModulePZFC.h"
tomwalters@296: #include "Modules/NAP/ModuleHCL.h"
tomwalters@296: #include "Modules/Strobes/ModuleParabola.h"
tomwalters@296: #include "Modules/SAI/ModuleSAI.h"
tomwalters@296: #include "Modules/SSI/ModuleSSI.h"
tomwalters@296: #include "Modules/Profile/ModuleSlice.h"
tomwalters@296: #include "Modules/Profile/ModuleScaler.h"
tomwalters@296: #include "Modules/Features/ModuleGaussians.h"
tomwalters@296: #include "Modules/Output/FileOutputHTK.h"
tomwalters@296: #include "Support/Common.h"
tomwalters@296: #include "Support/FileList.h"
tomwalters@296: #include "Support/Parameters.h"
tomwalters@296: 
tomwalters@296: using std::ofstream;
tomwalters@296: using std::pair;
tomwalters@296: using std::vector;
tomwalters@296: using std::string;
tomwalters@296: int main(int argc, char* argv[]) {
tomwalters@296:   string sound_file;
tomwalters@296:   string data_file;
tomwalters@296:   string config_file;
tomwalters@296:   string script_file;
tomwalters@296:   bool write_data = false;
tomwalters@296:   bool print_version = false;
tomwalters@296: 
tomwalters@296:   string version_string(
tomwalters@296:     " AIM-C AIMCopy\n"
tomwalters@296:     "  (c) 2006-2010, Thomas Walters and Willem van Engen\n"
tomwalters@296:     "  http://www.acoustiscale.org/AIMC/\n"
tomwalters@296:     "\n");
tomwalters@296: 
tomwalters@296:   if (argc < 2) {
tomwalters@296:     printf("%s", version_string.c_str());
tomwalters@296:     printf("AIMCopy is intended as a drop-in replacement for HTK's HCopy\n");
tomwalters@296:     printf("command. It is used for making features from audio files for\n");
tomwalters@296:     printf("use with HTK.\n");
tomwalters@296:     printf("Usage: \n");
tomwalters@296:     printf("  -A      Print command line arguments  off\n");
tomwalters@296:     printf("  -C cf   Set config file to cf         none\n");
tomwalters@296:     printf("  -S f    Set script file to f          none\n");
tomwalters@296:     printf("  -V      Print version information     off\n");
tomwalters@296:     printf("  -D g    Write configuration data to g none\n");
tomwalters@296:     return -1;
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   // Parse command-line arguments
tomwalters@296:   for (int i = 1; i < argc; i++) {
tomwalters@296:     if (strcmp(argv[i],"-A") == 0) {
tomwalters@296:       for (int j = 0; j < argc; j++)
tomwalters@296:         printf("%s ",argv[j]);
tomwalters@296:       printf("\n");
tomwalters@296:       fflush(stdout);
tomwalters@296:       continue;
tomwalters@296:     }
tomwalters@296:     if (strcmp(argv[i],"-C") == 0) {
tomwalters@296:       if (++i >= argc) {
tomwalters@296:         aimc::LOG_ERROR(_T("Configuration file name expected after -C"));
tomwalters@296:         return(-1);
tomwalters@296:       }
tomwalters@296:       config_file = argv[i];
tomwalters@296:       continue;
tomwalters@296:     }
tomwalters@296:     if (strcmp(argv[i],"-S") == 0) {
tomwalters@296:       if (++i >= argc) {
tomwalters@296:         aimc::LOG_ERROR(_T("Script file name expected after -S"));
tomwalters@296:         return(-1);
tomwalters@296:       }
tomwalters@296:       script_file = argv[i];
tomwalters@296:       continue;
tomwalters@296:     }
tomwalters@296:     if (strcmp(argv[i],"-D") == 0) {
tomwalters@296:       if (++i >= argc) {
tomwalters@296:         aimc::LOG_ERROR(_T("Data file name expected after -D"));
tomwalters@296:         return(-1);
tomwalters@296:       }
tomwalters@296:       data_file = argv[i];
tomwalters@296:       write_data = true;
tomwalters@296:       continue;
tomwalters@296:     }
tomwalters@296:     if (strcmp(argv[i],"-V") == 0) {
tomwalters@296:       print_version = true;
tomwalters@296:       continue;
tomwalters@296:     }
tomwalters@296:     aimc::LOG_ERROR(_T("Unrecognized command-line argument: %s"), argv[i]);
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   if (print_version)
tomwalters@296:     printf("%s", version_string.c_str());
tomwalters@296: 
tomwalters@296:   aimc::Parameters params;
tomwalters@296: 
tomwalters@296:   if (!params.Load(config_file.c_str())) {
tomwalters@296:     aimc::LOG_ERROR(_T("Couldn't load parameters from file %s"),
tomwalters@296:                     config_file.c_str());
tomwalters@296:     return -1;
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   vector<pair<string, string> > file_list = aimc::FileList::Load(script_file);
tomwalters@296:   if (file_list.size() == 0) {
tomwalters@296:     aimc::LOG_ERROR("No data read from file %s", script_file.c_str());
tomwalters@296:     return -1;
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   // Set up AIM-C processor here
tomwalters@296:   aimc::ModuleFileInput input(&params);
tomwalters@296:   aimc::ModuleGammatone bmm(&params);
tomwalters@296:   aimc::ModuleHCL nap(&params);
tomwalters@296:   aimc::ModuleSlice profile(&params);
tomwalters@296:   aimc::ModuleScaler scaler(&params);
tomwalters@296:   aimc::ModuleGaussians features(&params);
tomwalters@296:   aimc::FileOutputHTK output(&params);
tomwalters@296: 
tomwalters@296:   input.AddTarget(&bmm);
tomwalters@296:   bmm.AddTarget(&nap);
tomwalters@296:   nap.AddTarget(&profile);
tomwalters@296:   profile.AddTarget(&scaler);
tomwalters@296:   scaler.AddTarget(&features);
tomwalters@296:   features.AddTarget(&output);
tomwalters@296: 
tomwalters@296:   if (write_data) {
tomwalters@296:     ofstream outfile(data_file.c_str());
tomwalters@296:     if (outfile.fail()) {
tomwalters@296:       aimc::LOG_ERROR("Couldn't open data file %s for writing",
tomwalters@296:                       data_file.c_str());
tomwalters@296:       return -1;
tomwalters@296:     }
tomwalters@297:     time_t rawtime;
tomwalters@297:     struct tm * timeinfo;
tomwalters@297:     time(&rawtime);
tomwalters@297:     timeinfo = localtime(&rawtime);
tomwalters@297: 
tomwalters@297: 
tomwalters@296:     outfile << "# AIM-C AIMCopy\n";
tomwalters@297:     outfile << "# Run on: " << asctime(timeinfo);
tomwalters@297:     char * descr = getenv("USER");
tomwalters@297:     if (descr) {
tomwalters@297:       outfile << "# By user: " << descr <<"\n";
tomwalters@297:     }
tomwalters@297:     outfile << "# Module chain: file_input->gt->hcl->slice->scaler->";
tomwalters@297:     outfile << "gaussians->out_htk\n";
tomwalters@296:     outfile << "# Module versions:\n";
tomwalters@296:     outfile << "# " << input.id() << " : " << input.version() << "\n";
tomwalters@296:     outfile << "# " << bmm.id() << " : " << bmm.version() << "\n";
tomwalters@296:     outfile << "# " << nap.id() << " : " << nap.version() << "\n";
tomwalters@296:     outfile << "# " << profile.id() << " : " << profile.version() << "\n";
tomwalters@296:     outfile << "# " << scaler.id() << " : " << scaler.version() << "\n";
tomwalters@296:     outfile << "# " << features.id() << " : " << features.version() << "\n";
tomwalters@296:     outfile << "# " << output.id() << " : " << output.version() << "\n";
tomwalters@296:     outfile << "#\n";
tomwalters@296:     outfile << "# Parameters:\n";
tomwalters@296:     outfile << params.WriteString();
tomwalters@296:     outfile.close();
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   for (unsigned int i = 0; i < file_list.size(); ++i) {
tomwalters@296:     aimc::LOG_INFO(_T("In:  %s"), file_list[i].first.c_str());
tomwalters@296:     aimc::LOG_INFO(_T("Out: %s"), file_list[i].second.c_str());
tomwalters@296: 
tomwalters@296:     output.OpenFile(file_list[i].second.c_str(), 10.0f);
tomwalters@296:     if (input.LoadFile(file_list[i].first.c_str())) {
tomwalters@296:       input.Process();
tomwalters@296:     } else {
tomwalters@296:       printf("LoadFile failed for file %s\n", file_list[i].first.c_str());
tomwalters@296:     }
tomwalters@296:     input.Reset();
tomwalters@296:   }
tomwalters@296: 
tomwalters@296:   return 0;
tomwalters@296: }