view release on metacpan or  search on metacpan

Proxy.xs  view on Meta::CPAN

    PREINIT:
    cache_req *c = (cache_req *)safemalloc(sizeof(cache_req));

    CODE: 
    c->fp = NULL;
    c->req = r;

    RETVAL = ap_proxy_http_handler(r, c, uri, NULL, 0);
    safefree(c);
    OUTPUT:
    RETVAL

char*
proxy_hash(self, r, uri)
    SV *self
    Apache r
    char *uri

    PREINIT:
    void *sconf = r->server->module_config;
    proxy_server_conf *pconf = (proxy_server_conf *) ap_get_module_config(sconf, &proxy_module);
    char filename[66];
    
    CODE:
    ap_proxy_hash(uri, filename, pconf->cache.dirlevels, pconf->cache.dirlength);
    RETVAL = filename;

    OUTPUT:
    RETVAL