การใช้ PHP เพื่อวิเคราะห์และวาดไดอะแกรมรูปคลื่นของไฟล์เสียงยังไม่ค่อยพบเห็นทางออนไลน์ ในความเป็นจริง มันง่ายมากที่จะใช้ fseek, fopen, fopen, pack/unpack และฟังก์ชันอื่นๆ ของ Php ตามข้อกำหนดของไฟล์ wav รวมถึงไลบรารีกราฟิก gd อันทรงพลัง หลายๆ คนอาจไม่คุ้นเคยกับฟังก์ชัน pack/unpack จริงๆ แล้วนี่เป็นการยืมมาจาก Perl โดย Php และให้วิธีเข้าถึงโครงสร้างข้อมูลไบนารีที่ซับซ้อนโดยใช้ภาษาสคริปต์ โปรแกรมแบบง่ายของฉันสามารถประมวลผลไฟล์เสียง RIFF ในรูปแบบ PCM เท่านั้น (ซึ่งเป็นรูปแบบ wav ที่พบบ่อยที่สุด) ไม่มีการจำกัดช่องสัญญาณ แต่อัตราบิต (BitsPerSample) ควรเป็น 16
นี่คือรูปแบบไฟล์ wave และรูปแบบไฟล์เสียง Microsoft wave สำหรับการอ้างอิง นี่คือตัวอย่างในทางปฏิบัติ (ดาวน์โหลดเพื่อขยาย)
นี่คือใบเสนอราคา:
1 <?Php
2
3 ฟังก์ชั่น wav_graph($file, $f=0, $w=0)
4 {
5 global $DATA_DIR;
6
7 if(!is_file($file)) return 0;
8 $fp = fopen($DATA_DIR.$file , 'r');
9 $raw = fread($fp, 36);
10 $str = '';
11 $header = แกะ ('A4Riff/VSize/A4Wav/A4Head/VHeadSize/vPCM/vChannels/VSampleRate/VByteRate/ vBlockAlign/vSampleBits', $raw);
12 foreach
($fp,36
+ $header ['HeadSize'] - 16);
15 $raw = fread($fp, 8);
16 $data = แกะ('A4Data/VDataSize', $raw);
17 foreach($data as $k=>$v)
18
$str .= $k.': '. $v.';
22
$
l = $b * $c / 8; // ความยาวเฟรมตัวอย่างเป็นไบต์
23 $s=
$data['DataSize'] / $l; // จำนวนตัวอย่างทั้งหมด
24 $r = $header['SampleRate'];
) $h = ธาร(2, $b) / $f;
26 อื่น ๆ { $h = 200; $f = ธาร(2, $b - 1) / $h; }
27 ถ้า($w == 0) $ w = round($r / 1,000); // ค่าเริ่มต้นที่จะแสดง 1,000 เฟรมตัวอย่างต่อนาที
28
29 header("Content-type: image/png");
30 $im = imagecreate($s / $w, $h * $c * 2);
31 imagecolorallocate($im, 0xff, 0xff, 0xff); // สีขาว bg
32 $color = imagecolorallocate($im, 0, 0, 255); // สีดำ
33 // imagestring($im, 5, 5, 5, $str, $color);
34
35 $x=0; $y = array();
36 สำหรับ($i = 0; $i < $c; $i++ ) $y[$i] = $h * $i + $h;
37 $n = $l * $w;
38 ในขณะที่(1)
39 {
40 if($
s == 0) พัง;
< $n) $n = $s;
42 $samples = fread($fp, 1000 * $n);
43 if($samples === FALSE) แตก;
44 $packed = unpack("s*", $samples );
45 foreach($packed as $k=>$v)
46 {
47 $cnt = ($k-1) % ($w * $l) ;
48 ถ้า( $cnt > $c - 1) ดำเนินการต่อ
; $yn[$cnt] = $h * $cnt + $h - $v / $f;
50 อิมเมจไลน์($im, $x, $y[$cnt], $x+1, $yn[$cnt], $color);
51 $y[$cnt] = $yn[$cnt];
53
}
54 $s -= $n;
55 }
56
57 imagepng($
im);
59 }
60
61 //wav_graph('audio2.wav');
62 ?>