source: mod_gnutls/src/gnutls_cache.c @ c55902b

debian/masterdebian/stretch-backportsproxy-ticketupstream
Last change on this file since c55902b was c55902b, checked in by Thomas Klute <thomas2.klute@…>, 4 years ago

Trigger cache expiration on fetch, small restructuring

In a situation with few stores cache entries might have remained
significantly longer than intended. Expiring before fetch if necessary
prevents that.

  • Property mode set to 100644
File size: 20.2 KB
RevLine 
[fcb122d]1/**
2 *  Copyright 2004-2005 Paul Querna
[e183628]3 *  Copyright 2008 Nikos Mavrogiannopoulos
4 *  Copyright 2011 Dash Shendy
[8913410]5 *  Copyright 2015-2016 Thomas Klute
[0b3bc05]6 *
7 *  Licensed under the Apache License, Version 2.0 (the "License");
8 *  you may not use this file except in compliance with the License.
9 *  You may obtain a copy of the License at
10 *
11 *      http://www.apache.org/licenses/LICENSE-2.0
12 *
13 *  Unless required by applicable law or agreed to in writing, software
14 *  distributed under the License is distributed on an "AS IS" BASIS,
15 *  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16 *  See the License for the specific language governing permissions and
17 *  limitations under the License.
18 *
19 */
20
[04e6e65]21#include "gnutls_cache.h"
[0b3bc05]22#include "mod_gnutls.h"
[6e0bfd6]23
24#if HAVE_APR_MEMCACHE
25#include "apr_memcache.h"
26#endif
27
[fcb122d]28#include "apr_dbm.h"
29
[a66e147]30#include "ap_mpm.h"
[c005645]31#include <util_mutex.h>
[0b3bc05]32
[fcb122d]33#include <unistd.h>
34#include <sys/types.h>
35
36#if !defined(OS2) && !defined(WIN32) && !defined(BEOS) && !defined(NETWARE)
37#include "unixd.h"
38#endif
39
[c005645]40/* default cache timeout */
41#define MGS_DEFAULT_CACHE_TIMEOUT 300
42
[671b64f]43/* it seems the default has some strange errors. Use SDBM
[03a9a6b]44 */
[6e0bfd6]45#define MC_TAG "mod_gnutls:"
[c055502]46#define MC_TAG_LEN sizeof(MC_TAG)
[6e0bfd6]47#define STR_SESSION_LEN (GNUTLS_SESSION_ID_STRING_LEN + MC_TAG_LEN)
48
[7e67487]49#if MODULE_MAGIC_NUMBER_MAJOR < 20081201
50#define ap_unixd_config unixd_config
51#endif
52
[55dc3f0]53#ifdef APLOG_USE_MODULE
54APLOG_USE_MODULE(gnutls);
55#endif
56
[c055502]57char *mgs_session_id2sz(unsigned char *id, int idlen,
[e183628]58        char *str, int strsize) {
59    char *cp;
60    int n;
61
62    cp = str;
63    for (n = 0; n < idlen && n < GNUTLS_MAX_SESSION_ID; n++) {
64        apr_snprintf(cp, strsize - (cp - str), "%02X", id[n]);
65        cp += 2;
66    }
67    *cp = '\0';
68    return str;
[6e0bfd6]69}
[c055502]70
71/* Name the Session ID as:
[c223c85]72 * server:port.SessionID
[c055502]73 * to disallow resuming sessions on different servers
74 */
[2f932fa]75static int mgs_session_id2dbm(conn_rec *c, unsigned char *id, int idlen,
76                              gnutls_datum_t *dbmkey)
77{
[e183628]78    char buf[STR_SESSION_LEN];
79    char *sz;
80
81    sz = mgs_session_id2sz(id, idlen, buf, sizeof (buf));
82    if (sz == NULL)
83        return -1;
84
[2f932fa]85    char *newkey = apr_psprintf(c->pool, "%s:%d.%s",
86                                c->base_server->server_hostname,
87                                c->base_server->port, sz);
88    dbmkey->size = strlen(newkey);
89    /* signedness does not matter for arbitrary bits */
90    dbmkey->data = (unsigned char*) newkey;
[e183628]91    return 0;
[c055502]92}
[7bebb42]93
94#define CTIME "%b %d %k:%M:%S %Y %Z"
[e02dd8c]95
[e183628]96char *mgs_time2sz(time_t in_time, char *str, int strsize) {
97    apr_time_exp_t vtm;
98    apr_size_t ret_size;
99    apr_time_t t;
[e02dd8c]100
101
[e183628]102    apr_time_ansi_put(&t, in_time);
103    apr_time_exp_gmt(&vtm, t);
104    apr_strftime(str, &ret_size, strsize - 1, CTIME, &vtm);
105
106    return str;
[7bebb42]107}
[6e0bfd6]108
[c055502]109#if HAVE_APR_MEMCACHE
[e183628]110
[c055502]111/* Name the Session ID as:
[c223c85]112 * server:port.SessionID
[c055502]113 * to disallow resuming sessions on different servers
114 */
[e183628]115static char *mgs_session_id2mc(conn_rec * c, unsigned char *id, int idlen) {
116    char buf[STR_SESSION_LEN];
117    char *sz;
118
119    sz = mgs_session_id2sz(id, idlen, buf, sizeof (buf));
120    if (sz == NULL)
121        return NULL;
122
123    return apr_psprintf(c->pool, MC_TAG "%s:%d.%s",
124            c->base_server->server_hostname,
125            c->base_server->port, sz);
[42307a9]126}
127
[0b3bc05]128/**
129 * GnuTLS Session Cache using libmemcached
130 *
131 */
132
[a66e147]133/* The underlying apr_memcache system is thread safe... woohoo */
[e02dd8c]134static apr_memcache_t *mc;
[a66e147]135
[e02dd8c]136static int mc_cache_child_init(apr_pool_t * p, server_rec * s,
[e183628]137        mgs_srvconf_rec * sc) {
138    apr_status_t rv = APR_SUCCESS;
139    int thread_limit = 0;
140    int nservers = 0;
141    char *cache_config;
142    char *split;
143    char *tok;
144
145    ap_mpm_query(AP_MPMQ_HARD_LIMIT_THREADS, &thread_limit);
146
147    /* Find all the servers in the first run to get a total count */
148    cache_config = apr_pstrdup(p, sc->cache_config);
149    split = apr_strtok(cache_config, " ", &tok);
150    while (split) {
151        nservers++;
152        split = apr_strtok(NULL, " ", &tok);
153    }
154
155    rv = apr_memcache_create(p, nservers, 0, &mc);
156    if (rv != APR_SUCCESS) {
157        ap_log_error(APLOG_MARK, APLOG_CRIT, rv, s,
158                "[gnutls_cache] Failed to create Memcache Object of '%d' size.",
159                nservers);
160        return rv;
161    }
162
163    /* Now add each server to the memcache */
164    cache_config = apr_pstrdup(p, sc->cache_config);
165    split = apr_strtok(cache_config, " ", &tok);
166    while (split) {
167        apr_memcache_server_t *st;
168        char *host_str;
169        char *scope_id;
170        apr_port_t port;
171
172        rv = apr_parse_addr_port(&host_str, &scope_id, &port,
173                split, p);
174        if (rv != APR_SUCCESS) {
175            ap_log_error(APLOG_MARK, APLOG_CRIT, rv, s,
176                    "[gnutls_cache] Failed to Parse Server: '%s'",
177                    split);
178            return rv;
179        }
180
181        if (host_str == NULL) {
182            ap_log_error(APLOG_MARK, APLOG_CRIT, rv, s,
183                    "[gnutls_cache] Failed to Parse Server, "
184                    "no hostname specified: '%s'", split);
185            return rv;
186        }
187
188        if (port == 0) {
189            port = 11211; /* default port */
190        }
191
192        /* Should Max Conns be (thread_limit / nservers) ? */
193        rv = apr_memcache_server_create(p,
194                host_str, port,
195                0,
196                1, thread_limit, 600, &st);
197        if (rv != APR_SUCCESS) {
198            ap_log_error(APLOG_MARK, APLOG_CRIT, rv, s,
199                    "[gnutls_cache] Failed to Create Server: %s:%d",
200                    host_str, port);
201            return rv;
202        }
203
204        rv = apr_memcache_add_server(mc, st);
205        if (rv != APR_SUCCESS) {
206            ap_log_error(APLOG_MARK, APLOG_CRIT, rv, s,
207                    "[gnutls_cache] Failed to Add Server: %s:%d",
208                    host_str, port);
209            return rv;
210        }
211
212        split = apr_strtok(NULL, " ", &tok);
213    }
214    return rv;
[32f2e60]215}
[a66e147]216
[e02dd8c]217static int mc_cache_store(void *baton, gnutls_datum_t key,
[e183628]218        gnutls_datum_t data) {
219    apr_status_t rv = APR_SUCCESS;
220    mgs_handle_t *ctxt = baton;
221    char *strkey = NULL;
222    apr_uint32_t timeout;
223
224    strkey = mgs_session_id2mc(ctxt->c, key.data, key.size);
225    if (!strkey)
226        return -1;
227
228    timeout = apr_time_sec(ctxt->sc->cache_timeout);
229
230    rv = apr_memcache_set(mc, strkey, (char *) data.data, data.size, timeout,
231            0);
232
233    if (rv != APR_SUCCESS) {
234        ap_log_error(APLOG_MARK, APLOG_CRIT, rv,
235                ctxt->c->base_server,
236                "[gnutls_cache] error setting key '%s' "
237                "with %d bytes of data", strkey, data.size);
238        return -1;
239    }
240
241    return 0;
[a66e147]242}
243
[e183628]244static gnutls_datum_t mc_cache_fetch(void *baton, gnutls_datum_t key) {
245    apr_status_t rv = APR_SUCCESS;
246    mgs_handle_t *ctxt = baton;
247    char *strkey = NULL;
248    char *value;
249    apr_size_t value_len;
250    gnutls_datum_t data = {NULL, 0};
[e02dd8c]251
[e183628]252    strkey = mgs_session_id2mc(ctxt->c, key.data, key.size);
253    if (!strkey) {
254        return data;
255    }
[e02dd8c]256
[e183628]257    rv = apr_memcache_getp(mc, ctxt->c->pool, strkey,
258            &value, &value_len, NULL);
[e02dd8c]259
[e183628]260    if (rv != APR_SUCCESS) {
[316bd8c]261#if MOD_GNUTLS_DEBUG
[e183628]262        ap_log_error(APLOG_MARK, APLOG_DEBUG, rv,
263                ctxt->c->base_server,
264                "[gnutls_cache] error fetching key '%s' ",
265                strkey);
[316bd8c]266#endif
[e183628]267        data.size = 0;
268        data.data = NULL;
269        return data;
270    }
[a66e147]271
[e183628]272    /* TODO: Eliminate this memcpy. gnutls-- */
273    data.data = gnutls_malloc(value_len);
274    if (data.data == NULL)
275        return data;
[a66e147]276
[e183628]277    data.size = value_len;
278    memcpy(data.data, value, value_len);
[a66e147]279
[e183628]280    return data;
[32f2e60]281}
282
[e183628]283static int mc_cache_delete(void *baton, gnutls_datum_t key) {
284    apr_status_t rv = APR_SUCCESS;
285    mgs_handle_t *ctxt = baton;
286    char *strkey = NULL;
[a66e147]287
[e183628]288    strkey = mgs_session_id2mc(ctxt->c, key.data, key.size);
289    if (!strkey)
290        return -1;
[a66e147]291
[e183628]292    rv = apr_memcache_delete(mc, strkey, 0);
[a66e147]293
[e183628]294    if (rv != APR_SUCCESS) {
295        ap_log_error(APLOG_MARK, APLOG_DEBUG, rv,
296                ctxt->c->base_server,
297                "[gnutls_cache] error deleting key '%s' ",
298                strkey);
299        return -1;
300    }
[a66e147]301
[e183628]302    return 0;
[32f2e60]303}
304
[410d216]305#endif  /* have_apr_memcache */
[6e0bfd6]306
[410d216]307static const char *db_type(mgs_srvconf_rec * sc) {
[e183628]308    if (sc->cache_type == mgs_cache_gdbm)
309        return "gdbm";
310    else
311        return "db";
[771ca63]312}
313
[fcb122d]314#define SSL_DBM_FILE_MODE ( APR_UREAD | APR_UWRITE | APR_GREAD | APR_WREAD )
315
[6814e48]316/***
317 * The signatures of the dbm_cache_...() functions may be a bit
318 * confusing: "store" and "expire" take a server_rec, "fetch" an
319 * mgs_handle_t, and "delete" the void* required for a
[c55902b]320 * gnutls_db_remove_func. The first two have matching ..._session
[6814e48]321 * functions to fit their respective GnuTLS session cache signatures.
322 *
323 * This is because "store", "expire", and "fetch" are also needed for
324 * the OCSP cache. Their ..._session variants have been created to
325 * take care of the session cache specific parts, mainly calculating
326 * the DB key from the session ID. They have to match the appropriate
327 * GnuTLS DB function signatures.
328 *
329 * To update cached OCSP responses independent of client connections,
330 * "store" and "expire" have to work without a connection context. On
331 * the other hand "fetch" does not need to do that, because cached
332 * OCSP responses will be retrieved for use in client connections.
333 ***/
334
[f785704]335static void dbm_cache_expire(server_rec *s)
336{
337    mgs_srvconf_rec *sc = (mgs_srvconf_rec *)
338        ap_get_module_config(s->module_config, &gnutls_module);
339
[e183628]340    apr_status_t rv;
341    apr_dbm_t *dbm;
342    apr_datum_t dbmkey;
343    apr_datum_t dbmval;
344    apr_time_t dtime;
345    apr_pool_t *spool;
346    int total, deleted;
347
[f785704]348    apr_time_t now = apr_time_now();
[e183628]349
[f785704]350    if (now - sc->last_cache_check < (sc->cache_timeout) / 2)
[e183628]351        return;
352
[f785704]353    sc->last_cache_check = now;
[e183628]354
[f785704]355    apr_pool_create(&spool, NULL);
[e183628]356
357    total = 0;
358    deleted = 0;
359
[c005645]360    apr_global_mutex_lock(sc->cache_mutex);
361
[f785704]362    rv = apr_dbm_open_ex(&dbm, db_type(sc),
363            sc->cache_config, APR_DBM_RWCREATE,
[e183628]364            SSL_DBM_FILE_MODE, spool);
365    if (rv != APR_SUCCESS) {
[f785704]366        ap_log_error(APLOG_MARK, APLOG_NOTICE, rv, s,
[c005645]367                "[gnutls_cache] error opening cache '%s'",
[f785704]368                sc->cache_config);
[c005645]369        apr_global_mutex_unlock(sc->cache_mutex);
[e183628]370        apr_pool_destroy(spool);
371        return;
372    }
373
374    apr_dbm_firstkey(dbm, &dbmkey);
375    while (dbmkey.dptr != NULL) {
376        apr_dbm_fetch(dbm, dbmkey, &dbmval);
377        if (dbmval.dptr != NULL
378                && dbmval.dsize >= sizeof (apr_time_t)) {
379            memcpy(&dtime, dbmval.dptr, sizeof (apr_time_t));
380
381            if (now >= dtime) {
382                apr_dbm_delete(dbm, dbmkey);
383                deleted++;
384            }
385            apr_dbm_freedatum(dbm, dbmval);
386        } else {
387            apr_dbm_delete(dbm, dbmkey);
388            deleted++;
389        }
390        total++;
391        apr_dbm_nextkey(dbm, &dbmkey);
392    }
393    apr_dbm_close(dbm);
394
[c005645]395    rv = apr_global_mutex_unlock(sc->cache_mutex);
396
[f785704]397    ap_log_error(APLOG_MARK, APLOG_DEBUG, rv, s,
[e183628]398            "[gnutls_cache] Cleaned up cache '%s'. Deleted %d and left %d",
[f785704]399            sc->cache_config, deleted, total - deleted);
[e183628]400
401    apr_pool_destroy(spool);
402
403    return;
[fcb122d]404}
405
[6b4136c]406gnutls_datum_t dbm_cache_fetch(mgs_handle_t *ctxt, gnutls_datum_t key)
[15245bf]407{
[e183628]408    gnutls_datum_t data = {NULL, 0};
409    apr_dbm_t *dbm;
[2f932fa]410    apr_datum_t dbmkey = {(char*) key.data, key.size};
[e183628]411    apr_datum_t dbmval;
412    apr_status_t rv;
413
[c55902b]414    /* check if it is time for cache expiration */
415    dbm_cache_expire(ctxt->c->base_server);
416
[c005645]417    apr_global_mutex_lock(ctxt->sc->cache_mutex);
418
[e183628]419    rv = apr_dbm_open_ex(&dbm, db_type(ctxt->sc),
420            ctxt->sc->cache_config, APR_DBM_READONLY,
421            SSL_DBM_FILE_MODE, ctxt->c->pool);
422    if (rv != APR_SUCCESS) {
[15245bf]423        ap_log_cerror(APLOG_MARK, APLOG_NOTICE, rv, ctxt->c,
424                      "error opening cache '%s'",
425                      ctxt->sc->cache_config);
[c005645]426        apr_global_mutex_unlock(ctxt->sc->cache_mutex);
[e183628]427        return data;
428    }
429
[2f932fa]430    rv = apr_dbm_fetch(dbm, dbmkey, &dbmval);
[e183628]431
[c55902b]432    if (rv != APR_SUCCESS)
433        goto close_db;
[e183628]434
[c55902b]435    if (dbmval.dptr == NULL || dbmval.dsize <= sizeof (apr_time_t))
436        goto cleanup;
[e183628]437
438    data.size = dbmval.dsize - sizeof (apr_time_t);
439
440    data.data = gnutls_malloc(data.size);
[c55902b]441    if (data.data == NULL)
442        goto cleanup;
[e183628]443
[15245bf]444    ap_log_cerror(APLOG_MARK, APLOG_DEBUG, rv, ctxt->c,
445                  "fetched %ld bytes from cache",
446                  dbmval.dsize);
447
[e183628]448    memcpy(data.data, dbmval.dptr + sizeof (apr_time_t), data.size);
449
[c55902b]450 cleanup:
[e183628]451    apr_dbm_freedatum(dbm, dbmval);
[c55902b]452 close_db:
[e183628]453    apr_dbm_close(dbm);
[c005645]454    apr_global_mutex_unlock(ctxt->sc->cache_mutex);
[e183628]455
456    return data;
[fcb122d]457}
458
[2f932fa]459static gnutls_datum_t dbm_cache_fetch_session(void *baton, gnutls_datum_t key)
[15245bf]460{
461    gnutls_datum_t data = {NULL, 0};
[2f932fa]462    gnutls_datum_t dbmkey;
[15245bf]463    mgs_handle_t *ctxt = baton;
464
465    if (mgs_session_id2dbm(ctxt->c, key.data, key.size, &dbmkey) < 0)
466        return data;
467
468    return dbm_cache_fetch(ctxt, dbmkey);
469}
470
[6b4136c]471int dbm_cache_store(server_rec *s, gnutls_datum_t key,
472                    gnutls_datum_t data, apr_time_t expiry)
[ae08186]473{
[1d1361f]474    mgs_srvconf_rec *sc = (mgs_srvconf_rec *)
475        ap_get_module_config(s->module_config, &gnutls_module);
476
[e183628]477    apr_dbm_t *dbm;
[2f932fa]478    apr_datum_t dbmkey = {(char*) key.data, key.size};
[e183628]479    apr_datum_t dbmval;
480    apr_status_t rv;
481    apr_pool_t *spool;
482
[c55902b]483    /* check if it is time for cache expiration */
[1d1361f]484    dbm_cache_expire(s);
[e183628]485
[1d1361f]486    apr_pool_create(&spool, NULL);
[e183628]487
488    /* create DBM value */
489    dbmval.dsize = data.size + sizeof (apr_time_t);
490    dbmval.dptr = (char *) apr_palloc(spool, dbmval.dsize);
491
[ae08186]492    /* prepend expiration time */
[e183628]493    memcpy((char *) dbmval.dptr, &expiry, sizeof (apr_time_t));
494    memcpy((char *) dbmval.dptr + sizeof (apr_time_t),
495            data.data, data.size);
496
[c005645]497    apr_global_mutex_lock(sc->cache_mutex);
498
[1d1361f]499    rv = apr_dbm_open_ex(&dbm, db_type(sc),
500                         sc->cache_config, APR_DBM_RWCREATE,
501                         SSL_DBM_FILE_MODE, spool);
502    if (rv != APR_SUCCESS)
503    {
504        ap_log_error(APLOG_MARK, APLOG_NOTICE, rv, s,
505                     "error opening cache '%s'",
506                     sc->cache_config);
[c005645]507        apr_global_mutex_unlock(sc->cache_mutex);
[e183628]508        apr_pool_destroy(spool);
509        return -1;
510    }
511
[2f932fa]512    rv = apr_dbm_store(dbm, dbmkey, dbmval);
[1d1361f]513    if (rv != APR_SUCCESS)
514    {
515        ap_log_error(APLOG_MARK, APLOG_DEBUG, rv, s,
516                     "error storing in cache '%s'",
517                     sc->cache_config);
[e183628]518        apr_dbm_close(dbm);
[c005645]519        apr_global_mutex_unlock(sc->cache_mutex);
[e183628]520        apr_pool_destroy(spool);
521        return -1;
522    }
523
[c005645]524    apr_dbm_close(dbm);
525    apr_global_mutex_unlock(sc->cache_mutex);
526
[1d1361f]527    ap_log_error(APLOG_MARK, APLOG_DEBUG, rv, s,
528                 "stored %ld bytes of data (%ld byte key) in cache '%s'",
[2f932fa]529                 dbmval.dsize, dbmkey.dsize, sc->cache_config);
[1d1361f]530
[e183628]531    apr_pool_destroy(spool);
532
533    return 0;
[fcb122d]534}
535
[ae08186]536static int dbm_cache_store_session(void *baton, gnutls_datum_t key,
537                                   gnutls_datum_t data)
538{
539    mgs_handle_t *ctxt = baton;
[2f932fa]540    gnutls_datum_t dbmkey;
[ae08186]541
542    if (mgs_session_id2dbm(ctxt->c, key.data, key.size, &dbmkey) < 0)
543        return -1;
544
545    apr_time_t expiry = apr_time_now() + ctxt->sc->cache_timeout;
546
[1d1361f]547    return dbm_cache_store(ctxt->c->base_server, dbmkey, data, expiry);
[ae08186]548}
549
[c55902b]550static int dbm_cache_delete(void *baton, gnutls_datum_t key)
551{
[e183628]552    apr_dbm_t *dbm;
[2f932fa]553    gnutls_datum_t tmpkey;
[e183628]554    mgs_handle_t *ctxt = baton;
555    apr_status_t rv;
556
[2f932fa]557    if (mgs_session_id2dbm(ctxt->c, key.data, key.size, &tmpkey) < 0)
[e183628]558        return -1;
[2f932fa]559    apr_datum_t dbmkey = {(char*) tmpkey.data, tmpkey.size};
[e183628]560
[c005645]561    apr_global_mutex_lock(ctxt->sc->cache_mutex);
562
[e183628]563    rv = apr_dbm_open_ex(&dbm, db_type(ctxt->sc),
564            ctxt->sc->cache_config, APR_DBM_RWCREATE,
565            SSL_DBM_FILE_MODE, ctxt->c->pool);
566    if (rv != APR_SUCCESS) {
567        ap_log_error(APLOG_MARK, APLOG_NOTICE, rv,
568                ctxt->c->base_server,
569                "[gnutls_cache] error opening cache '%s'",
570                ctxt->sc->cache_config);
[c005645]571        apr_global_mutex_unlock(ctxt->sc->cache_mutex);
[e183628]572        return -1;
573    }
574
575    rv = apr_dbm_delete(dbm, dbmkey);
576
577    if (rv != APR_SUCCESS) {
578        ap_log_error(APLOG_MARK, APLOG_NOTICE, rv,
579                ctxt->c->base_server,
580                "[gnutls_cache] error deleting from cache '%s'",
581                ctxt->sc->cache_config);
582        apr_dbm_close(dbm);
[c005645]583        apr_global_mutex_unlock(ctxt->sc->cache_mutex);
[e183628]584        return -1;
585    }
586
587    apr_dbm_close(dbm);
[c005645]588    apr_global_mutex_unlock(ctxt->sc->cache_mutex);
[e183628]589
590    return 0;
[fcb122d]591}
592
[e02dd8c]593static int dbm_cache_post_config(apr_pool_t * p, server_rec * s,
[e183628]594        mgs_srvconf_rec * sc) {
595    apr_status_t rv;
596    apr_dbm_t *dbm;
597    const char *path1;
598    const char *path2;
[fcb122d]599
[e183628]600    rv = apr_dbm_open_ex(&dbm, db_type(sc), sc->cache_config,
601            APR_DBM_RWCREATE, SSL_DBM_FILE_MODE, p);
[fcb122d]602
[e183628]603    if (rv != APR_SUCCESS) {
604        ap_log_error(APLOG_MARK, APLOG_ERR, rv, s,
605                "GnuTLS: Cannot create DBM Cache at `%s'",
606                sc->cache_config);
607        return rv;
608    }
[fcb122d]609
[e183628]610    apr_dbm_close(dbm);
[fcb122d]611
[e183628]612    apr_dbm_get_usednames_ex(p, db_type(sc), sc->cache_config, &path1,
613            &path2);
[fcb122d]614
[e183628]615    /* The Following Code takes logic directly from mod_ssl's DBM Cache */
[fcb122d]616#if !defined(OS2) && !defined(WIN32) && !defined(BEOS) && !defined(NETWARE)
[e183628]617    /* Running as Root */
618    if (path1 && geteuid() == 0) {
[422f5b7]619        if (0 != chown(path1, ap_unixd_config.user_id, -1))
620            ap_log_error(APLOG_MARK, APLOG_NOTICE, -1, s,
621                         "GnuTLS: could not chown cache path1 `%s' to uid %d (errno: %d)",
622                         path1, ap_unixd_config.user_id, errno);
[e183628]623        if (path2 != NULL) {
[422f5b7]624            if (0 != chown(path2, ap_unixd_config.user_id, -1))
625                ap_log_error(APLOG_MARK, APLOG_NOTICE, -1, s,
626                             "GnuTLS: could not chown cache path2 `%s' to uid %d (errno: %d)",
627                             path2, ap_unixd_config.user_id, errno);
[e183628]628        }
629    }
[fcb122d]630#endif
631
[e183628]632    return rv;
[fcb122d]633}
634
[e02dd8c]635int mgs_cache_post_config(apr_pool_t * p, server_rec * s,
[e183628]636        mgs_srvconf_rec * sc) {
[040387c]637
638    /* if GnuTLSCache was never explicitly set: */
639    if (sc->cache_type == mgs_cache_unset)
640        sc->cache_type = mgs_cache_none;
641    /* if GnuTLSCacheTimeout was never explicitly set: */
[671b64f]642    if (sc->cache_timeout == -1)
[c005645]643        sc->cache_timeout = apr_time_from_sec(MGS_DEFAULT_CACHE_TIMEOUT);
644
645    /* initialize mutex only once */
646    if (sc->cache_mutex == NULL)
647    {
648        apr_status_t rv = ap_global_mutex_create(&sc->cache_mutex, NULL,
649                                                 MGS_CACHE_MUTEX_NAME,
650                                                 NULL, s, p, 0);
651        if (rv != APR_SUCCESS)
652            return rv;
653    }
[040387c]654
[e183628]655    if (sc->cache_type == mgs_cache_dbm
656            || sc->cache_type == mgs_cache_gdbm) {
657        return dbm_cache_post_config(p, s, sc);
658    }
[c005645]659
660    return APR_SUCCESS;
[fcb122d]661}
662
[e765670]663#if HAVE_APR_MEMCACHE
664int mgs_cache_child_init(apr_pool_t * p,
665                         server_rec * s,
666                         mgs_srvconf_rec * sc)
667#else
668int mgs_cache_child_init(apr_pool_t * p __attribute__((unused)),
669                         server_rec * s __attribute__((unused)),
670                         mgs_srvconf_rec * sc)
671#endif
672{
[e183628]673    if (sc->cache_type == mgs_cache_dbm
674            || sc->cache_type == mgs_cache_gdbm) {
675        return 0;
676    }
[6e0bfd6]677#if HAVE_APR_MEMCACHE
[e183628]678    else if (sc->cache_type == mgs_cache_memcache) {
679        return mc_cache_child_init(p, s, sc);
680    }
[6e0bfd6]681#endif
[e183628]682    return 0;
[6e0bfd6]683}
684
[e02dd8c]685#include <assert.h>
[fcb122d]686
[e183628]687int mgs_cache_session_init(mgs_handle_t * ctxt) {
688    if (ctxt->sc->cache_type == mgs_cache_dbm
689            || ctxt->sc->cache_type == mgs_cache_gdbm) {
690        gnutls_db_set_retrieve_function(ctxt->session,
[15245bf]691                dbm_cache_fetch_session);
[e183628]692        gnutls_db_set_remove_function(ctxt->session,
693                dbm_cache_delete);
694        gnutls_db_set_store_function(ctxt->session,
[ae08186]695                dbm_cache_store_session);
[e183628]696        gnutls_db_set_ptr(ctxt->session, ctxt);
697    }
[6e0bfd6]698#if HAVE_APR_MEMCACHE
[e183628]699    else if (ctxt->sc->cache_type == mgs_cache_memcache) {
700        gnutls_db_set_retrieve_function(ctxt->session,
701                mc_cache_fetch);
702        gnutls_db_set_remove_function(ctxt->session,
703                mc_cache_delete);
704        gnutls_db_set_store_function(ctxt->session,
705                mc_cache_store);
706        gnutls_db_set_ptr(ctxt->session, ctxt);
707    }
[6e0bfd6]708#endif
[42307a9]709
[e183628]710    return 0;
[32f2e60]711}
Note: See TracBrowser for help on using the repository browser.