argument looptime was implemented.

Author: yoya

sample/sfextractsample.php

@@ -3,13 +3,19 @@
 require_once 'IO/SoundFont.php';
 require_once 'sample/makeWaveData.php';
 
-if ($argc !== 2) {
-    echo "Usage: php sfextractsample.php <sffile>".PHP_EOL;
-    echo "ex) php sample/sfextractsample.php emuaps_8mb.sf2".PHP_EOL;
+if ($argc < 2) {
+    echo "Usage: php sfextractsample.php <sffile> [<looptime>]".PHP_EOL;
+    echo "ex) php sample/sfextractsample.php emuaps_8mb.sf2 3".PHP_EOL;
     exit(1);
 }
 
 $sfdata = file_get_contents($argv[1]);
+if ($argc == 2) {
+    $looptime = null;
+} else {
+    $looptime = $argv[2];
+}
+
 $sf = new IO_SoundFont();
 $sf->parse($sfdata);
 $sf->analyze();
@@ -28,45 +34,57 @@
             $genNdxEnd   = $presetBag['_GenNdxEnd'];
             $modNdxStart = $presetBag['ModNdx'];
             $modNdxEnd   = $presetBag['_ModNdxEnd'];
-            extractBag($presetBag, 'pgen', $genNdxStart, $genNdxEnd);
+            extractBag($presetBag, 'pgen', $genNdxStart, $genNdxEnd, $looptime);
         }                
     }
 }
 
-function extractBag($bag, $genChunkId, $genNdxStart, $genNdxEnd) {
+function extractBag($bag, $genChunkId, $genNdxStart, $genNdxEnd, $looptime) {
     global $sf;
     for ($genIdx = $genNdxStart ; $genIdx <= $genNdxEnd ; $genIdx++) {
         $gen = $sf->pdtaMap[$genChunkId][$genIdx];
 //        echo "Gen: idx:$genIdx ".PHP_EOL;
-        extractGenerator($gen);
+        extractGenerator($gen, $looptime);
     }
 }
 
-function extractGenerator($gen) {
+function extractGenerator($gen, $looptime) {
     global $sf;
     $genOper = $gen['sfGenOper'];
     if ($genOper === 41) { // instrument
         $instIdx = $gen['Amount'];        
         $inst = $sf->pdtaMap['inst'][$instIdx];
-        extractInstrument($inst) ;
+        extractInstrument($inst, $looptime) ;
     } else if ($genOper === 53) { // sampleID
         $sampleIdx = $gen['Amount'];
         $sample = $sf->pdtaMap['shdr'][$sampleIdx];
         echo IO_SoundFont_Sample::string($sample).PHP_EOL;
         //
-        $name = $sample['SampleName'];
-        $start = $sample['Start'];
-        $end = $sample['End'];
-        $sampleData = substr($sf->sfbk['sdta']['smpl']->data, $start * 2 , ($end-$start + 1) * 2);
+        $name  = $sample['SampleName'];
         $sampleRate = $sample['SampleRate'];
+
+        $start = $sample['Start'];
+        $end   = $sample['End'];
+        $data = $sf->sfbk['sdta']['smpl']->data;
+        if (is_null($looptime)) {
+            $sampleData = substr($data, $start * 2 , ($end-$start + 1) * 2);
+        } else {
+            $startLoop = $sample['StartLoop'];
+            $endLoop   = $sample['EndLoop'];
+            $loopCount = $looptime * $sampleRate / ($endLoop - $startLoop + 1);
+            $loopCount = ceil($loopCount); // round up
+            $sampleData = substr($data, $start * 2 , ($startLoop - $start) * 2);
+            $sampleData .= str_repeat(substr($data, $startLoop * 2 , ($endLoop - $startLoop /*+ 1*/) * 2), $loopCount);
+            $sampleData .= substr($data, ($endLoop /*+ 1*/) * 2 , ($end - $endLoop + 1) * 2);
+        }
         $nChannel = 1; // 1:monoral, 2:stereo
         $sampleBits = 16; // 8 or 16
         $waveData = makeWaveData($sampleData, $nChannel, $sampleBits, $sampleRate);
         file_put_contents($name.".wav", $waveData);
     }
 }
 
-function extractInstrument($inst) {
+function extractInstrument($inst, $looptime) {
     global $sf;
     $instName = $inst['InstName'];
     $instBagNdxStart = $inst['InstBagNdx'];
@@ -79,6 +97,6 @@ function extractInstrument($inst) {
         $genNdxEnd   = $instBag['_GenNdxEnd'];
         $modNdxStart = $instBag['ModNdx'];
         $modNdxEnd   = $instBag['_ModNdxEnd'];
-        extractBag($instBag, 'igen', $genNdxStart, $genNdxEnd);
+        extractBag($instBag, 'igen', $genNdxStart, $genNdxEnd, $looptime);
     }
 }