Contenido principal

Breve discusión acerca del protocolo HTTP

Septiembre 8, 2008

Y el segundo caso del segundo caso (envío de archivos):
Tenemos un archivo “subir.asp” con el siguiente code:

Dim Archivo
Set Archivo = Server.CreateObject("Perits.Upload")
Archivo.Save(Server.MapPath("\"))
Set Archivo = Nothing

Y tenemos el formulario de envío:

<form action=subir.asp method=post enctype=multipart/form-data>
<input name=archivo type=file>
<input type=submit name=Submit value=Mandar>
</form>

La petición, vamos a mandar un archivo de 25 bytes para no ampliarnos tanto:

POST /subir.asp HTTP/1.0 (crlf)
Content-Type: multipart/form-data, boundary=tyoasEdRQLsovS3LUFPBS5Eyy7tOwzil (crlf)
Content-Length: 197 (crlf)
(crlf)
--tyoasEdRQLsovS3LUFPBS5Eyy7tOwzil (crlf)
Content-Disposition: form-data; name="archivo"; filename="imagen.jpg" (crlf)
Content-Type: image/jpeg (crlf)
(crlf)
Soy un jpg modificado!!! (crlf)
--tyoasEdRQLsovS3LUFPBS5Eyy7tOwzil—

Como ven, ya se pone un poco complicada la cosa, pero miremos su estructura:

POST (Recurso) (Versión protocolo) (crlf)
(Content-Type)(:) (Tipo de contenido)(,) (boundary)(=)(codigo) (crlf)
(Content-Length)(:) (Longitud de datos del cuerpo del mensaje) (crlf)
(crlf)
(codigo) (crlf)
(Content-Disposition)(:) (datos) (crlf)
(Content-Type)(:) (Tipo archivo) (crlf)
(crlf)
(contenido archivo) (crlf)
(codigo)

El content-type varia por el tipo de archivo que mandamos, si estamos mandando varios post o varios archivos este tipo sera: multipart/form-data, si es otro tipo de archivos remitirse a: http://www.utoronto.ca/webdocs/HTMLdocs/Book/Book-3ed/appb/mimetype.html

El "código" sirve para separar los diferentes post que estamos mandando, diferentes archivos por ejemplo, seria:

(codigo)
Archivo 1
(codigo)

(codigo)
Archivo 2
(codigo)

El content-Length es la longitud de los datos, pero no solo de los archivos si no de todo el cuerpo del mensaje, incluyendo los códigos.
En el content-disposition de la petición que armamos

Content-Disposition: form-data; name="archivo"; filename="imagen.jpg"

Se distinguen varios puntos, el “name” que es la variable que estamos enviando, y el “filename” que obviamente es el nombre del archivo que estamos mandando.

Y bueno, con esto se acaba la breve explicación del protocolo http, si quieren investigar y saber más acerca de este, existe el rfc: http://tools.ietf.org/html/rfc2616.

Código Visual Basic
El código es lo mas sencillo de todo el proceso, voy a publicar solo la base, y al final el link de descarga del proyecto completo.

Necesitamos
CommandButton: Nombre = Request
TextBox: Nombre = Url
TextBox: Nombre = Petición
Multiline = True
TextBox: Nombre = Resp
Multiline = True
Componente: Microsoft Winsock Control 6.0: Nombre = Ws

Private Sub Request_Click()
Host = SepararHostdeUrl(Url.text)
Ws.Connect Host, 80 ‘El puerto por defecto del servicio http es el 80
Volver:
If Ws.State &lt;&gt; sckConnected Then ‘Si el cliente no esta conectado entonces va a el punto de referencia “Volver”
DoEvents
Goto Volver
End If
‘Esto provocaría un loop infinito si no se hacen bien las cosas, en el código completo esta corregido el fallo.

Ws.Senddata Petición.text
End Sub

Private Function SepararHostdeUrl(Url$) As String
‘Esta función sirve para separar el host de la URL
Dim Host$, X%
If Url <> "http://" Then
Host = Replace(Url, "http://", "")
X = InStr(1, Host, "/")
Volver:
If X <> 1 Then
If X <> 0 And Len(Host) <> X Then
Host = Mid$(Host, 1, X - 1)
Else
Host = Replace(Host, "/", "")

End If
Else
Host = Mid$(Host, 2, Len(Host) - 1)
GoTo Volver
End If

X = InStr(1, Host, ".")
If X <> 0 And Len(Host) = X Then
Host = Replace(Host, ".", "")
Host = Host & ".com"
ElseIf X = 0 And Host <> "localhost" Then
Host = Host & ".com"
End If
Volver2:
If InStr(1, UrlChars, Mid$(Host, 1, 1), vbTextCompare) = 0 Then
Host = Mid$(Host, 2, Len(Host) - 1)
GoTo Volver2
End If
Volver3:
If InStr(1, Mid$(UrlChars, 1, 26), Mid$(Host, Len(Host), 1), vbTextCompare) = 0 Then
Host = Mid$(Host, 1, Len(Host) - 1)
GoTo Volver3
End If
End If
SepararHostdeUrl = Host
End Function

Private Sub Ws_DataArrival(ByVal bytesTotal As Long)
Dim Respuesta as string
Ws.Getdata Respuesta, vbstring, bytestotal
Resp.Text = Respuesta
End Sub

Páginas: 1 2 3 4

Archivado en: Programación |

18 comentarios

  1. kmykc Septiembre 23, 2008 @ 7:23 pm

    Que hay brother, tengo una consulta, haber si me puedes hechar una mano.

    Estoy tratando de validar un dato via post desde telnet, todo lo estoy haciendo en mi maquina (localhost) con el lammp.

    Solo recibo un dato ($var=$_POST['codigo'];) para no hacerlo tan complicado ;D. Pero he a qui el problema:

    Aqui esta mi peticion:
    ******************************
    post /ejercicios/cabeceras/cabecera.php http/1.1 (ctrl)
    host: localhost (ctrl)
    content-length: 12 (ctrl)
    (ctrl)
    codigo=kmykc

    Y esta es la respuesta de que segun esta mal
    ********************************************
    HTTP/1.1 200 OK
    Date: Wed, 24 Sep 2008 00:13:35 GMT
    Server: Apache/2.2.9 (Unix) DAV/2 mod_ssl/2.2.9 OpenSSL/0.9.8h PHP/5.2.6 mod_apreq2-20051231/2.6.0 mod_perl/2.0.4 Perl/v5.10.0
    X-Powered-By: PHP/5.2.6
    Content-Length: 3
    Content-Type: text/html

    Mal

    Ya lo he probado con el metodo GET y funciona perfecto, pero con el POST tengo ese problemilla, ya he buscado mucha info, pero lo que encuentro tampoco me ha servido.

    Espero puedas hecharme la mano brother.

  2. Sysroot Septiembre 23, 2008 @ 7:52 pm

    Puedes poner el código del script "cabecera.php"? Para poder verlo y ver que es lo que hace el script. Porque lo que haces está bien hecho.

    Aparte de todo esto tengo una duda.
    Cuando pones esto en telnet:

    post /ejercicios/cabeceras/cabecera.php http/1.1 (ctrl)
    host: localhost (ctrl)
    content-length: 12 (ctrl)
    (ctrl)
    codigo=kmykc

    el (ctrl) ¿qué simboliza?, porque lo correcto sería que simbolizara un retorno de carro y un avance de línea: "\r\n", chr(13) + chr(10) o como lo llamamos comúnmente "enter"
    "El crlf significa retorno de carro y avance de línea [enter]"

  3. kmykc Septiembre 23, 2008 @ 11:29 pm

    Gracias por responder brother.

    *******************************************
    Este es el script, no es gran cosa, es solo para practicar:

    ********************************************
    Lo del (ctrl) si me referia a un "enter", segui el formato que le diste a los ejemplos para que no hubiera confusion.

    ********************************************
    Y como comentas, yo tambien no le veo error alguno, pero como apenas comence a practicar esto con tus ejemplos, pues igual y se me paso algo.

  4. kmykc Septiembre 23, 2008 @ 11:31 pm

    *******************************************
    Creo que hubo un error al colocar mi codigo, hay lo pongo de nuevo

    < ?php

    $var = $_POST['codigo'];

    if($var == 'kmykc') {
    echo "Bien";
    } else {
    echo "Mal";
    }
    ?>

  5. Sysroot Septiembre 24, 2008 @ 12:50 am

    Es posible entonces que falte una cabecera, y creo saber cual es. Mira si probando esto te funciona:

    POST /ejercicios/cabeceras/cabecera.php http/1.1
    host: localhost
    content-length: 12
    content-type: application/www-x-form-urlencoded

    codigo=kmykc

  6. kmykc Septiembre 24, 2008 @ 2:29 pm

    Pues no tio, no me da, de hecho le meti un formulario y cheque las cabeceras que manda, las coloque y no me da resultado, solo me muestra el formulario.

    Solo que ahora solo lo estoy comparando con un simple "1" (if($var==1)).

    *********PETICION*****************************
    post /ejercicios/cabeceras/cabecera.php http/1.1
    host: localhost
    accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
    accept-charset: iso-8859-1,utf-8;q=0.7,*;q=0.7
    keep-alive: 300
    connection: keep-alive
    referer: http://localhost/ejercicios/cabeceras/cabecera.php
    content-type: application/x-www-form-urlencode
    content-length: 8

    codigo=1

    **********RESPUESTA***************************
    HTTP/1.1 200 OK
    Date: Wed, 24 Sep 2008 19:22:29 GMT
    Server: Apache/2.2.9 (Unix) DAV/2 mod_ssl/2.2.9 OpenSSL/0.9.8h PHP/5.2.6 mod_apreq2-20051231/2.6.0 mod_perl/2.0.4 Perl/v5.10.0
    X-Powered-By: PHP/5.2.6
    Content-Length: 99
    Keep-Alive: timeout=5, max=100
    Connection: Keep-Alive
    Content-Type: text/html

    *******SCRIPT****************************
    < ?php
    $var = $_POST['codigo'];

    if(isset($var)) {
    if($var == 1) {
    echo "bien";
    } else {
    echo "mal";
    }
    } else {
    echo "

    ";
    }
    ? >

    ***************************************
    Seguire intentando haber que puedo hacer, esto no se tiene que quedar asi jejejeje.
    Y gracias por tus respuestas !!!.

  7. kmykc Septiembre 24, 2008 @ 2:42 pm

    Mira, mejor te dejo el enlace a la imagen con el codigo, por que hay problemas al escribir el code

    http://kmykc.110mb.com/img/codigo.jpg

  8. Sysroot Septiembre 24, 2008 @ 8:37 pm

    Tenes dos problemas, el primer problema está en el código
    if($var == 1){
    El problema es que cuando asignas $var a $_POST['codigo'], éste retorna una cadena y no un número. Así que lo correcto sería poner
    if($var == '1'){
    De todas formas se interpreta de igual forma.
    El segundo error está en la petición
    content-type: application/x-www-form-urlencode
    La forma correcta de realizar la petición sería
    content-type: application/x-www-form-urlencoded

    Lo acabe de probar con tu script, y funciona de maravilla.

  9. kmykc Septiembre 27, 2008 @ 7:57 pm

    Gracias por la ayuda brother, pero lamentablemente sigue son darme el resultado.

    Si a ti te ha funcionado y lo he hecho tal cual lo has hecho tu, pues entonces creo que puede ser algun error de mi servidor, crees que sea posible eso ?.

    De nuevo gracias por las respuestas.

  10. Sysroot Septiembre 27, 2008 @ 8:04 pm

    Yo diría que no es posible, porque si es un servidor que ha venido en desarollo, no debe porque ser error del servidor.
    Si puedes, pon de nuevo la petición que haces.

  11. kmykc Septiembre 27, 2008 @ 9:49 pm

    ********Peticion con telnet*********

    http://img229.imageshack.us/img229/4096/telent1tm4.jpg

    ********Script PHP******************

    http://img375.imageshack.us/img375/1/telnet2uy9.jpg

  12. Sysroot Septiembre 27, 2008 @ 10:53 pm

    Pero no entiendo porque en el código php está
    echo "Variable: ".$var."<br>"
    En la respuesta del script está "Var2 : &ltbr>" y debería ser "Variable: &ltbr>". Seguro que lo que modificaste no afectó para nada el script?

    Por otra parte vas a tener que hacer lo siguiente:
    Instalar la extensión Tamper data para firefox, hacer un formulario que envie los datos a ese script y comprobar que lance la respuesta de "Bien". Abre el tamper data antes de enviar la petición, y te fijas cuales son todas las cabeceras que envia el firefox. Y estas mismas cabeceras usalas con el telnet. Depronto tu servidor a la falta de alguna cabecera responde mal y por eso te falla el script.

  13. kmykc Septiembre 28, 2008 @ 12:59 am

    Chale brother, no se que diablos pasa, ya instale el complemento al firefox (muy bueno por cierto), cheque todas las cabeceras que manda, escribi todas en telnet y sigue dandome el mensaje de que esta mal.

    De hecho ni siquiera recibe la variable, por que no la imprime.

    Lo que me decias de "var2" no hay problema, lo que pasa que modifique solo esa parte despues de capturar la ventana, osea que no hay problema por eso.

    Por eso te preguntaba si existia una posibilidad de que tuviera algo que ver el servidor, pero creo que no tiene nada que ver.

    Ni hablar, seguire buscando mas info para ver que se puede hacer, por que no pienso descansar hasta encontrar el fallo o lo que este pasando.

  14. Sysroot Septiembre 28, 2008 @ 3:28 am

    Si averiguas que es, me contas porque me dejas con la duda, de todas formas el procedimiento que estás realizando es el correcto.
    Un último intento que yo haría sería imprimir todas las variables con PHP, y luego por medio de telnet observar que es lo que está recibiendo el PHP
    La forma de hacerlo sería como lo hace mi visor http pero sin una restricción. Así queda:

    < ?php
    foreach($_SERVER as $i => $val){
    echo $i.' = '.$val.chr(13).chr(10);
    }
    ?>

    O imprimiendo las variables globales

    < ?php
    print_r($GLOBALS);
    ?>
  15. kmykc Septiembre 29, 2008 @ 4:22 pm

    Que tal brother, pues finalmente he encontrado el error del por que la peticion POST no me estaba funcionando, como comentaste que cuando lo solucionara lo comentara, pues a qui esta.

    Creo que tu, al igual que yo, te vas a cagar de la risa por el error que tenia.

    Y el ERROR era por que simplemente tenia que poner el nombre de las cabeceras en mayusculas, si como lo lees, en mayusculas, probablemente asi lo estabas haciendo tu, pero yo lo estaba haciendo con minusculas, ya que en las peticiones GET no tenia ningun problema.

    *******PETICION MAL HECHA****************
    post /ejercicios/cabeceras/cabecera.php http/1.1
    host: localhost
    content-type: application/x-www-form-urlencoded
    content-length: 12

    codigo=kmykc

    *******PETICION BIEN HECHA****************
    POST /ejercicios/cabeceras/cabecera.php http/1.1
    HOST: localhost
    CONTENT-TYPE: application/x-www-form-urlencoded
    CONTENT-LENGTH: 12

    codigo=kmykc

    Y como veras solamente utilice las cabeceras de CONTENT-TYPE y la forzosa CONTENT-LENGTH, claro, aparte de las cabeceras de ley.

    Esto lo hice gracias a que se me ocurrio hacerlo con "lynx", y ver las respuestas que me mandaba de las cabeceras que recibia, y tambien aclarar que fue por mera coincidencia, ya que me dio flojera estar escribiendo todo y solamente lo copie y pegue y zaazzzz !!!!.

    Pero bueno, agreguemos otro dato a la experiencia y gracias por apoyarme todos estos dias HaDeS.

  16. Sysroot Septiembre 29, 2008 @ 5:22 pm

    Que bueno que lo hayas logrado, había pensado lo de las mayúsculas, pero lo obvie.
    Ciertamente es una parte muy importante del protocolo, y en el RFC indican los métodos con mayúscula.

  17. BLACKUBAY Marzo 25, 2009 @ 9:02 pm

    yo entiendo casi todo, lo que no me queda claro es, como haga para enviar estas cabeceras???

    se que se hacen con las cookies, pero como es el mecanismo para que funcione esto???

    soalmente guardo la cookie, y la pagina abrira solita????

  18. Sysroot Marzo 25, 2009 @ 11:02 pm

    Hola BLACKUBAY, la forma en que podes enviar las cabeceras desde tú computador al servidor es por medio de extensiones o de programas.
    Un programa muy utilizado hace mucho era Achilles, que hacía las veces de proxy y de extensión para modificar datos, ahora con la salida del navegador Firefox, podes descargar extensiones que permiten fácilmente la modificación de dichas cabeceras. Personalmente uso dos extensiones, la primera se llama Tamper Data, la cual deja modificar en tiempo de ejecución las cabeceras, y la extensión Modify Headers, con la cual podes modificar las cabeceras sin tener que modificarlas en tiempo de ejecución.

    Tamper Data: https://addons.mozilla.org/es-ES/firefox/addon/966
    Modify Headers: https://addons.mozilla.org/en-US/firefox/addon/967

    Y si queres modificar las cookies lo podes hacer con la extensión: https://addons.mozilla.org/firefox/addon/573

Deja un comentario