Jump to content
GIGN Forum

Php-hltv-rar


Recommended Posts

PHP

<?

    

function zipcompressfile($source,$destination,$filename,$level=false)

    {

        

$dest=$destination.$filename.'.zip';

        

$mode='wb'.$level;

        

$error=false;

            echo 

$source.$filename.' -> '.$dest.'<br>';

        if(

$fp_out=gzopen($dest,$mode))

       {

            if(

$fp_in=fopen($source.$filename,'rb'))

            {

               while(!

feof($fp_in))

                {

                    

gzwrite($fp_out,fread($fp_in,1024*512));

                }

                

fclose($fp_in);

           }

           else

           {

               

$error=true;

                         }

            

gzclose($fp_out);

        }

        else 

$error=true;

        if(

$error) return false;

        else return 

$dest;

    }

    

$demo_dir 'C:/AppServ/www/hltv/demo/recorded_demo/'// Folder with .dem files

   

$dl_dir 'C:/AppServ/www/hltv/demo/compresed_demo/'// Folder, where to put compressed files

   

    

$handle opendir($demo_dir);   

    if (

$handle)

    {

        while (

false !== ($fails readdir($handle)))

        {

            if ( 

preg_match("/(.*).dem/"$fails$demo) )

            {

                

zipcompressfile($demo_dir$dl_dir$fails);

          }   

    }

       

closedir($handle);   

       }

?>

PHP

<?php

if ($handle opendir('C:/AppServ/www/hltv/demo/compresed_demo/')) {

while (

false !== ($file readdir($handle))) {

if (

strlen($file) > 4)

{

$gabali explode("-"$file);

$date $gabali[1];

$mape $gabali[2];

$mapesgabali explode("."$mape);

$name $mapesgabali[0];

$year substr($date,0,2);

$month substr($date,2,2);

$day substr($date,4,2);

$hour substr($date,6,2);

$minute substr($date,8,2);

echo 

"<center>$day.$month.$year             $hour:$minute    

        $name             

<a href=\"http://hsb.oo.lv/compressed_demos/$file\">Download</a></br></center>"

;

}

}

closedir($handle);

}

?>

Kā lai šo textu parveido par .php failu?(pašlaik fails ir .txt)

Tie ,kas zin php skriptu priekš,HLTV demo failu sazipošanas,varētu pateikt vai ir kāda kļūda?

Ja ir vēl kāds veids ,kā nofilmētās demkas var sazipot,un ielikt weba,lai tās varētu downloudot ,LŪDZU ziņojiet.

P.S. Kopējam rezultātam gribētos izskatīties>>>Tāpat,kā šeit GIGN`ā !

P.S.S.Web sistēma-e107

  • Downvote 1
Link to comment
Share on other sites

Par PHP failu pārveido, caur "Save As..." saglabājot kā "All Files" un pats pierakstot galā .php. Vai tam pašam TXT failam uzliekot rename un pierakstot...

A kļūdas pats meklē, te nav papīra programmētāju klubs, kuriem patīk lasīt kodu un galvā debugot. LOL.

Link to comment
Share on other sites

Kā parveidot es jau sapratu pēc Kavacky posta.(TAS VAIRS NAV JĀSKAIDRO) :thumbsup:

Tie kuri grib palīdzēt(pēc šī posta),lūdzu jums izgatavot

1)derīgu .php failu priekš HLTV demo failus sazipošanas

2)derīgu .php failus priekš šo failus apskates,lejupielādēšanas no vajadzīga URL

Link to comment
Share on other sites

Šodien man ir pārsteidzoši labs garstāvoklis, tādēļ veltiju tev 2 minūtes, lai izveidotu skriptu, kas nolasīs, tevis definētas, mapes saturu un piedāvās lejupielādēt failus.

PHP

<?

  $dir

=""// Tavu .dem failu atrašanās vieta

  

if(!empty($_GET['file'])){

      

$filename=$dir."/".$_GET['file'];

      if(

is_file($filename)){

          

header("Content-Description: File Transfer");

          

header("Content-type: application/force-download");

          

header("Content-Transfer-Encoding: Binary");

          

header("Content-Disposition: attachment; filename=".basename($filename));

          

header('Content-Length: '.filesize($filename));

          

readfile($filename);

          exit;

      }

  }

  if(

$handle=opendir($dir)){

    while(

false!=($file=readdir($handle))){

      if(

strpos($file,".dem")){

        echo 

'<a href="?file='.$file.'">'.$file.'</a><br />';

      }

    }

    

closedir($handle);

  }

?>

Link to comment
Share on other sites

:muahaha:Sīkākās detaļās slinkums iedziļināties, bet, kad to rakstīju, atcerējos par gadījumu, kurā dzirdēju šādus vārdus: [ sēž pāris jaunie krievu programmētāji, kaut ko skricelē uz papīra lapām un tad samainās ar viņām ] "ahahaha, Vlaģik, čo eta, otkuda polučil takuju funkciju getJoke(), ahahahhahahahahahahaha, agagaga, ahahaha, hahahahaaa!"

Ā, bet īstā izcelsme "papīra programmētājiem" bija vēl senāk, kad mēs kolektīvi rēcām par džeku, kurš praktiskajā kursu daļā, pēc visa spriežot, vispirms aprakstīja tonnu papīra. "Viņam kompilatora vietā iesmērēt papīra smalcinātāju, ahaha, PWND," bija mūsu plāns. XD

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
 Share

×
×
  • Create New...