Witaj Gościu! ( Zaloguj | Rejestruj )

Forum PHP.pl

> [perl] pasek postępu uploadu plików
yarek12
post
Post #1





Grupa: Zarejestrowani
Postów: 127
Pomógł: 0
Dołączył: 5.08.2010

Ostrzeżenie: (10%)
X----

Witam,
Już od dłuższego czasu próbuję napisać pasek postępu, przepatrzyłem praktycznie cały internet i wszystkie możliwości, jednak nie znalazłem żadnego działającego rozwiązania.

Więc postanowiłem spróbować z perlem, oto mój kod uploadu:

[PHP] pobierz, plaintext 
  1. #!/usr/bin/perl -w
  2.  
  3. use strict;
  4.  
  5. use warnings;
  6. use CGI;
  7. use CGI::Carp qw(fatalsToBrowser);
  8.  
  9. my $q = new CGI();
  10.  
  11.  
  12. # Handle actions.
  13. if ($q->param('action') eq "upload") {
  14. # They just submitted the form and are sending a file.
  15.  
  16. my $filename = $q->param('file');
  17. my $handle   = $q->upload('file');
  18. $filename =~ s/(?:\\|\/)([^\\\/]+)$/$1/g;
  19.  
  20. # File size.
  21.  
  22. my $size = (-s $handle);
  23.  
  24. # This session ID would be randomly generated for real.
  25. my $sessid = 'my-session';
  26.  
  27. # Create the session file.
  28.  
  29. open (CREATE, ">./sessions/$sessid") or die "can't create session: $!";
  30. print CREATE "size=$size&file=$filename";
  31. close (CREATE);
  32.  
  33. # Start receiving the file.
  34.  
  35. open (FILE, ">./files/$filename");
  36. while (<$handle>) {
  37. print FILE;
  38. }
  39. close (FILE);
  40.  
  41. # Delete the session.
  42.  
  43. unlink("./sessions/$sessid");
  44.  
  45. # Done.
  46. print $q->header();
  47. print "Thank you for your file. <a href=\"files/$filename\">Here it is again</a>.";
  48. }
  49.  
  50. elsif ($q->param('action') eq "progress") {
  51. # They're checking up on their progress; get their sess ID.
  52. my $sessid = $q->param('session') || 'my-session';
  53. print $q->header(type => 'text/plain');
  54.  
  55. # Does it exist?
  56.  
  57. if (!-f "./sessions/$sessid") {
  58. print "error:Your session was not found.";
  59. exit(0);
  60. }
  61.  
  62. # Read it.
  63.  
  64. open (READ, "./sessions/$sessid");
  65. my $line = <READ>;
  66. close (READ);
  67.  
  68. # Get their file size and name.
  69.  
  70. my ($size,$name) = $line =~ /^size=(\d+)&file=(.+?)$/;
  71.  
  72. # How much was downloaded?
  73.  
  74. my $downloaded = -s "./files/$name";
  75.  
  76. # Calculate a percentage.
  77. my $percent = 0;
  78. if ($size > 0) {
  79. $percent = ($downloaded / $size) * 100;
  80. $percent =~ s/\.(\d)\d+$/.$1/g;
  81. }
  82.  
  83. # Print some data for the JS.
  84.  
  85. print "okay:size=$size&received=$downloaded&percent=$percent";
  86. exit(0);
  87. }
  88. else {
  89. die "unknown action";
  90. }
[PHP] pobierz, plaintext


Serwer zwraca jednak następujący błąd: couldn't create child process: 720003: upload.cgi


Z góry dziękuję za pomoc, bardzo mi na tym zależy, ewentualnie jeśli ktoś zna inny sposób na pasek postępu, również będę wdzięczny.
Pozdrawiam.
Go to the top of the page
+Quote Post
 
 Start new topic
Odpowiedzi
yarek12
post
Post #2





Grupa: Zarejestrowani
Postów: 127
Pomógł: 0
Dołączył: 5.08.2010

Ostrzeżenie: (10%)
X----

Chyba coś robię nie tak, apc widać działa bo żaden błąd nie wyskoczył, efekt jest taki że nie uploaduje nawet żadnego pliku, przeładowuje tylko stronę a do ramki wczytują całą stronę od nowa.
Nie wiem czy dobrze zrozumiałem kod, zobacz jak to posklejałem:


apc.php:
[PHP] pobierz, plaintext 
  1. <html>
  2. <head>
  3.  <meta http-equiv='Content-Type' content='text/html; charset=UTF-8' />
  4. <script type='text/javascript'>
  5.  var oReq=new XMLHttpRequest();
  6.  
  7.  function getProgress() {
  8.   oReq.open('GET','test.php?progress=pasek_1',true);
  9.   oReq.onreadystatechange=updateProgress
  10.   oReq.send(null);
  11.  }
  12.  
  13.  function updateProgress() {
  14.   if(oReq.readyState!=4 || oReq.status!=200) return;
  15.   var progress=oReq.responseText;
  16.   document.getElementById('procent').innerHTML=progress+'%';
  17.   if(progress<100) setTimeout('getProgress()',500);
  18.  }
  19. </script>
  20. </head>
  21. <body>
  22. <?php echo $message; ?>
  23. <div id='procent'></div>
  24. <form name='f1' method='POST' action='' enctype='multipart/form-data'
  25.  onSubmit='setTimeout("getProgress()",500)' target='upload_frame'>
  26. <input type='hidden' name='APC_UPLOAD_PROGRESS' value='pasek_1' />
  27. Plik: <input type='file' name='plik' /><br>
  28. <input type='submit' value='Wyślij' />
  29. </form>
  30.  
  31. <a href=''>Odśwież</a>
  32. <iframe style='display:block' name='upload_frame'></iframe>
  33. </body>
  34. </html>
[PHP] pobierz, plaintext


test.php:
[PHP] pobierz, plaintext 
  1. <?php
  2. if(isset($_GET['progress'])) {
  3.  header('Expires: Tue, 08 Oct 1991 00:00:00 GMT');
  4.  header('Cache-Control: no-cache, must-revalidate');
  5.  $status=apc_fetch("upload_$_GET[progress]");
  6.  if(!$status) die(0);
  7.  echo round($status['current']/$status['total']*100);
  8.  exit();
  9. }
  10. $message='';
  11. if($_FILES) {
  12.  if($_FILES['plik']['error']==UPLOAD_ERR_OK) {
  13.   $path='/tmp/';
  14.   $path.=basename($_FILES['plik']['name']);
  15.   if(move_uploaded_file($_FILES['plik']['tmp_name'],$path))
  16.    $message='Plik przesłany poprawnie.';
  17.   else
  18.    $message='Błąd podczas kopiowania pliku';
  19.  } else $message="Błąd podczas przesyłania pliku: ".$_FILES['plik']['error'];
  20.  die($message);
  21. }
  22. ?>
[PHP] pobierz, plaintext
Go to the top of the page
+Quote Post

Posty w temacie
- yarek12   [perl] pasek postępu uploadu plików   5.11.2011, 10:08:39
- - JohnnyB   właśnie niedawno zrobiłem sobie fajny paseczek, ty...   5.11.2011, 18:22:30
- - yarek12   Próbowałem APC, jednak nie działało, możesz mi coś...   8.11.2011, 18:29:00
- - JohnnyB   sprawdź jakie masz ustawienia (w plikach konfigura...   8.11.2011, 19:57:04
- - yarek12   apc.enabled On On apc.rfc1867 On On apc.rfc1867_fr...   9.11.2011, 12:58:20
- - JohnnyB   ok, no to lecimy dalej: [PHP] pobierz, plaintext ...   9.11.2011, 19:33:34
- - yarek12   Chyba coś robię nie tak, apc widać działa bo żaden...   10.11.2011, 18:07:00
- - JohnnyB   to wszystko (cały kod) powinno być w jednym pliku ...   10.11.2011, 21:38:27
- - yarek12   teraz plik się wysyła, czyli jest ok, ale wyświetl...   10.11.2011, 22:05:20
- - JohnnyB   podobno czasami funkcje apc_fetch lepiej działa je...   10.11.2011, 23:42:20
- - yarek12   Powiedz mi a do jakiego folderu jest uploadowany p...   12.11.2011, 09:17:19
- - JohnnyB   Docelowo pliki kopiowane są tutaj: [PHP] pobierz, ...   12.11.2011, 11:03:22

« Następny starszy · Serwery WWW · Następny nowszy »
 

Reply to this topicStart new topic
2 Użytkowników czyta ten temat (2 Gości i 0 Anonimowych użytkowników)
0 Zarejestrowanych:

 

Tryb wyświetlania: Przełącz na: Standardowy · Przełącz na: Linearny+ · Drzewo

Śledź ten temat · Wyślij temat na e-mail · Wydrukuj ten temat · Subskrybuj to forum

RSS Aktualny czas: 11.10.2025 - 09:16
Powered By IP.Board © 2025  IPS, Inc.
All changes by PHP.pl Administrators
Hosting zapewnia NQ.pl hosting, trac, svn