annotate trunk/src/Main/AIMCopy_SSI_Features_v4_PZFC.cc @ 706:f8e90b5d85fd tip

Delete CARFAC code from this repository. It has been moved to https://github.com/google/carfac Please email me with your github username to get access. I've also created a new mailing list to discuss CARFAC development: https://groups.google.com/forum/#!forum/carfac-dev
author ronw@google.com
date Thu, 18 Jul 2013 20:56:51 +0000
parents 30dde71d0230
children
rev   line source
tomwalters@317 1 // Copyright 2008-2010, Thomas Walters
tomwalters@317 2 //
tomwalters@317 3 // AIM-C: A C++ implementation of the Auditory Image Model
tomwalters@317 4 // http://www.acousticscale.org/AIMC
tomwalters@317 5 //
tomwalters@318 6 // Licensed under the Apache License, Version 2.0 (the "License");
tomwalters@318 7 // you may not use this file except in compliance with the License.
tomwalters@318 8 // You may obtain a copy of the License at
tomwalters@317 9 //
tomwalters@318 10 // http://www.apache.org/licenses/LICENSE-2.0
tomwalters@317 11 //
tomwalters@318 12 // Unless required by applicable law or agreed to in writing, software
tomwalters@318 13 // distributed under the License is distributed on an "AS IS" BASIS,
tomwalters@318 14 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
tomwalters@318 15 // See the License for the specific language governing permissions and
tomwalters@318 16 // limitations under the License.
tomwalters@317 17
tomwalters@317 18 /*!
tomwalters@317 19 * \file AIMCopy.cpp
tomwalters@317 20 * \brief AIM-C replacement for HTK's HCopy
tomwalters@317 21 *
tomwalters@317 22 * The following subset of the command-line flags
tomwalters@317 23 * should be implemented from HCopy:
tomwalters@317 24 * -A Print command line arguments off
tomwalters@317 25 * -C cf Set config file to cf default
tomwalters@317 26 * (should be able to take multiple config files)
tomwalters@317 27 * -S f Set script file to f none
tomwalters@317 28 * //! \todo -T N Set trace flags to N 0
tomwalters@317 29 * -V Print version information off
tomwalters@317 30 * -D of Write configuration data to of none
tomwalters@317 31 *
tomwalters@317 32 * \author Thomas Walters <tom@acousticscale.org>
tomwalters@317 33 * \date created 2008/05/08
tomwalters@317 34 * \version \$Id$
tomwalters@317 35 */
tomwalters@317 36
tomwalters@317 37 #include <fstream>
tomwalters@317 38 #include <iostream>
tomwalters@317 39 #include <string>
tomwalters@317 40 #include <utility>
tomwalters@317 41 #include <vector>
tomwalters@317 42
tomwalters@317 43 #include <stdlib.h>
tomwalters@317 44 #include <time.h>
tomwalters@317 45
tomwalters@317 46 #include "Modules/Input/ModuleFileInput.h"
tomwalters@317 47 #include "Modules/BMM/ModuleGammatone.h"
tomwalters@317 48 #include "Modules/BMM/ModulePZFC.h"
tomwalters@317 49 #include "Modules/NAP/ModuleHCL.h"
tomwalters@317 50 #include "Modules/Strobes/ModuleParabola.h"
tomwalters@317 51 #include "Modules/Strobes/ModuleLocalMax.h"
tomwalters@317 52 #include "Modules/SAI/ModuleSAI.h"
tomwalters@317 53 #include "Modules/SSI/ModuleSSI.h"
tomwalters@317 54 #include "Modules/SNR/ModuleNoise.h"
tomwalters@317 55 #include "Modules/Profile/ModuleSlice.h"
tomwalters@317 56 #include "Modules/Profile/ModuleScaler.h"
tomwalters@317 57 #include "Modules/Features/ModuleGaussians.h"
tomwalters@317 58 #include "Modules/Output/FileOutputHTK.h"
tomwalters@317 59 #include "Support/Common.h"
tomwalters@317 60 #include "Support/FileList.h"
tomwalters@317 61 #include "Support/Parameters.h"
tomwalters@317 62
tomwalters@317 63 using std::ofstream;
tomwalters@317 64 using std::pair;
tomwalters@317 65 using std::vector;
tomwalters@317 66 using std::string;
tomwalters@317 67 int main(int argc, char* argv[]) {
tomwalters@317 68 string sound_file;
tomwalters@317 69 string data_file;
tomwalters@317 70 string config_file;
tomwalters@317 71 string script_file;
tomwalters@317 72 bool write_data = false;
tomwalters@317 73 bool print_version = false;
tomwalters@317 74
tomwalters@317 75 string version_string(
tomwalters@317 76 " AIM-C AIMCopy\n"
tomwalters@317 77 " (c) 2006-2010, Thomas Walters and Willem van Engen\n"
tomwalters@317 78 " http://www.acoustiscale.org/AIMC/\n"
tomwalters@317 79 "\n");
tomwalters@317 80
tomwalters@317 81 if (argc < 2) {
tomwalters@317 82 printf("%s", version_string.c_str());
tomwalters@317 83 printf("AIMCopy is intended as a drop-in replacement for HTK's HCopy\n");
tomwalters@317 84 printf("command. It is used for making features from audio files for\n");
tomwalters@317 85 printf("use with HTK.\n");
tomwalters@317 86 printf("Usage: \n");
tomwalters@317 87 printf(" -A Print command line arguments off\n");
tomwalters@317 88 printf(" -C cf Set config file to cf none\n");
tomwalters@317 89 printf(" -S f Set script file to f none\n");
tomwalters@317 90 printf(" -V Print version information off\n");
tomwalters@317 91 printf(" -D g Write configuration data to g none\n");
tomwalters@317 92 return -1;
tomwalters@317 93 }
tomwalters@317 94
tomwalters@317 95 // Parse command-line arguments
tomwalters@317 96 for (int i = 1; i < argc; i++) {
tomwalters@317 97 if (strcmp(argv[i],"-A") == 0) {
tomwalters@317 98 for (int j = 0; j < argc; j++)
tomwalters@317 99 printf("%s ",argv[j]);
tomwalters@317 100 printf("\n");
tomwalters@317 101 fflush(stdout);
tomwalters@317 102 continue;
tomwalters@317 103 }
tomwalters@317 104 if (strcmp(argv[i],"-C") == 0) {
tomwalters@317 105 if (++i >= argc) {
tomwalters@317 106 aimc::LOG_ERROR(_T("Configuration file name expected after -C"));
tomwalters@317 107 return(-1);
tomwalters@317 108 }
tomwalters@317 109 config_file = argv[i];
tomwalters@317 110 continue;
tomwalters@317 111 }
tomwalters@317 112 if (strcmp(argv[i],"-S") == 0) {
tomwalters@317 113 if (++i >= argc) {
tomwalters@317 114 aimc::LOG_ERROR(_T("Script file name expected after -S"));
tomwalters@317 115 return(-1);
tomwalters@317 116 }
tomwalters@317 117 script_file = argv[i];
tomwalters@317 118 continue;
tomwalters@317 119 }
tomwalters@317 120 if (strcmp(argv[i],"-D") == 0) {
tomwalters@317 121 if (++i >= argc) {
tomwalters@317 122 aimc::LOG_ERROR(_T("Data file name expected after -D"));
tomwalters@317 123 return(-1);
tomwalters@317 124 }
tomwalters@317 125 data_file = argv[i];
tomwalters@317 126 write_data = true;
tomwalters@317 127 continue;
tomwalters@317 128 }
tomwalters@317 129 if (strcmp(argv[i],"-V") == 0) {
tomwalters@317 130 print_version = true;
tomwalters@317 131 continue;
tomwalters@317 132 }
tomwalters@317 133 aimc::LOG_ERROR(_T("Unrecognized command-line argument: %s"), argv[i]);
tomwalters@317 134 }
tomwalters@317 135
tomwalters@317 136 if (print_version)
tomwalters@317 137 printf("%s", version_string.c_str());
tomwalters@317 138
tomwalters@317 139 aimc::Parameters params;
tomwalters@317 140
tomwalters@317 141 if (!params.Load(config_file.c_str())) {
tomwalters@317 142 aimc::LOG_ERROR(_T("Couldn't load parameters from file %s"),
tomwalters@317 143 config_file.c_str());
tomwalters@317 144 return -1;
tomwalters@317 145 }
tomwalters@317 146
tomwalters@317 147 vector<pair<string, string> > file_list = aimc::FileList::Load(script_file);
tomwalters@317 148 if (file_list.size() == 0) {
tomwalters@317 149 aimc::LOG_ERROR("No data read from file %s", script_file.c_str());
tomwalters@317 150 return -1;
tomwalters@317 151 }
tomwalters@317 152
tomwalters@317 153 // Set up AIM-C processor here
tomwalters@317 154 aimc::ModuleFileInput input(&params);
tomwalters@317 155 //aimc::ModuleNoise noise_maker(&params);
tomwalters@317 156 aimc::ModulePZFC bmm(&params);
tomwalters@317 157 aimc::ModuleHCL nap(&params);
tomwalters@317 158 aimc::ModuleLocalMax strobes(&params);
tomwalters@317 159 aimc::ModuleSAI sai(&params);
tomwalters@317 160 params.SetBool("ssi.pitch_cutoff", false);
tomwalters@317 161 aimc::ModuleSSI ssi_no_cutoff(&params);
tomwalters@317 162
tomwalters@317 163 params.SetBool("ssi.pitch_cutoff", true);
tomwalters@317 164 params.SetFloat("ssi.pitch_search_start_ms", 4.6f);
tomwalters@317 165 aimc::ModuleSSI ssi_cutoff(&params);
tomwalters@317 166
tomwalters@317 167 params.SetBool("slice.all", false);
tomwalters@317 168 params.SetInt("slice.lower_index", 77);
tomwalters@317 169 params.SetInt("slice.upper_index", 150);
tomwalters@317 170 aimc::ModuleSlice slice_ssi_slice_1_no_cutoff(&params);
tomwalters@317 171 aimc::ModuleSlice slice_ssi_slice_1_cutoff(&params);
tomwalters@317 172
tomwalters@317 173 params.SetBool("slice.all", true);
tomwalters@317 174 aimc::ModuleSlice slice_ssi_all_no_cutoff(&params);
tomwalters@317 175 aimc::ModuleSlice slice_ssi_all_cutoff(&params);
tomwalters@317 176
tomwalters@317 177 params.SetFloat("nap.lowpass_cutoff", 100.0);
tomwalters@317 178 aimc::ModuleHCL smooth_nap(&params);
tomwalters@317 179 params.SetBool("slice.all", true);
tomwalters@317 180 aimc::ModuleSlice nap_profile(&params);
tomwalters@317 181 aimc::ModuleScaler nap_scaler(&params);
tomwalters@317 182
tomwalters@317 183 aimc::ModuleGaussians nap_features(&params);
tomwalters@317 184 aimc::ModuleGaussians features_ssi_slice1_no_cutoff(&params);
tomwalters@317 185 aimc::ModuleGaussians features_ssi_slice1_cutoff(&params);
tomwalters@317 186 aimc::ModuleGaussians features_ssi_all_no_cutoff(&params);
tomwalters@317 187 aimc::ModuleGaussians features_ssi_all_cutoff(&params);
tomwalters@317 188
tomwalters@317 189 aimc::FileOutputHTK nap_out(&params);
tomwalters@317 190 aimc::FileOutputHTK output_ssi_slice1_no_cutoff(&params);
tomwalters@317 191 aimc::FileOutputHTK output_ssi_slice1_cutoff(&params);
tomwalters@317 192 aimc::FileOutputHTK output_ssi_all_no_cutoff(&params);
tomwalters@317 193 aimc::FileOutputHTK output_ssi_all_cutoff(&params);
tomwalters@317 194
tomwalters@317 195 input.AddTarget(&bmm);
tomwalters@317 196 //noise_maker.AddTarget(&bmm);
tomwalters@317 197 bmm.AddTarget(&nap);
tomwalters@317 198 bmm.AddTarget(&smooth_nap);
tomwalters@317 199 smooth_nap.AddTarget(&nap_profile);
tomwalters@317 200 nap_profile.AddTarget(&nap_scaler);
tomwalters@317 201 nap_scaler.AddTarget(&nap_features);
tomwalters@317 202 nap_features.AddTarget(&nap_out);
tomwalters@317 203
tomwalters@317 204 nap.AddTarget(&strobes);
tomwalters@317 205 strobes.AddTarget(&sai);
tomwalters@317 206 sai.AddTarget(&ssi_no_cutoff);
tomwalters@317 207 sai.AddTarget(&ssi_cutoff);
tomwalters@317 208
tomwalters@317 209 ssi_no_cutoff.AddTarget(&slice_ssi_slice_1_no_cutoff);
tomwalters@317 210 ssi_no_cutoff.AddTarget(&slice_ssi_all_no_cutoff);
tomwalters@317 211 ssi_cutoff.AddTarget(&slice_ssi_slice_1_cutoff);
tomwalters@317 212 ssi_cutoff.AddTarget(&slice_ssi_all_cutoff);
tomwalters@317 213
tomwalters@317 214 slice_ssi_slice_1_no_cutoff.AddTarget(&features_ssi_slice1_no_cutoff);
tomwalters@317 215 slice_ssi_all_no_cutoff.AddTarget(&features_ssi_all_no_cutoff);
tomwalters@317 216 slice_ssi_slice_1_cutoff.AddTarget(&features_ssi_slice1_cutoff);
tomwalters@317 217 slice_ssi_all_cutoff.AddTarget(&features_ssi_all_cutoff);
tomwalters@317 218
tomwalters@317 219
tomwalters@317 220 features_ssi_slice1_no_cutoff.AddTarget(&output_ssi_slice1_no_cutoff);
tomwalters@317 221 features_ssi_all_no_cutoff.AddTarget(&output_ssi_all_no_cutoff);
tomwalters@317 222 features_ssi_slice1_cutoff.AddTarget(&output_ssi_slice1_cutoff);
tomwalters@317 223 features_ssi_all_cutoff.AddTarget(&output_ssi_all_cutoff);
tomwalters@317 224
tomwalters@317 225
tomwalters@317 226 if (write_data) {
tomwalters@317 227 ofstream outfile(data_file.c_str());
tomwalters@317 228 if (outfile.fail()) {
tomwalters@317 229 aimc::LOG_ERROR("Couldn't open data file %s for writing",
tomwalters@317 230 data_file.c_str());
tomwalters@317 231 return -1;
tomwalters@317 232 }
tomwalters@317 233 time_t rawtime;
tomwalters@317 234 struct tm * timeinfo;
tomwalters@317 235 time(&rawtime);
tomwalters@317 236 timeinfo = localtime(&rawtime);
tomwalters@317 237
tomwalters@317 238
tomwalters@317 239 outfile << "# AIM-C AIMCopy\n";
tomwalters@317 240 outfile << "# Run on: " << asctime(timeinfo);
tomwalters@317 241 char * descr = getenv("USER");
tomwalters@317 242 if (descr) {
tomwalters@317 243 outfile << "# By user: " << descr <<"\n";
tomwalters@317 244 }
tomwalters@317 245 outfile << "#Module chain: ";
tomwalters@317 246 outfile << "# ";
tomwalters@317 247 outfile << "# Module versions:\n";
tomwalters@317 248 outfile << "# " << input.id() << " : " << input.version() << "\n";
tomwalters@317 249 outfile << "# " << bmm.id() << " : " << bmm.version() << "\n";
tomwalters@317 250 outfile << "# " << nap.id() << " : " << nap.version() << "\n";
tomwalters@317 251 outfile << "# " << strobes.id() << " : " << strobes.version() << "\n";
tomwalters@317 252 outfile << "# " << sai.id() << " : " << sai.version() << "\n";
tomwalters@317 253 outfile << "#\n";
tomwalters@317 254 outfile << "# Parameters:\n";
tomwalters@317 255 outfile << params.WriteString();
tomwalters@317 256 outfile.close();
tomwalters@317 257 }
tomwalters@317 258
tomwalters@317 259 for (unsigned int i = 0; i < file_list.size(); ++i) {
tomwalters@317 260 // aimc::LOG_INFO(_T("In: %s"), file_list[i].first.c_str());
tomwalters@317 261 aimc::LOG_INFO(_T("Out: %s"), file_list[i].second.c_str());
tomwalters@317 262
tomwalters@317 263 string filename = file_list[i].second + ".slice_1_no_cutoff";
tomwalters@317 264 output_ssi_slice1_no_cutoff.OpenFile(filename.c_str(), 10.0f);
tomwalters@317 265 filename = file_list[i].second + ".ssi_profile_no_cutoff";
tomwalters@317 266 output_ssi_all_no_cutoff.OpenFile(filename.c_str(), 10.0f);
tomwalters@317 267 filename = file_list[i].second + ".slice_1_cutoff";
tomwalters@317 268 output_ssi_slice1_cutoff.OpenFile(filename.c_str(), 10.0f);
tomwalters@317 269 filename = file_list[i].second + ".ssi_profile_cutoff";
tomwalters@317 270 output_ssi_all_cutoff.OpenFile(filename.c_str(), 10.0f);
tomwalters@317 271 filename = file_list[i].second + ".smooth_nap_profile";
tomwalters@317 272 nap_out.OpenFile(filename.c_str(), 10.0f);
tomwalters@317 273
tomwalters@317 274 if (input.LoadFile(file_list[i].first.c_str())) {
tomwalters@317 275 input.Process();
tomwalters@317 276 } else {
tomwalters@317 277 printf("LoadFile failed for file %s\n", file_list[i].first.c_str());
tomwalters@317 278 }
tomwalters@317 279 input.Reset();
tomwalters@317 280 }
tomwalters@317 281
tomwalters@317 282 return 0;
tomwalters@317 283 }