sendmail/libsm/t-rpool.c

/*
 * Copyright (c) 2000-2001 Sendmail, Inc. and its suppliers.
 *  All rights reserved.
 *
 * By using this file, you agree to the terms and conditions set
 * forth in the LICENSE file which can be found at the top level of
 * the sendmail distribution.
 */

#pragma ident   "%Z%%M% %I% %E% SMI"

#include <sm/gen.h>
SM_IDSTR(id, "@(#)$Id: t-rpool.c,v 1.16 2001/03/04 18:38:47 ca Exp $")

#include <sm/debug.h>
#include <sm/heap.h>
#include <sm/rpool.h>
#include <sm/io.h>
#include <sm/test.h>

static void
rfree __P((
    void *cx));

static void
rfree(cx)
    void *cx;
{
    (void) sm_io_fprintf(smioout, SM_TIME_DEFAULT, "rfree freeing `%s'\n",
                 (char *) cx);
}

int
main(argc, argv)
    int argc;
    char *argv[];
{
    SM_RPOOL_T *rpool;
    char *a[26];
    int i, j;
    SM_RPOOL_ATTACH_T att;

    sm_test_begin(argc, argv, "test rpool");
    sm_debug_addsetting_x("sm_check_heap", 1);
    rpool = sm_rpool_new_x(NULL);
    SM_TEST(rpool != NULL);
    att = sm_rpool_attach_x(rpool, rfree, "attachment #1");
    SM_TEST(att != NULL);
    for (i = 0; i < 26; ++i)
    {
        size_t sz = i * i * i;

        a[i] = sm_rpool_malloc_x(rpool, sz);
        for (j = 0; j < sz; ++j)
            a[i][j] = 'a' + i;
    }
    att = sm_rpool_attach_x(rpool, rfree, "attachment #2");
    (void) sm_rpool_attach_x(rpool, rfree, "attachment #3");
    sm_rpool_detach(att);

    /* XXX more tests? */
#if DEBUG
    sm_dprintf("heap after filling up rpool:\n");
    sm_heap_report(smioout, 3);
    sm_dprintf("freeing rpool:\n");
    sm_rpool_free(rpool);
    sm_dprintf("heap after freeing rpool:\n");
    sm_heap_report(smioout, 3);
#endif /* DEBUG */
    return sm_test_end();
}