Skip to content

Commit

Permalink
- Balanced the ptolemyio.cpp indentation.
Browse files Browse the repository at this point in the history 
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@4951 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
@sjoelund
sjoelund committed Feb 15, 2010
1 parent 72f31fe commit ba7081a
Showing 1 changed file with 171 additions and 174 deletions.
345 changes: 171 additions & 174 deletions Compiler/runtime/ptolemyio.cpp
View file
Expand Up @@ -52,206 +52,203 @@ extern "C"
void print_error_buf_impl(char*str);


/* Given a file name and an array of variables, return the RML datastructure
in Values for Real[size(vars,1],:] i.e. a matrix of variable values, one column for each variable. */
void * read_ptolemy_dataset(char*filename, int size,char**vars,int datasize)
{
char buf[255];
void *lst;
void *olst;
ifstream stream(filename);
/* Given a file name and an array of variables, return the RML datastructure
in Values for Real[size(vars,1],:] i.e. a matrix of variable values, one column for each variable. */
void * read_ptolemy_dataset(char*filename, int size,char**vars,int datasize)
{
char buf[255];
void *lst;
void *olst;
ifstream stream(filename);

if (!stream) {
cerr << "Error opening result file " << filename << endl;
if (!stream) {
cerr << "Error opening result file " << filename << endl;
return NULL;
}

// Find interval size
while( stream.getline(buf,255) && string(buf).find("#IntervalSize") == string(buf).npos);
string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());
// exit if intervals not compatible...
if (datasize == 0) {
datasize = readIntervalSize;
} else {
if( readIntervalSize == 0) {
cerr << "could not read interval size." << endl;
print_error_buf_impl("could not read interval size.\n");
return NULL;
}

// Find interval size
while( stream.getline(buf,255)
&& string(buf).find("#IntervalSize") == string(buf).npos);
string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());
// exit if intervals not compatible...
if (datasize == 0) {
datasize = readIntervalSize;
} else {
if( readIntervalSize == 0) {
cerr << "could not read interval size." << endl;
print_error_buf_impl("could not read interval size.\n");
return NULL;
}
if (readIntervalSize != datasize) {
cerr << "intervalsize not matching data size." << endl;
print_error_buf_impl("intervalsize not matching data size.\n");
return NULL;
}
if (readIntervalSize != datasize) {
cerr << "intervalsize not matching data size." << endl;
print_error_buf_impl("intervalsize not matching data size.\n");
return NULL;
}
olst = mk_nil();
for (int i=0; i<size; i++) {
string readstr;
double val; char ch;
string var(string("DataSet: ")+vars[i]);
}
olst = mk_nil();
for (int i=0; i<size; i++) {
string readstr;
double val; char ch;
string var(string("DataSet: ")+vars[i]);

stream.seekg(0); //Reset stream
// Search to the correct position.
stream.getline(buf,255);
while( string(buf).find(var) == string(buf).npos || strlen(buf) > var.length()) {
if (!stream.getline(buf,255)) {
// if we reached end of file return..
string str=string("variable ")+ vars[i]+" not found in simulation result.\n";
cerr << str;
print_error_buf_impl((char*)str.c_str());
return NULL;
}
}

stream.seekg(0); //Reset stream
// Search to the correct position.
lst = mk_nil();
int j=0;
while(j<datasize) {
stream.getline(buf,255);
while( string(buf).find(var) == string(buf).npos || strlen(buf) > var.length()) {
if (!stream.getline(buf,255)) {
// if we reached end of file return..
string str=string("variable ")+ vars[i]
+" not found in simulation result.\n";
cerr << str;
print_error_buf_impl((char*)str.c_str());
return NULL;
}

if (string(buf).find("DataSet:") == 1) {
j = datasize;
break;
}

lst = mk_nil();
int j=0;
while(j<datasize) {
stream.getline(buf,255);

if (string(buf).find("DataSet:") == 1) {
j = datasize;
break;
}
string values(buf);
int commapos=values.find(",");
val = atof(values.substr(commapos+1).c_str()); // Second value after comma
string values(buf);
int commapos=values.find(",");
val = atof(values.substr(commapos+1).c_str()); // Second value after comma

lst = (void*)mk_cons(Values__REAL(mk_rcon(val)),lst);
j++;
}

olst = (void*)mk_cons(Values__ARRAY(lst),olst);
}
olst = Values__ARRAY(olst);
return olst;
}
/* Given a file name, returns the size of that simulation result in that file*/
int read_ptolemy_dataset_size(char*filename)
{
char buf[255];
ifstream stream(filename);


if (!stream) {
cerr << "Error opening file" << endl;
return 0;
lst = (void*)mk_cons(Values__REAL(mk_rcon(val)),lst);
j++;
}

// Find interval size
while( stream.getline(buf,255)
&& string(buf).find("#IntervalSize") == string(buf).npos);
olst = (void*)mk_cons(Values__ARRAY(lst),olst);
}
olst = Values__ARRAY(olst);
return olst;
}

string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());
// exit if intervals not compatible...
if( readIntervalSize == 0) {
cerr << "could not read interval size." << endl;
print_error_buf_impl("could not read interval size.\n");
return 0;
}
return readIntervalSize;
/* Given a file name, returns the size of that simulation result in that file*/
int read_ptolemy_dataset_size(char*filename)
{
char buf[255];
ifstream stream(filename);

if (!stream) {
cerr << "Error opening file" << endl;
return 0;
}

void * read_ptolemy_variables(char* filename, char* visvars)
{
char buf[255];
void *lst;
void *olst;
ifstream stream(filename);
// Find interval size
while(stream.getline(buf,255) && string(buf).find("#IntervalSize") == string(buf).npos);

string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());
// exit if intervals not compatible...
if( readIntervalSize == 0) {
cerr << "could not read interval size." << endl;
print_error_buf_impl("could not read interval size.\n");
return 0;
}
return readIntervalSize;
}

if (!stream) {
cerr << "Error opening file" << endl;
return NULL;
}
void * read_ptolemy_variables(char* filename, char* visvars)
{
char buf[255];
void *lst;
void *olst;
ifstream stream(filename);

if (!stream) {
cerr << "Error opening file" << endl;
return NULL;
}

// Find interval size
while( stream.getline(buf,255)
&& string(buf).find("#IntervalSize") == string(buf).npos);
string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());
// Find interval size
while(stream.getline(buf,255) && string(buf).find("#IntervalSize") == string(buf).npos);
string intervalText=string(buf);
int equalPos=intervalText.find("=");
int readIntervalSize = atoi(intervalText.substr(equalPos+1).c_str());

olst = (void*)mk_nil();
olst = (void*)mk_nil();
// for (int i=0; i<size; i++) {
stream.seekg(0); //Reset stream
bool run = true;
while (run) {
string readstr;
double val; char ch;
string var(string("DataSet:"));

stream.getline(buf,255);
while( string(buf).find(var) == string(buf).npos ) {// || strlen(buf) > var.length()) {
if (!stream.getline(buf,255)) {
// if we reached end of file return..
//string str=string("variable ")+ vars[i]
//+" not found in simulation result.\n";
string str=string("nu tog det slut!\n");
stream.seekg(0); //Reset stream
bool run = true;
while (run) {
string readstr;
double val;
char ch;
string var(string("DataSet:"));

stream.getline(buf,255);
while( string(buf).find(var) == string(buf).npos ) {// || strlen(buf) > var.length()) {
if (!stream.getline(buf,255)) {
// if we reached end of file return..
//string str=string("variable ")+ vars[i]
//+" not found in simulation result.\n";
string str=string("nu tog det slut!\n");
// cerr << str;
print_error_buf_impl((char*)str.c_str());
run = false;
break;
}
}
print_error_buf_impl((char*)str.c_str());
run = false;
break;
}
}

if (run) {
if (run) {
// cerr << "Found: " << string(buf) << endl;

if (string(buf).npos != string(buf).find("$") ||
string(buf).npos != string(buf).find("(") ||
string(buf).npos != string(buf).find(" time")) {
if (string(buf).npos != string(buf).find("$") ||
string(buf).npos != string(buf).find("(") ||
string(buf).npos != string(buf).find(" time")) {
continue;
}
//lst = mk_nil();
int pos = string(buf).find(":");
string varname = string(buf).substr(pos+2);
string visvarstring = string(visvars);
bool use = false;
//cout << "varname = " << varname << endl;
int i = 0; //visvarstring.find(",");
bool finished = false;
while (!finished) {
string visvar;
//cout << "i: " << i << endl;
i = visvarstring.find("\n");
if (i == visvarstring.npos) {
visvar = visvarstring;
finished = true;
} else {
visvar = visvarstring.substr(0,i);
visvarstring = visvarstring.substr(i+1);
}
int pos = visvar.find(":");
string typevar = visvar.substr(pos+1);
pos = visvar.find(",");
visvar = visvar.substr(0,pos);
visvar += ".";
}
//lst = mk_nil();
int pos = string(buf).find(":");
string varname = string(buf).substr(pos+2);
string visvarstring = string(visvars);
bool use = false;
//cout << "varname = " << varname << endl;
int i = 0; //visvarstring.find(",");
bool finished = false;
while (!finished) {
string visvar;
//cout << "i: " << i << endl;
i = visvarstring.find("\n");
if (i == visvarstring.npos) {
visvar = visvarstring;
finished = true;
} else {
visvar = visvarstring.substr(0,i);
visvarstring = visvarstring.substr(i+1);
}
int pos = visvar.find(":");
string typevar = visvar.substr(pos+1);
pos = visvar.find(",");
visvar = visvar.substr(0,pos);
visvar += ".";
// cout << "visvar = " << visvar << endl;
// cout << "typevar = " << typevar << endl;
if (varname.find(visvar) == 0) {
//cout << " match! " << endl;
use = true;
break;
}
}
if (use) {
int size = sizeof(char)*(varname.length()+1);
char *varcstr = (char*)malloc(size);
if (varname.find(visvar) == 0) {
//cout << " match! " << endl;
use = true;
break;
}
}
if (use) {
int size = sizeof(char)*(varname.length()+1);
char *varcstr = (char*)malloc(size);

strncpy(varcstr, varname.c_str(), varname.length()+1); //+1 for null termination
//cerr << "varcstr = " << varcstr << endl;
strncpy(varcstr, varname.c_str(), varname.length()+1); //+1 for null termination
//cerr << "varcstr = " << varcstr << endl;

olst = (void*)mk_cons(mk_scon(varcstr),olst);
}
}
}
//olst = Values__ARRAY(olst);
return olst;
olst = (void*)mk_cons(mk_scon(varcstr),olst);
}
}
}
//olst = Values__ARRAY(olst);
return olst;
}

}

0 comments on commit ba7081a

Please sign in to comment.