Skip to content
Snippets Groups Projects
Select Git revision
  • 1a285fb6d13f0540aecbd491ad35d77544c6869c
  • master default protected
  • 9.0
  • 8.0
  • nt-tools
  • 7.8
  • 7.6
  • 7.4
  • 7.2
  • 7.0
  • 0.6
  • rosuav/latex-markdown-renderer
  • rxnpatch/rxnpatch
  • marcus/gobject-introspection
  • rxnpatch/8.0
  • rosuav/pre-listening-ports
  • rosuav/async-annotations
  • rosuav/pgsql-ssl
  • rxnpatch/rxnpatch-broken/2023-10-06T094250
  • grubba/fdlib
  • grubba/wip/sakura/8.0
  • v8.0.2020
  • v8.0.2018
  • v8.0.2016
  • v8.0.2014
  • v8.0.2012
  • v8.0.2008
  • v8.0.2006
  • v8.0.2004
  • v8.0.2002
  • v8.0.2000
  • v8.0.1998
  • v8.0.1996
  • v8.0.1994
  • v8.0.1992
  • v8.0.1990
  • v8.0.1988
  • v8.0.1986
  • rxnpatch/clusters/8.0/2025-04-29T124414
  • rxnpatch/2025-04-29T124414
  • v8.0.1984
41 results

module.pmod

Blame
  • module.pmod 2.09 KiB
    // FIXME! doc bad
    
    //! module Protocols
    //! submodule HTTP
    //! class HeaderParser
    //!	Fast HTTP header parser. 
    
    //! module Protocols
    //! submodule HTTP
    //! method string http_decode_string(string what)
    
    constant HeaderParser=_Roxen.HeaderParser;
    constant http_decode_string=_Roxen.http_decode_string;
    
    //! method mapping(string:string|array(string)) http_decode_urlencoded_query(string query,void|mapping dest)
    //!	Decodes an URL-encoded query into a mapping.
    
    mapping(string:string|array(string))
       http_decode_urlencoded_query(string query,
    				void|mapping dest)
    {
       if (!dest) dest=([]);
    
       foreach (query/"&",string s)
       {
          string i,v;
          if (sscanf(s,"%s=%s",i,v)<2) v=i=http_decode_string(s);
          else i=http_decode_string(i),v=http_decode_string(v);
          if (dest[i]) 
    	 if (arrayp(dest[i])) dest[i]+=({v});
    	 else dest[i]=({dest[i],v});
          else dest[i]=v;
       }
       
       return dest;
    }
    
    
    //! method string filename_to_type(string filename)
    //! method string extension_to_type(string extension)
    //!	Looks up the file extension in a table to return
    //!	a suitable MIME type. The table is located in the
    //!	[...]pike/lib/modules/Protocols.pmod/HTTP.pmod/Server.pmod/extensions.txt
    //!	file.
    
    mapping extensions=0;
    
    string extension_to_type(string extension)
    {
       if (!extensions)
       {
          Stdio.File f=Stdio.FILE(
    	 combine_path(__FILE__,"..","extensions.txt"),"r");
    
          mapping res=([]);
    
          while (array a=f->ngets(1000))
    	 foreach (a,string l)
    	    if (sscanf(l,"%*[ \t]%[^ \t]%*[ \t]%[^ \t]",
    		       string ext,string type)==4 &&
    		ext!="" && ext[0]!='#')
    	       res[ext]=type;
    
          extensions=res;
       }
    
       return extensions[extension] || "application/octet-stream";
    }
    
    string filename_to_type(string filename)
    {
       array v=filename/".";
       if (sizeof(v)<2) return extension_to_type("default");
       return extension_to_type(v[-1]);
    }
    
    //! method string http_date(int time)
    //!	Makes a time notification suitable for the HTTP protocol.
    
    string http_date(int time)
    {
       return Calendar.ISO_UTC.Second(time)->format_http();
    }
    
    
    // server id prefab
    
    constant http_serverid=version()+": HTTP Server module";