[panotools-cvs] SF.net SVN: panotools: [672] trunk/Panotools-Script/bin/jpeg2qtvr

[<bru...@us...>]

Revision: 672
          http://svn.sourceforge.net/panotools/?rev=672&view=rev
Author:   brunopostle
Date:     2007-02-12 14:11:56 -0800 (Mon, 12 Feb 2007)

Log Message:
-----------
whitespace changes, first half of preview track patch

Modified Paths:
--------------
    trunk/Panotools-Script/bin/jpeg2qtvr

Modified: trunk/Panotools-Script/bin/jpeg2qtvr
===================================================================
--- trunk/Panotools-Script/bin/jpeg2qtvr	2007-02-08 22:34:14 UTC (rev 671)
+++ trunk/Panotools-Script/bin/jpeg2qtvr	2007-02-12 22:11:56 UTC (rev 672)
@@ -38,8 +38,8 @@
 
 # pixel size of the view window
 
-my $width = pack4B (1024);
-my $height = pack4B (768);
+my $width_window = pack4B (1024);
+my $height_window = pack4B (768);
 
 die "Usage: $0 front.jpg right.jpg back.jpg left.jpg up.jpg down.jpg > output.mov" unless @ARGV == 6;
 
@@ -78,6 +78,7 @@
 
 my $offsetA = '????';
 my $offsetB = '????';
+
 my $offset0 = '????';
 my $offset1 = '????';
 my $offset2 = '????';
@@ -111,14 +112,16 @@
          "\x{00}\x{00}\x{00}\x{00}".
          $date.$date.
          "\x{00}\x{00}\x{0e}\x{10}".
-         "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{01}\x{00}\x{00}".
+         "\x{00}\x{00}\x{0e}\x{10}".
+         "\x{00}\x{01}\x{00}\x{00}".
          "\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{40}\x{00}\x{00}\x{00}".
-         "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{0e}\x{10}".
+         "\x{00}\x{00}\x{00}\x{00}".
+         "\x{00}\x{00}\x{0e}\x{10}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
          "\x{00}\x{00}\x{00}\x{04}"
@@ -131,8 +134,9 @@
          atom ('tkhd',
              "\x{00}\x{00}\x{00}\x{0f}".
              $date.$date.
-             "\x{00}\x{00}\x{00}\x{01}".
-             "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{0e}\x{10}".
+             "\x{00}\x{00}\x{00}\x{01}".  # track number
+             "\x{00}\x{00}\x{00}\x{00}".
+             "\x{00}\x{00}\x{0e}\x{10}". # duration
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{00}".
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
@@ -140,15 +144,17 @@
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{40}\x{00}".
-             $width.$height.
+             $width_window.$height_window.
              "\x{00}\x{00}"
          ).
 
          atom ('edts',
 
              atom ('elst',
-                 "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                 "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{01}".
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
+                 "\x{00}\x{00}\x{00}\x{00}".
                  "\x{00}\x{01}\x{00}\x{00}"
              )
          ).
@@ -167,8 +173,9 @@
              atom ('mdhd',
                  "\x{00}\x{00}\x{00}\x{00}".
                  $date.$date.
-                 "\x{00}\x{00}\x{0e}\x{10}".
-                 "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{00}\x{00}\x{00}"
+                 "\x{00}\x{00}\x{0e}\x{10}". # time scale
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
+                 "\x{00}\x{00}\x{00}\x{00}"
              ).
 
              atom ('hdlr',
@@ -182,11 +189,14 @@
 
 #            [Subrecursing 'minf' atom]
 
-                 atom ('gmhd',
+                 atom ('gmhd', # base media header
 
-                     atom ('gmin',
-                         "\x{00}\x{00}\x{00}\x{00}\x{00}\x{40}\x{80}\x{00}".
-                         "\x{80}\x{00}\x{80}\x{00}\x{00}\x{00}\x{00}\x{00}"
+                     atom ('gmin', # base media info
+                         "\x{00}\x{00}\x{00}\x{00}".
+                         "\x{00}\x{40}".
+                         "\x{80}\x{00}\x{80}\x{00}\x{80}\x{00}".
+                         "\x{00}\x{00}".
+                         "\x{00}\x{00}"
                      )
                  ).
 
@@ -230,10 +240,14 @@
                                  "\x{00}\x{00}\x{00}\x{00}".
 
                                  atom ('vrsc',
-                                     "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}".
-                                     "\x{00}\x{00}\x{00}\x{00}\x{00}\x{02}\x{00}\x{00}".
-                                     "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                                     "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
+                                     "\x{00}\x{00}\x{00}\x{01}".
+                                     "\x{00}\x{00}\x{00}\x{00}".
+                                     "\x{00}\x{00}\x{00}\x{00}".
+                                     "\x{00}\x{02}\x{00}\x{00}".
+                                     "\x{00}\x{00}\x{00}\x{00}".
+                                     "\x{00}\x{00}\x{00}\x{01}".
+                                     "\x{00}\x{00}\x{00}\x{00}".
+                                     "\x{00}\x{00}\x{00}\x{00}".
                                      "\x{00}\x{00}\x{00}\x{00}"
                                  ).
 
@@ -289,7 +303,8 @@
 
                      atom ('stts',
                          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                         "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{0e}\x{10}"
+                         "\x{00}\x{00}\x{00}\x{01}".
+                         "\x{00}\x{00}\x{0e}\x{10}"
                      ).
 
                      atom ('stsc',
@@ -335,11 +350,11 @@
 #    [Subrecursing 'trak' atom]
 
          atom ('tkhd',
-
              "\x{00}\x{00}\x{00}\x{0f}".
              $date.$date.
-             "\x{00}\x{00}\x{00}\x{02}".
-             "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{0e}\x{10}".
+             "\x{00}\x{00}\x{00}\x{02}".  # track number
+             "\x{00}\x{00}\x{00}\x{00}".
+             "\x{00}\x{00}\x{0e}\x{10}". # duration
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
@@ -347,7 +362,7 @@
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{40}\x{00}".
-             $width.$height.
+             $width_window.$height_window.
              "\x{00}\x{00}"
          ).
 
@@ -359,8 +374,10 @@
          atom ('edts',
 
              atom ('elst',
-                 "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                 "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{01}".
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
+                 "\x{00}\x{00}\x{00}\x{00}".
                  "\x{00}\x{01}\x{00}\x{00}"
              )
 
@@ -381,8 +398,8 @@
              atom ('mdhd',
                  "\x{00}\x{00}\x{00}\x{00}".
                  $date.$date. 
-                 "\x{00}\x{00}\x{0e}\x{10}".
-                 "\x{00}\x{00}\x{0e}\x{10}".
+                 "\x{00}\x{00}\x{0e}\x{10}". # time scale
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
                  "\x{00}\x{00}\x{00}\x{00}"
              ).
 
@@ -398,11 +415,14 @@
 
 #            [Subrecursing 'minf' atom]
 
-                 atom ('gmhd',
+                 atom ('gmhd', # base media header
 
-                     atom ('gmin',
-                         "\x{00}\x{00}\x{00}\x{00}\x{00}\x{40}\x{80}\x{00}".
-                         "\x{80}\x{00}\x{80}\x{00}\x{00}\x{00}\x{00}\x{00}"
+                     atom ('gmin', # base media info
+                         "\x{00}\x{00}\x{00}\x{00}".
+                         "\x{00}\x{40}".
+                         "\x{80}\x{00}\x{80}\x{00}\x{80}\x{00}".
+                         "\x{00}\x{00}".
+                         "\x{00}\x{00}"
                      )
                  ).
 
@@ -440,7 +460,8 @@
 
                      atom ('stts',
                          "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                         "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{0e}\x{10}"
+                         "\x{00}\x{00}\x{00}\x{01}".
+                         "\x{00}\x{00}\x{0e}\x{10}"
                      ).
 
                      atom ('stsc',
@@ -507,10 +528,11 @@
          atom ('tkhd',
              "\x{00}\x{00}\x{00}\x{0e}".
              $date.$date.
-             "\x{00}\x{00}\x{00}\x{03}".
-             "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{0e}\x{10}".
+             "\x{00}\x{00}\x{00}\x{03}".  # track number
+             "\x{00}\x{00}\x{00}\x{00}".  # reserved
+             "\x{00}\x{00}\x{0e}\x{10}".  # duration
+             "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}". # reserved
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
-             "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
              "\x{00}\x{01}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
@@ -524,8 +546,10 @@
          atom ('edts',
 
              atom ('elst',
-                 "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                 "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{00}".
+                 "\x{00}\x{00}\x{00}\x{01}".
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
+                 "\x{00}\x{00}\x{00}\x{00}".
                  "\x{00}\x{01}\x{00}\x{00}"
              )
          ).
@@ -537,8 +561,9 @@
              atom ('mdhd',
                  "\x{00}\x{00}\x{00}\x{00}".
                  $date.$date.
-                 "\x{00}\x{00}\x{0e}\x{10}".
-                 "\x{00}\x{00}\x{0e}\x{10}\x{00}\x{00}\x{00}\x{00}"
+                 "\x{00}\x{00}\x{0e}\x{10}". # time scale
+                 "\x{00}\x{00}\x{0e}\x{10}". # duration
+                 "\x{00}\x{00}\x{00}\x{00}"
              ).
 
              atom ('hdlr',
@@ -609,8 +634,10 @@
                      ).
 
                      atom ('stsc',
-                         "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{01}".
-                         "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{00}\x{01}".
+                         "\x{00}\x{00}\x{00}\x{00}".
+                         "\x{00}\x{00}\x{00}\x{01}".
+                         "\x{00}\x{00}\x{00}\x{01}".
+                         "\x{00}\x{00}\x{00}\x{01}".
                          "\x{00}\x{00}\x{00}\x{01}"
                      ).
 
@@ -684,6 +711,7 @@
 
 atom ('free',
     "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
+    "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
     "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}"
 );
 
@@ -694,12 +722,13 @@
 # this atom is optional, but useful to define the end of the file
 #Atom 0x000008AA  (0x001E29FC)  mdat
 
-##atom ('wide', '').
-## 
+atom ('wide', '').
+ 
 ##"\x{00}\x{1e}\x{29}\x{fc}".  "mdat".
-##
-##atom ('wide', '').
+atom ('wide', '').
 
+atom ('wide', '').
+
 "\x{00}\x{00}\x{00}\x{00}".  "mdat";
 
 my $A =
@@ -707,7 +736,8 @@
 "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
 
 atom ('sean',
-    "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{00}\x{01}".
+    "\x{00}\x{00}\x{00}\x{01}".
+    "\x{00}\x{00}\x{00}\x{01}".
     "\x{00}\x{00}\x{00}\x{00}".
 
     atom ('ndhd',
@@ -724,7 +754,8 @@
 "\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}\x{00}".
 
 atom ('sean',
-    "\x{00}\x{00}\x{00}\x{01}\x{00}\x{00}\x{00}\x{02}".
+    "\x{00}\x{00}\x{00}\x{01}".
+    "\x{00}\x{00}\x{00}\x{02}".
     "\x{00}\x{00}\x{00}\x{00}".
 
     atom ('pdat',


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.