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

2006-08-15

2006-08-15 15:59:06 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• fb6e79f90943cd965d095b7b717f0d3ba39ca9f2 (26 lines) (+18/-8) ^{[ Show | Annotate ]}
  Branch: 5.2

Added pretty-printing of the get_cookie_callback() callbacks.

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

1:   // This is a roxen pike module. Copyright © 1999 - 2004, Roxen IS.   // - // $Id: Roxen.pmod,v 1.213 2006/08/04 11:13:39 grubba Exp $ + // $Id: Roxen.pmod,v 1.214 2006/08/15 15:59:06 grubba Exp $      #include <roxen.h>   #include <config.h>
131:   }      static mapping(string:function(string, RequestID:string)) cookie_callbacks = -  set_weak_flag(([]), Pike.WEAK_VALUES); - function(string, RequestID:string) get_cookie_callback(string cookie) +  ([]); + static class CookieChecker(string cookie)   { -  function(string, RequestID:string) cb = cookie_callbacks[cookie]; -  if (cb) return cb; -  cb = lambda(string path, RequestID id) { +  string `()(string path, RequestID id) +  {    if (!id->cookies) {    id->init_cookies();    }    return id->cookies[cookie]; -  }; +  } +  string _sprintf(int c) +  { +  return sprintf("CookieChecker(%O)", cookie); +  } + } + function(string, RequestID:string) get_cookie_callback(string cookie) + { +  function(string, RequestID:string) cb = cookie_callbacks[cookie]; +  if (cb) return cb; +  cb = CookieChecker(cookie);    return cookie_callbacks[cookie] = cb;   }