static std::string &&arg_string(Arglist::iterator &pp, Arglist::const_iterator end)
{
auto arg = pp;
if (++pp == end)
throw missing_parameter(std::move(*arg));
return std::move(*pp);
}
void dosave(bc *bc, char *text)
{
char filename[128];
int fd;
int len;
gettoken(filename, sizeof(filename), &text);
if(!filename[0])
{
strncpy(filename, bc->filename, sizeof(filename));
if(!filename[0])
{
missing_parameter(bc, "Must specify filename");
return;
}
}
makename(filename, sizeof(filename));
fd=open(filename, O_WRONLY|O_CREAT|O_TRUNC, 0644);
if(fd<0)
{
error(bc, "Can't open file '%s' for writing.", filename);
return;
}
len=write(fd, bc->program, strlen(bc->program));
close(fd);
if(len!=strlen(bc->program))
error(bc, "ERROR: Short write, the entire program wasn't saved.");
strncpy(bc->filename, filename, sizeof(bc->filename));
}
void doload(bc *bc, char *text)
{
char filename[128];
int fd;
int len;
gettoken(filename, sizeof(filename), &text);
if(!filename[0])
{
missing_parameter(bc, "Must specify filename");
return;
}
makename(filename, sizeof(filename));
fd=open(filename, O_RDONLY);
if(fd<0)
{
error(bc, "Can't open file '%s' for reading.", filename);
return;
}
len=read(fd, bc->program, sizeof(bc->program)-1);
close(fd);
if(len>=0)
bc->program[len]=0;
tprintf(bc, "Loaded %d bytes from file '%s'\n", len, filename);
snprintf(bc->filename, sizeof(bc->filename), "%s", filename);
}
int main(int argc, char* argv[])
{
double t, y ;
char *trk_file_name = NULL;
char *csv_file_name = NULL;
FILE *csv_fp;
int number_of_parameters;
char ** param_names;
char ** param_units;
int i, done;
char *prog_name = argv[0];
DataStream* each_ds;
vector <DataStream*> ds_list;
// idx is used when comaring with the size() of the vector
vector <DataStream*>::size_type idx;
if (argc <= 1 ) {
cerr << prog_name << ": No arguments were supplied.\n";
cerr.flush();
usage();
exit(EXIT_FAILURE);
} else {
int i = 1;
char *option;
while ( i < argc ) {
option = argv[i++];
if (strcmp("-help",option)==0) {
usage();
exit(EXIT_SUCCESS);
} else if (strcmp("-csv",option)==0) {
if (i<argc) {
csv_file_name = argv[i++];
} else {
missing_parameter(option);
}
} else if (i == argc) {
trk_file_name = option;
} else {
cerr << "\"" << option << "\" is not a valid option.\n";
cerr.flush();
usage();
exit(EXIT_FAILURE);
}
}
}
if (trk_file_name == NULL) {
cerr << prog_name << ": No Trick binary data file name was supplied.\n";
cerr.flush();
usage();
exit(EXIT_FAILURE);
}
if (csv_file_name != NULL) {
if (( csv_fp = fopen(csv_file_name, "w") ) == 0) {
cerr << "Couldn't open \" << csv_file_name << \" for reading\n";
cerr.flush();
exit(EXIT_FAILURE);
}
} else {
csv_fp = stdout;
}
number_of_parameters = TrickBinaryGetNumVariables(trk_file_name);
if (number_of_parameters == 0) {
cerr << "No parameters found in the Trk data log file.\n";
cerr.flush();
exit(EXIT_FAILURE);
}
if (( param_names = TrickBinaryGetVariableNames(trk_file_name)) == NULL ) {
cerr << "Unable get parameter names from the Trk data log file.\n";
cerr.flush();
exit(EXIT_FAILURE);
}
if (( param_units = TrickBinaryGetVariableUnits(trk_file_name)) == NULL ) {
cerr << "Unable get parameter units from the Trk data log file.\n";
cerr.flush();
exit(EXIT_FAILURE);
}
for ( i=0; i<number_of_parameters; i++ ) {
if (i == 0) {
fprintf(csv_fp,"%s {%s}",param_names[0], param_units[i]);
} else {
fprintf(csv_fp,",%s {%s}",param_names[i], param_units[i]);
}
if (( each_ds = new TrickBinary(trk_file_name, param_names[i] )) == NULL) {
cerr << ".\n";
cerr.flush();
exit(EXIT_FAILURE);
} else {
ds_list.push_back(each_ds);
}
}
fprintf(csv_fp,"\n");
done = 0;
while ( !done ) {
for ( idx = 0; idx < ds_list.size(); idx++ ) {
if ( ds_list[idx]->get( &t, &y) == 0 ) {
done = 1;
break;
}
if ( idx != 0) {
fprintf(csv_fp,",");
}
fprintf(csv_fp,"%.15G",y);
}
fprintf(csv_fp,"\n");
}
// release memory for the DataStream list
// vector clear function won't delete objects created by new
for ( idx = 0; idx < ds_list.size(); idx++) {
delete ds_list[idx];
}
ds_list.clear();
// relese memory for the name list
for (i = 0; i < number_of_parameters; i ++) {
delete[] param_names[i];
}
return 0 ;
}
