Roxen.git/ server/ etc/ modules/ Roxen.pmod

2001-05-16

2001-05-16 20:52:28 by Martin Nilsson <mani@lysator.liu.se>

• a09210468a16718b99eadbebb4ea089616a79e7c (13 lines) (+9/-4) ^{[ Show | Annotate ]}
  Branch: 5.2

Force all redirects to use absolute URL:s, since HTTP says so. Extended the redirect API somewhat so that one can provide prestates that overrides the ones in the request object.

Rev: server/etc/modules/Roxen.pmod:1.88

1:   // This is a roxen pike module. Copyright © 1999 - 2000, Roxen IS.   // - // $Id: Roxen.pmod,v 1.87 2001/04/21 20:20:16 nilsson Exp $ + // $Id: Roxen.pmod,v 1.88 2001/05/16 20:52:28 nilsson Exp $      #include <roxen.h>   #include <config.h>
327:    return "/(" + sort(indices(state)) * "," + ")" + url ;   }    - mapping http_redirect( string url, RequestID|void id ) + mapping http_redirect( string url, RequestID|void id, multiset|void prestates )   //! Simply returns a http-redirect message to the specified URL. If   //! the url parameter is just a virtual (possibly relative) path, the   //! current id object must be supplied to resolve the destination URL. -  + //! If no prestates are provided, the current prestates in the request id + //! object will be added to the url.   { -  if(strlen(url) && url[0] == '/') +  if(!has_prefix(url, "://") && url[0]!='/') +  url = fix_relative(url, id); +  if(strlen(url) && url[0]=='/')    {    if(id)    {    if( id->misc->site_prefix_path )    url = replace( [string]id->misc->site_prefix_path + url, "//", "/" ); -  url = add_pre_state(url,id->prestate); +  url = add_pre_state(url, prestates || id->prestate);    if(id->misc->host)    {    array(string) h;