Powerpoint Sunusuna Gömülen Flash SWF Dosyasını Çıkarma

by H. ÇELİK · Published 10 Temmuz 2015 · Updated 3 Aralık 2016

Powerpoint sunularına gömülen Shockwave Flash Object (SWF) nesneleri *.swf dosyası olarak isteniyorsa yapılacak işlemler..

Öncelikle php scriptlerini bilgisayarda çalıştırabilmek için bir sunucu kurmak gerekir. (örneğin Wampserver)
Windows Klasör ve Arama Seçeneklerinden “Bilinen dosya türleri için uzantıları gizle” seçeneğinin önündeki tik işareti kaldırılmalı.. Bu sayede dosya uzantısı değiştirilebilir.
Swf gömülü powerpoint dosyasının uzantısı *.zip ya da *.rar olarak değiştirilir. Örneğin dosyanın adı sunu.pptx bu sunu.zip olarak değiştirilir.
İsim değiştirildikten sonra Winrar/Winzip gibi sıkıştırma programlarıyla dosya açılır.
.\ppt\activeX klasörüne gelinir.
Bu klasördeki *.bin uzantılı dosyalar Localhost klasörüne (www veya wwwroot) kopyalanır.
Aşağıdaki php scripti Localhosta bir php dosyası olarak kaydedilir. (örneğin convert.php)
Daha sonra sunucudan bu dosya çalıştırıldığında bin dosyalarıyla aynı ismi taşıyan swf dosyaları elde edilmiş olur..

Php script;

<?php //Script to extract SWF files from pptx files (once unzipped) //Set up file type an extension for checking</code> $FWSMarker = "FWS"; $extension = ".BIN"; // Start parsing directory if ($handle = opendir('.')) { echo "Directory handle: $handle\n"; echo "Entries:\n"; /* Loop over the directory searching for all files */ while (false !== ($entry = readdir($handle))) { /* Check for file extension*/ $filename = strtoupper(rtrim($entry)); $entry_len = strlen($entry); $entry_pos = $entry_len - strlen($extension); /* If .BIN search in file for FWS*/ if (substr($filename, $entry_pos , strlen($extension)) == $extension ) { echo "Found entry $entry that is a .bin file \n"; $newhandle = fopen($entry, "r"); $contents = fread($newhandle, filesize($entry)); $marker = strpos($contents, $FWSMarker); if ($marker != 0) { echo "FWS Found at position : $marker\n"; // truncate file from before FWS marker $newlen = strlen ($contents); $contents = substr($contents, $marker, ($newlen-$marker)); // get SWF file length from SWF header and reverse (little endian) $swflen = substr ($contents, 4, 4); $swflen = strrev($swflen); //convert file length into something php can work with $act_len=""; for ($i=0; $i<4; $i++){ $newchar=ord(substr($swflen,$i,1)); $newchar=strval(dechex($newchar)); $act_len=$act_len.$newchar; } // convert from hex to dec $act_len=hexdec($act_len); echo "Actual SWF file length : $act_len bytes\n"; /* Truncate File to that length*/ $contents=substr($contents,0,$act_len); /* Save New File */ $newfilename = $entry.".swf"; $newhandle = fopen($newfilename, 'w'); fwrite($newhandle,$contents); echo "SWF file outputted to $newfilename \n\n"; fclose($newhandle); } } } //Wrap it up and exit closedir($handle); } ?>

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

<?php
//Script to extract SWF files from pptx files (once unzipped)
//Set up file type an extension for checking</code>

$FWSMarker = "FWS";
$extension = ".BIN";

// Start parsing directory

if ($handle = opendir('.')) {
echo "Directory handle: $handle\n";
echo "Entries:\n";

/* Loop over the directory searching for all files */

while (false !== ($entry = readdir($handle))) {

/* Check for file extension*/

$filename = strtoupper(rtrim($entry));
$entry_len = strlen($entry);
$entry_pos = $entry_len - strlen($extension);

/* If .BIN search in file for FWS*/

if (substr($filename, $entry_pos , strlen($extension)) == $extension )
{
echo "Found entry $entry that is a .bin file \n";
$newhandle = fopen($entry, "r");
$contents = fread($newhandle, filesize($entry));
$marker = strpos($contents, $FWSMarker);
if ($marker != 0)
{
echo "FWS Found at position : $marker\n";

// truncate file from before FWS marker

$newlen = strlen ($contents);
$contents = substr($contents, $marker, ($newlen-$marker));

// get SWF file length from SWF header and reverse (little endian)

$swflen = substr ($contents, 4, 4);
$swflen = strrev($swflen);

//convert file length into something php can work with

 $act_len="";
 for ($i=0; $i<4; $i++){
 $newchar=ord(substr($swflen,$i,1));
 $newchar=strval(dechex($newchar));
 $act_len=$act_len.$newchar;
 }
 // convert from hex to dec
 $act_len=hexdec($act_len);
 echo "Actual SWF file length : $act_len bytes\n";
 /* Truncate File to that length*/
 $contents=substr($contents,0,$act_len);
 /* Save New File */
 $newfilename = $entry.".swf";
 $newhandle = fopen($newfilename, 'w');
 fwrite($newhandle,$contents);
 echo "SWF file outputted to $newfilename \n\n";
 fclose($newhandle);
 }
 }
 }

//Wrap it up and exit

 closedir($handle);
}
?>

Powerpoint Sunusuna Gömülen Flash SWF Dosyasını Çıkarma

You may also like...

Birden Çok Belgeyi Bir Belgede Birleştirme..

Eset AV Kaldırma

Adobe CS6 MasterCollection Kurulumu