Development:Script:obj2obj converter - Revision history

Pirx: /* Code */ Version 0.8.68 (2005.05.13) = obj_conv.pl_2005_05_13_02.txt

2005-05-13T14:46:54Z

‎Code: Version 0.8.68 (2005.05.13) = obj_conv.pl_2005_05_13_02.txt

Show changes

Pirx: /* Code */ Version 0.8.67 (2005.05.13) - obj_conv.pl_2005_05_13_01.txt

2005-05-13T10:48:16Z

‎Code: Version 0.8.67 (2005.05.13) - obj_conv.pl_2005_05_13_01.txt

Show changes

Pirx: /* Code */ Version 0.8.66 (2005.05.13) - obj_conv.pl_2005_05_13_00.txt

2005-05-13T09:28:06Z

‎Code: Version 0.8.66 (2005.05.13) - obj_conv.pl_2005_05_13_00.txt

Pirx: /* Testing/Benchmarking the code */

2005-05-12T14:25:24Z

‎Testing/Benchmarking the code

Pirx: /* Features and TODOs */ some cleanups and corrections

2005-05-11T17:42:18Z

‎Features and TODOs: some cleanups and corrections

Pirx: /* Code */ Version 0.8.65 (2005.05.11) = obj_conv.pl_2005_05_11_00.txt

2005-05-11T16:12:11Z

‎Code: Version 0.8.65 (2005.05.11) = obj_conv.pl_2005_05_11_00.txt

Show changes

Pirx: /* Code */ 0.8.64 (2005.05.10) = obj_conv.pl_2005_05_10_03.txt

2005-05-10T21:42:12Z

‎Code: 0.8.64 (2005.05.10) = obj_conv.pl_2005_05_10_03.txt

Show changes

Pirx: /* Code */ Version 0.8.63 (2005.05.10) = obj_conv.pl_2005_05_10_02.txt

2005-05-10T16:42:49Z

‎Code: Version 0.8.63 (2005.05.10) = obj_conv.pl_2005_05_10_02.txt

Show changes

Pirx: /* Code */ Version 0.8.62 (2005.05.10) = obj_conv.pl_2005_05_10_01.txt

2005-05-10T14:53:38Z

‎Code: Version 0.8.62 (2005.05.10) = obj_conv.pl_2005_05_10_01.txt

Show changes

Pirx: /* Test case analysis */

2005-05-10T10:58:43Z

‎Test case analysis

@@ Line 43: / Line 43: @@
 # Usage example (short):
+#
-#   perl obj_conv.pl_xxxx_xx_xx_xx.txt -i inputfile.obj -o outputfile.obj -b -s  -T
+#   perl obj_conv.pl_xxxx_xx_xx_xx.txt -i inputfile.obj -o outputfile.obj -b -s -T
+#
 #   parameter description:
@@ Line 81: / Line 81: @@
 # VERSIONS / REVISIONS
 #----------------------------------------------------------
-my $VERSION        = "0.8.65 (2005.05.11)";
+my $VERSION        = "0.8.66 (2005.05.13)";
 #----------------------------------------------------------
-# *) 2005.05.11 - Martin 'Pontiac' Buerbaum
+# *) 2005.05.13 - Martin 'Pontiac' Buerbaum
 #   - Added zero-check to make_vector_normal().
 # *) 2005.05.10 - Martin 'Pontiac' Buerbaum
@@ Line 292: / Line 294: @@
 use File::Basename;	#$base = basename($filename);
 use Data::Dumper;
 #######################################################################
@@ Line 1,347: / Line 1,359: @@
 #######################################################################
 sub split_face_by_plane (@@%%%$$$) {
 	my ($face, $plane, $vertices, $uvdata, $vndata, $vertexcount, $uvcount, $vncount ) = @_;
 	die "split_face_by_plane:face"     if ( ref($face)     ne 'ARRAY' );
@@ Line 1,464: / Line 1,477: @@
 	undef $pointsnear if ($undef_vars); #$DEBUG:testing
 	undef $pointsfar if ($undef_vars);  #$DEBUG:testing
+	if ($use_benchmark) {$timer->stop('split_face_by_plane')};
 	return ($facesnear, $facesfar,
 		$newvertices, $newuvdata, $newvndata,
@@ Line 3,008: / Line 3,021: @@
 	print "#############################################################\n";
 	print "Writing to obj file ...\n";
 	write_to_obj ($obj_out, $objects);
 	print "... Writing obj done.\n";
@@ Line 3,113: / Line 3,130: @@
 ## This limitation exists because the perl TIEHASH interface currently has no support for multidimensional ties.
 #######################################################################
-sub init_objects () { # $DEBUG:TODO is this even working (because vertices do have lists in them)
+#sub init_objects () { # $DEBUG:TODO is this even working (because vertices do have lists in them)
-	my $objects = {
+#	my $objects = {
-		'vertices' => {}, 'vert_counter' => 0,
+#		'vertices' => {}, 'vert_counter' => 0,
-		'uvdata'   => {}, 'uv_counter'   => 0,
+#		'uvdata'   => {}, 'uv_counter'   => 0,
-		'vndata'   => {}, 'norm_counter' => 0 ,
+#		'vndata'   => {}, 'norm_counter' => 0 ,
-		'objects'  => []
+#		'objects'  => []
-		};
+#		};
-	# $DEBUG:TODO serialise/tie vertices, uvdata and vndata
+#	# $DEBUG:TODO serialise/tie vertices, uvdata and vndata
-	use DB_File;                      # optional; overrides default
+#	use DB_File;                      # optional; overrides default
-	use POSIX qw(tmpnam);
+#	use POSIX qw(tmpnam);
-	my $tmp_filename = tmpnam();
+#	my $tmp_filename = tmpnam();
-	do { $tmp_filename = tmpnam() }
+#	do { $tmp_filename = tmpnam() }
-		until (dbmopen %{$objects->{'vertices'}}, $tmp_filename, 0666); # try new temporary filenames until we get one that didn't already exist
+#		until (dbmopen %{$objects->{'vertices'}}, $tmp_filename, 0666); # try new temporary filenames until we get one that didn't already exist
-	do { $tmp_filename = tmpnam() }
+#	do { $tmp_filename = tmpnam() }
-		until (dbmopen %{$objects->{'uvdata'}}, $tmp_filename, 0666);
+#		until (dbmopen %{$objects->{'uvdata'}}, $tmp_filename, 0666);
-	do { $tmp_filename = tmpnam() }
+#	do { $tmp_filename = tmpnam() }
-		until (dbmopen %{$objects->{'vndata'}}, $tmp_filename, 0666);
+#		until (dbmopen %{$objects->{'vndata'}}, $tmp_filename, 0666);
-	return $objects;
+#	return $objects;
+#}
 #######################################################################
 # EOF

@@ Line 3,159: / Line 3,159: @@
 Is this a bug or am I seeing ghosts again?</small>
 ==See also==
 [[Category:Development]]

@@ Line 4: / Line 4: @@
 ==Features and TODOs==
-* ['''finished'''] OBJ reading
+===Features===
-* ['''finished'''] OBJ writing
+* OBJ reading
-* ['''finished'''] Xmesh writing
+* OBJ writing
-* ['''finished'''] z-depth sorting (only works sane when everything is splitted correctly)
+* Xmesh reading (not yet tested for bugs)
-* ['''finished''' seems to work fine now] Splitting algorithms (needed for 3D cockpits)
+* Xmesh writing (no read-in materials yet)
 ** BSP (Binary Space Partition) splitting
 ** Split by view (edges)
-* ['''finished'''] Xmesh reading
+* Parsing of tag data (not writing them yet)
-* ['''finished'''] Parsing of tag data
+* Triangulation (before calculations and before saving)
 ==Code==

@@ Line 3,194: / Line 3,194: @@
 Now i'm of to test it with bigger and '''cooler''' cockpits ;) wasted CPU time here i come :D
 ==See also==
 [[Category:Development]]