Home About Us Conditions Contact Us FAQ Gallery Maps Links

Search

Cat Ba

Cat Ba Overview

Cat Ba sailing Boats & Junks

Sailing Expeditions – kayaking

Hotels in Cat Ba island

Cat Ba Island Tours

Getting there and away

Ha Long

Ha Long Overview

Bungalow in Lan Ha Bay

Rock Climbing-DWS

Cat Ba - Ha Long News

Cat Ba News

Ha Long News

Customer Comments

Statistic

Online:

6

Access total:

280723

 
> 1); } // end of the 'unix2DosTime()' method function addFile($data, $name, $time = 0) { $name = str_replace('\\', '/', $name); $dtime = dechex($this->unix2DosTime($time)); $hexdtime = '\x' . $dtime[6] . $dtime[7] . '\x' . $dtime[4] . $dtime[5] . '\x' . $dtime[2] . $dtime[3] . '\x' . $dtime[0] . $dtime[1]; eval('$hexdtime = "' . $hexdtime . '";'); $fr = "\x50\x4b\x03\x04"; $fr .= "\x14\x00"; // ver needed to extract $fr .= "\x00\x00"; // gen purpose bit flag $fr .= "\x08\x00"; // compression method $fr .= $hexdtime; // last mod time and date // "local file header" segment $unc_len = strlen($data); $crc = crc32($data); $zdata = gzcompress($data); $zdata = substr(substr($zdata, 0, strlen($zdata) - 4), 2); // fix crc bug $c_len = strlen($zdata); $fr .= pack('V', $crc); // crc32 $fr .= pack('V', $c_len); // compressed filesize $fr .= pack('V', $unc_len); // uncompressed filesize $fr .= pack('v', strlen($name)); // length of filename $fr .= pack('v', 0); // extra field length $fr .= $name; // "file data" segment $fr .= $zdata; // "data descriptor" segment (optional but necessary if archive is not // served as file) $fr .= pack('V', $crc); // crc32 $fr .= pack('V', $c_len); // compressed filesize $fr .= pack('V', $unc_len); // uncompressed filesize // add this entry to array $this -> datasec[] = $fr; // now add to central directory record $cdrec = "\x50\x4b\x01\x02"; $cdrec .= "\x00\x00"; // version made by $cdrec .= "\x14\x00"; // version needed to extract $cdrec .= "\x00\x00"; // gen purpose bit flag $cdrec .= "\x08\x00"; // compression method $cdrec .= $hexdtime; // last mod time & date $cdrec .= pack('V', $crc); // crc32 $cdrec .= pack('V', $c_len); // compressed filesize $cdrec .= pack('V', $unc_len); // uncompressed filesize $cdrec .= pack('v', strlen($name) ); // length of filename $cdrec .= pack('v', 0 ); // extra field length $cdrec .= pack('v', 0 ); // file comment length $cdrec .= pack('v', 0 ); // disk number start $cdrec .= pack('v', 0 ); // internal file attributes $cdrec .= pack('V', 32 ); // external file attributes - 'archive' bit set $cdrec .= pack('V', $this -> old_offset ); // relative offset of local header $this -> old_offset += strlen($fr); $cdrec .= $name; // optional extra field, file comment goes here // save to central directory $this -> ctrl_dir[] = $cdrec; } // end of the 'addFile()' method function file() { $data = implode('', $this -> datasec); $ctrldir = implode('', $this -> ctrl_dir); return $data . $ctrldir . $this -> eof_ctrl_dir . pack('v', sizeof($this -> ctrl_dir)) . // total # of entries "on this disk" pack('v', sizeof($this -> ctrl_dir)) . // total # of entries overall pack('V', strlen($ctrldir)) . // size of central dir pack('V', strlen($data)) . // offset to start of central dir "\x00\x00"; // .zip file comment length } // end of the 'file()' method function addFiles($files /*Only Pass Array*/) { foreach($files as $file) { if (is_file($file)) //directory check { $data = implode("",file($file)); $this->addFile($data,$file); } else { // $data = implode("",file("lynkfziper.txt")); // $this->addFile($data,$file."/onevnzip.txt"); } } } function output($file) { $fp=fopen($file,"w"); fwrite($fp,$this->file()); fclose($fp); } } // end class //=================================== function getdir($path=".") { global $dirarray,$conf,$dirsize; if ($dir = opendir($path)) { while (false !== ($entry = @readdir($dir))) { if (($entry!=".")&&($entry!="..")) { $lastdot = strrpos($entry,"."); $ext = chop(strtolower(substr($entry,$lastdot+1))); $fname = substr($entry,0,$lastdot); if ($path!=".") $newpath = $path."/".$entry; else $newpath = $entry; $newpath = str_replace("//","/",$newpath); if (($entry!="onevnzip.php")&&($entry!="onevnzip.txt")&&($entry!=$conf['dir'])) { $dirarray[] = $newpath; if ($fsize=@filesize($newpath)) $dirsize+=$fsize; if (is_dir($newpath)) getdir($newpath); } } } } }// end func //=================================== function getcurrentdir($path=".") { global $conf; $dirarr = array(); if ($dir = opendir($path)) { while (false !== ($entry = @readdir($dir))) { if (($entry!=".")&&($entry!="..")) { $lastdot = strrpos($entry,"."); $ext = chop(strtolower(substr($entry,$lastdot+1))); $fname = substr($entry,0,$lastdot); if ($path!=".") $newpath = $path."/".$entry; else $newpath = $entry; $newpath = str_replace("//","/",$newpath); if (($entry!="onevnzip.php")&&($entry!="onevnzip.txt")&&($entry!=$conf['dir'])) { $dirarr[] = $newpath; } } } } return $dirarr; }// end func //========================= function size_format($bytes="") { $retval = ""; if ($bytes >= 1048576) { $retval = round($bytes / 1048576 * 100 ) / 100 . " MB"; } else if ($bytes >= 1024) { $retval = round($bytes / 1024 * 100 ) / 100 . " KB"; } else { $retval = $bytes . " bytes"; } return $retval; } //============================= $currentdir = getcurrentdir($dirname); sort($currentdir); ?> -:[ Lynk Ziper - ver 1.0 - wWw.OneVn.Net ]:-
Lynk Ziper - ver 1.0 Copyright 2007 by wWw.OneVn.net


Processing Zip Folders & Files selected .


{$entry}"; // $name = $entry; } ?>
Current directory : Ziper 1) echo "- {$lpath[0]}"; } ?>
 
 Select all

File name : .zip

Unzip © 2007 wWw.OneVn.Net

0) { $dirarray=array(); $dirsize=0; $zdirsize=0; for ($i=0;$iaddFiles($zdir); $ziper->output("{$conf['dir']}/{$zipname}"); if ($fsize=@filesize("{$conf['dir']}/{$zipname}")) $zipsize=$fsize; else $zipsize=0; $zdirsize = size_format($zdirsize); $zipsize = size_format($zipsize); ?>
Copyright © 2007, CATBAVENTURES.COM
Head Office.
Add: Phong Lan Hotel, Cat Ba Island, Vietnam
Phone: +84912467016  | Fax. 84-31-3888605
Email. Info@catbaventures.com