int ON_CorrectBase32StringTypos( const wchar_t* sBase32, ON_wString& sBase32clean )
{
if ( 0 == sBase32 || 0 == sBase32[0] )
return 0;
ON_String s = sBase32;
int length = ON_CorrectBase32StringTypos(s.Array(),s.Array());
if ( length > 0 )
sBase32clean = s;
else
sBase32clean.SetLength(0);
return length;
}
void ON_TextLog::PrintPointList( int dim, int is_rat, int count, int stride, const double* P,
const char* sPreamble )
{
double w, x;
int i, j, cvdim;
ON_String preamble = "";
if ( sPreamble && *sPreamble )
preamble += sPreamble;
cvdim = (is_rat) ? dim+1 : dim;
if ( count == 0 ) {
Print( "%sEMPTY point list\n", preamble.Array() );
}
else if ( !P ) {
Print( "%sNULL point list\n", preamble.Array() );
}
for ( i = 0; i < count; i++ ) {
Print( "%s[%2d] %c", preamble.Array(), i, (is_rat) ? '[' : '(' );
Print( m_double_format, P[0] );
for ( j = 1; j < cvdim; j++ ) {
Print( ", ");
Print(m_double_format, P[j] );
}
Print("%c", (is_rat) ? ']' : ')' );
if ( is_rat )
{
w = P[dim];
if ( w != 0.0 )
{
// print euclidean coordinates
w = 1.0/w;
x = w*P[0];
Print( " = (");
Print( m_double_format, x );
for ( j = 1; j < dim; j++ )
{
x = w*P[j];
Print( ", ");
Print( m_double_format, x );
}
Print(")");
}
}
Print("\n");
P += stride;
}
}
int ON_CorrectBase32StringTypos( const char* sBase32, ON_String& sBase32clean )
{
char* sClean = 0;
if ( sBase32 == sBase32clean.Array() )
sClean = sBase32clean.Array();
else
{
sBase32clean.SetLength(0);
sBase32clean.ReserveArray(strlen(sBase32));
sClean = sBase32clean.Array();
}
int length = ON_CorrectBase32StringTypos( sBase32, sClean );
sBase32clean.SetLength(length);
return length;
}
/**
* R T _ B R E P _ D E S C R I B E
*/
int
rt_brep_describe(struct bu_vls *str, const struct rt_db_internal *ip, int verbose, double mm2local)
{
BU_CK_VLS(str);
RT_CK_DB_INTERNAL(ip);
ON_wString wonstr;
ON_TextLog log(wonstr);
struct rt_brep_internal* bi;
bi = (struct rt_brep_internal*)ip->idb_ptr;
RT_BREP_CK_MAGIC(bi);
if (bi->brep != NULL)
bi->brep->Dump(log);
ON_String onstr = ON_String(wonstr);
bu_vls_strcat(str, "Boundary Representation (BREP) object\n");
const char *description = onstr.Array();
// skip the first "ON_Brep:" line
while (description && description[0] && description[0] != '\n') {
description++;
}
if (description && description[0] && description[0] == '\n') {
description++;
}
bu_vls_strcat(str, description);
return 0;
}
bool ON_Base32ToString( const ON_SimpleArray<unsigned char>& base32_digits, ON_String& sBase32 )
{
int digit_count = base32_digits.Count();
sBase32.ReserveArray(digit_count);
sBase32.SetLength(digit_count);
bool rc = ON_Base32ToString( base32_digits, digit_count, sBase32.Array() );
if (!rc)
sBase32.SetLength(0);
return rc;
}
void ON_TextLog::AppendText( const wchar_t* s )
{
// This is a virtual function
if ( m_pString )
{
(*m_pString) += s;
}
else
{
// To properly handle conversion of UNICODE values > 255,
// you will probably have to derive a class from ON_TextLog,
// override ON_TextLog::AppendText(const wchar_t* s ),
// and do whatever is appropriate for your OS and compiler.
ON_String str = s;
AppendText(str.Array());
}
}
void ON_TextLog::AppendText( const wchar_t* s )
{
// This is a virtual function
if ( m_pString )
{
(*m_pString) += s;
}
else
{
// If sizeof(wchar_t) = 2, str = s performs
// performs UTF-16 to UTF-8 conversion.
// If sizeof(wchar_t) = 4, str = s performs
// performs UTF-32 to UTF-8 conversion.
ON_String str = s;
AppendText(str.Array());
}
}
void ON_String::AppendToArray( const ON_String& s )
{
AppendToArray( s.Length(), s.Array() );
}
void ON_String::CopyToArray( const ON_String& s )
{
CopyToArray( s.Length(), s.Array() );
}
int main( int argc, const char *argv[] )
{
// If you are using OpenNURBS as a Windows DLL, then you MUST use
// ON::OpenFile() to open the file. If you are not using OpenNURBS
// as a Windows DLL, then you may use either ON::OpenFile() or fopen()
// to open the file.
int argi;
if ( argc < 2 )
{
printf("Syntax: %s [-out:outputfilename.txt] file1.3dm file2.3dm ...\n",argv[0] );
return 0;
}
// Call once in your application to initialze opennurbs library
ON::Begin();
// default dump is to stdout
ON_TextLog dump_to_stdout;
ON_TextLog* dump = &dump_to_stdout;
FILE* dump_fp = 0;
ONX_Model model;
for ( argi = 1; argi < argc; argi++ )
{
const char* arg = argv[argi];
// check for -out or /out option
if ( ( 0 == strncmp(arg,"-out:",5) || 0 == strncmp(arg,"/out:",5) )
&& arg[5] )
{
// change destination of dump file
const char* sDumpFilename = arg+5;
FILE* text_fp = ON::OpenFile(sDumpFilename,"w");
if ( text_fp )
{
if ( dump_fp )
{
delete dump;
ON::CloseFile(dump_fp);
}
dump_fp = text_fp;
dump = new ON_TextLog(dump_fp);
}
continue;
}
const char* sFileName = arg;
dump->Print("\nOpenNURBS Archive File: %s\n", sFileName );
// open file containing opennurbs archive
FILE* archive_fp = ON::OpenFile( sFileName, "rb");
if ( !archive_fp )
{
dump->Print(" Unable to open file.\n" );
continue;
}
dump->PushIndent();
// create achive object from file pointer
ON_BinaryFile archive( ON::read3dm, archive_fp );
// read the contents of the file into "model"
bool rc = model.Read( archive, dump );
// close the file
ON::CloseFile( archive_fp );
// print diagnostic
if ( rc )
dump->Print("Successfully read.\n");
else
dump->Print("Errors during reading.\n");
// see if everything is in good shape
if ( model.IsValid(dump) )
dump->Print("Model is valid.\n");
else
{
model.Polish();
if ( model.IsValid() )
{
dump->Print("Model is valid after calling Polish().\n");
}
else
{
dump->Print("Model is not valid.\n");
}
}
/*
int oi = 14;
if ( oi >=0 && oi < model.m_object_table.Count() )
{
dump->Print("m_object_table[%d].m_object:\n",oi);
dump->PushIndent();
model.m_object_table[oi].m_object->Dump(*dump);
dump->PopIndent();
}
*/
int version = 0; // write current Rhino file
ON_String outfile = sFileName;
int len = outfile.Length() - 4;
outfile.SetLength(len);
outfile += "_roundtrip.3dm";
bool outrc = model.Write( outfile, version, "roundtrip", dump );
if ( outrc )
{
dump->Print("model.Write(%s) succeeded.\n",outfile.Array());
ONX_Model model2;
if ( model2.Read( outfile, dump ) )
{
dump->Print("model2.Read(%s) succeeded.\n",outfile.Array());
if ( model2.IsValid(dump) )
{
dump->Print("Model2 is valid.\n");
}
else
{
dump->Print("Model2 is not valid.\n");
}
/*
if ( oi >=0 && oi < model2.m_object_table.Count() )
{
dump->Print("m_object_table[%d].m_object:\n",oi);
dump->PushIndent();
model2.m_object_table[oi].m_object->Dump(*dump);
dump->PopIndent();
}
*/
}
else
{
dump->Print("model2.Read(%s) failed.\n",outfile.Array());
}
}
else
dump->Print("model.Write(%s) failed.\n",outfile.Array());
// destroy this model
model.Destroy();
dump->PopIndent();
}
if ( dump_fp )
{
// close the text dump file
delete dump;
ON::CloseFile( dump_fp );
}
// OPTIONAL: Call just before your application exits to clean
// up opennurbs class definition information.
// Opennurbs will not work correctly after ON::End()
// is called.
ON::End();
return 0;
}
ON_wString ON_wString::operator+(const ON_String& s2) const
{
ON_wString s(*this);
s.AppendToArray( s2.Length(), s2.Array() );
return s;
}