Problema al Subir Archivos

[wannabe_aqp]

Buenas, tengo un problema,
quiero subir archivos pero de forma dinamica, con una barra de progresion.
subir el archivo no es un problema, lo llega a subir,
el problema,
esq cuando stoy subiendo mando peticiones por xmlhttprequest, para saber cuanto va subiendo del archivo, pero no tengo la idea muy clara en dond preguntar, he probado consultando el $HTTP_POST_FILES, pero leyendo en el foro es una variable q solo es local tambien probe en $_FILES pero encuentro vacio el array, se q al subir un archivo crea un temporal en mi caso(C:\xampp\tmp\php593.tmp esto lo logro saber pero despues de subir el archivo, yo quiero saberlo antes)
, pero como puedo saber que temporal es?
y tambien cuanto del tamaño ya va subiendo.

encontre algo parecido en la red, pero trabaja con un cgi, yo quisiera trabajar con php puro

Esta es la pagina q encontre: (le quite el h t t p, por motivos de antispam)
codigo-fuente.com/programacion_web/subir-archivos-en-ajax-y-php-con-barra-de-progreso

Espero haber sido claro, muchas gracias por su tiempo.
Saludos

[Nefertiter]

no se puede con php puro.

[Ronruby]

$HTTP_POST_FILES, pero leyendo en el foro es una variable q solo es local

No es solo local, antes se usaba en vez de $_FILES, pero esta obsoleta y solo funciona si tienes activada una directiva en tu php.ini

El array $_FILES va a estar vacio porque este se llena cuando el archivo ha sido subido completamente.

encontre algo parecido en la red, pero trabaja con un cgi, yo quisiera trabajar con php puro

Con PHP "puro" no puedes, tienes que usar alguna tecnologia aparte que sea capaz de interactuar con el cliente en tiempo real.

Echale un vistazo a esta pagina:
http://www.devpro.it/upload_progress/

[wannabe_aqp]

Gracias por sus respuestas x lo visto no se puede con php puro, lo intentare con el ejemplo q tengo con cgi, spero q el servidor soporte CGI's :S,
espero q algun dia los desarrolladores de PHP, puedan implementar alguna nueva funcion para dar seguimiento a los archivos q se van subiendo.

:D
Saludos y Gracias.

[GatorV]

La extensión ya existe, se llama php_upload.dll y esta disponible desde PHP5.2, solo que muchos hosts no la tienen activada.

Saludos

[wannabe_aqp]

uhmm, interesant voy averguiar un poco mas acerca de eso, Gracias por su ayuda :D

Buenos a fin de cuentas, utilize cgi, por si acaso les paso lo q encontre.
No soy bueno con cgi's :S

Código:

#!"C:\xampp\perl\bin\perl.exe"
use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI;
use Fcntl qw(:DEFAULT :flock);
use File::Temp qw/ tempfile tempdir /;

my $dir = "./upload/";
my %Input;
my $query = new CGI;
my @pairs = $query->param;

foreach my $pair(@pairs){
	$Input{$pair} = $query->param($pair);
}

#Array con extensiones de archivos que podemos recibir
my @extensiones = ('gif','jpg','jpeg','bmp','png');

recepcion_de_archivo(); #Iniciar la recepcion del archivo

#TODO SALIO BIEN
print "Content-type: text/html\n\n";
print "<h1>El archivo fue recibido correctamente</h1>\n";
exit(1);

sub recepcion_de_archivo{

my $nombre_en_servidor = $Input{'archivo'};
$nombre_en_servidor =~ s/ /_/gi;
$nombre_en_servidor =~ s!^.*(\\|\/)!!;

my $extension_correcta = 0;

foreach (@extensiones){
	if($nombre_en_servidor =~ /\.$_$/i){
		$extension_correcta = 1;
		last;
	}
}
$extension_correcta = 1;
if($extension_correcta){
	#Crear Temporal
	my $temporal = $dir.$nombre_en_servidor.".tmp";
	if (-e "$nombre_en_servidor") { #borrar si Existe
		#unlink("$nombre_en_servidor");
	}
	if (-e "$temporal") {#borrar si Existe
		unlink("$temporal");
	}
	my $content_length = $ENV{'CONTENT_LENGTH'};
	sysopen(FH, $temporal, O_RDWR | O_CREAT)
		or die "No se puede abrir numfile: $!";
	# autoflush FH
	my $ofh = select(FH); $| = 1; select ($ofh);
	flock(FH, LOCK_EX)
		or die "No se puede escribir numfile: $!";
	seek(FH, 0, 0)
		or die "No se puede volver a trás numfile : $!";
	#Escribimos el tamaño total en el archivo 
	print FH $content_length;	
	close(FH);#Cerramos el flujo
	sleep(1);

	#Creando Archivo en Servidor...
	open (OUTFILE, ">$dir/$nombre_en_servidor") || die "No se puedo crear el archivo";
	binmode(OUTFILE); #Para no tener problemas en Windows

	#Transferimos byte por byte el archivo
	while (my $bytesread = read($Input{'archivo'}, my $buffer, 1024)) {
	print OUTFILE $buffer;
}

#Cerramos el archivo creado
close (OUTFILE);
#unlink("$temporal");
}else{
	print "Content-type: text/html\n\n";
	print "<h1>Extension incorrecta</h1>";
	print "Sólo se reciben archivo con extension:";
	print join(",", @extensiones);
	exit(0);
}
} #sub recepcion_de_archivo