1 files changed, 133 insertions, 0 deletions
diff --git a/tool_src/BspLib/VrmlFile.cpp b/tool_src/BspLib/VrmlFile.cpp
new file mode 100644
index 0000000..64f2df1
--- /dev/null
+++ b/tool_src/BspLib/VrmlFile.cpp
@@ -0,0 +1,133 @@
+//-----------------------------------------------------------------------------
+//	BSPLIB MODULE: VrmlFile.cpp
+//
+//  Copyright (c) 1997-1998 by Markus Hadwiger
+//  All Rights Reserved.
+//-----------------------------------------------------------------------------
+
+// bsplib header files
+#include "VrmlFile.h"
+#include "BspObject.h"
+#include "BspTool.h"
+
+// qvlib header files
+#include <QvDB.h>
+#include <QvInput.h>
+#include <QvNode.h>
+#include <QvState.h>
+
+
+BSPLIB_NAMESPACE_BEGIN
+
+
+// file is read and parsed immediately after construction ---------------------
+//
+VrmlFile::VrmlFile( BspObjectList objectlist, const char *filename ) :
+	InputData3D( objectlist, filename, DONT_CREATE_OBJECT ),
+	m_bboxlist( NULL )
+{
+	ParseObjectData();
+}
+
+
+// write outputfile before destruction ----------------------------------------
+//
+VrmlFile::~VrmlFile()
+{
+	if ( m_inputok && !m_filename.IsNULL() )
+		WriteOutputFile();
+	delete m_bboxlist;
+}
+
+
+// apply all transformations to scene -----------------------------------------
+//
+void VrmlFile::ApplySceneTransformations()
+{
+	BspObject *sceneobj = m_objectlist.getListHead();
+	for ( ; sceneobj; sceneobj = sceneobj->getNext() )
+		sceneobj->ApplyTransformation();
+}
+
+
+// enforce maximum extents for entire scene -----------------------------------
+//
+void VrmlFile::EnforceSceneExtents( BoundingBox& unionbox )
+{
+	double fmext = getMaxExtents();
+
+	Vertex3 minvertex = unionbox.getMinVertex();
+	Vertex3 maxvertex = unionbox.getMaxVertex();
+
+	double extent_x = maxvertex.getX() - minvertex.getX();
+	double extent_y = maxvertex.getY() - minvertex.getY();
+	double extent_z = maxvertex.getZ() - minvertex.getZ();
+
+	double mext = extent_x;
+	if ( extent_y > mext ) mext = extent_y;
+	if ( extent_z > mext ) mext = extent_z;
+	double cfac = fmext / mext;
+	
+	BspObject *sceneobj = m_objectlist.getListHead();
+	for ( ; sceneobj; sceneobj = sceneobj->getNext() )
+		sceneobj->ApplyScale( cfac );
+}
+
+
+// parse vrml 1.0 file and build data structures for all contained objects ----
+//
+int VrmlFile::ParseObjectData()
+{
+	// open input data file
+	FileAccess input( m_filename, "r" );
+	InfoMessage( "Processing input data file (format='VRML V1.0') ..." );
+
+	// init qvlib database
+    QvDB::init();
+
+	// tie input file to QvInput object
+    QvInput	inputdata;
+	inputdata.setFilePointer( input );
+
+	// read and parse vrml input data
+	QvNode *vrmlroot = NULL;
+	if ( QvDB::read( &inputdata, vrmlroot ) && ( vrmlroot != NULL ) ) {
+		InfoMessage( "\nObject data ok.\n" );
+		m_inputok = TRUE;
+	} else {
+		sprintf( line, "%sVRML tree data invalid.\n", parser_err_str );
+		ErrorMessage( line );
+		HandleCriticalError( CRITERR_ALLOW_RET );
+		delete vrmlroot;
+		return ( m_inputok = FALSE );
+	}
+
+	// create object for traversal state
+	QvState state( this );
+
+	// traverse entire vrml tree and construct scene representation for bsplib
+	vrmlroot->traverse( &state );
+
+	// if scene scale desired calculate union bounding box and scale entire scene
+	if ( getEnforceExtentsFlag() && ( m_bboxlist != NULL ) ) {
+		BoundingBox unionbox;
+		m_bboxlist->BoundingBoxListUnion( unionbox );
+		EnforceSceneExtents( unionbox );
+	}
+
+	delete vrmlroot;
+	return m_inputok;
+}
+
+
+// write output file(s) for objects constructed out of vrml file --------------
+//
+int VrmlFile::WriteOutputFile()
+{
+	return FALSE;
+}
+
+
+BSPLIB_NAMESPACE_END
+
+//-----------------------------------------------------------------------------